Subversion Repositories Sites.tela-botanica.org

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 david 1
<?php
2
 
3
//
4
// Ce fichier ne sera execute qu'une fois
5
if (defined("_INC_DEBUG_SKEL")) return;
6
define("_INC_DEBUG_SKEL", "1");
7
 
8
 
9
function erreur_requete_boucle($query, $id_boucle) {
10
	$erreur = spip_sql_error();
11
	$errno = spip_sql_errno();
12
	if (eregi('err(no|code):?[[:space:]]*([0-9]+)', $erreur, $regs))
13
		$errsys = $regs[2];
14
	else if (($errno == 1030 OR $errno <= 1026) AND ereg('[^[:alnum:]]([0-9]+)[^[:alnum:]]', $erreur, $regs))
15
		$errsys = $regs[1];
16
 
17
	$erreur = htmlspecialchars($erreur);
18
 
19
	// Erreur systeme
20
	if ($errsys > 0 AND $errsys < 200) {
21
		$retour .= "<tt><br><br><blink>"._T('info_erreur_systeme', array('errsys'=>$errsys))."</blink><br>\n";
22
		$retour .= "<" ."?php
23
		if (\$GLOBALS['spip_admin']) {
24
			echo \""._T('info_erreur_systeme2').
25
				"<blink>"._T('info_erreur_systeme', array('errsys'=>$errsys))."</blink>\";
26
		}
27
		echo \"</tt>\n\";
28
		?".">";
29
	}
30
	// Requete erronee
31
	else {
32
		$retour .= "<tt><br><br><blink>&lt;BOUCLE".$id_boucle."&gt;</blink><br>\n".
33
			"<b>"._T('avis_erreur_mysql')."</b><br>\n".
34
			htmlspecialchars($query)."<br><font color='red'><b>$erreur</b></font><br>".
35
			"<blink>&lt;/BOUCLE".$id_boucle."&gt;</blink></tt>\n";
36
		$retour .= "<" ."?php
37
		if (\$GLOBALS['spip_admin']) {
38
			include_ecrire ('inc_lang.php3');
39
			utiliser_langue_visiteur();
40
			include_ecrire('inc_presentation.php3');
41
			echo aide('erreur_mysql');
42
		} ?".">";
43
	}
44
	$retour .= "<br><br>\n"; // debugger les squelettes
45
	return $retour;
46
}
47
 
48
?>