[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  // Ce fichier ne sera execute qu'une fois
  20  if (defined("_INC_DEBUG_SKEL"))
  21      return;
  22  
  23  define("_INC_DEBUG_SKEL", "1");
  24  
  25  function erreur_requete_boucle ($query, $id_boucle, $pearError) {
  26      /******** Modification elebescond@clever-age.com **********/
  27      $erreur = $pearError->getMessage();
  28      $errno = $pearError->getCode();
  29      /*
  30      $erreur = spip_sql_error();
  31      $errno = spip_sql_errno();
  32      */
  33      /******** Fin Modification elebescond@clever-age.com **********/
  34      if (eregi('err(no|code):?[[:space:]]*([0-9]+)', $erreur, $regs))
  35          $errsys = $regs[2];
  36      else if (($errno == 1030 OR $errno <= 1026)AND ereg('[^[:alnum:]]([0-9]+)[^[:alnum:]]', $erreur, $regs))
  37          $errsys = $regs[1];
  38  
  39      $erreur = htmlspecialchars($erreur);
  40  
  41      // Erreur systeme
  42      if ($errsys > 0 AND $errsys < 200) {
  43          $retour .= "<tt><br /><br /><blink>Erreur syst&egrave;me (errno $errsys)</blink><br />\n";
  44          $retour
  45              .= "<" . "?php
  46          if (\$GLOBALS['spip_admin']) {
  47              echo \"<b>Le disque dur est peut-&ecirc;tre plein, ou la base de donn&eacute;es endommag&eacute;e. <br>\"
  48                  .\"<font color='red'>Essayez de <a href='ecrire/admin_repair.php'>r&eacute;parer la base</a>, \"
  49                  .\"ou contactez votre h&eacute;bergeur.</font><br></b>" . "<blink>Erreur syst&egrave;me (errno $errsys)</blink>\";
  50          }
  51          echo \"</tt>\n\";
  52          ?" . ">";
  53      }
  54      // Requete erronee
  55      else {
  56          $retour
  57              .= "<tt><br /><br /><blink>&lt;BOUCLE" . $id_boucle . "&gt;</blink><br />\n" . "<strong>Erreur dans la requ&ecirc;te envoy&eacute;e &agrave; MySQL :</strong><br />\n" . htmlspecialchars(
  58                                                                                                                                                                                           $query). "<br /><font color='red'><strong>$erreur</strong></font><br />" . "<blink>&lt;/BOUCLE" . $id_boucle . "&gt;</blink></tt>\n";
  59          $retour
  60              .= "<" . "?php
  61          if (\$GLOBALS['spip_admin']) {
  62              include_ecrire  ('inc_lang.php');
  63              utiliser_langue_visiteur();
  64              include_ecrire ('inc_presentation.php');
  65              echo aide('erreur_mysql');
  66          } ?" . ">";
  67      }
  68  
  69      $retour .= "<br /><br />\n"; // debugger les squelettes
  70      return $retour;
  71  }
  72  ?>