spip / SPIP

ecrire/public/decompiler.php

Spacing +54 added lines, -56 removed lines

@@ -14,7 +14,7 @@ 
 
 // Decompilation de l'arbre de syntaxe abstraite d'un squelette SPIP
 
-function decompiler_boucle($struct, $fmt='', $prof=0)
+function decompiler_boucle($struct, $fmt = '', $prof = 0)
 {
 	$nom = $struct->id_boucle;
 	$avant = decompiler_($struct->avant, $fmt, $prof);
@@ -23,98 +23,96 @@ 
 	$milieu = decompiler_($struct->milieu, $fmt, $prof);
 
 	$type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
-	$type .= ($struct->type_requete ? $struct->type_requete :
-			    $struct->table_optionnelle);
+	$type .= ($struct->type_requete ? $struct->type_requete : $struct->table_optionnelle);
 
 	if ($struct->jointures_explicites)
-	  $type .= " " . $struct->jointures_explicites;
+	  $type .= " ".$struct->jointures_explicites;
 	if ($struct->table_optionnelle)
 	  $type .= "?";
 	// Revoir le cas de la boucle recursive
 
 	$crit = $struct->param;
 	if ($crit AND !is_array($crit[0])) {
-		$type = strtolower($type) . array_shift($crit);
+		$type = strtolower($type).array_shift($crit);
 	}
-	$crit = decompiler_criteres($struct, $fmt, $prof) ;
+	$crit = decompiler_criteres($struct, $fmt, $prof);
 
-	$f = 'format_boucle_' . $fmt;
+	$f = 'format_boucle_'.$fmt;
 	return $f($avant, $nom, $type, $crit, $milieu, $apres, $altern, $prof);
 }
 	
