spip / SPIP

ecrire/plugins/infos_paquet.php

Indentation +195 added lines, -195 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -24,64 +24,64 @@ 
  * @return array
  */
 function plugins_infos_paquet($desc, $plug = '', $dir_plugins = _DIR_PLUGINS) {
-	static $process = [ // tableau constant
-		'debut' => 'paquet_debutElement',
-		'fin' => 'paquet_finElement',
-		'text' => 'paquet_textElement'
-	];
-
-	$valider_xml = charger_fonction('valider', 'xml');
-	$vxml = $valider_xml($desc, false, $process, 'paquet.dtd', 'utf-8');
-	if (!$vxml->err) {
-		// On veut toutes les variantes selon la version de SPIP
-		if (!$plug) {
-			return $vxml->versions;
-		}
-
-		// compatibilite avec l'existant:
-		$tree = $vxml->versions['0'];
-
-		// l'arbre renvoie parfois un tag vide... etrange. Pas la peine de garder ca.
-		if (isset($tree['']) && !strlen((string) $tree[''])) {
-			unset($tree['']);
-		}
-
-		$tree['slogan'] = $tree['prefix'] . '_slogan';
-		$tree['description'] = $tree['prefix'] . '_description';
-		paquet_readable_files($tree, "$dir_plugins$plug/");
-		if (!$tree['chemin']) {
-			$tree['chemin'] = [];
-		}
-
-		// On verifie qu'il existe des balises spip qu'il faudrait rajouter dans
-		// la structure d'infos du paquet en fonction de la version spip courante
-		if ((is_countable($vxml->versions) ? count($vxml->versions) : 0) > 1) {
-			$vspip = $GLOBALS['spip_version_branche'];
-			foreach ($vxml->versions as $_compatibilite => $_version) {
-				if (
-					$_version['balise'] == 'spip'
-					&& plugin_version_compatible($_compatibilite, $vspip, 'spip')
-				) {
-					// on merge les sous-balises de la balise spip compatible avec celles de la
-					// balise paquet
-					foreach ($_version as $_index => $_balise) {
-						if ($_index && $_index != 'balise') {
-							$tree[$_index] = array_merge($tree[$_index], $_balise);
-						}
-					}
-				}
-			}
-		}
-
-		return $tree;
-	}
-
-	// Prendre les messages d'erreur sans les numeros de lignes
-	$msg = array_column($vxml->err, 0);
-	$t = _T('plugins_erreur', ['plugins' => $plug]);
-	array_unshift($msg, $t . " <ul class='erreur_xml'><li>" . reset($msg) . '</li></ul>');
-
-	return ['erreur' => $msg];
+    static $process = [ // tableau constant
+        'debut' => 'paquet_debutElement',
+        'fin' => 'paquet_finElement',
+        'text' => 'paquet_textElement'
+    ];
+
+    $valider_xml = charger_fonction('valider', 'xml');
+    $vxml = $valider_xml($desc, false, $process, 'paquet.dtd', 'utf-8');
+    if (!$vxml->err) {
+        // On veut toutes les variantes selon la version de SPIP
+        if (!$plug) {
+            return $vxml->versions;
+        }
+
+        // compatibilite avec l'existant:
+        $tree = $vxml->versions['0'];
+
+        // l'arbre renvoie parfois un tag vide... etrange. Pas la peine de garder ca.
+        if (isset($tree['']) && !strlen((string) $tree[''])) {
+            unset($tree['']);
+        }
+
+        $tree['slogan'] = $tree['prefix'] . '_slogan';
+        $tree['description'] = $tree['prefix'] . '_description';
+        paquet_readable_files($tree, "$dir_plugins$plug/");
+        if (!$tree['chemin']) {
+            $tree['chemin'] = [];
+        }
+
+        // On verifie qu'il existe des balises spip qu'il faudrait rajouter dans
+        // la structure d'infos du paquet en fonction de la version spip courante
+        if ((is_countable($vxml->versions) ? count($vxml->versions) : 0) > 1) {
+            $vspip = $GLOBALS['spip_version_branche'];
+            foreach ($vxml->versions as $_compatibilite => $_version) {
+                if (
+                    $_version['balise'] == 'spip'
+                    && plugin_version_compatible($_compatibilite, $vspip, 'spip')
+                ) {
+                    // on merge les sous-balises de la balise spip compatible avec celles de la
+                    // balise paquet
+                    foreach ($_version as $_index => $_balise) {
+                        if ($_index && $_index != 'balise') {
+                            $tree[$_index] = array_merge($tree[$_index], $_balise);
+                        }
+                    }
+                }
+            }
+        }
+
+        return $tree;
+    }
+
+    // Prendre les messages d'erreur sans les numeros de lignes
+    $msg = array_column($vxml->err, 0);
+    $t = _T('plugins_erreur', ['plugins' => $plug]);
+    array_unshift($msg, $t . " <ul class='erreur_xml'><li>" . reset($msg) . '</li></ul>');
+
+    return ['erreur' => $msg];
 }
 
 /**
@@ -93,11 +93,11 @@ 
  * @return void
  */
 function paquet_readable_files(&$tree, $dir) {
-	$prefix = strtolower((string) $tree['prefix']);
+    $prefix = strtolower((string) $tree['prefix']);
 
-	$tree['options'] = (is_readable($dir . $f = ($prefix . '_options.php'))) ? [$f] : [];
-	$tree['fonctions'] = (is_readable($dir . $f = ($prefix . '_fonctions.php'))) ? [$f] : [];
-	$tree['install'] = (is_readable($dir . $f = ($prefix . '_administrations.php'))) ? [$f] : [];
+    $tree['options'] = (is_readable($dir . $f = ($prefix . '_options.php'))) ? [$f] : [];
+    $tree['fonctions'] = (is_readable($dir . $f = ($prefix . '_fonctions.php'))) ? [$f] : [];
+    $tree['install'] = (is_readable($dir . $f = ($prefix . '_administrations.php'))) ? [$f] : [];
 }
 
 /**
@@ -114,35 +114,35 @@ 
  * @param array $attrs
  */
 function paquet_debutElement($phraseur, $name, $attrs) {
-	xml_debutElement($phraseur, $name, $attrs);
-	if ($phraseur->err) {
-		return;
-	}
-	if ($name == 'paquet' || $name == 'spip') {
-		if ($name == 'spip') {
-			$n = $attrs['compatibilite'];
-			$attrs = [];
-		} else {
-			$n = '0';
-			$phraseur->contenu['paquet'] = $attrs;
-			$attrs['menu'] = [];
-			$attrs['chemin'] = [];
-			$attrs['necessite'] = [];
-			$attrs['lib'] = [];
-			$attrs['onglet'] = [];
-			$attrs['procure'] = [];
-			$attrs['pipeline'] = [];
-			$attrs['utilise'] = [];
-			$attrs['style'] = [];
-			$attrs['script'] = [];
-			$attrs['genie'] = [];
-		}
-		$phraseur->contenu['compatible'] = $n;
-		$phraseur->versions[$phraseur->contenu['compatible']] = $attrs;
-	} else {
-		$phraseur->versions[$phraseur->contenu['compatible']][$name][0] = $attrs;
-	}
-	$phraseur->versions[$phraseur->contenu['compatible']][''] = '';
+    xml_debutElement($phraseur, $name, $attrs);
+    if ($phraseur->err) {
+        return;
+    }
+    if ($name == 'paquet' || $name == 'spip') {
+        if ($name == 'spip') {
+            $n = $attrs['compatibilite'];
+            $attrs = [];
+        } else {
+            $n = '0';
+            $phraseur->contenu['paquet'] = $attrs;
+            $attrs['menu'] = [];
+            $attrs['chemin'] = [];
+            $attrs['necessite'] = [];
+            $attrs['lib'] = [];
+            $attrs['onglet'] = [];
+            $attrs['procure'] = [];
+            $attrs['pipeline'] = [];
+            $attrs['utilise'] = [];
+            $attrs['style'] = [];
+            $attrs['script'] = [];
+            $attrs['genie'] = [];
+        }
+        $phraseur->contenu['compatible'] = $n;
+        $phraseur->versions[$phraseur->contenu['compatible']] = $attrs;
+    } else {
+        $phraseur->versions[$phraseur->contenu['compatible']][$name][0] = $attrs;
+    }
+    $phraseur->versions[$phraseur->contenu['compatible']][''] = '';
 }
 
 /**
@@ -154,11 +154,11 @@ 
  * @param string $data
  */
 function paquet_textElement($phraseur, $data) {
-	xml_textElement($phraseur, $data);
-	if ($phraseur->err || !(trim($data))) {
-		return;
-	}
-	$phraseur->versions[$phraseur->contenu['compatible']][''] .= $data;
+    xml_textElement($phraseur, $data);
+    if ($phraseur->err || !(trim($data))) {
+        return;
+    }
+    $phraseur->versions[$phraseur->contenu['compatible']][''] .= $data;
 }
 
 /**
@@ -170,32 +170,32 @@ 
  * @param string $name
  */
 function paquet_finElement($phraseur, $name) {
-	if ($phraseur->err) {
-		return;
-	}
-	$n = $phraseur->contenu['compatible'];
-
-	if (isset($phraseur->versions[$n][$name][0]) && is_array($phraseur->versions[$n][$name][0])) {
-		$attrs = $phraseur->versions[$n][$name][0];
-		unset($phraseur->versions[$n][$name][0]);
-	} else {
-		$attrs = [];
-	}
-
-	$texte = trim((string) $phraseur->versions[$n]['']);
-	$phraseur->versions[$n][''] = '';
-
-	$f = 'info_paquet_' . $name;
-	if (function_exists($f)) {
-		$f($phraseur, $attrs, $texte);
-	} elseif (!$attrs) {
-		$phraseur->versions[$n][$name] = $texte;
-	} else {
-		// Traitement generique. Si $attrs['nom'] n'existe pas, ce n'est pas normal ici
-		$phraseur->versions[$n][$name][$attrs['nom']] = $attrs;
-		#	  echo("<br>pour $name $n " . $attrs['nom']); var_dump($phraseur->versions[$n]);
-	}
-	xml_finElement($phraseur, $name, $attrs);
+    if ($phraseur->err) {
+        return;
+    }
+    $n = $phraseur->contenu['compatible'];
+
+    if (isset($phraseur->versions[$n][$name][0]) && is_array($phraseur->versions[$n][$name][0])) {
+        $attrs = $phraseur->versions[$n][$name][0];
+        unset($phraseur->versions[$n][$name][0]);
+    } else {
+        $attrs = [];
+    }
+
+    $texte = trim((string) $phraseur->versions[$n]['']);
+    $phraseur->versions[$n][''] = '';
+
+    $f = 'info_paquet_' . $name;
+    if (function_exists($f)) {
+        $f($phraseur, $attrs, $texte);
+    } elseif (!$attrs) {
+        $phraseur->versions[$n][$name] = $texte;
+    } else {
+        // Traitement generique. Si $attrs['nom'] n'existe pas, ce n'est pas normal ici
+        $phraseur->versions[$n][$name][$attrs['nom']] = $attrs;
+        #	  echo("<br>pour $name $n " . $attrs['nom']); var_dump($phraseur->versions[$n]);
+    }
+    xml_finElement($phraseur, $name, $attrs);
 }
 
 /**
@@ -207,9 +207,9 @@ 
  * @param string $texte
  */
 function info_paquet_licence($phraseur, $attrs, $texte) {
-	$lien = $attrs['lien'] ?? '';
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['licence'][] = ['nom' => $texte, 'url' => $lien];
+    $lien = $attrs['lien'] ?? '';
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['licence'][] = ['nom' => $texte, 'url' => $lien];
 }
 
 /**
@@ -221,14 +221,14 @@ 
  * @param string $texte
  */
 function info_paquet_chemin($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	if (isset($attrs['path'])) {
-		if (isset($attrs['type'])) {
-			$phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path'], 'type' => $attrs['type']];
-		} else {
-			$phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path']];
-		}
-	}
+    $n = $phraseur->contenu['compatible'];
+    if (isset($attrs['path'])) {
+        if (isset($attrs['type'])) {
+            $phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path'], 'type' => $attrs['type']];
+        } else {
+            $phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path']];
+        }
+    }
 }
 
 
