spip / SPIP

ecrire/plugins/extraire_boutons.php

Indentation +27 added lines, -27 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -20,31 +20,31 @@ 
  * @return array
  */
 function plugins_extraire_boutons_dist($arbre) {
-	$les_boutons = null;
-	$ret = ['bouton' => [], 'onglet' => []];
-	// recuperer les boutons et onglets si necessaire
-	spip_xml_match_nodes(',^(bouton|onglet)\s,', $arbre, $les_boutons);
-	if (is_array($les_boutons) && count($les_boutons)) {
-		$ret['bouton'] = [];
-		$ret['onglet'] = [];
-		foreach ($les_boutons as $bouton => $val) {
-			$bouton = spip_xml_decompose_tag($bouton);
-			$type = reset($bouton);
-			$bouton = end($bouton);
-			if (isset($bouton['id'])) {
-				$id = $bouton['id'];
-				$val = reset($val);
-				if (is_array($val)) {
-					$ret[$type][$id]['parent'] = $bouton['parent'] ?? '';
-					$ret[$type][$id]['position'] = $bouton['position'] ?? '';
-					$ret[$type][$id]['titre'] = isset($val['titre']) ? trim((string) spip_xml_aplatit($val['titre'])) : '';
-					$ret[$type][$id]['icone'] = isset($val['icone']) ? trim((string) end($val['icone'])) : '';
-					$ret[$type][$id]['action'] = isset($val['url']) ? trim((string) end($val['url'])) : '';
-					$ret[$type][$id]['parametres'] = isset($val['args']) ? trim((string) end($val['args'])) : '';
-				}
-			}
-		}
-	}
+    $les_boutons = null;
+    $ret = ['bouton' => [], 'onglet' => []];
+    // recuperer les boutons et onglets si necessaire
+    spip_xml_match_nodes(',^(bouton|onglet)\s,', $arbre, $les_boutons);
+    if (is_array($les_boutons) && count($les_boutons)) {
+        $ret['bouton'] = [];
+        $ret['onglet'] = [];
+        foreach ($les_boutons as $bouton => $val) {
+            $bouton = spip_xml_decompose_tag($bouton);
+            $type = reset($bouton);
+            $bouton = end($bouton);
+            if (isset($bouton['id'])) {
+                $id = $bouton['id'];
+                $val = reset($val);
+                if (is_array($val)) {
+                    $ret[$type][$id]['parent'] = $bouton['parent'] ?? '';
+                    $ret[$type][$id]['position'] = $bouton['position'] ?? '';
+                    $ret[$type][$id]['titre'] = isset($val['titre']) ? trim((string) spip_xml_aplatit($val['titre'])) : '';
+                    $ret[$type][$id]['icone'] = isset($val['icone']) ? trim((string) end($val['icone'])) : '';
+                    $ret[$type][$id]['action'] = isset($val['url']) ? trim((string) end($val['url'])) : '';
+                    $ret[$type][$id]['parametres'] = isset($val['args']) ? trim((string) end($val['args'])) : '';
+                }
+            }
+        }
+    }
 
-	return $ret;
+    return $ret;
 }

ecrire/plugins/afficher_repertoires.php

Indentation +87 added lines, -87 removed lines

@@ -10,110 +10,110 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function plugins_afficher_repertoires_dist($url_page, $liste_plugins, $liste_plugins_actifs) {
-	$ligne_plug = charger_fonction('afficher_plugin', 'plugins');
-	$racine = basename((string) _DIR_PLUGINS);
-	$init_dir = $current_dir = '';
-	// liste des repertoires deplies : construit en remontant l'arbo de chaque plugin actif
-	// des qu'un path est deja note deplie on s'arrete
-	$deplie = [$racine => true];
-	$fast_liste_plugins_actifs = [];
-	foreach ($liste_plugins_actifs as $key => $plug) {
-		$chemin_plug = chemin_plug($racine, $plug);
-		$fast_liste_plugins_actifs[$chemin_plug] = true;
-		$dir = dirname((string) $chemin_plug);
-		$maxiter = 100;
-		while (strlen($dir) && !isset($deplie[$dir]) && $dir !== $racine && $maxiter-- > 0) {
-			$deplie[$dir] = true;
-			$dir = dirname($dir);
-		}
-	}
+    $ligne_plug = charger_fonction('afficher_plugin', 'plugins');
+    $racine = basename((string) _DIR_PLUGINS);
+    $init_dir = $current_dir = '';
+    // liste des repertoires deplies : construit en remontant l'arbo de chaque plugin actif
+    // des qu'un path est deja note deplie on s'arrete
+    $deplie = [$racine => true];
+    $fast_liste_plugins_actifs = [];
+    foreach ($liste_plugins_actifs as $key => $plug) {
+        $chemin_plug = chemin_plug($racine, $plug);
+        $fast_liste_plugins_actifs[$chemin_plug] = true;
+        $dir = dirname((string) $chemin_plug);
+        $maxiter = 100;
+        while (strlen($dir) && !isset($deplie[$dir]) && $dir !== $racine && $maxiter-- > 0) {
+            $deplie[$dir] = true;
+            $dir = dirname($dir);
+        }
+    }
 
-	// index repertoires --> plugin
-	$dir_index = [];
-	foreach ($liste_plugins as $key => $plug) {
-		$liste_plugins[$key] = chemin_plug($racine, $plug);
-		$dir_index[dirname((string) $liste_plugins[$key])][] = $key;
-	}
+    // index repertoires --> plugin
+    $dir_index = [];
+    foreach ($liste_plugins as $key => $plug) {
+        $liste_plugins[$key] = chemin_plug($racine, $plug);
+        $dir_index[dirname((string) $liste_plugins[$key])][] = $key;
+    }
 
-	$visible = @isset($deplie[$current_dir]);
-	$maxiter = 1000;
+    $visible = @isset($deplie[$current_dir]);
+    $maxiter = 1000;
 
-	$res = '';
-	while ((is_countable($liste_plugins) ? count($liste_plugins) : 0) && $maxiter--) {
-		// le rep suivant
-		$dir = dirname((string) reset($liste_plugins));
-		if ($dir != $current_dir) {
-			$res .= tree_open_close_dir($current_dir, $dir, $deplie);
-		}
+    $res = '';
+    while ((is_countable($liste_plugins) ? count($liste_plugins) : 0) && $maxiter--) {
+        // le rep suivant
+        $dir = dirname((string) reset($liste_plugins));
+        if ($dir != $current_dir) {
+            $res .= tree_open_close_dir($current_dir, $dir, $deplie);
+        }
 
-		// d'abord tous les plugins du rep courant
-		if (isset($dir_index[$current_dir])) {
-			foreach ($dir_index[$current_dir] as $key) {
-				$plug = $liste_plugins[$key];
-				$actif = @isset($fast_liste_plugins_actifs[$plug]);
-				$id = substr(md5((string) $plug), 0, 16);
-				$res .= $ligne_plug(
-					$url_page,
-					str_replace(_DIR_PLUGINS, '', _DIR_RACINE . $plug),
-					$actif,
-					'menu-entree'
-				) . "\n";
-				unset($liste_plugins[$key]);
-			}
-		}
-	}
-	$res .= tree_open_close_dir($current_dir, $init_dir, true);
+        // d'abord tous les plugins du rep courant
+        if (isset($dir_index[$current_dir])) {
+            foreach ($dir_index[$current_dir] as $key) {
+                $plug = $liste_plugins[$key];
+                $actif = @isset($fast_liste_plugins_actifs[$plug]);
+                $id = substr(md5((string) $plug), 0, 16);
+                $res .= $ligne_plug(
+                    $url_page,
+                    str_replace(_DIR_PLUGINS, '', _DIR_RACINE . $plug),
+                    $actif,
+                    'menu-entree'
+                ) . "\n";
+                unset($liste_plugins[$key]);
+            }
+        }
+    }
+    $res .= tree_open_close_dir($current_dir, $init_dir, true);
 
-	return "<ul class='menu-liste plugins'>"
-	. $res
-	. '</ul>';
+    return "<ul class='menu-liste plugins'>"
+    . $res
+    . '</ul>';
 }
 
 
 // vraiment n'importe quoi la gestion des chemins des plugins
 // une fonction pour aider...
 function chemin_plug($racine, $plug) {
-	return preg_replace(',[^/]+/\.\./,', '', "$racine/$plug");
+    return preg_replace(',[^/]+/\.\./,', '', "$racine/$plug");
 }
 
 function tree_open_close_dir(&$current, $target, $deplie = []) {
-	if ($current == $target) {
-		return '';
-	}
-	$tcur = explode('/', (string) $current);
-	$ttarg = explode('/', (string) $target);
-	$tcom = [];
-	$output = '';
-	// la partie commune
-	while (reset($tcur) === reset($ttarg)) {
-		$tcom[] = array_shift($tcur);
-		array_shift($ttarg);
-	}
-	// fermer les repertoires courant jusqu'au point de fork
-	while ($close = array_pop($tcur)) {
-		$output .= "</ul>\n";
-		$output .= fin_block();
-		$output .= "</li>\n";
-	}
-	$chemin = '';
-	if ($tcom !== []) {
-		$chemin .= implode('/', $tcom) . '/';
-	}
-	// ouvrir les repertoires jusqu'a la cible
-	while ($open = array_shift($ttarg)) {
-		$visible = @isset($deplie[$chemin . $open]);
-		$chemin .= $open . '/';
-		$output .= '<li>';
-		$output .= bouton_block_depliable($chemin, $visible);
-		$output .= debut_block_depliable($visible);
+    if ($current == $target) {
+        return '';
+    }
+    $tcur = explode('/', (string) $current);
+    $ttarg = explode('/', (string) $target);
+    $tcom = [];
+    $output = '';
+    // la partie commune
+    while (reset($tcur) === reset($ttarg)) {
+        $tcom[] = array_shift($tcur);
+        array_shift($ttarg);
+    }
+    // fermer les repertoires courant jusqu'au point de fork
+    while ($close = array_pop($tcur)) {
+        $output .= "</ul>\n";
+        $output .= fin_block();
+        $output .= "</li>\n";
+    }
+    $chemin = '';
+    if ($tcom !== []) {
+        $chemin .= implode('/', $tcom) . '/';
+    }
+    // ouvrir les repertoires jusqu'a la cible
+    while ($open = array_shift($ttarg)) {
+        $visible = @isset($deplie[$chemin . $open]);
+        $chemin .= $open . '/';
+        $output .= '<li>';
+        $output .= bouton_block_depliable($chemin, $visible);
+        $output .= debut_block_depliable($visible);
 
-		$output .= "<ul>\n";
-	}
-	$current = $target;
+        $output .= "<ul>\n";
+    }
+    $current = $target;
 
-	return $output;
+    return $output;
 }

