spip / SPIP

config/ecran_securite.php

Spacing +32 added lines, -32 removed lines

@@ -23,14 +23,14 @@ 
  * var_isbot=1 peut etre utilise pour monitorer la disponibilite pour les bots (sujets a 503 de delestage si
  * le load depasse ECRAN_SECURITE_LOAD)
  */
-if (!defined('_IS_BOT') and isset($_GET['var_isbot'])){
+if (!defined('_IS_BOT') and isset($_GET['var_isbot'])) {
 	define('_IS_BOT', $_GET['var_isbot'] ? true : false);
 }
 
 /*
  * Détecteur de robot d'indexation
  */
-if (!defined('_IS_BOT')){
+if (!defined('_IS_BOT')) {
 	define('_IS_BOT',
 		isset($_SERVER['HTTP_USER_AGENT'])
 		and preg_match(
@@ -40,16 +40,16 @@ 
 			. 'MSIE 6\.0|'
 			// UA plus cibles
 			. '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebookexternalhit|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MegaIndex|MetaURI|Moreover|Rambler|Scrapy|Scooter|ScrubbyBloglines|Yahoo|Yeti'
-			. ',i', (string)$_SERVER['HTTP_USER_AGENT'])
+			. ',i', (string) $_SERVER['HTTP_USER_AGENT'])
 	);
 }
-if (!defined('_IS_BOT_FRIEND')){
+if (!defined('_IS_BOT_FRIEND')) {
 	define('_IS_BOT_FRIEND',
 		isset($_SERVER['HTTP_USER_AGENT'])
 		and preg_match(','
 			// UA plus cibles
 			. 'facebookexternalhit'
-			. ',i', (string)$_SERVER['HTTP_USER_AGENT'])
+			. ',i', (string) $_SERVER['HTTP_USER_AGENT'])
 	);
 }
 
@@ -63,15 +63,15 @@ 
 foreach ($_GET as $var => $val)
 	if ($_GET[$var] and strncmp($var, "id_", 3) == 0
 	and !in_array($var, array('id_table', 'id_base')))
-		$_GET[$var] = is_array($_GET[$var])?@array_map('intval', $_GET[$var]):intval($_GET[$var]);
+		$_GET[$var] = is_array($_GET[$var]) ? @array_map('intval', $_GET[$var]) : intval($_GET[$var]);
 foreach ($_POST as $var => $val)
 	if ($_POST[$var] and strncmp($var, "id_", 3) == 0
 	and !in_array($var, array('id_table', 'id_base')))
-		$_POST[$var] = is_array($_POST[$var])?@array_map('intval', $_POST[$var]):intval($_POST[$var]);
+		$_POST[$var] = is_array($_POST[$var]) ? @array_map('intval', $_POST[$var]) : intval($_POST[$var]);
 foreach ($GLOBALS as $var => $val)
 	if ($GLOBALS[$var] and strncmp($var, "id_", 3) == 0
 	and !in_array($var, array('id_table', 'id_base')))
-		$GLOBALS[$var] = is_array($GLOBALS[$var])?@array_map('intval', $GLOBALS[$var]):intval($GLOBALS[$var]);
+		$GLOBALS[$var] = is_array($GLOBALS[$var]) ? @array_map('intval', $GLOBALS[$var]) : intval($GLOBALS[$var]);
 
 /*
  * Interdit la variable $cjpeg_command, qui était utilisée sans
@@ -82,18 +82,18 @@ 
 /*
  * Contrôle de quelques variables (XSS)
  */
-foreach(array('lang', 'var_recherche', 'aide', 'var_lang_r', 'lang_r', 'var_ajax_ancre', 'nom_fichier') as $var) {
+foreach (array('lang', 'var_recherche', 'aide', 'var_lang_r', 'lang_r', 'var_ajax_ancre', 'nom_fichier') as $var) {
 	if (isset($_GET[$var]))
-		$_REQUEST[$var] = $GLOBALS[$var] = $_GET[$var] = preg_replace(',[^\w\,/#&;-]+,', ' ', (string)$_GET[$var]);
+		$_REQUEST[$var] = $GLOBALS[$var] = $_GET[$var] = preg_replace(',[^\w\,/#&;-]+,', ' ', (string) $_GET[$var]);
 	if (isset($_POST[$var]))
-		$_REQUEST[$var] = $GLOBALS[$var] = $_POST[$var] = preg_replace(',[^\w\,/#&;-]+,', ' ', (string)$_POST[$var]);
+		$_REQUEST[$var] = $GLOBALS[$var] = $_POST[$var] = preg_replace(',[^\w\,/#&;-]+,', ' ', (string) $_POST[$var]);
 }
 
 /*
  * Filtre l'accès à spip_acces_doc (injection SQL en 1.8.2x)
  */
-if (preg_match(',^(.*/)?spip_acces_doc\.,', (string)$_SERVER['REQUEST_URI'])) {
-	$file = addslashes((string)$_GET['file']);
+if (preg_match(',^(.*/)?spip_acces_doc\.,', (string) $_SERVER['REQUEST_URI'])) {
+	$file = addslashes((string) $_GET['file']);
 }
 
 /*
@@ -108,28 +108,28 @@ 
  * Agenda joue à l'injection php
  */
 if (isset($_REQUEST['partie_cal'])
-and $_REQUEST['partie_cal'] !== htmlentities((string)$_REQUEST['partie_cal']))
+and $_REQUEST['partie_cal'] !== htmlentities((string) $_REQUEST['partie_cal']))
 	$ecran_securite_raison = "partie_cal";
 if (isset($_REQUEST['echelle'])
-and $_REQUEST['echelle'] !== htmlentities((string)$_REQUEST['echelle']))
+and $_REQUEST['echelle'] !== htmlentities((string) $_REQUEST['echelle']))
 	$ecran_securite_raison = "echelle";
 
 /*
  * Espace privé
  */
 if (isset($_REQUEST['exec'])
-and !preg_match(',^[\w-]+$,', (string)$_REQUEST['exec']))
+and !preg_match(',^[\w-]+$,', (string) $_REQUEST['exec']))
 	$ecran_securite_raison = "exec";
 if (isset($_REQUEST['cherche_auteur'])
-and preg_match(',[<],', (string)$_REQUEST['cherche_auteur']))
+and preg_match(',[<],', (string) $_REQUEST['cherche_auteur']))
 	$ecran_securite_raison = "cherche_auteur";
 if (isset($_REQUEST['exec'])
 and $_REQUEST['exec'] == 'auteurs'
-and preg_match(',[<],', (string)$_REQUEST['recherche']))
+and preg_match(',[<],', (string) $_REQUEST['recherche']))
 	$ecran_securite_raison = "recherche";
 if (isset($_REQUEST['exec'])
 and $_REQUEST['exec'] == 'info_plugin'
-and preg_match(',[<],', (string)$_REQUEST['plugin']))
+and preg_match(',[<],', (string) $_REQUEST['plugin']))
 	$ecran_securite_raison = "plugin";
 if (isset($_REQUEST['exec'])
 and $_REQUEST['exec'] == 'puce_statut'
@@ -142,7 +142,7 @@ 
 	or @file_exists('ecrire/inc_version.php')) {
 		function action_configurer() {
 			include_spip('inc/autoriser');
-			if(!autoriser('configurer', _request('configuration'))) {
+			if (!autoriser('configurer', _request('configuration'))) {
 				include_spip('inc/minipres');
 				echo minipres(_T('info_acces_interdit'));
 				exit;
@@ -183,7 +183,7 @@ 
  */
 if (_IS_BOT and (
 	(isset($_REQUEST['echelle']) and isset($_REQUEST['partie_cal']) and isset($_REQUEST['type']))
-	or (strpos((string)$_SERVER['REQUEST_URI'], 'debut_') and preg_match(',[?&]debut_.*&debut_,', (string)$_SERVER['REQUEST_URI']))
+	or (strpos((string) $_SERVER['REQUEST_URI'], 'debut_') and preg_match(',[?&]debut_.*&debut_,', (string) $_SERVER['REQUEST_URI']))
 )
 )
 	$ecran_securite_raison = "robot agenda/double pagination";
@@ -195,7 +195,7 @@ 
 if (isset($_REQUEST['page'])) {
 	if ($_REQUEST['page'] == 'test_cfg')
 		$ecran_securite_raison = "test_cfg";
-	if ($_REQUEST['page'] !== htmlspecialchars((string)$_REQUEST['page']))
+	if ($_REQUEST['page'] !== htmlspecialchars((string) $_REQUEST['page']))
 		$ecran_securite_raison = "xsspage";
 	if ($_REQUEST['page'] == '404'
 	and isset($_REQUEST['erreur']))
@@ -233,11 +233,11 @@ 
 /*
  * Outils XML mal sécurisés again
  */
-if (isset($_REQUEST['var_url']) and $_REQUEST['var_url'] and isset($_REQUEST['exec']) and $_REQUEST['exec']=='valider_xml'){
+if (isset($_REQUEST['var_url']) and $_REQUEST['var_url'] and isset($_REQUEST['exec']) and $_REQUEST['exec'] == 'valider_xml') {
 	$url = trim($_REQUEST['var_url']);
-	if (strncmp($url,'/',1)==0
-	  or (($p=strpos($url,'..'))!==false AND strpos($url,'..',$p+3)!==false)
-		or (strpos($url,'://')!==false or strpos($url,':\\')!==false)) {
+	if (strncmp($url, '/', 1) == 0
+	  or (($p = strpos($url, '..')) !== false AND strpos($url, '..', $p + 3) !== false)
+		or (strpos($url, '://') !== false or strpos($url, ':\\') !== false)) {
 		$ecran_securite_raison = 'URL interdite pour var_url';
 	}
 }
@@ -246,10 +246,10 @@ 
  * Sauvegarde mal securisée < 2.0.9
  */
 if (isset($_REQUEST['nom_sauvegarde'])
-and strstr((string)$_REQUEST['nom_sauvegarde'], '/'))
+and strstr((string) $_REQUEST['nom_sauvegarde'], '/'))
 	$ecran_securite_raison = 'nom_sauvegarde manipulee';
 if (isset($_REQUEST['znom_sauvegarde'])
-and strstr((string)$_REQUEST['znom_sauvegarde'], '/'))
+and strstr((string) $_REQUEST['znom_sauvegarde'], '/'))
 	$ecran_securite_raison = 'znom_sauvegarde manipulee';
 
 
@@ -264,8 +264,8 @@ 
 /*
  * Forms & Table ne se méfiait pas assez des uploads de fichiers
  */
-if (count($_FILES)){
-	foreach($_FILES as $k => $v){
+if (count($_FILES)) {
+	foreach ($_FILES as $k => $v) {
 		 if (preg_match(',^fichier_\d+$,', $k)
 		 and preg_match(',\.php,i', $v['name']))
 		 	unset($_FILES[$k]);
@@ -275,7 +275,7 @@ 
  * et Contact trop laxiste avec une variable externe
  * on bloque pas le post pour eviter de perdre des donnees mais on unset la variable et c'est tout
  */
-if (isset($_REQUEST['pj_enregistrees_nom']) and $_REQUEST['pj_enregistrees_nom']){
+if (isset($_REQUEST['pj_enregistrees_nom']) and $_REQUEST['pj_enregistrees_nom']) {
 	unset($_REQUEST['pj_enregistrees_nom']);
 	unset($_GET['pj_enregistrees_nom']);
 	unset($_POST['pj_enregistrees_nom']);
@@ -305,7 +305,7 @@ 
 /*
  * Réinjection des clés en html dans l'admin r19561
  */
-if (strpos($_SERVER['REQUEST_URI'], "ecrire/") !== false){
+if (strpos($_SERVER['REQUEST_URI'], "ecrire/") !== false) {
 	$zzzz = implode("", array_keys($_REQUEST));
 	if (strlen($zzzz) != strcspn($zzzz, '<>"\''))
 		$ecran_securite_raison = 'Cle incorrecte en $_REQUEST';

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/styliser_par_z.php

Spacing +80 added lines, -80 removed lines

@@ -19,8 +19,8 @@ 
  * @param array $flux
  * @return array
  */
-function public_styliser_par_z_dist($flux){
-	static $prefix_path=null;
+function public_styliser_par_z_dist($flux) {
+	static $prefix_path = null;
 	static $prefix_length;
 	static $z_blocs;
 	static $apl_constant;
@@ -31,52 +31,52 @@ 
 
 	if (!isset($prefix_path)) {
 		$z_blocs = z_blocs(test_espace_prive());
-		if (test_espace_prive ()){
+		if (test_espace_prive()) {
 			$prefix_path = "prive/squelettes/";
 			$prefix_length = strlen($prefix_path);
 			$apl_constant = '_ECRIRE_AJAX_PARALLEL_LOAD';
 			$page = 'exec';
-			$echafauder = charger_fonction('echafauder','prive',true);
-			define('_ZCORE_EXCLURE_PATH','');
+			$echafauder = charger_fonction('echafauder', 'prive', true);
+			define('_ZCORE_EXCLURE_PATH', '');
 		}
 		else {
 			$prefix_path = "";
 			$prefix_length = 0;
 			$apl_constant = '_Z_AJAX_PARALLEL_LOAD';
 			$page = _SPIP_PAGE;
-			$echafauder = charger_fonction('echafauder','public',true);
-			define('_ZCORE_EXCLURE_PATH','\bprive|\bsquelettes-dist'.(defined('_DIR_PLUGIN_DIST')?'|\b'.rtrim(_DIR_PLUGIN_DIST,'/'):''));
+			$echafauder = charger_fonction('echafauder', 'public', true);
+			define('_ZCORE_EXCLURE_PATH', '\bprive|\bsquelettes-dist'.(defined('_DIR_PLUGIN_DIST') ? '|\b'.rtrim(_DIR_PLUGIN_DIST, '/') : ''));
 		}
-	  $prepend = (defined('_Z_PREPEND_PATH')?_Z_PREPEND_PATH:"");
+	  $prepend = (defined('_Z_PREPEND_PATH') ? _Z_PREPEND_PATH : "");
 	}
 	$z_contenu = reset($z_blocs); // contenu par defaut
 
 	$fond = $flux['args']['fond'];
 
-	if ($prepend OR strncmp($fond,$prefix_path,$prefix_length)==0) {
+	if ($prepend OR strncmp($fond, $prefix_path, $prefix_length) == 0) {
 		$fond = substr($fond, $prefix_length);
 		$squelette = $flux['data'];
 		$ext = $flux['args']['ext'];
 		// Ajax Parallel loading : ne pas calculer le bloc, mais renvoyer un js qui le loadera en ajax
 		if (defined('_Z_AJAX_PARALLEL_LOAD_OK')
-			AND $dir = explode('/',$fond)
-			AND count($dir)==2 // pas un sous repertoire
+			AND $dir = explode('/', $fond)
+			AND count($dir) == 2 // pas un sous repertoire
 			AND $dir = reset($dir)
-			AND in_array($dir,$z_blocs) // verifier deja qu'on est dans un bloc Z
+			AND in_array($dir, $z_blocs) // verifier deja qu'on est dans un bloc Z
 			AND defined($apl_constant)
-			AND in_array($dir,explode(',',constant($apl_constant))) // et dans un demande en APL
-			AND $pipe = z_trouver_bloc($prefix_path.$prepend,$dir,'z_apl',$ext) // et qui contient le squelette APL
-			){
+			AND in_array($dir, explode(',', constant($apl_constant))) // et dans un demande en APL
+			AND $pipe = z_trouver_bloc($prefix_path.$prepend, $dir, 'z_apl', $ext) // et qui contient le squelette APL
+			) {
 			$flux['data'] = $pipe;
 			return $flux;
 		}
 
 		// surcharger aussi les squelettes venant de squelettes-dist/
-		if ($squelette AND !z_fond_valide($squelette)){
+		if ($squelette AND !z_fond_valide($squelette)) {
 			$squelette = "";
 		  $echafauder = "";
 		}
-	  if ($prepend){
+	  if ($prepend) {
 		  $squelette = substr(find_in_path($prefix_path.$prepend."$fond.$ext"), 0, - strlen(".$ext"));
 	    if ($squelette)
 		    $flux['data'] = $squelette;
@@ -85,18 +85,18 @@ 
 		// gerer les squelettes non trouves
 		// -> router vers les /dist.html
 		// ou scaffolding ou page automatique les contenus
-		if (!$squelette){
+		if (!$squelette) {
 
 			// si on est sur un ?page=XX non trouve
 			if ($flux['args']['contexte'][$page] == $fond 
 				OR $flux['args']['contexte']['type-page'] == $fond
-				OR ($fond=='sommaire' AND !$flux['args']['contexte'][$page])) {
+				OR ($fond == 'sommaire' AND !$flux['args']['contexte'][$page])) {
 
 				// si on est sur un ?page=XX non trouve
 				// se brancher sur contenu/xx si il existe
 				// ou si c'est un objet spip, associe a une table, utiliser le fond homonyme
 				if (!isset($disponible[$fond]))
-					$disponible[$fond] = z_contenu_disponible($prefix_path.$prepend,$z_contenu,$fond,$ext,$echafauder);
+					$disponible[$fond] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $fond, $ext, $echafauder);
 
 				if ($disponible[$fond])
 					$flux['data'] = substr(find_in_path($prefix_path."page.$ext"), 0, - strlen(".$ext"));
@@ -105,43 +105,43 @@ 
 			// echafaudage :
 			// si c'est un fond de contenu d'un objet en base
 			// generer un fond automatique a la volee pour les webmestres
-			elseif (strncmp($fond, "$z_contenu/", strlen($z_contenu)+1)==0){
-				$type = substr($fond,strlen($z_contenu)+1);
-				if (($type=='page') AND isset($flux['args']['contexte'][$page]))
+			elseif (strncmp($fond, "$z_contenu/", strlen($z_contenu) + 1) == 0) {
+				$type = substr($fond, strlen($z_contenu) + 1);
+				if (($type == 'page') AND isset($flux['args']['contexte'][$page]))
 					$type = $flux['args']['contexte'][$page];
 				if (!isset($disponible[$type]))
-					$disponible[$type] = z_contenu_disponible($prefix_path.$prepend,$z_contenu,$type,$ext,$echafauder);
+					$disponible[$type] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $type, $ext, $echafauder);
 				if (is_string($disponible[$type])) {
 					$flux['data'] = $disponible[$type];
 				}
 				elseif ($echafauder
 					AND include_spip('inc/autoriser')
 					AND isset($GLOBALS['visiteur_session']['statut']) // performance
-					AND autoriser('echafauder',$type)
+					AND autoriser('echafauder', $type)
 					AND $is = $disponible[$type]
 					AND is_array($is)) {
-					$flux['data'] = $echafauder($type,$is[0],$is[1],$is[2],$ext);
+					$flux['data'] = $echafauder($type, $is[0], $is[1], $is[2], $ext);
 				}
-				else{
-					$flux['data'] = ($disponible['404'] = z_contenu_disponible($prefix_path.$prepend,$z_contenu,'404',$ext,$echafauder));
+				else {
+					$flux['data'] = ($disponible['404'] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, '404', $ext, $echafauder));
 				}
 			}
 
 			// sinon, si on demande un fond non trouve dans un des autres blocs
 			// et si il y a bien un contenu correspondant ou echafaudable
 			// se rabbatre sur le dist.html du bloc concerne
-			else{
-				if ( $dir = explode('/',$fond)
+			else {
+				if ($dir = explode('/', $fond)
 					AND $dir = reset($dir)
 					AND $dir !== $z_contenu
-					AND in_array($dir,$z_blocs)){
-					$type = substr($fond,strlen("$dir/"));
-					if (($type=='page') AND isset($flux['args']['contexte'][$page]))
+					AND in_array($dir, $z_blocs)) {
+					$type = substr($fond, strlen("$dir/"));
+					if (($type == 'page') AND isset($flux['args']['contexte'][$page]))
 						$type = $flux['args']['contexte'][$page];
-					if ($type!=='page' AND !isset($disponible[$type]))
-						$disponible[$type] = z_contenu_disponible($prefix_path.$prepend,$z_contenu,$type,$ext,$echafauder);
-					if ($type=='page' OR $disponible[$type])
-						$flux['data'] = z_trouver_bloc($prefix_path.$prepend,$dir,'dist',$ext);
+					if ($type !== 'page' AND !isset($disponible[$type]))
+						$disponible[$type] = z_contenu_disponible($prefix_path.$prepend, $z_contenu, $type, $ext, $echafauder);
+					if ($type == 'page' OR $disponible[$type])
+						$flux['data'] = z_trouver_bloc($prefix_path.$prepend, $dir, 'dist', $ext);
 				}
 			}
 			$squelette = $flux['data'];
@@ -151,30 +151,30 @@ 
 		// body-sommaire.html
 		// pour des raisons de perfo, les declinaisons doivent etre dans le
 		// meme dossier que body.html
-		if ($fond=='body' AND substr($squelette,-strlen($fond))==$fond){
+		if ($fond == 'body' AND substr($squelette, -strlen($fond)) == $fond) {
 			if (isset($flux['args']['contexte']['type-page'])
 				AND (
 					(isset($flux['args']['contexte']['composition'])
-					AND file_exists(($f=$squelette."-".$flux['args']['contexte']['type-page']."-".$flux['args']['contexte']['composition']).".$ext"))
+					AND file_exists(($f = $squelette."-".$flux['args']['contexte']['type-page']."-".$flux['args']['contexte']['composition']).".$ext"))
 					OR
-					file_exists(($f=$squelette."-".$flux['args']['contexte']['type-page']).".$ext")
+					file_exists(($f = $squelette."-".$flux['args']['contexte']['type-page']).".$ext")
 					))
 				$flux['data'] = $f;
 		}
-		elseif ($fond=='structure' 
+		elseif ($fond == 'structure' 
 			AND z_sanitize_var_zajax()
 			AND $f = find_in_path($prefix_path.$prepend.'ajax'.".$ext")) {
-			$flux['data'] = substr($f,0,-strlen(".$ext"));
+			$flux['data'] = substr($f, 0, -strlen(".$ext"));
 		}
 		// chercher le fond correspondant a la composition
 		elseif (isset($flux['args']['contexte']['composition'])
-			AND (basename($fond)=='page' OR ($squelette AND substr($squelette,-strlen($fond))==$fond))
-			AND $dir = substr($fond,$prefix_length)
-			AND $dir = explode('/',$dir)
+			AND (basename($fond) == 'page' OR ($squelette AND substr($squelette, -strlen($fond)) == $fond))
+			AND $dir = substr($fond, $prefix_length)
+			AND $dir = explode('/', $dir)
 			AND $dir = reset($dir)
-			AND in_array($dir,$z_blocs)
-			AND $f=find_in_path($prefix_path.$prepend.$fond."-".$flux['args']['contexte']['composition'].".$ext")){
-			$flux['data'] = substr($f,0,-strlen(".$ext"));
+			AND in_array($dir, $z_blocs)
+			AND $f = find_in_path($prefix_path.$prepend.$fond."-".$flux['args']['contexte']['composition'].".$ext")) {
+			$flux['data'] = substr($f, 0, -strlen(".$ext"));
 		}
 	}
 	return $flux;
@@ -186,10 +186,10 @@ 
  * @param bool $espace_prive
  * @return array
  */
-function z_blocs($espace_prive=false) {
+function z_blocs($espace_prive = false) {
 	if ($espace_prive)
-		return (isset($GLOBALS['z_blocs_ecrire'])?$GLOBALS['z_blocs_ecrire']:array('contenu','navigation','extra','head','hierarchie','top'));
-	return (isset($GLOBALS['z_blocs'])?$GLOBALS['z_blocs']:array('contenu'));
+		return (isset($GLOBALS['z_blocs_ecrire']) ? $GLOBALS['z_blocs_ecrire'] : array('contenu', 'navigation', 'extra', 'head', 'hierarchie', 'top'));
+	return (isset($GLOBALS['z_blocs']) ? $GLOBALS['z_blocs'] : array('contenu'));
 }
 
 /**
@@ -203,15 +203,15 @@ 
  * @param bool $echafauder
  * @return mixed
  */
-function z_contenu_disponible($prefix_path,$z_contenu,$type,$ext,$echafauder=true){
-	if ($d = z_trouver_bloc($prefix_path,$z_contenu,$type,$ext))
+function z_contenu_disponible($prefix_path, $z_contenu, $type, $ext, $echafauder = true) {
+	if ($d = z_trouver_bloc($prefix_path, $z_contenu, $type, $ext))
 		return $d;
-	return $echafauder?z_echafaudable($type):false;
+	return $echafauder ? z_echafaudable($type) : false;
 }
 
-function z_fond_valide($squelette){
+function z_fond_valide($squelette) {
 	if (!_ZCORE_EXCLURE_PATH
-		OR !preg_match(',('._ZCORE_EXCLURE_PATH.')/,',$squelette))
+		OR !preg_match(',('._ZCORE_EXCLURE_PATH.')/,', $squelette))
 		return true;
   return false;
 }
@@ -232,11 +232,11 @@ 
  *	extension du squelette
  * @return string
  */
-function z_trouver_bloc($prefix_path,$bloc,$fond,$ext){
+function z_trouver_bloc($prefix_path, $bloc, $fond, $ext) {
 	if (
 		(defined('_ZCORE_BLOC_PREFIX_SKEL') AND $f = find_in_path("$prefix_path$bloc/$bloc.$fond.$ext") AND z_fond_valide($f))
 		OR ($f = find_in_path("$prefix_path$bloc/$fond.$ext") AND z_fond_valide($f))
-		){
+		) {
 		return substr($f, 0, - strlen(".$ext"));
 	}
 	return "";
@@ -249,25 +249,25 @@ 
  * @param string $type
  * @return bool
  */
-function z_echafaudable($type){
+function z_echafaudable($type) {
 	static $pages = null;
 	static $echafaudable = array();
 	if (isset($echafaudable[$type]))
 		return $echafaudable[$type];
-	if (preg_match(',[^\w],',$type))
+	if (preg_match(',[^\w],', $type))
 		return $echafaudable[$type] = false;
 
-	if (test_espace_prive()){
+	if (test_espace_prive()) {
 		if (!function_exists('trouver_objet_exec'))
 			include_spip('inc/pipelines_ecrire');
-		if ($e=trouver_objet_exec($type)){
-			return $echafaudable[$type] = array($e['table'],$e['table_objet_sql'],$e);
+		if ($e = trouver_objet_exec($type)) {
+			return $echafaudable[$type] = array($e['table'], $e['table_objet_sql'], $e);
 		}
 		else {
 			// peut etre c'est un exec=types qui liste tous les objets "type"
-			if (($t=objet_type($type,false))!==$type
-			  AND $e=trouver_objet_exec($t)){
-				return $echafaudable[$type] = array($e['table'],$e['table_objet_sql'],$t);
+			if (($t = objet_type($type, false)) !== $type
+			  AND $e = trouver_objet_exec($t)) {
+				return $echafaudable[$type] = array($e['table'], $e['table_objet_sql'], $t);
 			}
 		}
 	}
@@ -275,13 +275,13 @@ 
 		if (is_null($pages)) {
 			$pages = array();
 			$liste = lister_tables_objets_sql();
-			foreach($liste as $t=>$d)
-				if ($d['page']) $pages[$d['page']] = array($d['table_objet'],$t);
+			foreach ($liste as $t=>$d)
+				if ($d['page']) $pages[$d['page']] = array($d['table_objet'], $t);
 		}
 		if (!isset($pages[$type]))
 			return $echafaudable[$type] = false;
-		if (count($pages[$type])==2){
-			$trouver_table = charger_fonction('trouver_table','base');
+		if (count($pages[$type]) == 2) {
+			$trouver_table = charger_fonction('trouver_table', 'base');
 			$pages[$type][] = $trouver_table(reset($pages[$type]));
 		}
 		return $echafaudable[$type] = $pages[$type];
@@ -302,7 +302,7 @@ 
  * @param string $ext
  * @return string
  */
-function prive_echafauder_dist($exec,$table,$table_sql,$desc_exec,$ext){
+function prive_echafauder_dist($exec, $table, $table_sql, $desc_exec, $ext) {
 	$scaffold = "";
 
 	// page objet ou objet_edit
@@ -310,10 +310,10 @@ 
 		$type = $desc_exec['type'];
 		$primary = $desc_exec['id_table_objet'];
 
-		if ($desc_exec['edition']===false)
+		if ($desc_exec['edition'] === false)
 			$fond = "objet";
 		else {
-			$trouver_table = charger_fonction('trouver_table','base');
+			$trouver_table = charger_fonction('trouver_table', 'base');
 			$desc = $trouver_table($table_sql);
 			if (isset($desc['field']['id_rubrique']))
 				$fond = 'objet_edit';
@@ -325,22 +325,22 @@ 
 		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/".$fond.",objet=".$type.",id_objet=#".strtoupper($primary).",env}>";
 	}
 	// page objets
-	elseif($type = $desc_exec AND strpos($type,"/")===false){
+	elseif ($type = $desc_exec AND strpos($type, "/") === false) {
 		$dir = z_blocs(test_espace_prive());
 		$dir = reset($dir);
 		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/objets,objet=".$type.",env} />";
 	}
 	// morceau d'objet : on fournit le fond de sibstitution dans $desc_exec
 	// et objet et tire de $table
-	elseif($fond = $desc_exec){
+	elseif ($fond = $desc_exec) {
 		$dir = md5(dirname($fond));
 		$scaffold = "<INCLURE{fond=$fond,objet=".objet_type($table).",env} />";
 	}
 
-	$base_dir = sous_repertoire(_DIR_CACHE,"scaffold",false);
-	$base_dir = sous_repertoire($base_dir,$dir,false);
+	$base_dir = sous_repertoire(_DIR_CACHE, "scaffold", false);
+	$base_dir = sous_repertoire($base_dir, $dir, false);
 	$f = $base_dir."$exec";
-	ecrire_fichier("$f.$ext",$scaffold);
+	ecrire_fichier("$f.$ext", $scaffold);
 	return $f;
 }
 
@@ -348,11 +348,11 @@ 
  * Recuperer et verifier var_zajax si demande dans l'url
  * @return bool|string
  */
-function z_sanitize_var_zajax(){
+function z_sanitize_var_zajax() {
 	$z_ajax = _request('var_zajax');
 	if (!$z_ajax) return false;
 	if (!$z_blocs = z_blocs(test_espace_prive())
-	  OR !in_array($z_ajax,$z_blocs)) {
+	  OR !in_array($z_ajax, $z_blocs)) {
 		set_request('var_zajax'); // enlever cette demande incongrue
 		$z_ajax = false;
 	}

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/composer.php

Spacing +146 added lines, -146 removed lines

@@ -31,7 +31,7 @@ 
 # Toutefois pour 2. et 3. preferer la technique de la surcharge
 
 // http://doc.spip.org/@public_composer_dist
-function public_composer_dist($squelette, $mime_type, $gram, $source, $connect='') {
+function public_composer_dist($squelette, $mime_type, $gram, $source, $connect = '') {
 
 	$nom = calculer_nom_fonction_squel($squelette, $mime_type, $connect);
 
@@ -41,10 +41,10 @@ 
 	if (defined('_VAR_MODE') AND _VAR_MODE == 'debug')
 		$GLOBALS['debug_objets']['courant'] = $nom;
 
-	$phpfile = sous_repertoire(_DIR_SKELS,'',false,true) . $nom . '.php';
+	$phpfile = sous_repertoire(_DIR_SKELS, '', false, true).$nom.'.php';
 
 	// si squelette est deja compile et perenne, le charger
-	if (!squelette_obsolete($phpfile, $source)){
+	if (!squelette_obsolete($phpfile, $source)) {
 		include_once $phpfile;
 		#if (!squelette_obsolete($phpfile, $source)
 		#  AND lire_fichier ($phpfile, $skel_code,
@@ -54,7 +54,7 @@ 
 		#}
 	}
 
-	if (file_exists($lib = $squelette . '_fonctions'.'.php')){
+	if (file_exists($lib = $squelette.'_fonctions'.'.php')) {
 		include_once $lib;
 	}
 
@@ -63,7 +63,7 @@ 
 	if (function_exists($nom)) return $nom;
 
 	// charger le source, si possible, et compiler 
-	if (lire_fichier ($source, $skel)) {
+	if (lire_fichier($source, $skel)) {
 		$compiler = charger_fonction('compiler', 'public');
 		$skel_code = $compiler($skel, $nom, $gram, $source, $connect);
 	}
@@ -71,9 +71,9 @@ 
 	// Ne plus rien faire si le compilateur n'a pas pu operer.
 	if (!$skel_code) return false;
 
-	foreach($skel_code as $id => $boucle) {
+	foreach ($skel_code as $id => $boucle) {
 		$f = $boucle->return;
-		if (@eval("return true; $f ;") ===  false) {
+		if (@eval("return true; $f ;") === false) {
 		// Code syntaxiquement faux (critere etc mal programme')
 			$msg = _T('zbug_erreur_compilation');
 			erreur_squelette($msg, $boucle);
@@ -102,12 +102,12 @@ 
 	if (defined('_VAR_MODE') AND _VAR_MODE == 'debug') {
 
 		// Tracer ce qui vient d'etre compile
-		$GLOBALS['debug_objets']['code'][$nom . 'tout'] = $code;
+		$GLOBALS['debug_objets']['code'][$nom.'tout'] = $code;
 
 		// si c'est ce que demande le debusqueur, lui passer la main
 		if ($GLOBALS['debug_objets']['sourcefile']
 		AND (_request('var_mode_objet') == $nom)
-		AND (_request('var_mode_affiche') == 'code')  )
+		AND (_request('var_mode_affiche') == 'code'))
 			erreur_squelette();
 	}
 	return $nom ? $nom : false;
@@ -117,17 +117,17 @@ 
 {
 
 	// Le dernier index est '' (fonction principale)
-	$noms = substr(join (', ', array_keys($boucles)), 0, -2);
+	$noms = substr(join(', ', array_keys($boucles)), 0, -2);
 	if (CODE_COMMENTE)
 	$code = "
 /*
  * Squelette : $sourcefile
  * Date :      ".gmdate("D, d M Y H:i:s", @filemtime($sourcefile))." GMT
  * Compile :   ".gmdate("D, d M Y H:i:s", time())." GMT
- * " . (!$boucles ?  "Pas de boucle" :	("Boucles :   " . $noms)) ."
+ * " . (!$boucles ? "Pas de boucle" : ("Boucles :   ".$noms))."
  */ " ;
 
-	$code = '<'. "?php\n" . $code . join('', $boucles)  . "\n?" .'>';
+	$code = '<'."?php\n".$code.join('', $boucles)."\n?".'>';
 	if (!defined('_VAR_NOCACHE') OR !_VAR_NOCACHE)
 		ecrire_fichier($phpfile, $code);
 	return $code;
@@ -139,16 +139,16 @@ 
 	static $date_change = null;
 	// ne verifier la date de mes_fonctions et mes_options qu'une seule fois
 	// par hit
-	if (is_null($date_change)){
+	if (is_null($date_change)) {
 		if (@file_exists($fonc = 'mes_fonctions.php'))
 			$date_change = @filemtime($fonc); # compatibilite
 		if (defined('_FILE_OPTIONS'))
-			$date_change = max($date_change,@filemtime(_FILE_OPTIONS));
+			$date_change = max($date_change, @filemtime(_FILE_OPTIONS));
 	}
 	return (
-		(defined('_VAR_MODE') AND in_array(_VAR_MODE, array('recalcul','preview','debug')))
+		(defined('_VAR_MODE') AND in_array(_VAR_MODE, array('recalcul', 'preview', 'debug')))
 		OR !@file_exists($skel)
-		OR ((@file_exists($squelette)?@filemtime($squelette):0)
+		OR ((@file_exists($squelette) ? @filemtime($squelette) : 0)
 			> ($date = @filemtime($skel)))
 		OR ($date_change > $date)
 	);
@@ -156,41 +156,41 @@ 
 
 // Activer l'invalideur de session
 // http://doc.spip.org/@invalideur_session
-function invalideur_session(&$Cache, $code=NULL) {
-	$Cache['session']=spip_session();
+function invalideur_session(&$Cache, $code = NULL) {
+	$Cache['session'] = spip_session();
 	return $code;
 }
 
 
 // http://doc.spip.org/@analyse_resultat_skel
-function analyse_resultat_skel($nom, $cache, $corps, $source='') {
+function analyse_resultat_skel($nom, $cache, $corps, $source = '') {
 	static $filtres = array();
 	$headers = array();
 
 	// Recupere les < ?php header('Xx: y'); ? > pour $page['headers']
 	// note: on essaie d'attrapper aussi certains de ces entetes codes
 	// "a la main" dans les squelettes, mais evidemment sans exhaustivite
-	if (stripos($corps,'header')!==false
+	if (stripos($corps, 'header') !== false
 		AND preg_match_all(
 	'/(<[?]php\s+)@?header\s*\(\s*.([^:\'"]*):?\s*([^)]*)[^)]\s*\)\s*[;]?\s*[?]>/ims',
-	$corps, $regs, PREG_SET_ORDER)){
+	$corps, $regs, PREG_SET_ORDER)) {
 		foreach ($regs as $r) {
 			$corps = str_replace($r[0], '', $corps);
 			# $j = Content-Type, et pas content-TYPE.
 			$j = join('-', array_map('ucwords', explode('-', strtolower($r[2]))));
 
-			if ($j=='X-Spip-Filtre' AND isset($headers[$j]))
-				$headers[$j].="|".$r[3];
+			if ($j == 'X-Spip-Filtre' AND isset($headers[$j]))
+				$headers[$j] .= "|".$r[3];
 			else
 				$headers[$j] = $r[3];
 		}
 	}
 	// S'agit-il d'un resultat constant ou contenant du code php
 	$process_ins = (
-		strpos($corps,'<'.'?') === false
+		strpos($corps, '<'.'?') === false
 		OR
-		 (strpos($corps,'<'.'?xml')!==false AND
-		  strpos(str_replace('<'.'?xml', '', $corps),'<'.'?') === false)
+		 (strpos($corps, '<'.'?xml') !== false AND
+		  strpos(str_replace('<'.'?xml', '', $corps), '<'.'?') === false)
 	)
 		? 'html'
 		: 'php';
@@ -206,11 +206,11 @@ 
 
 	// traiter #FILTRE{} et filtres
   if (!isset($filtres[$nom])) {
-	  $filtres[$nom] = pipeline('declarer_filtres_squelettes',array('args'=>$skel,'data'=>array()));
+	  $filtres[$nom] = pipeline('declarer_filtres_squelettes', array('args'=>$skel, 'data'=>array()));
   }
 	if (count($filtres[$nom]) OR (isset($headers['X-Spip-Filtre']) AND strlen($headers['X-Spip-Filtre']))) {
 		include_spip('public/sandbox');
-		$corps = sandbox_filtrer_squelette($skel,$corps,strlen($headers['X-Spip-Filtre'])?explode('|', $headers['X-Spip-Filtre']):array(),$filtres[$nom]);
+		$corps = sandbox_filtrer_squelette($skel, $corps, strlen($headers['X-Spip-Filtre']) ? explode('|', $headers['X-Spip-Filtre']) : array(), $filtres[$nom]);
 		unset($headers['X-Spip-Filtre']);
 	}
 
@@ -238,7 +238,7 @@ 
 function filtre_introduction_dist($descriptif, $texte, $longueur, $connect) {
 	// Si un descriptif est envoye, on l'utilise directement
 	if (strlen($descriptif))
-		return propre($descriptif,$connect);
+		return propre($descriptif, $connect);
 
 	// De preference ce qui est marque <intro>...</intro>
 	$intro = '';
@@ -266,22 +266,22 @@ 
 		$texte = $intro;
 
 	else
-	if (strpos("\n".$texte, "\n|")===false
-	  AND strlen($texte) > 2.5*$longueur){
-		if (strpos($texte,"<multi")!==false)
+	if (strpos("\n".$texte, "\n|") === false
+	  AND strlen($texte) > 2.5 * $longueur) {
+		if (strpos($texte, "<multi") !== false)
 			$texte = extraire_multi($texte);
-		$texte = couper($texte, 2*$longueur);
+		$texte = couper($texte, 2 * $longueur);
 	}
 
 	// ne pas tenir compte des notes
 	if ($notes = charger_fonction('notes', 'inc', true))
-		$notes('','empiler');
+		$notes('', 'empiler');
 	// Supprimer les modèles avant le propre afin d'éviter qu'ils n'ajoutent du texte indésirable
 	// dans l'introduction.
 	$texte = supprime_img($texte, '');
-	$texte = propre($texte,$connect);
+	$texte = propre($texte, $connect);
 	if ($notes)
-		$notes('','depiler');
+		$notes('', 'depiler');
 
 	if (!defined('_INTRODUCTION_SUITE')) define('_INTRODUCTION_SUITE', '&nbsp;(...)');
 	$texte = couper($texte, $longueur, _INTRODUCTION_SUITE);
@@ -301,7 +301,7 @@ 
 // elles sont traitees comme des inclusions
 // http://doc.spip.org/@synthetiser_balise_dynamique
 
-define('CODE_INCLURE_BALISE', '<' . '?php 
+define('CODE_INCLURE_BALISE', '<'.'?php 
 include_once("./" . _DIR_RACINE . "%s");
 if ($lang_select = "%s") $lang_select = lang_select($lang_select);
 inserer_balise_dynamique(balise_%s_dyn(%s), array(%s));
@@ -313,7 +313,7 @@ 
 function synthetiser_balise_dynamique($nom, $args, $file, $context_compil) {
 	$r = sprintf(CODE_INCLURE_BALISE,
 	       $file,
-	       $context_compil[4]?$context_compil[4]:'',
+	       $context_compil[4] ? $context_compil[4] : '',
 	       $nom,
 	       join(', ', array_map('argumenter_squelette', $args)),
 	       join(', ', array_map('_q', $context_compil)));
@@ -324,38 +324,38 @@ 
 function argumenter_squelette($v) {
 
 	if (!is_array($v))
-		return "'" . texte_script($v) . "'";
+		return "'".texte_script($v)."'";
 	else {
 		$out = array();
-		foreach($v as $k=>$val) 
-			$out [] = argumenter_squelette($k) . '=>' . argumenter_squelette($val);
-	  return 'array(' . join(", ", $out) . ')';
+		foreach ($v as $k=>$val) 
+			$out [] = argumenter_squelette($k).'=>'.argumenter_squelette($val);
+	  return 'array('.join(", ", $out).')';
 	}
 }
 
 // verifier leurs arguments et filtres, et calculer le code a inclure
 // http://doc.spip.org/@executer_balise_dynamique
 function executer_balise_dynamique($nom, $args, $context_compil) {
-	$p = strpos($nom,"_");
+	$p = strpos($nom, "_");
 	$nomfonction = $nom;
-	$nomfonction_generique = substr($nom,0,$p+1);
-	if (!$file = include_spip("balise/". strtolower($nomfonction))) {
+	$nomfonction_generique = substr($nom, 0, $p + 1);
+	if (!$file = include_spip("balise/".strtolower($nomfonction))) {
 		// pas de fichier associe, passer au traitement generique
-		$file = include_spip("balise/" .strtolower($nomfonction_generique));
+		$file = include_spip("balise/".strtolower($nomfonction_generique));
 		if ($file) {
 			// et injecter en premier arg le nom de la balise 
-			array_unshift($args,$nom);
+			array_unshift($args, $nom);
 			// et passer sur la fonction generique pour la suite
 			$nomfonction = $nomfonction_generique;
 		}
 		else {
-			$msg = array('zbug_balise_inexistante',array('from'=>'CVT','balise'=>$nom));
+			$msg = array('zbug_balise_inexistante', array('from'=>'CVT', 'balise'=>$nom));
 			erreur_squelette($msg, $context_compil);
 			return '';
 		}
 	}
 	// Y a-t-il une fonction de traitement des arguments ?
-	$f = 'balise_' . $nomfonction . '_stat';
+	$f = 'balise_'.$nomfonction.'_stat';
 
 	$r = !function_exists($f) ? $args : $f($args, $context_compil); 
 
@@ -363,61 +363,61 @@ 
 
 	// verifier que la fonction dyn est la, 
 	// sinon se replier sur la generique si elle existe
-	if (!function_exists('balise_' . $nomfonction . '_dyn')) {
-		$file = include_spip("balise/" .strtolower($nomfonction_generique));
-		if (function_exists('balise_' . $nomfonction_generique . '_dyn')) {
+	if (!function_exists('balise_'.$nomfonction.'_dyn')) {
+		$file = include_spip("balise/".strtolower($nomfonction_generique));
+		if (function_exists('balise_'.$nomfonction_generique.'_dyn')) {
 			// et lui injecter en premier arg le nom de la balise 
-			array_unshift($r,$nom);
+			array_unshift($r, $nom);
 			$nomfonction = $nomfonction_generique;
 		} else {
-			$msg = array('zbug_balise_inexistante',array('from'=>'CVT','balise'=>$nom));
+			$msg = array('zbug_balise_inexistante', array('from'=>'CVT', 'balise'=>$nom));
 			erreur_squelette($msg, $context_compil);
 			return '';
 		}
 	}
 
 	if (!_DIR_RESTREINT) 
-		$file = _DIR_RESTREINT_ABS . $file;
+		$file = _DIR_RESTREINT_ABS.$file;
 	return synthetiser_balise_dynamique($nomfonction, $r, $file, $context_compil);
 }
 
 // http://doc.spip.org/@lister_objets_avec_logos
-function lister_objets_avec_logos ($type) {
+function lister_objets_avec_logos($type) {
 	global $formats_logos;
 	$logos = array();
 	$chercher_logo = charger_fonction('chercher_logo', 'inc');
 	$type = '/'
 	. type_du_logo($type)
 	. "on(\d+)\.("
-	. join('|',$formats_logos)
+	. join('|', $formats_logos)
 	. ")$/";
 
 	if ($d = @opendir(_DIR_LOGOS)) {
-		while($f = readdir($d)) {
+		while ($f = readdir($d)) {
 			if (preg_match($type, $f, $r))
 				$logos[] = $r[1];
 		}
 	}
 	@closedir($d);
-	return join(',',$logos);
+	return join(',', $logos);
 }
 
 // fonction appelee par la balise #NOTES
 // Renvoyer l'etat courant des notes, le purger et en preparer un nouveau
 // http://doc.spip.org/@calculer_notes
 function calculer_notes() {
-	$r='';
+	$r = '';
 	if ($notes = charger_fonction('notes', 'inc', true)) {
 		$r = $notes(array());
-		$notes('','depiler');
-		$notes('','empiler');
+		$notes('', 'depiler');
+		$notes('', 'empiler');
 	}
 	return $r;
 }
 
 // Selectionner la langue de l'objet dans la boucle, sauf dans les
 // cas ou il ne le faut pas :-)
-function lang_select_public($lang, $lang_select, $titre=null) {
+function lang_select_public($lang, $lang_select, $titre = null) {
 	// Cas 1. forcer_lang = true et pas de critere {lang_select}
 	if (isset($GLOBALS['forcer_lang']) AND $GLOBALS['forcer_lang']
 	AND $lang_select !== 'oui')
@@ -447,9 +447,9 @@ 
 function nettoyer_env_doublons($envd) {
 	foreach ($envd as $table => $liste) {
 		$n = '';
-		foreach(explode(',',$liste) as $val) {
+		foreach (explode(',', $liste) as $val) {
 			if ($a = intval($val) AND $val === strval($a))
-				$n.= ','.$val;
+				$n .= ','.$val;
 		}
 		if (strlen($n))
 			$envd[$table] = $n;
@@ -460,33 +460,33 @@ 
 }
 
 // http://doc.spip.org/@match_self
-function match_self($w){
+function match_self($w) {
 	if (is_string($w)) return false;
 	if (is_array($w)) {
-		if (in_array(reset($w),array("SELF","SUBSELECT"))) return $w;
-		foreach(array_filter($w,'is_array') as $sw)
-			if ($m=match_self($sw)) return $m;
+		if (in_array(reset($w), array("SELF", "SUBSELECT"))) return $w;
+		foreach (array_filter($w, 'is_array') as $sw)
+			if ($m = match_self($sw)) return $m;
 	}
 	return false;
 }
 // http://doc.spip.org/@remplace_sous_requete
-function remplace_sous_requete($w,$sousrequete){
+function remplace_sous_requete($w, $sousrequete) {
 	if (is_array($w)) {
-		if (in_array(reset($w),array("SELF","SUBSELECT"))) return $sousrequete;
-		foreach($w as $k=>$sw)
-			$w[$k] = remplace_sous_requete($sw,$sousrequete);
+		if (in_array(reset($w), array("SELF", "SUBSELECT"))) return $sousrequete;
+		foreach ($w as $k=>$sw)
+			$w[$k] = remplace_sous_requete($sw, $sousrequete);
 	}
 	return $w;
 }
 // http://doc.spip.org/@trouver_sous_requetes
-function trouver_sous_requetes($where){
+function trouver_sous_requetes($where) {
 	$where_simples = array();
 	$where_sous = array();
-	foreach($where as $k=>$w){
+	foreach ($where as $k=>$w) {
 		if (match_self($w)) $where_sous[$k] = $w;
 		else $where_simples[$k] = $w;
 	}
-	return array($where_simples,$where_sous);
+	return array($where_simples, $where_sous);
 }
 
 
@@ -510,42 +510,42 @@ 
  * @param bool $requeter
  * @return resource
  */
-function calculer_select ($select = array(), $from = array(), 
+function calculer_select($select = array(), $from = array(), 
 			$from_type = array(),
-      $where = array(), $join=array(),
+      $where = array(), $join = array(),
 			$groupby = array(), $orderby = array(), $limit = '',
-			$having=array(), $table = '', $id = '', $serveur='', $requeter=true) {
+			$having = array(), $table = '', $id = '', $serveur = '', $requeter = true) {
 
 	// retirer les criteres vides:
 	// {X ?} avec X absent de l'URL
 	// {par #ENV{X}} avec X absent de l'URL
 	// IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil)
 	$menage = false;
-	foreach($where as $k => $v) { 
-		if (is_array($v)){
-			if ((count($v)>=2) && ($v[0]=='REGEXP') && ($v[2]=="'.*'")) $op= false;
-			elseif ((count($v)>=2) && ($v[0]=='LIKE') && ($v[2]=="'%'")) $op= false;
+	foreach ($where as $k => $v) { 
+		if (is_array($v)) {
+			if ((count($v) >= 2) && ($v[0] == 'REGEXP') && ($v[2] == "'.*'")) $op = false;
+			elseif ((count($v) >= 2) && ($v[0] == 'LIKE') && ($v[2] == "'%'")) $op = false;
 			else $op = $v[0] ? $v[0] : $v;
 		} else $op = $v;
-		if ((!$op) OR ($op==1) OR ($op=='0=0')) {
+		if ((!$op) OR ($op == 1) OR ($op == '0=0')) {
 			unset($where[$k]);
 			$menage = true;
 		}
 	}
 
 	// evacuer les eventuels groupby vide issus d'un calcul dynamique
-	$groupby = array_diff($groupby,array(''));
+	$groupby = array_diff($groupby, array(''));
 
 	// remplacer les sous requetes recursives au calcul
-	list($where_simples,$where_sous) = trouver_sous_requetes($where);
-	foreach($where_sous as $k=>$w) {
+	list($where_simples, $where_sous) = trouver_sous_requetes($where);
+	foreach ($where_sous as $k=>$w) {
 		$menage = true;
 		// on recupere la sous requete 
 		$sous = match_self($w);
-		if ($sous[0]=='SELF') {
+		if ($sous[0] == 'SELF') {
 			// c'est une sous requete identique a elle meme sous la forme (SELF,$select,$where)
-			array_push($where_simples,$sous[2]);
-			$wheresub = array($sous[2],'0=0'); // pour accepter une string et forcer a faire le menage car on a surement simplifie select et where
+			array_push($where_simples, $sous[2]);
+			$wheresub = array($sous[2], '0=0'); // pour accepter une string et forcer a faire le menage car on a surement simplifie select et where
 			$jsub = $join;
 			// trouver les jointures utiles a
 			// reinjecter dans le where de la sous requete les conditions supplementaires des jointures qui y sont mentionnees
@@ -553,50 +553,50 @@ 
 			// on construit le where une fois, puis on ajoute les where complentaires si besoin, et on reconstruit le where en fonction
 			$i = 0;
 			do {
-				$where[$k] = remplace_sous_requete($w,"(".calculer_select(
+				$where[$k] = remplace_sous_requete($w, "(".calculer_select(
 				array($sous[1]." AS id"),
 				$from,
 				$from_type,
 				$wheresub,
 				$jsub,
-				array(),array(),'',
-				$having,$table,$id,$serveur,false).")");
-				if (!$i){
+				array(), array(), '',
+				$having, $table, $id, $serveur, false).")");
+				if (!$i) {
 					$i = 1;
 					$wherestring = calculer_where_to_string($where[$k]);
-					foreach ($join as $cle=>$wj){
-						if (count($wj)==4
-							AND strpos($wherestring,"{$cle}.")!==FALSE
-						){
+					foreach ($join as $cle=>$wj) {
+						if (count($wj) == 4
+							AND strpos($wherestring, "{$cle}.") !== FALSE
+						) {
 							$i = 0;
 							$wheresub[] = $wj[3];
 							unset($jsub[$cle][3]);
 						}
 					}
 				}
-			} while ($i++<1);
+			} while ($i++ < 1);
 		}
-		if ($sous[0]=='SUBSELECT') {
+		if ($sous[0] == 'SUBSELECT') {
 			// c'est une sous requete explicite sous la forme identique a sql_select : (SUBSELECT,$select,$from,$where,$groupby,$orderby,$limit,$having)
-			array_push($where_simples,$sous[3]); // est-ce utile dans ce cas ?
-			$where[$k] = remplace_sous_requete($w,"(".calculer_select(
+			array_push($where_simples, $sous[3]); // est-ce utile dans ce cas ?
+			$where[$k] = remplace_sous_requete($w, "(".calculer_select(
 			$sous[1], # select
 			$sous[2], #from
 			array(), #from_type
-			$sous[3]?(is_array($sous[3])?$sous[3]:array($sous[3])):array(), #where, qui peut etre de la forme string comme dans sql_select
+			$sous[3] ? (is_array($sous[3]) ? $sous[3] : array($sous[3])) : array(), #where, qui peut etre de la forme string comme dans sql_select
 			array(), #join
-			$sous[4]?$sous[4]:array(), #groupby
-			$sous[5]?$sous[5]:array(), #orderby
+			$sous[4] ? $sous[4] : array(), #groupby
+			$sous[5] ? $sous[5] : array(), #orderby
 			$sous[6], #limit
-			$sous[7]?$sous[7]:array(), #having
-			$table,$id,$serveur,false
+			$sous[7] ? $sous[7] : array(), #having
+			$table, $id, $serveur, false
 			).")");
 		}
 		array_pop($where_simples);
 	}
 
-	foreach($having as $k => $v) { 
-		if ((!$v) OR ($v==1) OR ($v=='0=0')) {
+	foreach ($having as $k => $v) { 
+		if ((!$v) OR ($v == 1) OR ($v == '0=0')) {
 			unset($having[$k]);
 		}
 	}
@@ -609,13 +609,13 @@ 
 	$afrom = array();
 	$equiv = array();
 	$k = count($join);
-	foreach(array_reverse($join,true) as $cledef=>$j) {
+	foreach (array_reverse($join, true) as $cledef=>$j) {
 		$cle = $cledef;
 		// le format de join est :
 		// array(table depart, cle depart [,cle arrivee[,condition optionnelle and ...]])
-		if (count($join[$cle])==2) $join[$cle][] = $join[$cle][1];
-		if (count($join[$cle])==3) $join[$cle][] = '';
-		list($t,$c,$carr,$and) = $join[$cle];
+		if (count($join[$cle]) == 2) $join[$cle][] = $join[$cle][1];
+		if (count($join[$cle]) == 3) $join[$cle][] = '';
+		list($t, $c, $carr, $and) = $join[$cle];
 		// si le nom de la jointure n'a pas ete specifiee, on prend Lx avec x sont rang dans la liste
 		// pour compat avec ancienne convention
 		if (is_numeric($cle))
@@ -628,13 +628,13 @@ 
 		OR calculer_jointnul($cle, $where_simples)) {
 			// corriger les references non explicites dans select
 			// ou groupby
-			foreach($select as $i=>$s) {
+			foreach ($select as $i=>$s) {
 				if ($s == $c) {
 					$select[$i] = "$cle.$c AS $c";
 					break;
 				}
 			}
-			foreach($groupby as $i=>$g) {
+			foreach ($groupby as $i=>$g) {
 				if ($g == $c) {
 					$groupby[$i] = "$cle.$c";
 					break;
@@ -643,22 +643,22 @@ 
 			// on garde une ecriture decomposee pour permettre une simplification ulterieure si besoin
 			// sans recours a preg_match
 			// un implode(' ',..) est fait dans reinjecte_joint un peu plus bas
-			$afrom[$t][$cle] = array("\n" .
-				(isset($from_type[$cle])?$from_type[$cle]:"INNER")." JOIN",
+			$afrom[$t][$cle] = array("\n".
+				(isset($from_type[$cle]) ? $from_type[$cle] : "INNER")." JOIN",
 				$from[$cle],
 				"AS $cle",
 				"ON (",
 				"$cle.$c",
 				"=",
 				"$t.$carr",
-				($and ? "AND ". $and:"") .
+				($and ? "AND ".$and : "").
 				")");
-			if (isset($afrom[$cle])){
+			if (isset($afrom[$cle])) {
 				$afrom[$t] = $afrom[$t] + $afrom[$cle];
 				unset($afrom[$cle]);
 			}
-			$equiv[]= $carr;
-		} else { unset($join[$cledef]);}
+			$equiv[] = $carr;
+		} else { unset($join[$cledef]); }
 		unset($from[$cle]);
 		$k--;
 	}
@@ -679,9 +679,9 @@ 
 		// penser a regarder aussi la clause groubpy pour ne pas simplifier abusivement
 		// <BOUCLE10(EVENEMENTS){id_rubrique} />#TOTAL_BOUCLE<//B10>
 		
-	  list($t,$c) = each($from);
+	  list($t, $c) = each($from);
 	  reset($from);
-	  $e = '/\b(' . "$t\\." . join("|" . $t . '\.', $equiv) . ')\b/';
+	  $e = '/\b('."$t\\.".join("|".$t.'\.', $equiv).')\b/';
 	  if (!(strpos($t, ' ') OR // jointure des le depart cf boucle_doc
 		 calculer_jointnul($t, $select, $e) OR
 		 calculer_jointnul($t, $join, $e) OR
@@ -691,7 +691,7 @@ 
 		 calculer_jointnul($t, $having, $e))
 		 && count($afrom[$t])) {
 		 	reset($afrom[$t]);
-		 	list($nt,$nfrom) = each($afrom[$t]);
+		 	list($nt, $nfrom) = each($afrom[$t]);
 	    unset($from[$t]);
 	    $from[$nt] = $nfrom[1];
 	    unset($afrom[$t][$nt]);
@@ -701,21 +701,21 @@ 
 	    $t = $nfrom[4];
 	    $alias = "";
 	    // verifier que les deux cles sont homonymes, sinon installer un alias dans le select
-	    $oldcle = explode('.',$nfrom[6]);
+	    $oldcle = explode('.', $nfrom[6]);
 	    $oldcle = end($oldcle);
-	    $newcle = explode('.',$nfrom[4]);
+	    $newcle = explode('.', $nfrom[4]);
 	    $newcle = end($newcle);
-	    if ($newcle!=$oldcle){
+	    if ($newcle != $oldcle) {
 		    // si l'ancienne cle etait deja dans le select avec un AS
 		    // reprendre simplement ce AS
 		    $as = '/\b'.preg_quote($nfrom[6]).'\s+(AS\s+\w+)\b/';
-		    if (preg_match($as,implode(',',$select),$m)){
+		    if (preg_match($as, implode(',', $select), $m)) {
 			    $alias = "";
 		    }
 		    else
 					$alias = ", ".$nfrom[4]." AS $oldcle";
 	    }
-	    $select = remplacer_jointnul($t . $alias, $select, $e);
+	    $select = remplacer_jointnul($t.$alias, $select, $e);
 	    $join = remplacer_jointnul($t, $join, $e);
 	    $where = remplacer_jointnul($t, $where, $e);
 	    $having = remplacer_jointnul($t, $having, $e);
@@ -724,7 +724,7 @@ 
 	  }
 	  $from = reinjecte_joint($afrom, $from);
 	}
-	$GLOBALS['debug']['aucasou'] = array ($table, $id, $serveur, $requeter);
+	$GLOBALS['debug']['aucasou'] = array($table, $id, $serveur, $requeter);
 	$r = sql_select($select, $from, $where,
 		$groupby, array_filter($orderby), $limit, $having, $serveur, $requeter);
 	unset($GLOBALS['debug']['aucasou']);
@@ -737,7 +737,7 @@ 
  * @param string $join
  * @return string
  */
-function calculer_where_to_string($v, $join = 'AND'){
+function calculer_where_to_string($v, $join = 'AND') {
 	if (empty($v))
 		return '';
 
@@ -746,9 +746,9 @@ 
 	} else {
 		$exp = "";
 		if (strtoupper($join) === 'AND')
-			return $exp . join(" $join ", array_map('calculer_where_to_string', $v));
+			return $exp.join(" $join ", array_map('calculer_where_to_string', $v));
 		else
-			return $exp . join($join, $v);
+			return $exp.join($join, $v);
 	}
 }
 
@@ -756,13 +756,13 @@ 
 //condition suffisante (mais non necessaire) pour qu'une table soit utile
 
 // http://doc.spip.org/@calculer_jointnul
-function calculer_jointnul($cle, $exp, $equiv='')
+function calculer_jointnul($cle, $exp, $equiv = '')
 {
 	if (!is_array($exp)) {
 		if ($equiv) $exp = preg_replace($equiv, '', $exp);
 		return preg_match("/\\b$cle\\./", $exp);
 	} else {
-		foreach($exp as $v) {
+		foreach ($exp as $v) {
 			if (calculer_jointnul($cle, $v, $equiv)) return true;
 		}
 		return false;
@@ -773,11 +773,11 @@ 
 function reinjecte_joint($afrom, $from)
 {
 	  $from_synth = array();
-	  foreach($from as $k=>$v){
-	  	$from_synth[$k]=$from[$k];
+	  foreach ($from as $k=>$v) {
+	  	$from_synth[$k] = $from[$k];
 	  	if (isset($afrom[$k])) {
-	  		foreach($afrom[$k] as $kk=>$vv) $afrom[$k][$kk] = implode(' ',$afrom[$k][$kk]);
-	  		$from_synth["$k@"]= implode(' ',$afrom[$k]);
+	  		foreach ($afrom[$k] as $kk=>$vv) $afrom[$k][$kk] = implode(' ', $afrom[$k][$kk]);
+	  		$from_synth["$k@"] = implode(' ', $afrom[$k]);
 	  		unset($afrom[$k]);
 	  	}
 	  }
@@ -785,12 +785,12 @@ 
 }
 
 // http://doc.spip.org/@remplacer_jointnul
-function remplacer_jointnul($cle, $exp, $equiv='')
+function remplacer_jointnul($cle, $exp, $equiv = '')
 {
 	if (!is_array($exp)) {
 		return preg_replace($equiv, $cle, $exp);
 	} else {
-		foreach($exp as $k => $v) {
+		foreach ($exp as $k => $v) {
 		  $exp[$k] = remplacer_jointnul($cle, $v, $equiv);
 		}
 		return $exp;
@@ -799,14 +799,14 @@ 
 
 // calcul du nom du squelette
 // http://doc.spip.org/@calculer_nom_fonction_squel
-function calculer_nom_fonction_squel($skel, $mime_type='html', $connect='')
+function calculer_nom_fonction_squel($skel, $mime_type = 'html', $connect = '')
 {
 	// ne pas doublonner les squelette selon qu'ils sont calcules depuis ecrire/ ou depuis la racine
-	if ($l=strlen(_DIR_RACINE) AND strncmp($skel,_DIR_RACINE,$l)==0)
-		$skel = substr($skel,strlen(_DIR_RACINE));
+	if ($l = strlen(_DIR_RACINE) AND strncmp($skel, _DIR_RACINE, $l) == 0)
+		$skel = substr($skel, strlen(_DIR_RACINE));
 	return $mime_type
-	. (!$connect ?  '' : preg_replace('/\W/',"_", $connect)) . '_'
-	. md5($GLOBALS['spip_version_code'] . ' * ' . $skel . (isset($GLOBALS['marqueur_skel'])?'*'.$GLOBALS['marqueur_skel']:''));
+	. (!$connect ? '' : preg_replace('/\W/', "_", $connect)).'_'
+	. md5($GLOBALS['spip_version_code'].' * '.$skel.(isset($GLOBALS['marqueur_skel']) ? '*'.$GLOBALS['marqueur_skel'] : ''));
 }
 
 ?>

ecrire/public/tracer.php

Spacing +18 added lines, -18 removed lines

@@ -22,11 +22,11 @@ 
 		// A fortiori quand on demande une trace
 		$trace = isset($_GET['var_profile']) AND (autoriser('debug'));
 	}
-	return  $trace ?  microtime() : 0;
+	return  $trace ? microtime() : 0;
 }
 
 // http://doc.spip.org/@trace_query_end
-function trace_query_end($query, $start, $result, $erreur, $serveur=''){
+function trace_query_end($query, $start, $result, $erreur, $serveur = '') {
 	if ($start)
 		trace_query_chrono($start, microtime(), $query, $result, $serveur);
 	// tracer les erreurs, sauf pour select, c'est fait dans abstract_sql
@@ -36,9 +36,9 @@ 
 }
 
 // http://doc.spip.org/@trace_query_chrono
-function trace_query_chrono($m1, $m2, $query, $result, $serveur='')
+function trace_query_chrono($m1, $m2, $query, $result, $serveur = '')
 {
-	static $tt = 0, $nb=0;
+	static $tt = 0, $nb = 0;
 	global $tableau_des_temps;
 
 	include_spip('inc/filtres_mini');
@@ -61,9 +61,9 @@ 
 	$tt += $dt;
 	$nb++;
 
-	$q = preg_replace('/([a-z)`])\s+([A-Z])/', "$1\n<br />$2",spip_htmlentities($query));
-	$e =  sql_explain($query, $serveur);
-	$r = str_replace('Resource id ','',(is_object($result)?get_class($result):$result));
+	$q = preg_replace('/([a-z)`])\s+([A-Z])/', "$1\n<br />$2", spip_htmlentities($query));
+	$e = sql_explain($query, $serveur);
+	$r = str_replace('Resource id ', '', (is_object($result) ? get_class($result) : $result));
 	$tableau_des_temps[] = array($dt, $nb, $boucle, $q, $e, $r, $contexte);
 }
 
@@ -71,13 +71,13 @@ 
 function chrono_requete($temps)
 {
 	$total = 0;
-	$hors = "<i>" . _T('zbug_hors_compilation') . "</i>";
+	$hors = "<i>"._T('zbug_hors_compilation')."</i>";
 	$t = $q = $n = $d = array();
 	// Totaliser les temps et completer le Explain
 	foreach ($temps as $key => $v) {
 		list($dt, $nb, $boucle, $query, $explain, $res, $contexte) = $v;
 		if (is_array($contexte)) {
-			$k = ($contexte[0] . " $boucle");
+			$k = ($contexte[0]." $boucle");
 			include_spip('public/compiler');
 			$env = reconstruire_contexte_compil($contexte);
 		} else $k = $env = $boucle;
@@ -85,14 +85,14 @@ 
 		$total += $dt;
 		$t[$key] = $dt;
 		$q[$key] = $nb;
-		$d[$k]+= $dt;
+		$d[$k] += $dt;
 		if ($k) @++$n[$k];
 
 		if (!is_array($explain))
 			$explain = array();
-		foreach($explain as $j => $v) {
+		foreach ($explain as $j => $v) {
 			$explain[$j] = "<tr><th>$j</th><td>"
-			  . str_replace(';','<br />',$v)
+			  . str_replace(';', '<br />', $v)
 			  . "</td></tr>";
 		}
 		$e = "<table class='explain'>"
@@ -113,14 +113,14 @@ 
 	$i = 1;
 	$t = array();
 	// Fabriquer les liens de navigations dans le tableau des temps
-	foreach($temps as $k => $v) {
+	foreach ($temps as $k => $v) {
 		$titre = strip_tags($v[2]);
 		$href = quote_amp($GLOBALS['REQUEST_URI'])."#req$i";
 
-		$t[$v[2]][]= "<span class='spip-debug-arg'> "
+		$t[$v[2]][] = "<span class='spip-debug-arg'> "
 		. "<a title='$titre' href='$href'>$i</a>"
 		. '</span>'
-		. ((count($t[$v[2]]) % 10 == 9) ?  "<br />" : '');
+		. ((count($t[$v[2]]) % 10 == 9) ? "<br />" : '');
 		$i++;
 	}
 
@@ -132,8 +132,8 @@ 
 	unset($d['']);
 	// Fabriquer le tableau des liens de navigation dans le grand tableau
 	foreach ($d as $k => $v) {
-		$d[$k] =  $n[$k] . "</td><td>$k</td><td class='time'>$v</td><td class='liste-reqs'>"
-		  . join('',$t[$k]);
+		$d[$k] = $n[$k]."</td><td>$k</td><td class='time'>$v</td><td class='liste-reqs'>"
+		  . join('', $t[$k]);
 	}
 
 	$navigation = array(_T('zbug_statistiques'),
@@ -141,7 +141,7 @@ 
 		. join("</td></tr>\n<tr><td>", $d)
 	  . "</td></tr>\n"
 	  .  (# _request('var_mode_objet') ? '' : 
-	     ("<tr><td>" .  count($temps) . "</td><td>" . _T('info_total') . '</td><td class="time">' . $total . "</td><td></td></tr>")));
+	     ("<tr><td>".count($temps)."</td><td>"._T('info_total').'</td><td class="time">'.$total."</td><td></td></tr>")));
 	  
 	return array($temps, $navigation);
 }