@@ -242,20 +242,20 @@ 
  * @param string $texte
  */
 function info_paquet_auteur($phraseur, $attrs, $texte) {
-	#  echo 'auteur ', $texte;  var_dump($attrs);
-	if (isset($attrs['mail'])) {
-		if (strpos((string) $attrs['mail'], '@')) {
-			$attrs['mail'] = str_replace('@', ' AT ', (string) $attrs['mail']);
-		}
-		$mail = $attrs['mail'];
-	} else {
-		$mail = '';
-	}
-
-	$lien = $attrs['lien'] ?? '';
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['auteur'][] = ['nom' => $texte, 'url' => $lien, 'mail' => $mail];
+    #  echo 'auteur ', $texte;  var_dump($attrs);
+    if (isset($attrs['mail'])) {
+        if (strpos((string) $attrs['mail'], '@')) {
+            $attrs['mail'] = str_replace('@', ' AT ', (string) $attrs['mail']);
+        }
+        $mail = $attrs['mail'];
+    } else {
+        $mail = '';
+    }
+
+    $lien = $attrs['lien'] ?? '';
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['auteur'][] = ['nom' => $texte, 'url' => $lien, 'mail' => $mail];
 }
 
 /**
@@ -268,10 +268,10 @@ 
  */
 function info_paquet_credit($phraseur, $attrs, $texte) {
 
-	$lien = $attrs['lien'] ?? '';
+    $lien = $attrs['lien'] ?? '';
 
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['credit'][] = ['nom' => $texte, 'url' => $lien];
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['credit'][] = ['nom' => $texte, 'url' => $lien];
 }
 
 /**
@@ -283,8 +283,8 @@ 
  * @param string $texte
  */
 function info_paquet_copyright($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['copyright'][] = $texte;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['copyright'][] = $texte;
 }
 
 /**
@@ -296,9 +296,9 @@ 
  * @param string $texte
  */
 function info_paquet_paquet($phraseur, $attrs, $texte) {
-	$n = 0;
-	$phraseur->versions[$n]['dtd'] = 'paquet';
-	$phraseur->versions[$n]['balise'] = 'paquet';
+    $n = 0;
+    $phraseur->versions[$n]['dtd'] = 'paquet';
+    $phraseur->versions[$n]['balise'] = 'paquet';
 }
 
 /**
@@ -310,8 +310,8 @@ 
  * @param string $texte
  **/
 function info_paquet_traduire($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['traduire'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['traduire'][] = $attrs;
 }
 
 /**
@@ -323,8 +323,8 @@ 
  * @param string $texte
  */
 function info_paquet_spip($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['balise'] = 'spip';
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['balise'] = 'spip';
 }
 
 
@@ -336,8 +336,8 @@ 
  * @param string $texte
  */
 function info_paquet_pipeline($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['pipeline'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['pipeline'][] = $attrs;
 }
 
 
@@ -350,23 +350,23 @@ 
  * @param string $texte
  */
 function info_paquet_style($phraseur, $attrs, $texte) {
-	$lien = $chemin = $type = $media = '';
-
-	include_spip('inc/utils');
-	if (tester_url_absolue($attrs['source'])) {
-		$lien = $attrs['source'];
-	} else {
-		$chemin = $attrs['source'];
-	}
-	if (isset($attrs['type'])) {
-		$type = $attrs['type'];
-	}
-	if (isset($attrs['media'])) {
-		$media = $attrs['media'];
-	}
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['style'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type, 'media' => $media];
+    $lien = $chemin = $type = $media = '';
+
+    include_spip('inc/utils');
+    if (tester_url_absolue($attrs['source'])) {
+        $lien = $attrs['source'];
+    } else {
+        $chemin = $attrs['source'];
+    }
+    if (isset($attrs['type'])) {
+        $type = $attrs['type'];
+    }
+    if (isset($attrs['media'])) {
+        $media = $attrs['media'];
+    }
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['style'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type, 'media' => $media];
 }
 
 
@@ -379,20 +379,20 @@ 
  * @param string $texte
  */
 function info_paquet_script($phraseur, $attrs, $texte) {
-	$lien = $chemin = $type = $media = '';
-
-	include_spip('inc/utils');
-	if (tester_url_absolue($attrs['source'])) {
-		$lien = $attrs['source'];
-	} else {
-		$chemin = $attrs['source'];
-	}
-	if (isset($attrs['type'])) {
-		$type = $attrs['type'];
-	}
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['script'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type];
+    $lien = $chemin = $type = $media = '';
+
+    include_spip('inc/utils');
+    if (tester_url_absolue($attrs['source'])) {
+        $lien = $attrs['source'];
+    } else {
+        $chemin = $attrs['source'];
+    }
+    if (isset($attrs['type'])) {
+        $type = $attrs['type'];
+    }
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['script'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type];
 }
 
 /**
@@ -403,6 +403,6 @@ 
  * @param string $texte
  */
 function info_paquet_genie($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['genie'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['genie'][] = $attrs;
 }

Spacing +8 added lines, -8 removed lines

@@ -24,7 +24,7 @@ 
  * @return array
  */
 function plugins_infos_paquet($desc, $plug = '', $dir_plugins = _DIR_PLUGINS) {
-	static $process = [ // tableau constant
+	static $process = [// tableau constant
 		'debut' => 'paquet_debutElement',
 		'fin' => 'paquet_finElement',
 		'text' => 'paquet_textElement'
@@ -46,8 +46,8 @@ 
 			unset($tree['']);
 		}
 
-		$tree['slogan'] = $tree['prefix'] . '_slogan';
-		$tree['description'] = $tree['prefix'] . '_description';
+		$tree['slogan'] = $tree['prefix'].'_slogan';
+		$tree['description'] = $tree['prefix'].'_description';
 		paquet_readable_files($tree, "$dir_plugins$plug/");
 		if (!$tree['chemin']) {
 			$tree['chemin'] = [];
@@ -79,7 +79,7 @@ 
 	// Prendre les messages d'erreur sans les numeros de lignes
 	$msg = array_column($vxml->err, 0);
 	$t = _T('plugins_erreur', ['plugins' => $plug]);
-	array_unshift($msg, $t . " <ul class='erreur_xml'><li>" . reset($msg) . '</li></ul>');
+	array_unshift($msg, $t." <ul class='erreur_xml'><li>".reset($msg).'</li></ul>');
 
 	return ['erreur' => $msg];
 }
@@ -95,9 +95,9 @@ 
 function paquet_readable_files(&$tree, $dir) {
 	$prefix = strtolower((string) $tree['prefix']);
 
-	$tree['options'] = (is_readable($dir . $f = ($prefix . '_options.php'))) ? [$f] : [];
-	$tree['fonctions'] = (is_readable($dir . $f = ($prefix . '_fonctions.php'))) ? [$f] : [];
-	$tree['install'] = (is_readable($dir . $f = ($prefix . '_administrations.php'))) ? [$f] : [];
+	$tree['options'] = (is_readable($dir.$f = ($prefix.'_options.php'))) ? [$f] : [];
+	$tree['fonctions'] = (is_readable($dir.$f = ($prefix.'_fonctions.php'))) ? [$f] : [];
+	$tree['install'] = (is_readable($dir.$f = ($prefix.'_administrations.php'))) ? [$f] : [];
 }
 
 /**
@@ -185,7 +185,7 @@ 
 	$texte = trim((string) $phraseur->versions[$n]['']);
 	$phraseur->versions[$n][''] = '';
 
-	$f = 'info_paquet_' . $name;
+	$f = 'info_paquet_'.$name;
 	if (function_exists($f)) {
 		$f($phraseur, $attrs, $texte);
 	} elseif (!$attrs) {

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;
 }

Spacing +5 added lines, -5 removed lines

@@ -58,10 +58,10 @@ 
 				$id = substr(md5((string) $plug), 0, 16);
 				$res .= $ligne_plug(
 					$url_page,
-					str_replace(_DIR_PLUGINS, '', _DIR_RACINE . $plug),
+					str_replace(_DIR_PLUGINS, '', _DIR_RACINE.$plug),
 					$actif,
 					'menu-entree'
-				) . "\n";
+				)."\n";
 				unset($liste_plugins[$key]);
 			}
 		}
@@ -101,12 +101,12 @@ 
 	}
 	$chemin = '';
 	if ($tcom !== []) {
-		$chemin .= implode('/', $tcom) . '/';
+		$chemin .= implode('/', $tcom).'/';
 	}
 	// ouvrir les repertoires jusqu'a la cible
 	while ($open = array_shift($ttarg)) {
-		$visible = @isset($deplie[$chemin . $open]);
-		$chemin .= $open . '/';
+		$visible = @isset($deplie[$chemin.$open]);
+		$chemin .= $open.'/';
 		$output .= '<li>';
 		$output .= bouton_block_depliable($chemin, $visible);
 		$output .= debut_block_depliable($visible);

ecrire/public/decompiler.php

Indentation +176 added lines, -176 removed lines

@@ -12,129 +12,129 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Decompilation de l'arbre de syntaxe abstraite d'un squelette SPIP
 
 function decompiler_boucle($struct, $fmt = '', $prof = 0) {
-	$nom = $struct->id_boucle;
-	$preaff = decompiler_($struct->preaff, $fmt, $prof);
-	$avant = decompiler_($struct->avant, $fmt, $prof);
-	$apres = decompiler_($struct->apres, $fmt, $prof);
-	$altern = decompiler_($struct->altern, $fmt, $prof);
-	$milieu = decompiler_($struct->milieu, $fmt, $prof);
-	$postaff = decompiler_($struct->postaff, $fmt, $prof);
-
-	$type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
-	$type .= ($struct->type_requete ?: $struct->table_optionnelle);
-
-	if ($struct->jointures_explicites) {
-		$type .= ' ' . $struct->jointures_explicites;
-	}
-	if ($struct->table_optionnelle) {
-		$type .= '?';
-	}
-	// Revoir le cas de la boucle recursive
-
-	$crit = $struct->param;
-	if ($crit && !is_array($crit[0])) {
-		$type = strtolower($type) . array_shift($crit);
-	}
-	$crit = decompiler_criteres($struct, $fmt, $prof);
-
-	$f = 'format_boucle_' . $fmt;
-
-	return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
+    $nom = $struct->id_boucle;
+    $preaff = decompiler_($struct->preaff, $fmt, $prof);
+    $avant = decompiler_($struct->avant, $fmt, $prof);
+    $apres = decompiler_($struct->apres, $fmt, $prof);
+    $altern = decompiler_($struct->altern, $fmt, $prof);
+    $milieu = decompiler_($struct->milieu, $fmt, $prof);
+    $postaff = decompiler_($struct->postaff, $fmt, $prof);
+
+    $type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
+    $type .= ($struct->type_requete ?: $struct->table_optionnelle);
+
+    if ($struct->jointures_explicites) {
+        $type .= ' ' . $struct->jointures_explicites;
+    }
+    if ($struct->table_optionnelle) {
+        $type .= '?';
+    }
+    // Revoir le cas de la boucle recursive
+
+    $crit = $struct->param;
+    if ($crit && !is_array($crit[0])) {
+        $type = strtolower($type) . array_shift($crit);
+    }
+    $crit = decompiler_criteres($struct, $fmt, $prof);
+
+    $f = 'format_boucle_' . $fmt;
+
+    return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
 }
 
 function decompiler_include($struct, $fmt = '', $prof = 0) {
-	$res = [];
-	foreach ($struct->param ?: [] as $couple) {
-		array_shift($couple);
-		foreach ($couple as $v) {
-			$res[] = decompiler_($v, $fmt, $prof);
-		}
-	}
-	$file = is_string($struct->texte) ? $struct->texte :
-		decompiler_($struct->texte, $fmt, $prof);
-	$f = 'format_inclure_' . $fmt;
-
-	return $f($file, $res, $prof);
+    $res = [];
+    foreach ($struct->param ?: [] as $couple) {
+        array_shift($couple);
+        foreach ($couple as $v) {
+            $res[] = decompiler_($v, $fmt, $prof);
+        }
+    }
+    $file = is_string($struct->texte) ? $struct->texte :
+        decompiler_($struct->texte, $fmt, $prof);
+    $f = 'format_inclure_' . $fmt;
+
+    return $f($file, $res, $prof);
 }
 
 function decompiler_texte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_texte_' . $fmt;
+    $f = 'format_texte_' . $fmt;
 
-	return strlen((string) $struct->texte) ? $f($struct->texte, $prof) : '';
+    return strlen((string) $struct->texte) ? $f($struct->texte, $prof) : '';
 }
 
 function decompiler_polyglotte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_polyglotte_' . $fmt;
+    $f = 'format_polyglotte_' . $fmt;
 
-	return $f($struct->traductions, $prof);
+    return $f($struct->traductions, $prof);
 }
 
 function decompiler_idiome($struct, $fmt = '', $prof = 0) {
-	$args = [];
-	foreach ($struct->arg as $k => $v) {
-		$args[$k] = public_decompiler($v, $fmt, $prof);
-	}
+    $args = [];
+    foreach ($struct->arg as $k => $v) {
+        $args[$k] = public_decompiler($v, $fmt, $prof);
+    }
 
-	$filtres = decompiler_liste($struct->param, $fmt, $prof);
+    $filtres = decompiler_liste($struct->param, $fmt, $prof);
 
-	$f = 'format_idiome_' . $fmt;
+    $f = 'format_idiome_' . $fmt;
 
-	return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
+    return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
 }
 
 function decompiler_champ($struct, $fmt = '', $prof = 0) {
-	$avant = decompiler_($struct->avant, $fmt, $prof);
-	$apres = decompiler_($struct->apres, $fmt, $prof);
-	$args = $filtres = '';
-	if ($p = $struct->param) {
-		if ($p[0][0] === '') {
-			$args = decompiler_liste([array_shift($p)], $fmt, $prof);
-		}
-		$filtres = decompiler_liste($p, $fmt, $prof);
-	}
-	$f = 'format_champ_' . $fmt;
-
-	return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
+    $avant = decompiler_($struct->avant, $fmt, $prof);
+    $apres = decompiler_($struct->apres, $fmt, $prof);
+    $args = $filtres = '';
+    if ($p = $struct->param) {
+        if ($p[0][0] === '') {
+            $args = decompiler_liste([array_shift($p)], $fmt, $prof);
+        }
+        $filtres = decompiler_liste($p, $fmt, $prof);
+    }
+    $f = 'format_champ_' . $fmt;
+
+    return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
 }
 
 function decompiler_liste($sources, $fmt = '', $prof = 0) {
-	if (!is_array($sources)) {
-		return '';
-	}
-	$f = 'format_liste_' . $fmt;
-	$res = '';
-	foreach ($sources as $arg) {
-		if (!is_array($arg)) {
-			continue; // ne devrait pas arriver.
-		} else {
-			$r = array_shift($arg);
-		}
-		$args = [];
-		foreach ($arg as $v) {
-			// cas des arguments entoures de ' ou "
-			if (
-				(is_countable($v) ? count($v) : 0) == 1
-				&& $v[0]->type == 'texte'
-				&& strlen((string) $v[0]->apres) == 1
-				&& $v[0]->apres == $v[0]->avant
-			) {
-				$args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
-			} else {
-				$args[] = decompiler_($v, $fmt, 0 - $prof);
-			}
-		}
-		if ($r !== '' || $args) {
-			$res .= $f($r, $args, $prof);
-		}
-	}
-
-	return $res;
+    if (!is_array($sources)) {
+        return '';
+    }
+    $f = 'format_liste_' . $fmt;
+    $res = '';
+    foreach ($sources as $arg) {
+        if (!is_array($arg)) {
+            continue; // ne devrait pas arriver.
+        } else {
+            $r = array_shift($arg);
+        }
+        $args = [];
+        foreach ($arg as $v) {
+            // cas des arguments entoures de ' ou "
+            if (
+                (is_countable($v) ? count($v) : 0) == 1
+                && $v[0]->type == 'texte'
+                && strlen((string) $v[0]->apres) == 1
+                && $v[0]->apres == $v[0]->avant
+            ) {
+                $args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
+            } else {
+                $args[] = decompiler_($v, $fmt, 0 - $prof);
+            }
+        }
+        if ($r !== '' || $args) {
+            $res .= $f($r, $args, $prof);
+        }
+    }
+
+    return $res;
 }
 
 // Decompilation des criteres: on triche et on deroge:
@@ -142,93 +142,93 @@ 
 // - le champ apres signale le critere {"separateur"} ou {'separateur'}
 // - les champs sont implicitement etendus (crochets implicites mais interdits)
 function decompiler_criteres($boucle, $fmt = '', $prof = 0) {
-	$sources = $boucle->param;
-	if (!is_array($sources)) {
-		return '';
-	}
-	$res = '';
-	$f = 'format_critere_' . $fmt;
-	foreach ($sources as $crit) {
-		if (!is_array($crit)) {
-			continue;
-		} // boucle recursive
-		array_shift($crit);
-		$args = [];
-		foreach ($crit as $i => $v) {
-			if (
-				(is_countable($v) ? count($v) : 0) == 1
-				&& $v[0]->type == 'texte'
-				&& $v[0]->apres
-			) {
-				$args[] = [['texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)]];
-			} else {
-				$res2 = [];
-				foreach ($v as $k => $p) {
-					if (
-						isset($p->type)
-						&& function_exists($d = 'decompiler_' . $p->type)
-					) {
-						$r = $d($p, $fmt, (0 - $prof));
-						$res2[] = [$p->type, $r];
-					} else {
-						spip_log("critere $i / $k mal forme");
-					}
-				}
-				$args[] = $res2;
-			}
-		}
-		$res .= $f($args);
-	}
-
-	return $res;
+    $sources = $boucle->param;
+    if (!is_array($sources)) {
+        return '';
+    }
+    $res = '';
+    $f = 'format_critere_' . $fmt;
+    foreach ($sources as $crit) {
+        if (!is_array($crit)) {
+            continue;
+        } // boucle recursive
+        array_shift($crit);
+        $args = [];
+        foreach ($crit as $i => $v) {
+            if (
+                (is_countable($v) ? count($v) : 0) == 1
+                && $v[0]->type == 'texte'
+                && $v[0]->apres
+            ) {
+                $args[] = [['texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)]];
+            } else {
+                $res2 = [];
+                foreach ($v as $k => $p) {
+                    if (
+                        isset($p->type)
+                        && function_exists($d = 'decompiler_' . $p->type)
+                    ) {
+                        $r = $d($p, $fmt, (0 - $prof));
+                        $res2[] = [$p->type, $r];
+                    } else {
+                        spip_log("critere $i / $k mal forme");
+                    }
+                }
+                $args[] = $res2;
+            }
+        }
+        $res .= $f($args);
+    }
+
+    return $res;
 }
 
 
 function decompiler_($liste, $fmt = '', $prof = 0) {
-	if (!is_array($liste)) {
-		return '';
-	}
-	$prof2 = ($prof < 0) ? ($prof - 1) : ($prof + 1);
-	$contenu = [];
-	foreach ($liste as $k => $p) {
-		if (!isset($p->type)) {
-			continue;
-		} #??????
-		$d = 'decompiler_' . $p->type;
-		$next = $liste[$k + 1] ?? false;
-		// Forcer le champ etendu si son source (pas les reecritures)
-		// contenait des args et s'il est suivi d'espaces,
-		// le champ simple les eliminant est un bug helas perenne.
-
-		if (
-			$next
-			&& $next->type == 'texte'
-			&& $p->type == 'champ'
-			&& !$p->apres
-			&& !$p->avant
-			&& $p->fonctions
-		) {
-			$n = strlen((string) $next->texte) - strlen(ltrim((string) $next->texte));
-			if ($n) {
-				$champ = new Texte();
-				$champ->texte = substr((string) $next->texte, 0, $n);
-				$champ->ligne = $p->ligne;
-				$p->apres = [$champ];
-				$next->texte = substr((string) $next->texte, $n);
-			}
-		}
-		$contenu[] = [$d($p, $fmt, $prof2), $p->type];
-	}
-	$f = 'format_suite_' . $fmt;
-
-	return $f($contenu);
+    if (!is_array($liste)) {
+        return '';
+    }
+    $prof2 = ($prof < 0) ? ($prof - 1) : ($prof + 1);
+    $contenu = [];
+    foreach ($liste as $k => $p) {
+        if (!isset($p->type)) {
+            continue;
+        } #??????
+        $d = 'decompiler_' . $p->type;
+        $next = $liste[$k + 1] ?? false;
+        // Forcer le champ etendu si son source (pas les reecritures)
+        // contenait des args et s'il est suivi d'espaces,
+        // le champ simple les eliminant est un bug helas perenne.
+
+        if (
+            $next
+            && $next->type == 'texte'
+            && $p->type == 'champ'
+            && !$p->apres
+            && !$p->avant
+            && $p->fonctions
+        ) {
+            $n = strlen((string) $next->texte) - strlen(ltrim((string) $next->texte));
+            if ($n) {
+                $champ = new Texte();
+                $champ->texte = substr((string) $next->texte, 0, $n);
+                $champ->ligne = $p->ligne;
+                $p->apres = [$champ];
+                $next->texte = substr((string) $next->texte, $n);
+            }
+        }
+        $contenu[] = [$d($p, $fmt, $prof2), $p->type];
+    }
+    $f = 'format_suite_' . $fmt;
+
+    return $f($contenu);
 }
 
 function public_decompiler($liste, $fmt = '', $prof = 0, $quoi = '') {
-	if (!include_spip('public/format_' . $fmt)) {
-		return "'$fmt'?";
-	}
-	$f = 'decompiler_' . $quoi;
+    if (!include_spip('public/format_' . $fmt)) {
+        return "'$fmt'?";
+    }
+    $f = 'decompiler_' . $quoi;
 
-	return $f($liste, $fmt, $prof);
+    return $f($liste, $fmt, $prof);
 }

Spacing +18 added lines, -19 removed lines

@@ -30,7 +30,7 @@ 
 	$type .= ($struct->type_requete ?: $struct->table_optionnelle);
 
 	if ($struct->jointures_explicites) {
-		$type .= ' ' . $struct->jointures_explicites;
+		$type .= ' '.$struct->jointures_explicites;
 	}
 	if ($struct->table_optionnelle) {
 		$type .= '?';
@@ -39,11 +39,11 @@ 
 
 	$crit = $struct->param;
 	if ($crit && !is_array($crit[0])) {
-		$type = strtolower($type) . array_shift($crit);
+		$type = strtolower($type).array_shift($crit);
 	}
 	$crit = decompiler_criteres($struct, $fmt, $prof);
 
-	$f = 'format_boucle_' . $fmt;
+	$f = 'format_boucle_'.$fmt;
 
 	return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
 }
@@ -56,21 +56,20 @@ 
 			$res[] = decompiler_($v, $fmt, $prof);
 		}
 	}
-	$file = is_string($struct->texte) ? $struct->texte :
-		decompiler_($struct->texte, $fmt, $prof);
-	$f = 'format_inclure_' . $fmt;
+	$file = is_string($struct->texte) ? $struct->texte : decompiler_($struct->texte, $fmt, $prof);
+	$f = 'format_inclure_'.$fmt;
 
 	return $f($file, $res, $prof);
 }
 
 function decompiler_texte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_texte_' . $fmt;
+	$f = 'format_texte_'.$fmt;
 
 	return strlen((string) $struct->texte) ? $f($struct->texte, $prof) : '';
 }
 
 function decompiler_polyglotte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_polyglotte_' . $fmt;
+	$f = 'format_polyglotte_'.$fmt;
 
 	return $f($struct->traductions, $prof);
 }
@@ -83,7 +82,7 @@ 
 
 	$filtres = decompiler_liste($struct->param, $fmt, $prof);
 
-	$f = 'format_idiome_' . $fmt;
+	$f = 'format_idiome_'.$fmt;
 
 	return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
 }
@@ -98,7 +97,7 @@ 
 		}
 		$filtres = decompiler_liste($p, $fmt, $prof);
 	}
-	$f = 'format_champ_' . $fmt;
+	$f = 'format_champ_'.$fmt;
 
 	return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
 }
@@ -107,7 +106,7 @@ 
 	if (!is_array($sources)) {
 		return '';
 	}
-	$f = 'format_liste_' . $fmt;
+	$f = 'format_liste_'.$fmt;
 	$res = '';
 	foreach ($sources as $arg) {
 		if (!is_array($arg)) {
@@ -124,7 +123,7 @@ 
 				&& strlen((string) $v[0]->apres) == 1
 				&& $v[0]->apres == $v[0]->avant
 			) {
-				$args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
+				$args[] = $v[0]->avant.$v[0]->texte.$v[0]->apres;
 			} else {
 				$args[] = decompiler_($v, $fmt, 0 - $prof);
 			}
@@ -147,7 +146,7 @@ 
 		return '';
 	}
 	$res = '';
-	$f = 'format_critere_' . $fmt;
+	$f = 'format_critere_'.$fmt;
 	foreach ($sources as $crit) {
 		if (!is_array($crit)) {
 			continue;
@@ -160,13 +159,13 @@ 
 				&& $v[0]->type == 'texte'
 				&& $v[0]->apres
 			) {
-				$args[] = [['texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)]];
+				$args[] = [['texte', ($v[0]->apres.$v[0]->texte.$v[0]->apres)]];
 			} else {
 				$res2 = [];
 				foreach ($v as $k => $p) {
 					if (
 						isset($p->type)
-						&& function_exists($d = 'decompiler_' . $p->type)
+						&& function_exists($d = 'decompiler_'.$p->type)
 					) {
 						$r = $d($p, $fmt, (0 - $prof));
 						$res2[] = [$p->type, $r];
@@ -194,7 +193,7 @@ 
 		if (!isset($p->type)) {
 			continue;
 		} #??????
-		$d = 'decompiler_' . $p->type;
+		$d = 'decompiler_'.$p->type;
 		$next = $liste[$k + 1] ?? false;
 		// Forcer le champ etendu si son source (pas les reecritures)
 		// contenait des args et s'il est suivi d'espaces,
@@ -219,16 +218,16 @@ 
 		}
 		$contenu[] = [$d($p, $fmt, $prof2), $p->type];
 	}
-	$f = 'format_suite_' . $fmt;
+	$f = 'format_suite_'.$fmt;
 
 	return $f($contenu);
 }
 
 function public_decompiler($liste, $fmt = '', $prof = 0, $quoi = '') {
-	if (!include_spip('public/format_' . $fmt)) {
+	if (!include_spip('public/format_'.$fmt)) {
 		return "'$fmt'?";
 	}
-	$f = 'decompiler_' . $quoi;
+	$f = 'decompiler_'.$quoi;
 
 	return $f($liste, $fmt, $prof);
 }

ecrire/public/parametrer.php

Indentation +246 added lines, -246 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_fichiers_fonctions();
@@ -29,177 +29,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']) || !$GLOBALS['forcer_lang']) && $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((string) $page['texte']) . ' octets)');
-
-		if (defined('_CALCUL_PROFILER') && (int) $profile > _CALCUL_PROFILER) {
-			spip_log("calcul ($profile) [$skel] $infos"
-				. ' (' . strlen((string) $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((string) $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']
-				&& _request('var_mode_objet') == $fonc
-				&& _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() || str_starts_with((string) $fond, 'modeles/')) {
-				$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') && _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']) || !$GLOBALS['forcer_lang']) && $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((string) $page['texte']) . ' octets)');
+
+        if (defined('_CALCUL_PROFILER') && (int) $profile > _CALCUL_PROFILER) {
+            spip_log("calcul ($profile) [$skel] $infos"
+                . ' (' . strlen((string) $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((string) $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']
+                && _request('var_mode_objet') == $fonc
+                && _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() || str_starts_with((string) $fond, 'modeles/')) {
+                $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') && _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;
 }
 
 /**
@@ -208,37 +208,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 && $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 = $val::class;
-		} elseif (strlen("$val") > 30) {
-			$val = substr("$val", 0, 29) . '…';
-			if (strstr($val, ' ')) {
-				$val = "'$val'";
-			}
-		} elseif (strstr((string) $val, ' ')) {
-			$val = "'$val'";
-		} elseif (!strlen((string) $val)) {
-			$val = "''";
-		}
-		$infos[] = $var . '=' . $val;
-	}
-	return implode(', ', $infos);
+    $infos = [];
+    $line = 0;
+    foreach ($contexte as $var => $val) {
+        $line++;
+        if ($max_lines && $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 = $val::class;
+        } elseif (strlen("$val") > 30) {
+            $val = substr("$val", 0, 29) . '…';
+            if (strstr($val, ' ')) {
+                $val = "'$val'";
+            }
+        } elseif (strstr((string) $val, ' ')) {
+            $val = "'$val'";
+        } elseif (!strlen((string) $val)) {
+            $val = "''";
+        }
+        $infos[] = $var . '=' . $val;
+    }
+    return implode(', ', $infos);
 }
 
 
@@ -255,11 +255,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);
 }
 
 
@@ -275,42 +275,42 @@ 
  * @return array|bool
  */
 function public_tester_redirection_dist($fond, $contexte, $connect) {
-	if (
-		$fond == 'article'
-		&& !empty($contexte['id_article'])
-		&& ($id_article = (int) $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+:,', (string) $url)) {
-					include_spip('inc/filtres_mini');
-					$url = url_absolue($url);
-				}
-				$url = str_replace('&amp;', '&', (string) $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'
+        && !empty($contexte['id_article'])
+        && ($id_article = (int) $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+:,', (string) $url)) {
+                    include_spip('inc/filtres_mini');
+                    $url = url_absolue($url);
+                }
+                $url = str_replace('&amp;', '&', (string) $url);
+
+                return [
+                    'texte' => '<'
+                        . "?php include_spip('inc/headers');redirige_par_entete('"
+                        . texte_script($url)
+                        . "','',$status);"
+                        . '?' . '>',
+                    'process_ins' => 'php',
+                    'status' => $status
+                ];
+            }
+        }
+    }
+
+    return false;
 }

Spacing +12 added lines, -12 removed lines

@@ -78,7 +78,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...
@@ -110,8 +110,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);
@@ -142,17 +142,17 @@ 
 
 		$profile = spip_timer($a);
 		spip_log("calcul ($profile) [$skel] $infos"
-			. ' (' . strlen((string) $page['texte']) . ' octets)');
+			. ' ('.strlen((string) $page['texte']).' octets)');
 
 		if (defined('_CALCUL_PROFILER') && (int) $profile > _CALCUL_PROFILER) {
 			spip_log("calcul ($profile) [$skel] $infos"
-				. ' (' . strlen((string) $page['texte']) . ' octets) | ' . $_SERVER['REQUEST_URI'], 'profiler' . _LOG_AVERTISSEMENT);
+				. ' ('.strlen((string) $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((string) $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 (
@@ -183,7 +183,7 @@ 
 		if (defined('_VAR_INCLURE') && _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;
 		}
@@ -220,14 +220,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 = $val::class;
 		} elseif (strlen("$val") > 30) {
-			$val = substr("$val", 0, 29) . '…';
+			$val = substr("$val", 0, 29).'…';
 			if (strstr($val, ' ')) {
 				$val = "'$val'";
 			}
@@ -236,7 +236,7 @@ 
 		} elseif (!strlen((string) $val)) {
 			$val = "''";
 		}
-		$infos[] = $var . '=' . $val;
+		$infos[] = $var.'='.$val;
 	}
 	return implode(', ', $infos);
 }
@@ -304,7 +304,7 @@ 
 						. "?php include_spip('inc/headers');redirige_par_entete('"
 						. texte_script($url)
 						. "','',$status);"
-						. '?' . '>',
+						. '?'.'>',
 					'process_ins' => 'php',
 					'status' => $status
 				];

ecrire/public/evaluer_page.php

Indentation +37 added lines, -37 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -28,50 +28,50 @@ 
  * @return void
  */
 
- /** @var bool Évaluation réussie ? */
+    /** @var bool Évaluation réussie ? */
 $res = true;
 
 // Cas d'une page contenant du PHP :
 if (empty($page['process_ins']) || $page['process_ins'] != 'html') {
-	include_spip('inc/lang');
+    include_spip('inc/lang');
 
-	// restaurer l'etat des notes avant calcul
-	if (
-		isset($page['notes'])
-		&& $page['notes']
-		&& ($notes = charger_fonction('notes', 'inc', true))
-	) {
-		$notes($page['notes'], 'restaurer_etat');
-	}
-	ob_start();
-	if (str_contains((string) $page['texte'], '?xml')) {
-		$page['texte'] = str_replace('<?xml', "<\1?xml", (string) $page['texte']);
-	}
+    // restaurer l'etat des notes avant calcul
+    if (
+        isset($page['notes'])
+        && $page['notes']
+        && ($notes = charger_fonction('notes', 'inc', true))
+    ) {
+        $notes($page['notes'], 'restaurer_etat');
+    }
+    ob_start();
+    if (str_contains((string) $page['texte'], '?xml')) {
+        $page['texte'] = str_replace('<?xml', "<\1?xml", (string) $page['texte']);
+    }
 
-	try {
-		$res = eval('?' . '>' . $page['texte']);
-		$page['texte'] = ob_get_contents();
-	} catch (\Throwable $e) {
-		$code = $page['texte'];
-		$GLOBALS['numero_ligne_php'] = 1;
-		if (!function_exists('numerote_ligne_php')) {
-			function numerote_ligne_php($match) {
-				$GLOBALS['numero_ligne_php']++;
-				return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
-			}
-		}
-		$code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', (string) $code);
-		$code = trim(highlight_string($code, true));
-		erreur_squelette('L' . $e->getLine() . ': ' . $e->getMessage() . '<br />' . $code, [$page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']]);
-		$page['texte'] = '<!-- Erreur -->';
-	}
-	ob_end_clean();
+    try {
+        $res = eval('?' . '>' . $page['texte']);
+        $page['texte'] = ob_get_contents();
+    } catch (\Throwable $e) {
+        $code = $page['texte'];
+        $GLOBALS['numero_ligne_php'] = 1;
+        if (!function_exists('numerote_ligne_php')) {
+            function numerote_ligne_php($match) {
+                $GLOBALS['numero_ligne_php']++;
+                return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
+            }
+        }
+        $code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', (string) $code);
+        $code = trim(highlight_string($code, true));
+        erreur_squelette('L' . $e->getLine() . ': ' . $e->getMessage() . '<br />' . $code, [$page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']]);
+        $page['texte'] = '<!-- Erreur -->';
+    }
+    ob_end_clean();
 
-	$page['process_ins'] = 'html';
+    $page['process_ins'] = 'html';
 
-	if (str_contains((string) $page['texte'], '?xml')) {
-		$page['texte'] = str_replace("<\1?xml", '<?xml', (string) $page['texte']);
-	}
+    if (str_contains((string) $page['texte'], '?xml')) {
+        $page['texte'] = str_replace("<\1?xml", '<?xml', (string) $page['texte']);
+    }
 }
 
 // le résultat de calcul d'un squelette est toujours de type string

Spacing +4 added lines, -4 removed lines

@@ -49,7 +49,7 @@ 
 	}
 
 	try {
-		$res = eval('?' . '>' . $page['texte']);
+		$res = eval('?'.'>'.$page['texte']);
 		$page['texte'] = ob_get_contents();
 	} catch (\Throwable $e) {
 		$code = $page['texte'];
@@ -57,12 +57,12 @@ 
 		if (!function_exists('numerote_ligne_php')) {
 			function numerote_ligne_php($match) {
 				$GLOBALS['numero_ligne_php']++;
-				return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
+				return "\n/*".str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT).'*/';
 			}
 		}
-		$code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', (string) $code);
+		$code = '/*001*/'.preg_replace_callback(",\n,", 'numerote_ligne_php', (string) $code);
 		$code = trim(highlight_string($code, true));
-		erreur_squelette('L' . $e->getLine() . ': ' . $e->getMessage() . '<br />' . $code, [$page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']]);
+		erreur_squelette('L'.$e->getLine().': '.$e->getMessage().'<br />'.$code, [$page['source'], '', $e->getFile(), '', $GLOBALS['spip_lang']]);
 		$page['texte'] = '<!-- Erreur -->';
 	}
 	ob_end_clean();

ecrire/public/references.php

Indentation +532 added lines, -532 removed lines

@@ -18,7 +18,7 @@ 
  * @package SPIP\Core\Compilateur\References
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -43,14 +43,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;
 }
 
 
@@ -73,17 +73,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 '';
 }
 
 /**
@@ -117,74 +117,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 && !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 && !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);
 }
 
 /**
@@ -198,12 +198,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;
 }
 
 /**
@@ -239,98 +239,98 @@ 
  **/
 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] ?? '';
-	}
-
-	// il y a un alias connu pour ce champ
-	if ($excep) {
-		$joker = false; // indiquer a l'appelant
-		return index_exception($boucles[$idb], $desc, $nom_champ, $excep);
-	}
-
-	// le champ existe dans la table, on le prend.
-	if (isset($desc['field'][$nom_champ])) {
-		$t = $boucles[$idb]->id_table ?? '';
-		$joker = false; // indiquer a l'appelant
-		// note: dans certains cas ('valeur' d’une boucle DATA, sans id_table), retourne ['.valeur', 'valeur'] …
-		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.
-	if (
-		/*$joker AND */
-		isset($desc['field']['*'])
-	) {
-		$joker = true; // indiquer a l'appelant
-		return [$nom_champ, $nom_champ];
-	}
-
-	$joker = false; // indiquer a l'appelant
-
-	// la table de jointure est explicitement indiquée (rubrique.titre)
-	if (preg_match('/^(.*)\.(.*)$/', $nom_champ, $r)) {
-		[, $_table, $_nom_champ] = $r;
-		if ($cle = trouver_jointure_champ($_nom_champ, $boucles[$idb], [$_table])) {
-			$_alias = $cle . '_' . $_nom_champ;
-			return index_exception(
-				$boucles[$idb],
-				$desc,
-				$_alias,
-				[$_table, $_nom_champ]
-			);
-		}
-		return ['', ''];
-	}
-
-	// pas d'alias, pas de champ, pas de joker...
-	// tenter via une jointure...
-
-	// 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]))
-		&& $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 ['', ''];
+    $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] ?? '';
+    }
+
+    // il y a un alias connu pour ce champ
+    if ($excep) {
+        $joker = false; // indiquer a l'appelant
+        return index_exception($boucles[$idb], $desc, $nom_champ, $excep);
+    }
+
+    // le champ existe dans la table, on le prend.
+    if (isset($desc['field'][$nom_champ])) {
+        $t = $boucles[$idb]->id_table ?? '';
+        $joker = false; // indiquer a l'appelant
+        // note: dans certains cas ('valeur' d’une boucle DATA, sans id_table), retourne ['.valeur', 'valeur'] …
+        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.
+    if (
+        /*$joker AND */
+        isset($desc['field']['*'])
+    ) {
+        $joker = true; // indiquer a l'appelant
+        return [$nom_champ, $nom_champ];
+    }
+
+    $joker = false; // indiquer a l'appelant
+
+    // la table de jointure est explicitement indiquée (rubrique.titre)
+    if (preg_match('/^(.*)\.(.*)$/', $nom_champ, $r)) {
+        [, $_table, $_nom_champ] = $r;
+        if ($cle = trouver_jointure_champ($_nom_champ, $boucles[$idb], [$_table])) {
+            $_alias = $cle . '_' . $_nom_champ;
+            return index_exception(
+                $boucles[$idb],
+                $desc,
+                $_alias,
+                [$_table, $_nom_champ]
+            );
+        }
+        return ['', ''];
+    }
+
+    // pas d'alias, pas de champ, pas de joker...
+    // tenter via une jointure...
+
+    // 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]))
+        && $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 ['', ''];
 }
 
 
@@ -358,52 +358,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 " . implode(',', $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 " . implode(',', $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];
 }
 
 /**
@@ -428,7 +428,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);
 }
 
 
@@ -448,9 +448,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);
 }
 
 
@@ -487,26 +487,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 && 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 && 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 && 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 && is_object($res)) {
+            return $res;
+        }
+    }
+
+    $f = charger_fonction('DEFAUT', 'calculer_balise');
+
+    return $f($nom, $p);
 }
 
 
@@ -534,33 +534,33 @@ 
  **/
 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 && !$p->fonctions[0][0] && $p->fonctions[0][1]) {
-		$code = addslashes($p->fonctions[0][1]);
-		$p->code .= " . '$code'";
-	}
-
-	// ne pas passer le filtre securite sur les id_xxx
-	if (str_starts_with($nom, 'ID_')) {
-		$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) && !$p->etoile && !$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 && !$p->fonctions[0][0] && $p->fonctions[0][1]) {
+        $code = addslashes($p->fonctions[0][1]);
+        $p->code .= " . '$code'";
+    }
+
+    // ne pas passer le filtre securite sur les id_xxx
+    if (str_starts_with($nom, 'ID_')) {
+        $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) && !$p->etoile && !$p->fonctions) {
+        $p->code = "'#$nom'";
+        $p->interdire_scripts = false;
+    }
+
+    return $p;
 }
 
 
