spip / SPIP

ecrire/public/format_html.php

Indentation +90 added lines, -90 removed lines

@@ -11,127 +11,127 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function format_boucle_html($preaff, $avant, $nom, $type, $crit, $corps, $apres, $altern, $postaff, $prof) {
-	$preaff = $preaff ? "<BB$nom>$preaff" : '';
-	$avant = $avant ? "<B$nom>$avant" : '';
-	$apres = $apres ? "$apres</B$nom>" : '';
-	$altern = $altern ? "$altern<//B$nom>" : '';
-	$postaff = $postaff ? "$postaff</BB$nom>" : '';
-	if (!$corps) {
-		$corps = ' />';
-	} else {
-		$corps = ">$corps</BOUCLE$nom>";
-	}
-
-	return "$preaff$avant<BOUCLE$nom($type)$crit$corps$apres$altern$postaff";
+    $preaff = $preaff ? "<BB$nom>$preaff" : '';
+    $avant = $avant ? "<B$nom>$avant" : '';
+    $apres = $apres ? "$apres</B$nom>" : '';
+    $altern = $altern ? "$altern<//B$nom>" : '';
+    $postaff = $postaff ? "$postaff</BB$nom>" : '';
+    if (!$corps) {
+        $corps = ' />';
+    } else {
+        $corps = ">$corps</BOUCLE$nom>";
+    }
+
+    return "$preaff$avant<BOUCLE$nom($type)$crit$corps$apres$altern$postaff";
 }
 
 function format_inclure_html($file, $args, $prof) {
-	if (strpos($file, '#') === false) {
-		$t = $file ? ('(' . $file . ')') : '';
-	} else {
-		$t = '{fond=' . $file . '}';
-	}
-	$args = !$args ? '' : ('{' . join(', ', $args) . '}');
-
-	return ('<INCLURE' . $t . $args . '>');
+    if (strpos($file, '#') === false) {
+        $t = $file ? ('(' . $file . ')') : '';
+    } else {
+        $t = '{fond=' . $file . '}';
+    }
+    $args = !$args ? '' : ('{' . join(', ', $args) . '}');
+
+    return ('<INCLURE' . $t . $args . '>');
 }
 
 function format_polyglotte_html($args, $prof) {
-	$contenu = [];
-	foreach ($args as $l => $t) {
-		$contenu[] = ($l ? "[$l]" : '') . $t;
-	}
+    $contenu = [];
+    foreach ($args as $l => $t) {
+        $contenu[] = ($l ? "[$l]" : '') . $t;
+    }
 
-	return ('<multi>' . join(' ', $contenu) . '</multi>');
+    return ('<multi>' . join(' ', $contenu) . '</multi>');
 }
 
 function format_idiome_html($nom, $module, $args, $filtres, $prof) {
-	foreach ($args as $k => $v) {
-		$args[$k] = "$k=$v";
-	}
-	$args = (!$args ? '' : ('{' . join(',', $args) . '}'));
+    foreach ($args as $k => $v) {
+        $args[$k] = "$k=$v";
+    }
+    $args = (!$args ? '' : ('{' . join(',', $args) . '}'));
 
-	return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
+    return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
 }
 
 function format_champ_html($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof) {
-	$nom = '#'
-		. ($boucle ? ($boucle . ':') : '')
-		. $nom
-		. $etoile
-		. $args
-		. $filtres;
+    $nom = '#'
+        . ($boucle ? ($boucle . ':') : '')
+        . $nom
+        . $etoile
+        . $args
+        . $filtres;
 
-	// Determiner si c'est un champ etendu,
+    // Determiner si c'est un champ etendu,
 
-	$s = ($avant or $apres or $filtres
-		or (strpos($args, '(#') !== false));
+    $s = ($avant or $apres or $filtres
+        or (strpos($args, '(#') !== false));
 
-	return ($s ? "[$avant($nom)$apres]" : $nom);
+    return ($s ? "[$avant($nom)$apres]" : $nom);
 }
 
 function format_critere_html($critere) {
-	foreach ($critere as $k => $crit) {
-		$crit_s = '';
-		foreach ($crit as $operande) {
-			[$type, $valeur] = $operande;
-			if ($type == 'champ' and $valeur[0] == '[') {
-				$valeur = substr($valeur, 1, -1);
-				if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
-					$valeur = substr($valeur, 1, -1);
-				}
-			}
-			$crit_s .= $valeur;
-		}
-		$critere[$k] = $crit_s;
-	}
-
-	return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
+    foreach ($critere as $k => $crit) {
+        $crit_s = '';
+        foreach ($crit as $operande) {
+            [$type, $valeur] = $operande;
+            if ($type == 'champ' and $valeur[0] == '[') {
+                $valeur = substr($valeur, 1, -1);
+                if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
+                    $valeur = substr($valeur, 1, -1);
+                }
+            }
+            $crit_s .= $valeur;
+        }
+        $critere[$k] = $crit_s;
+    }
+
+    return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
 }
 
 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) {
-	for ($i = 0; $i < (is_countable($args) ? count($args) : 0) - 1; $i++) {
-		[$texte, $type] = $args[$i];
-		[$texte2, $type2] = $args[$i + 1];
-		if (!$texte or !$texte2) {
-			continue;
-		}
-		$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 . ')]';
-			}
-		} 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) == '|')
-				or (preg_match('/[\w\d_*]/', $c1) and preg_match('/^[\w\d_*{|]/', $texte2))
-			) {
-				$args[$i][0] = '[(' . $texte . ')]';
-			}
-		}
-	}
-
-	return join('', array_map(fn($arg) => reset($arg), $args));
+    for ($i = 0; $i < (is_countable($args) ? count($args) : 0) - 1; $i++) {
+        [$texte, $type] = $args[$i];
+        [$texte2, $type2] = $args[$i + 1];
+        if (!$texte or !$texte2) {
+            continue;
+        }
+        $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 . ')]';
+            }
+        } 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) == '|')
+                or (preg_match('/[\w\d_*]/', $c1) and preg_match('/^[\w\d_*{|]/', $texte2))
+            ) {
+                $args[$i][0] = '[(' . $texte . ')]';
+            }
+        }
+    }
+
+    return join('', array_map(fn($arg) => reset($arg), $args));
 }
 
 function format_texte_html($texte) {
-	return $texte;
+    return $texte;
 }

Spacing +13 added lines, -13 removed lines

@@ -31,36 +31,36 @@ 
 
 function format_inclure_html($file, $args, $prof) {
 	if (strpos($file, '#') === false) {
-		$t = $file ? ('(' . $file . ')') : '';
+		$t = $file ? ('('.$file.')') : '';
 	} else {
-		$t = '{fond=' . $file . '}';
+		$t = '{fond='.$file.'}';
 	}
-	$args = !$args ? '' : ('{' . join(', ', $args) . '}');
+	$args = !$args ? '' : ('{'.join(', ', $args).'}');
 
-	return ('<INCLURE' . $t . $args . '>');
+	return ('<INCLURE'.$t.$args.'>');
 }
 
 function format_polyglotte_html($args, $prof) {
 	$contenu = [];
 	foreach ($args as $l => $t) {
-		$contenu[] = ($l ? "[$l]" : '') . $t;
+		$contenu[] = ($l ? "[$l]" : '').$t;
 	}
 
-	return ('<multi>' . join(' ', $contenu) . '</multi>');
+	return ('<multi>'.join(' ', $contenu).'</multi>');
 }
 
 function format_idiome_html($nom, $module, $args, $filtres, $prof) {
 	foreach ($args as $k => $v) {
 		$args[$k] = "$k=$v";
 	}
-	$args = (!$args ? '' : ('{' . join(',', $args) . '}'));
+	$args = (!$args ? '' : ('{'.join(',', $args).'}'));
 
-	return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
+	return ('<:'.($module ? "$module:" : '').$nom.$args.$filtres.':>');
 }
 
 function format_champ_html($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof) {
 	$nom = '#'
-		. ($boucle ? ($boucle . ':') : '')
+		. ($boucle ? ($boucle.':') : '')
 		. $nom
 		. $etoile
 		. $args
@@ -90,12 +90,12 @@ 
 		$critere[$k] = $crit_s;
 	}
 
-	return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
+	return (!$critere ? '' : ('{'.join(',', $critere).'}'));
 }
 
 function format_liste_html($fonc, $args, $prof) {
 	return ((($fonc !== '') ? "|$fonc" : $fonc)
-		. (!$args ? '' : ('{' . join(',', $args) . '}')));
+		. (!$args ? '' : ('{'.join(',', $args).'}')));
 }
 
 // Concatenation sans separateur: verifier qu'on ne cree pas de faux lexemes
@@ -111,7 +111,7 @@ 
 			// 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 . ')]';
+				$args[$i + 1][0] = '[('.$texte2.')]';
 			}
 		} else {
 			if ($type == 'texte') {
@@ -124,7 +124,7 @@ 
 				($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.')]';
 			}
 		}
 	}

ecrire/public/parametrer.php

Spacing +12 added lines, -12 removed lines

@@ -80,7 +80,7 @@ 
 	} else {
 		// Preparer l'appel de la fonction principale du squelette
 
-		spip_timer($a = 'calcul page ' . random_int(0, 1000));
+		spip_timer($a = 'calcul page '.random_int(0, 1000));
 
 		// On cree un marqueur de notes unique lie a cette composition
 		// et on enregistre l'etat courant des globales de notes...
@@ -112,8 +112,8 @@ 
 		try {
 			$page = $fonc(['cache' => $cache], [$contexte]);
 		} catch (Throwable $e) {
-			$msg = _T('zbug_erreur_execution_page') . " $sourcefile";
-			$full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage();
+			$msg = _T('zbug_erreur_execution_page')." $sourcefile";
+			$full_msg = $msg.' | File '.$e->getFile().' Line '.$e->getLine().' : '.$e->getMessage();
 			$full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg);
 			$corps = "<pre>$msg</pre>";
 			$page = analyse_resultat_skel($fond, ['cache' => $cache], $corps, $sourcefile);
@@ -144,17 +144,17 @@ 
 
 		$profile = spip_timer($a);
 		spip_log("calcul ($profile) [$skel] $infos"
-			. ' (' . strlen($page['texte']) . ' octets)');
+			. ' ('.strlen($page['texte']).' octets)');
 
 		if (defined('_CALCUL_PROFILER') and intval($profile) > _CALCUL_PROFILER) {
 			spip_log("calcul ($profile) [$skel] $infos"
-				. ' (' . strlen($page['texte']) . ' octets) | ' . $_SERVER['REQUEST_URI'], 'profiler' . _LOG_AVERTISSEMENT);
+				. ' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'], 'profiler'._LOG_AVERTISSEMENT);
 		}
 
 		if ($debug) {
 			// si c'est ce que demande le debusqueur, lui passer la main
 			$t = strlen($page['texte']) ? $page['texte'] : ' ';
-			$GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t;
+			$GLOBALS['debug_objets']['resultat'][$fonc.'tout'] = $t;
 			$GLOBALS['debug_objets']['courant'] = $courant;
 			$GLOBALS['debug_objets']['profile'][$sourcefile] = $profile;
 			if (
@@ -185,7 +185,7 @@ 
 		if (defined('_VAR_INCLURE') and _VAR_INCLURE) {
 			$page['sourcefile'] = $sourcefile;
 			$page['texte'] =
-				"<div class='inclure_blocs'><h6>" . $page['sourcefile'] . '</h6>' . $page['texte'] . '</div>'
+				"<div class='inclure_blocs'><h6>".$page['sourcefile'].'</h6>'.$page['texte'].'</div>'
 				. ($js_inclus ? '' : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>");
 			$js_inclus = true;
 		}
@@ -222,14 +222,14 @@ 
 			$val = '';
 		} elseif (is_array($val)) {
 			if ($profondeur_max > 0) {
-				$val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')';
+				$val = 'array:'.count($val).'('.presenter_contexte($val, $profondeur_max - 1, 3).')';
 			} else {
-				$val = 'array:' . count($val);
+				$val = 'array:'.count($val);
 			}
 		} elseif (is_object($val)) {
 			$val = get_class($val);
 		} elseif (strlen("$val") > 30) {
-			$val = substr("$val", 0, 29) . '…';
+			$val = substr("$val", 0, 29).'…';
 			if (strstr($val, ' ')) {
 				$val = "'$val'";
 			}
@@ -238,7 +238,7 @@ 
 		} elseif (!strlen($val)) {
 			$val = "''";
 		}
-		$infos[] = $var . '=' . $val;
+		$infos[] = $var.'='.$val;
 	}
 	return join(', ', $infos);
 }
@@ -306,7 +306,7 @@ 
 						. "?php include_spip('inc/headers');redirige_par_entete('"
 						. texte_script($url)
 						. "','',$status);"
-						. '?' . '>',
+						. '?'.'>',
 					'process_ins' => 'php',
 					'status' => $status
 				];