-function decompiler_include($struct, $fmt='', $prof=0)
+function decompiler_include($struct, $fmt = '', $prof = 0)
 {
 	$res = array();
-	foreach($struct->param ? $struct->param : array() as $couple) {
+	foreach ($struct->param ? $struct->param : array() as $couple) {
 		array_shift($couple);
-		foreach($couple as $v) {
-			$res[]= decompiler_($v, $fmt, $prof);
+		foreach ($couple as $v) {
+			$res[] = decompiler_($v, $fmt, $prof);
 		}
 	}
-	$file = is_string($struct->texte) ? $struct->texte :
-		decompiler_($struct->texte, $fmt, $prof);
-	$f = 'format_inclure_' . $fmt;
+	$file = is_string($struct->texte) ? $struct->texte : decompiler_($struct->texte, $fmt, $prof);
+	$f = 'format_inclure_'.$fmt;
 	return $f($file, $res, $prof);
 }
 
-function decompiler_texte($struct, $fmt='', $prof=0)
+function decompiler_texte($struct, $fmt = '', $prof = 0)
 {
-	$f = 'format_texte_' . $fmt;
+	$f = 'format_texte_'.$fmt;
 	return strlen($struct->texte) ? $f($struct->texte, $prof) : '';
 }
 
-function decompiler_polyglotte($struct, $fmt='', $prof=0)
+function decompiler_polyglotte($struct, $fmt = '', $prof = 0)
 {
-	$f = 'format_polyglotte_' . $fmt;
+	$f = 'format_polyglotte_'.$fmt;
 	return $f($struct->traductions, $prof);
 }
 
-function decompiler_idiome($struct, $fmt='', $prof=0)
+function decompiler_idiome($struct, $fmt = '', $prof = 0)
 {
 	$args = array();
 	foreach ($struct->arg as $k => $v) {
-		$args[$k]= public_decompiler($v, $fmt, $prof);
+		$args[$k] = public_decompiler($v, $fmt, $prof);
 	}
 
-	$filtres =  decompiler_liste($struct->param, $fmt, $prof);
+	$filtres = decompiler_liste($struct->param, $fmt, $prof);
 
-	$f = 'format_idiome_' . $fmt;
+	$f = 'format_idiome_'.$fmt;
 	return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
 }
 
-function decompiler_champ($struct, $fmt='', $prof=0)
+function decompiler_champ($struct, $fmt = '', $prof = 0)
 {
 	$avant = decompiler_($struct->avant, $fmt, $prof);
 	$apres = decompiler_($struct->apres, $fmt, $prof);
 	$args = $filtres = '';
 	if ($p = $struct->param) {
-		if ($p[0][0]==='')
+		if ($p[0][0] === '')
 		  $args = decompiler_liste(array(array_shift($p)), $fmt, $prof);
 		$filtres = decompiler_liste($p, $fmt, $prof);
 	}
-	$f = 'format_champ_' . $fmt;
+	$f = 'format_champ_'.$fmt;
 	return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
 }
 
-function decompiler_liste($sources, $fmt='', $prof=0) {
+function decompiler_liste($sources, $fmt = '', $prof = 0) {
 	if (!is_array($sources)) return '';
-	$f = 'format_liste_' . $fmt;
+	$f = 'format_liste_'.$fmt;
 	$res = '';
-	foreach($sources as $arg) {
-		if (!is_array($arg))  {
+	foreach ($sources as $arg) {
+		if (!is_array($arg)) {
 		  continue; // ne devrait pas arriver.
-		} else {$r = array_shift($arg);}
+		} else {$r = array_shift($arg); }
 		$args = array();
-		foreach($arg as $v) {
+		foreach ($arg as $v) {
 		  // cas des arguments entoures de ' ou "
 			if ((count($v) == 1) 
-			AND $v[0]->type=='texte'
+			AND $v[0]->type == 'texte'
 			AND (strlen($v[0]->apres) == 1)
 			AND $v[0]->apres == $v[0]->avant)
-			  $args[]= $v[0]->avant . $v[0]->texte . $v[0]->apres;
-			else $args[]= decompiler_($v, $fmt, 0-$prof);
+			  $args[] = $v[0]->avant.$v[0]->texte.$v[0]->apres;
+			else $args[] = decompiler_($v, $fmt, 0 - $prof);
 		}
-		if (($r!=='') OR $args) $res .= $f($r, $args, $prof);
+		if (($r !== '') OR $args) $res .= $f($r, $args, $prof);
 	}
 	return $res;
 }
@@ -123,30 +121,30 @@ 
 // - le phraseur fournit un bout du source en plus de la compil
 // - le champ apres signale le critere {"separateur"} ou {'separateur'}
 // - les champs sont implicitement etendus (crochets implicites mais interdits)
-function decompiler_criteres($boucle, $fmt='', $prof=0) {
+function decompiler_criteres($boucle, $fmt = '', $prof = 0) {
 	$sources = $boucle->param;
 	if (!is_array($sources)) return '';
 	$res = '';
-	$f = 'format_critere_' . $fmt;
-	foreach($sources as $crit) {
+	$f = 'format_critere_'.$fmt;
+	foreach ($sources as $crit) {
 		if (!is_array($crit)) continue; // boucle recursive
 		array_shift($crit);
 		$args = array();
-		foreach($crit as $i => $v) {
+		foreach ($crit as $i => $v) {
 		  if ((count($v) == 1) 
-		      AND $v[0]->type=='texte'
+		      AND $v[0]->type == 'texte'
 		      AND $v[0]->apres)
-		    $args[]= array(array('texte', ( $v[0]->apres . $v[0]->texte . $v[0]->apres)));
+		    $args[] = array(array('texte', ($v[0]->apres.$v[0]->texte.$v[0]->apres)));
 		  else {
 		    $res2 = array();
-		    foreach($v as $k => $p) {
+		    foreach ($v as $k => $p) {
 			if (isset($p->type)
-			AND function_exists($d = 'decompiler_' . $p->type)) {
-				$r = $d($p, $fmt, (0-$prof), @$v[$k+1]);
-				$res2[]= array($p->type, $r);
+			AND function_exists($d = 'decompiler_'.$p->type)) {
+				$r = $d($p, $fmt, (0 - $prof), @$v[$k + 1]);
+				$res2[] = array($p->type, $r);
 			} else spip_log("critere $i / $k mal forme");
 		    }
-		    $args[]= $res2;
+		    $args[] = $res2;
 		  }
 		}
 		$res .= $f($args);
@@ -155,15 +153,15 @@ 
 }
 
 
-function decompiler_($liste, $fmt='', $prof=0)
+function decompiler_($liste, $fmt = '', $prof = 0)
 {
 	if (!is_array($liste))  return '';
-	$prof2 = ($prof < 0) ? ($prof-1) : ($prof+1);
+	$prof2 = ($prof < 0) ? ($prof - 1) : ($prof + 1);
 	$contenu = array();
-	foreach($liste as $k => $p) {
+	foreach ($liste as $k => $p) {
 	    if (!isset($p->type)) continue; #??????
-	    $d = 'decompiler_' . $p->type;
-	    $next = isset($liste[$k+1]) ? $liste[$k+1] : false;
+	    $d = 'decompiler_'.$p->type;
+	    $next = isset($liste[$k + 1]) ? $liste[$k + 1] : false;
 	  // Forcer le champ etendu si son source (pas les reecritures)
 	  // contenait des args et s'il est suivi d'espaces, 
 	  // le champ simple les eliminant est un bug helas perenne.
@@ -175,7 +173,7 @@ 
 		AND !$p->avant
 		AND $p->fonctions) {
 	      $n = strlen($next->texte) - strlen(ltrim($next->texte));
-	      if ($n)  {
+	      if ($n) {
 			$champ = new Texte;
 			$champ->texte = substr($next->texte, 0, $n);
 			$champ->ligne = $p->ligne;
@@ -186,14 +184,14 @@ 
 	    $contenu[] = array($d($p, $fmt, $prof2), $p->type);
 
 	}
-	$f = 'format_suite_' . $fmt;
+	$f = 'format_suite_'.$fmt;
 	return $f($contenu);
 }
 
-function public_decompiler($liste, $fmt='', $prof=0, $quoi='') 
+function public_decompiler($liste, $fmt = '', $prof = 0, $quoi = '') 
 {
-	if (!include_spip('public/format_' . $fmt)) return "'$fmt'?";
-	$f = 'decompiler_' . $quoi;
+	if (!include_spip('public/format_'.$fmt)) return "'$fmt'?";
+	$f = 'decompiler_'.$quoi;
 	return $f($liste, $fmt, $prof);
 }
 ?>

ecrire/public/evaluer_page.php

Spacing +19 added lines, -19 removed lines

@@ -45,55 +45,55 @@
 	// restaurer l'etat des notes avant calcul
 	if (isset($page['notes'])
 		AND $page['notes']
-		AND $notes = charger_fonction("notes","inc",true)){
-		$notes($page['notes'],'restaurer_etat');
+		AND $notes = charger_fonction("notes", "inc", true)) {
+		$notes($page['notes'], 'restaurer_etat');
 	}
 	ob_start();
-	if (strpos($page['texte'],'?xml')!==false)
+	if (strpos($page['texte'], '?xml') !== false)
 		$page['texte'] = str_replace('<'.'?xml', "<\1?xml", $page['texte']);
 
 	try {
-		$res = eval('?' . '>' . $page['texte']);
+		$res = eval('?'.'>'.$page['texte']);
 		// error catching 5.2<=PHP<7
 		if ($res === false
 		  and function_exists('error_get_last')
-		  and ($erreur = error_get_last()) ) {
+		  and ($erreur = error_get_last())) {
 			$code = $page['texte'];
 			$GLOBALS['numero_ligne_php'] = 1;
-			if (!function_exists('numerote_ligne_php')){
-				function numerote_ligne_php($match){
+			if (!function_exists('numerote_ligne_php')) {
+				function numerote_ligne_php($match) {
 					$GLOBALS['numero_ligne_php']++;
-					return "\n/*".str_pad($GLOBALS['numero_ligne_php'],3,"0",STR_PAD_LEFT)."*/";
+					return "\n/*".str_pad($GLOBALS['numero_ligne_php'], 3, "0", STR_PAD_LEFT)."*/";
 				}
 			}
-			$code = "/*001*/".preg_replace_callback(",\n,","numerote_ligne_php",$code);
-			$code = trim(highlight_string($code,true));
-			erreur_squelette("L".$erreur['line'].": ".$erreur['message']."<br />".$code,array($page['source'],'',$erreur['file'],'',$GLOBALS['spip_lang']));
+			$code = "/*001*/".preg_replace_callback(",\n,", "numerote_ligne_php", $code);
+			$code = trim(highlight_string($code, true));
+			erreur_squelette("L".$erreur['line'].": ".$erreur['message']."<br />".$code, array($page['source'], '', $erreur['file'], '', $GLOBALS['spip_lang']));
 			$page['texte'] = "<!-- Erreur -->";
 		}
 		else {
 			$page['texte'] = ob_get_contents();
 		}
 	}
-	catch (Exception $e){
+	catch (Exception $e) {
 		$code = $page['texte'];
 		$GLOBALS['numero_ligne_php'] = 1;
-		if (!function_exists('numerote_ligne_php')){
-			function numerote_ligne_php($match){
+		if (!function_exists('numerote_ligne_php')) {
+			function numerote_ligne_php($match) {
 				$GLOBALS['numero_ligne_php']++;
-				return "\n/*".str_pad($GLOBALS['numero_ligne_php'],3,"0",STR_PAD_LEFT)."*/";
+				return "\n/*".str_pad($GLOBALS['numero_ligne_php'], 3, "0", STR_PAD_LEFT)."*/";
 			}
 		}
-		$code = "/*001*/".preg_replace_callback(",\n,","numerote_ligne_php",$code);
-		$code = trim(highlight_string($code,true));
-		erreur_squelette("L".$e->getLine().": ".$e->getMessage()."<br />".$code,array($page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']));
+		$code = "/*001*/".preg_replace_callback(",\n,", "numerote_ligne_php", $code);
+		$code = trim(highlight_string($code, true));
+		erreur_squelette("L".$e->getLine().": ".$e->getMessage()."<br />".$code, array($page['source'], '', $e->getFile(), '', $GLOBALS['spip_lang']));
 		$page['texte'] = "<!-- Erreur -->";
 	}
 	ob_end_clean();
 
 	$page['process_ins'] = 'html';
 
-	if (strpos($page['texte'],'?xml')!==false)
+	if (strpos($page['texte'], '?xml') !== false)
 		$page['texte'] = str_replace("<\1?xml", '<'.'?xml', $page['texte']);
 }
 

ecrire/public/references.php

Spacing +46 added lines, -46 removed lines

@@ -27,14 +27,14 @@ 
  * @param Object $p
  * @return string
  */
-function index_boucle($p){
+function index_boucle($p) {
 
 	$idb = $p->id_boucle;
 	$explicite = $p->nom_boucle;
 
 	if (strlen($explicite)) {
 		// Recherche d'un champ dans un etage superieur
-	  while (($idb !== $explicite) && ($idb !=='')) {
+	  while (($idb !== $explicite) && ($idb !== '')) {
 			$idb = $p->boucles[$idb]->id_parent;
 		}
 	}
@@ -64,14 +64,14 @@ 
  *   permettre de remonter la pile des boucles ou non (dans ce cas on ne cherche que ds la 1ere boucle englobante)
  * @return string
  */
-function index_pile($idb, $nom_champ, &$boucles, $explicite='', $defaut=null, $remonte_pile=true) {
+function index_pile($idb, $nom_champ, &$boucles, $explicite = '', $defaut = null, $remonte_pile = true) {
 	if (!is_string($defaut))
-		$defaut = '@$Pile[0][\''. strtolower($nom_champ) . '\']';
+		$defaut = '@$Pile[0][\''.strtolower($nom_champ).'\']';
 
 	$i = 0;
 	if (strlen($explicite)) {
 		// Recherche d'un champ dans un etage superieur
-	  while (($idb !== $explicite) && ($idb !=='')) {
+	  while (($idb !== $explicite) && ($idb !== '')) {
 			#	spip_log("Cherchexpl: $nom_champ '$explicite' '$idb' '$i'");
 			$i++;
 			$idb = $boucles[$idb]->id_parent;
@@ -90,14 +90,14 @@ 
 			if (!in_array($t, $boucles[$idb]->select)) {
 				$boucles[$idb]->select[] = $t;
 			}
-			$champ = '$Pile[$SP' . ($i ? "-$i" : "") . '][\'' . $c . '\']';
+			$champ = '$Pile[$SP'.($i ? "-$i" : "").'][\''.$c.'\']';
 			if (!$joker)
-				return index_compose($conditionnel,$champ);
+				return index_compose($conditionnel, $champ);
 
 			$conditionnel[] = "isset($champ)?$champ";
 		}
 
-		if ($remonte_pile){
+		if ($remonte_pile) {
 			#	spip_log("On remonte vers $i");
 			// Sinon on remonte d'un cran
 			$idb = $boucles[$idb]->id_parent;
@@ -110,7 +110,7 @@ 
 	#	spip_log("Pas vu $nom_champ");
 	// esperons qu'il y sera
 	// on qu'on a fourni une valeur par "defaut" plus pertinent
-	return index_compose($conditionnel,$defaut);
+	return index_compose($conditionnel, $defaut);
 }
 
 /**
@@ -122,10 +122,10 @@ 
  * @param string $defaut
  * @return string
  */
-function index_compose($conditionnel,$defaut){
+function index_compose($conditionnel, $defaut) {
 	while ($c = array_pop($conditionnel))
 		// si on passe defaut = '', ne pas générer d'erreur de compilation.
-		$defaut = "($c:(".($defaut?$defaut:"''")."))";
+		$defaut = "($c:(".($defaut ? $defaut : "''")."))";
 	return $defaut;
 }
 
@@ -139,7 +139,7 @@ 
 	if (!$r) {
 		$joker = false; // indiquer a l'appelant
 		# continuer pour chercher l'erreur suivante
-		return  array("'#" . $r . ':' . $nom_champ . "'",'');
+		return  array("'#".$r.':'.$nom_champ."'", '');
 	}
 
 	$desc = $boucles[$idb]->show;
@@ -173,7 +173,7 @@ 
 					       $nom_champ,
 					       array($t[1]['id_table'], $nom_champ));
 		  }
-			return array('','');
+			return array('', '');
 		}
 	}
 }
@@ -192,24 +192,24 @@ 
 	if (is_array($excep)) {
 		// permettre aux plugins de gerer eux meme des jointures derogatoire ingerables
 		$t = NULL;
-		if (count($excep)==3){
+		if (count($excep) == 3) {
 			$index_exception_derogatoire = array_pop($excep);
 			$t = $index_exception_derogatoire($boucle, $desc, $nom_champ, $excep);
 		}
 		if ($t == NULL) {
-			list($e, $x) = $excep;	#PHP4 affecte de gauche a droite
-			$excep = $x;		#PHP5 de droite a gauche !
+			list($e, $x) = $excep; #PHP4 affecte de gauche a droite
+			$excep = $x; #PHP5 de droite a gauche !
 			$j = $trouver_table($e, $boucle->sql_serveur);
-			if (!$j) return array('','');
+			if (!$j) return array('', '');
 			$e = $j['table'];
 			if (!$t = array_search($e, $boucle->from)) {
 				$k = $j['key']['PRIMARY KEY'];
-				if (strpos($k,',')) {
+				if (strpos($k, ',')) {
 					$l = (preg_split('/\s*,\s*/', $k));
 					$k = $desc['key']['PRIMARY KEY'];
 					if (!in_array($k, $l)) {
-						spip_log("jointure impossible $e " . join(',', $l));
-						return array('','');
+						spip_log("jointure impossible $e ".join(',', $l));
+						return array('', '');
 					}
 				}
 				$k = array($boucle->id_table, array($e), $k);
@@ -221,7 +221,7 @@ 
 	else $t = $boucle->id_table;
 	// demander a SQL de gerer le synonyme
 	// ca permet que excep soit dynamique (Cedric, 2/3/06)
-	if ($excep != $nom_champ) $excep .= ' AS '. $nom_champ;
+	if ($excep != $nom_champ) $excep .= ' AS '.$nom_champ;
 	return array("$t.$excep", $nom_champ);
 }
 
@@ -274,7 +274,7 @@ 
 
 	// Certaines des balises comportant un _ sont generiques
 	if ($f = strpos($nom, '_')
-	AND $f = charger_fonction(substr($nom,0,$f+1), 'balise', true)) {
+	AND $f = charger_fonction(substr($nom, 0, $f + 1), 'balise', true)) {
 		$res = $f($p);
 		if ($res !== NULL)
 			return $res;
@@ -332,7 +332,7 @@ 
 	array(%s%s))");
 
 // http://doc.spip.org/@calculer_balise_dynamique
-function calculer_balise_dynamique($p, $nom, $l, $supp=array()) {
+function calculer_balise_dynamique($p, $nom, $l, $supp = array()) {
 
 	if (!balise_distante_interdite($p)) {
 		$p->code = "''";
@@ -354,9 +354,9 @@ 
 
 	$p->code = sprintf(CODE_EXECUTER_BALISE, $nom,
 		join(',', $collecte),
-		($collecte ? $param : substr($param,1)), # virer la virgule
+		($collecte ? $param : substr($param, 1)), # virer la virgule
 		memoriser_contexte_compil($p),
-		(!$supp ? '' : (', ' . join(',', $supp))));
+		(!$supp ? '' : (', '.join(',', $supp))));
 
 	$p->interdire_scripts = false;
 	return $p;
@@ -371,7 +371,7 @@ 
 // http://doc.spip.org/@collecter_balise_dynamique
 function collecter_balise_dynamique($l, &$p, $nom) {
 	$args = array();
-	foreach($l as $c) { $x = calculer_balise($c, $p); $args[] = $x->code;}
+	foreach ($l as $c) { $x = calculer_balise($c, $p); $args[] = $x->code; }
 	return $args;
 }
 
@@ -395,7 +395,7 @@ 
 		$s = $p->boucles[$nom]->sql_serveur;
 		if (strlen($s)
 			AND strlen($serveur = strtolower($s))
-			AND !in_array($serveur,$GLOBALS['exception_des_connect'])) {
+			AND !in_array($serveur, $GLOBALS['exception_des_connect'])) {
 				return $serveur;
 		}
 	}
@@ -425,7 +425,7 @@ 
 	$nom = $p->id_boucle;
 
 	if ($nom AND trouver_nom_serveur_distant($p)) {
-		spip_log( $nom .':' . $p->nom_champ .' '._T('zbug_distant_interdit'));
+		spip_log($nom.':'.$p->nom_champ.' '._T('zbug_distant_interdit'));
 		return false;
 	}
 	return true;
@@ -437,7 +437,7 @@ 
 // definis par $table_des_traitements, cf. ecrire/public/interfaces
 //
 // http://doc.spip.org/@champs_traitements
-function champs_traitements ($p) {
+function champs_traitements($p) {
 	global $table_des_traitements;
 
 	if (isset($table_des_traitements[$p->nom_champ]))
@@ -457,7 +457,7 @@ 
 		$idb = index_boucle($p);
 		// mais on peut aussi etre hors boucle. Se mefier.
 		$type_requete = isset($p->boucles[$idb]->type_requete) ? $p->boucles[$idb]->type_requete : false;
-		$table_sql = isset($p->boucles[$idb]->show['table_sql'])?$p->boucles[$idb]->show['table_sql']:false;
+		$table_sql = isset($p->boucles[$idb]->show['table_sql']) ? $p->boucles[$idb]->show['table_sql'] : false;
 
 		// le traitement peut n'etre defini que pour une table en particulier "spip_articles"
 		if ($table_sql AND isset($ps[$table_sql]))
@@ -466,10 +466,10 @@ 
 		elseif ($type_requete AND isset($ps[$type_requete]))
 			$ps = $ps[$type_requete];
 		// ou pour indiferrement quelle que soit la boucle
-		elseif(isset($ps[0]))
+		elseif (isset($ps[0]))
 			$ps = $ps[0];
 		else
-			$ps=false;
+			$ps = false;
 	}
 
 	if (!$ps) return $p->code;
@@ -484,9 +484,9 @@ 
 	AND 
 	  $p->descr['documents']
 	AND (
-		(strpos($ps,'propre') !== false)
+		(strpos($ps, 'propre') !== false)
 		OR
-		(strpos($ps,'typo') !== false)
+		(strpos($ps, 'typo') !== false)
 	))
 		$ps = 'traiter_doublons_documents($doublons, '.$ps.')';
 
@@ -531,11 +531,11 @@ 
 function compose_filtres(&$p, $code) {
 
 	$image_miette = false;
-	foreach($p->param as $filtre) {
+	foreach ($p->param as $filtre) {
 		$fonc = array_shift($filtre);
 		if (!$fonc) continue; // normalement qu'au premier tour.
-		$is_filtre_image = ((substr($fonc,0,6)=='image_') AND $fonc!='image_graver');
-		if ($image_miette AND !$is_filtre_image){
+		$is_filtre_image = ((substr($fonc, 0, 6) == 'image_') AND $fonc != 'image_graver');
+		if ($image_miette AND !$is_filtre_image) {
 	// il faut graver maintenant car apres le filtre en cours
 	// on est pas sur d'avoir encore le nom du fichier dans le pipe
 			$code = "filtrer('image_graver', $code)";
@@ -548,14 +548,14 @@ 
 		} else {$sep = ':';
 			// |?{a,b} *doit* avoir exactement 2 arguments ; on les force
 			if (count($filtre) != 2)
-				$filtre = array(isset($filtre[0])?$filtre[0]:"", isset($filtre[1])?$filtre[1]:"");
+				$filtre = array(isset($filtre[0]) ? $filtre[0] : "", isset($filtre[1]) ? $filtre[1] : "");
 		}
 		$arglist = compose_filtres_args($p, $filtre, $sep);
-		$logique = filtre_logique($fonc, $code, substr($arglist,1));
+		$logique = filtre_logique($fonc, $code, substr($arglist, 1));
 		if ($logique)
 			$code = $logique;
 		else {
-			$code = sandbox_composer_filtre($fonc,$code,$arglist,$p);
+			$code = sandbox_composer_filtre($fonc, $code, $arglist, $p);
 			if ($is_filtre_image) $image_miette = true;
 		}
 	}
@@ -595,7 +595,7 @@ 
 {
 	$arglist = "";
 	foreach ($args as $arg) {
-		$arglist .= $sep . 
+		$arglist .= $sep. 
 		  calculer_liste($arg, $p->descr, $p->boucles, $p->id_boucle);
 	}
 	return $arglist;
@@ -607,17 +607,17 @@ 
 // ET chez sa maman
 // 
 // http://doc.spip.org/@calculer_argument_precedent
-function calculer_argument_precedent($idb, $nom_champ, &$boucles, $defaut=null) {
+function calculer_argument_precedent($idb, $nom_champ, &$boucles, $defaut = null) {
 
 	// si recursif, forcer l'extraction du champ SQL mais ignorer le code
 	if ($boucles[$idb]->externe) {
-		index_pile ($idb, $nom_champ, $boucles,'', $defaut);
+		index_pile($idb, $nom_champ, $boucles, '', $defaut);
 		// retourner $Pile[$SP] et pas $Pile[0] si recursion en 1ere boucle
 		// on ignore le defaut fourni dans ce cas
 		$defaut = "@\$Pile[\$SP]['$nom_champ']";
 	}
 
-	return index_pile($boucles[$idb]->id_parent, $nom_champ, $boucles,'', $defaut);
+	return index_pile($boucles[$idb]->id_parent, $nom_champ, $boucles, '', $defaut);
 }
 
 //
@@ -637,9 +637,9 @@ 
 	$b = $p->id_boucle;
 	$p->code = '';
 	while ($b != '') {
-		foreach($p->boucles[$b]->criteres as $critere) {
+		foreach ($p->boucles[$b]->criteres as $critere) {
 			if ($critere->op == $motif) {
-				$p->code = '$Pile[$SP' . (($n==0) ? "" : "-$n") .
+				$p->code = '$Pile[$SP'.(($n == 0) ? "" : "-$n").
 					"]['$champ']";
 				$b = '';
 				break 2;

ecrire/public/format_html.php

Spacing +34 added lines, -34 removed lines

@@ -12,7 +12,7 @@ 
 
 if (!defined('_ECRIRE_INC_VERSION')) return;
 
-function format_boucle_html ($avant, $nom, $type, $crit, $corps, $apres, $altern, $prof)
+function format_boucle_html($avant, $nom, $type, $crit, $corps, $apres, $altern, $prof)
 {
 	$avant = $avant ? "<B$nom>$avant" : "";
 	$apres = $apres ? "$apres</B$nom>" : "";
@@ -21,36 +21,36 @@ 
 	return "$avant<BOUCLE$nom($type)$crit$corps$apres$altern";
 }
 
-function format_inclure_html ($file, $args, $prof)
+function format_inclure_html($file, $args, $prof)
 {
-	if (strpos($file, '#')===false)
-	 	$t = $file ? ("(" . $file . ")") : "" ;
+	if (strpos($file, '#') === false)
+	 	$t = $file ? ("(".$file.")") : "";
 	else {
-		$t = "{fond=" . $file . '}';
+		$t = "{fond=".$file.'}';
 	}
-	$args = !$args ? '' : ("{" . join(", ",$args) . "}");
-	return ("<INCLURE" . $t . $args  . ">");
+	$args = !$args ? '' : ("{".join(", ", $args)."}");
+	return ("<INCLURE".$t.$args.">");
 }
 
-function format_polyglotte_html ($args, $prof)
+function format_polyglotte_html($args, $prof)
 {
 	$contenu = array(); 
-	foreach($args as $l=>$t)
-		$contenu[]= ($l ? "[$l]" : '') . $t;
-	return ("<multi>" . join(" ", $contenu) . "</multi>");
+	foreach ($args as $l=>$t)
+		$contenu[] = ($l ? "[$l]" : '').$t;
+	return ("<multi>".join(" ", $contenu)."</multi>");
 }
 
-function format_idiome_html ($nom, $module, $args, $filtres, $prof)
+function format_idiome_html($nom, $module, $args, $filtres, $prof)
 {
 	foreach ($args as $k => $v) $args[$k] = "$k=$v";
-	$args = (!$args ? '' : ('{' . join(',', $args) . '}'));
-	return ("<:" . ($module ? "$module:" : "") . $nom . $args . $filtres . ":>");
+	$args = (!$args ? '' : ('{'.join(',', $args).'}'));
+	return ("<:".($module ? "$module:" : "").$nom.$args.$filtres.":>");
 }
 
-function format_champ_html ($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof)
+function format_champ_html($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof)
 {
 	$nom = "#"
-	. ($boucle ? ($boucle . ":") : "")
+	. ($boucle ? ($boucle.":") : "")
 	. $nom
 	. $etoile
 	. $args
@@ -59,62 +59,62 @@ 
 	// Determiner si c'est un champ etendu, 
 
 	$s = ($avant OR $apres OR $filtres
-	      OR (strpos($args, '(#') !==false));
+	      OR (strpos($args, '(#') !== false));
 
 	return ($s ? "[$avant($nom)$apres]" : $nom);
 }
 
-function format_critere_html ($critere)
+function format_critere_html($critere)
 {
 	foreach ($critere as $k => $crit) {
 		$crit_s = '';
 		foreach ($crit as $operande) {
 			list($type, $valeur) = $operande;
-			if ($type == 'champ' AND $valeur[0]=='[') {
-			  $valeur = substr($valeur,1,-1);
+			if ($type == 'champ' AND $valeur[0] == '[') {
+			  $valeur = substr($valeur, 1, -1);
 			  if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur))
-				$valeur = substr($valeur,1,-1);
+				$valeur = substr($valeur, 1, -1);
 			}
 			$crit_s .= $valeur;
 		}
 		$critere[$k] = $crit_s;
 	}
-	return (!$critere ? "" : ("{" . join(",", $critere) . "}"));
+	return (!$critere ? "" : ("{".join(",", $critere)."}"));
 }
 
-function format_liste_html ($fonc, $args, $prof)
+function format_liste_html($fonc, $args, $prof)
 {
-	return ((($fonc!=='') ? "|$fonc" : $fonc)
-	. (!$args ? "" : ("{" . join(",", $args) . "}")));
+	return ((($fonc !== '') ? "|$fonc" : $fonc)
+	. (!$args ? "" : ("{".join(",", $args)."}")));
 }
 
 // Concatenation sans separateur: verifier qu'on ne cree pas de faux lexemes
-function format_suite_html ($args)
+function format_suite_html($args)
 {
-	for($i=0; $i < count($args)-1; $i++) {
+	for ($i = 0; $i < count($args) - 1; $i++) {
 		list($texte, $type) = $args[$i];
-		list($texte2, $type2) = $args[$i+1];
+		list($texte2, $type2) = $args[$i + 1];
 		if (!$texte OR !$texte2) continue; 
-		$c1 = substr($texte,-1);
+		$c1 = substr($texte, -1);
 		if ($type2 !== 'texte') {
 		  // si un texte se termine par ( et est suivi d'un champ
 		  // ou assimiles, forcer la notation pleine
-			if ($c1 == '(' AND substr($texte2,0,1) == '#')
-				$args[$i+1][0] = '[(' . $texte2 . ')]';
+			if ($c1 == '(' AND substr($texte2, 0, 1) == '#')
+				$args[$i + 1][0] = '[('.$texte2.')]';
 		} else {
 			if ($type == 'texte') continue;
 			// si un champ ou assimiles est suivi d'un texte
 			// et si celui-ci commence par un caractere de champ
 			// forcer la notation pleine
-			if (($c1 == '}' AND substr(ltrim($texte2),0,1) == '|')
+			if (($c1 == '}' AND substr(ltrim($texte2), 0, 1) == '|')
 			OR (preg_match('/[\w\d_*]/', $c1) AND preg_match('/^[\w\d_*{|]/', $texte2)))
-				$args[$i][0] = '[(' . $texte . ')]';
+				$args[$i][0] = '[('.$texte.')]';
 		}
 	}
 	return join("", array_map('array_shift', $args));
 }
 
-function format_texte_html ($texte)
+function format_texte_html($texte)
 {
 	return $texte;
 }

ecrire/public/compiler.php

Spacing +167 added lines, -175 removed lines

@@ -57,15 +57,15 @@ 
 
 
 // http://doc.spip.org/@argumenter_inclure
-function argumenter_inclure($params, $rejet_filtres, $p, &$boucles, $id_boucle, $echap=true, $lang = '', $fond1=false){
+function argumenter_inclure($params, $rejet_filtres, $p, &$boucles, $id_boucle, $echap = true, $lang = '', $fond1 = false) {
 	$l = array();
 	$erreur_p_i_i = '';
 	if (!is_array($params)) return $l;
-	foreach($params as $k => $couple) {
+	foreach ($params as $k => $couple) {
 	// la liste d'arguments d'inclusion peut se terminer par un filtre
 		$filtre = array_shift($couple);
 		if ($filtre) break;
-		foreach($couple as $n => $val) {
+		foreach ($couple as $n => $val) {
 			$var = $val[0];
 			if ($var->type != 'texte') {
 			  if ($n OR $k OR $fond1) {
@@ -76,9 +76,9 @@ 
 			  }
 			  else $l[1] = calculer_liste($val, $p->descr, $boucles, $id_boucle);
 			} else {
-				preg_match(",^([^=]*)(=?)(.*)$,m", $var->texte,$m);
+				preg_match(",^([^=]*)(=?)(.*)$,m", $var->texte, $m);
 				$var = $m[1];
-				$auto = false;;
+				$auto = false; ;
 				if ($m[2]) {
 				  $v = $m[3];
 				  if (preg_match(',^[\'"](.*)[\'"]$,', $v, $m)) $v = $m[1];
@@ -97,8 +97,8 @@ 
 				    ? index_pile($id_boucle, $var, $boucles)
 				    : calculer_liste($val, $p->descr, $boucles, $id_boucle);
 				  if ($var !== 1)
-				    $val = ($echap?"\'$var\' => ' . argumenter_squelette(":"'$var' => ")
-				    . $val . ($echap? ") . '":" ");
+				    $val = ($echap ? "\'$var\' => ' . argumenter_squelette(" : "'$var' => ")
+				    . $val.($echap ? ") . '" : " ");
 				  else $val = $echap ? "'.$val.'" : $val;
 				  $l[$var] = $val;
 				}
@@ -111,7 +111,7 @@ 
 	// sauf si on n'en veut pas 
 	if ($lang === false) return $l;
 	if (!$lang) $lang = '$GLOBALS["spip_lang"]';
-	$l['lang'] = ($echap?"\'lang\' => ' . argumenter_squelette(":"'lang' => ")  . $lang . ($echap?") . '":" ");
+	$l['lang'] = ($echap ? "\'lang\' => ' . argumenter_squelette(" : "'lang' => ").$lang.($echap ? ") . '" : " ");
 
 	return $l;
 }
@@ -140,7 +140,7 @@ 
 	$_contexte = argumenter_inclure($p->param, false, $p, $boucles, $id_boucle, true, '', true);
 	if (is_string($p->texte)) {
 		$fichier = $p->texte;
-		$code = "\"".str_replace('"','\"',$fichier)."\"";
+		$code = "\"".str_replace('"', '\"', $fichier)."\"";
 
 	} else {
 		$code = calculer_liste($p->texte, $p->descr, $boucles, $id_boucle);
@@ -158,7 +158,7 @@ 
 
 	if (is_array($_contexte)) {
 		// Critere d'inclusion {env} (et {self} pour compatibilite ascendante)
-		if ($env = (isset($_contexte['env'])|| isset($_contexte['self']))) {
+		if ($env = (isset($_contexte['env']) || isset($_contexte['self']))) {
 			unset($_contexte['env']);
 		}
 
@@ -167,8 +167,8 @@ 
 			$_contexte['doublons'] = "\\'doublons\\' => '.var_export(\$doublons,true).'";
 		}
 
-		if ($ajax = isset($_contexte['ajax'])){
-			$ajax = preg_replace(",=>(.*)$,ims",'=> ($v=(\\1))?$v:true',$_contexte['ajax']);
+		if ($ajax = isset($_contexte['ajax'])) {
+			$ajax = preg_replace(",=>(.*)$,ims", '=> ($v=(\\1))?$v:true', $_contexte['ajax']);
 			unset($_contexte['ajax']);
 		}
 
@@ -177,7 +177,7 @@ 
 	else
 		return false; // j'aurais voulu toucher le fond ...
 		
-	$contexte = 'array(' . $_contexte  .')';
+	$contexte = 'array('.$_contexte.')';
 
 	if ($env) {
 		$contexte = "array_merge('.var_export(\$Pile[0],1).',$contexte)";
@@ -186,15 +186,15 @@ 
 	// s'il y a une extension .php, ce n'est pas un squelette
 	if ($fichier and preg_match('/^.+[.]php$/s', $fichier)) {
 		$code = sandbox_composer_inclure_php($fichier, $p, $contexte);
-	} else 	{
+	} else {
 		$_options[] = "\"compil\"=>array($compil)";
 		if ($ajax)
 			$_options[] = $ajax;
 		$code = " ' . argumenter_squelette($code) . '"; 
-		$code = "echo " . sprintf(CODE_RECUPERER_FOND, $code, $contexte, implode(',',$_options), "_request(\"connect\")") . ';';
+		$code = "echo ".sprintf(CODE_RECUPERER_FOND, $code, $contexte, implode(',', $_options), "_request(\"connect\")").';';
 	}
 
-	return	"\n'<'.'".	"?php ". $code . "\n?'." . "'>'";
+	return	"\n'<'.'"."?php ".$code."\n?'."."'>'";
 }
 
 
@@ -211,7 +211,7 @@ 
  * @param bool $ignore_previsu
  *     true pour ne tester que le cas publie et ignorer l'eventuel var_mode=preview de la page
  */
-function instituer_boucle(&$boucle, $echapper=true, $ignore_previsu=false){
+function instituer_boucle(&$boucle, $echapper = true, $ignore_previsu = false) {
 	/*
 	$show['statut'][] = array(
 		'champ'=>'statut',  // champ de la table sur lequel porte le filtrage par le statut
@@ -238,12 +238,12 @@ 
 */
 	$id_table = $boucle->id_table;
 	$show = $boucle->show;
-	if (isset($show['statut']) AND $show['statut']){
-		foreach($show['statut'] as $k=>$s){
+	if (isset($show['statut']) AND $show['statut']) {
+		foreach ($show['statut'] as $k=>$s) {
 			// Restreindre aux elements publies si pas de {statut} ou autre dans les criteres
 			$filtrer = true;
 			if (isset($s['exception'])) {
-				foreach(is_array($s['exception'])?$s['exception']:array($s['exception']) as $m) {
+				foreach (is_array($s['exception']) ? $s['exception'] : array($s['exception']) as $m) {
 					if (isset($boucle->modificateur[$m]) OR isset($boucle->modificateur['criteres'][$m])) {
 						$filtrer = false;
 						break;
@@ -252,19 +252,19 @@ 
 			}
 
 			if ($filtrer) {
-				if (is_array($s['champ'])){
-					$statut = preg_replace(',\W,','',array_pop($s['champ'])); // securite
+				if (is_array($s['champ'])) {
+					$statut = preg_replace(',\W,', '', array_pop($s['champ'])); // securite
 					$jointures = array();
 					// indiquer la description de chaque table dans le tableau de jointures,
 					// ce qui permet d'eviter certains GROUP BY inutiles.
 					$trouver_table = charger_fonction('trouver_table', 'base');
-					foreach($s['champ'] as $j) {
+					foreach ($s['champ'] as $j) {
 						$id = reset($j);
 						$def = $trouver_table($id);
-						$jointures[] = array('',array($id,$def),end($j));
+						$jointures[] = array('', array($id, $def), end($j));
 					}
 					$jointures[0][0] = $id_table;
-					if (!array_search($id, $boucle->from)){
+					if (!array_search($id, $boucle->from)) {
 						include_spip('public/jointures');
 						fabrique_jointures($boucle, $jointures, true, $boucle->show, $id_table, '', $echapper);
 					}
@@ -273,20 +273,20 @@ 
 				}
 				else {
 					$id = $id_table;
-					$statut = preg_replace(',\W,','',$s['champ']); // securite
+					$statut = preg_replace(',\W,', '', $s['champ']); // securite
 				}
-				$mstatut = $id .'.'.$statut;
+				$mstatut = $id.'.'.$statut;
 
-				$arg_ignore_previsu=($ignore_previsu?",true":'');
+				$arg_ignore_previsu = ($ignore_previsu ? ",true" : '');
 				include_spip('public/quete');
 				if (isset($s['post_date']) AND $s['post_date']
-					AND $GLOBALS['meta']["post_dates"] == 'non'){
-					$date = $id.'.'.preg_replace(',\W,','',$s['post_date']); // securite
+					AND $GLOBALS['meta']["post_dates"] == 'non') {
+					$date = $id.'.'.preg_replace(',\W,', '', $s['post_date']); // securite
 					array_unshift($boucle->where,
 						$echapper ?
 							"\nquete_condition_postdates('$date',"._q($boucle->sql_serveur)."$arg_ignore_previsu)"
 						:
-							quete_condition_postdates($date,$boucle->sql_serveur,$ignore_previsu)
+							quete_condition_postdates($date, $boucle->sql_serveur, $ignore_previsu)
 					);
 				}
 				array_unshift($boucle->where,
@@ -296,7 +296,7 @@ 
 							._q($s['publie']).","
 							._q($boucle->sql_serveur)."$arg_ignore_previsu)"
 					:
-						quete_condition_statut($mstatut,$s['previsu'],$s['publie'],$boucle->sql_serveur,$ignore_previsu)
+						quete_condition_statut($mstatut, $s['previsu'], $s['publie'], $boucle->sql_serveur, $ignore_previsu)
 				);
 			}
 		}
@@ -325,10 +325,10 @@ 
 
 	// en mode debug memoriser les premiers passages dans la boucle,
 	// mais pas tous, sinon ca pete.
-	if  (_request('var_mode_affiche') != 'resultat') 
+	if (_request('var_mode_affiche') != 'resultat') 
 		$trace = '';
 	else {
-		$trace = $boucles[$id_boucle]->descr['nom'] . $id_boucle;
+		$trace = $boucles[$id_boucle]->descr['nom'].$id_boucle;
 		$trace = "if (count(@\$GLOBALS['debug_objets']['resultat']['$trace'])<3)
 	    \$GLOBALS['debug_objets']['resultat']['$trace'][] = \$t0;";
 	}
@@ -361,7 +361,7 @@ 
 	return
 	  // Numrows[$nom] peut ne pas être encore defini
 	  "\n\t\$save_numrows = (isset(\$Numrows['$nom']) ? \$Numrows['$nom'] : array());"
-	. "\n\t\$t0 = " . $boucles[$id_boucle]->return . ";"
+	. "\n\t\$t0 = ".$boucles[$id_boucle]->return.";"
 	. "\n\t\$Numrows['$nom'] = (\$save_numrows);"
 	. $trace
 	. "\n\treturn \$t0;";
@@ -421,14 +421,14 @@ 
 	$return = $boucle->return;
 	$type_boucle = $boucle->type_requete;
 	$primary = $boucle->primary;
-	$constant = preg_match(CODE_MONOTONE, str_replace("\\'",'', $return));
-	$flag_cpt = $boucle->mode_partie ||$boucle->cptrows;
+	$constant = preg_match(CODE_MONOTONE, str_replace("\\'", '', $return));
+	$flag_cpt = $boucle->mode_partie || $boucle->cptrows;
 	$corps = '';
 
 	// faudrait expanser le foreach a la compil, car y en a souvent qu'un 
 	// et puis faire un [] plutot qu'un "','."
 	if ($boucle->doublons)
-		$corps .= "\n\t\t\tforeach(" . $boucle->doublons . ' as $k) $doublons[$k] .= "," . ' .
+		$corps .= "\n\t\t\tforeach(".$boucle->doublons.' as $k) $doublons[$k] .= "," . '.
 		index_pile($id_boucle, $primary, $boucles)
 		. "; // doublons\n";
 
@@ -437,7 +437,7 @@ 
 	//    (sauf si forcer_lang==true ou si le titre contient <multi>).
 	// - a moins d'une demande explicite via {!lang_select}
 	if (!$constant && $boucle->lang_select != 'non' &&
-	    (($boucle->lang_select == 'oui')  ||
+	    (($boucle->lang_select == 'oui') ||
 		    in_array($type_boucle, array(
 		    	'articles', 'rubriques', 'hierarchie', 'breves'
 			)))
@@ -465,7 +465,7 @@ 
 		if (strpos($return, '?php') === false
 		AND preg_match_all("/\W(_T[(]'[^']*'[)])/", $return, $r)) {
 			$i = 1;
-			foreach($r[1] as $t) {
+			foreach ($r[1] as $t) {
 				$init_lang .= "\n\t\$l$i = $t;";
 				$return = str_replace($t, "\$l$i", $return);
 				$i++;
@@ -475,19 +475,15 @@ 
 
 	// gestion optimale des separateurs et des boucles constantes
 	if (count($boucle->separateur))
-	  $code_sep = ("'" . str_replace("'","\'",join('',$boucle->separateur)) . "'");
+	  $code_sep = ("'".str_replace("'", "\'", join('', $boucle->separateur))."'");
 
 	$corps .= 
 		((!$boucle->separateur) ? 
-			(($constant && !$corps && !$flag_cpt) ? $return :
-			 (($return==="''") ? '' :
-			  ("\n\t\t" . '$t0 .= ' . $return . ";"))) :
-		 ("\n\t\t\$t1 " .
+			(($constant && !$corps && !$flag_cpt) ? $return : (($return === "''") ? '' : ("\n\t\t".'$t0 .= '.$return.";"))) : ("\n\t\t\$t1 ".
 			((strpos($return, '$t1.') === 0) ? 
-			 (".=" . substr($return,4)) :
-			 ('= ' . $return)) .
-		  ";\n\t\t" .
-		  '$t0 .= ((strlen($t1) && strlen($t0)) ? ' . $code_sep . " : '') . \$t1;"));
+			 (".=".substr($return, 4)) : ('= '.$return)).
+		  ";\n\t\t".
+		  '$t0 .= ((strlen($t1) && strlen($t0)) ? '.$code_sep." : '') . \$t1;"));
      
 	// Calculer les invalideurs si c'est une boucle non constante et si on
 	// souhaite invalider ces elements
@@ -510,7 +506,7 @@ 
 
 	// si le corps est une constante, ne pas appeler le serveur N fois!
 
-	if (preg_match(CODE_MONOTONE,str_replace("\\'",'',$corps), $r)) {
+	if (preg_match(CODE_MONOTONE, str_replace("\\'", '', $corps), $r)) {
 		if (!isset($r[2]) OR (!$r[2])) {
 			if (!$boucle->numrows)
 				return "\n\t\$t0 = '';";
@@ -527,7 +523,7 @@ 
 		if (!$boucle->numrows OR $boucle->limit OR $boucle->mode_partie OR $boucle->group)
 			$count = '1';
 		else $count = 'count(*)';
-		$boucles[$id_boucle]->select[]= $count; 
+		$boucles[$id_boucle]->select[] = $count; 
 	}
 
 	if ($flag_cpt)
@@ -560,7 +556,7 @@ 
 		$corps,
 		$fin_lang,
 		$trace,
-		'BOUCLE'.$id_boucle .' @ '.($boucle->descr['sourcefile'])
+		'BOUCLE'.$id_boucle.' @ '.($boucle->descr['sourcefile'])
 	);
 
 #	var_dump($a);exit;
@@ -582,14 +578,14 @@ 
 function calculer_requete_sql($boucle)
 {
 	$init = array();
-	$init[] = calculer_dec('table',  "'" . $boucle->id_table ."'");
-	$init[] = calculer_dec('id', "'" . $boucle->id_boucle ."'");
+	$init[] = calculer_dec('table', "'".$boucle->id_table."'");
+	$init[] = calculer_dec('id', "'".$boucle->id_boucle."'");
 	# En absence de champ c'est un decompte :
-	$init[] = calculer_dec('from',  calculer_from($boucle));
+	$init[] = calculer_dec('from', calculer_from($boucle));
 	$init[] = calculer_dec('type', calculer_from_type($boucle));
-	$init[] = calculer_dec('groupby', 'array(' . (($g=join("\",\n\t\t\"",$boucle->group))?'"'.$g.'"':'') . ")");
-	$init[] = calculer_dec('select', 'array("' . join("\",\n\t\t\"", $boucle->select).  "\")");
-	$init[] = calculer_dec('orderby', 'array(' . calculer_order($boucle) .	")");
+	$init[] = calculer_dec('groupby', 'array('.(($g = join("\",\n\t\t\"", $boucle->group)) ? '"'.$g.'"' : '').")");
+	$init[] = calculer_dec('select', 'array("'.join("\",\n\t\t\"", $boucle->select)."\")");
+	$init[] = calculer_dec('orderby', 'array('.calculer_order($boucle).")");
 	$init[] = calculer_dec('where', calculer_dump_array($boucle->where));
 	$init[] = calculer_dec('join', calculer_dump_join($boucle->join));
 	$init[] = calculer_dec('limit',
@@ -599,7 +595,7 @@ 
 				  $boucle->limit));
 	$init[] = calculer_dec('having', calculer_dump_array($boucle->having));
 	$s = $d = "";
-	foreach ($init as $i){
+	foreach ($init as $i) {
 		if (reset($i))
 			$s .= "\n\t\t".end($i);
 		else
@@ -683,22 +679,22 @@ 
 	)
 		$static = "";
 
-	return array($static,'$command[\''.$nom.'\'] = ' . $val . ';');
+	return array($static, '$command[\''.$nom.'\'] = '.$val.';');
 }
 
 // http://doc.spip.org/@calculer_dump_array
 function calculer_dump_array($a)
 {
-  if (!is_array($a)) return $a ;
+  if (!is_array($a)) return $a;
   $res = "";
   if ($a AND $a[0] == "'?'") 
-    return ("(" . calculer_dump_array($a[1]) .
-	    " ? " . calculer_dump_array($a[2]) .
-	    " : " . calculer_dump_array($a[3]) .
+    return ("(".calculer_dump_array($a[1]).
+	    " ? ".calculer_dump_array($a[2]).
+	    " : ".calculer_dump_array($a[3]).
 	    ")");
   else {
-    foreach($a as $v) $res .= ", " . calculer_dump_array($v);
-    return "\n\t\t\tarray(" . substr($res,2) . ')';
+    foreach ($a as $v) $res .= ", ".calculer_dump_array($v);
+    return "\n\t\t\tarray(".substr($res, 2).')';
   }
 }
 
@@ -706,25 +702,25 @@ 
 function calculer_dump_join($a)
 {
   $res = "";
-  foreach($a as $k => $v) 
-		$res .= ", '$k' => array(".implode(',',$v).")";
-  return 'array(' . substr($res,2) . ')';
+  foreach ($a as $k => $v) 
+		$res .= ", '$k' => array(".implode(',', $v).")";
+  return 'array('.substr($res, 2).')';
 }
 
 // http://doc.spip.org/@calculer_from
 function calculer_from(&$boucle)
 {
   $res = "";
-  foreach($boucle->from as $k => $v) $res .= ",'$k' => '$v'";
-  return 'array(' . substr($res,1) . ')';
+  foreach ($boucle->from as $k => $v) $res .= ",'$k' => '$v'";
+  return 'array('.substr($res, 1).')';
 }
 
 // http://doc.spip.org/@calculer_from_type
 function calculer_from_type(&$boucle)
 {
   $res = "";
-  foreach($boucle->from_type as $k => $v) $res .= ",'$k' => '$v'";
-  return 'array(' . substr($res,1) . ')';
+  foreach ($boucle->from_type as $k => $v) $res .= ",'$k' => '$v'";
+  return 'array('.substr($res, 1).')';
 }
 
 // http://doc.spip.org/@calculer_order
@@ -749,7 +745,7 @@ 
 // (qui sera argument d'un Return ou la partie droite d'une affectation).
 
 // http://doc.spip.org/@calculer_liste
-function calculer_liste($tableau, $descr, &$boucles, $id_boucle='') {
+function calculer_liste($tableau, $descr, &$boucles, $id_boucle = '') {
 	if (!$tableau) return "''";
 	if (!isset($descr['niv'])) $descr['niv'] = 0;
 	$codes = compile_cas($tableau, $descr, $boucles, $id_boucle);
@@ -758,28 +754,28 @@ 
 	if (!$n) return "''";
 	$tab = str_repeat("\t", $descr['niv']);
 	if (_request('var_mode_affiche') != 'validation') {
-		if ($n==1) 
+		if ($n == 1) 
 			return $codes[0];
 		else {
 			$res = '';
-			foreach($codes as $code) {
+			foreach ($codes as $code) {
 				if (!preg_match("/^'[^']*'$/", $code)
-				OR substr($res,-1,1)!=="'")
-				  $res .=  " .\n$tab$code";
+				OR substr($res, -1, 1) !== "'")
+				  $res .= " .\n$tab$code";
 				else {
-				  $res = substr($res,0,-1) . substr($code,1);
+				  $res = substr($res, 0, -1).substr($code, 1);
 				}
 			}
-			return '(' . substr($res,2+$descr['niv']) . ')';
+			return '('.substr($res, 2 + $descr['niv']).')';
 		}
 	} else {
-	  $nom = $descr['nom'] . $id_boucle .  ($descr['niv']?$descr['niv']:'');
-	  return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(" .  join(" ,\n$tab", $codes) . ")))";
+	  $nom = $descr['nom'].$id_boucle.($descr['niv'] ? $descr['niv'] : '');
+	  return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(".join(" ,\n$tab", $codes).")))";
 	}
 }
 
-define('_REGEXP_COND_VIDE_NONVIDE',"/^[(](.*)[?]\s*''\s*:\s*('[^']+')\s*[)]$/");
-define('_REGEXP_COND_NONVIDE_VIDE',"/^[(](.*)[?]\s*('[^']+')\s*:\s*''\s*[)]$/");
+define('_REGEXP_COND_VIDE_NONVIDE', "/^[(](.*)[?]\s*''\s*:\s*('[^']+')\s*[)]$/");
+define('_REGEXP_COND_NONVIDE_VIDE', "/^[(](.*)[?]\s*('[^']+')\s*:\s*''\s*[)]$/");
 define('_REGEXP_CONCAT_NON_VIDE', "/^(.*)[.]\s*'[^']+'\s*$/");
 
 // http://doc.spip.org/@compile_cas
@@ -797,31 +793,31 @@ 
 	// par un caractere distinguant le cas, pour exploitation par debug.
 	foreach ($tableau as $p) {
 
-		switch($p->type) {
+		switch ($p->type) {
 		// texte seul
 		case 'texte':
 			$code = sandbox_composer_texte($p->texte, $p);
-			$commentaire= strlen($p->texte) . " signes";
-			$avant='';
-			$apres='';
+			$commentaire = strlen($p->texte)." signes";
+			$avant = '';
+			$apres = '';
 			$altern = "''";
 			break;
 
 		case 'polyglotte':
 			$code = "";
-			foreach($p->traductions as $k => $v) {
-			  $code .= ",'" .
-			    str_replace(array("\\","'"),array("\\\\","\\'"), $k) .
-			    "' => '" .
-			    str_replace(array("\\","'"),array("\\\\","\\'"), $v) .
+			foreach ($p->traductions as $k => $v) {
+			  $code .= ",'".
+			    str_replace(array("\\", "'"), array("\\\\", "\\'"), $k).
+			    "' => '".
+			    str_replace(array("\\", "'"), array("\\\\", "\\'"), $v).
 			    "'";
 			}
-			$code = "choisir_traduction(array(" .
- 			  substr($code,1) .
+			$code = "choisir_traduction(array(".
+ 			  substr($code, 1).
 			  "))";
-			$commentaire= '&';
-			$avant='';
-			$apres='';
+			$commentaire = '&';
+			$avant = '';
+			$apres = '';
 			$altern = "''";
 			break;
 
@@ -833,9 +829,9 @@ 
 				$err_e_c = true;
 				$code = "''";
 			} else {
-				$commentaire = '<INCLURE ' . addslashes(str_replace("\n", ' ', $code)) . '>';
-				$avant='';
-				$apres='';
+				$commentaire = '<INCLURE '.addslashes(str_replace("\n", ' ', $code)).'>';
+				$avant = '';
+				$apres = '';
 				$altern = "''";
 			}
 			break;
@@ -857,14 +853,14 @@ 
 				$err_e_c = true;
 				$code = "''";
 			} else {
-				$code = 'BOUCLE' .
-				  str_replace("-","_", $nom) . $descr['nom'] .
+				$code = 'BOUCLE'.
+				  str_replace("-", "_", $nom).$descr['nom'].
 				  '($Cache, $Pile, $doublons, $Numrows, $SP)';
-				$commentaire= "?$nom";
+				$commentaire = "?$nom";
 				if (!$boucles[$nom]->milieu
 				AND $boucles[$nom]->type_requete <> TYPE_RECURSIF) {
 					if ($altern != "''") $code .= "\n. $altern";
-					if ($avant<>"''" OR $apres<>"''")
+					if ($avant <> "''" OR $apres <> "''")
 					  spip_log("boucle $nom toujours vide, code superflu dans $id");
 					$avant = $apres = $altern = "''";
 				} else if ($altern != "''") $altern = "($altern)";
@@ -877,23 +873,21 @@ 
 			foreach ($p->arg as $k => $v) {
 			  	$_v = calculer_liste($v, $descr, $boucles, $id_boucle);
 				if ($k) {
-					$l[] = _q($k) . ' => ' . $_v;
+					$l[] = _q($k).' => '.$_v;
 				} else {
 					$code = $_v;
 				}
 			}
 			// Si le module n'est pas fourni, l'expliciter sauf si calculé
 			if ($p->module) {
-				$m = $p->module .':'.$p->nom_champ;
+				$m = $p->module.':'.$p->nom_champ;
 			} elseif ($p->nom_champ) {
-				$m = MODULES_IDIOMES .':'.$p->nom_champ;
+				$m = MODULES_IDIOMES.':'.$p->nom_champ;
 			} else {
 				$m = '';
 			}
-			$code = (!$code ? "'$m'" :
-						($m ? "'$m' . $code" :
-							("(strpos(\$x=$code, ':') ? \$x : ('" . MODULES_IDIOMES . ":' . \$x))")))
-					. (!$l ? '' : (", array(" . implode(",\n", $l) . ")"));
+			$code = (!$code ? "'$m'" : ($m ? "'$m' . $code" : ("(strpos(\$x=$code, ':') ? \$x : ('".MODULES_IDIOMES.":' . \$x))")))
+					. (!$l ? '' : (", array(".implode(",\n", $l).")"));
 			$code = "_T($code)";
 			if ($p->param) {
 				$p->id_boucle = $id_boucle;
@@ -901,8 +895,8 @@ 
 				$code = compose_filtres($p, $code);
 			}
 			$commentaire = ":";
-			$avant='';
-			$apres='';
+			$avant = '';
+			$apres = '';
 			$altern = "''";
 			break;
 
@@ -916,7 +910,7 @@ 
 			$p->type_requete = $type;
 
 			$code = calculer_champ($p);
-			$commentaire = '#' . $p->nom_champ . $p->etoile;
+			$commentaire = '#'.$p->nom_champ.$p->etoile;
 			$avant = calculer_liste($p->avant,
 				$descr, $boucles, $id_boucle);
 			$apres = calculer_liste($p->apres,
@@ -926,7 +920,7 @@ 
 			// forcer la conversion en une chaine par strval
 			// si ca peut etre autre chose qu'une chaine
 			if (($avant != "''" OR $apres != "''")
-			AND $code[0]!= "'"
+			AND $code[0] != "'"
 #			AND (strpos($code,'interdire_scripts') !== 0)
 			AND !preg_match(_REGEXP_COND_VIDE_NONVIDE, $code)
 			AND !preg_match(_REGEXP_COND_NONVIDE_VIDE, $code)
@@ -944,11 +938,10 @@ 
 
 		if ($code != "''") {
 			$code = compile_retour($code, $avant, $apres, $altern, $tab, $descr['niv']);
-			$codes[]= (($mode == 'validation') ?
-				"array($code, '$commentaire', " . $p->ligne . ")"
+			$codes[] = (($mode == 'validation') ?
+				"array($code, '$commentaire', ".$p->ligne.")"
 				: (($mode == 'code') ?
-				"\n// $commentaire\n$code" :
-				$code));
+				"\n// $commentaire\n$code" : $code));
 		}
 	} // foreach
 
@@ -964,24 +957,24 @@ 
 {
 	if ($avant == "''") $avant = '';
 	if ($apres == "''") $apres = '';
-	if (!$avant AND !$apres AND ($altern==="''")) return $code;
+	if (!$avant AND !$apres AND ($altern === "''")) return $code;
 
 	if (preg_match(_REGEXP_CONCAT_NON_VIDE, $code)) {
 		$t = $code;
 		$cond = '';
-	} elseif (preg_match(_REGEXP_COND_VIDE_NONVIDE,$code, $r)) {
+	} elseif (preg_match(_REGEXP_COND_VIDE_NONVIDE, $code, $r)) {
 		$t = $r[2];
-		$cond =  '!' . $r[1];
-	} else if  (preg_match(_REGEXP_COND_NONVIDE_VIDE,$code, $r)) {
+		$cond = '!'.$r[1];
+	} else if (preg_match(_REGEXP_COND_NONVIDE_VIDE, $code, $r)) {
 		$t = $r[2];
 		$cond = $r[1];
 	} else {
-		$t = '$t' . $n;
+		$t = '$t'.$n;
 		$cond = "($t = $code)!==''";
 	}
 
-	$res = (!$avant ? "" : "$avant . ") . 
-		$t .
+	$res = (!$avant ? "" : "$avant . "). 
+		$t.
 		(!$apres ? "" : " . $apres");
 
 	if ($res !== $t) $res = "($res)";
@@ -991,9 +984,9 @@ 
 
 function compile_inclure_doublons($lexemes)
 {
-	foreach($lexemes as $v)
-	  if($v->type === 'include' AND $v->param) 
-	    foreach($v->param as $r) 
+	foreach ($lexemes as $v)
+	  if ($v->type === 'include' AND $v->param) 
+	    foreach ($v->param as $r) 
 	      if (trim($r[0]) === 'doublons') 
 		return true;
 	return false;
@@ -1015,7 +1008,7 @@ 
 // En cas d'erreur, elle retournera un tableau des 2 premiers elements seulement
 
 // http://doc.spip.org/@public_compiler_dist
-function public_compiler_dist($squelette, $nom, $gram, $sourcefile, $connect=''){
+function public_compiler_dist($squelette, $nom, $gram, $sourcefile, $connect = '') {
 	// Pre-traitement : reperer le charset du squelette, et le convertir
 	// Bonus : supprime le BOM
 	include_spip('inc/charsets');
@@ -1023,7 +1016,7 @@ 
 
 	// rendre inertes les echappements de #[](){}<>
 	$i = 0;
-	while(false !== strpos($squelette, $inerte = '-INERTE'.$i)) $i++;
+	while (false !== strpos($squelette, $inerte = '-INERTE'.$i)) $i++;
 	$squelette = preg_replace_callback(',\\\\([#[()\]{}<>]),',
 		create_function('$a', "return '$inerte-'.ord(\$a[1]).'-';"), $squelette, -1, $esc);
 
@@ -1035,14 +1028,14 @@ 
 	// Phraser le squelette, selon sa grammaire
 
 	$boucles = array();
-	$f = charger_fonction('phraser_' . $gram, 'public');
+	$f = charger_fonction('phraser_'.$gram, 'public');
 
 	$squelette = $f($squelette, '', $boucles, $descr);
 	$boucles = compiler_squelette($squelette, $boucles, $nom, $descr, $sourcefile, $connect);
 
 	// restituer les echappements
 	if ($esc)
-		foreach($boucles as $i=>$boucle) {
+		foreach ($boucles as $i=>$boucle) {
 			$boucles[$i]->return = preg_replace_callback(",$inerte-(\d+)-,", create_function('$a', 'return chr($a[1]);'),
 				$boucle->return);
 			$boucles[$i]->descr['squelette'] = preg_replace_callback(",$inerte-(\d+)-,", create_function('$a', 'return "\\\\".chr($a[1]);'),
@@ -1052,17 +1045,17 @@ 
 	$debug = ($boucles AND defined('_VAR_MODE') AND _VAR_MODE == 'debug');
 	if ($debug) {
 		include_spip('public/decompiler');
-		foreach($boucles as $id => $boucle) {
+		foreach ($boucles as $id => $boucle) {
 			if ($id)
-			  $decomp = "\n/* BOUCLE " .
-			    $boucle->type_requete .
-			    " " .
-			    str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')) .
+			  $decomp = "\n/* BOUCLE ".
+			    $boucle->type_requete.
+			    " ".
+			    str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')).
 			    " */\n";
-			else $decomp = ("\n/*\n" . 
+			else $decomp = ("\n/*\n". 
 				 str_replace('*/', '* /', public_decompiler($squelette, $gram)) 
 				 . "\n*/");
-			$boucles[$id]->return = $decomp .$boucle->return; 
+			$boucles[$id]->return = $decomp.$boucle->return; 
 			$GLOBALS['debug_objets']['code'][$nom.$id] = $boucle->return;
 		}
 	}
@@ -1073,7 +1066,7 @@ 
 // Point d'entree pour arbre de syntaxe abstraite fourni en premier argument
 // Autres specifications comme ci-dessus
 
-function compiler_squelette($squelette, $boucles, $nom, $descr, $sourcefile, $connect=''){
+function compiler_squelette($squelette, $boucles, $nom, $descr, $sourcefile, $connect = '') {
 	static $trouver_table;
 	spip_timer('calcul_skel');
 
@@ -1096,7 +1089,7 @@ 
 	if (!$trouver_table)
 		$trouver_table = charger_fonction('trouver_table', 'base');
 
-	foreach($boucles as $id => $boucle) {
+	foreach ($boucles as $id => $boucle) {
 		if (!($type = $boucle->type_requete)) continue;
 		if (!$descr['documents'] AND (
 			(($type == 'documents') AND $boucle->doublons) OR
@@ -1127,14 +1120,14 @@ 
 				// c'est peut etre une table qui necessite son connecteur dedie fourni
 				// permet une ecriture allegee (GEO) -> (geo:GEO)
 				if (!$show
-				AND $show=$trouver_table($type, strtolower($type))) {
+				AND $show = $trouver_table($type, strtolower($type))) {
 					$boucles[$id]->sql_serveur = strtolower($type);
 				}
 				if ($show) {
 					$boucles[$id]->show = $show;
 					// recopie les infos les plus importantes
 					$boucles[$id]->primary = $show['key']["PRIMARY KEY"];
-					$boucles[$id]->id_table = $x = preg_replace(",^spip_,","",$show['id_table']);
+					$boucles[$id]->id_table = $x = preg_replace(",^spip_,", "", $show['id_table']);
 					$boucles[$id]->from[$x] = $nom_table = $show['table'];
 					$boucles[$id]->iterateur = 'SQL';
 
@@ -1143,20 +1136,19 @@ 
 					    AND is_array($show['tables_jointures'])
 					        AND count($x = $show['tables_jointures']))
 						$boucles[$id]->jointures = $x;
-					if ($boucles[$id]->jointures_explicites){
-						$jointures = preg_split("/\s+/",$boucles[$id]->jointures_explicites);
-						while ($j=array_pop($jointures))
-							array_unshift($boucles[$id]->jointures,$j);
+					if ($boucles[$id]->jointures_explicites) {
+						$jointures = preg_split("/\s+/", $boucles[$id]->jointures_explicites);
+						while ($j = array_pop($jointures))
+							array_unshift($boucles[$id]->jointures, $j);
 					}
 				} else {
 					// Pas une erreur si la table est optionnelle
 					if ($boucles[$id]->table_optionnelle)
 						$boucles[$id]->type_requete = '';
-					else  {
+					else {
 						$boucles[$id]->type_requete = false;
 						$boucle = $boucles[$id];
-						$x = (!$boucle->sql_serveur ? '' :
-							($boucle->sql_serveur . ":")) .
+						$x = (!$boucle->sql_serveur ? '' : ($boucle->sql_serveur.":")).
 						     $type;
 						$msg = array('zbug_table_inconnue',
 						             array('table' => $x));
@@ -1169,7 +1161,7 @@ 
 
 	// Commencer par reperer les boucles appelees explicitement 
 	// car elles indexent les arguments de maniere derogatoire
-	foreach($boucles as $id => $boucle) {
+	foreach ($boucles as $id => $boucle) {
 		if ($boucle->type_requete == TYPE_RECURSIF AND $boucle->param) {
 			$boucles[$id]->descr = &$descr;
 			$rec = &$boucles[$boucle->param[0]];
@@ -1189,7 +1181,7 @@ 
 			}
 		}
 	}
-	foreach($boucles as $id => $boucle) { 
+	foreach ($boucles as $id => $boucle) { 
 		$id = strval($id); // attention au type dans index_pile
 		$type = $boucle->type_requete;
 		if ($type AND $type != TYPE_RECURSIF) {
@@ -1223,9 +1215,9 @@ 
 	// en particulier les requetes SQL et TOTAL_BOUCLE
 	// de'terminables seulement maintenant
 
-	foreach($boucles as $id => $boucle) {
+	foreach ($boucles as $id => $boucle) {
 		$boucle = $boucles[$id] = pipeline('pre_boucle', $boucle);
-		if ($boucle->return === false) {$corps = false; continue;}
+		if ($boucle->return === false) {$corps = false; continue; }
 		// appeler la fonction de definition de la boucle
 
 		if ($req = $boucle->type_requete) {
@@ -1242,25 +1234,25 @@ 
 				// fonction de boucle avec table
 				AND (!function_exists($f = "boucle_".$table))
 					AND (!function_exists($f = $f."_dist"))
-			){
+			) {
 				// fonction de boucle standard 
 				if (!function_exists($f = 'boucle_DEFAUT')) {
 					$f = 'boucle_DEFAUT_dist';
 				}
 			}
 
-			$req = "\n\n\tstatic \$command = array();\n\t" .
-					"static \$connect;\n\t" .
-					"\$command['connect'] = \$connect = " .
-				_q($boucle->sql_serveur) .
-				";" .
+			$req = "\n\n\tstatic \$command = array();\n\t".
+					"static \$connect;\n\t".
+					"\$command['connect'] = \$connect = ".
+				_q($boucle->sql_serveur).
+				";".
 				$f($id, $boucles);
 		} else $req = ("\n\treturn '';");
 
 		$boucles[$id]->return = 
-			"\n\nfunction BOUCLE" . strtr($id,"-","_") . $nom .
-			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {' .
-			$req .
+			"\n\nfunction BOUCLE".strtr($id, "-", "_").$nom.
+			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {'.
+			$req.
 			"\n}\n";
 	}
 
@@ -1268,7 +1260,7 @@ 
 	// retourner False, sinon inserer leur decompilation
 	if (is_bool($corps)) return false;
 
-	$principal = "\nfunction " . $nom . '($Cache, $Pile, $doublons=array(), $Numrows=array(), $SP=0) {
+	$principal = "\nfunction ".$nom.'($Cache, $Pile, $doublons=array(), $Numrows=array(), $SP=0) {
 '
 	// reporter de maniere securisee les doublons inclus
 .'
@@ -1276,15 +1268,15 @@ 
 		$doublons = nettoyer_env_doublons($Pile[0]["doublons"]);
 
 	$connect = ' .
-	_q($connect) . ';
+	_q($connect).';
 	$page = ' .
 	// ATTENTION, le calcul de l'expression $corps affectera $Cache
 	// c'est pourquoi on l'affecte a la variable auxiliaire $page. 
 	// avant de referencer $Cache
-	$corps . ";
+	$corps.";
 
-	return analyse_resultat_skel(".var_export($nom,true)
-		.", \$Cache, \$page, ".var_export($sourcefile,true).");
+	return analyse_resultat_skel(".var_export($nom, true)
+		.", \$Cache, \$page, ".var_export($sourcefile, true).");
 }";
 
 	$secondes = spip_timer('calcul_skel');
@@ -1298,10 +1290,10 @@ 
 	$code->return = '
 //
 // Fonction principale du squelette ' . 
-	$sourcefile . 
-	($connect ? " pour $connect" : '') . 
-	(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes") .
-	"\n//\n" .
+	$sourcefile. 
+	($connect ? " pour $connect" : ''). 
+	(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes").
+	"\n//\n".
 	$principal;
 
 	$boucles[''] = $code;
@@ -1350,7 +1342,7 @@ 
 **/
 function requeteur_data_dist(&$boucles, &$boucle, &$id) {
 	include_spip('iterateur/data');
-	if ($h = charger_fonction($boucle->type_requete . '_to_array' , 'inc', true)) {
+	if ($h = charger_fonction($boucle->type_requete.'_to_array', 'inc', true)) {
 		$g = charger_fonction('data', 'iterateur');
 		$boucles[$id] = $g($boucle);
 		// from[0] stocke le type de data (rss, yql, ...)

ecrire/public/parametrer.php

Spacing +22 added lines, -22 removed lines

@@ -18,14 +18,14 @@ 
 // donc il faut l'inclure "en globals"
 if ($f = find_in_path('mes_fonctions.php')) {
 	global $dossier_squelettes;
-	include_once(_ROOT_CWD . $f);
+	include_once(_ROOT_CWD.$f);
 }
 
 if (@is_readable(_CACHE_PLUGINS_FCT)) {
 	// chargement optimise precompile
 	include_once(_CACHE_PLUGINS_FCT);
 }
-if (test_espace_prive ())
+if (test_espace_prive())
 	include_spip('inc/filtres_ecrire');
 
 # Determine le squelette associe a une requete 
@@ -42,8 +42,8 @@ 
 # En cas d'erreur process_ins est absent et texte est un tableau de 2 chaines
 
 // http://doc.spip.org/@public_parametrer_dist
-function public_parametrer_dist($fond, $contexte='', $cache='', $connect='')  {
-	static $composer,$styliser,$notes=null;
+function public_parametrer_dist($fond, $contexte = '', $cache = '', $connect = '') {
+	static $composer, $styliser, $notes = null;
 	$page = tester_redirection($fond, $contexte, $connect);
 	if ($page) return $page;
 
@@ -59,7 +59,7 @@ 
 
 	if (!$styliser)
 		$styliser = charger_fonction('styliser', 'public');
-	list($skel,$mime_type, $gram, $sourcefile) =
+	list($skel, $mime_type, $gram, $sourcefile) =
 		$styliser($fond, $contexte, $GLOBALS['spip_lang'], $connect);
 
 	if ($skel) {
@@ -87,14 +87,14 @@ 
 	else {
 		// Preparer l'appel de la fonction principale du squelette 
 
-		spip_timer($a = 'calcul page '.rand(0,1000));
+		spip_timer($a = 'calcul page '.rand(0, 1000));
 
 		// On cree un marqueur de notes unique lie a cette composition
 		// et on enregistre l'etat courant des globales de notes...
 		if (is_null($notes))
 			$notes = charger_fonction('notes', 'inc', true);
 		if ($notes)
-			$notes('','empiler');
+			$notes('', 'empiler');
 
 		// Rajouter d'office ces deux parametres
 		// (mais vaudrait mieux que le compilateur sache le simuler
@@ -118,7 +118,7 @@ 
 	// compte a chaque calcul d'un texte contenant un modele, mais seulement
 	// quand le modele serait calcule, et on aurait des resultats incoherents)
 		if ($notes)
-			$notes('','depiler');
+			$notes('', 'depiler');
 
 		// reinjecter en dynamique la pile des notes
 		// si il y a des inclure dynamiques
@@ -126,15 +126,15 @@ 
 		// la generalisation de cette injection permettrait de corriger le point juste au dessus
 		// en faisant remonter les notes a l'incluant (A tester et valider avant application)
 		if ($notes)
-			$page['notes'] = $notes('','sauver_etat');
+			$page['notes'] = $notes('', 'sauver_etat');
 
 		// spip_log: un joli contexte
 		$infos = array();
 		foreach (array_filter($contexte) as $var => $val) {
 			if (is_array($val)) $val = serialize($val);
 			if (strlen("$val") > 30)
-				$val = substr("$val", 0,27).'..';
-			if (strstr($val,' '))
+				$val = substr("$val", 0, 27).'..';
+			if (strstr($val, ' '))
 				$val = "'$val'";
 			$infos[] = $var.'='.$val;
 		}
@@ -143,16 +143,16 @@ 
 			. join(', ', $infos)
 			.' ('.strlen($page['texte']).' octets)');
 
-		if (defined('_CALCUL_PROFILER') AND intval($profile)>_CALCUL_PROFILER){
+		if (defined('_CALCUL_PROFILER') AND intval($profile) > _CALCUL_PROFILER) {
 			spip_log("calcul ($profile) [$skel] "
 				. join(', ', $infos)
-				.' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'],"profiler"._LOG_AVERTISSEMENT);
+				.' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'], "profiler"._LOG_AVERTISSEMENT);
 		}
 
 		if ($debug) {
 		// si c'est ce que demande le debusqueur, lui passer la main
 			$t = strlen($page['texte']) ? $page['texte'] : " ";
-			$GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t;
+			$GLOBALS['debug_objets']['resultat'][$fonc.'tout'] = $t;
 			$GLOBALS['debug_objets']['courant'] = $courant;
 			$GLOBALS['debug_objets']['profile'][$sourcefile] = $profile;
 			if ($GLOBALS['debug_objets']['sourcefile']
@@ -162,26 +162,26 @@ 
 			}
 		}
 		// Si #CACHE{} n'etait pas la, le mettre a $delais
-		if (!isset($page['entetes']['X-Spip-Cache'])){
+		if (!isset($page['entetes']['X-Spip-Cache'])) {
 			// Dans l'espace prive ou dans un modeles/ on pose un cache 0 par defaut
 			// si aucun #CACHE{} specifie
 			// le contexte implicite qui conditionne le cache assure qu'on retombe pas sur le meme
 			// entre public et prive
-			if (test_espace_prive() OR strncmp($fond,'modeles/',8)==0)
+			if (test_espace_prive() OR strncmp($fond, 'modeles/', 8) == 0)
 				$page['entetes']['X-Spip-Cache'] = 0;
 			else
-				$page['entetes']['X-Spip-Cache'] = isset($GLOBALS['delais'])?$GLOBALS['delais']:36000;
+				$page['entetes']['X-Spip-Cache'] = isset($GLOBALS['delais']) ? $GLOBALS['delais'] : 36000;
 		}
 
 		$page['contexte'] = $contexte;
 	  
 		// faire remonter le fichier source
 		static $js_inclus = false;
-		if (defined('_VAR_INCLURE') AND _VAR_INCLURE){
+		if (defined('_VAR_INCLURE') AND _VAR_INCLURE) {
 			$page['sourcefile'] = $sourcefile;
 			$page['texte'] =
 				"<div class='inclure_blocs'><h6>".$page['sourcefile']."</h6>".$page['texte']."</div>"
-				. ($js_inclus?"":"<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>");
+				. ($js_inclus ? "" : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>");
 			$js_inclus = true;
 		}
 
@@ -219,13 +219,13 @@ 
 		if (strlen($m)) {
 			include_spip('inc/texte');
 			// les navigateurs pataugent si l'URL est vide
-			if ($url = virtuel_redirige($m, true)){
+			if ($url = virtuel_redirige($m, true)) {
 				// passer en url absolue car cette redirection pourra
 				// etre utilisee dans un contexte d'url qui change
 				// y compris url arbo
 				$status = 302;
 				if (defined('_STATUS_REDIRECTION_VIRTUEL'))
-					$status=_STATUS_REDIRECTION_VIRTUEL;
+					$status = _STATUS_REDIRECTION_VIRTUEL;
 				if (!preg_match(',^\w+:,', $url)) {
 					include_spip('inc/filtres_mini');
 					$url = url_absolue($url);
@@ -235,7 +235,7 @@ 
 				. "?php include_spip('inc/headers');redirige_par_entete('"
 				. texte_script($url)
 				. "','',$status);"
-				. "?" . ">",
+				. "?".">",
 					'process_ins' => 'php',
 				  'status' => $status);
 			}

ecrire/public/admin.php

Spacing +3 added lines, -3 removed lines

@@ -22,7 +22,7 @@ 
 if (!function_exists('strripos')) {
 // http://doc.spip.org/@strripos
 	function strripos($botte, $aiguille) {
-		if (preg_match('@^(.*)' . preg_quote($aiguille, '@') . '@is',
+		if (preg_match('@^(.*)'.preg_quote($aiguille, '@').'@is',
 		$botte, $regs)) { 
 			return strlen($regs[1]);
 		}
@@ -32,7 +32,7 @@ 
 if (!function_exists('stripos')) {
 // http://doc.spip.org/@stripos
 	function stripos($botte, $aiguille) {
-		if (preg_match('@^(.*)' . preg_quote($aiguille, '@') . '@isU',
+		if (preg_match('@^(.*)'.preg_quote($aiguille, '@').'@isU',
 		$botte, $regs)) { 
 			return strlen($regs[1]);
 		}
@@ -49,7 +49,7 @@ 
 	. "' type='text/css' />\n";
 	if ($f = find_in_path('spip_admin_perso.css'))
 		$css .= "<link rel='stylesheet' href='"
-		. url_absolue(direction_css($f)) . "' type='text/css' />\n";
+		. url_absolue(direction_css($f))."' type='text/css' />\n";
 
 	($pos = stripos($contenu, '</head>'))
 	    || ($pos = stripos($contenu, '<body>'))

ecrire/public/debusquer.php

Spacing +151 added lines, -154 removed lines

@@ -63,7 +63,7 @@ 
  * @return null|string
  *     - string si $message à false.
 **/
-function public_debusquer_dist($message = '', $lieu = '', $opt = array()){
+function public_debusquer_dist($message = '', $lieu = '', $opt = array()) {
 	global $visiteur_session;
 	global $debug_objets;
 	static $tableau_des_erreurs = array();
@@ -80,7 +80,7 @@ 
 	}
 
 	// Erreur ou appel final ?
-	if ($message){
+	if ($message) {
 		$message = debusquer_compose_message($message);
 		$tableau_des_erreurs[] = array($message, $lieu);
 		set_request('var_mode', 'debug');
@@ -89,7 +89,7 @@ 
 		if (is_object($lieu) AND (!isset($lieu->code) OR !$lieu->code))
 			$lieu->code = "''";
 		// forcer l'appel au debusqueur en cas de boucles infernales
-		$urgence = (_DEBUG_MAX_SQUELETTE_ERREURS AND count($tableau_des_erreurs)>_DEBUG_MAX_SQUELETTE_ERREURS);
+		$urgence = (_DEBUG_MAX_SQUELETTE_ERREURS AND count($tableau_des_erreurs) > _DEBUG_MAX_SQUELETTE_ERREURS);
 		if (!$urgence) return;
 	}
 	if (empty($debug_objets['principal']))
@@ -108,7 +108,7 @@ 
 	if (ob_get_length()
 		AND
 		!in_array('ob_gzhandler', ob_get_status())
-	){
+	) {
 		ob_end_clean();
 	}
 
@@ -126,15 +126,15 @@ 
 	if ($tableau_des_erreurs) http_status(503);
 
 	http_no_cache();
-	if (isset($_GET['var_profile'])){
+	if (isset($_GET['var_profile'])) {
 		$titre = parametre_url($GLOBALS['REQUEST_URI'], 'var_profile', '');
 		$titre = parametre_url($titre, 'var_mode', '');
 	}
 	else {
 		if (!$fonc) $fonc = $debug_objets['principal'];
-		$titre = !$mode ? $fonc : ($mode . ' ' . $debug_objets['sourcefile'][$fonc]);
+		$titre = !$mode ? $fonc : ($mode.' '.$debug_objets['sourcefile'][$fonc]);
 	}
-	if ($message===false){
+	if ($message === false) {
 		lang_select();
 		return debusquer_entete($titre, $res);
 	}
@@ -143,11 +143,11 @@ 
 	exit;
 }
 
-function debusquer_compose_message($msg){
-	if (is_array($msg)){
+function debusquer_compose_message($msg) {
+	if (is_array($msg)) {
 		// si c'est un texte, c'est une traduction a faire, mais
 		// sqlite renvoit aussi des erreurs alpha num (mais avec 3 arguments)
-		if (!is_numeric($msg[0]) AND count($msg)==2) {
+		if (!is_numeric($msg[0]) AND count($msg) == 2) {
 			// message avec argument: instancier
 			$msg = _T($msg[0], $msg[1], 'spip-debug-arg');
 		} else {
@@ -157,17 +157,17 @@ 
 	}
 	// FIXME: le fond n'est pas la si on n'est pas dans un squelette
 	// cela dit, ca serait bien d'indiquer tout de meme d'ou vient l'erreur
-	$fond = isset($GLOBALS['fond']) ? $GLOBALS['fond']  : "";
+	$fond = isset($GLOBALS['fond']) ? $GLOBALS['fond'] : "";
 	// une erreur critique sort $message en array
 	$debug = is_array($msg) ? $msg[1] : $msg;
-	spip_log("Debug: " . $debug . " (" . $fond . ")");
+	spip_log("Debug: ".$debug." (".$fond.")");
 	return $msg;
 }
 
-function debusquer_bandeau($erreurs){
+function debusquer_bandeau($erreurs) {
 
-	if (!empty($erreurs)){
-		$n = array(count($erreurs) . ' ' . _T('zbug_erreur_squelette'));
+	if (!empty($erreurs)) {
+		$n = array(count($erreurs).' '._T('zbug_erreur_squelette'));
 		return debusquer_navigation($erreurs, $n);
 	}
 	elseif (!empty($GLOBALS['tableau_des_temps'])) {
@@ -179,17 +179,17 @@ 
 		return '';
 }
 
-function debusquer_contexte($env){
+function debusquer_contexte($env) {
 
 	if (is_array($env_tab = @unserialize($env))) $env = $env_tab;
 
 	if (!$env) return '';
 	$res = "";
-	foreach ($env as $nom => $valeur){
+	foreach ($env as $nom => $valeur) {
 		if (is_array($valeur))
-			$valeur = '(' . count($valeur) . ' items) [' . join(',', $valeur) . ']';
-		$res .= "\n<tr><td><strong>" . nl2br(entites_html($nom))
-			. "</strong></td><td>:&nbsp;" . nl2br(entites_html($valeur))
+			$valeur = '('.count($valeur).' items) ['.join(',', $valeur).']';
+		$res .= "\n<tr><td><strong>".nl2br(entites_html($nom))
+			. "</strong></td><td>:&nbsp;".nl2br(entites_html($valeur))
 			. "</td></tr>\n";
 	}
 
@@ -199,32 +199,32 @@ 
 // Affichage du tableau des erreurs ou des temps de calcul
 // Cliquer sur les numeros en premiere colonne permet de voir le code
 
-function debusquer_navigation($tableau, $caption = array(), $id = 'debug-nav'){
+function debusquer_navigation($tableau, $caption = array(), $id = 'debug-nav') {
 
-	if (_request('exec')=='valider_xml') return '';
+	if (_request('exec') == 'valider_xml') return '';
 	$GLOBALS['bouton_admin_debug'] = true;
 	$res = '';
 	$href = quote_amp(parametre_url($GLOBALS['REQUEST_URI'], 'var_mode', 'debug'));
-	foreach ($tableau as $i => $err){
+	foreach ($tableau as $i => $err) {
 		$boucle = $ligne = $skel = '';
 		list($msg, $lieu) = $err;
-		if (is_object($lieu)){
+		if (is_object($lieu)) {
 			$ligne = $lieu->ligne;
 			$boucle = $lieu->id_boucle ? $lieu->id_boucle : '';
-			if (isset($lieu->descr['nom'])){
+			if (isset($lieu->descr['nom'])) {
 				$nom_code = $lieu->descr['nom'];
 				$skel = $lieu->descr['sourcefile'];
 				$h2 = parametre_url($href, 'var_mode_objet', $nom_code);
-				$h3 = parametre_url($h2, 'var_mode_affiche', 'squelette') . '#L' . $ligne;
+				$h3 = parametre_url($h2, 'var_mode_affiche', 'squelette').'#L'.$ligne;
 				$skel = "<a href='$h3'><b>$skel</b></a>";
-				if ($boucle){
-					$h3 = parametre_url($h2 . $boucle, 'var_mode_affiche', 'boucle');
+				if ($boucle) {
+					$h3 = parametre_url($h2.$boucle, 'var_mode_affiche', 'boucle');
 					$boucle = "<a href='$h3'><b>$boucle</b></a>";
 				}
 			}
 		}
 
-		$j = ($i+1);
+		$j = ($i + 1);
 		$res .= "<tr id='req$j'><td style='text-align: right'>"
 			. $j
 			. "&nbsp;</td><td style='text-align: left'>"
@@ -278,22 +278,22 @@ 
  * 		Retourne le texte de l'erreur a afficher
  * 		ou un tableau si l'erreur est critique
 **/
-function debusquer_requete($message){
+function debusquer_requete($message) {
 	list($errno, $msg, $query) = $message;
 
 	// FIXME: ces écritures mélangent divers syntaxe des moteurs SQL
 	// il serait plus prudent certainement d'avoir une fonction d'analyse par moteur
-	if (preg_match(',err(no|code):?[[:space:]]*([0-9]+),i', $msg, $regs)){
+	if (preg_match(',err(no|code):?[[:space:]]*([0-9]+),i', $msg, $regs)) {
 		$errno = $regs[2];
 	}
-	elseif (is_numeric($errno) and ($errno==1030 OR $errno<=1026)
+	elseif (is_numeric($errno) and ($errno == 1030 OR $errno <= 1026)
 		AND preg_match(',[^[:alnum:]]([0-9]+)[^[:alnum:]],', $msg, $regs)
 	) {
 		$errno = $regs[1];
 	}
 
 	// Erreur systeme
-	if (is_numeric($errno) and $errno>0 AND $errno<200){
+	if (is_numeric($errno) and $errno > 0 AND $errno < 200) {
 		$retour = "<tt><br /><br /><blink>"
 			. _T('info_erreur_systeme', array('errsys' => $errno))
 			. "</blink><br />\n<b>"
@@ -305,7 +305,7 @@ 
 	}
 
 	// Requete erronee
-	$err = "<b>" . _T('avis_erreur_mysql') . " $errno</b><br /><tt>\n"
+	$err = "<b>"._T('avis_erreur_mysql')." $errno</b><br /><tt>\n"
 		. spip_htmlspecialchars($msg)
 		. "\n<br /><span style='color: red'><b>"
 		. spip_htmlspecialchars($query)
@@ -318,17 +318,17 @@ 
 
 
 // http://doc.spip.org/@trouve_boucle_debug
-function trouve_boucle_debug($n, $nom, $debut = 0, $boucle = ""){
+function trouve_boucle_debug($n, $nom, $debut = 0, $boucle = "") {
 	global $debug_objets;
 
-	$id = $nom . $boucle;
-	if (is_array($debug_objets['sequence'][$id])){
-		foreach ($debug_objets['sequence'][$id] as $v){
+	$id = $nom.$boucle;
+	if (is_array($debug_objets['sequence'][$id])) {
+		foreach ($debug_objets['sequence'][$id] as $v) {
 
 			if (!preg_match('/^(.*)(<\?.*\?>)(.*)$/s', $v[0], $r))
 				$y = substr_count($v[0], "\n");
 			else {
-				if ($v[1][0]=='#')
+				if ($v[1][0] == '#')
 					// balise dynamique
 					$incl = $debug_objets['resultat'][$v[2]];
 				else
@@ -338,82 +338,79 @@ 
 					+substr_count($r[1], "\n")
 					+substr_count($r[3], "\n");
 			}
-			if ($n<=($y+$debut)){
-				if ($v[1][0]=='?')
+			if ($n <= ($y + $debut)) {
+				if ($v[1][0] == '?')
 					return trouve_boucle_debug($n, $nom, $debut, substr($v[1], 1));
-				elseif ($v[1][0]=='!') {
+				elseif ($v[1][0] == '!') {
 					if ($incl = trouve_squelette_inclus($v[1]))
 						return trouve_boucle_debug($n, $incl, $debut);
 				}
-				return array($nom, $boucle, $v[2]-1+$n-$debut);
+				return array($nom, $boucle, $v[2] - 1 + $n - $debut);
 			}
 			$debut += $y;
 		}
 	}
-	return array($nom, $boucle, $n-$debut);
+	return array($nom, $boucle, $n - $debut);
 }
 
 // http://doc.spip.org/@trouve_squelette_inclus
-function trouve_squelette_inclus($script){
+function trouve_squelette_inclus($script) {
 	global $debug_objets;
 	preg_match('/include\(.(.*).php3?.\);/', $script, $reg);
 	// si le script X.php n'est pas ecrire/public.php
 	// on suppose qu'il prend le squelette X.html (pas sur, mais y a pas mieux)
-	if ($reg[1]=='ecrire/public')
+	if ($reg[1] == 'ecrire/public')
 		// si c'est bien ecrire/public on cherche le param 'fond'
 		if (!preg_match("/'fond' => '([^']*)'/", $script, $reg))
 			// a defaut on cherche le param 'page'
 			if (!preg_match("/'param' => '([^']*)'/", $script, $reg))
 				$reg[1] = "inconnu";
-	$incl = ',' . $reg[1] . '[.]\w$,';
+	$incl = ','.$reg[1].'[.]\w$,';
 
-	foreach ($debug_objets['sourcefile'] as $k => $v){
+	foreach ($debug_objets['sourcefile'] as $k => $v) {
 		if (preg_match($incl, $v)) return $k;
 	}
 	return "";
 }
 
 // http://doc.spip.org/@reference_boucle_debug
-function reference_boucle_debug($n, $nom, $self){
+function reference_boucle_debug($n, $nom, $self) {
 	list($skel, $boucle, $ligne) = trouve_boucle_debug($n, $nom);
 
 	if (!$boucle)
-		return !$ligne ? "" :
-			(" (" .
-				(($nom!=$skel) ? _T('squelette_inclus_ligne') :
-					_T('squelette_ligne')) .
+		return !$ligne ? "" : (" (".
+				(($nom != $skel) ? _T('squelette_inclus_ligne') : _T('squelette_ligne')).
 				" <a href='$self&amp;var_mode_objet=$skel&amp;var_mode_affiche=squelette&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)");
 	else {
 		$self .= "&amp;var_mode_objet=$skel$boucle&amp;var_mode_affiche=boucle";
 
-		return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" :
-			" (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
+		return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" : " (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
 	}
 }
 
 // affiche un texte avec numero de ligne et ancre.
 
 // http://doc.spip.org/@ancre_texte
-function ancre_texte($texte, $fautifs = array(), $nocpt = false){
+function ancre_texte($texte, $fautifs = array(), $nocpt = false) {
 
 	$var_mode_ligne = _request('var_mode_ligne');
 	if ($var_mode_ligne) $fautifs[] = array($var_mode_ligne);
 	$res = '';
 
 	$s = highlight_string($texte, true);
-	if (substr($s, 0, 6)=='<code>'){
+	if (substr($s, 0, 6) == '<code>') {
 		$s = substr($s, 6);
 		$res = '<code>';
 	}
 
 	$s = preg_replace(',<(\w[^<>]*)>([^<]*)<br />([^<]*)</\1>,',
-		'<\1>\2</\1><br />' . "\n" . '<\1>\3</\1>',
+		'<\1>\2</\1><br />'."\n".'<\1>\3</\1>',
 		$s);
 
 
 	$tableau = explode("<br />", $s);
 
-	$format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: " . ($nocpt ? 'hidden' : 'visible') . ";%s' href='#T%s' title=\"%s\">%0" . strval(@strlen(count($tableau))) . "d</a></span> %s<br />\n";
+	$format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: ".($nocpt ? 'hidden' : 'visible').";%s' href='#T%s' title=\"%s\">%0".strval(@strlen(count($tableau)))."d</a></span> %s<br />\n";
 
 	$format10 = str_replace('white', 'lightgrey', $format);
 	$formaterr = "color: red;";
@@ -421,14 +418,14 @@ 
 	$flignes = array();
 	$loc = array(0, 0);
 	foreach ($fautifs as $lc)
-		if (is_array($lc)){
+		if (is_array($lc)) {
 			$l = array_shift($lc);
 			$flignes[$l] = $lc;
 		} else $flignes[$lc] = $loc;
 
 	$ancre = md5($texte);
-	foreach ($tableau as $ligne){
-		if (isset($flignes[$i])){
+	foreach ($tableau as $ligne) {
+		if (isset($flignes[$i])) {
 			$ligne = str_replace('&nbsp;', ' ', $ligne);
 			$indexmesg = $flignes[$i][1];
 			$err = textebrut($flignes[$i][2]);
@@ -442,7 +439,7 @@ 
 			$indexmesg = $ancre;
 			$err = $bg = '';
 		}
-		$res .= sprintf((($i%10) ? $format : $format10), $i, $bg, $indexmesg, $err, $i, $ligne);
+		$res .= sprintf((($i % 10) ? $format : $format10), $i, $bg, $indexmesg, $err, $i, $ligne);
 		$i++;
 	}
 
@@ -454,31 +451,31 @@ 
 		. '" style="cursor: pointer;">'
 		. ($nocpt ? '' : _T('info_numero_abbreviation'))
 		. "</div>
-	" . $res . "</div>\n";
+	" . $res."</div>\n";
 }
 
 // l'environnement graphique du debuggueur 
 
-function debusquer_squelette($fonc, $mode, $self){
+function debusquer_squelette($fonc, $mode, $self) {
 	global $debug_objets;
 
-	if ($mode!=='validation'){
-		if (isset($debug_objets['sourcefile']) and $debug_objets['sourcefile']){
+	if ($mode !== 'validation') {
+		if (isset($debug_objets['sourcefile']) and $debug_objets['sourcefile']) {
 			$res = "<div id='spip-boucles'>\n"
 				. debusquer_navigation_squelettes($self)
 				. "</div>";
 		}
 		else
 			$res = '';
-		if ($fonc){
+		if ($fonc) {
 			$id = " id='$fonc'";
-			if (!empty($GLOBALS['debug_objets'][$mode][$fonc])){
+			if (!empty($GLOBALS['debug_objets'][$mode][$fonc])) {
 				list($legend, $texte, $res2) = debusquer_source($fonc, $mode);
 				$texte .= $res2;
 			}
-			elseif (!empty($debug_objets[$mode][$fonc . 'tout'])) {
-				$legend = _T('zbug_' . $mode);
-				$texte = $debug_objets[$mode][$fonc . 'tout'];
+			elseif (!empty($debug_objets[$mode][$fonc.'tout'])) {
+				$legend = _T('zbug_'.$mode);
+				$texte = $debug_objets[$mode][$fonc.'tout'];
 				$texte = ancre_texte($texte, array('', ''));
 			}
 		}
@@ -490,17 +487,17 @@ 
 	}
 	else {
 		$valider = charger_fonction('valider', 'xml');
-		$val = $valider($debug_objets['validation'][$fonc . 'tout']);
+		$val = $valider($debug_objets['validation'][$fonc.'tout']);
 		// Si erreur, signaler leur nombre dans le formulaire admin
 		$debug_objets['validation'] = $val->err ? count($val->err) : '';
 		list($texte, $err) = emboite_texte($val, $fonc, $self);
-		if ($err===false)
+		if ($err === false)
 			$err = _T('impossible');
-		elseif ($err===true)
+		elseif ($err === true)
 			$err = _T('correcte');
 		else
 			$err = ": $err";
-		$legend = _T('validation') . ' ' . $err;
+		$legend = _T('validation').' '.$err;
 		$res = $id = '';
 	}
 	return !trim($texte) ? '' : (
@@ -516,16 +513,16 @@ 
 
 
 // http://doc.spip.org/@emboite_texte
-function emboite_texte($res, $fonc = '', $self = ''){
+function emboite_texte($res, $fonc = '', $self = '') {
 	$errs = $res->err;
-	$texte = $res->entete . ($errs ? '' : $res->page);
+	$texte = $res->entete.($errs ? '' : $res->page);
 
 	if (!$texte and !$errs)
 		return array(ancre_texte('', array('', '')), false);
 	if (!$errs)
 		return array(ancre_texte($texte, array('', '')), true);
 
-	if (!isset($GLOBALS['debug_objets'])){
+	if (!isset($GLOBALS['debug_objets'])) {
 
 		$colors = array('#e0e0f0', '#f8f8ff');
 		$encore = count_occ($errs);
@@ -546,7 +543,7 @@ 
 
 		$i = 0;
 		$style = "style='text-align: right; padding-right: 5px'";
-		foreach ($errs as $r){
+		foreach ($errs as $r) {
 			$i++;
 			list($msg, $ligne, $col) = $r;
 			#spip_log("$r = list($msg, $ligne, $col");
@@ -556,7 +553,7 @@ 
 				$encore2[$msg] = $ref = 1;
 			}
 			$err .= "<tr  style='background-color: "
-				. $colors[$i%2]
+				. $colors[$i % 2]
 				. "'><td $style><a href='#debut_err'>"
 				. $i
 				. "</a></td><td $style>"
@@ -573,7 +570,7 @@ 
 		$err = "<h2 style='text-align: center'>"
 			. $i
 			. "<a href='#fin_err'>"
-			. " " . _T('erreur_texte')
+			. " "._T('erreur_texte')
 			. "</a></h2><table id='debut_err' style='width: 100%'>"
 			. $err
 			. " </table><a id='fin_err'></a>";
@@ -583,17 +580,17 @@ 
 		list($msg, $fermant, $ouvrant) = $errs[0];
 		$rf = reference_boucle_debug($fermant, $fonc, $self);
 		$ro = reference_boucle_debug($ouvrant, $fonc, $self);
-		$err = $msg .
-			"<a href='#L" . $fermant . "'>$fermant</a>$rf<br />" .
-			"<a href='#L" . $ouvrant . "'>$ouvrant</a>$ro";
+		$err = $msg.
+			"<a href='#L".$fermant."'>$fermant</a>$rf<br />".
+			"<a href='#L".$ouvrant."'>$ouvrant</a>$ro";
 		return array(ancre_texte($texte, array(array($ouvrant), array($fermant))), $err);
 	}
 }
 
 // http://doc.spip.org/@count_occ
-function count_occ($regs){
+function count_occ($regs) {
 	$encore = array();
-	foreach ($regs as $r){
+	foreach ($regs as $r) {
 		if (isset($encore[$r[0]]))
 			$encore[$r[0]]++;
 		else
@@ -602,14 +599,14 @@ 
 	return $encore;
 }
 
-function debusquer_navigation_squelettes($self){
+function debusquer_navigation_squelettes($self) {
 	global $debug_objets, $spip_lang_right;
 
 	$res = '';
 	$boucles = !empty($debug_objets['boucle']) ? $debug_objets['boucle'] : '';
 	$contexte = $debug_objets['contexte'];
 	$t_skel = _T('squelette');
-	foreach ($debug_objets['sourcefile'] as $nom => $sourcefile){
+	foreach ($debug_objets['sourcefile'] as $nom => $sourcefile) {
 		$self2 = parametre_url($self, 'var_mode_objet', $nom);
 		$nav = !$boucles ? '' : debusquer_navigation_boucles($boucles, $nom, $self, $sourcefile);
 		$temps = !isset($debug_objets['profile'][$sourcefile]) ? '' : _T('zbug_profile', array('time' => $debug_objets['profile'][$sourcefile]));
@@ -637,67 +634,67 @@ 
 	return $res;
 }
 
-function debusquer_navigation_boucles($boucles, $nom_skel, $self, $nom_source){
+function debusquer_navigation_boucles($boucles, $nom_skel, $self, $nom_source) {
 	$i = 0;
 	$res = '';
 	$var_mode_objet = _request('var_mode_objet');
 	$gram = preg_match('/[.](\w+)$/', $nom_source, $r) ? $r[1] : '';
 
-	foreach ($boucles as $objet => $boucle){
-		if (substr($objet, 0, strlen($nom_skel))==$nom_skel){
+	foreach ($boucles as $objet => $boucle) {
+		if (substr($objet, 0, strlen($nom_skel)) == $nom_skel) {
 			$i++;
 			$nom = $boucle->id_boucle;
 			$req = $boucle->type_requete;
 			$crit = public_decompiler($boucle, $gram, 0, 'criteres');
-			$self2 = $self . "&amp;var_mode_objet=" . $objet;
-
-			$res .= "\n<tr style='background-color: " .
-				($i%2 ? '#e0e0f0' : '#f8f8ff') .
-				"'><td  align='right'>$i</td><td>\n" .
-				"<a  class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=boucle#f_$nom_skel'>" .
-				_T('zbug_boucle') .
-				"</a></td><td>\n<a class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=resultat#f_$nom_skel'>" .
-				_T('zbug_resultat') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=code#f_$nom_skel'>" .
-				_T('zbug_code') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				str_replace('var_mode=', 'var_profile=', $self2) .
-				"'>" .
-				_T('zbug_calcul') .
-				"</a></td><td>\n" .
-				(($var_mode_objet==$objet) ? "<b>$nom</b>" : $nom) .
-				"</td><td>\n" .
-				$req .
-				"</td><td>\n" .
-				spip_htmlspecialchars($crit) .
+			$self2 = $self."&amp;var_mode_objet=".$objet;
+
+			$res .= "\n<tr style='background-color: ".
+				($i % 2 ? '#e0e0f0' : '#f8f8ff').
+				"'><td  align='right'>$i</td><td>\n".
+				"<a  class='debug_link_boucle' href='".
+				$self2.
+				"&amp;var_mode_affiche=boucle#f_$nom_skel'>".
+				_T('zbug_boucle').
+				"</a></td><td>\n<a class='debug_link_boucle' href='".
+				$self2.
+				"&amp;var_mode_affiche=resultat#f_$nom_skel'>".
+				_T('zbug_resultat').
+				"</a></td><td>\n<a class='debug_link_resultat' href='".
+				$self2.
+				"&amp;var_mode_affiche=code#f_$nom_skel'>".
+				_T('zbug_code').
+				"</a></td><td>\n<a class='debug_link_resultat' href='".
+				str_replace('var_mode=', 'var_profile=', $self2).
+				"'>".
+				_T('zbug_calcul').
+				"</a></td><td>\n".
+				(($var_mode_objet == $objet) ? "<b>$nom</b>" : $nom).
+				"</td><td>\n".
+				$req.
+				"</td><td>\n".
+				spip_htmlspecialchars($crit).
 				"</td></tr>";
 		}
 	}
 	return $res;
 }
 
-function debusquer_source($objet, $affiche){
+function debusquer_source($objet, $affiche) {
 	$quoi = $GLOBALS['debug_objets'][$affiche][$objet];
 	$nom = $GLOBALS['debug_objets']['boucle'][$objet]->id_boucle;
 	$res2 = "";
 
-	if ($affiche=='resultat'){
+	if ($affiche == 'resultat') {
 		$legend = $nom;
 		$req = $GLOBALS['debug_objets']['requete'][$objet];
-		if (function_exists('traite_query')){
+		if (function_exists('traite_query')) {
 			$c = strtolower(_request('connect'));
 			$c = $GLOBALS['connexions'][$c ? $c : 0]['prefixe'];
 			$req = traite_query($req, '', $c);
 		}
 		//  permettre le copier/coller facile
 		// $res = ancre_texte($req, array(), true);
-		$res = "<div id='T" . md5($req) . "'>\n<pre>\n" . $req . "</pre>\n</div>\n";
+		$res = "<div id='T".md5($req)."'>\n<pre>\n".$req."</pre>\n</div>\n";
 		//  formatage et affichage des resultats bruts de la requete
 		$ress_req = spip_query($req);
 		$brut_sql = '';
@@ -705,38 +702,38 @@ 
 		//  eviter l'affichage de milliers de lignes
 		//  personnalisation possible dans mes_options
 		$max_aff = defined('_MAX_DEBUG_AFF') ? _MAX_DEBUG_AFF : 50;
-		while ($retours_sql = sql_fetch($ress_req)){
-			if ($num<=$max_aff){
-				$brut_sql .= "<h3>" . ($num==1 ? $num . " sur " . sql_count($ress_req) : $num) . "</h3>";
+		while ($retours_sql = sql_fetch($ress_req)) {
+			if ($num <= $max_aff) {
+				$brut_sql .= "<h3>".($num == 1 ? $num." sur ".sql_count($ress_req) : $num)."</h3>";
 				$brut_sql .= "<p>";
-				foreach ($retours_sql as $key => $val){
-					$brut_sql .= "<strong>" . $key . "</strong> => " . spip_htmlspecialchars(couper($val, 150)) . "<br />\n";
+				foreach ($retours_sql as $key => $val) {
+					$brut_sql .= "<strong>".$key."</strong> => ".spip_htmlspecialchars(couper($val, 150))."<br />\n";
 				}
 				$brut_sql .= "</p>";
 			}
 			$num++;
 		}
 		$res2 = interdire_scripts($brut_sql);
-		foreach ($quoi as $view){
+		foreach ($quoi as $view) {
 			//  ne pas afficher les $contexte_inclus
 			$view = preg_replace(",<\?php.+\?[>],Uims", "", $view);
-			if ($view){
-				$res2 .= "\n<br /><fieldset>" . interdire_scripts($view) . "</fieldset>";
+			if ($view) {
+				$res2 .= "\n<br /><fieldset>".interdire_scripts($view)."</fieldset>";
 			}
 		}
 
 	}
-	elseif ($affiche=='code'){
+	elseif ($affiche == 'code') {
 		$legend = $nom;
-		$res = ancre_texte("<" . "?php\n" . $quoi . "\n?" . ">");
+		$res = ancre_texte("<"."?php\n".$quoi."\n?".">");
 	}
-	elseif ($affiche=='boucle'){
-		$legend = _T('zbug_boucle') . ' ' . $nom;
+	elseif ($affiche == 'boucle') {
+		$legend = _T('zbug_boucle').' '.$nom;
 		// Le compilateur prefixe le nom des boucles par l'extension du fichier source.
 		$gram = preg_match('/^([^_]+)_/', $objet, $r) ? $r[1] : '';
 		$res = ancre_texte(public_decompiler($quoi, $gram, 0, 'boucle'));
 	}
-	elseif ($affiche=='squelette'){
+	elseif ($affiche == 'squelette') {
 		$legend = $GLOBALS['debug_objets']['sourcefile'][$objet];
 		$res = ancre_texte($GLOBALS['debug_objets']['squelette'][$objet]);
 	}
@@ -745,30 +742,30 @@ 
 }
 
 // http://doc.spip.org/@debusquer_entete
-function debusquer_entete($titre, $corps){
+function debusquer_entete($titre, $corps) {
 	global $debug_objets;
 	include_spip('balise/formulaire_admin');
 	include_spip('public/assembler'); // pour inclure_balise_dynamique
 	include_spip('inc/texte'); // pour corriger_typo
 
-	return _DOCTYPE_ECRIRE .
-		html_lang_attributes() .
-		"<head>\n<title>" .
-		('SPIP ' . $GLOBALS['spip_version_affichee'] . ' ' .
-			_T('admin_debug') . ' ' . $titre . ' (' .
-			supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))) .
-		")</title>\n" .
-		"<meta http-equiv='Content-Type' content='text/html" .
-		(($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '') .
-		"' />\n" .
+	return _DOCTYPE_ECRIRE.
+		html_lang_attributes().
+		"<head>\n<title>".
+		('SPIP '.$GLOBALS['spip_version_affichee'].' '.
+			_T('admin_debug').' '.$titre.' ('.
+			supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))).
+		")</title>\n".
+		"<meta http-equiv='Content-Type' content='text/html".
+		(($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '').
+		"' />\n".
 		http_script('', 'jquery.js')
-		. "<link rel='stylesheet' href='" . url_absolue(find_in_path('spip_admin.css'))
-		. "' type='text/css' />" .
-		"</head>\n" .
-		"<body style='margin:0 10px;'>\n" .
-		"<div id='spip-debug-header'>" .
-		$corps .
-		inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $debug_objets), false) .
+		. "<link rel='stylesheet' href='".url_absolue(find_in_path('spip_admin.css'))
+		. "' type='text/css' />".
+		"</head>\n".
+		"<body style='margin:0 10px;'>\n".
+		"<div id='spip-debug-header'>".
+		$corps.
+		inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $debug_objets), false).
 		'</div></body></html>';
 }
 

ecrire/public/sandbox.php

Spacing +13 added lines, -13 removed lines

@@ -25,8 +25,8 @@ 
  * @param Object $p
  * @return string
  */
-function sandbox_composer_texte($texte, &$p){
-	$code = "'".str_replace(array("\\","'"),array("\\\\","\\'"), $texte)."'";
+function sandbox_composer_texte($texte, &$p) {
+	$code = "'".str_replace(array("\\", "'"), array("\\\\", "\\'"), $texte)."'";
 	return $code;
 }
 
@@ -40,7 +40,7 @@ 
  * @param Object $p
  * @return string
  */
-function sandbox_composer_filtre($fonc, $code, $arglist, &$p){
+function sandbox_composer_filtre($fonc, $code, $arglist, &$p) {
 	if (isset($GLOBALS['spip_matrice'][$fonc])) {
 		$code = "filtrer('$fonc',$code$arglist)";
 	}
@@ -89,7 +89,7 @@ 
  * @param array $_contexte
  * @return string
  */
-function sandbox_composer_inclure_php($fichier, &$p, $_contexte){
+function sandbox_composer_inclure_php($fichier, &$p, $_contexte) {
 	$compil = texte_script(memoriser_contexte_compil($p));
 	// si inexistant, on essaiera a l'execution
 	if ($path = find_in_path($fichier))
@@ -106,7 +106,7 @@ 
  * @param Object $p
  * @return string
  */
-function sandbox_composer_interdire_scripts($code, &$p){
+function sandbox_composer_interdire_scripts($code, &$p) {
 	// Securite
 	if ($p->interdire_scripts
 	AND $p->etoile != '**') {
@@ -132,19 +132,19 @@ 
  * @param array ...
  * @return mixed|string
  */
-function sandbox_filtrer_squelette($skel, $corps, $filtres){
+function sandbox_filtrer_squelette($skel, $corps, $filtres) {
 	$series_filtres = func_get_args();
-	array_shift($series_filtres);// skel
-	array_shift($series_filtres);// corps
+	array_shift($series_filtres); // skel
+	array_shift($series_filtres); // corps
 
 	// proteger les <INCLUDE> et tous les morceaux de php licites
 	if ($skel['process_ins'] == 'php')
-		$corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS','echapper_php_callback', $corps);
+		$corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS', 'echapper_php_callback', $corps);
 
 	// recuperer les couples de remplacement
 	$replace = echapper_php_callback();
 
-	foreach($series_filtres as $filtres){
+	foreach ($series_filtres as $filtres) {
 		if (count($filtres))
 			foreach ($filtres as $filtre) {
 				if ($filtre AND $f = chercher_filtre($filtre))
@@ -153,12 +153,12 @@ 
 	}
 
 	// restaurer les echappements
-	return str_replace($replace[0],$replace[1],$corps);
+	return str_replace($replace[0], $replace[1], $corps);
 }
 
 
 // http://doc.spip.org/@echapper_php_callback
-function echapper_php_callback($r=null) {
+function echapper_php_callback($r = null) {
 	static $src = array();
 	static $dst = array();
 
@@ -171,7 +171,7 @@ 
 
 	// si on recoit pas un tableau, on renvoit les couples de substitution
 	// et on RAZ les remplacements
-	$r = array($src,$dst);
+	$r = array($src, $dst);
 	$src = $dst = array();
 	return $r;
 }