@@ -608,52 +608,52 @@ 
  **/
 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 && !$p->fonctions[0][0] && $p->fonctions[0][1]) {
-		$p->fonctions = [];
-	}
-
-	if ($p->param && ($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);
-
-	$dans_un_modele = false;
-	if (
-		!empty($p->descr['sourcefile']) && ($f = $p->descr['sourcefile']) && basename(dirname($f)) === 'modeles'
-	) {
-		$dans_un_modele = true;
-	}
-
-	// un modele est toujours inséré en texte dans son contenant
-	// donc si on est dans le public avec un cache on va perdre le dynamisme
-	// et on risque de mettre en cache les valeurs pre-remplies du formulaire
-	// on passe donc par une fonction proxy qui si besoin va collecter les arguments
-	// et injecter le PHP qui va appeler la fonction pour generer le formulaire au lieu de directement la fonction
-	// (dans l'espace prive on a pas de cache, donc pas de soucis (et un leak serait moins grave))
-	$p->code = sprintf(
-		$dans_un_modele ? CODE_EXECUTER_BALISE_MODELE : CODE_EXECUTER_BALISE,
-		$nom,
-		implode(',', $collecte),
-		($collecte ? $param : substr($param, 1)), # virer la virgule
-		memoriser_contexte_compil($p),
-		($supp ? ', ' . implode(',', $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 && !$p->fonctions[0][0] && $p->fonctions[0][1]) {
+        $p->fonctions = [];
+    }
+
+    if ($p->param && ($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);
+
+    $dans_un_modele = false;
+    if (
+        !empty($p->descr['sourcefile']) && ($f = $p->descr['sourcefile']) && basename(dirname($f)) === 'modeles'
+    ) {
+        $dans_un_modele = true;
+    }
+
+    // un modele est toujours inséré en texte dans son contenant
+    // donc si on est dans le public avec un cache on va perdre le dynamisme
+    // et on risque de mettre en cache les valeurs pre-remplies du formulaire
+    // on passe donc par une fonction proxy qui si besoin va collecter les arguments
+    // et injecter le PHP qui va appeler la fonction pour generer le formulaire au lieu de directement la fonction
+    // (dans l'espace prive on a pas de cache, donc pas de soucis (et un leak serait moins grave))
+    $p->code = sprintf(
+        $dans_un_modele ? CODE_EXECUTER_BALISE_MODELE : CODE_EXECUTER_BALISE,
+        $nom,
+        implode(',', $collecte),
+        ($collecte ? $param : substr($param, 1)), # virer la virgule
+        memoriser_contexte_compil($p),
+        ($supp ? ', ' . implode(',', $supp) : (''))
+    );
+
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 
@@ -683,17 +683,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;
 }
 
 
@@ -708,19 +708,19 @@ 
  *     Nom de la connexion
  **/
 function trouver_nom_serveur_distant($p) {
-	$nom = $p->id_boucle;
-	if (
-		$nom && isset($p->boucles[$nom])
-	) {
-		$s = $p->boucles[$nom]->sql_serveur;
-		if (
-			strlen($s) && strlen($serveur = strtolower($s)) && !in_array($serveur, $GLOBALS['exception_des_connect'])
-		) {
-			return $serveur;
-		}
-	}
-
-	return '';
+    $nom = $p->id_boucle;
+    if (
+        $nom && isset($p->boucles[$nom])
+    ) {
+        $s = $p->boucles[$nom]->sql_serveur;
+        if (
+            strlen($s) && strlen($serveur = strtolower($s)) && !in_array($serveur, $GLOBALS['exception_des_connect'])
+        ) {
+            return $serveur;
+        }
+    }
+
+    return '';
 }
 
 
@@ -744,15 +744,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 && trouver_nom_serveur_distant($p)) {
-		spip_log($nom . ':' . $p->nom_champ . ' ' . _T('zbug_distant_interdit'));
+    if ($nom && trouver_nom_serveur_distant($p)) {
+        spip_log($nom . ':' . $p->nom_champ . ' ' . _T('zbug_distant_interdit'));
 
-		return false;
-	}
+        return false;
+    }
 
-	return true;
+    return true;
 }
 
 
@@ -762,75 +762,75 @@ 
 //
 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
-		$ps = $p->balise_calculee ? false : $GLOBALS['table_des_traitements']['*'];
-	}
-
-	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 && 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 && isset($ps[$table_sql])) {
-			$ps = $ps[$table_sql];
-		} // ou pour une boucle en particulier "DATA","articles"
-		elseif ($type_requete && isset($ps[$type_requete])) {
-			$ps = $ps[$type_requete];
-		} // ou pour une boucle utilisant un alias ("hierarchie")
-		elseif ($type_alias && 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'])
-		&& $p->descr['documents']
-		&& (str_contains($ps, 'propre') || str_contains($ps, 'typo'))
-	) {
-		$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
+        $ps = $p->balise_calculee ? false : $GLOBALS['table_des_traitements']['*'];
+    }
+
+    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 && 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 && isset($ps[$table_sql])) {
+            $ps = $ps[$table_sql];
+        } // ou pour une boucle en particulier "DATA","articles"
+        elseif ($type_requete && isset($ps[$type_requete])) {
+            $ps = $ps[$type_requete];
+        } // ou pour une boucle utilisant un alias ("hierarchie")
+        elseif ($type_alias && 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'])
+        && $p->descr['documents']
+        && (str_contains($ps, 'propre') || str_contains($ps, 'typo'))
+    ) {
+        $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);
 }
 
 