Indentation +246 added lines, -246 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_fichiers_fonctions();
@@ -30,177 +30,177 @@ 
 # En cas d'erreur process_ins est absent et texte est un tableau de 2 chaines
 
 function public_parametrer_dist($fond, $contexte = '', $cache = '', string $connect = '') {
-	static $composer, $styliser, $notes = null;
-	$page = tester_redirection($fond, $contexte, $connect);
-	if ($page) {
-		return $page;
-	}
-
-	if (isset($contexte['lang'])) {
-		$lang = $contexte['lang'];
-	} elseif (!isset($lang)) {
-		$lang = $GLOBALS['meta']['langue_site'];
-	}
-
-	$select = ((!isset($GLOBALS['forcer_lang']) or !$GLOBALS['forcer_lang']) and $lang <> $GLOBALS['spip_lang']);
-	if ($select) {
-		$select = lang_select($lang);
-	}
-
-	$debug = (defined('_VAR_MODE') && _VAR_MODE == 'debug');
-
-	if (!$styliser) {
-		$styliser = charger_fonction('styliser', 'public');
-	}
-	[$skel, $mime_type, $gram, $sourcefile] =
-		$styliser($fond, $contexte, $GLOBALS['spip_lang'], $connect);
-
-	if ($skel) {
-		// sauver le nom de l'eventuel squelette en cours d'execution
-		// (recursion possible a cause des modeles)
-		if ($debug) {
-			$courant = $GLOBALS['debug_objets']['courant'] ?? null;
-			$GLOBALS['debug_objets']['contexte'][$sourcefile] = $contexte;
-		}
-
-		// charger le squelette en specifiant les langages cibles et source
-		// au cas il faudrait le compiler (source posterieure au resultat)
-
-		if (!$composer) {
-			$composer = charger_fonction('composer', 'public');
-		}
-		$fonc = $composer($skel, $mime_type, $gram, $sourcefile, $connect);
-	} else {
-		$fonc = '';
-	}
-
-	if (!$fonc) { // squelette inconnu (==='') ou faux (===false)
-		$page = $fonc;
-	} else {
-		// Preparer l'appel de la fonction principale du squelette
-
-		spip_timer($a = 'calcul page ' . random_int(0, 1000));
-
-		// On cree un marqueur de notes unique lie a cette composition
-		// et on enregistre l'etat courant des globales de notes...
-		if (is_null($notes)) {
-			$notes = charger_fonction('notes', 'inc', true);
-		}
-		if ($notes) {
-			$notes('', 'empiler');
-		}
-
-		// Rajouter d'office ces deux parametres
-		// (mais vaudrait mieux que le compilateur sache le simuler
-		// car ca interdit l'usage de criteres conditionnels dessus).
-		if (!isset($contexte['date'])) {
-			$contexte['date'] = date('Y-m-d H:i:s');
-			$contexte['date_default'] = true;
-		} else {
-			$contexte['date'] = normaliser_date($contexte['date'], true);
-		}
-
-		if (!isset($contexte['date_redac'])) {
-			$contexte['date_redac'] = date('Y-m-d H:i:s');
-			$contexte['date_redac_default'] = true;
-		} else {
-			$contexte['date_redac'] = normaliser_date($contexte['date_redac'], true);
-		}
-
-		// Passer le nom du cache pour produire sa destruction automatique
-		try {
-			$page = $fonc(['cache' => $cache], [$contexte]);
-		} catch (Throwable $e) {
-			$msg = _T('zbug_erreur_execution_page') . " $sourcefile";
-			$full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage();
-			$full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg);
-			$corps = "<pre>$msg</pre>";
-			$page = analyse_resultat_skel($fond, ['cache' => $cache], $corps, $sourcefile);
-			erreur_squelette($full_msg);
-			unset($msg, $full_msg, $corps);
-		}
-
-		// Restituer les globales de notes telles qu'elles etaient avant l'appel
-		// Si l'inclus n'a pas affiche ses notes, tant pis (elles *doivent*
-		// etre dans son resultat, autrement elles ne seraient pas prises en
-		// compte a chaque calcul d'un texte contenant un modele, mais seulement
-		// quand le modele serait calcule, et on aurait des resultats incoherents)
-		if ($notes) {
-			$notes('', 'depiler');
-		}
-
-		// reinjecter en dynamique la pile des notes
-		// si il y a des inclure dynamiques
-		// si la pile n'est pas vide
-		// la generalisation de cette injection permettrait de corriger le point juste au dessus
-		// en faisant remonter les notes a l'incluant (A tester et valider avant application)
-		if ($notes) {
-			$page['notes'] = $notes('', 'sauver_etat');
-		}
-
-		// spip_log: un joli contexte
-		$infos = presenter_contexte(array_filter($contexte));
-
-		$profile = spip_timer($a);
-		spip_log("calcul ($profile) [$skel] $infos"
-			. ' (' . strlen($page['texte']) . ' octets)');
-
-		if (defined('_CALCUL_PROFILER') and intval($profile) > _CALCUL_PROFILER) {
-			spip_log("calcul ($profile) [$skel] $infos"
-				. ' (' . strlen($page['texte']) . ' octets) | ' . $_SERVER['REQUEST_URI'], 'profiler' . _LOG_AVERTISSEMENT);
-		}
-
-		if ($debug) {
-			// si c'est ce que demande le debusqueur, lui passer la main
-			$t = strlen($page['texte']) ? $page['texte'] : ' ';
-			$GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t;
-			$GLOBALS['debug_objets']['courant'] = $courant;
-			$GLOBALS['debug_objets']['profile'][$sourcefile] = $profile;
-			if (
-				$GLOBALS['debug_objets']['sourcefile']
-				and (_request('var_mode_objet') == $fonc)
-				and (_request('var_mode_affiche') == 'resultat')
-			) {
-				erreur_squelette();
-			}
-		}
-		// Si #CACHE{} n'etait pas la, le mettre a $delais
-		if (!isset($page['entetes']['X-Spip-Cache'])) {
-			// Dans l'espace prive ou dans un modeles/ on pose un cache 0 par defaut
-			// si aucun #CACHE{} spécifié
-			// le contexte implicite qui conditionne le cache assure qu'on retombe pas sur le meme
-			// entre public et prive
-			if (test_espace_prive() or strncmp($fond, 'modeles/', 8) == 0) {
-				$page['entetes']['X-Spip-Cache'] = 0;
-			} else {
-				$page['entetes']['X-Spip-Cache'] = $GLOBALS['delais'] ?? 36000;
-			}
-		}
-
-		$page['contexte'] = $contexte;
-
-		// faire remonter le fichier source
-		static $js_inclus = false;
-		if (defined('_VAR_INCLURE') and _VAR_INCLURE) {
-			$page['sourcefile'] = $sourcefile;
-			$page['texte'] =
-				"<div class='inclure_blocs'><h6>" . $page['sourcefile'] . '</h6>' . $page['texte'] . '</div>'
-				. ($js_inclus ? '' : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>");
-			$js_inclus = true;
-		}
-
-		// Si un modele contenait #SESSION, on note l'info dans $page
-		if (isset($GLOBALS['cache_utilise_session'])) {
-			$page['invalideurs']['session'] = $GLOBALS['cache_utilise_session'];
-			unset($GLOBALS['cache_utilise_session']);
-		}
-	}
-
-	if ($select) {
-		lang_select();
-	}
-
-	return $page;
+    static $composer, $styliser, $notes = null;
+    $page = tester_redirection($fond, $contexte, $connect);
+    if ($page) {
+        return $page;
+    }
+
+    if (isset($contexte['lang'])) {
+        $lang = $contexte['lang'];
+    } elseif (!isset($lang)) {
+        $lang = $GLOBALS['meta']['langue_site'];
+    }
+
+    $select = ((!isset($GLOBALS['forcer_lang']) or !$GLOBALS['forcer_lang']) and $lang <> $GLOBALS['spip_lang']);
+    if ($select) {
+        $select = lang_select($lang);
+    }
+
+    $debug = (defined('_VAR_MODE') && _VAR_MODE == 'debug');
+
+    if (!$styliser) {
+        $styliser = charger_fonction('styliser', 'public');
+    }
+    [$skel, $mime_type, $gram, $sourcefile] =
+        $styliser($fond, $contexte, $GLOBALS['spip_lang'], $connect);
+
+    if ($skel) {
+        // sauver le nom de l'eventuel squelette en cours d'execution
+        // (recursion possible a cause des modeles)
+        if ($debug) {
+            $courant = $GLOBALS['debug_objets']['courant'] ?? null;
+            $GLOBALS['debug_objets']['contexte'][$sourcefile] = $contexte;
+        }
+
+        // charger le squelette en specifiant les langages cibles et source
+        // au cas il faudrait le compiler (source posterieure au resultat)
+
+        if (!$composer) {
+            $composer = charger_fonction('composer', 'public');
+        }
+        $fonc = $composer($skel, $mime_type, $gram, $sourcefile, $connect);
+    } else {
+        $fonc = '';
+    }
+
+    if (!$fonc) { // squelette inconnu (==='') ou faux (===false)
+        $page = $fonc;
+    } else {
+        // Preparer l'appel de la fonction principale du squelette
+
+        spip_timer($a = 'calcul page ' . random_int(0, 1000));
+
+        // On cree un marqueur de notes unique lie a cette composition
+        // et on enregistre l'etat courant des globales de notes...
+        if (is_null($notes)) {
+            $notes = charger_fonction('notes', 'inc', true);
+        }
+        if ($notes) {
+            $notes('', 'empiler');
+        }
+
+        // Rajouter d'office ces deux parametres
+        // (mais vaudrait mieux que le compilateur sache le simuler
+        // car ca interdit l'usage de criteres conditionnels dessus).
+        if (!isset($contexte['date'])) {
+            $contexte['date'] = date('Y-m-d H:i:s');
+            $contexte['date_default'] = true;
+        } else {
+            $contexte['date'] = normaliser_date($contexte['date'], true);
+        }
+
+        if (!isset($contexte['date_redac'])) {
+            $contexte['date_redac'] = date('Y-m-d H:i:s');
+            $contexte['date_redac_default'] = true;
+        } else {
+            $contexte['date_redac'] = normaliser_date($contexte['date_redac'], true);
+        }
+
+        // Passer le nom du cache pour produire sa destruction automatique
+        try {
+            $page = $fonc(['cache' => $cache], [$contexte]);
+        } catch (Throwable $e) {
+            $msg = _T('zbug_erreur_execution_page') . " $sourcefile";
+            $full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage();
+            $full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg);
+            $corps = "<pre>$msg</pre>";
+            $page = analyse_resultat_skel($fond, ['cache' => $cache], $corps, $sourcefile);
+            erreur_squelette($full_msg);
+            unset($msg, $full_msg, $corps);
+        }
+
+        // Restituer les globales de notes telles qu'elles etaient avant l'appel
+        // Si l'inclus n'a pas affiche ses notes, tant pis (elles *doivent*
+        // etre dans son resultat, autrement elles ne seraient pas prises en
+        // compte a chaque calcul d'un texte contenant un modele, mais seulement
+        // quand le modele serait calcule, et on aurait des resultats incoherents)
+        if ($notes) {
+            $notes('', 'depiler');
+        }
+
+        // reinjecter en dynamique la pile des notes
+        // si il y a des inclure dynamiques
+        // si la pile n'est pas vide
+        // la generalisation de cette injection permettrait de corriger le point juste au dessus
+        // en faisant remonter les notes a l'incluant (A tester et valider avant application)
+        if ($notes) {
+            $page['notes'] = $notes('', 'sauver_etat');
+        }
+
+        // spip_log: un joli contexte
+        $infos = presenter_contexte(array_filter($contexte));
+
+        $profile = spip_timer($a);
+        spip_log("calcul ($profile) [$skel] $infos"
+            . ' (' . strlen($page['texte']) . ' octets)');
+
+        if (defined('_CALCUL_PROFILER') and intval($profile) > _CALCUL_PROFILER) {
+            spip_log("calcul ($profile) [$skel] $infos"
+                . ' (' . strlen($page['texte']) . ' octets) | ' . $_SERVER['REQUEST_URI'], 'profiler' . _LOG_AVERTISSEMENT);
+        }
+
+        if ($debug) {
+            // si c'est ce que demande le debusqueur, lui passer la main
+            $t = strlen($page['texte']) ? $page['texte'] : ' ';
+            $GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t;
+            $GLOBALS['debug_objets']['courant'] = $courant;
+            $GLOBALS['debug_objets']['profile'][$sourcefile] = $profile;
+            if (
+                $GLOBALS['debug_objets']['sourcefile']
+                and (_request('var_mode_objet') == $fonc)
+                and (_request('var_mode_affiche') == 'resultat')
+            ) {
+                erreur_squelette();
+            }
+        }
+        // Si #CACHE{} n'etait pas la, le mettre a $delais
+        if (!isset($page['entetes']['X-Spip-Cache'])) {
+            // Dans l'espace prive ou dans un modeles/ on pose un cache 0 par defaut
+            // si aucun #CACHE{} spécifié
+            // le contexte implicite qui conditionne le cache assure qu'on retombe pas sur le meme
+            // entre public et prive
+            if (test_espace_prive() or strncmp($fond, 'modeles/', 8) == 0) {
+                $page['entetes']['X-Spip-Cache'] = 0;
+            } else {
+                $page['entetes']['X-Spip-Cache'] = $GLOBALS['delais'] ?? 36000;
+            }
+        }
+
+        $page['contexte'] = $contexte;
+
+        // faire remonter le fichier source
+        static $js_inclus = false;
+        if (defined('_VAR_INCLURE') and _VAR_INCLURE) {
+            $page['sourcefile'] = $sourcefile;
+            $page['texte'] =
+                "<div class='inclure_blocs'><h6>" . $page['sourcefile'] . '</h6>' . $page['texte'] . '</div>'
+                . ($js_inclus ? '' : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>");
+            $js_inclus = true;
+        }
+
+        // Si un modele contenait #SESSION, on note l'info dans $page
+        if (isset($GLOBALS['cache_utilise_session'])) {
+            $page['invalideurs']['session'] = $GLOBALS['cache_utilise_session'];
+            unset($GLOBALS['cache_utilise_session']);
+        }
+    }
+
+    if ($select) {
+        lang_select();
+    }
+
+    return $page;
 }
 
 /**
@@ -209,37 +209,37 @@ 
  * @return string
 */
 function presenter_contexte($contexte, $profondeur_max = 1, $max_lines = 0) {
-	$infos = [];
-	$line = 0;
-	foreach ($contexte as $var => $val) {
-		$line++;
-		if ($max_lines and $max_lines < $line) {
-			$infos[] = '…';
-			break;
-		}
-		if ($val === null) {
-			$val = '';
-		} elseif (is_array($val)) {
-			if ($profondeur_max > 0) {
-				$val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')';
-			} else {
-				$val = 'array:' . count($val);
-			}
-		} elseif (is_object($val)) {
-			$val = get_class($val);
-		} elseif (strlen("$val") > 30) {
-			$val = substr("$val", 0, 29) . '…';
-			if (strstr($val, ' ')) {
-				$val = "'$val'";
-			}
-		} elseif (strstr($val, ' ')) {
-			$val = "'$val'";
-		} elseif (!strlen($val)) {
-			$val = "''";
-		}
-		$infos[] = $var . '=' . $val;
-	}
-	return join(', ', $infos);
+    $infos = [];
+    $line = 0;
+    foreach ($contexte as $var => $val) {
+        $line++;
+        if ($max_lines and $max_lines < $line) {
+            $infos[] = '…';
+            break;
+        }
+        if ($val === null) {
+            $val = '';
+        } elseif (is_array($val)) {
+            if ($profondeur_max > 0) {
+                $val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')';
+            } else {
+                $val = 'array:' . count($val);
+            }
+        } elseif (is_object($val)) {
+            $val = get_class($val);
+        } elseif (strlen("$val") > 30) {
+            $val = substr("$val", 0, 29) . '…';
+            if (strstr($val, ' ')) {
+                $val = "'$val'";
+            }
+        } elseif (strstr($val, ' ')) {
+            $val = "'$val'";
+        } elseif (!strlen($val)) {
+            $val = "''";
+        }
+        $infos[] = $var . '=' . $val;
+    }
+    return join(', ', $infos);
 }
 
 
@@ -256,11 +256,11 @@ 
  * @return array|bool
  */
 function tester_redirection($fond, $contexte, $connect) {
-	static $tester_redirection = null;
-	if (is_null($tester_redirection)) {
-		$tester_redirection = charger_fonction('tester_redirection', 'public');
-	}
-	return $tester_redirection($fond, $contexte, $connect);
+    static $tester_redirection = null;
+    if (is_null($tester_redirection)) {
+        $tester_redirection = charger_fonction('tester_redirection', 'public');
+    }
+    return $tester_redirection($fond, $contexte, $connect);
 }
 
 
@@ -276,42 +276,42 @@ 
  * @return array|bool
  */
 function public_tester_redirection_dist($fond, $contexte, $connect) {
-	if (
-		$fond == 'article'
-		and !empty($contexte['id_article'])
-		and $id_article = intval($contexte['id_article'])
-	) {
-		include_spip('public/quete'); // pour quete_virtuel et ses dependances
-		$m = quete_virtuel($id_article, $connect) ?? '';
-		if (strlen($m)) {
-			include_spip('inc/texte');
-			// les navigateurs pataugent si l'URL est vide
-			if ($url = virtuel_redirige($m, true)) {
-				// passer en url absolue car cette redirection pourra
-				// etre utilisee dans un contexte d'url qui change
-				// y compris url arbo
-				$status = 302;
-				if (defined('_STATUS_REDIRECTION_VIRTUEL')) {
-					$status = _STATUS_REDIRECTION_VIRTUEL;
-				}
-				if (!preg_match(',^\w+:,', $url)) {
-					include_spip('inc/filtres_mini');
-					$url = url_absolue($url);
-				}
-				$url = str_replace('&amp;', '&', $url);
-
-				return [
-					'texte' => '<'
-						. "?php include_spip('inc/headers');redirige_par_entete('"
-						. texte_script($url)
-						. "','',$status);"
-						. '?' . '>',
-					'process_ins' => 'php',
-					'status' => $status
-				];
-			}
-		}
-	}
-
-	return false;
+    if (
+        $fond == 'article'
+        and !empty($contexte['id_article'])
+        and $id_article = intval($contexte['id_article'])
+    ) {
+        include_spip('public/quete'); // pour quete_virtuel et ses dependances
+        $m = quete_virtuel($id_article, $connect) ?? '';
+        if (strlen($m)) {
+            include_spip('inc/texte');
+            // les navigateurs pataugent si l'URL est vide
+            if ($url = virtuel_redirige($m, true)) {
+                // passer en url absolue car cette redirection pourra
+                // etre utilisee dans un contexte d'url qui change
+                // y compris url arbo
+                $status = 302;
+                if (defined('_STATUS_REDIRECTION_VIRTUEL')) {
+                    $status = _STATUS_REDIRECTION_VIRTUEL;
+                }
+                if (!preg_match(',^\w+:,', $url)) {
+                    include_spip('inc/filtres_mini');
+                    $url = url_absolue($url);
+                }
+                $url = str_replace('&amp;', '&', $url);
+
+                return [
+                    'texte' => '<'
+                        . "?php include_spip('inc/headers');redirige_par_entete('"
+                        . texte_script($url)
+                        . "','',$status);"
+                        . '?' . '>',
+                    'process_ins' => 'php',
+                    'status' => $status
+                ];
+            }
+        }
+    }
+
+    return false;
 }

ecrire/public/references.php

Spacing +14 added lines, -14 removed lines

@@ -124,7 +124,7 @@ 
 	$select = true
 ) {
 	if (!is_string($defaut)) {
-		$defaut = '($Pile[0][\'' . strtolower($nom_champ) . '\'] ?? null)';
+		$defaut = '($Pile[0][\''.strtolower($nom_champ).'\'] ?? null)';
 	}
 
 	$idb_origine = $idb;
@@ -157,7 +157,7 @@ 
 			}
 			// renseigner la boucle source de ce champ pour les traitements
 			$boucles[$idb_origine]->index_champ[$nom_champ_origine] = $idb;
-			$champ = '$Pile[$SP' . ($i ? "-$i" : '') . '][\'' . $c . '\']';
+			$champ = '$Pile[$SP'.($i ? "-$i" : '').'][\''.$c.'\']';
 			if (!$joker) {
 				return index_compose($conditionnel, $champ);
 			}
@@ -198,7 +198,7 @@ 
 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 = "($c:(".($defaut ?: "''").'))';
 	}
 
 	return $defaut;
@@ -245,7 +245,7 @@ 
 	if (!$r) {
 		$joker = false; // indiquer a l'appelant
 		# continuer pour chercher l'erreur suivante
-		return ["'#" . $r . ':' . $nom_champ . "'", ''];
+		return ["'#".$r.':'.$nom_champ."'", ''];
 	}
 
 	$desc = $boucles[$idb]->show;
@@ -348,8 +348,8 @@ 
 			$t = $index_exception_derogatoire($boucle, $desc, $nom_champ, $excep);
 		}
 		if ($t == null) {
-			[$e, $x] = $excep;  #PHP4 affecte de gauche a droite
-			$excep = $x;    #PHP5 de droite a gauche !
+			[$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 ['', ''];
@@ -361,7 +361,7 @@ 
 					$l = (preg_split('/\s*,\s*/', $k));
 					$k = $desc['key']['PRIMARY KEY'];
 					if (!in_array($k, $l)) {
-						spip_log("jointure impossible $e " . join(',', $l));
+						spip_log("jointure impossible $e ".join(',', $l));
 
 						return ['', ''];
 					}
@@ -377,7 +377,7 @@ 
 	// 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;
+		$excep .= ' AS '.$nom_champ;
 	}
 
 	return ["$t.$excep", $nom_champ];
@@ -611,7 +611,7 @@ 
 		join(',', $collecte),
 		($collecte ? $param : substr($param, 1)), # virer la virgule
 		memoriser_contexte_compil($p),
-		(!$supp ? '' : (', ' . join(',', $supp)))
+		(!$supp ? '' : (', '.join(',', $supp)))
 	);
 
 	$p->interdire_scripts = false;
@@ -709,7 +709,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;
 	}
