[Sommaire] [Imprimer]

   1  <?php
   2  /*****************************************************
   3  * This file is part of Agora, web based content management system.
   4  *
   5  * Agora is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; version 2 of the License.
   8  *
   9  * Agora is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details (file "COPYING").
  13  *
  14  * Copyright © Arnaud Martin, Antoine Pitrou et Philippe Rivière.
  15  * List of authors detailed in "copyright_fr.html" file.
  16  * E-mail : agora@sig.premier-ministre.gouv.fr
  17  * Web site : http://www.agora.gouv.fr
  18  *****************************************************/
  19  // Test connection to a DB based on DB_Parameters
  20  // Fichier utilise lors de l'install
  21  
  22  require_once("PEAR.php");
  23  require_once("DB.php");
  24  require_once ("parameters.php");
  25  
  26  class BD_testConnection {
  27  	function testDB ($dbParameters, $dbOptions = null) {
  28          $db = &DB::connect($dbParameters->getDSN(), $dbOptions);
  29  
  30          if (DB::isError($db)) {
  31              return $db;
  32          }
  33          else {
  34              return 0;
  35          }
  36      }
  37  
  38  
  39      // Verifie la version d'Agora installee sur la BDD
  40      
  41  	function isSpip ($dbParameters, $versionSpip, $dbOptions = null) {
  42          $db = &DB::connect($dbParameters->getDSN(), $dbOptions);
  43  
  44          if (DB::isError($db)) {
  45              return $db;
  46          }
  47          else {
  48              $query = 'SELECT valeur FROM ' . $GLOBALS['table_prefix']. '_meta WHERE nom = \'version_installee\'';
  49              $version = $db->getOne($query);
  50              if ($version == $versionSpip) {
  51                  return 'SPIP OK';
  52              }
  53              else {
  54                  if (DB::isError($version)) {
  55                      return 'NEW INSTALL';
  56                  }
  57                  else {
  58                      return 'SPIP NOT OK';
  59                  }
  60              }
  61          }
  62      }
  63  }
  64  ?>