ecrire/public/admin.php

Indentation +28 added lines, -28 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,37 +33,37 @@ 
  *     Contenu HTML, avec boutons d'administrations et sa CSS
  **/
 function affiche_boutons_admin($contenu) {
-	include_spip('inc/filtres');
+    include_spip('inc/filtres');
 
-	// Inserer le css d'admin
-	$css = "<link rel='stylesheet' href='" . url_absolue(direction_css(find_in_path('spip_admin.css')))
-		. "' type='text/css' />\n";
-	if ($f = find_in_path('spip_admin_perso.css')) {
-		$css .= "<link rel='stylesheet' href='"
-			. url_absolue(direction_css($f)) . "' type='text/css' />\n";
-	}
+    // Inserer le css d'admin
+    $css = "<link rel='stylesheet' href='" . url_absolue(direction_css(find_in_path('spip_admin.css')))
+        . "' type='text/css' />\n";
+    if ($f = find_in_path('spip_admin_perso.css')) {
+        $css .= "<link rel='stylesheet' href='"
+            . url_absolue(direction_css($f)) . "' type='text/css' />\n";
+    }
 
-	if (
-		!($pos = stripos($contenu, '</head>'))
-		&& !($pos = stripos($contenu, '<body>'))
-	) {
-		$pos = 0;
-	}
-	$contenu = substr_replace($contenu, $css, $pos, 0);
+    if (
+        !($pos = stripos($contenu, '</head>'))
+        && !($pos = stripos($contenu, '<body>'))
+    ) {
+        $pos = 0;
+    }
+    $contenu = substr_replace($contenu, $css, $pos, 0);
 
 
-	// Inserer la balise #FORMULAIRE_ADMIN, en float
-	$boutons_admin = inclure_balise_dynamique(
-		balise_FORMULAIRE_ADMIN_dyn('spip-admin-float'),
-		false
-	);
-	if (
-		!($pos = strripos($contenu, '</body>'))
-		&& !($pos = strripos($contenu, '</html>'))
-	) {
-		$pos = strlen($contenu);
-	}
+    // Inserer la balise #FORMULAIRE_ADMIN, en float
+    $boutons_admin = inclure_balise_dynamique(
+        balise_FORMULAIRE_ADMIN_dyn('spip-admin-float'),
+        false
+    );
+    if (
+        !($pos = strripos($contenu, '</body>'))
+        && !($pos = strripos($contenu, '</html>'))
+    ) {
+        $pos = strlen($contenu);
+    }
 
 
-	return substr_replace($contenu, (string) $boutons_admin, $pos, 0);
+    return substr_replace($contenu, (string) $boutons_admin, $pos, 0);
 }

ecrire/public/format_html.php

Indentation +86 added lines, -86 removed lines

@@ -10,123 +10,123 @@
 \***************************************************************************/
 
 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>" : '';
-	$corps = $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>" : '';
+    $corps = $corps ? ">$corps</BOUCLE$nom>" : ' />';
+
+    return "$preaff$avant<BOUCLE$nom($type)$crit$corps$apres$altern$postaff";
 }
 
 function format_inclure_html($file, $args, $prof) {
-	if (!str_contains((string) $file, '#')) {
-		$t = $file ? ('(' . $file . ')') : '';
-	} else {
-		$t = '{fond=' . $file . '}';
-	}
-	$args = $args ? '{' . implode(', ', $args) . '}' : ('');
-
-	return ('<INCLURE' . $t . $args . '>');
+    if (!str_contains((string) $file, '#')) {
+        $t = $file ? ('(' . $file . ')') : '';
+    } else {
+        $t = '{fond=' . $file . '}';
+    }
+    $args = $args ? '{' . implode(', ', $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>' . implode(' ', $contenu) . '</multi>');
+    return ('<multi>' . implode(' ', $contenu) . '</multi>');
 }
 
 function format_idiome_html($nom, $module, $args, $filtres, $prof) {
-	foreach ($args as $k => $v) {
-		$args[$k] = "$k=$v";
-	}
-	$args = ($args ? '{' . implode(',', $args) . '}' : (''));
+    foreach ($args as $k => $v) {
+        $args[$k] = "$k=$v";
+    }
+    $args = ($args ? '{' . implode(',', $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 || $apres || $filtres || str_contains((string) $args, '(#'));
+    $s = ($avant || $apres || $filtres || str_contains((string) $args, '(#'));
 
-	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' && $valeur[0] == '[') {
-				$valeur = substr((string) $valeur, 1, -1);
-				if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
-					$valeur = substr($valeur, 1, -1);
-				}
-			}
-			$crit_s .= $valeur;
-		}
-		$critere[$k] = $crit_s;
-	}
-
-	return ($critere ? '{' . implode(',', $critere) . '}' : (''));
+    foreach ($critere as $k => $crit) {
+        $crit_s = '';
+        foreach ($crit as $operande) {
+            [$type, $valeur] = $operande;
+            if ($type == 'champ' && $valeur[0] == '[') {
+                $valeur = substr((string) $valeur, 1, -1);
+                if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
+                    $valeur = substr($valeur, 1, -1);
+                }
+            }
+            $crit_s .= $valeur;
+        }
+        $critere[$k] = $crit_s;
+    }
+
+    return ($critere ? '{' . implode(',', $critere) . '}' : (''));
 }
 
 function format_liste_html($fonc, $args, $prof) {
-	return ((($fonc !== '') ? "|$fonc" : $fonc)
-		. ($args ? '{' . implode(',', $args) . '}' : ('')));
+    return ((($fonc !== '') ? "|$fonc" : $fonc)
+        . ($args ? '{' . implode(',', $args) . '}' : ('')));
 }
 
 // Concatenation sans separateur: verifier qu'on ne cree pas de faux lexemes
 function format_suite_html($args) {
-	$argsCount = is_countable($args) ? count($args) : 0;
-	for ($i = 0; $i < $argsCount - 1; $i++) {
-		[$texte, $type] = $args[$i];
-		[$texte2, $type2] = $args[$i + 1];
-		if (!$texte || !$texte2) {
-			continue;
-		}
-		$c1 = substr((string) $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 == '(' && str_starts_with((string) $texte2, '#')) {
-				$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 == '}' && str_starts_with(ltrim((string) $texte2), '|')
-				|| preg_match('/[\w\d_*]/', $c1) && preg_match('/^[\w\d_*{|]/', (string) $texte2)
-			) {
-				$args[$i][0] = '[(' . $texte . ')]';
-			}
-		}
-	}
-
-	return implode('', array_map(fn($arg) => reset($arg), $args));
+    $argsCount = is_countable($args) ? count($args) : 0;
+    for ($i = 0; $i < $argsCount - 1; $i++) {
+        [$texte, $type] = $args[$i];
+        [$texte2, $type2] = $args[$i + 1];
+        if (!$texte || !$texte2) {
+            continue;
+        }
+        $c1 = substr((string) $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 == '(' && str_starts_with((string) $texte2, '#')) {
+                $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 == '}' && str_starts_with(ltrim((string) $texte2), '|')
+                || preg_match('/[\w\d_*]/', $c1) && preg_match('/^[\w\d_*{|]/', (string) $texte2)
+            ) {
+                $args[$i][0] = '[(' . $texte . ')]';
+            }
+        }
+    }
+
+    return implode('', array_map(fn($arg) => reset($arg), $args));
 }
 
 function format_texte_html($texte) {
-	return $texte;
+    return $texte;
 }