@@ -795,7 +795,7 @@ 
 			(strpos($ps, 'typo') !== false)
 		)
 	) {
-		$ps = 'traiter_doublons_documents($doublons, ' . $ps . ')';
+		$ps = 'traiter_doublons_documents($doublons, '.$ps.')';
 	}
 
 	// La protection des champs par |safehtml est assuree par les extensions
@@ -916,7 +916,7 @@ 
 function compose_filtres_args($p, $args, $sep) {
 	$arglist = '';
 	foreach ($args as $arg) {
-		$arglist .= $sep .
+		$arglist .= $sep.
 			calculer_liste($arg, $p->descr, $p->boucles, $p->id_boucle);
 	}
 
@@ -967,7 +967,7 @@ 
 	while ($b != '') {
 		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;
@@ -995,6 +995,6 @@ 
  */
 function zbug_presenter_champ($p, $champ = '') {
 	$balise = $champ ?: $p->nom_champ;
-	$explicite = $p->nom_boucle ? $p->nom_boucle . ':' : '';
+	$explicite = $p->nom_boucle ? $p->nom_boucle.':' : '';
 	return "#{$explicite}{$balise}";
 }

Indentation +526 added lines, -526 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Compilateur\References
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -41,14 +41,14 @@ 
  *     - '' si une référence explicite incorrecte est envoyée
  */
 function index_boucle($p) {
-	if (strlen($p->nom_boucle)) {
-		// retourne l’index explicite demandé s’il existe
-		if (!empty($p->boucles[$p->nom_boucle])) {
-			return $p->nom_boucle;
-		}
-		return '';
-	}
-	return $p->id_boucle;
+    if (strlen($p->nom_boucle)) {
+        // retourne l’index explicite demandé s’il existe
+        if (!empty($p->boucles[$p->nom_boucle])) {
+            return $p->nom_boucle;
+        }
+        return '';
+    }
+    return $p->id_boucle;
 }
 
 
@@ -71,17 +71,17 @@ 
  *     - '' si une référence explicite incorrecte est envoyée
  */
 function index_boucle_mere($p) {
-	if (strlen($p->nom_boucle)) {
-		// retourne l’index explicite demandé s’il existe
-		if (!empty($p->boucles[$p->nom_boucle])) {
-			return $p->nom_boucle;
-		}
-		return '';
-	}
-	if (!empty($p->descr['id_mere'])) {
-		return $p->descr['id_mere'];
-	}
-	return '';
+    if (strlen($p->nom_boucle)) {
+        // retourne l’index explicite demandé s’il existe
+        if (!empty($p->boucles[$p->nom_boucle])) {
+            return $p->nom_boucle;
+        }
+        return '';
+    }
+    if (!empty($p->descr['id_mere'])) {
+        return $p->descr['id_mere'];
+    }
+    return '';
 }
 
 /**
@@ -115,74 +115,74 @@ 
  *     Code PHP pour obtenir le champ SQL
  */
 function index_pile(
-	$idb,
-	$nom_champ,
-	&$boucles,
-	$explicite = '',
-	$defaut = null,
-	$remonte_pile = true,
-	$select = true
+    $idb,
+    $nom_champ,
+    &$boucles,
+    $explicite = '',
+    $defaut = null,
+    $remonte_pile = true,
+    $select = true
 ) {
-	if (!is_string($defaut)) {
-		$defaut = '($Pile[0][\'' . strtolower($nom_champ) . '\'] ?? null)';
-	}
-
-	$idb_origine = $idb;
-	$nom_champ_origine = $nom_champ;
-
-	$i = 0;
-	if (strlen($explicite)) {
-		// Recherche d'un champ dans un etage superieur
-		while (($idb !== $explicite) && ($idb !== '')) {
-			#	spip_log("Cherchexpl: $nom_champ '$explicite' '$idb' '$i'");
-			$i++;
-			$idb = $boucles[$idb]->id_parent;
-		}
-	}
-
-	#	spip_log("Cherche: $nom_champ a partir de '$idb'");
-	$nom_champ = strtolower($nom_champ);
-	$conditionnel = [];
-	// attention: entre la boucle nommee 0, "" et le tableau vide,
-	// il y a incoherences qu'il vaut mieux eviter
-	while (isset($boucles[$idb])) {
-		$joker = true;
-		// modifie $joker si tous les champs sont autorisés.
-		// $t = le select pour le champ, si on l'a trouvé (ou si joker)
-		// $c = le nom du champ demandé
-		[$t, $c] = index_tables_en_pile($idb, $nom_champ, $boucles, $joker);
-		if ($t) {
-			if ($select and !in_array($t, $boucles[$idb]->select)) {
-				$boucles[$idb]->select[] = $t;
-			}
-			// renseigner la boucle source de ce champ pour les traitements
-			$boucles[$idb_origine]->index_champ[$nom_champ_origine] = $idb;
-			$champ = '$Pile[$SP' . ($i ? "-$i" : '') . '][\'' . $c . '\']';
-			if (!$joker) {
-				return index_compose($conditionnel, $champ);
-			}
-
-			// tant que l'on trouve des tables avec joker, on continue
-			// avec la boucle parente et on conditionne à l'exécution
-			// la présence du champ. Si le champ existe à l'exécution
-			// dans une boucle, il est pris, sinon on le cherche dans le parent...
-			$conditionnel[] = "isset($champ)?$champ";
-		}
-
-		if ($remonte_pile) {
-			#	spip_log("On remonte vers $i");
-			// Sinon on remonte d'un cran
-			$idb = $boucles[$idb]->id_parent;
-			$i++;
-		} else {
-			$idb = null;
-		}
-	}
-
-	#	spip_log("Pas vu $nom_champ");
-	// esperons qu'il y sera
-	// ou qu'on a fourni une valeur par "defaut" plus pertinent
-	return index_compose($conditionnel, $defaut);
+    if (!is_string($defaut)) {
+        $defaut = '($Pile[0][\'' . strtolower($nom_champ) . '\'] ?? null)';
+    }
+
+    $idb_origine = $idb;
+    $nom_champ_origine = $nom_champ;
+
+    $i = 0;
+    if (strlen($explicite)) {
+        // Recherche d'un champ dans un etage superieur
+        while (($idb !== $explicite) && ($idb !== '')) {
+            #	spip_log("Cherchexpl: $nom_champ '$explicite' '$idb' '$i'");
+            $i++;
+            $idb = $boucles[$idb]->id_parent;
+        }
+    }
+
+    #	spip_log("Cherche: $nom_champ a partir de '$idb'");
+    $nom_champ = strtolower($nom_champ);
+    $conditionnel = [];
+    // attention: entre la boucle nommee 0, "" et le tableau vide,
+    // il y a incoherences qu'il vaut mieux eviter
+    while (isset($boucles[$idb])) {
+        $joker = true;
+        // modifie $joker si tous les champs sont autorisés.
+        // $t = le select pour le champ, si on l'a trouvé (ou si joker)
+        // $c = le nom du champ demandé
+        [$t, $c] = index_tables_en_pile($idb, $nom_champ, $boucles, $joker);
+        if ($t) {
+            if ($select and !in_array($t, $boucles[$idb]->select)) {
+                $boucles[$idb]->select[] = $t;
+            }
+            // renseigner la boucle source de ce champ pour les traitements
+            $boucles[$idb_origine]->index_champ[$nom_champ_origine] = $idb;
+            $champ = '$Pile[$SP' . ($i ? "-$i" : '') . '][\'' . $c . '\']';
+            if (!$joker) {
+                return index_compose($conditionnel, $champ);
+            }
+
+            // tant que l'on trouve des tables avec joker, on continue
+            // avec la boucle parente et on conditionne à l'exécution
+            // la présence du champ. Si le champ existe à l'exécution
+            // dans une boucle, il est pris, sinon on le cherche dans le parent...
+            $conditionnel[] = "isset($champ)?$champ";
+        }
+
+        if ($remonte_pile) {
+            #	spip_log("On remonte vers $i");
+            // Sinon on remonte d'un cran
+            $idb = $boucles[$idb]->id_parent;
+            $i++;
+        } else {
+            $idb = null;
+        }
+    }
+
+    #	spip_log("Pas vu $nom_champ");
+    // esperons qu'il y sera
+    // ou qu'on a fourni une valeur par "defaut" plus pertinent
+    return index_compose($conditionnel, $defaut);
 }
 
 /**
@@ -196,12 +196,12 @@ 
  * @return string              Code PHP complet de recherche d'un champ
  */
 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 ?: "''") . '))';
-	}
+    while ($c = array_pop($conditionnel)) {
+        // si on passe defaut = '', ne pas générer d'erreur de compilation.
+        $defaut = "($c:(" . ($defaut ?: "''") . '))';
+    }
 
-	return $defaut;
+    return $defaut;
 }
 
 /**
@@ -237,77 +237,77 @@ 
  **/
 function index_tables_en_pile($idb, $nom_champ, &$boucles, &$joker) {
 
-	$r = $boucles[$idb]->type_requete;
-	// boucle recursive, c'est foutu...
-	if ($r == TYPE_RECURSIF) {
-		return [];
-	}
-	if (!$r) {
-		$joker = false; // indiquer a l'appelant
-		# continuer pour chercher l'erreur suivante
-		return ["'#" . $r . ':' . $nom_champ . "'", ''];
-	}
-
-	$desc = $boucles[$idb]->show;
-	// le nom du champ est il une exception de la table ? un alias ?
-	$excep = $GLOBALS['exceptions_des_tables'][$r] ?? '';
-	if ($excep) {
-		$excep = $excep[$nom_champ] ?? '';
-	}
-	if ($excep) {
-		$joker = false; // indiquer a l'appelant
-		return index_exception($boucles[$idb], $desc, $nom_champ, $excep);
-	} // pas d'alias. Le champ existe t'il ?
-	else {
-		// le champ est réellement présent, on le prend.
-		if (isset($desc['field'][$nom_champ])) {
-			$t = $boucles[$idb]->id_table;
-			$joker = false; // indiquer a l'appelant
-			return ["$t.$nom_champ", $nom_champ];
-		}
-		// Tous les champs sont-ils acceptés ?
-		// Si oui, on retourne le champ, et on lève le flag joker
-		// C'est le cas des itérateurs DATA qui acceptent tout
-		// et testent la présence du champ à l'exécution et non à la compilation
-		// car ils ne connaissent pas ici leurs contenus.
-		elseif (
+    $r = $boucles[$idb]->type_requete;
+    // boucle recursive, c'est foutu...
+    if ($r == TYPE_RECURSIF) {
+        return [];
+    }
+    if (!$r) {
+        $joker = false; // indiquer a l'appelant
+        # continuer pour chercher l'erreur suivante
+        return ["'#" . $r . ':' . $nom_champ . "'", ''];
+    }
+
+    $desc = $boucles[$idb]->show;
+    // le nom du champ est il une exception de la table ? un alias ?
+    $excep = $GLOBALS['exceptions_des_tables'][$r] ?? '';
+    if ($excep) {
+        $excep = $excep[$nom_champ] ?? '';
+    }
+    if ($excep) {
+        $joker = false; // indiquer a l'appelant
+        return index_exception($boucles[$idb], $desc, $nom_champ, $excep);
+    } // pas d'alias. Le champ existe t'il ?
+    else {
+        // le champ est réellement présent, on le prend.
+        if (isset($desc['field'][$nom_champ])) {
+            $t = $boucles[$idb]->id_table;
+            $joker = false; // indiquer a l'appelant
+            return ["$t.$nom_champ", $nom_champ];
+        }
+        // Tous les champs sont-ils acceptés ?
+        // Si oui, on retourne le champ, et on lève le flag joker
+        // C'est le cas des itérateurs DATA qui acceptent tout
+        // et testent la présence du champ à l'exécution et non à la compilation
+        // car ils ne connaissent pas ici leurs contenus.
+        elseif (
 /*$joker AND */
-			isset($desc['field']['*'])
-		) {
-			$joker = true; // indiquer a l'appelant
-			return [$nom_champ, $nom_champ];
-		}
-		// pas d'alias, pas de champ, pas de joker...
-		// tenter via une jointure...
-		else {
-			$joker = false; // indiquer a l'appelant
-			// regarder si le champ est deja dans une jointure existante
-			// sinon, si il y a des joitures explicites, la construire
-			if (!$t = trouver_champ_exterieur($nom_champ, $boucles[$idb]->from, $boucles[$idb])) {
-				if ($boucles[$idb]->jointures_explicites) {
-					// [todo] Ne pas lancer que lorsque il y a des jointures explicites !!!!
-					// fonctionnel, il suffit d'utiliser $boucles[$idb]->jointures au lieu de jointures_explicites
-					// mais est-ce ce qu'on veut ?
-					$jointures = preg_split('/\s+/', $boucles[$idb]->jointures_explicites);
-					if ($cle = trouver_jointure_champ($nom_champ, $boucles[$idb], $jointures)) {
-						$t = trouver_champ_exterieur($nom_champ, $boucles[$idb]->from, $boucles[$idb]);
-					}
-				}
-			}
-			if ($t) {
-				// si on a trouvé une jointure possible, on fait comme
-				// si c'était une exception pour le champ demandé
-				return index_exception(
-					$boucles[$idb],
-					$desc,
-					$nom_champ,
-					[$t[1]['id_table'], reset($t[2])]
-				);
-			}
-
-			return ['', ''];
-		}
-	}
+            isset($desc['field']['*'])
+        ) {
+            $joker = true; // indiquer a l'appelant
+            return [$nom_champ, $nom_champ];
+        }
+        // pas d'alias, pas de champ, pas de joker...
+        // tenter via une jointure...
+        else {
+            $joker = false; // indiquer a l'appelant
+            // regarder si le champ est deja dans une jointure existante
+            // sinon, si il y a des joitures explicites, la construire
+            if (!$t = trouver_champ_exterieur($nom_champ, $boucles[$idb]->from, $boucles[$idb])) {
+                if ($boucles[$idb]->jointures_explicites) {
+                    // [todo] Ne pas lancer que lorsque il y a des jointures explicites !!!!
+                    // fonctionnel, il suffit d'utiliser $boucles[$idb]->jointures au lieu de jointures_explicites
+                    // mais est-ce ce qu'on veut ?
+                    $jointures = preg_split('/\s+/', $boucles[$idb]->jointures_explicites);
+                    if ($cle = trouver_jointure_champ($nom_champ, $boucles[$idb], $jointures)) {
+                        $t = trouver_champ_exterieur($nom_champ, $boucles[$idb]->from, $boucles[$idb]);
+                    }
+                }
+            }
+            if ($t) {
+                // si on a trouvé une jointure possible, on fait comme
+                // si c'était une exception pour le champ demandé
+                return index_exception(
+                    $boucles[$idb],
+                    $desc,
+                    $nom_champ,
+                    [$t[1]['id_table'], reset($t[2])]
+                );
+            }
+
+            return ['', ''];
+        }
+    }
 }
 
 
@@ -335,52 +335,52 @@ 
  *     est une expression pour le SELECT de la boucle du style "mots.titre AS titre_mot"
  **/
 function index_exception(&$boucle, $desc, $nom_champ, $excep) {
-	static $trouver_table;
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-
-	if (is_array($excep)) {
-		// permettre aux plugins de gerer eux meme des jointures derogatoire ingerables
-		$t = null;
-		if (count($excep) == 3) {
-			$index_exception_derogatoire = array_pop($excep);
-			$t = $index_exception_derogatoire($boucle, $desc, $nom_champ, $excep);
-		}
-		if ($t == null) {
-			[$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 ['', ''];
-			}
-			$e = $j['table'];
-			if (!$t = array_search($e, $boucle->from)) {
-				$k = $j['key']['PRIMARY KEY'];
-				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 ['', ''];
-					}
-				}
-				$k = [$boucle->id_table, [$e], $k];
-				fabrique_jointures($boucle, [$k]);
-				$t = array_search($e, $boucle->from);
-			}
-		}
-	} 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;
-	}
-
-	return ["$t.$excep", $nom_champ];
+    static $trouver_table;
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+
+    if (is_array($excep)) {
+        // permettre aux plugins de gerer eux meme des jointures derogatoire ingerables
+        $t = null;
+        if (count($excep) == 3) {
+            $index_exception_derogatoire = array_pop($excep);
+            $t = $index_exception_derogatoire($boucle, $desc, $nom_champ, $excep);
+        }
+        if ($t == null) {
+            [$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 ['', ''];
+            }
+            $e = $j['table'];
+            if (!$t = array_search($e, $boucle->from)) {
+                $k = $j['key']['PRIMARY KEY'];
+                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 ['', ''];
+                    }
+                }
+                $k = [$boucle->id_table, [$e], $k];
+                fabrique_jointures($boucle, [$k]);
+                $t = array_search($e, $boucle->from);
+            }
+        }
+    } 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;
+    }
+
+    return ["$t.$excep", $nom_champ];
 }
 
 /**
@@ -405,7 +405,7 @@ 
  *     Code PHP pour retrouver le champ
  */
 function champ_sql($champ, $p, $defaut = null, $remonte_pile = true) {
-	return index_pile($p->id_boucle, $champ, $p->boucles, $p->nom_boucle, $defaut, $remonte_pile);
+    return index_pile($p->id_boucle, $champ, $p->boucles, $p->nom_boucle, $defaut, $remonte_pile);
 }
 
 
@@ -425,9 +425,9 @@ 
  *     Code PHP pour d'exécution de la balise et de ses filtres
  **/
 function calculer_champ($p) {
-	$p = calculer_balise($p->nom_champ, $p);
+    $p = calculer_balise($p->nom_champ, $p);
 
-	return applique_filtres($p);
+    return applique_filtres($p);
 }
 
 