@@ -842,95 +842,95 @@ 
 //
 function applique_filtres($p) {
 
-	// Traitements standards (cf. supra)
-	$code = $p->etoile == '' ? champs_traitements($p) : $p->code;
+    // Traitements standards (cf. supra)
+    $code = $p->etoile == '' ? champs_traitements($p) : $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)";
+    }
 
-	return sandbox_composer_interdire_scripts($code, $p);
+    return sandbox_composer_interdire_scripts($code, $p);
 }
 
 // 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 = (str_starts_with($fonc, 'image_') && $fonc != 'image_graver');
-		if ($image_miette && !$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 = (str_starts_with($fonc, 'image_') && $fonc != 'image_graver');
+        if ($image_miette && !$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) {
-	return match (true) {
-		in_array($fonc, $GLOBALS['table_criteres_infixes']) => "($code $fonc $arg)",
-		$fonc == 'and' || $fonc == 'et' => "((($code) AND ($arg)) ?' ' :'')",
-		$fonc == 'or' || $fonc == 'ou' => "((($code) OR ($arg)) ?' ' :'')",
-		$fonc == 'xor' || $fonc == 'xou' => "((($code) XOR ($arg)) ?' ' :'')",
-		$fonc == 'sinon' => "(((\$a = $code) OR (is_string(\$a) AND strlen(\$a))) ? \$a : $arg)",
-		$fonc == 'not' || $fonc == 'non' => "(($code) ?'' :' ')",
-		$fonc == 'yes' || $fonc == 'oui' => "(($code) ?' ' :'')",
-		default => '',
-	};
+    return match (true) {
+        in_array($fonc, $GLOBALS['table_criteres_infixes']) => "($code $fonc $arg)",
+        $fonc == 'and' || $fonc == 'et' => "((($code) AND ($arg)) ?' ' :'')",
+        $fonc == 'or' || $fonc == 'ou' => "((($code) OR ($arg)) ?' ' :'')",
+        $fonc == 'xor' || $fonc == 'xou' => "((($code) XOR ($arg)) ?' ' :'')",
+        $fonc == 'sinon' => "(((\$a = $code) OR (is_string(\$a) AND strlen(\$a))) ? \$a : $arg)",
+        $fonc == 'not' || $fonc == 'non' => "(($code) ?'' :' ')",
+        $fonc == 'yes' || $fonc == 'oui' => "(($code) ?' ' :'')",
+        default => '',
+    };
 }
 
 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;
 }
 
 