ecrire/public/sandbox.php

Indentation +89 added lines, -89 removed lines

@@ -22,7 +22,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -40,7 +40,7 @@ 
  *     texte
  */
 function sandbox_composer_texte($texte, &$p) {
-	return "'" . str_replace(['\\', "'"], ['\\\\', "\\'"], $texte) . "'";
+    return "'" . str_replace(['\\', "'"], ['\\\\', "\\'"], $texte) . "'";
 }
 
 
@@ -56,38 +56,38 @@ 
  * @return string
  */
 function sandbox_composer_filtre($fonc, $code, $arglist, &$p, $nb_arg_droite = 1000): string {
-	if (isset($GLOBALS['spip_matrice'][$fonc])) {
-		$code = "filtrer('$fonc',$code$arglist)";
-	}
-
-	// le filtre est defini sous forme de fonction ou de methode
-	// par ex. dans inc_texte, inc_filtres ou mes_fonctions
-	elseif ($f = chercher_filtre($fonc)) {
-		// cas particulier : le filtre |set doit acceder a la $Pile
-		// proto: filtre_set(&$Pile, $val, $args...)
-		$refl = strpbrk((string) $f, ':') ? new ReflectionMethod($f) : new ReflectionFunction($f);
-		$refs = $refl->getParameters();
-		if (isset($refs[0]) && $refs[0]->name == 'Pile') {
-			$code = "$f(\$Pile,$code$arglist)";
-			$nb_arg_gauche = 2; // la balise à laquelle s'applique le filtre + $Pile
-		} else {
-			$code = "$f($code$arglist)";
-			$nb_arg_gauche = 1; // la balise à laquelle s'applique le filtre
-		}
-		$nb_args_f = $nb_arg_gauche + $nb_arg_droite;
-		$min_f = $refl->getNumberOfRequiredParameters();
-		if (($nb_args_f < $min_f)) {
-			$msg_args = ['filtre' => texte_script($fonc), 'nb' => $min_f - $nb_args_f];
-			erreur_squelette([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p);
-		}
-	}
-	// le filtre n'existe pas,
-	// on le notifie
-	else {
-		erreur_squelette(['zbug_erreur_filtre', ['filtre' => texte_script($fonc)]], $p);
-	}
-
-	return $code;
+    if (isset($GLOBALS['spip_matrice'][$fonc])) {
+        $code = "filtrer('$fonc',$code$arglist)";
+    }
+
+    // le filtre est defini sous forme de fonction ou de methode
+    // par ex. dans inc_texte, inc_filtres ou mes_fonctions
+    elseif ($f = chercher_filtre($fonc)) {
+        // cas particulier : le filtre |set doit acceder a la $Pile
+        // proto: filtre_set(&$Pile, $val, $args...)
+        $refl = strpbrk((string) $f, ':') ? new ReflectionMethod($f) : new ReflectionFunction($f);
+        $refs = $refl->getParameters();
+        if (isset($refs[0]) && $refs[0]->name == 'Pile') {
+            $code = "$f(\$Pile,$code$arglist)";
+            $nb_arg_gauche = 2; // la balise à laquelle s'applique le filtre + $Pile
+        } else {
+            $code = "$f($code$arglist)";
+            $nb_arg_gauche = 1; // la balise à laquelle s'applique le filtre
+        }
+        $nb_args_f = $nb_arg_gauche + $nb_arg_droite;
+        $min_f = $refl->getNumberOfRequiredParameters();
+        if (($nb_args_f < $min_f)) {
+            $msg_args = ['filtre' => texte_script($fonc), 'nb' => $min_f - $nb_args_f];
+            erreur_squelette([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p);
+        }
+    }
+    // le filtre n'existe pas,
+    // on le notifie
+    else {
+        erreur_squelette(['zbug_erreur_filtre', ['filtre' => texte_script($fonc)]], $p);
+    }
+
+    return $code;
 }
 
 // Calculer un <INCLURE(xx.php)>
@@ -110,11 +110,11 @@ 
  * @return string
  */
 function sandbox_composer_inclure_php($fichier, &$p, $_contexte) {
-	$compil = texte_script(memoriser_contexte_compil($p));
-	// si inexistant, on essaiera a l'execution
-	$path = ($path = find_in_path($fichier)) ? "\"$path\"" : "find_in_path(\"$fichier\")";
+    $compil = texte_script(memoriser_contexte_compil($p));
+    // si inexistant, on essaiera a l'execution
+    $path = ($path = find_in_path($fichier)) ? "\"$path\"" : "find_in_path(\"$fichier\")";
 
-	return sprintf(CODE_INCLURE_SCRIPT, $path, $fichier, $compil, $_contexte);
+    return sprintf(CODE_INCLURE_SCRIPT, $path, $fichier, $compil, $_contexte);
 }
 
 /**
@@ -126,20 +126,20 @@ 
  * @return string
  */
 function sandbox_composer_interdire_scripts($code, &$p) {
-	// Securite
-	if (
-		$p->interdire_scripts
-		&& $p->etoile != '**'
-	) {
-		if (!preg_match("/^sinon[(](.*),'([^']*)'[)]$/", $code, $r)) {
-			$code = "interdire_scripts($code)";
-		} else {
-			$code = interdire_scripts($r[2]);
-			$code = "sinon(interdire_scripts($r[1]),'$code')";
-		}
-	}
-
-	return $code;
+    // Securite
+    if (
+        $p->interdire_scripts
+        && $p->etoile != '**'
+    ) {
+        if (!preg_match("/^sinon[(](.*),'([^']*)'[)]$/", $code, $r)) {
+            $code = "interdire_scripts($code)";
+        } else {
+            $code = interdire_scripts($r[2]);
+            $code = "sinon(interdire_scripts($r[1]),'$code')";
+        }
+    }
+
+    return $code;
 }
 
 
@@ -158,30 +158,30 @@ 
  * @return mixed|string
  */
 function sandbox_filtrer_squelette($skel, $corps, $filtres) {
-	$series_filtres = func_get_args();
-	array_shift($series_filtres);// skel
-	array_shift($series_filtres);// corps
-
-	// proteger les <INCLUDE> et tous les morceaux de php licites
-	if ($skel['process_ins'] == 'php') {
-		$corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS', 'echapper_php_callback', $corps);
-	}
-
-	// recuperer les couples de remplacement
-	$replace = echapper_php_callback();
-
-	foreach ($series_filtres as $filtres) {
-		if (is_countable($filtres) ? count($filtres) : 0) {
-			foreach ($filtres as $filtre) {
-				if ($filtre && ($f = chercher_filtre($filtre))) {
-					$corps = $f($corps);
-				}
-			}
-		}
-	}
-
-	// restaurer les echappements
-	return str_replace($replace[0], $replace[1], (string) $corps);
+    $series_filtres = func_get_args();
+    array_shift($series_filtres);// skel
+    array_shift($series_filtres);// corps
+
+    // proteger les <INCLUDE> et tous les morceaux de php licites
+    if ($skel['process_ins'] == 'php') {
+        $corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS', 'echapper_php_callback', $corps);
+    }
+
+    // recuperer les couples de remplacement
+    $replace = echapper_php_callback();
+
+    foreach ($series_filtres as $filtres) {
+        if (is_countable($filtres) ? count($filtres) : 0) {
+            foreach ($filtres as $filtre) {
+                if ($filtre && ($f = chercher_filtre($filtre))) {
+                    $corps = $f($corps);
+                }
+            }
+        }
+    }
+
+    // restaurer les echappements
+    return str_replace($replace[0], $replace[1], (string) $corps);
 }
 
 
@@ -200,21 +200,21 @@ 
  *     - array : Liste( liste des codes PHP, liste des substitutions )
  **/
 function echapper_php_callback($r = null) {
-	static $src = [];
-	static $dst = [];
+    static $src = [];
+    static $dst = [];
 
-	// si on recoit un tableau, on est en mode echappement
-	// on enregistre le code a echapper dans dst, et le code echappe dans src
-	if (is_array($r)) {
-		$dst[] = $r[0];
+    // si on recoit un tableau, on est en mode echappement
+    // on enregistre le code a echapper dans dst, et le code echappe dans src
+    if (is_array($r)) {
+        $dst[] = $r[0];
 
-		return $src[] = '___' . md5((string) $r[0]) . '___';
-	}
+        return $src[] = '___' . md5((string) $r[0]) . '___';
+    }
 
-	// si on recoit pas un tableau, on renvoit les couples de substitution
-	// et on RAZ les remplacements
-	$r = [$src, $dst];
-	$src = $dst = [];
+    // si on recoit pas un tableau, on renvoit les couples de substitution
+    // et on RAZ les remplacements
+    $r = [$src, $dst];
+    $src = $dst = [];
 
-	return $r;
+    return $r;
 }

ecrire/public/styliser.php

Indentation +123 added lines, -123 removed lines

@@ -19,7 +19,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Ce fichier doit imperativement definir la fonction ci-dessous:
@@ -38,59 +38,59 @@ 
  * @return array
  */
 function public_styliser_dist($fond, $contexte, $lang = '', string $connect = '') {
-	static $styliser_par_z;
-
-	// s'assurer que le fond est licite
-	// car il peut etre construit a partir d'une variable d'environnement
-	if (str_contains($fond, '../') || str_starts_with($fond, '/')) {
-		$fond = '404';
-	}
-
-	if (str_starts_with($fond, 'modeles/')) {
-		$modele = substr($fond, 8);
-		$modele = styliser_modele($modele, null, $contexte);
-		$fond = "modeles/$modele";
-	}
-
-	// Choisir entre $fond-dist.html, $fond=7.html, etc?
-	$id_rubrique = 0;
-	// Chercher le fond qui va servir de squelette
-	if ($r = quete_rubrique_fond($contexte)) {
-		[$id_rubrique, $lang] = $r;
-	}
-
-	// trouver un squelette du nom demande
-	// ne rien dire si on ne trouve pas,
-	// c'est l'appelant qui sait comment gerer la situation
-	// ou les plugins qui feront mieux dans le pipeline
-	$squelette = trouver_fond($fond, '', true);
-	$ext = $squelette['extension'];
-
-	$flux = [
-		'args' => [
-			'id_rubrique' => $id_rubrique,
-			'ext' => $ext,
-			'fond' => $fond,
-			'lang' => $lang,
-			'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
-			'connect' => $connect
-		],
-		'data' => $squelette['fond'],
-	];
-
-	if (test_espace_prive() || defined('_ZPIP')) {
-		if (!$styliser_par_z) {
-			$styliser_par_z = charger_fonction('styliser_par_z', 'public');
-		}
-		$flux = $styliser_par_z($flux);
-	}
-
-	$flux = styliser_par_objets($flux);
-
-	// pipeline styliser
-	$squelette = pipeline('styliser', $flux);
-
-	return [$squelette, $ext, $ext, "$squelette.$ext"];
+    static $styliser_par_z;
+
+    // s'assurer que le fond est licite
+    // car il peut etre construit a partir d'une variable d'environnement
+    if (str_contains($fond, '../') || str_starts_with($fond, '/')) {
+        $fond = '404';
+    }
+
+    if (str_starts_with($fond, 'modeles/')) {
+        $modele = substr($fond, 8);
+        $modele = styliser_modele($modele, null, $contexte);
+        $fond = "modeles/$modele";
+    }
+
+    // Choisir entre $fond-dist.html, $fond=7.html, etc?
+    $id_rubrique = 0;
+    // Chercher le fond qui va servir de squelette
+    if ($r = quete_rubrique_fond($contexte)) {
+        [$id_rubrique, $lang] = $r;
+    }
+
+    // trouver un squelette du nom demande
+    // ne rien dire si on ne trouve pas,
+    // c'est l'appelant qui sait comment gerer la situation
+    // ou les plugins qui feront mieux dans le pipeline
+    $squelette = trouver_fond($fond, '', true);
+    $ext = $squelette['extension'];
+
+    $flux = [
+        'args' => [
+            'id_rubrique' => $id_rubrique,
+            'ext' => $ext,
+            'fond' => $fond,
+            'lang' => $lang,
+            'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
+            'connect' => $connect
+        ],
+        'data' => $squelette['fond'],
+    ];
+
+    if (test_espace_prive() || defined('_ZPIP')) {
+        if (!$styliser_par_z) {
+            $styliser_par_z = charger_fonction('styliser_par_z', 'public');
+        }
+        $flux = $styliser_par_z($flux);
+    }
+
+    $flux = styliser_par_objets($flux);
+
+    // pipeline styliser
+    $squelette = pipeline('styliser', $flux);
+
+    return [$squelette, $ext, $ext, "$squelette.$ext"];
 }
 
 /**
@@ -109,32 +109,32 @@ 
  *     Données du pipeline styliser
  **/
 function styliser_par_objets($flux) {
-	if (
-		test_espace_prive()
-		&& !($squelette = $flux['data'])
-		&& str_starts_with((string) $flux['args']['fond'], 'prive/objets/')
-		&& ($echafauder = charger_fonction('echafauder', 'prive', true))
-	) {
-		if (str_starts_with((string) $flux['args']['fond'], 'prive/objets/liste/')) {
-			$table = table_objet(substr((string) $flux['args']['fond'], 19));
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql])) {
-				$flux['data'] = $echafauder($table, $table, $table_sql, 'prive/objets/liste/objets', $flux['args']['ext']);
-			}
-		}
-		if (str_starts_with((string) $flux['args']['fond'], 'prive/objets/contenu/')) {
-			$type = substr((string) $flux['args']['fond'], 21);
-			$table = table_objet($type);
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql])) {
-				$flux['data'] = $echafauder($type, $table, $table_sql, 'prive/objets/contenu/objet', $flux['args']['ext']);
-			}
-		}
-	}
-
-	return $flux;
+    if (
+        test_espace_prive()
+        && !($squelette = $flux['data'])
+        && str_starts_with((string) $flux['args']['fond'], 'prive/objets/')
+        && ($echafauder = charger_fonction('echafauder', 'prive', true))
+    ) {
+        if (str_starts_with((string) $flux['args']['fond'], 'prive/objets/liste/')) {
+            $table = table_objet(substr((string) $flux['args']['fond'], 19));
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql])) {
+                $flux['data'] = $echafauder($table, $table, $table_sql, 'prive/objets/liste/objets', $flux['args']['ext']);
+            }
+        }
+        if (str_starts_with((string) $flux['args']['fond'], 'prive/objets/contenu/')) {
+            $type = substr((string) $flux['args']['fond'], 21);
+            $table = table_objet($type);
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql])) {
+                $flux['data'] = $echafauder($type, $table, $table_sql, 'prive/objets/contenu/objet', $flux['args']['ext']);
+            }
+        }
+    }
+
+    return $flux;
 }
 
 /**
@@ -150,47 +150,47 @@ 
  * @return array|false
  */
 function quete_rubrique_fond($contexte) {
-	static $liste_objets = null;
-	static $quete = [];
-	if (is_null($liste_objets)) {
-		$liste_objets = [];
-		include_spip('inc/urls');
-		include_spip('public/quete');
-		$l = urls_liste_objets(false);
-		// placer la rubrique en tete des objets
-		$l = array_diff($l, ['rubrique']);
-		array_unshift($l, 'rubrique');
-		foreach ($l as $objet) {
-			$id = id_table_objet($objet);
-			if (!isset($liste_objets[$id])) {
-				$liste_objets[$id] = objet_type($objet, false);
-			}
-		}
-	}
-	$c = array_intersect_key($contexte, $liste_objets);
-	if ($c === []) {
-		return false;
-	}
-
-	$c = array_map('intval', $c);
-	$s = serialize($c);
-	if (isset($quete[$s])) {
-		return $quete[$s];
-	}
-
-	if (isset($c['id_rubrique']) && ($r = $c['id_rubrique'])) {
-		unset($c['id_rubrique']);
-		$c = ['id_rubrique' => $r] + $c;
-	}
-
-	foreach ($c as $_id => $id) {
-		if ($id && ($row = quete_parent_lang(table_objet_sql($liste_objets[$_id]), $id))) {
-			$lang = $row['lang'] ?? '';
-			if ($_id == 'id_rubrique' || isset($row['id_rubrique']) && ($id = $row['id_rubrique'])) {
-				return $quete[$s] = [$id, $lang];
-			}
-		}
-	}
-
-	return $quete[$s] = false;
+    static $liste_objets = null;
+    static $quete = [];
+    if (is_null($liste_objets)) {
+        $liste_objets = [];
+        include_spip('inc/urls');
+        include_spip('public/quete');
+        $l = urls_liste_objets(false);
+        // placer la rubrique en tete des objets
+        $l = array_diff($l, ['rubrique']);
+        array_unshift($l, 'rubrique');
+        foreach ($l as $objet) {
+            $id = id_table_objet($objet);
+            if (!isset($liste_objets[$id])) {
+                $liste_objets[$id] = objet_type($objet, false);
+            }
+        }
+    }
+    $c = array_intersect_key($contexte, $liste_objets);
+    if ($c === []) {
+        return false;
+    }
+
+    $c = array_map('intval', $c);
+    $s = serialize($c);
+    if (isset($quete[$s])) {
+        return $quete[$s];
+    }
+
+    if (isset($c['id_rubrique']) && ($r = $c['id_rubrique'])) {
+        unset($c['id_rubrique']);
+        $c = ['id_rubrique' => $r] + $c;
+    }
+
+    foreach ($c as $_id => $id) {
+        if ($id && ($row = quete_parent_lang(table_objet_sql($liste_objets[$_id]), $id))) {
+            $lang = $row['lang'] ?? '';
+            if ($_id == 'id_rubrique' || isset($row['id_rubrique']) && ($id = $row['id_rubrique'])) {
+                return $quete[$s] = [$id, $lang];
+            }
+        }
+    }
+
+    return $quete[$s] = false;
 }