@@ -464,26 +464,26 @@ 
  **/
 function calculer_balise(string $nom, \Champ $p): \Champ {
 
-	// S'agit-t-il d'une balise_XXXX[_dist]() ?
-	if ($f = charger_fonction($nom, 'balise', true)) {
-		$p->balise_calculee = true;
-		$res = $f($p);
-		if ($res !== null and is_object($res)) {
-			return $res;
-		}
-	}
-
-	// Certaines des balises comportant un _ sont generiques
-	if ($balise_generique = chercher_balise_generique($nom)) {
-		$res = $balise_generique['fonction_generique']($p);
-		if ($res !== null and is_object($res)) {
-			return $res;
-		}
-	}
-
-	$f = charger_fonction('DEFAUT', 'calculer_balise');
-
-	return $f($nom, $p);
+    // S'agit-t-il d'une balise_XXXX[_dist]() ?
+    if ($f = charger_fonction($nom, 'balise', true)) {
+        $p->balise_calculee = true;
+        $res = $f($p);
+        if ($res !== null and is_object($res)) {
+            return $res;
+        }
+    }
+
+    // Certaines des balises comportant un _ sont generiques
+    if ($balise_generique = chercher_balise_generique($nom)) {
+        $res = $balise_generique['fonction_generique']($p);
+        if ($res !== null and is_object($res)) {
+            return $res;
+        }
+    }
+
+    $f = charger_fonction('DEFAUT', 'calculer_balise');
+
+    return $f($nom, $p);
 }
 
 
@@ -511,37 +511,37 @@ 
  **/
 function calculer_balise_DEFAUT_dist($nom, $p) {
 
-	// ca pourrait etre un champ SQL homonyme,
-	$p->code = index_pile($p->id_boucle, $nom, $p->boucles, $p->nom_boucle);
-
-	// compatibilite: depuis qu'on accepte #BALISE{ses_args} sans [(...)] autour
-	// il faut recracher {...} quand ce n'est finalement pas des args
-	if ($p->fonctions and (!$p->fonctions[0][0]) and $p->fonctions[0][1]) {
-		$code = addslashes($p->fonctions[0][1]);
-		$p->code .= " . '$code'";
-	}
-
-	// ne pas passer le filtre securite sur les id_xxx
-	if (strpos($nom, 'ID_') === 0) {
-		$p->interdire_scripts = false;
-	}
-
-	// Compatibilite ascendante avec les couleurs html (#FEFEFE) :
-	// SI le champ SQL n'est pas trouve
-	// ET si la balise a une forme de couleur
-	// ET s'il n'y a ni filtre ni etoile
-	// ALORS retourner la couleur.
-	// Ca permet si l'on veut vraiment de recuperer [(#ACCEDE*)]
-	if (
-		preg_match('/^[A-F]{1,6}$/i', $nom)
-		and !$p->etoile
-		and !$p->fonctions
-	) {
-		$p->code = "'#$nom'";
-		$p->interdire_scripts = false;
-	}
-
-	return $p;
+    // ca pourrait etre un champ SQL homonyme,
+    $p->code = index_pile($p->id_boucle, $nom, $p->boucles, $p->nom_boucle);
+
+    // compatibilite: depuis qu'on accepte #BALISE{ses_args} sans [(...)] autour
+    // il faut recracher {...} quand ce n'est finalement pas des args
+    if ($p->fonctions and (!$p->fonctions[0][0]) and $p->fonctions[0][1]) {
+        $code = addslashes($p->fonctions[0][1]);
+        $p->code .= " . '$code'";
+    }
+
+    // ne pas passer le filtre securite sur les id_xxx
+    if (strpos($nom, 'ID_') === 0) {
+        $p->interdire_scripts = false;
+    }
+
+    // Compatibilite ascendante avec les couleurs html (#FEFEFE) :
+    // SI le champ SQL n'est pas trouve
+    // ET si la balise a une forme de couleur
+    // ET s'il n'y a ni filtre ni etoile
+    // ALORS retourner la couleur.
+    // Ca permet si l'on veut vraiment de recuperer [(#ACCEDE*)]
+    if (
+        preg_match('/^[A-F]{1,6}$/i', $nom)
+        and !$p->etoile
+        and !$p->fonctions
+    ) {
+        $p->code = "'#$nom'";
+        $p->interdire_scripts = false;
+    }
+
+    return $p;
 }
 
 
@@ -584,39 +584,39 @@ 
  **/
 function calculer_balise_dynamique($p, $nom, $l, $supp = []) {
 
-	if (!balise_distante_interdite($p)) {
-		$p->code = "''";
-
-		return $p;
-	}
-	// compatibilite: depuis qu'on accepte #BALISE{ses_args} sans [(...)] autour
-	// il faut recracher {...} quand ce n'est finalement pas des args
-	if ($p->fonctions and (!$p->fonctions[0][0]) and $p->fonctions[0][1]) {
-		$p->fonctions = null;
-	}
-
-	if ($p->param and ($c = $p->param[0])) {
-		// liste d'arguments commence toujours par la chaine vide
-		array_shift($c);
-		// construire la liste d'arguments comme pour un filtre
-		$param = compose_filtres_args($p, $c, ',');
-	} else {
-		$param = '';
-	}
-	$collecte = collecter_balise_dynamique($l, $p, $nom);
-
-	$p->code = sprintf(
-		CODE_EXECUTER_BALISE,
-		$nom,
-		join(',', $collecte),
-		($collecte ? $param : substr($param, 1)), # virer la virgule
-		memoriser_contexte_compil($p),
-		(!$supp ? '' : (', ' . join(',', $supp)))
-	);
-
-	$p->interdire_scripts = false;
-
-	return $p;
+    if (!balise_distante_interdite($p)) {
+        $p->code = "''";
+
+        return $p;
+    }
+    // compatibilite: depuis qu'on accepte #BALISE{ses_args} sans [(...)] autour
+    // il faut recracher {...} quand ce n'est finalement pas des args
+    if ($p->fonctions and (!$p->fonctions[0][0]) and $p->fonctions[0][1]) {
+        $p->fonctions = null;
+    }
+
+    if ($p->param and ($c = $p->param[0])) {
+        // liste d'arguments commence toujours par la chaine vide
+        array_shift($c);
+        // construire la liste d'arguments comme pour un filtre
+        $param = compose_filtres_args($p, $c, ',');
+    } else {
+        $param = '';
+    }
+    $collecte = collecter_balise_dynamique($l, $p, $nom);
+
+    $p->code = sprintf(
+        CODE_EXECUTER_BALISE,
+        $nom,
+        join(',', $collecte),
+        ($collecte ? $param : substr($param, 1)), # virer la virgule
+        memoriser_contexte_compil($p),
+        (!$supp ? '' : (', ' . join(',', $supp)))
+    );
+
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 
@@ -646,17 +646,17 @@ 
  *     Liste des codes PHP d'éxecution des balises collectées
  **/
 function collecter_balise_dynamique(array $l, \Champ &$p, string $nom): array {
-	$args = [];
-	foreach ($l as $c) {
-		if ($c === null) {
-			$args[] = 'null';
-		} else {
-			$x = calculer_balise($c, $p);
-			$args[] = $x->code;
-		}
-	}
-
-	return $args;
+    $args = [];
+    foreach ($l as $c) {
+        if ($c === null) {
+            $args[] = 'null';
+        } else {
+            $x = calculer_balise($c, $p);
+            $args[] = $x->code;
+        }
+    }
+
+    return $args;
 }
 
 
@@ -671,22 +671,22 @@ 
  *     Nom de la connexion
  **/
 function trouver_nom_serveur_distant($p) {
-	$nom = $p->id_boucle;
-	if (
-		$nom
-		and isset($p->boucles[$nom])
-	) {
-		$s = $p->boucles[$nom]->sql_serveur;
-		if (
-			strlen($s)
-			and strlen($serveur = strtolower($s))
-			and !in_array($serveur, $GLOBALS['exception_des_connect'])
-		) {
-			return $serveur;
-		}
-	}
-
-	return '';
+    $nom = $p->id_boucle;
+    if (
+        $nom
+        and isset($p->boucles[$nom])
+    ) {
+        $s = $p->boucles[$nom]->sql_serveur;
+        if (
+            strlen($s)
+            and strlen($serveur = strtolower($s))
+            and !in_array($serveur, $GLOBALS['exception_des_connect'])
+        ) {
+            return $serveur;
+        }
+    }
+
+    return '';
 }
 
 
@@ -710,15 +710,15 @@ 
  *     - false : La balise est interdite car le serveur est distant
  **/
 function balise_distante_interdite($p) {
-	$nom = $p->id_boucle;
+    $nom = $p->id_boucle;
 
-	if ($nom and trouver_nom_serveur_distant($p)) {
-		spip_log($nom . ':' . $p->nom_champ . ' ' . _T('zbug_distant_interdit'));
+    if ($nom and trouver_nom_serveur_distant($p)) {
+        spip_log($nom . ':' . $p->nom_champ . ' ' . _T('zbug_distant_interdit'));
 
-		return false;
-	}
+        return false;
+    }
 
-	return true;
+    return true;
 }
 
 
@@ -728,84 +728,84 @@ 
 //
 function champs_traitements($p) {
 
-	if (isset($GLOBALS['table_des_traitements'][$p->nom_champ])) {
-		$ps = $GLOBALS['table_des_traitements'][$p->nom_champ];
-	} else {
-		// quand on utilise un traitement catch-all *
-		// celui-ci ne s'applique pas sur les balises calculees qui peuvent gerer
-		// leur propre securite
-		if (!$p->balise_calculee) {
-			$ps = $GLOBALS['table_des_traitements']['*'];
-		} else {
-			$ps = false;
-		}
-	}
-
-	if (is_array($ps)) {
-		// Recuperer le type de boucle (articles, DATA) et la table SQL sur laquelle elle porte
-		$idb = index_boucle($p);
-		// si le champ a ete trouve dans une boucle parente sa source est renseignee ici
-		if (!empty($p->boucles[$idb]->index_champ[$p->nom_champ])) {
-			$idb = $p->boucles[$idb]->index_champ[$p->nom_champ];
-		}
-
-		// mais on peut aussi etre hors boucle. Se mefier.
-		$type_requete = $p->boucles[$idb]->type_requete ?? false;
-		$table_sql = $p->boucles[$idb]->show['table_sql'] ?? false;
-
-		// bien prendre en compte les alias de boucles (hierarchie => rubrique, syndication => syncdic, etc.)
-		if ($type_requete and isset($GLOBALS['table_des_tables'][$type_requete])) {
-			$type_alias = $type_requete;
-			$type_requete = $GLOBALS['table_des_tables'][$type_requete];
-		} else {
-			$type_alias = false;
-		}
-
-		// le traitement peut n'etre defini que pour une table en particulier "spip_articles"
-		if ($table_sql and isset($ps[$table_sql])) {
-			$ps = $ps[$table_sql];
-		} // ou pour une boucle en particulier "DATA","articles"
-		elseif ($type_requete and isset($ps[$type_requete])) {
-			$ps = $ps[$type_requete];
-		} // ou pour une boucle utilisant un alias ("hierarchie")
-		elseif ($type_alias and isset($ps[$type_alias])) {
-			$ps = $ps[$type_alias];
-		} // ou pour indifféremment quelle que soit la boucle
-		elseif (isset($ps[0])) {
-			$ps = $ps[0];
-		} else {
-			$ps = false;
-		}
-	}
-
-	if (!$ps) {
-		return $p->code;
-	}
-
-	// Si une boucle DOCUMENTS{doublons} est presente dans le squelette,
-	// ou si in INCLURE contient {doublons}
-	// on insere une fonction de remplissage du tableau des doublons
-	// dans les filtres propre() ou typo()
-	// (qui traitent les raccourcis <docXX> referencant les docs)
-
-	if (
-		isset($p->descr['documents'])
-		and
-		$p->descr['documents']
-		and (
-			(strpos($ps, 'propre') !== false)
-			or
-			(strpos($ps, 'typo') !== false)
-		)
-	) {
-		$ps = 'traiter_doublons_documents($doublons, ' . $ps . ')';
-	}
-
-	// La protection des champs par |safehtml est assuree par les extensions
-	// dans la declaration des traitements des champs sensibles
-
-	// Remplacer enfin le placeholder %s par le vrai code de la balise
-	return str_replace('%s', $p->code, $ps);
+    if (isset($GLOBALS['table_des_traitements'][$p->nom_champ])) {
+        $ps = $GLOBALS['table_des_traitements'][$p->nom_champ];
+    } else {
+        // quand on utilise un traitement catch-all *
+        // celui-ci ne s'applique pas sur les balises calculees qui peuvent gerer
+        // leur propre securite
+        if (!$p->balise_calculee) {
+            $ps = $GLOBALS['table_des_traitements']['*'];
+        } else {
+            $ps = false;
+        }
+    }
+
+    if (is_array($ps)) {
+        // Recuperer le type de boucle (articles, DATA) et la table SQL sur laquelle elle porte
+        $idb = index_boucle($p);
+        // si le champ a ete trouve dans une boucle parente sa source est renseignee ici
+        if (!empty($p->boucles[$idb]->index_champ[$p->nom_champ])) {
+            $idb = $p->boucles[$idb]->index_champ[$p->nom_champ];
+        }
+
+        // mais on peut aussi etre hors boucle. Se mefier.
+        $type_requete = $p->boucles[$idb]->type_requete ?? false;
+        $table_sql = $p->boucles[$idb]->show['table_sql'] ?? false;
+
+        // bien prendre en compte les alias de boucles (hierarchie => rubrique, syndication => syncdic, etc.)
+        if ($type_requete and isset($GLOBALS['table_des_tables'][$type_requete])) {
+            $type_alias = $type_requete;
+            $type_requete = $GLOBALS['table_des_tables'][$type_requete];
+        } else {
+            $type_alias = false;
+        }
+
+        // le traitement peut n'etre defini que pour une table en particulier "spip_articles"
+        if ($table_sql and isset($ps[$table_sql])) {
+            $ps = $ps[$table_sql];
+        } // ou pour une boucle en particulier "DATA","articles"
+        elseif ($type_requete and isset($ps[$type_requete])) {
+            $ps = $ps[$type_requete];
+        } // ou pour une boucle utilisant un alias ("hierarchie")
+        elseif ($type_alias and isset($ps[$type_alias])) {
+            $ps = $ps[$type_alias];
+        } // ou pour indifféremment quelle que soit la boucle
+        elseif (isset($ps[0])) {
+            $ps = $ps[0];
+        } else {
+            $ps = false;
+        }
+    }
+
+    if (!$ps) {
+        return $p->code;
+    }
+
+    // Si une boucle DOCUMENTS{doublons} est presente dans le squelette,
+    // ou si in INCLURE contient {doublons}
+    // on insere une fonction de remplissage du tableau des doublons
+    // dans les filtres propre() ou typo()
+    // (qui traitent les raccourcis <docXX> referencant les docs)
+
+    if (
+        isset($p->descr['documents'])
+        and
+        $p->descr['documents']
+        and (
+            (strpos($ps, 'propre') !== false)
+            or
+            (strpos($ps, 'typo') !== false)
+        )
+    ) {
+        $ps = 'traiter_doublons_documents($doublons, ' . $ps . ')';
+    }
+
+    // La protection des champs par |safehtml est assuree par les extensions
+    // dans la declaration des traitements des champs sensibles
+
+    // Remplacer enfin le placeholder %s par le vrai code de la balise
+    return str_replace('%s', $p->code, $ps);
 }
 
 
@@ -817,110 +817,110 @@ 
 //
 function applique_filtres($p) {
 
-	// Traitements standards (cf. supra)
-	if ($p->etoile == '') {
-		$code = champs_traitements($p);
-	} else {
-		$code = $p->code;
-	}
+    // Traitements standards (cf. supra)
+    if ($p->etoile == '') {
+        $code = champs_traitements($p);
+    } else {
+        $code = $p->code;
+    }
 
-	// Appliquer les filtres perso
-	if ($p->param) {
-		$code = compose_filtres($p, $code);
-	}
+    // Appliquer les filtres perso
+    if ($p->param) {
+        $code = compose_filtres($p, $code);
+    }
 
-	// S'il y a un lien avec la session, ajouter un code qui levera
-	// un drapeau dans la structure d'invalidation $Cache
-	if (isset($p->descr['session'])) {
-		$code = "invalideur_session(\$Cache, $code)";
-	}
+    // S'il y a un lien avec la session, ajouter un code qui levera
+    // un drapeau dans la structure d'invalidation $Cache
+    if (isset($p->descr['session'])) {
+        $code = "invalideur_session(\$Cache, $code)";
+    }
 
-	$code = sandbox_composer_interdire_scripts($code, $p);
+    $code = sandbox_composer_interdire_scripts($code, $p);
 
-	return $code;
+    return $code;
 }
 
 // Cf. function pipeline dans ecrire/inc_utils.php
 function compose_filtres(&$p, $code) {
 
-	$image_miette = false;
-	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) {
-			// 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)";
-			$image_miette = false;
-		}
-
-		// recuperer les arguments du filtre,
-		// a separer par "," ou ":" dans le cas du filtre "?{a,b}"
-		$countfiltre = is_countable($filtre) ? count($filtre) : 0;
-		if ($fonc !== '?') {
-			$sep = ',';
-		} else {
-			$sep = ':';
-			// |?{a,b} *doit* avoir exactement 2 arguments ; on les force
-			if ($countfiltre != 2) {
-				$filtre = [$filtre[0] ?? '', $filtre[1] ?? ''];
-				$countfiltre = 2;
-			}
-		}
-		$arglist = compose_filtres_args($p, $filtre, $sep);
-		$logique = filtre_logique($fonc, $code, substr($arglist, 1));
-		if ($logique) {
-			$code = $logique;
-		} else {
-			$code = sandbox_composer_filtre($fonc, $code, $arglist, $p, $countfiltre);
-			if ($is_filtre_image) {
-				$image_miette = true;
-			}
-		}
-	}
-	// ramasser les images intermediaires inutiles et graver l'image finale
-	if ($image_miette) {
-		$code = "filtrer('image_graver',$code)";
-	}
-
-	return $code;
+    $image_miette = false;
+    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) {
+            // 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)";
+            $image_miette = false;
+        }
+
+        // recuperer les arguments du filtre,
+        // a separer par "," ou ":" dans le cas du filtre "?{a,b}"
+        $countfiltre = is_countable($filtre) ? count($filtre) : 0;
+        if ($fonc !== '?') {
+            $sep = ',';
+        } else {
+            $sep = ':';
+            // |?{a,b} *doit* avoir exactement 2 arguments ; on les force
+            if ($countfiltre != 2) {
+                $filtre = [$filtre[0] ?? '', $filtre[1] ?? ''];
+                $countfiltre = 2;
+            }
+        }
+        $arglist = compose_filtres_args($p, $filtre, $sep);
+        $logique = filtre_logique($fonc, $code, substr($arglist, 1));
+        if ($logique) {
+            $code = $logique;
+        } else {
+            $code = sandbox_composer_filtre($fonc, $code, $arglist, $p, $countfiltre);
+            if ($is_filtre_image) {
+                $image_miette = true;
+            }
+        }
+    }
+    // ramasser les images intermediaires inutiles et graver l'image finale
+    if ($image_miette) {
+        $code = "filtrer('image_graver',$code)";
+    }
+
+    return $code;
 }
 
 // Filtres et,ou,oui,non,sinon,xou,xor,and,or,not,yes
 // et comparateurs
 function filtre_logique($fonc, $code, $arg) {
 
-	switch (true) {
-		case in_array($fonc, $GLOBALS['table_criteres_infixes']):
-			return "($code $fonc $arg)";
-		case ($fonc == 'and') or ($fonc == 'et'):
-			return "((($code) AND ($arg)) ?' ' :'')";
-		case ($fonc == 'or') or ($fonc == 'ou'):
-			return "((($code) OR ($arg)) ?' ' :'')";
-		case ($fonc == 'xor') or ($fonc == 'xou'):
-			return "((($code) XOR ($arg)) ?' ' :'')";
-		case ($fonc == 'sinon'):
-			return "(((\$a = $code) OR (is_string(\$a) AND strlen(\$a))) ? \$a : $arg)";
-		case ($fonc == 'not') or ($fonc == 'non'):
-			return "(($code) ?'' :' ')";
-		case ($fonc == 'yes') or ($fonc == 'oui'):
-			return "(($code) ?' ' :'')";
-	}
-
-	return '';
+    switch (true) {
+        case in_array($fonc, $GLOBALS['table_criteres_infixes']):
+            return "($code $fonc $arg)";
+        case ($fonc == 'and') or ($fonc == 'et'):
+            return "((($code) AND ($arg)) ?' ' :'')";
+        case ($fonc == 'or') or ($fonc == 'ou'):
+            return "((($code) OR ($arg)) ?' ' :'')";
+        case ($fonc == 'xor') or ($fonc == 'xou'):
+            return "((($code) XOR ($arg)) ?' ' :'')";
+        case ($fonc == 'sinon'):
+            return "(((\$a = $code) OR (is_string(\$a) AND strlen(\$a))) ? \$a : $arg)";
+        case ($fonc == 'not') or ($fonc == 'non'):
+            return "(($code) ?'' :' ')";
+        case ($fonc == 'yes') or ($fonc == 'oui'):
+            return "(($code) ?' ' :'')";
+    }
+
+    return '';
 }
 
 function compose_filtres_args($p, $args, $sep) {
-	$arglist = '';
-	foreach ($args as $arg) {
-		$arglist .= $sep .
-			calculer_liste($arg, $p->descr, $p->boucles, $p->id_boucle);
-	}
+    $arglist = '';
+    foreach ($args as $arg) {
+        $arglist .= $sep .
+            calculer_liste($arg, $p->descr, $p->boucles, $p->id_boucle);
+    }
 
-	return $arglist;
+    return $arglist;
 }
 
 