@@ -948,15 +948,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);
 }
 
 //
@@ -970,30 +970,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;
 }
 
 /**
@@ -1003,7 +1003,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/public/normaliser.php

Indentation +148 added lines, -148 removed lines

@@ -13,7 +13,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les fonctions de ce fichier sont appelees en certains points
@@ -27,182 +27,182 @@ 
 // -> https://www.spip.net/fr_article901.html
 
 function phraser_vieux_logos(&$p) {
-	$args = $p->param[0][0] ? [''] : array_shift($p->param);
-
-	foreach ($p->param as $couple) {
-		$nom = trim((string) $couple[0]);
-		if ($nom == '') {
-			array_shift($p->param);
-			break;
-		}
-		$r = phraser_logo_faux_filtres($nom);
-		if ($r === 0) {
-			$c = new Texte();
-			$c->texte = $nom;
-			$args[] = [$c];
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 2) {
-			$p->etoile = '**';
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 1) {
-			array_shift($p->param);
-			$p->etoile = '*';
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
-			$champ = new Champ();
-			$champ->nom_boucle = $m[2];
-			$champ->nom_champ = $m[3];
-			$champ->etoile = $m[5];
-			$champ = [$champ];
-			if ($m[6]) {
-				$r = new Texte();
-				$r->texte = $m[6];
-				$champ[] = $r;
-			}
-			$args[] = $champ;
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} // le cas else est la seule incompatibilite
-	}
-	array_unshift($p->param, $args);
+    $args = $p->param[0][0] ? [''] : array_shift($p->param);
+
+    foreach ($p->param as $couple) {
+        $nom = trim((string) $couple[0]);
+        if ($nom == '') {
+            array_shift($p->param);
+            break;
+        }
+        $r = phraser_logo_faux_filtres($nom);
+        if ($r === 0) {
+            $c = new Texte();
+            $c->texte = $nom;
+            $args[] = [$c];
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 2) {
+            $p->etoile = '**';
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 1) {
+            array_shift($p->param);
+            $p->etoile = '*';
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
+            $champ = new Champ();
+            $champ->nom_boucle = $m[2];
+            $champ->nom_champ = $m[3];
+            $champ->etoile = $m[5];
+            $champ = [$champ];
+            if ($m[6]) {
+                $r = new Texte();
+                $r->texte = $m[6];
+                $champ[] = $r;
+            }
+            $args[] = $champ;
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } // le cas else est la seule incompatibilite
+    }
+    array_unshift($p->param, $args);
 }
 
 
 function phraser_logo_faux_filtres($nom) {
-	return match ($nom) {
-		'top', 'left', 'right', 'center', 'bottom' => 0,
-		'lien' => 1,
-		'fichier' => 2,
-		default => $nom,
-	};
+    return match ($nom) {
+        'top', 'left', 'right', 'center', 'bottom' => 0,
+        'lien' => 1,
+        'fichier' => 2,
+        default => $nom,
+    };
 }
 
 
 // La balise embed_document est a present le modele emb
 
 function phraser_vieux_emb(&$p) {
-	if (!is_array($p->param)) {
-		$p->param = [];
-	}
-
-	// Produire le premier argument {emb}
-	$texte = new Texte();
-	$texte->texte = 'emb';
-	$param = ['', [$texte]];
-
-	// Transformer les filtres en arguments
-	$paramCount = is_countable($p->param) ? count($p->param) : 0;
-	for ($i = 0; $i < $paramCount; $i++) {
-		if ($p->param[$i][0]) {
-			if (!strstr((string) $p->param[$i][0], '=')) {
-				break;
-			}# on a rencontre un vrai filtre, c'est fini
-			$texte = new Texte();
-			$texte->texte = $p->param[$i][0];
-			$param[] = [$texte];
-		}
-		array_shift($p->param);
-	}
-	array_unshift($p->param, $param);
-	spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
-	$p->nom_champ = 'MODELE';
+    if (!is_array($p->param)) {
+        $p->param = [];
+    }
+
+    // Produire le premier argument {emb}
+    $texte = new Texte();
+    $texte->texte = 'emb';
+    $param = ['', [$texte]];
+
+    // Transformer les filtres en arguments
+    $paramCount = is_countable($p->param) ? count($p->param) : 0;
+    for ($i = 0; $i < $paramCount; $i++) {
+        if ($p->param[$i][0]) {
+            if (!strstr((string) $p->param[$i][0], '=')) {
+                break;
+            }# on a rencontre un vrai filtre, c'est fini
+            $texte = new Texte();
+            $texte->texte = $p->param[$i][0];
+            $param[] = [$texte];
+        }
+        array_shift($p->param);
+    }
+    array_unshift($p->param, $param);
+    spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
+    $p->nom_champ = 'MODELE';
 }
 
 // Vieux formulaire de recherch
 
 function phraser_vieux_recherche($p) {
-	if ($p->param[0][0]) {
-		$c = new Texte();
-		$c->texte = $p->param[0][0];
-		$p->param[0][1] = [$c];
-		$p->param[0][0] = '';
-		$p->fonctions = [];
-		spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
-	}
+    if ($p->param[0][0]) {
+        $c = new Texte();
+        $c->texte = $p->param[0][0];
+        $p->param[0][1] = [$c];
+        $p->param[0][0] = '';
+        $p->fonctions = [];
+        spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
+    }
 }
 
 // Gerer la notation [(#EXPOSER|on,off)]
 function phraser_vieux_exposer($p) {
-	if ($a = $p->fonctions) {
-		preg_match('#([^,]*)(,(.*))?#', (string) $a[0][0], $regs);
-		$args = [];
-		if ($regs[1]) {
-			$a = new Texte();
-			$a->texte = $regs[1];
-			$args = ['', [$a]];
-			if ($regs[3]) {
-				$a = new Texte();
-				$a->texte = $regs[3];
-				$args[] = [$a];
-			}
-		}
-		$p->param[0] = $args;
-		$p->fonctions = [];
-		$p->nom_champ = 'EXPOSE';
-	}
+    if ($a = $p->fonctions) {
+        preg_match('#([^,]*)(,(.*))?#', (string) $a[0][0], $regs);
+        $args = [];
+        if ($regs[1]) {
+            $a = new Texte();
+            $a->texte = $regs[1];
+            $args = ['', [$a]];
+            if ($regs[3]) {
+                $a = new Texte();
+                $a->texte = $regs[3];
+                $args[] = [$a];
+            }
+        }
+        $p->param[0] = $args;
+        $p->fonctions = [];
+        $p->nom_champ = 'EXPOSE';
+    }
 }
 
 function phraser_vieux_modele($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function phraser_vieux_inclu($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function normaliser_args_inclumodel($p) {
-	$params = $p->param;
-	if (!$params) {
-		return;
-	}
-	$args = $params[0];
-	if ($args[0]) {
-		return;
-	} // filtre immediat
-	array_shift($p->param);
-	foreach ($p->param as $l) {
-		if (!array_shift($l)) {
-			$args = array_merge($args, $l);
-			array_shift($p->param);
-		} else {
-			break;
-		} // filtre
-	}
-	array_unshift($p->param, $args);
+    $params = $p->param;
+    if (!$params) {
+        return;
+    }
+    $args = $params[0];
+    if ($args[0]) {
+        return;
+    } // filtre immediat
+    array_shift($p->param);
+    foreach ($p->param as $l) {
+        if (!array_shift($l)) {
+            $args = array_merge($args, $l);
+            array_shift($p->param);
+        } else {
+            break;
+        } // filtre
+    }
+    array_unshift($p->param, $args);
 }
 
 function normaliser_inclure($champ) {
-	normaliser_args_inclumodel($champ);
-	$l = $champ->param[0];
-	if (is_array($l) && !$l[0]) {
-		foreach ($l as $k => $p) {
-			if ($p && $p[0]->type == 'texte' && !strpos((string) $p[0]->texte, '=')) {
-				$p[0]->texte = trim((string) $p[0]->texte);
-			}
-		}
-		foreach ($l as $k => $p) {
-			if (
-				!$p || $p[0]->type != 'texte'
-				|| !preg_match('/^fond\s*=\s*(.*)$/', (string) $p[0]->texte, $r)
-			) {
-				continue;
-			}
-
-			if ($r[1]) {
-				$p[0]->texte = $r[1];
-			} else {
-				unset($p[0]);
-			}
-			$champ->texte = $p;
-			unset($champ->param[0][$k]);
-			if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
-				array_shift($champ->param);
-			}
-
-			return;
-		}
-	}
-	spip_log('inclure sans fond ni fichier');
+    normaliser_args_inclumodel($champ);
+    $l = $champ->param[0];
+    if (is_array($l) && !$l[0]) {
+        foreach ($l as $k => $p) {
+            if ($p && $p[0]->type == 'texte' && !strpos((string) $p[0]->texte, '=')) {
+                $p[0]->texte = trim((string) $p[0]->texte);
+            }
+        }
+        foreach ($l as $k => $p) {
+            if (
+                !$p || $p[0]->type != 'texte'
+                || !preg_match('/^fond\s*=\s*(.*)$/', (string) $p[0]->texte, $r)
+            ) {
+                continue;
+            }
+
+            if ($r[1]) {
+                $p[0]->texte = $r[1];
+            } else {
+                unset($p[0]);
+            }
+            $champ->texte = $p;
+            unset($champ->param[0][$k]);
+            if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
+                array_shift($champ->param);
+            }
+
+            return;
+        }
+    }
+    spip_log('inclure sans fond ni fichier');
 }

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);
 }

Spacing +2 added lines, -2 removed lines

@@ -36,11 +36,11 @@
 	include_spip('inc/filtres');
 
 	// Inserer le css d'admin
-	$css = "<link rel='stylesheet' href='" . url_absolue(direction_css(find_in_path('spip_admin.css')))
+	$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";
+			. url_absolue(direction_css($f))."' type='text/css' />\n";
 	}
 
 	if (