ecrire/public/tracer.php

Indentation +170 added lines, -170 removed lines

@@ -10,187 +10,187 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function trace_query_start() {
-	static $trace = '?';
-	if ($trace === '?' || defined('_DEBUG_TRACE_QUERIES')) {
-		if (defined('_DEBUG_TRACE_QUERIES') && _DEBUG_TRACE_QUERIES) {
-			$trace = true;
-		}
-		else {
-			if (empty($GLOBALS['visiteur_session'])) {
-				// si un anonyme fait un var_profile on est oblige de remplir le tableau des temps en attendant de savoir
-				// car ici on ne sait pas si c'est un hit anonyme
-				// ou une requete SQL faite avant chargement de la session
-				$trace = (empty($_GET['var_profile']) ? false : '?');
-			}
-			else {
-				include_spip('inc/autoriser');
-				// gare au bouclage sur calcul de droits au premier appel
-				// A fortiori quand on demande une trace
-				$trace = false; // on ne trace pas la requete provoquee par autoriser('debug')
-				$trace = (!empty($_GET['var_profile']) && autoriser('debug'));
-			}
-		}
-	}
-
-	return $trace ? microtime() : 0;
+    static $trace = '?';
+    if ($trace === '?' || defined('_DEBUG_TRACE_QUERIES')) {
+        if (defined('_DEBUG_TRACE_QUERIES') && _DEBUG_TRACE_QUERIES) {
+            $trace = true;
+        }
+        else {
+            if (empty($GLOBALS['visiteur_session'])) {
+                // si un anonyme fait un var_profile on est oblige de remplir le tableau des temps en attendant de savoir
+                // car ici on ne sait pas si c'est un hit anonyme
+                // ou une requete SQL faite avant chargement de la session
+                $trace = (empty($_GET['var_profile']) ? false : '?');
+            }
+            else {
+                include_spip('inc/autoriser');
+                // gare au bouclage sur calcul de droits au premier appel
+                // A fortiori quand on demande une trace
+                $trace = false; // on ne trace pas la requete provoquee par autoriser('debug')
+                $trace = (!empty($_GET['var_profile']) && autoriser('debug'));
+            }
+        }
+    }
+
+    return $trace ? microtime() : 0;
 }
 
 function trace_query_end($query, $start, $result, $erreur, $serveur = '') {
-	static $trace = '?';
-	if ($trace === '?') {
-		if (empty($GLOBALS['visiteur_session'])) {
-			// si un anonyme fait un var_profile on est oblige de remplir le tableau des temps en attendant de savoir
-			// car ici on ne sait pas si c'est un hit anonyme
-			// ou une requete SQL faite avant chargement de la session
-			$trace = (empty($_GET['var_profile']) ? false : '?');
-		}
-		else {
-			include_spip('inc/autoriser');
-			// gare au bouclage sur calcul de droits au premier appel
-			// A fortiori quand on demande une trace
-			$trace = false; // on ne trace pas la requete provoquee par autoriser('debug')
-			$trace = (!empty($_GET['var_profile']) && autoriser('debug'));
-		}
-	}
-	if ($start) {
-		$end = microtime();
-		[$usec, $sec] = explode(' ', (string) $start);
-		[$usec2, $sec2] = explode(' ', $end);
-		$dt = $sec2 + $usec2 - $sec - $usec;
-		pipeline('trig_trace_query', ['query' => $query, 'start' => $start, 'end' => $end, 'time' => $dt, 'result' => $result, 'erreur' => $erreur, 'serveur' => $serveur]);
-		if ($trace) {
-			trace_query_chrono($dt, $query, $result, $serveur);
-		}
-	}
-	// tracer les erreurs, sauf pour select, c'est fait dans abstract_sql
-	if ($trace && $erreur && !preg_match('/^select\b/i', (string) $query)) {
-		erreur_squelette([sql_errno($serveur), $erreur, $query]);
-	}
-
-	return $result;
+    static $trace = '?';
+    if ($trace === '?') {
+        if (empty($GLOBALS['visiteur_session'])) {
+            // si un anonyme fait un var_profile on est oblige de remplir le tableau des temps en attendant de savoir
+            // car ici on ne sait pas si c'est un hit anonyme
+            // ou une requete SQL faite avant chargement de la session
+            $trace = (empty($_GET['var_profile']) ? false : '?');
+        }
+        else {
+            include_spip('inc/autoriser');
+            // gare au bouclage sur calcul de droits au premier appel
+            // A fortiori quand on demande une trace
+            $trace = false; // on ne trace pas la requete provoquee par autoriser('debug')
+            $trace = (!empty($_GET['var_profile']) && autoriser('debug'));
+        }
+    }
+    if ($start) {
+        $end = microtime();
+        [$usec, $sec] = explode(' ', (string) $start);
+        [$usec2, $sec2] = explode(' ', $end);
+        $dt = $sec2 + $usec2 - $sec - $usec;
+        pipeline('trig_trace_query', ['query' => $query, 'start' => $start, 'end' => $end, 'time' => $dt, 'result' => $result, 'erreur' => $erreur, 'serveur' => $serveur]);
+        if ($trace) {
+            trace_query_chrono($dt, $query, $result, $serveur);
+        }
+    }
+    // tracer les erreurs, sauf pour select, c'est fait dans abstract_sql
+    if ($trace && $erreur && !preg_match('/^select\b/i', (string) $query)) {
+        erreur_squelette([sql_errno($serveur), $erreur, $query]);
+    }
+
+    return $result;
 }
 
 function trace_query_chrono($dt, $query, $result, $serveur = '') {
-	include_spip('inc/filtres_mini');
-	static $tt = 0, $nb = 0;
-
-	$x = _request('var_mode_objet');
-	if (isset($GLOBALS['debug']['aucasou'])) {
-		[, $boucle, $serveur, $contexte] = $GLOBALS['debug']['aucasou'];
-		if ($x && !preg_match("/$boucle\$/", (string) $x)) {
-			return;
-		}
-		if ($serveur) {
-			$boucle .= " ($serveur)";
-		}
-		$boucle = "<b>$boucle</b>";
-	} else {
-		if ($x) {
-			return;
-		}
-		$boucle = $contexte = '';
-	}
-
-	$tt += $dt;
-	$nb++;
-
-	$q = preg_replace('/([a-z)`])\s+([A-Z])/', "$1\n<br />$2", spip_htmlentities($query));
-	$e = sql_explain($query, $serveur);
-	$r = str_replace('Resource id ', '', (is_object($result) ? $result::class : $result));
-	$GLOBALS['tableau_des_temps'][] = [$dt, $nb, $boucle, $q, $e, $r, $contexte];
+    include_spip('inc/filtres_mini');
+    static $tt = 0, $nb = 0;
+
+    $x = _request('var_mode_objet');
+    if (isset($GLOBALS['debug']['aucasou'])) {
+        [, $boucle, $serveur, $contexte] = $GLOBALS['debug']['aucasou'];
+        if ($x && !preg_match("/$boucle\$/", (string) $x)) {
+            return;
+        }
+        if ($serveur) {
+            $boucle .= " ($serveur)";
+        }
+        $boucle = "<b>$boucle</b>";
+    } else {
+        if ($x) {
+            return;
+        }
+        $boucle = $contexte = '';
+    }
+
+    $tt += $dt;
+    $nb++;
+
+    $q = preg_replace('/([a-z)`])\s+([A-Z])/', "$1\n<br />$2", spip_htmlentities($query));
+    $e = sql_explain($query, $serveur);
+    $r = str_replace('Resource id ', '', (is_object($result) ? $result::class : $result));
+    $GLOBALS['tableau_des_temps'][] = [$dt, $nb, $boucle, $q, $e, $r, $contexte];
 }
 
 
 function chrono_requete($temps) {
-	$total = 0;
-	$hors = '<i>' . _T('zbug_hors_compilation') . '</i>';
-	$t = $q = $n = $d = [];
-	// Totaliser les temps et completer le Explain
-	foreach ($temps as $key => $v) {
-		[$dt, $nb, $boucle, $query, $explain, $res, $contexte] = $v;
-		if (is_array($contexte)) {
-			$k = ($contexte[0] . " $boucle");
-			include_spip('public/compiler');
-			$env = reconstruire_contexte_compil($contexte);
-		} else {
-			$k = $env = $boucle;
-		}
-
-		$total += $dt;
-		$t[$key] = $dt;
-		$q[$key] = $nb;
-		if (!isset($d[$k])) {
-			$d[$k] = 0;
-			$n[$k] = 0;
-		}
-		$d[$k] += $dt;
-		++$n[$k];
-
-		if (!is_array($explain)) {
-			$explain = [];
-		}
-		foreach ($explain as $j => $v) {
-			$explain[$j] = "<tr><th>$j</th><td>"
-				. str_replace(';', '<br />', (string) $v)
-				. '</td></tr>';
-		}
-		$e = "<table class='explain'>"
-			. '<caption>'
-			. $query
-			. '</caption>'
-			. "<tr><th>Time</th><td>$dt</td></tr>"
-			. "<tr><th>Order</th><td>$nb</td></tr>"
-			. "<tr><th>Res</th><td>$res</td></tr>"
-			. implode('', $explain)
-			. '</table>';
-
-		$temps[$key] = [$e, $env, $k];
-	}
-	// Trier par temps d'execution decroissant
-	array_multisort($t, SORT_DESC, $q, $temps);
-	arsort($d);
-	$i = 1;
-	$t = [];
-	// Fabriquer les liens de navigations dans le tableau des temps
-	foreach ($temps as $k => $v) {
-		$titre = strip_tags((string) $v[2]);
-		$href = quote_amp($GLOBALS['REQUEST_URI']) . "#req$i";
-		$href = str_replace("\\'", '&#39;', $href);
-
-		if (!isset($t[$v[2]])) {
-			$t[$v[2]] = [];
-		}
-		$t[$v[2]][] = "<span class='spip-debug-arg'> "
-			. "<a title='$titre' href='$href'>$i</a>"
-			. '</span>'
-			. ((count($t[$v[2]]) % 10 == 9) ? '<br />' : '');
-		$i++;
-	}
-
-	if ($d['']) {
-		$d[$hors] = $d[''];
-		$n[$hors] = $n[''];
-		$t[$hors] = $t[''];
-	}
-	unset($d['']);
-	// Fabriquer le tableau des liens de navigation dans le grand tableau
-	foreach ($d as $k => $v) {
-		$d[$k] = $n[$k] . "</td><td>$k</td><td class='time'>$v</td><td class='liste-reqs'>"
-			. implode('', $t[$k]);
-	}
-
-	$navigation = [
-		_T('zbug_statistiques'),
-		'<tr><td>'
-		. implode("</td></tr>\n<tr><td>", $d)
-		. "</td></tr>\n"
-		. (# _request('var_mode_objet') ? '' :
-		('<tr><td>' . (is_countable($temps) ? count($temps) : 0) . '</td><td>' . _T('info_total') . '</td><td class="time">' . $total . '</td><td></td></tr>'))
-	];
-
-	return [$temps, $navigation];
+    $total = 0;
+    $hors = '<i>' . _T('zbug_hors_compilation') . '</i>';
+    $t = $q = $n = $d = [];
+    // Totaliser les temps et completer le Explain
+    foreach ($temps as $key => $v) {
+        [$dt, $nb, $boucle, $query, $explain, $res, $contexte] = $v;
+        if (is_array($contexte)) {
+            $k = ($contexte[0] . " $boucle");
+            include_spip('public/compiler');
+            $env = reconstruire_contexte_compil($contexte);
+        } else {
+            $k = $env = $boucle;
+        }
+
+        $total += $dt;
+        $t[$key] = $dt;
+        $q[$key] = $nb;
+        if (!isset($d[$k])) {
+            $d[$k] = 0;
+            $n[$k] = 0;
+        }
+        $d[$k] += $dt;
+        ++$n[$k];
+
+        if (!is_array($explain)) {
+            $explain = [];
+        }
+        foreach ($explain as $j => $v) {
+            $explain[$j] = "<tr><th>$j</th><td>"
+                . str_replace(';', '<br />', (string) $v)
+                . '</td></tr>';
+        }
+        $e = "<table class='explain'>"
+            . '<caption>'
+            . $query
+            . '</caption>'
+            . "<tr><th>Time</th><td>$dt</td></tr>"
+            . "<tr><th>Order</th><td>$nb</td></tr>"
+            . "<tr><th>Res</th><td>$res</td></tr>"
+            . implode('', $explain)
+            . '</table>';
+
+        $temps[$key] = [$e, $env, $k];
+    }
+    // Trier par temps d'execution decroissant
+    array_multisort($t, SORT_DESC, $q, $temps);
+    arsort($d);
+    $i = 1;
+    $t = [];
+    // Fabriquer les liens de navigations dans le tableau des temps
+    foreach ($temps as $k => $v) {
+        $titre = strip_tags((string) $v[2]);
+        $href = quote_amp($GLOBALS['REQUEST_URI']) . "#req$i";
+        $href = str_replace("\\'", '&#39;', $href);
+
+        if (!isset($t[$v[2]])) {
+            $t[$v[2]] = [];
+        }
+        $t[$v[2]][] = "<span class='spip-debug-arg'> "
+            . "<a title='$titre' href='$href'>$i</a>"
+            . '</span>'
+            . ((count($t[$v[2]]) % 10 == 9) ? '<br />' : '');
+        $i++;
+    }
+
+    if ($d['']) {
+        $d[$hors] = $d[''];
+        $n[$hors] = $n[''];
+        $t[$hors] = $t[''];
+    }
+    unset($d['']);
+    // Fabriquer le tableau des liens de navigation dans le grand tableau
+    foreach ($d as $k => $v) {
+        $d[$k] = $n[$k] . "</td><td>$k</td><td class='time'>$v</td><td class='liste-reqs'>"
+            . implode('', $t[$k]);
+    }
+
+    $navigation = [
+        _T('zbug_statistiques'),
+        '<tr><td>'
+        . implode("</td></tr>\n<tr><td>", $d)
+        . "</td></tr>\n"
+        . (# _request('var_mode_objet') ? '' :
+        ('<tr><td>' . (is_countable($temps) ? count($temps) : 0) . '</td><td>' . _T('info_total') . '</td><td class="time">' . $total . '</td><td></td></tr>'))
+    ];
+
+    return [$temps, $navigation];
 }