@@ -938,15 +938,15 @@ 
  **/
 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);
-		// 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'] ?? null)";
-	}
+    // si recursif, forcer l'extraction du champ SQL mais ignorer le code
+    if ($boucles[$idb]->externe) {
+        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'] ?? null)";
+    }
 
-	return index_pile($boucles[$idb]->id_parent, $nom_champ, $boucles, '', $defaut);
+    return index_pile($boucles[$idb]->id_parent, $nom_champ, $boucles, '', $defaut);
 }
 
 //
@@ -960,30 +960,30 @@ 
 //
 
 function rindex_pile($p, $champ, $motif) {
-	$n = 0;
-	$b = $p->id_boucle;
-	$p->code = '';
-	while ($b != '') {
-		foreach ($p->boucles[$b]->criteres as $critere) {
-			if ($critere->op == $motif) {
-				$p->code = '$Pile[$SP' . (($n == 0) ? '' : "-$n") .
-					"]['$champ']";
-				$b = '';
-				break 2;
-			}
-		}
-		$n++;
-		$b = $p->boucles[$b]->id_parent;
-	}
-
-	// si on est hors d'une boucle de {recherche}, cette balise est vide
-	if (!$p->code) {
-		$p->code = "''";
-	}
-
-	$p->interdire_scripts = false;
-
-	return $p;
+    $n = 0;
+    $b = $p->id_boucle;
+    $p->code = '';
+    while ($b != '') {
+        foreach ($p->boucles[$b]->criteres as $critere) {
+            if ($critere->op == $motif) {
+                $p->code = '$Pile[$SP' . (($n == 0) ? '' : "-$n") .
+                    "]['$champ']";
+                $b = '';
+                break 2;
+            }
+        }
+        $n++;
+        $b = $p->boucles[$b]->id_parent;
+    }
+
+    // si on est hors d'une boucle de {recherche}, cette balise est vide
+    if (!$p->code) {
+        $p->code = "''";
+    }
+
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 /**
@@ -993,7 +993,7 @@ 
  * @return string Nom de la balise, avec indication de boucle explicite si présent.
  */
 function zbug_presenter_champ($p, $champ = '') {
-	$balise = $champ ?: $p->nom_champ;
-	$explicite = $p->nom_boucle ? $p->nom_boucle . ':' : '';
-	return "#{$explicite}{$balise}";
+    $balise = $champ ?: $p->nom_champ;
+    $explicite = $p->nom_boucle ? $p->nom_boucle . ':' : '';
+    return "#{$explicite}{$balise}";
 }

ecrire/inc_version.php

Spacing +21 added lines, -21 removed lines

@@ -51,11 +51,11 @@ 
 define('_DIR_RACINE', _DIR_RESTREINT ? '' : '../');
 
 /** chemin absolu vers la racine */
-define('_ROOT_RACINE', dirname(__DIR__) . '/');
+define('_ROOT_RACINE', dirname(__DIR__).'/');
 /** chemin absolu vers le repertoire de travail */
-define('_ROOT_CWD', getcwd() . '/');
+define('_ROOT_CWD', getcwd().'/');
 /** chemin absolu vers ecrire */
-define('_ROOT_RESTREINT', _ROOT_CWD . _DIR_RESTREINT);
+define('_ROOT_RESTREINT', _ROOT_CWD._DIR_RESTREINT);
 
 // Icones
 if (!defined('_NOM_IMG_PACK')) {
@@ -63,17 +63,17 @@ 
 	define('_NOM_IMG_PACK', 'images/');
 }
 /** le chemin http (relatif) vers les images standard */
-define('_DIR_IMG_PACK', (_DIR_RACINE . 'prive/' . _NOM_IMG_PACK));
+define('_DIR_IMG_PACK', (_DIR_RACINE.'prive/'._NOM_IMG_PACK));
 
 /** le chemin php (absolu) vers les images standard (pour hebergement centralise) */
-define('_ROOT_IMG_PACK', dirname(__DIR__) . '/prive/' . _NOM_IMG_PACK);
+define('_ROOT_IMG_PACK', dirname(__DIR__).'/prive/'._NOM_IMG_PACK);
 
 if (!defined('_JAVASCRIPT')) {
 	/** Nom du repertoire des  bibliotheques JavaScript */
 	define('_JAVASCRIPT', 'javascript/');
 } // utilisable avec #CHEMIN et find_in_path
 /** le nom du repertoire des  bibliotheques JavaScript du prive */
-define('_DIR_JAVASCRIPT', (_DIR_RACINE . 'prive/' . _JAVASCRIPT));
+define('_DIR_JAVASCRIPT', (_DIR_RACINE.'prive/'._JAVASCRIPT));
 
 # Le nom des 4 repertoires modifiables par les scripts lances par httpd
 # Par defaut ces 4 noms seront suffixes par _DIR_RACINE (cf plus bas)
@@ -104,8 +104,8 @@ 
 
 // Son emplacement absolu si on le trouve
 if (
-	@file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . _NOM_CONFIG . '.php')
-	or (@file_exists($f = _ROOT_RESTREINT . _NOM_CONFIG . '.php'))
+	@file_exists($f = _ROOT_RACINE._NOM_PERMANENTS_INACCESSIBLES._NOM_CONFIG.'.php')
+	or (@file_exists($f = _ROOT_RESTREINT._NOM_CONFIG.'.php'))
 ) {
 	/** Emplacement absolu du fichier d'option */
 	define('_FILE_OPTIONS', $f);
@@ -129,7 +129,7 @@ 
 // Inclure l'ecran de securite
 if (
 	!defined('_ECRAN_SECURITE')
-	and @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . 'ecran_securite.php')
+	and @file_exists($f = _ROOT_RACINE._NOM_PERMANENTS_INACCESSIBLES.'ecran_securite.php')
 ) {
 	include $f;
 }
@@ -150,7 +150,7 @@ 
 			// UA plus cibles
 			. '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebook|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MetaURI|Moreover|Rambler|Scooter|ScrubbyBloglines|Yahoo|Yeti'
 			. ',i',
-			(string)$_SERVER['HTTP_USER_AGENT']
+			(string) $_SERVER['HTTP_USER_AGENT']
 		)
 	);
 }
@@ -392,7 +392,7 @@ 
 # la matrice standard (fichiers definissant les fonctions a inclure)
 $spip_matrice = [];
 # les plugins a activer
-$plugins = [];  // voir le contenu du repertoire /plugins/
+$plugins = []; // voir le contenu du repertoire /plugins/
 # les surcharges de include_spip()
 $surcharges = []; // format 'inc_truc' => '/plugins/chose/inc_truc2.php'
 
@@ -470,8 +470,8 @@ 
 //
 // Charger les fonctions liees aux serveurs Http et Sql.
 //
-require_once _ROOT_RESTREINT . 'inc/utils.php';
-require_once _ROOT_RESTREINT . 'base/connect_sql.php';
+require_once _ROOT_RESTREINT.'inc/utils.php';
+require_once _ROOT_RESTREINT.'base/connect_sql.php';
 
 // Definition personnelles eventuelles
 
@@ -494,10 +494,10 @@ 
 // ===> on execute en neutralisant les messages d'erreur
 
 spip_initialisation_core(
-	(_DIR_RACINE . _NOM_PERMANENTS_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_ACCESSIBLES)
+	(_DIR_RACINE._NOM_PERMANENTS_INACCESSIBLES),
+	(_DIR_RACINE._NOM_PERMANENTS_ACCESSIBLES),
+	(_DIR_RACINE._NOM_TEMPORAIRES_INACCESSIBLES),
+	(_DIR_RACINE._NOM_TEMPORAIRES_ACCESSIBLES)
 );
 
 
@@ -552,7 +552,7 @@ 
 		// Si on est dans le site public, dire que qq s'en occupe
 		include_spip('inc/minipres');
 		utiliser_langue_visiteur();
-		echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>" . _T('info_travaux_texte') . '</p>', ['status' => 503]);
+		echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>"._T('info_travaux_texte').'</p>', ['status' => 503]);
 		exit;
 	}
 	// autrement c'est une install ad hoc (spikini...), on sait pas faire
@@ -591,12 +591,12 @@ 
 	}
 	if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
 		include_spip('inc/filtres_mini');
-		header(_HEADER_COMPOSED_BY . " $spip_version_affichee @ www.spip.net + " . url_absolue(_DIR_VAR . 'config.txt'));
+		header(_HEADER_COMPOSED_BY." $spip_version_affichee @ www.spip.net + ".url_absolue(_DIR_VAR.'config.txt'));
 	} else {
 		// header minimal
-		header(_HEADER_COMPOSED_BY . ' @ www.spip.net');
+		header(_HEADER_COMPOSED_BY.' @ www.spip.net');
 	}
 }
 
 $methode = ($_SERVER['REQUEST_METHOD'] ?? ((php_sapi_name() == 'cli') ? 'cli' : ''));
-spip_log($methode . ' ' . self() . ' - ' . _FILE_CONNECT, _LOG_DEBUG);
+spip_log($methode.' '.self().' - '._FILE_CONNECT, _LOG_DEBUG);

Indentation +213 added lines, -213 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -37,15 +37,15 @@ 
 define('_PHP_MAX', '8.1.99');
 
 if (!defined('_DIR_RESTREINT_ABS')) {
-	/** le nom du repertoire ecrire/ */
-	define('_DIR_RESTREINT_ABS', 'ecrire/');
+    /** le nom du repertoire ecrire/ */
+    define('_DIR_RESTREINT_ABS', 'ecrire/');
 }
 
 /** Chemin relatif pour aller dans ecrire
  *  vide si on est dans ecrire, 'ecrire/' sinon */
 define(
-	'_DIR_RESTREINT',
-	(!is_dir(_DIR_RESTREINT_ABS) ? '' : _DIR_RESTREINT_ABS)
+    '_DIR_RESTREINT',
+    (!is_dir(_DIR_RESTREINT_ABS) ? '' : _DIR_RESTREINT_ABS)
 );
 
 /** Chemin relatif pour aller à la racine */
@@ -60,8 +60,8 @@ 
 
 // Icones
 if (!defined('_NOM_IMG_PACK')) {
-	/** Nom du dossier images */
-	define('_NOM_IMG_PACK', 'images/');
+    /** Nom du dossier images */
+    define('_NOM_IMG_PACK', 'images/');
 }
 /** le chemin http (relatif) vers les images standard */
 define('_DIR_IMG_PACK', (_DIR_RACINE . 'prive/' . _NOM_IMG_PACK));
@@ -70,8 +70,8 @@ 
 define('_ROOT_IMG_PACK', dirname(__DIR__) . '/prive/' . _NOM_IMG_PACK);
 
 if (!defined('_JAVASCRIPT')) {
-	/** Nom du repertoire des  bibliotheques JavaScript */
-	define('_JAVASCRIPT', 'javascript/');
+    /** Nom du repertoire des  bibliotheques JavaScript */
+    define('_JAVASCRIPT', 'javascript/');
 } // utilisable avec #CHEMIN et find_in_path
 /** le nom du repertoire des  bibliotheques JavaScript du prive */
 define('_DIR_JAVASCRIPT', (_DIR_RACINE . 'prive/' . _JAVASCRIPT));
@@ -81,47 +81,47 @@ 
 # mais on peut les mettre ailleurs et changer completement les noms
 
 if (!defined('_NOM_TEMPORAIRES_INACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Temporaires Inaccessibles par http:// */
-	define('_NOM_TEMPORAIRES_INACCESSIBLES', 'tmp/');
+    /** Nom du repertoire des fichiers Temporaires Inaccessibles par http:// */
+    define('_NOM_TEMPORAIRES_INACCESSIBLES', 'tmp/');
 }
 if (!defined('_NOM_TEMPORAIRES_ACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Temporaires Accessibles par http:// */
-	define('_NOM_TEMPORAIRES_ACCESSIBLES', 'local/');
+    /** Nom du repertoire des fichiers Temporaires Accessibles par http:// */
+    define('_NOM_TEMPORAIRES_ACCESSIBLES', 'local/');
 }
 if (!defined('_NOM_PERMANENTS_INACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Permanents Inaccessibles par http:// */
-	define('_NOM_PERMANENTS_INACCESSIBLES', 'config/');
+    /** Nom du repertoire des fichiers Permanents Inaccessibles par http:// */
+    define('_NOM_PERMANENTS_INACCESSIBLES', 'config/');
 }
 if (!defined('_NOM_PERMANENTS_ACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Permanents Accessibles par http:// */
-	define('_NOM_PERMANENTS_ACCESSIBLES', 'IMG/');
+    /** Nom du repertoire des fichiers Permanents Accessibles par http:// */
+    define('_NOM_PERMANENTS_ACCESSIBLES', 'IMG/');
 }
 
 
 /** Le nom du fichier de personnalisation */
 if (!defined('_NOM_CONFIG')) {
-	define('_NOM_CONFIG', 'mes_options');
+    define('_NOM_CONFIG', 'mes_options');
 }
 
 // Son emplacement absolu si on le trouve
 if (
-	@file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . _NOM_CONFIG . '.php')
-	or (@file_exists($f = _ROOT_RESTREINT . _NOM_CONFIG . '.php'))
+    @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . _NOM_CONFIG . '.php')
+    or (@file_exists($f = _ROOT_RESTREINT . _NOM_CONFIG . '.php'))
 ) {
-	/** Emplacement absolu du fichier d'option */
-	define('_FILE_OPTIONS', $f);
+    /** Emplacement absolu du fichier d'option */
+    define('_FILE_OPTIONS', $f);
 } else {
-	define('_FILE_OPTIONS', '');
+    define('_FILE_OPTIONS', '');
 }
 
 if (!defined('MODULES_IDIOMES')) {
-	/**
-	 * Modules par défaut pour la traduction.
-	 *
-	 * Constante utilisée par le compilateur et le décompilateur
-	 * sa valeur etant traitée par inc_traduire_dist
-	 */
-	define('MODULES_IDIOMES', 'public|spip|ecrire');
+    /**
+     * Modules par défaut pour la traduction.
+     *
+     * Constante utilisée par le compilateur et le décompilateur
+     * sa valeur etant traitée par inc_traduire_dist
+     */
+    define('MODULES_IDIOMES', 'public|spip|ecrire');
 }
 
 // *** Fin des define *** //
@@ -129,10 +129,10 @@ 
 
 // Inclure l'ecran de securite
 if (
-	!defined('_ECRAN_SECURITE')
-	and @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . 'ecran_securite.php')
+    !defined('_ECRAN_SECURITE')
+    and @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . 'ecran_securite.php')
 ) {
-	include $f;
+    include $f;
 }
 
 