ecrire/typographie/en.php

Indentation +25 added lines, -25 removed lines

@@ -10,35 +10,35 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // rien sauf les "~" et "-,"
 
 function typographie_en_dist($letexte) {
 
-	// zouli apostrophe
-	$letexte = str_replace("'", '’', (string) $letexte);
-
-	$cherche1 = [
-		'/ --?,/S'
-	];
-	$remplace1 = [
-		'~\0'
-	];
-	$letexte = preg_replace($cherche1, $remplace1, $letexte);
-
-	$letexte = str_replace(' ', '~', $letexte);
-	$letexte = preg_replace('/ *~+ */', '~', $letexte);
-
-	$cherche2 = [
-		'/([^-\n]|^)--([^-]|$)/',
-		'/~/'
-	];
-	$remplace2 = [
-		'\1—\2',
-		' '
-	];
-
-	return preg_replace($cherche2, $remplace2, $letexte);
+    // zouli apostrophe
+    $letexte = str_replace("'", '’', (string) $letexte);
+
+    $cherche1 = [
+        '/ --?,/S'
+    ];
+    $remplace1 = [
+        '~\0'
+    ];
+    $letexte = preg_replace($cherche1, $remplace1, $letexte);
+
+    $letexte = str_replace(' ', '~', $letexte);
+    $letexte = preg_replace('/ *~+ */', '~', $letexte);
+
+    $cherche2 = [
+        '/([^-\n]|^)--([^-]|$)/',
+        '/~/'
+    ];
+    $remplace2 = [
+        '\1—\2',
+        ' '
+    ];
+
+    return preg_replace($cherche2, $remplace2, $letexte);
 }