@@ -140,30 +140,30 @@ 
  * Détecteur de robot d'indexation
  */
 if (!defined('_IS_BOT')) {
-	define(
-		'_IS_BOT',
-		isset($_SERVER['HTTP_USER_AGENT'])
-		and preg_match(
-			// mots generiques
-			',bot|slurp|crawler|spider|webvac|yandex|'
-			// MSIE 6.0 est un botnet 99,9% du temps, on traite donc ce USER_AGENT comme un bot
-			. 'MSIE 6\.0|'
-			// UA plus cibles
-			. '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebook|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MetaURI|Moreover|Rambler|Scooter|ScrubbyBloglines|Yahoo|Yeti'
-			. ',i',
-			(string)$_SERVER['HTTP_USER_AGENT']
-		)
-	);
+    define(
+        '_IS_BOT',
+        isset($_SERVER['HTTP_USER_AGENT'])
+        and preg_match(
+            // mots generiques
+            ',bot|slurp|crawler|spider|webvac|yandex|'
+            // MSIE 6.0 est un botnet 99,9% du temps, on traite donc ce USER_AGENT comme un bot
+            . 'MSIE 6\.0|'
+            // UA plus cibles
+            . '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebook|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MetaURI|Moreover|Rambler|Scooter|ScrubbyBloglines|Yahoo|Yeti'
+            . ',i',
+            (string)$_SERVER['HTTP_USER_AGENT']
+        )
+    );
 }
 
 if (!defined('_IS_CLI')) {
-	define(
-		'_IS_CLI',
-		!isset($_SERVER['HTTP_HOST'])
-		and !strlen($_SERVER['DOCUMENT_ROOT'])
-		and !empty($_SERVER['argv'])
-		and empty($_SERVER['REQUEST_METHOD'])
-	);
+    define(
+        '_IS_CLI',
+        !isset($_SERVER['HTTP_HOST'])
+        and !strlen($_SERVER['DOCUMENT_ROOT'])
+        and !empty($_SERVER['argv'])
+        and empty($_SERVER['REQUEST_METHOD'])
+    );
 }
 
 // *** Parametrage par defaut de SPIP ***
@@ -175,61 +175,61 @@ 
 // Ne pas les rendre indefinies.
 
 global
-	$nombre_de_logs,
-	$taille_des_logs,
-	$table_prefix,
-	$cookie_prefix,
-	$dossier_squelettes,
-	$filtrer_javascript,
-	$type_urls,
-	$debut_date_publication,
-	$ip,
-	$mysql_rappel_connexion,
-	$mysql_rappel_nom_base,
-	$test_i18n,
-	$ignore_auth_http,
-	$ignore_remote_user,
-	$derniere_modif_invalide,
-	$home_server,
-	$help_server,
-	$url_glossaire_externe,
-	$tex_server,
-	$traiter_math,
-	$xhtml,
-	$xml_indent,
-	$source_vignettes,
-	$formats_logos,
-	$controler_dates_rss,
-	$spip_pipeline,
-	$spip_matrice,
-	$plugins,
-	$surcharges,
-	$exceptions_des_tables,
-	$tables_principales,
-	$table_des_tables,
-	$tables_auxiliaires,
-	$table_primary,
-	$table_date,
-	$table_titre,
-	$tables_jointures,
-	$liste_des_statuts,
-	$liste_des_etats,
-	$liste_des_authentifications,
-	$spip_version_branche,
-	$spip_version_code,
-	$spip_version_base,
-	$spip_sql_version,
-	$spip_version_affichee,
-	$visiteur_session,
-	$auteur_session,
-	$connect_statut,
-	$connect_toutes_rubriques,
-	$hash_recherche,
-	$hash_recherche_strict,
-	$ldap_present,
-	$meta,
-	$connect_id_rubrique,
-	$puce;
+    $nombre_de_logs,
+    $taille_des_logs,
+    $table_prefix,
+    $cookie_prefix,
+    $dossier_squelettes,
+    $filtrer_javascript,
+    $type_urls,
+    $debut_date_publication,
+    $ip,
+    $mysql_rappel_connexion,
+    $mysql_rappel_nom_base,
+    $test_i18n,
+    $ignore_auth_http,
+    $ignore_remote_user,
+    $derniere_modif_invalide,
+    $home_server,
+    $help_server,
+    $url_glossaire_externe,
+    $tex_server,
+    $traiter_math,
+    $xhtml,
+    $xml_indent,
+    $source_vignettes,
+    $formats_logos,
+    $controler_dates_rss,
+    $spip_pipeline,
+    $spip_matrice,
+    $plugins,
+    $surcharges,
+    $exceptions_des_tables,
+    $tables_principales,
+    $table_des_tables,
+    $tables_auxiliaires,
+    $table_primary,
+    $table_date,
+    $table_titre,
+    $tables_jointures,
+    $liste_des_statuts,
+    $liste_des_etats,
+    $liste_des_authentifications,
+    $spip_version_branche,
+    $spip_version_code,
+    $spip_version_base,
+    $spip_sql_version,
+    $spip_version_affichee,
+    $visiteur_session,
+    $auteur_session,
+    $connect_statut,
+    $connect_toutes_rubriques,
+    $hash_recherche,
+    $hash_recherche_strict,
+    $ldap_present,
+    $meta,
+    $connect_id_rubrique,
+    $puce;
 
 # comment on logge, defaut 4 tmp/spip.log de 100k, 0 ou 0 suppriment le log
 $nombre_de_logs = 4;
@@ -284,48 +284,48 @@ 
 // Prendre en compte les entetes HTTP_X_FORWARDED_XX
 //
 if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
-	if (empty($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-		$_SERVER['HTTP_X_FORWARDED_HOST'] = $_SERVER['HTTP_HOST'];
-	}
-	if (empty($_SERVER['HTTP_X_FORWARDED_PORT'])) {
-		$_SERVER['HTTP_X_FORWARDED_PORT'] = 443;
-	}
+    if (empty($_SERVER['HTTP_X_FORWARDED_HOST'])) {
+        $_SERVER['HTTP_X_FORWARDED_HOST'] = $_SERVER['HTTP_HOST'];
+    }
+    if (empty($_SERVER['HTTP_X_FORWARDED_PORT'])) {
+        $_SERVER['HTTP_X_FORWARDED_PORT'] = 443;
+    }
 }
 if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-	if (isset($_SERVER['HTTP_X_FORWARDED_PORT']) and is_numeric($_SERVER['HTTP_X_FORWARDED_PORT'])) {
-		$_SERVER['SERVER_PORT'] = $_SERVER['HTTP_X_FORWARDED_PORT'];
-		if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
-			$_SERVER['HTTPS'] = 'on';
-			if (isset($_SERVER['REQUEST_SCHEME'])) {
-				$_SERVER['REQUEST_SCHEME'] = 'https';
-			}
-		}
-	}
-	$host = $_SERVER['HTTP_X_FORWARDED_HOST'];
-	if (strpos($host, ',') !== false) {
-		$h = explode(',', $host);
-		$host = trim(reset($h));
-	}
-	// securite sur le contenu de l'entete
-	$host = strtr($host, "<>?\"\{\}\$'` \r\n", '____________');
-	$_SERVER['HTTP_HOST'] = $host;
+    if (isset($_SERVER['HTTP_X_FORWARDED_PORT']) and is_numeric($_SERVER['HTTP_X_FORWARDED_PORT'])) {
+        $_SERVER['SERVER_PORT'] = $_SERVER['HTTP_X_FORWARDED_PORT'];
+        if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
+            $_SERVER['HTTPS'] = 'on';
+            if (isset($_SERVER['REQUEST_SCHEME'])) {
+                $_SERVER['REQUEST_SCHEME'] = 'https';
+            }
+        }
+    }
+    $host = $_SERVER['HTTP_X_FORWARDED_HOST'];
+    if (strpos($host, ',') !== false) {
+        $h = explode(',', $host);
+        $host = trim(reset($h));
+    }
+    // securite sur le contenu de l'entete
+    $host = strtr($host, "<>?\"\{\}\$'` \r\n", '____________');
+    $_SERVER['HTTP_HOST'] = $host;
 }
 //
 // On note le numero IP du client dans la variable $ip
 //
 if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
-	$ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
-	if (strpos($ip, ',') !== false) {
-		$ip = explode(',', $ip);
-		$ip = reset($ip);
-	}
-	// ecraser $_SERVER['REMOTE_ADDR'] si elle est en localhost
-	if (isset($_SERVER['REMOTE_ADDR']) and $_SERVER['REMOTE_ADDR'] === '127.0.0.1') {
-		$_SERVER['REMOTE_ADDR'] = $ip;
-	}
+    $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
+    if (strpos($ip, ',') !== false) {
+        $ip = explode(',', $ip);
+        $ip = reset($ip);
+    }
+    // ecraser $_SERVER['REMOTE_ADDR'] si elle est en localhost
+    if (isset($_SERVER['REMOTE_ADDR']) and $_SERVER['REMOTE_ADDR'] === '127.0.0.1') {
+        $_SERVER['REMOTE_ADDR'] = $ip;
+    }
 }
 if (isset($_SERVER['REMOTE_ADDR'])) {
-	$ip = $_SERVER['REMOTE_ADDR'];
+    $ip = $_SERVER['REMOTE_ADDR'];
 }
 
 // Pour renforcer la privacy, decommentez la ligne ci-dessous (ou recopiez-la
@@ -410,24 +410,24 @@ 
 
 // Liste des statuts.
 $liste_des_statuts = [
-	'info_administrateurs' => '0minirezo',
-	'info_redacteurs' => '1comite',
-	'info_visiteurs' => '6forum',
-	'texte_statut_poubelle' => '5poubelle'
+    'info_administrateurs' => '0minirezo',
+    'info_redacteurs' => '1comite',
+    'info_visiteurs' => '6forum',
+    'texte_statut_poubelle' => '5poubelle'
 ];
 
 $liste_des_etats = [
-	'texte_statut_en_cours_redaction' => 'prepa',
-	'texte_statut_propose_evaluation' => 'prop',
-	'texte_statut_publie' => 'publie',
-	'texte_statut_poubelle' => 'poubelle',
-	'texte_statut_refuse' => 'refuse'
+    'texte_statut_en_cours_redaction' => 'prepa',
+    'texte_statut_propose_evaluation' => 'prop',
+    'texte_statut_publie' => 'publie',
+    'texte_statut_poubelle' => 'poubelle',
+    'texte_statut_refuse' => 'refuse'
 ];
 
 // liste des methodes d'authentifications
 $liste_des_authentifications = [
-	'spip' => 'spip',
-	'ldap' => 'ldap'
+    'spip' => 'spip',
+    'ldap' => 'ldap'
 ];
 
 // Experimental : pour supprimer systematiquement l'affichage des numeros
@@ -477,12 +477,12 @@ 
 // Definition personnelles eventuelles
 
 if (_FILE_OPTIONS) {
-	include_once _FILE_OPTIONS;
+    include_once _FILE_OPTIONS;
 }
 
 if (!defined('SPIP_ERREUR_REPORT')) {
-	/** Masquer les warning */
-	define('SPIP_ERREUR_REPORT', E_ALL ^ E_NOTICE ^ E_DEPRECATED);
+    /** Masquer les warning */
+    define('SPIP_ERREUR_REPORT', E_ALL ^ E_NOTICE ^ E_DEPRECATED);
 }
 error_reporting(SPIP_ERREUR_REPORT);
 
@@ -495,10 +495,10 @@ 
 // ===> on execute en neutralisant les messages d'erreur
 
 spip_initialisation_core(
-	(_DIR_RACINE . _NOM_PERMANENTS_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_ACCESSIBLES)
+    (_DIR_RACINE . _NOM_PERMANENTS_INACCESSIBLES),
+    (_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES),
+    (_DIR_RACINE . _NOM_TEMPORAIRES_INACCESSIBLES),
+    (_DIR_RACINE . _NOM_TEMPORAIRES_ACCESSIBLES)
 );
 
 
@@ -508,70 +508,70 @@ 
 // donc il faut avoir tout fini ici avant de charger les plugins
 
 if (@is_readable(_CACHE_PLUGINS_OPT) and @is_readable(_CACHE_PLUGINS_PATH)) {
-	// chargement optimise precompile
-	include_once(_CACHE_PLUGINS_OPT);
+    // chargement optimise precompile
+    include_once(_CACHE_PLUGINS_OPT);
 } else {
-	spip_initialisation_suite();
-	include_spip('inc/plugin');
-	// generer les fichiers php precompiles
-	// de chargement des plugins et des pipelines
-	actualise_plugins_actifs();
+    spip_initialisation_suite();
+    include_spip('inc/plugin');
+    // generer les fichiers php precompiles
+    // de chargement des plugins et des pipelines
+    actualise_plugins_actifs();
 }
 
 // Initialisations non critiques surchargeables par les plugins
 spip_initialisation_suite();
 
 if (!defined('_LOG_FILTRE_GRAVITE')) {
-	/** niveau maxi d'enregistrement des logs */
-	define('_LOG_FILTRE_GRAVITE', _LOG_INFO_IMPORTANTE);
+    /** niveau maxi d'enregistrement des logs */
+    define('_LOG_FILTRE_GRAVITE', _LOG_INFO_IMPORTANTE);
 }
 
 if (!defined('_OUTILS_DEVELOPPEURS')) {
-	/** Activer des outils pour développeurs ? */
-	define('_OUTILS_DEVELOPPEURS', false);
+    /** Activer des outils pour développeurs ? */
+    define('_OUTILS_DEVELOPPEURS', false);
 }
 
 // charger systematiquement inc/autoriser dans l'espace restreint
 if (test_espace_prive()) {
-	include_spip('inc/autoriser');
+    include_spip('inc/autoriser');
 }
 //
 // Installer Spip si pas installe... sauf si justement on est en train
 //
 if (
-	!(_FILE_CONNECT
-	or autoriser_sans_cookie(_request('exec'))
-	or _request('action') == 'cookie'
-	or _request('action') == 'converser'
-	or _request('action') == 'test_dirs')
+    !(_FILE_CONNECT
+    or autoriser_sans_cookie(_request('exec'))
+    or _request('action') == 'cookie'
+    or _request('action') == 'converser'
+    or _request('action') == 'test_dirs')
 ) {
-	// Si on peut installer, on lance illico
-	if (test_espace_prive()) {
-		include_spip('inc/headers');
-		redirige_url_ecrire('install');
-	} else {
-		// Si on est dans le site public, dire que qq s'en occupe
-		include_spip('inc/minipres');
-		utiliser_langue_visiteur();
-		echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>" . _T('info_travaux_texte') . '</p>', ['status' => 503]);
-		exit;
-	}
-	// autrement c'est une install ad hoc (spikini...), on sait pas faire
+    // Si on peut installer, on lance illico
+    if (test_espace_prive()) {
+        include_spip('inc/headers');
+        redirige_url_ecrire('install');
+    } else {
+        // Si on est dans le site public, dire que qq s'en occupe
+        include_spip('inc/minipres');
+        utiliser_langue_visiteur();
+        echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>" . _T('info_travaux_texte') . '</p>', ['status' => 503]);
+        exit;
+    }
+    // autrement c'est une install ad hoc (spikini...), on sait pas faire
 }
 
 // memoriser un tri sessionne eventuel
 if (
-	isset($_REQUEST['var_memotri'])
-	and $t = $_REQUEST['var_memotri']
-	and (strncmp($t, 'trisession', 10) == 0 or strncmp($t, 'senssession', 11) == 0)
+    isset($_REQUEST['var_memotri'])
+    and $t = $_REQUEST['var_memotri']
+    and (strncmp($t, 'trisession', 10) == 0 or strncmp($t, 'senssession', 11) == 0)
 ) {
-	if (!function_exists('session_set')) {
-		include_spip('inc/session');
-	}
-	$t = preg_replace(',\W,', '_', $t);
-	if ($v = _request($t)) {
-		session_set($t, $v);
-	}
+    if (!function_exists('session_set')) {
+        include_spip('inc/session');
+    }
+    $t = preg_replace(',\W,', '_', $t);
+    if ($v = _request($t)) {
+        session_set($t, $v);
+    }
 }
 
 /**
@@ -581,22 +581,22 @@ 
  * La globale $spip_header_silencieux permet de rendre le header minimal pour raisons de securite
  */
 if (!defined('_HEADER_COMPOSED_BY')) {
-	define('_HEADER_COMPOSED_BY', 'Composed-By: SPIP');
+    define('_HEADER_COMPOSED_BY', 'Composed-By: SPIP');
 }
 if (!headers_sent() and _HEADER_COMPOSED_BY) {
-	if (!defined('_HEADER_VARY')) {
-		define('_HEADER_VARY', 'Vary: Cookie, Accept-Encoding');
-	}
-	if (_HEADER_VARY) {
-		header(_HEADER_VARY);
-	}
-	if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
-		include_spip('inc/filtres_mini');
-		header(_HEADER_COMPOSED_BY . " $spip_version_affichee @ www.spip.net + " . url_absolue(_DIR_VAR . 'config.txt'));
-	} else {
-		// header minimal
-		header(_HEADER_COMPOSED_BY . ' @ www.spip.net');
-	}
+    if (!defined('_HEADER_VARY')) {
+        define('_HEADER_VARY', 'Vary: Cookie, Accept-Encoding');
+    }
+    if (_HEADER_VARY) {
+        header(_HEADER_VARY);
+    }
+    if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
+        include_spip('inc/filtres_mini');
+        header(_HEADER_COMPOSED_BY . " $spip_version_affichee @ www.spip.net + " . url_absolue(_DIR_VAR . 'config.txt'));
+    } else {
+        // header minimal
+        header(_HEADER_COMPOSED_BY . ' @ www.spip.net');
+    }
 }
 
 $methode = ($_SERVER['REQUEST_METHOD'] ?? ((php_sapi_name() == 'cli') ? 'cli' : ''));

ecrire/exec/base_repair.php

Indentation +22 added lines, -22 removed lines

@@ -23,7 +23,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -31,25 +31,25 @@ 
  * Réparer la base de données
  */
 function exec_base_repair_dist() {
-	$action = null;
-	$ok = false;
-	if (!spip_connect()) {
-		$message = _T('titre_probleme_technique');
-	} else {
-		$version_sql = sql_version();
-		if (!$version_sql) {
-			$message = _T('avis_erreur_connexion_mysql');
-		} else {
-			$message = _T('texte_requetes_echouent');
-			$ok = true;
-		}
-		$action = _T('texte_tenter_reparation');
-	}
-	if ($ok) {
-		$admin = charger_fonction('admin', 'inc');
-		echo $admin('repair', $action, $message, true);
-	} else {
-		include_spip('inc/minipres');
-		echo minipres(_T('titre_reparation'), "<p>$message</p>");
-	}
+    $action = null;
+    $ok = false;
+    if (!spip_connect()) {
+        $message = _T('titre_probleme_technique');
+    } else {
+        $version_sql = sql_version();
+        if (!$version_sql) {
+            $message = _T('avis_erreur_connexion_mysql');
+        } else {
+            $message = _T('texte_requetes_echouent');
+            $ok = true;
+        }
+        $action = _T('texte_tenter_reparation');
+    }
+    if ($ok) {
+        $admin = charger_fonction('admin', 'inc');
+        echo $admin('repair', $action, $message, true);
+    } else {
+        include_spip('inc/minipres');
+        echo minipres(_T('titre_reparation'), "<p>$message</p>");
+    }
 }

ecrire/exec/admin_plugin.php

Spacing +9 added lines, -9 removed lines

@@ -147,11 +147,11 @@ 
 	if ($quoi !== 'actifs') {
 		$lpf = liste_plugin_files();
 		if ($lpf) {
-			echo '<p>' . _T('texte_presente_plugin') . '</p>';
+			echo '<p>'._T('texte_presente_plugin').'</p>';
 		} else {
 			if (!@is_dir(_DIR_PLUGINS)) {
-				echo '<p>' . _T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
-					. ' &mdash; ' . _T('plugin_info_automatique_creer') . '</p>';
+				echo '<p>'._T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
+					. ' &mdash; '._T('plugin_info_automatique_creer').'</p>';
 			}
 		}
 		$lcpaffiche = $lpf;
@@ -172,10 +172,10 @@ 
 		if (defined('_DIR_PLUGINS_SUPPL')) {
 			$nb += is_countable($lcpas) ? count($lcpas) : 0;
 		}
-		echo '<h3>' . sinon(
+		echo '<h3>'.sinon(
 			singulier_ou_pluriel($nb, 'plugins_actif_un', 'plugins_actifs', 'count'),
 			_T('plugins_actif_aucun')
-		) . '</h3>';
+		).'</h3>';
 	}
 
 	if (empty($format)) {
@@ -192,7 +192,7 @@ 
 
 	if ($corps) {
 		$corps .= "\n<div class='boutons' style='display:none;'>"
-			. "<input type='submit' class='submit save' value='" . _T('bouton_enregistrer')
+			. "<input type='submit' class='submit save' value='"._T('bouton_enregistrer')
 			. "' />"
 			. '</div>';
 	}
@@ -266,7 +266,7 @@ 
 		. debut_cadre_trait_couleur('', true, '', _T('plugins_liste_dist'), 'liste_plugins_dist')
 		. '<p>'
 		. _T('plugin_info_plugins_dist_1', ['plugins_dist' => joli_repertoire(_DIR_PLUGINS_DIST)])
-		. '<br />' . _T('plugin_info_plugins_dist_2')
+		. '<br />'._T('plugin_info_plugins_dist_2')
 		. '</p>'
 		. $liste
 		. fin_cadre_trait_couleur()
@@ -289,7 +289,7 @@ 
 	$res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
 	$res .= '<dl>';
 	foreach ($libs as $lib => $rep) {
-		$res .= "<dt>$lib</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
+		$res .= "<dt>$lib</dt><dd>".joli_repertoire($rep)."</dd>\n";
 	}
 	$res .= '</dl>';
 	$res .= fin_cadre_enfonce();
@@ -308,7 +308,7 @@ 
 	$libs = [];
 	foreach (array_reverse(creer_chemin()) as $d) {
 		if (
-			is_dir($dir = $d . 'lib/')
+			is_dir($dir = $d.'lib/')
 			and $t = opendir($dir)
 		) {
 			while (($f = readdir($t)) !== false) {

Indentation +203 added lines, -203 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/config');
@@ -37,26 +37,26 @@ 
  */
 function exec_admin_plugin_dist($retour = '') {
 
-	if (!autoriser('configurer', '_plugins')) {
-		include_spip('inc/minipres');
-		echo minipres();
-	} else {
-		// on fait la verif du path avant tout,
-		// et l'installation des qu'on est dans la colonne principale
-		// si jamais la liste des plugins actifs change, il faut faire un refresh du hit
-		// pour etre sur que les bons fichiers seront charges lors de l'install
-		$new = actualise_plugins_actifs();
-		if ($new and _request('actualise') < 2) {
-			include_spip('inc/headers');
-			if (isset($GLOBALS['fichier_php_compile_recent'])) {
-				// attendre eventuellement l'invalidation du cache opcode
-				spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
-			}
-			redirige_par_entete(parametre_url(self(), 'actualise', _request('actualise') + 1, '&'));
-		} else {
-			admin_plug_args(_request('voir'), _request('erreur'), _request('format'));
-		}
-	}
+    if (!autoriser('configurer', '_plugins')) {
+        include_spip('inc/minipres');
+        echo minipres();
+    } else {
+        // on fait la verif du path avant tout,
+        // et l'installation des qu'on est dans la colonne principale
+        // si jamais la liste des plugins actifs change, il faut faire un refresh du hit
+        // pour etre sur que les bons fichiers seront charges lors de l'install
+        $new = actualise_plugins_actifs();
+        if ($new and _request('actualise') < 2) {
+            include_spip('inc/headers');
+            if (isset($GLOBALS['fichier_php_compile_recent'])) {
+                // attendre eventuellement l'invalidation du cache opcode
+                spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
+            }
+            redirige_par_entete(parametre_url(self(), 'actualise', _request('actualise') + 1, '&'));
+        } else {
+            admin_plug_args(_request('voir'), _request('erreur'), _request('format'));
+        }
+    }
 }
 
 /**
@@ -81,132 +81,132 @@ 
  *     Format d'affichage (liste ou arborescence)
  **/
 function admin_plug_args($quoi, $erreur, $format) {
-	$lpf = null;
-	$lcpas = null;
-	$lcpaffichesup = null;
-	if (!$quoi) {
-		$quoi = 'actifs';
-	}
-	// empecher l'affichage des erreurs dans le bandeau, on le donne ensuite
-	// format brut par plugin
-	$GLOBALS['erreurs_activation_raw'] = plugin_donne_erreurs(true, false);
-	// format resume mis en forme
-	$erreur_activation = plugin_donne_erreurs();
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page(_T('icone_admin_plugin'), 'configuration', 'plugin');
-
-	echo debut_gauche();
-	echo recuperer_fond('prive/squelettes/navigation/configurer', ['exec' => 'admin_plugin']);
-
-	echo pipeline(
-		'affiche_gauche',
-		[
-			'args' => ['exec' => 'admin_plugin'],
-			'data' => afficher_librairies()
-		]
-	);
-
-	echo debut_droite();
-	echo gros_titre(_T('icone_admin_plugin'), '');
-
-	// Barre d'onglets de premier niveau
-	echo barre_onglets('plugins', 'plugins_actifs');
-	// Barre d'onglets de second niveau
-	$onglet2 = $quoi == 'actifs' ? 'plugins_actifs' : 'admin_plugin';
-	echo debut_onglet('onglets_simple second');
-	echo onglet(_T('plugins_tous_liste'), generer_url_ecrire('admin_plugin', 'voir=tous'), 'admin_plugin', $onglet2);
-	echo onglet(_T('plugins_actifs_liste'), generer_url_ecrire('admin_plugin'), 'plugins_actifs', $onglet2);
-	echo fin_onglet();
-
-	// message d'erreur au retour d'une operation
-	if ($erreur) {
-		echo "<div class='error'>".spip_htmlspecialchars($erreur)."</div>";
-	}
-	if ($erreur_activation) {
-		echo "<div class='error'>$erreur_activation</div>";
-	}
-
-	// la mise a jour de cette meta a ete faite par ecrire_plugin_actifs
-	$actifs = (array) unserialize($GLOBALS['meta']['plugin']);
-	$lcpa = $actifs + (array) unserialize($GLOBALS['meta']['plugin_attente']);
-
-	// Les affichages se basent sur le repertoire, pas sur le nom
-	$actifs = liste_chemin_plugin($actifs, '');
-	if (defined('_DIR_PLUGINS_SUPPL')) {
-		$lcpas = liste_chemin_plugin($lcpa, _DIR_PLUGINS_SUPPL);
-	}
-	$lcpa = liste_chemin_plugin($lcpa);
-
-	// on installe les plugins maintenant,
-	// cela permet aux scripts d'install de faire des affichages (moches...)
-	plugin_installes_meta();
-
-	echo "<div class='liste-plugins formulaire_spip'>";
-	echo debut_cadre_trait_couleur('plugin-24.png', true, '', _T('plugins_liste'), 'plugins');
-
-	if ($quoi !== 'actifs') {
-		$lpf = liste_plugin_files();
-		if ($lpf) {
-			echo '<p>' . _T('texte_presente_plugin') . '</p>';
-		} else {
-			if (!@is_dir(_DIR_PLUGINS)) {
-				echo '<p>' . _T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
-					. ' &mdash; ' . _T('plugin_info_automatique_creer') . '</p>';
-			}
-		}
-		$lcpaffiche = $lpf;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$lcpaffichesup = liste_plugin_files(_DIR_PLUGINS_SUPPL);
-		}
-	} else {
-		// la liste
-		// $quoi=='actifs'
-		$lcpaffiche = $lcpa;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$lcpaffichesup = $lcpas;
-		}
-	}
-
-	if ($quoi == 'actifs' or $lpf) {
-		$nb = is_countable($lcpa) ? count($lcpa) : 0;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$nb += is_countable($lcpas) ? count($lcpas) : 0;
-		}
-		echo '<h3>' . sinon(
-			singulier_ou_pluriel($nb, 'plugins_actif_un', 'plugins_actifs', 'count'),
-			_T('plugins_actif_aucun')
-		) . '</h3>';
-	}
-
-	if (empty($format)) {
-		$format = 'liste';
-	} elseif (!in_array($format, ['liste', 'repertoires'])) {
-		$format = 'repertoires';
-	}
-
-	$afficher = charger_fonction("afficher_$format", 'plugins');
-	$corps = $afficher(self(), $lcpaffiche, $lcpa, $actifs);
-	if (defined('_DIR_PLUGINS_SUPPL')) {
-		$corps .= $afficher(self(), $lcpaffichesup, $lcpas, $actifs, _DIR_PLUGINS_SUPPL);
-	}
-
-	if ($corps) {
-		$corps .= "\n<div class='boutons' style='display:none;'>"
-			. "<input type='submit' class='submit save' value='" . _T('bouton_enregistrer')
-			. "' />"
-			. '</div>';
-	}
-
-	echo redirige_action_post('activer_plugins', 'activer', 'admin_plugin', '', $corps);
-
-	echo fin_cadre_trait_couleur();
-
-	if ($quoi == 'actifs') {
-		echo affiche_les_plugins_verrouilles($actifs);
-	}
-	echo '</div>';
-
-	echo http_script("
+    $lpf = null;
+    $lcpas = null;
+    $lcpaffichesup = null;
+    if (!$quoi) {
+        $quoi = 'actifs';
+    }
+    // empecher l'affichage des erreurs dans le bandeau, on le donne ensuite
+    // format brut par plugin
+    $GLOBALS['erreurs_activation_raw'] = plugin_donne_erreurs(true, false);
+    // format resume mis en forme
+    $erreur_activation = plugin_donne_erreurs();
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page(_T('icone_admin_plugin'), 'configuration', 'plugin');
+
+    echo debut_gauche();
+    echo recuperer_fond('prive/squelettes/navigation/configurer', ['exec' => 'admin_plugin']);
+
+    echo pipeline(
+        'affiche_gauche',
+        [
+            'args' => ['exec' => 'admin_plugin'],
+            'data' => afficher_librairies()
+        ]
+    );
+
+    echo debut_droite();
+    echo gros_titre(_T('icone_admin_plugin'), '');
+
+    // Barre d'onglets de premier niveau
+    echo barre_onglets('plugins', 'plugins_actifs');
+    // Barre d'onglets de second niveau
+    $onglet2 = $quoi == 'actifs' ? 'plugins_actifs' : 'admin_plugin';
+    echo debut_onglet('onglets_simple second');
+    echo onglet(_T('plugins_tous_liste'), generer_url_ecrire('admin_plugin', 'voir=tous'), 'admin_plugin', $onglet2);
+    echo onglet(_T('plugins_actifs_liste'), generer_url_ecrire('admin_plugin'), 'plugins_actifs', $onglet2);
+    echo fin_onglet();
+
+    // message d'erreur au retour d'une operation
+    if ($erreur) {
+        echo "<div class='error'>".spip_htmlspecialchars($erreur)."</div>";
+    }
+    if ($erreur_activation) {
+        echo "<div class='error'>$erreur_activation</div>";
+    }
+
+    // la mise a jour de cette meta a ete faite par ecrire_plugin_actifs
+    $actifs = (array) unserialize($GLOBALS['meta']['plugin']);
+    $lcpa = $actifs + (array) unserialize($GLOBALS['meta']['plugin_attente']);
+
+    // Les affichages se basent sur le repertoire, pas sur le nom
+    $actifs = liste_chemin_plugin($actifs, '');
+    if (defined('_DIR_PLUGINS_SUPPL')) {
+        $lcpas = liste_chemin_plugin($lcpa, _DIR_PLUGINS_SUPPL);
+    }
+    $lcpa = liste_chemin_plugin($lcpa);
+
+    // on installe les plugins maintenant,
+    // cela permet aux scripts d'install de faire des affichages (moches...)
+    plugin_installes_meta();
+
+    echo "<div class='liste-plugins formulaire_spip'>";
+    echo debut_cadre_trait_couleur('plugin-24.png', true, '', _T('plugins_liste'), 'plugins');
+
+    if ($quoi !== 'actifs') {
+        $lpf = liste_plugin_files();
+        if ($lpf) {
+            echo '<p>' . _T('texte_presente_plugin') . '</p>';
+        } else {
+            if (!@is_dir(_DIR_PLUGINS)) {
+                echo '<p>' . _T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
+                    . ' &mdash; ' . _T('plugin_info_automatique_creer') . '</p>';
+            }
+        }
+        $lcpaffiche = $lpf;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $lcpaffichesup = liste_plugin_files(_DIR_PLUGINS_SUPPL);
+        }
+    } else {
+        // la liste
+        // $quoi=='actifs'
+        $lcpaffiche = $lcpa;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $lcpaffichesup = $lcpas;
+        }
+    }
+
+    if ($quoi == 'actifs' or $lpf) {
+        $nb = is_countable($lcpa) ? count($lcpa) : 0;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $nb += is_countable($lcpas) ? count($lcpas) : 0;
+        }
+        echo '<h3>' . sinon(
+            singulier_ou_pluriel($nb, 'plugins_actif_un', 'plugins_actifs', 'count'),
+            _T('plugins_actif_aucun')
+        ) . '</h3>';
+    }
+
+    if (empty($format)) {
+        $format = 'liste';
+    } elseif (!in_array($format, ['liste', 'repertoires'])) {
+        $format = 'repertoires';
+    }
+
+    $afficher = charger_fonction("afficher_$format", 'plugins');
+    $corps = $afficher(self(), $lcpaffiche, $lcpa, $actifs);
+    if (defined('_DIR_PLUGINS_SUPPL')) {
+        $corps .= $afficher(self(), $lcpaffichesup, $lcpas, $actifs, _DIR_PLUGINS_SUPPL);
+    }
+
+    if ($corps) {
+        $corps .= "\n<div class='boutons' style='display:none;'>"
+            . "<input type='submit' class='submit save' value='" . _T('bouton_enregistrer')
+            . "' />"
+            . '</div>';
+    }
+
+    echo redirige_action_post('activer_plugins', 'activer', 'admin_plugin', '', $corps);
+
+    echo fin_cadre_trait_couleur();
+
+    if ($quoi == 'actifs') {
+        echo affiche_les_plugins_verrouilles($actifs);
+    }
+    echo '</div>';
+
+    echo http_script("
 	jQuery(function(){
 		jQuery('.plugins li.item a[rel=info]').click(function(){
 			var li = jQuery(this).parents('li').eq(0);
@@ -232,15 +232,15 @@ 
 	});
 	");
 
-	echo pipeline(
-		'affiche_milieu',
-		[
-			'args' => ['exec' => 'admin_plugin'],
-			'data' => ''
-		]
-	);
+    echo pipeline(
+        'affiche_milieu',
+        [
+            'args' => ['exec' => 'admin_plugin'],
+            'data' => ''
+        ]
+    );
 
-	echo fin_gauche(), fin_page();
+    echo fin_gauche(), fin_page();
 }
 
 /**
@@ -254,23 +254,23 @@ 
  *     Code HTML
  **/
 function affiche_les_plugins_verrouilles($actifs) {
-	if ((!$liste = liste_plugin_files(_DIR_PLUGINS_DIST))) {
-		return '';
-	}
-
-	$afficher = charger_fonction('afficher_liste', 'plugins');
-	$liste = $afficher(self(), $liste, [], $actifs, _DIR_PLUGINS_DIST);
-
-	return
-		"<div id='plugins_dist'>"
-		. debut_cadre_trait_couleur('', true, '', _T('plugins_liste_dist'), 'liste_plugins_dist')
-		. '<p>'
-		. _T('plugin_info_plugins_dist_1', ['plugins_dist' => joli_repertoire(_DIR_PLUGINS_DIST)])
-		. '<br />' . _T('plugin_info_plugins_dist_2')
-		. '</p>'
-		. $liste
-		. fin_cadre_trait_couleur()
-		. "</div>\n";
+    if ((!$liste = liste_plugin_files(_DIR_PLUGINS_DIST))) {
+        return '';
+    }
+
+    $afficher = charger_fonction('afficher_liste', 'plugins');
+    $liste = $afficher(self(), $liste, [], $actifs, _DIR_PLUGINS_DIST);
+
+    return
+        "<div id='plugins_dist'>"
+        . debut_cadre_trait_couleur('', true, '', _T('plugins_liste_dist'), 'liste_plugins_dist')
+        . '<p>'
+        . _T('plugin_info_plugins_dist_1', ['plugins_dist' => joli_repertoire(_DIR_PLUGINS_DIST)])
+        . '<br />' . _T('plugin_info_plugins_dist_2')
+        . '</p>'
+        . $liste
+        . fin_cadre_trait_couleur()
+        . "</div>\n";
 }
 
 /**
@@ -282,19 +282,19 @@ 
  */
 function afficher_librairies() {
 
-	if (!$libs = liste_librairies()) {
-		return '';
-	}
-	ksort($libs);
-	$res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
-	$res .= '<dl>';
-	foreach ($libs as $lib => $rep) {
-		$res .= "<dt>$lib</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
-	}
-	$res .= '</dl>';
-	$res .= fin_cadre_enfonce();
-
-	return $res;
+    if (!$libs = liste_librairies()) {
+        return '';
+    }
+    ksort($libs);
+    $res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
+    $res .= '<dl>';
+    foreach ($libs as $lib => $rep) {
+        $res .= "<dt>$lib</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
+    }
+    $res .= '</dl>';
+    $res .= fin_cadre_enfonce();
+
+    return $res;
 }
 
 
@@ -305,22 +305,22 @@ 
  *     Tableau (nom de la lib => repertoire , ...)
  */
 function liste_librairies() {
-	$libs = [];
-	foreach (array_reverse(creer_chemin()) as $d) {
-		if (
-			is_dir($dir = $d . 'lib/')
-			and $t = opendir($dir)
-		) {
-			while (($f = readdir($t)) !== false) {
-				if (
-					$f[0] != '.'
-					and is_dir("$dir/$f")
-				) {
-					$libs[$f] = $dir;
-				}
-			}
-		}
-	}
-
-	return $libs;
+    $libs = [];
+    foreach (array_reverse(creer_chemin()) as $d) {
+        if (
+            is_dir($dir = $d . 'lib/')
+            and $t = opendir($dir)
+        ) {
+            while (($f = readdir($t)) !== false) {
+                if (
+                    $f[0] != '.'
+                    and is_dir("$dir/$f")
+                ) {
+                    $libs[$f] = $dir;
+                }
+            }
+        }
+    }
+
+    return $libs;
 }

ecrire/exec/demande_mise_a_jour.php

Indentation +24 added lines, -24 removed lines

@@ -20,7 +20,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -28,29 +28,29 @@ 
  * Demander à mettre à jour la base de données
  */
 function exec_demande_mise_a_jour_dist() {
-	// on fait la verif du path avant tout,
-	// et l'installation des qu'on est dans la colonne principale
-	// si jamais la liste des plugins actifs change, il faut faire un refresh du hit
-	// pour etre sur que les bons fichiers seront charges lors de l'install
-	include_spip('inc/plugin');
-	if (actualise_plugins_actifs()) {
-		include_spip('inc/headers');
-		redirige_par_entete(self());
-	}
+    // on fait la verif du path avant tout,
+    // et l'installation des qu'on est dans la colonne principale
+    // si jamais la liste des plugins actifs change, il faut faire un refresh du hit
+    // pour etre sur que les bons fichiers seront charges lors de l'install
+    include_spip('inc/plugin');
+    if (actualise_plugins_actifs()) {
+        include_spip('inc/headers');
+        redirige_par_entete(self());
+    }
 
-	include_spip('inc/presentation');
-	include_spip('inc/filtres_boites');
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page('', '', '', '', true, false, false);
+    include_spip('inc/presentation');
+    include_spip('inc/filtres_boites');
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page('', '', '', '', true, false, false);
 
-	echo debut_grand_cadre();
-	echo boite_ouvrir(_T('info_message_technique'), 'notice');
-	echo '<p>' . _T('info_procedure_maj_version') . '</p>',
-		'<p>' . _T('info_administrateur_site_01') . '</p>';
-	echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
-	echo boite_fermer();
-	// masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
-	echo '<style type="text/css">#debug-nav {display: none;}</style>';
-	echo fin_grand_cadre();
-	echo fin_page();
+    echo debut_grand_cadre();
+    echo boite_ouvrir(_T('info_message_technique'), 'notice');
+    echo '<p>' . _T('info_procedure_maj_version') . '</p>',
+        '<p>' . _T('info_administrateur_site_01') . '</p>';
+    echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
+    echo boite_fermer();
+    // masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
+    echo '<style type="text/css">#debug-nav {display: none;}</style>';
+    echo fin_grand_cadre();
+    echo fin_page();
 }

Spacing +2 added lines, -2 removed lines

@@ -45,8 +45,8 @@
 
 	echo debut_grand_cadre();
 	echo boite_ouvrir(_T('info_message_technique'), 'notice');
-	echo '<p>' . _T('info_procedure_maj_version') . '</p>',
-		'<p>' . _T('info_administrateur_site_01') . '</p>';
+	echo '<p>'._T('info_procedure_maj_version').'</p>',
+		'<p>'._T('info_administrateur_site_01').'</p>';
 	echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
 	echo boite_fermer();
 	// masquer les erreurs sql sur cette page car proviennent de la base pas a jour !

ecrire/exec/404.php

Indentation +16 added lines, -16 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,25 +25,25 @@ 
  */
 function exec_404_dist() {
 
-	$exec = _request('exec');
+    $exec = _request('exec');
 
-	$titre = "exec_$exec";
-	$navigation = '';
-	$extra = '';
+    $titre = "exec_$exec";
+    $navigation = '';
+    $extra = '';
 
-	include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page($titre);
+    include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page($titre);
 
-	echo debut_gauche();
-	echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_gauche();
+    echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo creer_colonne_droite();
-	echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo creer_colonne_droite();
+    echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo debut_droite();
-	echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
-	echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_droite();
+    echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
+    echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo fin_gauche(), fin_page();
+    echo fin_gauche(), fin_page();
 }

Spacing +1 added lines, -1 removed lines

@@ -42,7 +42,7 @@
 	echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
 	echo debut_droite();
-	echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
+	echo "<h1 class='grostitre'>"._T('fichier_introuvable', ['fichier' => $exec]).'</h1>';
 	echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
 	echo fin_gauche(), fin_page();

ecrire/inc/nfslock.php

Indentation +92 added lines, -92 removed lines

@@ -7,7 +7,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/acces');
@@ -101,93 +101,93 @@ 
  * @return int|bool Timestamp du verrou, false si erreur
  */
 function spip_nfslock($fichier, $max_age = 0) {
-	$tries = 0;
+    $tries = 0;
 
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
 
-	/*
+    /*
 	 * 1. create a tmp file with a psuedo random file name. we also make
 	 *    tpath which is a buffer to store the full pathname of the tmp file.
 	 */
 
-	$id = creer_uniqid();
-	$tpath = _DIR_TMP . "slock.$id";
-	$tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
-	if (!$tmpfd) {  /* open failed */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $id = creer_uniqid();
+    $tpath = _DIR_TMP . "slock.$id";
+    $tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
+    if (!$tmpfd) {  /* open failed */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //NFSL_SYSF
-	}
+        return false; //NFSL_SYSF
+    }
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file.
 	 *    then start looping trying to lock it
 	 */
 
-	while ($tries < 10) {
-		/*
+    while ($tries < 10) {
+        /*
 		 * 3. link tmp file to lock file.  if it goes, we win and we clean
 		 *    up and return the st_ctime of the lock file.
 		 */
 
-		if (link($tpath, $lock_file) == 1) {
-			spip_unlink($tpath); /* got it! */
-			@fclose($tmpfd);
-			if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
-				spip_unlink($lock_file);
+        if (link($tpath, $lock_file) == 1) {
+            spip_unlink($tpath); /* got it! */
+            @fclose($tmpfd);
+            if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
+                spip_unlink($lock_file);
 
-				return false; // (NFSL_SYSF);
-			}
+                return false; // (NFSL_SYSF);
+            }
 
-			return ($our_tmp['ctime']);
-		}
+            return ($our_tmp['ctime']);
+        }
 
-		/*
+        /*
 		 * 4. the lock failed.  check for a stale lock file, being mindful
 		 *    of NFS and the fact the time is set from the NFS server.  we
 		 *    do a write on the tmp file to update its time to the server's
 		 *    idea of "now."
 		 */
 
-		$old_stat = lstat($lock_file);
-		if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
-			break;
-		} /* something bogus is going on */
+        $old_stat = lstat($lock_file);
+        if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
+            break;
+        } /* something bogus is going on */
 
 
-		if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
-			spip_unlink($lock_file); /* break the stale lock */
-			$tries++;
-			/* It is CRITICAL that we sleep after breaking
+        if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
+            spip_unlink($lock_file); /* break the stale lock */
+            $tries++;
+            /* It is CRITICAL that we sleep after breaking
 			 * the lock. Otherwise, we could race with
 			 * another process and unlink it's newly-
 			 * created file.
 			 */