ecrire/public.php

Indentation +183 added lines, -183 removed lines

@@ -20,188 +20,188 @@
 // par souci de compatiilite).
 
 if (isset($GLOBALS['_INC_PUBLIC']) && $GLOBALS['_INC_PUBLIC']) {
-	echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
+    echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
 } else {
-	$GLOBALS['_INC_PUBLIC'] = 1;
-	define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
-
-	// Faut-il initialiser SPIP ? (oui dans le cas general)
-	if (!defined('_DIR_RESTREINT_ABS')) {
-		if (
-			defined('_DIR_RESTREINT')
-			&& @file_exists(_ROOT_RESTREINT . 'inc_version.php')
-		) {
-			include_once _ROOT_RESTREINT . 'inc_version.php';
-		} else {
-			die('inc_version absent ?');
-		}
-	} // $fond defini dans le fichier d'appel ?
-
-	else {
-		if (isset($fond) && !_request('fond')) {
-		} // fond demande dans l'url par page=xxxx ?
-		else {
-			if (isset($_GET[_SPIP_PAGE])) {
-				$fond = (string)$_GET[_SPIP_PAGE];
-
-				// Securite
-				if (
-					strstr($fond, '/')
-					&& !(isset($GLOBALS['visiteur_session']) && include_spip('inc/autoriser') && autoriser('webmestre'))
-				) {
-					include_spip('inc/minipres');
-					echo minipres();
-					exit;
-				}
-				// l'argument Page a priorite sur l'argument action
-				// le cas se presente a cause des RewriteRule d'Apache
-				// qui permettent d'ajouter un argument dans la QueryString
-				// mais pas d'en retirer un en conservant les autres.
-				if (isset($_GET['action']) && $_GET['action'] === $fond) {
-					unset($_GET['action']);
-				}
-				# sinon, fond par defaut
-			} else {
-				// sinon fond par defaut (cf. assembler.php)
-				$fond = pipeline('detecter_fond_par_defaut', '');
-			}
-		}
-	}
-
-	$tableau_des_temps = [];
-
-	// Particularites de certains squelettes
-	if ($fond == 'login') {
-		$forcer_lang = true;
-	}
-
-	if (
-		isset($forcer_lang) && $forcer_lang && $forcer_lang !== 'non'
-		&& !_request('action')
-		&& $_SERVER['REQUEST_METHOD'] != 'POST'
-	) {
-		include_spip('inc/lang');
-		verifier_lang_url();
-	}
-
-	$lang = isset($_GET['lang']) ? lang_select($_GET['lang']) : '';
-
-	// Charger l'aiguilleur des traitements derogatoires
-	// (action en base SQL, formulaires CVT, AJax)
-	if (_request('action') || _request('var_ajax') || _request('formulaire_action')) {
-		include_spip('public/aiguiller');
-		if (
-			// cas des appels actions ?action=xxx
-			traiter_appels_actions()
-			// cas des hits ajax sur les inclusions ajax
-			|| traiter_appels_inclusions_ajax()
-			// cas des formulaires charger/verifier/traiter
-			|| traiter_formulaires_dynamiques()
-		) {
-			// lancer les taches sur affichage final, comme le cron
-			// mais sans rien afficher
-			$GLOBALS['html'] = false; // ne rien afficher
-			pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
-			exit; // le hit est fini !
-		}
-	}
-
-	// Il y a du texte a produire, charger le metteur en page
-	include_spip('public/assembler');
-	$page = assembler($fond, _request('connect') ?? '');
-
-	if (isset($page['status'])) {
-		include_spip('inc/headers');
-		http_response_code($page['status']);
-	}
-
-	// Content-Type ?
-	if (!isset($page['entetes']['Content-Type'])) {
-		$charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
-		$page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
-		$html = true;
-	} else {
-		$html = preg_match(',^\s*text/html,', (string) $page['entetes']['Content-Type']);
-	}
-
-	// Tester si on est admin et il y a des choses supplementaires a dire
-	// type tableau pour y mettre des choses au besoin.
-	$debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
-
-	// affiche-t-on les boutons d'administration ? voir f_admin()
-	$affiche_boutons_admin = ($html && (
-		isset($_COOKIE['spip_admin']) && (!isset($flag_preserver) || !$flag_preserver)
-		|| $debug && include_spip('inc/autoriser') && autoriser('debug')
-		|| defined('_VAR_PREVIEW') && _VAR_PREVIEW)
-	);
-
-	if ($affiche_boutons_admin) {
-		include_spip('balise/formulaire_admin');
-	}
-
-
-	// Execution de la page calculee
-
-	// traitements sur les entetes avant envoi
-	// peut servir pour le plugin de stats
-	$page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
-
-
-	// eval $page et affecte $res
-	include _ROOT_RESTREINT . 'public/evaluer_page.php';
-	envoyer_entetes($page['entetes']);
-	if ($res === false) {
-		include_spip('inc/autoriser');
-		$err = _T('zbug_erreur_execution_page');
-		if (autoriser('webmestre')) {
-			$err .= "\n<hr />\n"
-				. highlight_string($page['codephp'], true)
-				. "\n<hr />\n";
-		}
-		$msg = [$err];
-		erreur_squelette($msg);
-	}
-
-	//
-	// Envoyer le resultat apres post-traitements
-	//
-	// (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
-	// cf. public/assembler.php)
-	echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
-
-	if ($lang) {
-		lang_select();
-	}
-	// l'affichage de la page a pu lever des erreurs (inclusion manquante)
-	// il faut tester a nouveau
-	$debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
-
-	// Appel au debusqueur en cas d'erreurs ou de demande de trace
-	// at last
-	if ($debug) {
-		// en cas d'erreur, retester l'affichage
-		if ($html && ($affiche_boutons_admin || $debug)) {
-			$var_mode_affiche = _request('var_mode_affiche');
-			$var_mode_objet = _request('var_mode_objet');
-			$GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
-			echo erreur_squelette(false);
-		}
-	} else {
-		if (
-			isset($GLOBALS['meta']['date_prochain_postdate'])
-			&& $GLOBALS['meta']['date_prochain_postdate'] <= time()
-		) {
-			include_spip('inc/rubriques');
-			calculer_prochain_postdate(true);
-		}
-
-		// Effectuer une tache de fond ?
-		// si _DIRECT_CRON_FORCE est present, on force l'appel
-		if (defined('_DIRECT_CRON_FORCE')) {
-			cron();
-		}
-
-		// sauver le cache chemin si necessaire
-		save_path_cache();
-	}
+    $GLOBALS['_INC_PUBLIC'] = 1;
+    define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
+
+    // Faut-il initialiser SPIP ? (oui dans le cas general)
+    if (!defined('_DIR_RESTREINT_ABS')) {
+        if (
+            defined('_DIR_RESTREINT')
+            && @file_exists(_ROOT_RESTREINT . 'inc_version.php')
+        ) {
+            include_once _ROOT_RESTREINT . 'inc_version.php';
+        } else {
+            die('inc_version absent ?');
+        }
+    } // $fond defini dans le fichier d'appel ?
+
+    else {
+        if (isset($fond) && !_request('fond')) {
+        } // fond demande dans l'url par page=xxxx ?
+        else {
+            if (isset($_GET[_SPIP_PAGE])) {
+                $fond = (string)$_GET[_SPIP_PAGE];
+
+                // Securite
+                if (
+                    strstr($fond, '/')
+                    && !(isset($GLOBALS['visiteur_session']) && include_spip('inc/autoriser') && autoriser('webmestre'))
+                ) {
+                    include_spip('inc/minipres');
+                    echo minipres();
+                    exit;
+                }
+                // l'argument Page a priorite sur l'argument action
+                // le cas se presente a cause des RewriteRule d'Apache
+                // qui permettent d'ajouter un argument dans la QueryString
+                // mais pas d'en retirer un en conservant les autres.
+                if (isset($_GET['action']) && $_GET['action'] === $fond) {
+                    unset($_GET['action']);
+                }
+                # sinon, fond par defaut
+            } else {
+                // sinon fond par defaut (cf. assembler.php)
+                $fond = pipeline('detecter_fond_par_defaut', '');
+            }
+        }
+    }
+
+    $tableau_des_temps = [];
+
+    // Particularites de certains squelettes
+    if ($fond == 'login') {
+        $forcer_lang = true;
+    }
+
+    if (
+        isset($forcer_lang) && $forcer_lang && $forcer_lang !== 'non'
+        && !_request('action')
+        && $_SERVER['REQUEST_METHOD'] != 'POST'
+    ) {
+        include_spip('inc/lang');
+        verifier_lang_url();
+    }
+
+    $lang = isset($_GET['lang']) ? lang_select($_GET['lang']) : '';
+
+    // Charger l'aiguilleur des traitements derogatoires
+    // (action en base SQL, formulaires CVT, AJax)
+    if (_request('action') || _request('var_ajax') || _request('formulaire_action')) {
+        include_spip('public/aiguiller');
+        if (
+            // cas des appels actions ?action=xxx
+            traiter_appels_actions()
+            // cas des hits ajax sur les inclusions ajax
+            || traiter_appels_inclusions_ajax()
+            // cas des formulaires charger/verifier/traiter
+            || traiter_formulaires_dynamiques()
+        ) {
+            // lancer les taches sur affichage final, comme le cron
+            // mais sans rien afficher
+            $GLOBALS['html'] = false; // ne rien afficher
+            pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
+            exit; // le hit est fini !
+        }
+    }
+
+    // Il y a du texte a produire, charger le metteur en page
+    include_spip('public/assembler');
+    $page = assembler($fond, _request('connect') ?? '');
+
+    if (isset($page['status'])) {
+        include_spip('inc/headers');
+        http_response_code($page['status']);
+    }
+
+    // Content-Type ?
+    if (!isset($page['entetes']['Content-Type'])) {
+        $charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
+        $page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
+        $html = true;
+    } else {
+        $html = preg_match(',^\s*text/html,', (string) $page['entetes']['Content-Type']);
+    }
+
+    // Tester si on est admin et il y a des choses supplementaires a dire
+    // type tableau pour y mettre des choses au besoin.
+    $debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
+
+    // affiche-t-on les boutons d'administration ? voir f_admin()
+    $affiche_boutons_admin = ($html && (
+        isset($_COOKIE['spip_admin']) && (!isset($flag_preserver) || !$flag_preserver)
+        || $debug && include_spip('inc/autoriser') && autoriser('debug')
+        || defined('_VAR_PREVIEW') && _VAR_PREVIEW)
+    );
+
+    if ($affiche_boutons_admin) {
+        include_spip('balise/formulaire_admin');
+    }
+
+
+    // Execution de la page calculee
+
+    // traitements sur les entetes avant envoi
+    // peut servir pour le plugin de stats
+    $page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
+
+
+    // eval $page et affecte $res
+    include _ROOT_RESTREINT . 'public/evaluer_page.php';
+    envoyer_entetes($page['entetes']);
+    if ($res === false) {
+        include_spip('inc/autoriser');
+        $err = _T('zbug_erreur_execution_page');
+        if (autoriser('webmestre')) {
+            $err .= "\n<hr />\n"
+                . highlight_string($page['codephp'], true)
+                . "\n<hr />\n";
+        }
+        $msg = [$err];
+        erreur_squelette($msg);
+    }
+
+    //
+    // Envoyer le resultat apres post-traitements
+    //
+    // (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
+    // cf. public/assembler.php)
+    echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
+
+    if ($lang) {
+        lang_select();
+    }
+    // l'affichage de la page a pu lever des erreurs (inclusion manquante)
+    // il faut tester a nouveau
+    $debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
+
+    // Appel au debusqueur en cas d'erreurs ou de demande de trace
+    // at last
+    if ($debug) {
+        // en cas d'erreur, retester l'affichage
+        if ($html && ($affiche_boutons_admin || $debug)) {
+            $var_mode_affiche = _request('var_mode_affiche');
+            $var_mode_objet = _request('var_mode_objet');
+            $GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
+            echo erreur_squelette(false);
+        }
+    } else {
+        if (
+            isset($GLOBALS['meta']['date_prochain_postdate'])
+            && $GLOBALS['meta']['date_prochain_postdate'] <= time()
+        ) {
+            include_spip('inc/rubriques');
+            calculer_prochain_postdate(true);
+        }
+
+        // Effectuer une tache de fond ?
+        // si _DIRECT_CRON_FORCE est present, on force l'appel
+        if (defined('_DIRECT_CRON_FORCE')) {
+            cron();
+        }
+
+        // sauver le cache chemin si necessaire
+        save_path_cache();
+    }
 }