-			sleep(1 + random_int(0, 4));
-			continue;
-		}
+            sleep(1 + random_int(0, 4));
+            continue;
+        }
 
-		/*
+        /*
 		 * 5. try again
 		 */
 
-		$tries++;
-		sleep(1 + random_int(0, 4));
-	}
+        $tries++;
+        sleep(1 + random_int(0, 4));
+    }
 
-	/*
+    /*
 	 * 6. give up, failure.
 	 */
 
-	spip_unlink($tpath);
-	@fclose($tmpfd);
+    spip_unlink($tpath);
+    @fclose($tmpfd);
 
-	return false; //(NFSL_LOCKED);
+    return false; //(NFSL_LOCKED);
 }
 
 /**
@@ -231,75 +231,75 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfsunlock($fichier, $birth, $max_age = 0, $test = false) {
-	$id = creer_uniqid();
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
+    $id = creer_uniqid();
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
 
-	/*
+    /*
 	 * 1. Build a temp file and stat that to get an idea of what the server
 	 *    thinks the current time is (our_tmp.st_ctime)..
 	 */
 
-	$tpath = _DIR_TMP . "stime.$id";
-	$tmpfd = @fopen($tpath, 'w');
-	if (
-		(!$tmpfd)
-		or (@fputs($tmpfd, 'zz', 2) != 2)
-		or !($our_tmp = fstat($tmpfd))
-	) {
-		/* The open failed, or we can't write the file, or we can't stat it */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $tpath = _DIR_TMP . "stime.$id";
+    $tmpfd = @fopen($tpath, 'w');
+    if (
+        (!$tmpfd)
+        or (@fputs($tmpfd, 'zz', 2) != 2)
+        or !($our_tmp = fstat($tmpfd))
+    ) {
+        /* The open failed, or we can't write the file, or we can't stat it */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //(NFSL_SYSF);
-	}
+        return false; //(NFSL_SYSF);
+    }
 
-	@fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
-	spip_unlink($tpath);
+    @fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
+    spip_unlink($tpath);
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file
 	 */
 
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
-	/*
+    /*
 	 * 3. If the ctime hasn't been modified, unlink the file and return. If the
 	 *    lock has expired, sleep the usual random interval before returning.
 	 *    If we didn't sleep, there could be a race if the caller immediately
 	 *    tries to relock the file.
 	 */
 
-	if (
-		($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
-		&& ($old_stat['ctime'] == $birth)
-	) {  /* hasn't been modified since birth */
-		if (!$test) {
-			spip_unlink($lock_file);
-		}      /* so the lock is ours to remove */
-		if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
-			if (!$test) {
-				return false;
-			} //(NFSL_LOST);
-			sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
-		}
-
-		return true;//(NFSL_OK);			/* success */
-	}
-
-	/*
+    if (
+        ($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
+        && ($old_stat['ctime'] == $birth)
+    ) {  /* hasn't been modified since birth */
+        if (!$test) {
+            spip_unlink($lock_file);
+        }      /* so the lock is ours to remove */
+        if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
+            if (!$test) {
+                return false;
+            } //(NFSL_LOST);
+            sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
+        }
+
+        return true;//(NFSL_OK);			/* success */
+    }
+
+    /*
 	 * 4. Either ctime has been modified, or the entire lock file is missing.
 	 *    If the lock should still be ours, based on the ctime of the temp
 	 *    file, return with NFSL_STOLEN. If not, then our lock is expired and
 	 *    someone else has grabbed the file, so return NFSL_LOST.
 	 */
 
-	if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
-		return false;
-	} //(NFSL_STOLEN);
+    if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
+        return false;
+    } //(NFSL_STOLEN);
 
-	return false; //(NFSL_LOST);	/* The lock must have expired first. */
+    return false; //(NFSL_LOST);	/* The lock must have expired first. */
 }
 
 
@@ -323,5 +323,5 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfslock_test($fichier, $birth, $max_age = 0) {
-	return spip_nfsunlock($fichier, $birth, $max_age, true);
+    return spip_nfsunlock($fichier, $birth, $max_age, true);
 }

Spacing +7 added lines, -7 removed lines

@@ -106,7 +106,7 @@ 
 	if (!$max_age) {
 		$max_age = _DEFAULT_LOCKTIME;
 	}
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+	$lock_file = _DIR_TMP._NAME_LOCK.'-'.substr(md5($fichier), 0, 8);
 
 
 	/*
@@ -115,7 +115,7 @@ 
 	 */
 
 	$id = creer_uniqid();
-	$tpath = _DIR_TMP . "slock.$id";
+	$tpath = _DIR_TMP."slock.$id";
 	$tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
 	if (!$tmpfd) {  /* open failed */
 		@fclose($tmpfd);
@@ -241,7 +241,7 @@ 
 	 *    thinks the current time is (our_tmp.st_ctime)..
 	 */
 
-	$tpath = _DIR_TMP . "stime.$id";
+	$tpath = _DIR_TMP."stime.$id";
 	$tmpfd = @fopen($tpath, 'w');
 	if (
 		(!$tmpfd)
@@ -255,14 +255,14 @@ 
 		return false; //(NFSL_SYSF);
 	}
 
-	@fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
+	@fclose($tmpfd); /* We don't need this once we have our_tmp.st_ctime. */
 	spip_unlink($tpath);
 
 	/*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file
 	 */
 
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+	$lock_file = _DIR_TMP._NAME_LOCK.'-'.substr(md5($fichier), 0, 8);
 
 	/*
 	 * 3. If the ctime hasn't been modified, unlink the file and return. If the
@@ -282,10 +282,10 @@ 
 			if (!$test) {
 				return false;
 			} //(NFSL_LOST);
-			sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
+			sleep(1 + (random_int(0, 4))); /* so sleep a bit */
 		}
 
-		return true;//(NFSL_OK);			/* success */
+		return true; //(NFSL_OK);			/* success */
 	}
 
 	/*