spip / SPIP

ecrire/inc/bandeau.php

Indentation +149 added lines, -149 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/boutons');
@@ -37,33 +37,33 @@ 
  *     Contexte
  **/
 function definir_barre_contexte($contexte = null) {
-	if (is_null($contexte)) {
-		$contexte = $_GET;
-	} elseif (is_string($contexte)) {
-		$contexte = unserialize($contexte);
-	}
-	if (!isset($contexte['id_rubrique']) and isset($contexte['exec'])) {
-		if (!function_exists('trouver_objet_exec')) {
-			include_spip('inc/pipelines_ecrire');
-		}
-		if ($e = trouver_objet_exec($contexte['exec'])) {
-			$_id = $e['id_table_objet'];
-			if (isset($contexte[$_id]) and $id = intval($contexte[$_id])) {
-				$table = $e['table_objet_sql'];
-				$row = sql_fetsel('*', $table, "$_id=" . intval($id));
-				if (isset($row['id_rubrique'])) {
-					$contexte['id_rubrique'] = $row['id_rubrique'];
-					if (isset($row['id_secteur'])) {
-						$contexte['id_secteur'] = $row['id_secteur'];
-					}
-				} elseif (isset($row['id_groupe'])) {
-					// TODO supprimer ce bloc quand https://core.spip.net/issues/3844 sera réalisé
-					$contexte['id_groupe'] = $row['id_groupe'];
-				}
-			}
-		}
-	}
-	return $contexte;
+    if (is_null($contexte)) {
+        $contexte = $_GET;
+    } elseif (is_string($contexte)) {
+        $contexte = unserialize($contexte);
+    }
+    if (!isset($contexte['id_rubrique']) and isset($contexte['exec'])) {
+        if (!function_exists('trouver_objet_exec')) {
+            include_spip('inc/pipelines_ecrire');
+        }
+        if ($e = trouver_objet_exec($contexte['exec'])) {
+            $_id = $e['id_table_objet'];
+            if (isset($contexte[$_id]) and $id = intval($contexte[$_id])) {
+                $table = $e['table_objet_sql'];
+                $row = sql_fetsel('*', $table, "$_id=" . intval($id));
+                if (isset($row['id_rubrique'])) {
+                    $contexte['id_rubrique'] = $row['id_rubrique'];
+                    if (isset($row['id_secteur'])) {
+                        $contexte['id_secteur'] = $row['id_secteur'];
+                    }
+                } elseif (isset($row['id_groupe'])) {
+                    // TODO supprimer ce bloc quand https://core.spip.net/issues/3844 sera réalisé
+                    $contexte['id_groupe'] = $row['id_groupe'];
+                }
+            }
+        }
+    }
+    return $contexte;
 }
 
 /**
@@ -79,89 +79,89 @@ 
  * @return array
  */
 function definir_barre_boutons($contexte = [], $icones = true, $autorise = true) {
-	include_spip('inc/autoriser');
-	$boutons_admin = [];
+    include_spip('inc/autoriser');
+    $boutons_admin = [];
 
-	// les boutons du core, issus de ecrire/paquet.xml
-	$liste_boutons = [];
+    // les boutons du core, issus de ecrire/paquet.xml
+    $liste_boutons = [];
 
-	// ajouter les boutons issus des plugin via paquet.xml
-	if (
-		function_exists('boutons_plugins')
-		and is_array($liste_boutons_plugins = boutons_plugins())
-	) {
-		$liste_boutons = &$liste_boutons_plugins;
-	}
+    // ajouter les boutons issus des plugin via paquet.xml
+    if (
+        function_exists('boutons_plugins')
+        and is_array($liste_boutons_plugins = boutons_plugins())
+    ) {
+        $liste_boutons = &$liste_boutons_plugins;
+    }
 
-	foreach ($liste_boutons as $id => $infos) {
-		$parent = '';
-		// les boutons principaux ne sont pas soumis a autorisation
-		if (
-			!isset($infos['parent'])
-			or !($parent = $infos['parent'])
-			or !$autorise
-			or autoriser('menu', "_$id", 0, null, ['contexte' => $contexte])
-		) {
-			if (
-				$parent
-				and $parent = preg_replace(',^bando_,', 'menu_', $parent)
-				and isset($boutons_admin[$parent])
-			) {
-				$position = (isset($infos['position']) and strlen($infos['position'])) ? intval($infos['position']) : count($boutons_admin[$parent]->sousmenu);
-				if ($position < 0) {
-					$position = count($boutons_admin[$parent]->sousmenu) + 1 + $position;
-				}
-				$boutons_admin[$parent]->sousmenu = array_slice($boutons_admin[$parent]->sousmenu, 0, $position)
-					+ [
-						$id => new Bouton(
-							($icones and !empty($infos['icone'])) ? find_in_theme($infos['icone']) : '',  // icone
-							$infos['titre'],  // titre
-							(isset($infos['action']) and $infos['action']) ? $infos['action'] : null,
-							(isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : null
-						)
-					]
-					+ array_slice($boutons_admin[$parent]->sousmenu, $position, 100);
-			}
-			if (
-				!$parent
-				// provisoire, eviter les vieux boutons
-				and (!in_array($id, ['forum', 'statistiques_visites']))
-				and (!$autorise or autoriser('menugrandeentree', "_$id", 0, null, ['contexte' => $contexte]))
-			) {
-				$position = (isset($infos['position']) and $infos['position']) ? $infos['position'] : count($boutons_admin);
-				$boutons_admin = array_slice($boutons_admin, 0, $position)
-					+ [
-						$id => new Bouton(
-							($icones and isset($infos['icone']) and $infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
-							$infos['titre'],  // titre
-							(isset($infos['action']) and $infos['action']) ? $infos['action'] : null,
-							(isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : null
-						)
-					]
-					+ array_slice($boutons_admin, $position, 100);
-			}
-		}
-	}
-	$boutons_admin = pipeline('ajouter_menus', $boutons_admin);
+    foreach ($liste_boutons as $id => $infos) {
+        $parent = '';
+        // les boutons principaux ne sont pas soumis a autorisation
+        if (
+            !isset($infos['parent'])
+            or !($parent = $infos['parent'])
+            or !$autorise
+            or autoriser('menu', "_$id", 0, null, ['contexte' => $contexte])
+        ) {
+            if (
+                $parent
+                and $parent = preg_replace(',^bando_,', 'menu_', $parent)
+                and isset($boutons_admin[$parent])
+            ) {
+                $position = (isset($infos['position']) and strlen($infos['position'])) ? intval($infos['position']) : count($boutons_admin[$parent]->sousmenu);
+                if ($position < 0) {
+                    $position = count($boutons_admin[$parent]->sousmenu) + 1 + $position;
+                }
+                $boutons_admin[$parent]->sousmenu = array_slice($boutons_admin[$parent]->sousmenu, 0, $position)
+                    + [
+                        $id => new Bouton(
+                            ($icones and !empty($infos['icone'])) ? find_in_theme($infos['icone']) : '',  // icone
+                            $infos['titre'],  // titre
+                            (isset($infos['action']) and $infos['action']) ? $infos['action'] : null,
+                            (isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : null
+                        )
+                    ]
+                    + array_slice($boutons_admin[$parent]->sousmenu, $position, 100);
+            }
+            if (
+                !$parent
+                // provisoire, eviter les vieux boutons
+                and (!in_array($id, ['forum', 'statistiques_visites']))
+                and (!$autorise or autoriser('menugrandeentree', "_$id", 0, null, ['contexte' => $contexte]))
+            ) {
+                $position = (isset($infos['position']) and $infos['position']) ? $infos['position'] : count($boutons_admin);
+                $boutons_admin = array_slice($boutons_admin, 0, $position)
+                    + [
+                        $id => new Bouton(
+                            ($icones and isset($infos['icone']) and $infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
+                            $infos['titre'],  // titre
+                            (isset($infos['action']) and $infos['action']) ? $infos['action'] : null,
+                            (isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : null
+                        )
+                    ]
+                    + array_slice($boutons_admin, $position, 100);
+            }
+        }
+    }
+    $boutons_admin = pipeline('ajouter_menus', $boutons_admin);
 
-	// définir les favoris et positions d’origine
-	if ($boutons_admin) {
-		$menus_favoris = obtenir_menus_favoris();
-		$i = 1;
-		foreach ($boutons_admin as $key => $menu) {
-			$menu->favori = (bool) table_valeur($menus_favoris, $key, false);
-			$menu->position = $i++;
-			if ($menu->sousmenu) {
-				$j = 1;
-				foreach ($menu->sousmenu as $key => $bouton) {
-					$bouton->favori = (bool) table_valeur($menus_favoris, $key, false);
-					$bouton->position = $j++;
-				}
-			}
-		}
-	}
+    // définir les favoris et positions d’origine
+    if ($boutons_admin) {
+        $menus_favoris = obtenir_menus_favoris();
+        $i = 1;
+        foreach ($boutons_admin as $key => $menu) {
+            $menu->favori = (bool) table_valeur($menus_favoris, $key, false);
+            $menu->position = $i++;
+            if ($menu->sousmenu) {
+                $j = 1;
+                foreach ($menu->sousmenu as $key => $bouton) {
+                    $bouton->favori = (bool) table_valeur($menus_favoris, $key, false);
+                    $bouton->position = $j++;
+                }
+            }
+        }
+    }
 
-	return $boutons_admin;
+    return $boutons_admin;
 }
 
 /**
@@ -173,22 +173,22 @@ 
  * @return Bouton[]
  */
 function trier_boutons_enfants_par_alpha($menus, $avec_favoris = false) {
-	foreach ($menus as $menu) {
-		if ($menu->sousmenu) {
-			$libelles = $isfavoris = $favoris = [];
-			foreach ($menu->sousmenu as $key => $item) {
-				$libelles[$key] = strtolower(translitteration(_T($item->libelle)));
-				$isfavoris[$key] = $item->favori;
-				$favoris[$key] = $item->favori;
-			}
-			if ($avec_favoris) {
-				array_multisort($isfavoris, SORT_DESC, $favoris, SORT_ASC, $libelles, SORT_ASC, $menu->sousmenu);
-			} else {
-				array_multisort($libelles, SORT_ASC, $menu->sousmenu);
-			}
-		}
-	}
-	return $menus;
+    foreach ($menus as $menu) {
+        if ($menu->sousmenu) {
+            $libelles = $isfavoris = $favoris = [];
+            foreach ($menu->sousmenu as $key => $item) {
+                $libelles[$key] = strtolower(translitteration(_T($item->libelle)));
+                $isfavoris[$key] = $item->favori;
+                $favoris[$key] = $item->favori;
+            }
+            if ($avec_favoris) {
+                array_multisort($isfavoris, SORT_DESC, $favoris, SORT_ASC, $libelles, SORT_ASC, $menu->sousmenu);
+            } else {
+                array_multisort($libelles, SORT_ASC, $menu->sousmenu);
+            }
+        }
+    }
+    return $menus;
 }
 
 /**
@@ -199,7 +199,7 @@ 
  * @return Bouton[]
  */
 function trier_boutons_enfants_par_favoris_alpha($menus) {
-	return trier_boutons_enfants_par_alpha($menus, true);
+    return trier_boutons_enfants_par_alpha($menus, true);
 }
 
 
@@ -212,23 +212,23 @@ 
  * @return string
  */
 function bandeau_creer_url($url, $args = '', $contexte = null) {
-	if (!preg_match(',[\/\?],', $url)) {
-		$url = generer_url_ecrire($url, $args, true);
-		// recuperer les parametres du contexte demande par l'url sous la forme
-		// &truc=@machin@
-		// @machin@ etant remplace par _request('machin')
-		$url = str_replace('&amp;', '&', $url);
-		while (preg_match(',[&?]([a-z_]+)=@([a-z_]+)@,i', $url, $matches)) {
-			if ($matches[2] == 'id_secteur' and !isset($contexte['id_secteur']) and isset($contexte['id_rubrique'])) {
-				$contexte['id_secteur'] = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique=' . intval($contexte['id_rubrique']));
-			}
-			$val = _request($matches[2], $contexte);
-			$url = parametre_url($url, $matches[1], $val ?: '', '&');
-		}
-		$url = str_replace('&', '&amp;', $url);
-	}
+    if (!preg_match(',[\/\?],', $url)) {
+        $url = generer_url_ecrire($url, $args, true);
+        // recuperer les parametres du contexte demande par l'url sous la forme
+        // &truc=@machin@
+        // @machin@ etant remplace par _request('machin')
+        $url = str_replace('&amp;', '&', $url);
+        while (preg_match(',[&?]([a-z_]+)=@([a-z_]+)@,i', $url, $matches)) {
+            if ($matches[2] == 'id_secteur' and !isset($contexte['id_secteur']) and isset($contexte['id_rubrique'])) {
+                $contexte['id_secteur'] = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique=' . intval($contexte['id_rubrique']));
+            }
+            $val = _request($matches[2], $contexte);
+            $url = parametre_url($url, $matches[1], $val ?: '', '&');
+        }
+        $url = str_replace('&', '&amp;', $url);
+    }
 
-	return $url;
+    return $url;
 }
 
 /**
@@ -238,7 +238,7 @@ 
  *     Code HTML du bandeau
  */
 function inc_bandeau_dist() {
-	return recuperer_fond('prive/squelettes/inclure/barre-nav', $_GET);
+    return recuperer_fond('prive/squelettes/inclure/barre-nav', $_GET);
 }
 
 
@@ -247,13 +247,13 @@ 
  * @return array
  */
 function obtenir_menus_favoris() {
-	if (
-		isset($GLOBALS['visiteur_session']['prefs']['menus_favoris'])
-		and is_array($GLOBALS['visiteur_session']['prefs']['menus_favoris'])
-		and $GLOBALS['visiteur_session']['prefs']['menus_favoris']
-	) {
-		return $GLOBALS['visiteur_session']['prefs']['menus_favoris'];
-	}
-	$definir_menus_favoris = charger_fonction('definir_menus_favoris', 'inc');
-	return $definir_menus_favoris();
+    if (
+        isset($GLOBALS['visiteur_session']['prefs']['menus_favoris'])
+        and is_array($GLOBALS['visiteur_session']['prefs']['menus_favoris'])
+        and $GLOBALS['visiteur_session']['prefs']['menus_favoris']
+    ) {
+        return $GLOBALS['visiteur_session']['prefs']['menus_favoris'];
+    }
+    $definir_menus_favoris = charger_fonction('definir_menus_favoris', 'inc');
+    return $definir_menus_favoris();
 }

ecrire/inc/boutons.php

Indentation +89 added lines, -89 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,58 +25,58 @@ 
  * privée ou dans un de ses sous menus
  */
 class Bouton {
-	/** L'icone à mettre dans le bouton */
-	public string $icone;
-
-	/** Le nom de l'entrée d'i18n associé */
-	public string $libelle;
-
-	/** @var null|string L'URL de la page (null => ?exec=nom) */
-	public $url = null;
-
-	/** @var null|string|array Arguments supplementaires de l'URL */
-	public $urlArg = null;
-
-	/** @var null|string URL du javascript */
-	public $url2 = null;
-
-	/** @var null|string Pour ouvrir dans une fenetre a part */
-	public $target = null;
-
-	/** Sous-barre de boutons / onglets */
-	public array $sousmenu = [];
-
-	/** Position dans le menu */
-	public int $position = 0;
-
-	/** Entrée favorite ? */
-	public bool $favori = false;
-
-
-	/**
-	 * Définit un bouton
-	 *
-	 * @param string $icone
-	 *    L'icone à mettre dans le bouton
-	 * @param string $libelle
-	 *    Le nom de l'entrée i18n associé
-	 * @param null|string $url
-	 *    L'URL de la page
-	 * @param null|string|array $urlArg
-	 *    Arguments supplémentaires de l'URL
-	 * @param null|string $url2
-	 *    URL du javascript
-	 * @param null|mixed $target
-	 *    Pour ouvrir une fenêtre à part
-	 */
-	public function __construct($icone, $libelle, $url = null, $urlArg = null, $url2 = null, $target = null) {
-		$this->icone = $icone;
-		$this->libelle = $libelle;
-		$this->url = $url;
-		$this->urlArg = $urlArg;
-		$this->url2 = $url2;
-		$this->target = $target;
-	}
+    /** L'icone à mettre dans le bouton */
+    public string $icone;
+
+    /** Le nom de l'entrée d'i18n associé */
+    public string $libelle;
+
+    /** @var null|string L'URL de la page (null => ?exec=nom) */
+    public $url = null;
+
+    /** @var null|string|array Arguments supplementaires de l'URL */
+    public $urlArg = null;
+
+    /** @var null|string URL du javascript */
+    public $url2 = null;
+
+    /** @var null|string Pour ouvrir dans une fenetre a part */
+    public $target = null;
+
+    /** Sous-barre de boutons / onglets */
+    public array $sousmenu = [];
+
+    /** Position dans le menu */
+    public int $position = 0;
+
+    /** Entrée favorite ? */
+    public bool $favori = false;
+
+
+    /**
+     * Définit un bouton
+     *
+     * @param string $icone
+     *    L'icone à mettre dans le bouton
+     * @param string $libelle
+     *    Le nom de l'entrée i18n associé
+     * @param null|string $url
+     *    L'URL de la page
+     * @param null|string|array $urlArg
+     *    Arguments supplémentaires de l'URL
+     * @param null|string $url2
+     *    URL du javascript
+     * @param null|mixed $target
+     *    Pour ouvrir une fenêtre à part
+     */
+    public function __construct($icone, $libelle, $url = null, $urlArg = null, $url2 = null, $target = null) {
+        $this->icone = $icone;
+        $this->libelle = $libelle;
+        $this->url = $url;
+        $this->urlArg = $urlArg;
+        $this->url2 = $url2;
+        $this->target = $target;
+    }
 }
 
 
@@ -93,35 +93,35 @@ 
  */
 function definir_barre_onglets($script) {
 
-	$onglets = [];
-	$liste_onglets = [];
-
-	// ajouter les onglets issus des plugin via paquet.xml
-	if (function_exists('onglets_plugins')) {
-		$liste_onglets = onglets_plugins();
-	}
-
-
-	foreach ($liste_onglets as $id => $infos) {
-		if (
-			($parent = $infos['parent'])
-			&& $parent == $script
-			&& autoriser('onglet', "_$id")
-		) {
-			$onglets[$id] = new Bouton(
-				isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
-				$infos['titre'],  // titre
-				(isset($infos['action']) and $infos['action'])
-					? generer_url_ecrire(
-						$infos['action'],
-						(isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : ''
-					)
-					: null
-			);
-		}
-	}
-
-	return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
+    $onglets = [];
+    $liste_onglets = [];
+
+    // ajouter les onglets issus des plugin via paquet.xml
+    if (function_exists('onglets_plugins')) {
+        $liste_onglets = onglets_plugins();
+    }
+
+
+    foreach ($liste_onglets as $id => $infos) {
+        if (
+            ($parent = $infos['parent'])
+            && $parent == $script
+            && autoriser('onglet', "_$id")
+        ) {
+            $onglets[$id] = new Bouton(
+                isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
+                $infos['titre'],  // titre
+                (isset($infos['action']) and $infos['action'])
+                    ? generer_url_ecrire(
+                        $infos['action'],
+                        (isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : ''
+                    )
+                    : null
+            );
+        }
+    }
+
+    return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
 }
 
 
@@ -140,14 +140,14 @@ 
  * @return string
  */
 function barre_onglets($rubrique, $ongletCourant, $class = 'barre_onglet') {
-	include_spip('inc/presentation');
+    include_spip('inc/presentation');
 
-	$res = '';
+    $res = '';
 
-	foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
-		$url = $onglet->url ?: generer_url_ecrire($exec);
-		$res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
-	}
+    foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
+        $url = $onglet->url ?: generer_url_ecrire($exec);
+        $res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
+    }
 
-	return !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
+    return !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
 }

ecrire/inc/lang.php

Indentation +251 added lines, -251 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Langue
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -39,35 +39,35 @@ 
  **/
 function changer_langue($lang, $liste_langues = null) {
 
-	if (is_null($liste_langues)) {
-		$liste_langues = ($GLOBALS['meta']['langues_proposees'] ?? '') . ',' . ($GLOBALS['meta']['langues_multilingue'] ?? '');
-	} else {
-		if (is_array($liste_langues)) {
-			$liste_langues = implode(',', $liste_langues);
-		}
-	}
-	$liste_langues = ',' . $liste_langues . ',';
-
-	// Si la langue demandee n'existe pas, on essaie d'autres variantes
-	// Exemple : 'pt-br' => 'pt_br' => 'pt'
-	$lang = str_replace('-', '_', trim($lang));
-	if (!$lang) {
-		return false;
-	}
-
-	if (
-		strpos($liste_langues, (string) ",$lang,") !== false
-		or ($lang = preg_replace(',_.*,', '', $lang)
-			and strpos($liste_langues, (string) ",$lang,") !== false)
-	) {
-		$GLOBALS['spip_lang_rtl'] = lang_dir($lang, '', '_rtl');
-		$GLOBALS['spip_lang_right'] = $GLOBALS['spip_lang_rtl'] ? 'left' : 'right';
-		$GLOBALS['spip_lang_left'] = $GLOBALS['spip_lang_rtl'] ? 'right' : 'left';
-
-		return $GLOBALS['spip_lang'] = $lang;
-	} else {
-		return false;
-	}
+    if (is_null($liste_langues)) {
+        $liste_langues = ($GLOBALS['meta']['langues_proposees'] ?? '') . ',' . ($GLOBALS['meta']['langues_multilingue'] ?? '');
+    } else {
+        if (is_array($liste_langues)) {
+            $liste_langues = implode(',', $liste_langues);
+        }
+    }
+    $liste_langues = ',' . $liste_langues . ',';
+
+    // Si la langue demandee n'existe pas, on essaie d'autres variantes
+    // Exemple : 'pt-br' => 'pt_br' => 'pt'
+    $lang = str_replace('-', '_', trim($lang));
+    if (!$lang) {
+        return false;
+    }
+
+    if (
+        strpos($liste_langues, (string) ",$lang,") !== false
+        or ($lang = preg_replace(',_.*,', '', $lang)
+            and strpos($liste_langues, (string) ",$lang,") !== false)
+    ) {
+        $GLOBALS['spip_lang_rtl'] = lang_dir($lang, '', '_rtl');
+        $GLOBALS['spip_lang_right'] = $GLOBALS['spip_lang_rtl'] ? 'left' : 'right';
+        $GLOBALS['spip_lang_left'] = $GLOBALS['spip_lang_rtl'] ? 'right' : 'left';
+
+        return $GLOBALS['spip_lang'] = $lang;
+    } else {
+        return false;
+    }
 }
 
 //
@@ -80,9 +80,9 @@ 
 // par exemple le francais pour l'espagnol, l'anglais pour l'allemand, etc.
 
 function choisir_traduction($trads, $lang = '') {
-	$k = approcher_langue($trads, $lang);
+    $k = approcher_langue($trads, $lang);
 
-	return $k ? $trads[$k] : array_shift($trads);
+    return $k ? $trads[$k] : array_shift($trads);
 }
 
 // retourne son 2e argument si c'est un index du premier
@@ -90,21 +90,21 @@ 
 // la langue X etant consideree comme une approche de X_Y
 function approcher_langue($trads, $lang = '') {
 
-	if (!$lang) {
-		$lang = $GLOBALS['spip_lang'];
-	}
-
-	if (isset($trads[$lang])) {
-		return $lang;
-	} // cas des langues xx_yy
-	else {
-		$r = explode('_', $lang);
-		if (isset($trads[$r[0]])) {
-			return $r[0];
-		}
-	}
-
-	return '';
+    if (!$lang) {
+        $lang = $GLOBALS['spip_lang'];
+    }
+
+    if (isset($trads[$lang])) {
+        return $lang;
+    } // cas des langues xx_yy
+    else {
+        $r = explode('_', $lang);
+        if (isset($trads[$r[0]])) {
+            return $r[0];
+        }
+    }
+
+    return '';
 }
 
 /**
@@ -119,10 +119,10 @@ 
  *     Nom de la langue, sinon son code.
  **/
 function traduire_nom_langue($lang) {
-	include_spip('inc/lang_liste');
-	include_spip('inc/charsets');
+    include_spip('inc/lang_liste');
+    include_spip('inc/charsets');
 
-	return html2unicode($GLOBALS['codes_langues'][$lang] ?? $lang);
+    return html2unicode($GLOBALS['codes_langues'][$lang] ?? $lang);
 }
 
 //
@@ -135,10 +135,10 @@ 
 // hebreu a priori), 'droitier' sinon.
 // C'est utilise par #LANG_DIR, #LANG_LEFT, #LANG_RIGHT.
 function lang_dir($lang = '', $droitier = 'ltr', $gaucher = 'rtl') {
-	static $lang_rtl = ['ar', 'fa', 'ku', 'prs', 'ps', 'ur', 'he', 'heb', 'hbo', 'yi'];
+    static $lang_rtl = ['ar', 'fa', 'ku', 'prs', 'ps', 'ur', 'he', 'heb', 'hbo', 'yi'];
 
-	return in_array(($lang ?: $GLOBALS['spip_lang']), $lang_rtl) ?
-		$gaucher : $droitier;
+    return in_array(($lang ?: $GLOBALS['spip_lang']), $lang_rtl) ?
+        $gaucher : $droitier;
 }
 
 // typo francaise ou anglaise ?
@@ -147,29 +147,29 @@ 
 // sinon determiner la typo en fonction de la langue courante
 
 function lang_typo($lang = '') {
-	if (!$lang) {
-		$lang = $GLOBALS['lang_objet'] ?? $GLOBALS['spip_lang'];
-	}
-	if (
-		$lang == 'eo'
-		or $lang == 'fr'
-		or strncmp($lang, 'fr_', 3) == 0
-		or $lang == 'cpf'
-	) {
-		return 'fr';
-	} else {
-		return 'en';
-	}
+    if (!$lang) {
+        $lang = $GLOBALS['lang_objet'] ?? $GLOBALS['spip_lang'];
+    }
+    if (
+        $lang == 'eo'
+        or $lang == 'fr'
+        or strncmp($lang, 'fr_', 3) == 0
+        or $lang == 'cpf'
+    ) {
+        return 'fr';
+    } else {
+        return 'en';
+    }
 }
 
 // gestion de la globale $lang_objet pour que les textes soient affiches
 // avec les memes typo et direction dans l'espace prive que dans le public
 function changer_typo($lang = '') {
-	if ($lang) {
-		$GLOBALS['lang_objet'] = $lang;
-	} else {
-		unset($GLOBALS['lang_objet']);
-	}
+    if ($lang) {
+        $GLOBALS['lang_objet'] = $lang;
+    } else {
+        unset($GLOBALS['lang_objet']);
+    }
 }
 
 //
@@ -179,58 +179,58 @@ 
 // pour 'changer_lang' (langue de l'article, espace prive), c'est en Ajax
 //
 function menu_langues($nom_select, $default = '') {
-	include_spip('inc/actions');
-
-	$langues = liste_options_langues($nom_select);
-	$ret = '';
-	if (!count($langues)) {
-		return '';
-	}
-
-	if (!$default) {
-		$default = $GLOBALS['spip_lang'];
-	}
-	foreach ($langues as $l) {
-		$selected = ($l == $default) ? ' selected=\'selected\'' : '';
-		$ret .= "<option value='$l'$selected>[" . $l . '] ' . traduire_nom_langue($l) . "</option>\n";
-	}
-
-	if (!test_espace_prive()) {
-		$cible = self();
-		$base = '';
-	} else {
-		$cible = self();
-		$base = spip_connect() ? 'base' : '';
-	}
-
-	$change = ' onchange="this.parentNode.parentNode.submit()"';
-
-	return generer_action_auteur(
-		'converser',
-		$base,
-		$cible,
-		(select_langues($nom_select, $change, $ret)
-			. "<noscript><div style='display:inline'><input type='submit' class='fondo' value='" . _T('bouton_changer') . "' /></div></noscript>"),
-		" method='post'"
-	);
+    include_spip('inc/actions');
+
+    $langues = liste_options_langues($nom_select);
+    $ret = '';
+    if (!count($langues)) {
+        return '';
+    }
+
+    if (!$default) {
+        $default = $GLOBALS['spip_lang'];
+    }
+    foreach ($langues as $l) {
+        $selected = ($l == $default) ? ' selected=\'selected\'' : '';
+        $ret .= "<option value='$l'$selected>[" . $l . '] ' . traduire_nom_langue($l) . "</option>\n";
+    }
+
+    if (!test_espace_prive()) {
+        $cible = self();
+        $base = '';
+    } else {
+        $cible = self();
+        $base = spip_connect() ? 'base' : '';
+    }
+
+    $change = ' onchange="this.parentNode.parentNode.submit()"';
+
+    return generer_action_auteur(
+        'converser',
+        $base,
+        $cible,
+        (select_langues($nom_select, $change, $ret)
+            . "<noscript><div style='display:inline'><input type='submit' class='fondo' value='" . _T('bouton_changer') . "' /></div></noscript>"),
+        " method='post'"
+    );
 }
 
 function select_langues($nom_select, $change, $options, $label = '') {
-	static $cpt = 0;
-	$id = 'menu_langues' . $cpt++;
-
-	return
-		"<label for='$id'>" . ($label ?: _T('info_langues')) . '</label> ' .
-		"<select name='$nom_select' id='$id' "
-		. ((!test_espace_prive()) ?
-			("class='forml menu_langues'") :
-			(($nom_select == 'var_lang_ecrire') ?
-				("class='lang_ecrire'") :
-				"class='fondl'"))
-		. $change
-		. ">\n"
-		. $options
-		. '</select>';
+    static $cpt = 0;
+    $id = 'menu_langues' . $cpt++;
+
+    return
+        "<label for='$id'>" . ($label ?: _T('info_langues')) . '</label> ' .
+        "<select name='$nom_select' id='$id' "
+        . ((!test_espace_prive()) ?
+            ("class='forml menu_langues'") :
+            (($nom_select == 'var_lang_ecrire') ?
+                ("class='lang_ecrire'") :
+                "class='fondl'"))
+        . $change
+        . ">\n"
+        . $options
+        . '</select>';
 }
 
 /**
@@ -252,34 +252,34 @@ 
  */
 function liste_options_langues($nom_select) {
 
-	switch ($nom_select) {
-		# #MENU_LANG
-		case 'var_lang':
-			# menu de changement de la langue d'un article
-			# les langues selectionnees dans la configuration "multilinguisme"
-		case 'changer_lang':
-			$langues = explode(',', $GLOBALS['meta']['langues_multilingue']);
-			break;
-		# menu de l'interface (privee, installation et panneau de login)
-		# les langues presentes sous forme de fichiers de langue
-		# on force la relecture du repertoire des langues pour etre synchrone.
-		case 'var_lang_ecrire':
-		default:
-			$GLOBALS['meta']['langues_proposees'] = '';
-			init_langues();
-			$langues = explode(',', $GLOBALS['meta']['langues_proposees']);
-			break;
+    switch ($nom_select) {
+        # #MENU_LANG
+        case 'var_lang':
+            # menu de changement de la langue d'un article
+            # les langues selectionnees dans la configuration "multilinguisme"
+        case 'changer_lang':
+            $langues = explode(',', $GLOBALS['meta']['langues_multilingue']);
+            break;
+        # menu de l'interface (privee, installation et panneau de login)
+        # les langues presentes sous forme de fichiers de langue
+        # on force la relecture du repertoire des langues pour etre synchrone.
+        case 'var_lang_ecrire':
+        default:
+            $GLOBALS['meta']['langues_proposees'] = '';
+            init_langues();
+            $langues = explode(',', $GLOBALS['meta']['langues_proposees']);
+            break;
 
 # dernier choix possible : toutes les langues = langues_proposees
 # + langues_multilingues ; mais, ne sert pas
 #			$langues = explode(',', $GLOBALS['all_langs']);
-	}
-	if (count($langues) <= 1) {
-		return [];
-	}
-	sort($langues);
+    }
+    if (count($langues) <= 1) {
+        return [];
+    }
+    sort($langues);
 
-	return $langues;
+    return $langues;
 }
 
 
@@ -294,39 +294,39 @@ 
  **/
 function verifier_lang_url() {
 
-	// quelle langue est demandee ?
-	$lang_demandee = (test_espace_prive() ? $GLOBALS['spip_lang'] : $GLOBALS['meta']['langue_site']);
-	if (isset($_COOKIE['spip_lang_ecrire'])) {
-		$lang_demandee = $_COOKIE['spip_lang_ecrire'];
-	}
-	if (!test_espace_prive() and isset($_COOKIE['spip_lang'])) {
-		$lang_demandee = $_COOKIE['spip_lang'];
-	}
-	if (isset($_GET['lang'])) {
-		$lang_demandee = $_GET['lang'];
-	}
-
-	// Renvoyer si besoin (et si la langue demandee existe)
-	if (
-		$GLOBALS['spip_lang'] != $lang_demandee
-		and changer_langue($lang_demandee)
-		and $lang_demandee != @$_GET['lang']
-	) {
-		$destination = parametre_url(self(), 'lang', $lang_demandee, '&');
-		// ici on a besoin des var_truc
-		foreach ($_GET as $var => $val) {
-			if (!strncmp('var_', $var, 4)) {
-				$destination = parametre_url($destination, $var, $val, '&');
-			}
-		}
-		include_spip('inc/headers');
-		redirige_par_entete($destination);
-	}
-
-	// Subtilite : si la langue demandee par cookie est la bonne
-	// alors on fait comme si $lang etait passee dans l'URL
-	// (pour criteres {lang}).
-	$GLOBALS['lang'] = $_GET['lang'] = $GLOBALS['spip_lang'];
+    // quelle langue est demandee ?
+    $lang_demandee = (test_espace_prive() ? $GLOBALS['spip_lang'] : $GLOBALS['meta']['langue_site']);
+    if (isset($_COOKIE['spip_lang_ecrire'])) {
+        $lang_demandee = $_COOKIE['spip_lang_ecrire'];
+    }
+    if (!test_espace_prive() and isset($_COOKIE['spip_lang'])) {
+        $lang_demandee = $_COOKIE['spip_lang'];
+    }
+    if (isset($_GET['lang'])) {
+        $lang_demandee = $_GET['lang'];
+    }
+
+    // Renvoyer si besoin (et si la langue demandee existe)
+    if (
+        $GLOBALS['spip_lang'] != $lang_demandee
+        and changer_langue($lang_demandee)
+        and $lang_demandee != @$_GET['lang']
+    ) {
+        $destination = parametre_url(self(), 'lang', $lang_demandee, '&');
+        // ici on a besoin des var_truc
+        foreach ($_GET as $var => $val) {
+            if (!strncmp('var_', $var, 4)) {
+                $destination = parametre_url($destination, $var, $val, '&');
+            }
+        }
+        include_spip('inc/headers');
+        redirige_par_entete($destination);
+    }
+
+    // Subtilite : si la langue demandee par cookie est la bonne
+    // alors on fait comme si $lang etait passee dans l'URL
+    // (pour criteres {lang}).
+    $GLOBALS['lang'] = $_GET['lang'] = $GLOBALS['spip_lang'];
 }
 
 
@@ -344,22 +344,22 @@ 
  *     La langue sélectionnée
  **/
 function utiliser_langue_site($liste_langues = null) {
-	// s'il existe une langue du site (en gros tout le temps en théorie)
-	if (
-		isset($GLOBALS['meta']['langue_site'])
-		// et si spip_langue est pas encore définie (ce que va faire changer_langue())
-		// ou qu'elle n'est pas identique à la langue du site
-		and (!isset($GLOBALS['spip_lang'])
-			or $GLOBALS['spip_lang'] != $GLOBALS['meta']['langue_site'])
-	) {
-		return changer_langue($GLOBALS['meta']['langue_site'], $liste_langues);//@:install
-	}
-	// en theorie là, la globale est définie, sinon c'est un problème.
-	if (!isset($GLOBALS['spip_lang'])) {
-		spip_log('La globale spip_lang est indéfinie dans utiliser_langue_site() !', _LOG_ERREUR);
-	}
-
-	return $GLOBALS['spip_lang'];
+    // s'il existe une langue du site (en gros tout le temps en théorie)
+    if (
+        isset($GLOBALS['meta']['langue_site'])
+        // et si spip_langue est pas encore définie (ce que va faire changer_langue())
+        // ou qu'elle n'est pas identique à la langue du site
+        and (!isset($GLOBALS['spip_lang'])
+            or $GLOBALS['spip_lang'] != $GLOBALS['meta']['langue_site'])
+    ) {
+        return changer_langue($GLOBALS['meta']['langue_site'], $liste_langues);//@:install
+    }
+    // en theorie là, la globale est définie, sinon c'est un problème.
+    if (!isset($GLOBALS['spip_lang'])) {
+        spip_log('La globale spip_lang est indéfinie dans utiliser_langue_site() !', _LOG_ERREUR);
+    }
+
+    return $GLOBALS['spip_lang'];
 }
 
 /**
@@ -378,30 +378,30 @@ 
  **/
 function utiliser_langue_visiteur($liste_langues = null) {
 
-	$l = (!test_espace_prive() ? 'spip_lang' : 'spip_lang_ecrire');
-	if (isset($_COOKIE[$l])) {
-		if (changer_langue($l = $_COOKIE[$l], $liste_langues)) {
-			return $l;
-		}
-	}
-
-	if (isset($GLOBALS['visiteur_session']['lang'])) {
-		if (changer_langue($l = $GLOBALS['visiteur_session']['lang'], $liste_langues)) {
-			return $l;
-		}
-	}
-
-	if (isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
-		foreach (explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']) as $s) {
-			if (preg_match('#^([a-z]{2,3})(-[a-z]{2,3})?(;q=[0-9.]+)?$#i', trim($s), $r)) {
-				if (changer_langue($l = strtolower($r[1]), $liste_langues)) {
-					return $l;
-				}
-			}
-		}
-	}
-
-	return utiliser_langue_site($liste_langues);
+    $l = (!test_espace_prive() ? 'spip_lang' : 'spip_lang_ecrire');
+    if (isset($_COOKIE[$l])) {
+        if (changer_langue($l = $_COOKIE[$l], $liste_langues)) {
+            return $l;
+        }
+    }
+
+    if (isset($GLOBALS['visiteur_session']['lang'])) {
+        if (changer_langue($l = $GLOBALS['visiteur_session']['lang'], $liste_langues)) {
+            return $l;
+        }
+    }
+
+    if (isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
+        foreach (explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']) as $s) {
+            if (preg_match('#^([a-z]{2,3})(-[a-z]{2,3})?(;q=[0-9.]+)?$#i', trim($s), $r)) {
+                if (changer_langue($l = strtolower($r[1]), $liste_langues)) {
+                    return $l;
+                }
+            }
+        }
+    }
+
+    return utiliser_langue_site($liste_langues);
 }
 
 
@@ -411,7 +411,7 @@ 
  * @return int
  */
 function match_langue($chaine) {
-	return preg_match('/^[a-z]{2,3}(_[a-z]{2,3}){0,2}$/', $chaine);
+    return preg_match('/^[a-z]{2,3}(_[a-z]{2,3}){0,2}$/', $chaine);
 }
 
 /**
@@ -429,36 +429,36 @@ 
  **/
 function init_langues() {
 
-	// liste des langues dans les meta, sauf a l'install
-	$all_langs = $GLOBALS['meta']['langues_proposees'] ?? '';
-
-	$tout = [];
-	if (!$all_langs) {
-		// trouver tous les modules lang/spip_xx.php
-		$modules = find_all_in_path('lang/', '/spip_([a-z_]+)\.php$');
-		foreach ($modules as $name => $path) {
-			if (preg_match(',^spip_([a-z_]+)\.php$,', $name, $regs)) {
-				if (match_langue($regs[1])) {
-					$tout[] = $regs[1];
-				}
-			}
-		}
-		sort($tout);
-		$tout = join(',', $tout);
-		// Si les langues n'ont pas change, ne rien faire
-		if ($tout != $all_langs) {
-			$GLOBALS['meta']['langues_proposees'] = $tout;
-			include_spip('inc/meta');
-			ecrire_meta('langues_proposees', $tout);
-		}
-	}
-	if (!isset($GLOBALS['meta']['langue_site'])) {
-		// Initialisation : le francais si dispo, sinon la premiere langue trouvee
-		$GLOBALS['meta']['langue_site'] = $tout =
-			(!$all_langs or (strpos(',' . _LANGUE_PAR_DEFAUT . ',', (string) ",$all_langs,") !== false))
-				? _LANGUE_PAR_DEFAUT : substr($all_langs, 0, strpos($all_langs, ','));
-		ecrire_meta('langue_site', $tout);
-	}
+    // liste des langues dans les meta, sauf a l'install
+    $all_langs = $GLOBALS['meta']['langues_proposees'] ?? '';
+
+    $tout = [];
+    if (!$all_langs) {
+        // trouver tous les modules lang/spip_xx.php
+        $modules = find_all_in_path('lang/', '/spip_([a-z_]+)\.php$');
+        foreach ($modules as $name => $path) {
+            if (preg_match(',^spip_([a-z_]+)\.php$,', $name, $regs)) {
+                if (match_langue($regs[1])) {
+                    $tout[] = $regs[1];
+                }
+            }
+        }
+        sort($tout);
+        $tout = join(',', $tout);
+        // Si les langues n'ont pas change, ne rien faire
+        if ($tout != $all_langs) {
+            $GLOBALS['meta']['langues_proposees'] = $tout;
+            include_spip('inc/meta');
+            ecrire_meta('langues_proposees', $tout);
+        }
+    }
+    if (!isset($GLOBALS['meta']['langue_site'])) {
+        // Initialisation : le francais si dispo, sinon la premiere langue trouvee
+        $GLOBALS['meta']['langue_site'] = $tout =
+            (!$all_langs or (strpos(',' . _LANGUE_PAR_DEFAUT . ',', (string) ",$all_langs,") !== false))
+                ? _LANGUE_PAR_DEFAUT : substr($all_langs, 0, strpos($all_langs, ','));
+        ecrire_meta('langue_site', $tout);
+    }
 }
 
 /**
@@ -472,10 +472,10 @@ 
  *     Code html de la balise <html>
  **/
 function html_lang_attributes() {
-	$lang = $GLOBALS['spip_lang'];
-	$dir = ($GLOBALS['spip_lang_rtl'] ? 'rtl' : 'ltr');
+    $lang = $GLOBALS['spip_lang'];
+    $dir = ($GLOBALS['spip_lang_rtl'] ? 'rtl' : 'ltr');
 
-	return "<html class='$dir $lang no-js' xmlns='http://www.w3.org/1999/xhtml' lang='$lang' dir='$dir'>\n";
+    return "<html class='$dir $lang no-js' xmlns='http://www.w3.org/1999/xhtml' lang='$lang' dir='$dir'>\n";
 }
 
 
@@ -489,7 +489,7 @@ 
  * @return string
  */
 function aide_lang_dir($spip_lang, $spip_lang_rtl) {
-	return ($spip_lang <> 'he') ? $spip_lang_rtl : '';
+    return ($spip_lang <> 'he') ? $spip_lang_rtl : '';
 }
 
 

ecrire/inc/filtres.php

Indentation +2476 added lines, -2476 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Filtres
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -42,8 +42,8 @@ 
  * @return string Fonction PHP correspondante du filtre
  */
 function charger_filtre($fonc, $default = 'filtre_identite_dist') {
-	include_fichiers_fonctions(); // inclure les fichiers fonctions
-	return chercher_filtre($fonc, $default);
+    include_fichiers_fonctions(); // inclure les fichiers fonctions
+    return chercher_filtre($fonc, $default);
 }
 
 /**
@@ -53,7 +53,7 @@ 
  * @return string Texte
  **/
 function filtre_identite_dist($texte) {
- return $texte;
+    return $texte;
 }
 
 /**
@@ -77,33 +77,33 @@ 
  *     Fonction PHP correspondante du filtre demandé
  */
 function chercher_filtre($fonc, $default = null) {
-	if (!$fonc) {
-		return $default;
-	}
-	// Cas des types mime, sans confondre avec les appels de fonction de classe
-	// Foo::Bar
-	// qui peuvent etre avec un namespace : space\Foo::Bar
-	if (preg_match(',^[\w]+/,', $fonc)) {
-		$nom = preg_replace(',\W,', '_', $fonc);
-		$f = chercher_filtre($nom);
-		// cas du sous-type MIME sans filtre associe, passer au type:
-		// si filtre_text_plain pas defini, passe a filtre_text
-		if (!$f and $nom !== $fonc) {
-			$f = chercher_filtre(preg_replace(',\W.*$,', '', $fonc));
-		}
-
-		return $f;
-	}
-
-	include_fichiers_fonctions();
-	foreach (['filtre_' . $fonc, 'filtre_' . $fonc . '_dist', $fonc] as $f) {
-		trouver_filtre_matrice($f); // charge des fichiers spécifiques éventuels
-		if (is_callable($f)) {
-			return $f;
-		}
-	}
-
-	return $default;
+    if (!$fonc) {
+        return $default;
+    }
+    // Cas des types mime, sans confondre avec les appels de fonction de classe
+    // Foo::Bar
+    // qui peuvent etre avec un namespace : space\Foo::Bar
+    if (preg_match(',^[\w]+/,', $fonc)) {
+        $nom = preg_replace(',\W,', '_', $fonc);
+        $f = chercher_filtre($nom);
+        // cas du sous-type MIME sans filtre associe, passer au type:
+        // si filtre_text_plain pas defini, passe a filtre_text
+        if (!$f and $nom !== $fonc) {
+            $f = chercher_filtre(preg_replace(',\W.*$,', '', $fonc));
+        }
+
+        return $f;
+    }
+
+    include_fichiers_fonctions();
+    foreach (['filtre_' . $fonc, 'filtre_' . $fonc . '_dist', $fonc] as $f) {
+        trouver_filtre_matrice($f); // charge des fichiers spécifiques éventuels
+        if (is_callable($f)) {
+            return $f;
+        }
+    }
+
+    return $default;
 }
 
 /**
@@ -147,8 +147,8 @@ 
  *     Chaîne vide sinon.
  **/
 function appliquer_filtre($arg, $filtre) {
-	$args = func_get_args();
-	return appliquer_filtre_sinon($arg, $filtre, $args, '');
+    $args = func_get_args();
+    return appliquer_filtre_sinon($arg, $filtre, $args, '');
 }
 
 /**
@@ -173,8 +173,8 @@ 
  *     Texte d'origine sinon
  **/
 function appliquer_si_filtre($arg, $filtre) {
-	$args = func_get_args();
-	return appliquer_filtre_sinon($arg, $filtre, $args, $arg);
+    $args = func_get_args();
+    return appliquer_filtre_sinon($arg, $filtre, $args, $arg);
 }
 
 /**
@@ -190,12 +190,12 @@ 
  *     Version de SPIP
  **/
 function spip_version() {
-	$version = $GLOBALS['spip_version_affichee'];
-	if ($vcs_version = version_vcs_courante(_DIR_RACINE)) {
-		$version .= " $vcs_version";
-	}
+    $version = $GLOBALS['spip_version_affichee'];
+    if ($vcs_version = version_vcs_courante(_DIR_RACINE)) {
+        $version .= " $vcs_version";
+    }
 
-	return $version;
+    return $version;
 }
 
 /**
@@ -207,11 +207,11 @@ 
  * @return string
  */
 function header_silencieux($version): string {
-	if (isset($GLOBALS['spip_header_silencieux']) && (bool) $GLOBALS['spip_header_silencieux']) {
-		$version = '';
-	}
+    if (isset($GLOBALS['spip_header_silencieux']) && (bool) $GLOBALS['spip_header_silencieux']) {
+        $version = '';
+    }
 
-	return (string) $version;
+    return (string) $version;
 }
 
 /**
@@ -224,19 +224,19 @@ 
  *    - string|null si $raw = false
  */
 function version_vcs_courante($dir, $raw = false) {
-	$desc = decrire_version_git($dir);
-	if ($desc === null) {
-		$desc = decrire_version_svn($dir);
-	}
-	if ($desc === null or $raw) {
-		return $desc;
-	}
-	// affichage "GIT [master: abcdef]"
-	$commit = $desc['commit_short'] ?? $desc['commit'];
-	if ($desc['branch']) {
-		$commit = $desc['branch'] . ': ' . $commit;
-	}
-	return "{$desc['vcs']} [$commit]";
+    $desc = decrire_version_git($dir);
+    if ($desc === null) {
+        $desc = decrire_version_svn($dir);
+    }
+    if ($desc === null or $raw) {
+        return $desc;
+    }
+    // affichage "GIT [master: abcdef]"
+    $commit = $desc['commit_short'] ?? $desc['commit'];
+    if ($desc['branch']) {
+        $commit = $desc['branch'] . ': ' . $commit;
+    }
+    return "{$desc['vcs']} [$commit]";
 }
 
 /**
@@ -248,24 +248,24 @@ 
  *      array ['branch' => xx, 'commit' => yy] sinon.
  **/
 function decrire_version_git($dir) {
-	if (!$dir) {
-		$dir = '.';
-	}
+    if (!$dir) {
+        $dir = '.';
+    }
 
-	// version installee par GIT
-	if (lire_fichier($dir . '/.git/HEAD', $c)) {
-		$currentHead = trim(substr($c, 4));
-		if (lire_fichier($dir . '/.git/' . $currentHead, $hash)) {
-			return [
-				'vcs' => 'GIT',
-				'branch' => basename($currentHead),
-				'commit' => trim($hash),
-				'commit_short' => substr(trim($hash), 0, 8),
-			];
-		}
-	}
+    // version installee par GIT
+    if (lire_fichier($dir . '/.git/HEAD', $c)) {
+        $currentHead = trim(substr($c, 4));
+        if (lire_fichier($dir . '/.git/' . $currentHead, $hash)) {
+            return [
+                'vcs' => 'GIT',
+                'branch' => basename($currentHead),
+                'commit' => trim($hash),
+                'commit_short' => substr(trim($hash), 0, 8),
+            ];
+        }
+    }
 
-	return null;
+    return null;
 }
 
 
@@ -278,25 +278,25 @@ 
  *      array ['commit' => yy, 'date' => xx, 'author' => xx] sinon.
  **/
 function decrire_version_svn($dir) {
-	if (!$dir) {
-		$dir = '.';
-	}
-	// version installee par SVN
-	if (file_exists($dir . '/.svn/wc.db') && class_exists(\SQLite3::class)) {
-		$db = new SQLite3($dir . '/.svn/wc.db');
-		$result = $db->query('SELECT changed_revision FROM nodes WHERE local_relpath = "" LIMIT 1');
-		if ($result) {
-			$row = $result->fetchArray();
-			if ($row['changed_revision'] != '') {
-				return [
-					'vcs' => 'SVN',
-					'branch' => '',
-					'commit' => $row['changed_revision'],
-				];
-			}
-		}
-	}
-	return null;
+    if (!$dir) {
+        $dir = '.';
+    }
+    // version installee par SVN
+    if (file_exists($dir . '/.svn/wc.db') && class_exists(\SQLite3::class)) {
+        $db = new SQLite3($dir . '/.svn/wc.db');
+        $result = $db->query('SELECT changed_revision FROM nodes WHERE local_relpath = "" LIMIT 1');
+        if ($result) {
+            $row = $result->fetchArray();
+            if ($row['changed_revision'] != '') {
+                return [
+                    'vcs' => 'SVN',
+                    'branch' => '',
+                    'commit' => $row['changed_revision'],
+                ];
+            }
+        }
+    }
+    return null;
 }
 
 // La matrice est necessaire pour ne filtrer _que_ des fonctions definies dans filtres_images
@@ -343,18 +343,18 @@ 
  *     Code HTML retourné par le filtre
  **/
 function filtrer($filtre) {
-	$tous = func_get_args();
-	if (trouver_filtre_matrice($filtre) and substr($filtre, 0, 6) == 'image_') {
-		return image_filtrer($tous);
-	} elseif ($f = chercher_filtre($filtre)) {
-		array_shift($tous);
-		return $f(...$tous);
-	} else {
-		// le filtre n'existe pas, on provoque une erreur
-		$msg = ['zbug_erreur_filtre', ['filtre' => texte_script($filtre)]];
-		erreur_squelette($msg);
-		return '';
-	}
+    $tous = func_get_args();
+    if (trouver_filtre_matrice($filtre) and substr($filtre, 0, 6) == 'image_') {
+        return image_filtrer($tous);
+    } elseif ($f = chercher_filtre($filtre)) {
+        array_shift($tous);
+        return $f(...$tous);
+    } else {
+        // le filtre n'existe pas, on provoque une erreur
+        $msg = ['zbug_erreur_filtre', ['filtre' => texte_script($filtre)]];
+        erreur_squelette($msg);
+        return '';
+    }
 }
 
 /**
@@ -371,11 +371,11 @@ 
  * @return bool true si on trouve le filtre dans la matrice, false sinon.
  */
 function trouver_filtre_matrice($filtre) {
-	if (isset($GLOBALS['spip_matrice'][$filtre]) and is_string($f = $GLOBALS['spip_matrice'][$filtre])) {
-		find_in_path($f, '', true);
-		$GLOBALS['spip_matrice'][$filtre] = true;
-	}
-	return !empty($GLOBALS['spip_matrice'][$filtre]);
+    if (isset($GLOBALS['spip_matrice'][$filtre]) and is_string($f = $GLOBALS['spip_matrice'][$filtre])) {
+        find_in_path($f, '', true);
+        $GLOBALS['spip_matrice'][$filtre] = true;
+    }
+    return !empty($GLOBALS['spip_matrice'][$filtre]);
 }
 
 
@@ -403,8 +403,8 @@ 
  * @return mixed
  */
 function filtre_set(&$Pile, $val, $key, $continue = null) {
-	$Pile['vars'][$key] = $val;
-	return $continue ? $val : '';
+    $Pile['vars'][$key] = $val;
+    return $continue ? $val : '';
 }
 
 /**
@@ -430,8 +430,8 @@ 
  * @return string|mixed Retourne `$val` si `$continue` présent, sinon ''.
  */
 function filtre_setenv(&$Pile, $val, $key, $continue = null) {
-	$Pile[0][$key] = $val;
-	return $continue ? $val : '';
+    $Pile[0][$key] = $val;
+    return $continue ? $val : '';
 }
 
 /**
@@ -440,8 +440,8 @@ 
  * @return string
  */
 function filtre_sanitize_env(&$Pile, $keys) {
-	$Pile[0] = spip_sanitize_from_request($Pile[0], $keys);
-	return '';
+    $Pile[0] = spip_sanitize_from_request($Pile[0], $keys);
+    return '';
 }
 
 
@@ -464,18 +464,18 @@ 
  * @return mixed Retourne la valeur (sans la modifier).
  */
 function filtre_debug($val, $key = null) {
-	$debug = (
-		is_null($key) ? '' : (var_export($key, true) . ' = ')
-		) . var_export($val, true);
+    $debug = (
+        is_null($key) ? '' : (var_export($key, true) . ' = ')
+        ) . var_export($val, true);
 
-	include_spip('inc/autoriser');
-	if (autoriser('webmestre')) {
-		echo "<div class='spip_debug'>\n", $debug, "</div>\n";
-	}
+    include_spip('inc/autoriser');
+    if (autoriser('webmestre')) {
+        echo "<div class='spip_debug'>\n", $debug, "</div>\n";
+    }
 
-	spip_log($debug, 'debug');
+    spip_log($debug, 'debug');
 
-	return $val;
+    return $val;
 }
 
 
@@ -505,84 +505,84 @@ 
  *     Texte qui a reçu les filtres
  **/
 function image_filtrer($args) {
-	$filtre = array_shift($args); # enlever $filtre
-	$texte = array_shift($args);
-	if ($texte === null || !strlen($texte)) {
-		return '';
-	}
-	find_in_path('filtres_images_mini.php', 'inc/', true);
-	statut_effacer_images_temporaires(true); // activer la suppression des images temporaires car le compilo finit la chaine par un image_graver
-	// Cas du nom de fichier local
-	$is_file = trim($texte);
-	if (
-		strpos(substr($is_file, strlen(_DIR_RACINE)), '..') !== false
-		  or strpbrk($is_file, "<>\n\r\t") !== false
-		  or strpos($is_file, '/') === 0
-	) {
-		$is_file = false;
-	}
-	if ($is_file) {
-		$is_local_file = function ($path) {
-			if (strpos($path, '?') !== false) {
-				$path = supprimer_timestamp($path);
-				// remove ?24px added by find_in_theme on .svg files
-				$path = preg_replace(',\?[[:digit:]]+(px)$,', '', $path);
-			}
-			return file_exists($path);
-		};
-		if ($is_local_file($is_file) or tester_url_absolue($is_file)) {
-			$res = $filtre("<img src='$is_file' />", ...$args);
-			statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
-			return $res;
-		}
-	}
-
-	// Cas general : trier toutes les images, avec eventuellement leur <span>
-	if (
-		preg_match_all(
-			',(<([a-z]+) [^<>]*spip_documents[^<>]*>)?\s*(<img\s.*>),UimsS',
-			$texte,
-			$tags,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($tags as $tag) {
-			$class = extraire_attribut($tag[3], 'class');
-			if (
-				!$class or
-				(strpos($class, 'filtre_inactif') === false
-					// compat historique a virer en 3.2
-					and strpos($class, 'no_image_filtrer') === false)
-			) {
-				if ($reduit = $filtre($tag[3], ...$args)) {
-					// En cas de span spip_documents, modifier le style=...width:
-					if ($tag[1]) {
-						$w = extraire_attribut($reduit, 'width');
-						if (!$w and preg_match(',width:\s*(\d+)px,S', extraire_attribut($reduit, 'style'), $regs)) {
-							$w = $regs[1];
-						}
-						if ($w and ($style = extraire_attribut($tag[1], 'style'))) {
-							$style = preg_replace(',width:\s*\d+px,S', "width:{$w}px", $style);
-							$replace = inserer_attribut($tag[1], 'style', $style);
-							$texte = str_replace($tag[1], $replace, $texte);
-						}
-					}
-					// traiter aussi un eventuel mouseover
-					if ($mouseover = extraire_attribut($reduit, 'onmouseover')) {
-						if (preg_match(",this[.]src=['\"]([^'\"]+)['\"],ims", $mouseover, $match)) {
-							$srcover = $match[1];
-							$srcover_filter = $filtre("<img src='" . $match[1] . "' />", ...$args);
-							$srcover_filter = extraire_attribut($srcover_filter, 'src');
-							$reduit = str_replace($srcover, $srcover_filter, $reduit);
-						}
-					}
-					$texte = str_replace($tag[3], $reduit, $texte);
-				}
-			}
-		}
-	}
-	statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
-	return $texte;
+    $filtre = array_shift($args); # enlever $filtre
+    $texte = array_shift($args);
+    if ($texte === null || !strlen($texte)) {
+        return '';
+    }
+    find_in_path('filtres_images_mini.php', 'inc/', true);
+    statut_effacer_images_temporaires(true); // activer la suppression des images temporaires car le compilo finit la chaine par un image_graver
+    // Cas du nom de fichier local
+    $is_file = trim($texte);
+    if (
+        strpos(substr($is_file, strlen(_DIR_RACINE)), '..') !== false
+          or strpbrk($is_file, "<>\n\r\t") !== false
+          or strpos($is_file, '/') === 0
+    ) {
+        $is_file = false;
+    }
+    if ($is_file) {
+        $is_local_file = function ($path) {
+            if (strpos($path, '?') !== false) {
+                $path = supprimer_timestamp($path);
+                // remove ?24px added by find_in_theme on .svg files
+                $path = preg_replace(',\?[[:digit:]]+(px)$,', '', $path);
+            }
+            return file_exists($path);
+        };
+        if ($is_local_file($is_file) or tester_url_absolue($is_file)) {
+            $res = $filtre("<img src='$is_file' />", ...$args);
+            statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
+            return $res;
+        }
+    }
+
+    // Cas general : trier toutes les images, avec eventuellement leur <span>
+    if (
+        preg_match_all(
+            ',(<([a-z]+) [^<>]*spip_documents[^<>]*>)?\s*(<img\s.*>),UimsS',
+            $texte,
+            $tags,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($tags as $tag) {
+            $class = extraire_attribut($tag[3], 'class');
+            if (
+                !$class or
+                (strpos($class, 'filtre_inactif') === false
+                    // compat historique a virer en 3.2
+                    and strpos($class, 'no_image_filtrer') === false)
+            ) {
+                if ($reduit = $filtre($tag[3], ...$args)) {
+                    // En cas de span spip_documents, modifier le style=...width:
+                    if ($tag[1]) {
+                        $w = extraire_attribut($reduit, 'width');
+                        if (!$w and preg_match(',width:\s*(\d+)px,S', extraire_attribut($reduit, 'style'), $regs)) {
+                            $w = $regs[1];
+                        }
+                        if ($w and ($style = extraire_attribut($tag[1], 'style'))) {
+                            $style = preg_replace(',width:\s*\d+px,S', "width:{$w}px", $style);
+                            $replace = inserer_attribut($tag[1], 'style', $style);
+                            $texte = str_replace($tag[1], $replace, $texte);
+                        }
+                    }
+                    // traiter aussi un eventuel mouseover
+                    if ($mouseover = extraire_attribut($reduit, 'onmouseover')) {
+                        if (preg_match(",this[.]src=['\"]([^'\"]+)['\"],ims", $mouseover, $match)) {
+                            $srcover = $match[1];
+                            $srcover_filter = $filtre("<img src='" . $match[1] . "' />", ...$args);
+                            $srcover_filter = extraire_attribut($srcover_filter, 'src');
+                            $reduit = str_replace($srcover, $srcover_filter, $reduit);
+                        }
+                    }
+                    $texte = str_replace($tag[3], $reduit, $texte);
+                }
+            }
+        }
+    }
+    statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
+    return $texte;
 }
 
 /**
@@ -599,91 +599,91 @@ 
  **/
 function infos_image($img, $force_refresh = false) {
 
-	static $largeur_img = [], $hauteur_img = [], $poids_img = [];
-	$srcWidth = 0;
-	$srcHeight = 0;
-	$srcSize = null;
-
-	$src = extraire_attribut($img, 'src');
-
-	if (!$src) {
-		$src = $img;
-	} else {
-		$srcWidth = extraire_attribut($img, 'width');
-		$srcHeight = extraire_attribut($img, 'height');
-	}
-
-	// ne jamais operer directement sur une image distante pour des raisons de perfo
-	// la copie locale a toutes les chances d'etre la ou de resservir
-	if (tester_url_absolue($src)) {
-		include_spip('inc/distant');
-		$fichier = copie_locale($src);
-		$src = $fichier ? _DIR_RACINE . $fichier : $src;
-	}
-	if (($p = strpos($src, '?')) !== false) {
-		$src = substr($src, 0, $p);
-	}
-
-	$imagesize = false;
-	if (isset($largeur_img[$src]) and !$force_refresh) {
-		$srcWidth = $largeur_img[$src];
-	}
-	if (isset($hauteur_img[$src]) and !$force_refresh) {
-		$srcHeight = $hauteur_img[$src];
-	}
-	if (isset($poids_img[$src]) and !$force_refresh) {
-		$srcSize = $poids_img[$src];
-	}
-	if (!$srcWidth or !$srcHeight or is_null($srcSize)) {
-		if (
-			file_exists($src)
-			and $imagesize = spip_getimagesize($src)
-		) {
-			if (!$srcWidth) {
-				$largeur_img[$src] = $srcWidth = $imagesize[0];
-			}
-			if (!$srcHeight) {
-				$hauteur_img[$src] = $srcHeight = $imagesize[1];
-			}
-			if (!$srcSize) {
-				$poids_img[$src] = filesize($src);
-			}
-		}
-		elseif (strpos($src, '<svg') !== false) {
-			include_spip('inc/svg');
-			if ($attrs = svg_lire_attributs($src)) {
-				[$width, $height, $viewbox] = svg_getimagesize_from_attr($attrs);
-				if (!$srcWidth) {
-					$largeur_img[$src] = $srcWidth = $width;
-				}
-				if (!$srcHeight) {
-					$hauteur_img[$src] = $srcHeight = $height;
-				}
-				if (!$srcSize) {
-					$poids_img[$src] = $srcSize = strlen($src);
-				}
-			}
-		}
-		// $src peut etre une reference a une image temporaire dont a n'a que le log .src
-		// on s'y refere, l'image sera reconstruite en temps utile si necessaire
-		elseif (
-			@file_exists($f = "$src.src")
-			and lire_fichier($f, $valeurs)
-			and $valeurs = unserialize($valeurs)
-		) {
-			if (!$srcWidth) {
-				$largeur_img[$src] = $srcWidth = $valeurs['largeur_dest'];
-			}
-			if (!$srcHeight) {
-				$hauteur_img[$src] = $srcHeight = $valeurs['hauteur_dest'];
-			}
-			if (!$srcSize) {
-				$poids_img[$src] = $srcSize = 0;
-			}
-		}
-	}
-
-	return ['hauteur' => $srcHeight, 'largeur' => $srcWidth, 'poids' => $srcSize];
+    static $largeur_img = [], $hauteur_img = [], $poids_img = [];
+    $srcWidth = 0;
+    $srcHeight = 0;
+    $srcSize = null;
+
+    $src = extraire_attribut($img, 'src');
+
+    if (!$src) {
+        $src = $img;
+    } else {
+        $srcWidth = extraire_attribut($img, 'width');
+        $srcHeight = extraire_attribut($img, 'height');
+    }
+
+    // ne jamais operer directement sur une image distante pour des raisons de perfo
+    // la copie locale a toutes les chances d'etre la ou de resservir
+    if (tester_url_absolue($src)) {
+        include_spip('inc/distant');
+        $fichier = copie_locale($src);
+        $src = $fichier ? _DIR_RACINE . $fichier : $src;
+    }
+    if (($p = strpos($src, '?')) !== false) {
+        $src = substr($src, 0, $p);
+    }
+
+    $imagesize = false;
+    if (isset($largeur_img[$src]) and !$force_refresh) {
+        $srcWidth = $largeur_img[$src];
+    }
+    if (isset($hauteur_img[$src]) and !$force_refresh) {
+        $srcHeight = $hauteur_img[$src];
+    }
+    if (isset($poids_img[$src]) and !$force_refresh) {
+        $srcSize = $poids_img[$src];
+    }
+    if (!$srcWidth or !$srcHeight or is_null($srcSize)) {
+        if (
+            file_exists($src)
+            and $imagesize = spip_getimagesize($src)
+        ) {
+            if (!$srcWidth) {
+                $largeur_img[$src] = $srcWidth = $imagesize[0];
+            }
+            if (!$srcHeight) {
+                $hauteur_img[$src] = $srcHeight = $imagesize[1];
+            }
+            if (!$srcSize) {
+                $poids_img[$src] = filesize($src);
+            }
+        }
+        elseif (strpos($src, '<svg') !== false) {
+            include_spip('inc/svg');
+            if ($attrs = svg_lire_attributs($src)) {
+                [$width, $height, $viewbox] = svg_getimagesize_from_attr($attrs);
+                if (!$srcWidth) {
+                    $largeur_img[$src] = $srcWidth = $width;
+                }
+                if (!$srcHeight) {
+                    $hauteur_img[$src] = $srcHeight = $height;
+                }
+                if (!$srcSize) {
+                    $poids_img[$src] = $srcSize = strlen($src);
+                }
+            }
+        }
+        // $src peut etre une reference a une image temporaire dont a n'a que le log .src
+        // on s'y refere, l'image sera reconstruite en temps utile si necessaire
+        elseif (
+            @file_exists($f = "$src.src")
+            and lire_fichier($f, $valeurs)
+            and $valeurs = unserialize($valeurs)
+        ) {
+            if (!$srcWidth) {
+                $largeur_img[$src] = $srcWidth = $valeurs['largeur_dest'];
+            }
+            if (!$srcHeight) {
+                $hauteur_img[$src] = $srcHeight = $valeurs['hauteur_dest'];
+            }
+            if (!$srcSize) {
+                $poids_img[$src] = $srcSize = 0;
+            }
+        }
+    }
+
+    return ['hauteur' => $srcHeight, 'largeur' => $srcWidth, 'poids' => $srcSize];
 }
 
 /**
@@ -699,13 +699,13 @@ 
  *     poids
  **/
 function poids_image($img, $force_refresh = false) {
-	$infos = infos_image($img, $force_refresh);
-	return $infos['poids'];
+    $infos = infos_image($img, $force_refresh);
+    return $infos['poids'];
 }
 
 function taille_image($img, $force_refresh = false) {
-	$infos = infos_image($img, $force_refresh);
-	return [$infos['hauteur'], $infos['largeur']];
+    $infos = infos_image($img, $force_refresh);
+    return [$infos['hauteur'], $infos['largeur']];
 }
 
 /**
@@ -722,12 +722,12 @@ 
  *     Largeur en pixels, NULL ou 0 si aucune image.
  **/
 function largeur($img) {
-	if (!$img) {
-		return;
-	}
-	[$h, $l] = taille_image($img);
+    if (!$img) {
+        return;
+    }
+    [$h, $l] = taille_image($img);
 
-	return $l;
+    return $l;
 }
 
 /**
@@ -744,12 +744,12 @@ 
  *     Hauteur en pixels, NULL ou 0 si aucune image.
  **/
 function hauteur($img) {
-	if (!$img) {
-		return;
-	}
-	[$h, $l] = taille_image($img);
+    if (!$img) {
+        return;
+    }
+    [$h, $l] = taille_image($img);
 
-	return $h;
+    return $h;
 }
 
 
@@ -769,11 +769,11 @@ 
  * @return string
  **/
 function corriger_entites_html($texte) {
-	if (strpos($texte, '&amp;') === false) {
-		return $texte;
-	}
+    if (strpos($texte, '&amp;') === false) {
+        return $texte;
+    }
 
-	return preg_replace(',&amp;(#[0-9][0-9][0-9]+;|amp;),iS', '&\1', $texte);
+    return preg_replace(',&amp;(#[0-9][0-9][0-9]+;|amp;),iS', '&\1', $texte);
 }
 
 /**
@@ -788,11 +788,11 @@ 
  * @return string
  **/
 function corriger_toutes_entites_html($texte) {
-	if (strpos($texte, '&amp;') === false) {
-		return $texte;
-	}
+    if (strpos($texte, '&amp;') === false) {
+        return $texte;
+    }
 
-	return preg_replace(',&amp;(#?[a-z0-9]+;),iS', '&\1', $texte);
+    return preg_replace(',&amp;(#?[a-z0-9]+;),iS', '&\1', $texte);
 }
 
 /**
@@ -802,7 +802,7 @@ 
  * @return string
  **/
 function proteger_amp($texte) {
-	return str_replace('&', '&amp;', $texte);
+    return str_replace('&', '&amp;', $texte);
 }
 
 
@@ -833,21 +833,21 @@ 
  * @return mixed|string
  */
 function entites_html($texte, $tout = false, $quote = true) {
-	if (
-		!is_string($texte) or !$texte
-		or strpbrk($texte, "&\"'<>") == false
-	) {
-		return $texte;
-	}
-	include_spip('inc/texte');
-	$flags = ($quote ? ENT_QUOTES : ENT_NOQUOTES);
-	$flags |= ENT_HTML401;
-	$texte = spip_htmlspecialchars(echappe_retour(echappe_html($texte, '', true), '', 'proteger_amp'), $flags);
-	if ($tout) {
-		return corriger_toutes_entites_html($texte);
-	} else {
-		return corriger_entites_html($texte);
-	}
+    if (
+        !is_string($texte) or !$texte
+        or strpbrk($texte, "&\"'<>") == false
+    ) {
+        return $texte;
+    }
+    include_spip('inc/texte');
+    $flags = ($quote ? ENT_QUOTES : ENT_NOQUOTES);
+    $flags |= ENT_HTML401;
+    $texte = spip_htmlspecialchars(echappe_retour(echappe_html($texte, '', true), '', 'proteger_amp'), $flags);
+    if ($tout) {
+        return corriger_toutes_entites_html($texte);
+    } else {
+        return corriger_entites_html($texte);
+    }
 }
 
 /**
@@ -866,37 +866,37 @@ 
  *     Texte converti
  **/
 function filtrer_entites($texte) {
-	if (strpos($texte, '&') === false) {
-		return $texte;
-	}
-	// filtrer
-	$texte = html2unicode($texte);
-	// remettre le tout dans le charset cible
-	$texte = unicode2charset($texte);
-	// cas particulier des " et ' qu'il faut filtrer aussi
-	// (on le faisait deja avec un &quot;)
-	if (strpos($texte, '&#') !== false) {
-		$texte = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $texte);
-	}
+    if (strpos($texte, '&') === false) {
+        return $texte;
+    }
+    // filtrer
+    $texte = html2unicode($texte);
+    // remettre le tout dans le charset cible
+    $texte = unicode2charset($texte);
+    // cas particulier des " et ' qu'il faut filtrer aussi
+    // (on le faisait deja avec un &quot;)
+    if (strpos($texte, '&#') !== false) {
+        $texte = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
 if (!function_exists('filtre_filtrer_entites_dist')) {
-	/**
-	 * Version sécurisée de filtrer_entites
-	 *
-	 * @uses interdire_scripts()
-	 * @uses filtrer_entites()
-	 *
-	 * @param string $t
-	 * @return string
-	 */
-	function filtre_filtrer_entites_dist($t) {
-		include_spip('inc/texte');
-		return interdire_scripts(filtrer_entites($t));
-	}
+    /**
+     * Version sécurisée de filtrer_entites
+     *
+     * @uses interdire_scripts()
+     * @uses filtrer_entites()
+     *
+     * @param string $t
+     * @return string
+     */
+    function filtre_filtrer_entites_dist($t) {
+        include_spip('inc/texte');
+        return interdire_scripts(filtrer_entites($t));
+    }
 }
 
 
@@ -911,18 +911,18 @@ 
  * @return string|array
  **/
 function supprimer_caracteres_illegaux($texte) {
-	static $from = "\x0\x1\x2\x3\x4\x5\x6\x7\x8\xB\xC\xE\xF\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1A\x1B\x1C\x1D\x1E\x1F";
-	static $to = null;
+    static $from = "\x0\x1\x2\x3\x4\x5\x6\x7\x8\xB\xC\xE\xF\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1A\x1B\x1C\x1D\x1E\x1F";
+    static $to = null;
 
-	if (is_array($texte)) {
-		return array_map('supprimer_caracteres_illegaux', $texte);
-	}
+    if (is_array($texte)) {
+        return array_map('supprimer_caracteres_illegaux', $texte);
+    }
 
-	if (!$to) {
-		$to = str_repeat('-', strlen($from));
-	}
+    if (!$to) {
+        $to = str_repeat('-', strlen($from));
+    }
 
-	return strtr($texte, $from, $to);
+    return strtr($texte, $from, $to);
 }
 
 /**
@@ -934,10 +934,10 @@ 
  * @return string|array
  **/
 function corriger_caracteres($texte) {
-	$texte = corriger_caracteres_windows($texte);
-	$texte = supprimer_caracteres_illegaux($texte);
+    $texte = corriger_caracteres_windows($texte);
+    $texte = supprimer_caracteres_illegaux($texte);
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -954,44 +954,44 @@ 
  *     Texte encodé pour XML
  */
 function texte_backend(string $texte): string {
-	if ($texte === '') {
-		return '';
-	}
+    if ($texte === '') {
+        return '';
+    }
 
-	static $apostrophe = ['&#8217;', "'"]; # n'allouer qu'une fois
+    static $apostrophe = ['&#8217;', "'"]; # n'allouer qu'une fois
 
-	// si on a des liens ou des images, les passer en absolu
-	$texte = liens_absolus($texte);
+    // si on a des liens ou des images, les passer en absolu
+    $texte = liens_absolus($texte);
 
-	// echapper les tags &gt; &lt;
-	$texte = preg_replace(',&(gt|lt);,S', '&amp;\1;', $texte);
+    // echapper les tags &gt; &lt;
+    $texte = preg_replace(',&(gt|lt);,S', '&amp;\1;', $texte);
 
-	// importer les &eacute;
-	$texte = filtrer_entites($texte);
+    // importer les &eacute;
+    $texte = filtrer_entites($texte);
 
-	// " -> &quot; et tout ce genre de choses
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = str_replace('&nbsp;', ' ', $texte);
-	$texte = preg_replace('/\s{2,}/S' . $u, ' ', $texte);
-	// ne pas echapper les sinqle quotes car certains outils de syndication gerent mal
-	$texte = entites_html($texte, false, false);
-	// mais bien echapper les double quotes !
-	$texte = str_replace('"', '&#034;', $texte);
+    // " -> &quot; et tout ce genre de choses
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = str_replace('&nbsp;', ' ', $texte);
+    $texte = preg_replace('/\s{2,}/S' . $u, ' ', $texte);
+    // ne pas echapper les sinqle quotes car certains outils de syndication gerent mal
+    $texte = entites_html($texte, false, false);
+    // mais bien echapper les double quotes !
+    $texte = str_replace('"', '&#034;', $texte);
 
-	// verifier le charset
-	$texte = charset2unicode($texte);
+    // verifier le charset
+    $texte = charset2unicode($texte);
 
-	// Caracteres problematiques en iso-latin 1
-	if (isset($GLOBALS['meta']['charset']) and $GLOBALS['meta']['charset'] == 'iso-8859-1') {
-		$texte = str_replace(chr(156), '&#156;', $texte);
-		$texte = str_replace(chr(140), '&#140;', $texte);
-		$texte = str_replace(chr(159), '&#159;', $texte);
-	}
+    // Caracteres problematiques en iso-latin 1
+    if (isset($GLOBALS['meta']['charset']) and $GLOBALS['meta']['charset'] == 'iso-8859-1') {
+        $texte = str_replace(chr(156), '&#156;', $texte);
+        $texte = str_replace(chr(140), '&#140;', $texte);
+        $texte = str_replace(chr(159), '&#159;', $texte);
+    }
 
-	// l'apostrophe curly pose probleme a certains lecteure de RSS
-	// et le caractere apostrophe alourdit les squelettes avec PHP
-	// ==> on les remplace par l'entite HTML
-	return str_replace($apostrophe, "'", $texte);
+    // l'apostrophe curly pose probleme a certains lecteure de RSS
+    // et le caractere apostrophe alourdit les squelettes avec PHP
+    // ==> on les remplace par l'entite HTML
+    return str_replace($apostrophe, "'", $texte);
 }
 
 /**
@@ -1008,7 +1008,7 @@ 
  *     Texte encodé et quote pour XML
  */
 function texte_backendq(string $texte): string {
-	return addslashes(texte_backend($texte));
+    return addslashes(texte_backend($texte));
 }
 
 
@@ -1031,11 +1031,11 @@ 
  *     Numéro de titre, sinon chaîne vide
  **/
 function supprimer_numero($texte) {
-	return preg_replace(
-		',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
-		'',
-		$texte
-	);
+    return preg_replace(
+        ',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
+        '',
+        $texte
+    );
 }
 
 /**
@@ -1058,17 +1058,17 @@ 
  *     Numéro de titre, sinon chaîne vide
  **/
 function recuperer_numero($texte) {
-	if (
-		preg_match(
-			',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
-			$texte,
-			$regs
-		)
-	) {
-		return strval($regs[1]);
-	} else {
-		return '';
-	}
+    if (
+        preg_match(
+            ',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
+            $texte,
+            $regs
+        )
+    ) {
+        return strval($regs[1]);
+    } else {
+        return '';
+    }
 }
 
 /**
@@ -1095,16 +1095,16 @@ 
  *     Texte ou tableau de textes converti
  **/
 function supprimer_tags($texte, $rempl = '') {
-	if ($texte === null) {
-		return '';
-	}
-	$texte = preg_replace(',<(!--|\w|/|!\[endif|!\[if)[^>]*>,US', $rempl, $texte);
-	// ne pas oublier un < final non ferme car coupe
-	$texte = preg_replace(',<(!--|\w|/).*$,US', $rempl, $texte);
-	// mais qui peut aussi etre un simple signe plus petit que
-	$texte = str_replace('<', '&lt;', $texte);
+    if ($texte === null) {
+        return '';
+    }
+    $texte = preg_replace(',<(!--|\w|/|!\[endif|!\[if)[^>]*>,US', $rempl, $texte);
+    // ne pas oublier un < final non ferme car coupe
+    $texte = preg_replace(',<(!--|\w|/).*$,US', $rempl, $texte);
+    // mais qui peut aussi etre un simple signe plus petit que
+    $texte = str_replace('<', '&lt;', $texte);
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -1127,9 +1127,9 @@ 
  *     Texte converti
  **/
 function echapper_tags($texte, $rempl = '') {
-	$texte = preg_replace('/<([^>]*)>/', "&lt;\\1&gt;", $texte);
+    $texte = preg_replace('/<([^>]*)>/', "&lt;\\1&gt;", $texte);
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -1150,18 +1150,18 @@ 
  *     Texte converti
  **/
 function textebrut($texte) {
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = preg_replace('/\s+/S' . $u, ' ', $texte);
-	$texte = preg_replace('/<(p|br)( [^>]*)?' . '>/iS', "\n\n", $texte);
-	$texte = preg_replace("/^\n+/", '', $texte);
-	$texte = preg_replace("/\n+$/", '', $texte);
-	$texte = preg_replace("/\n +/", "\n", $texte);
-	$texte = supprimer_tags($texte);
-	$texte = preg_replace('/(&nbsp;| )+/S', ' ', $texte);
-	// nettoyer l'apostrophe curly qui pose probleme a certains rss-readers, lecteurs de mail...
-	$texte = str_replace('&#8217;', "'", $texte);
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = preg_replace('/\s+/S' . $u, ' ', $texte);
+    $texte = preg_replace('/<(p|br)( [^>]*)?' . '>/iS', "\n\n", $texte);
+    $texte = preg_replace("/^\n+/", '', $texte);
+    $texte = preg_replace("/\n+$/", '', $texte);
+    $texte = preg_replace("/\n +/", "\n", $texte);
+    $texte = supprimer_tags($texte);
+    $texte = preg_replace('/(&nbsp;| )+/S', ' ', $texte);
+    // nettoyer l'apostrophe curly qui pose probleme a certains rss-readers, lecteurs de mail...
+    $texte = str_replace('&#8217;', "'", $texte);
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -1177,23 +1177,23 @@ 
  *     Texte avec liens ouvrants
  **/
 function liens_ouvrants($texte) {
-	if (
-		preg_match_all(
-			",(<a\s+[^>]*https?://[^>]*class=[\"']spip_(out|url)\b[^>]+>),imsS",
-			$texte,
-			$liens,
-			PREG_PATTERN_ORDER
-		)
-	) {
-		foreach ($liens[0] as $a) {
-			$rel = 'noopener noreferrer ' . extraire_attribut($a, 'rel');
-			$ablank = inserer_attribut($a, 'rel', $rel);
-			$ablank = inserer_attribut($ablank, 'target', '_blank');
-			$texte = str_replace($a, $ablank, $texte);
-		}
-	}
-
-	return $texte;
+    if (
+        preg_match_all(
+            ",(<a\s+[^>]*https?://[^>]*class=[\"']spip_(out|url)\b[^>]+>),imsS",
+            $texte,
+            $liens,
+            PREG_PATTERN_ORDER
+        )
+    ) {
+        foreach ($liens[0] as $a) {
+            $rel = 'noopener noreferrer ' . extraire_attribut($a, 'rel');
+            $ablank = inserer_attribut($a, 'rel', $rel);
+            $ablank = inserer_attribut($ablank, 'target', '_blank');
+            $texte = str_replace($a, $ablank, $texte);
+        }
+    }
+
+    return $texte;
 }
 
 /**
@@ -1203,22 +1203,22 @@ 
  * @return string
  */
 function liens_nofollow($texte) {
-	if (stripos($texte, '<a') === false) {
-		return $texte;
-	}
+    if (stripos($texte, '<a') === false) {
+        return $texte;
+    }
 
-	if (preg_match_all(",<a\b[^>]*>,UimsS", $texte, $regs, PREG_PATTERN_ORDER)) {
-		foreach ($regs[0] as $a) {
-			$rel = extraire_attribut($a, 'rel') ?? '';
-			if (strpos($rel, 'nofollow') === false) {
-				$rel = 'nofollow' . ($rel ? " $rel" : '');
-				$anofollow = inserer_attribut($a, 'rel', $rel);
-				$texte = str_replace($a, $anofollow, $texte);
-			}
-		}
-	}
+    if (preg_match_all(",<a\b[^>]*>,UimsS", $texte, $regs, PREG_PATTERN_ORDER)) {
+        foreach ($regs[0] as $a) {
+            $rel = extraire_attribut($a, 'rel') ?? '';
+            if (strpos($rel, 'nofollow') === false) {
+                $rel = 'nofollow' . ($rel ? " $rel" : '');
+                $anofollow = inserer_attribut($a, 'rel', $rel);
+                $texte = str_replace($a, $anofollow, $texte);
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -1237,12 +1237,12 @@ 
  *     Texte sans paraghaphes
  **/
 function PtoBR($texte) {
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = preg_replace('@</p>@iS', "\n", $texte);
-	$texte = preg_replace("@<p\b.*>@UiS", '<br />', $texte);
-	$texte = preg_replace('@^\s*<br />@S' . $u, '', $texte);
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = preg_replace('@</p>@iS', "\n", $texte);
+    $texte = preg_replace("@<p\b.*>@UiS", '<br />', $texte);
+    $texte = preg_replace('@^\s*<br />@S' . $u, '', $texte);
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -1267,14 +1267,14 @@ 
  * @return string Texte encadré du style CSS
  */
 function lignes_longues($texte) {
-	if (!strlen(trim($texte))) {
-		return $texte;
-	}
-	include_spip('inc/texte');
-	$tag = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $texte) ?
-		'div' : 'span';
+    if (!strlen(trim($texte))) {
+        return $texte;
+    }
+    include_spip('inc/texte');
+    $tag = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $texte) ?
+        'div' : 'span';
 
-	return "<$tag style='word-wrap:break-word;'>$texte</$tag>";
+    return "<$tag style='word-wrap:break-word;'>$texte</$tag>";
 }
 
 /**
@@ -1293,30 +1293,30 @@ 
  * @return string Texte en majuscule
  */
 function majuscules($texte) {
-	if (!strlen($texte)) {
-		return '';
-	}
+    if (!strlen($texte)) {
+        return '';
+    }
 
-	// Cas du turc
-	if ($GLOBALS['spip_lang'] == 'tr') {
-		# remplacer hors des tags et des entites
-		if (preg_match_all(',<[^<>]+>|&[^;]+;,S', $texte, $regs, PREG_SET_ORDER)) {
-			foreach ($regs as $n => $match) {
-				$texte = str_replace($match[0], "@@SPIP_TURC$n@@", $texte);
-			}
-		}
+    // Cas du turc
+    if ($GLOBALS['spip_lang'] == 'tr') {
+        # remplacer hors des tags et des entites
+        if (preg_match_all(',<[^<>]+>|&[^;]+;,S', $texte, $regs, PREG_SET_ORDER)) {
+            foreach ($regs as $n => $match) {
+                $texte = str_replace($match[0], "@@SPIP_TURC$n@@", $texte);
+            }
+        }
 
-		$texte = str_replace('i', '&#304;', $texte);
+        $texte = str_replace('i', '&#304;', $texte);
 
-		if ($regs) {
-			foreach ($regs as $n => $match) {
-				$texte = str_replace("@@SPIP_TURC$n@@", $match[0], $texte);
-			}
-		}
-	}
+        if ($regs) {
+            foreach ($regs as $n => $match) {
+                $texte = str_replace("@@SPIP_TURC$n@@", $match[0], $texte);
+            }
+        }
+    }
 
-	// Cas general
-	return "<span style='text-transform: uppercase;'>$texte</span>";
+    // Cas general
+    return "<span style='text-transform: uppercase;'>$texte</span>";
 }
 
 /**
@@ -1334,29 +1334,29 @@ 
  * @return string
  **/
 function taille_en_octets($taille) {
-	if (!defined('_KILOBYTE')) {
-		/**
-		 * Définit le nombre d'octets dans un Kilobyte
-		 *
-		 * @var int
-		 **/
-		define('_KILOBYTE', 1024);
-	}
+    if (!defined('_KILOBYTE')) {
+        /**
+         * Définit le nombre d'octets dans un Kilobyte
+         *
+         * @var int
+         **/
+        define('_KILOBYTE', 1024);
+    }
 
-	if ($taille < 1) {
-		return '';
-	}
-	if ($taille < _KILOBYTE) {
-		$taille = _T('taille_octets', ['taille' => $taille]);
-	} elseif ($taille < _KILOBYTE * _KILOBYTE) {
-		$taille = _T('taille_ko', ['taille' => round($taille / _KILOBYTE, 1)]);
-	} elseif ($taille < _KILOBYTE * _KILOBYTE * _KILOBYTE) {
-		$taille = _T('taille_mo', ['taille' => round($taille / _KILOBYTE / _KILOBYTE, 1)]);
-	} else {
-		$taille = _T('taille_go', ['taille' => round($taille / _KILOBYTE / _KILOBYTE / _KILOBYTE, 2)]);
-	}
+    if ($taille < 1) {
+        return '';
+    }
+    if ($taille < _KILOBYTE) {
+        $taille = _T('taille_octets', ['taille' => $taille]);
+    } elseif ($taille < _KILOBYTE * _KILOBYTE) {
+        $taille = _T('taille_ko', ['taille' => round($taille / _KILOBYTE, 1)]);
+    } elseif ($taille < _KILOBYTE * _KILOBYTE * _KILOBYTE) {
+        $taille = _T('taille_mo', ['taille' => round($taille / _KILOBYTE / _KILOBYTE, 1)]);
+    } else {
+        $taille = _T('taille_go', ['taille' => round($taille / _KILOBYTE / _KILOBYTE / _KILOBYTE, 2)]);
+    }
 
-	return $taille;
+    return $taille;
 }
 
 
@@ -1378,21 +1378,21 @@ 
  *     Texte prêt pour être utilisé en attribut HTML
  **/
 function attribut_html(?string $texte, $textebrut = true): string {
-	if ($texte === null) {
-		return '';
-	}
-	$u = $GLOBALS['meta']['pcre_u'];
-	if ($textebrut) {
-		$texte = preg_replace([",\n,", ',\s(?=\s),msS' . $u], [' ', ''], textebrut($texte));
-	}
-	$texte = texte_backend($texte);
-	$texte = str_replace(["'", '"'], ['&#039;', '&#034;'], $texte);
+    if ($texte === null) {
+        return '';
+    }
+    $u = $GLOBALS['meta']['pcre_u'];
+    if ($textebrut) {
+        $texte = preg_replace([",\n,", ',\s(?=\s),msS' . $u], [' ', ''], textebrut($texte));
+    }
+    $texte = texte_backend($texte);
+    $texte = str_replace(["'", '"'], ['&#039;', '&#034;'], $texte);
 
-	return preg_replace(
-		['/&(amp;|#38;)/', '/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,5};)/'],
-		['&', '&#38;'],
-		$texte
-	);
+    return preg_replace(
+        ['/&(amp;|#38;)/', '/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,5};)/'],
+        ['&', '&#38;'],
+        $texte
+    );
 }
 
 
@@ -1412,15 +1412,15 @@ 
  *     URL ou chaîne vide
  **/
 function vider_url(?string $url, $entites = true): string {
-	if ($url === null) {
-		return '';
-	}
-	# un message pour abs_url
-	$GLOBALS['mode_abs_url'] = 'url';
-	$url = trim($url);
-	$r = ',^(?:' . _PROTOCOLES_STD . '):?/?/?$,iS';
+    if ($url === null) {
+        return '';
+    }
+    # un message pour abs_url
+    $GLOBALS['mode_abs_url'] = 'url';
+    $url = trim($url);
+    $r = ',^(?:' . _PROTOCOLES_STD . '):?/?/?$,iS';
 
-	return preg_match($r, $url) ? '' : ($entites ? entites_html($url) : $url);
+    return preg_match($r, $url) ? '' : ($entites ? entites_html($url) : $url);
 }
 
 
@@ -1435,10 +1435,10 @@ 
  * @return string Adresse email maquillée
  **/
 function antispam($texte) {
-	include_spip('inc/acces');
-	$masque = creer_pass_aleatoire(3);
+    include_spip('inc/acces');
+    $masque = creer_pass_aleatoire(3);
 
-	return preg_replace('/@/', " $masque ", $texte);
+    return preg_replace('/@/', " $masque ", $texte);
 }
 
 /**
@@ -1470,8 +1470,8 @@ 
  *     True si on a le droit d'accès, false sinon.
  **/
 function filtre_securiser_acces_dist($id_auteur, $cle, $dir, $op = '', $args = '') {
-	include_spip('inc/acces');
-	return securiser_acces_low_sec($id_auteur, $cle, $op ? "$dir $op $args" : $dir);
+    include_spip('inc/acces');
+    return securiser_acces_low_sec($id_auteur, $cle, $op ? "$dir $op $args" : $dir);
 }
 
 /**
@@ -1496,13 +1496,13 @@ 
  *     Retourne $texte, sinon $sinon.
  **/
 function sinon($texte, $sinon = '') {
-	if ($texte) {
-		return $texte;
-	} elseif (is_scalar($texte) and strlen($texte)) {
-		return $texte;
-	} else {
-		return $sinon;
-	}
+    if ($texte) {
+        return $texte;
+    } elseif (is_scalar($texte) and strlen($texte)) {
+        return $texte;
+    } else {
+        return $sinon;
+    }
 }
 
 /**
@@ -1526,7 +1526,7 @@ 
  * @return mixed
  **/
 function choixsivide($a, $vide, $pasvide) {
-	return $a ? $pasvide : $vide;
+    return $a ? $pasvide : $vide;
 }
 
 /**
@@ -1550,7 +1550,7 @@ 
  * @return mixed
  **/
 function choixsiegal($a1, $a2, $v, $f) {
-	return ($a1 == $a2) ? $v : $f;
+    return ($a1 == $a2) ? $v : $f;
 }
 
 //
@@ -1569,13 +1569,13 @@ 
  * @return string
  **/
 function filtrer_ical($texte) {
-	#include_spip('inc/charsets');
-	$texte = html2unicode($texte);
-	$texte = unicode2charset(charset2unicode($texte, $GLOBALS['meta']['charset']), 'utf-8');
-	$texte = preg_replace("/\n/", ' ', $texte);
-	$texte = preg_replace('/,/', '\,', $texte);
+    #include_spip('inc/charsets');
+    $texte = html2unicode($texte);
+    $texte = unicode2charset(charset2unicode($texte, $GLOBALS['meta']['charset']), 'utf-8');
+    $texte = preg_replace("/\n/", ' ', $texte);
+    $texte = preg_replace('/,/', '\,', $texte);
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -1600,54 +1600,54 @@ 
  * @return string
  **/
 function post_autobr($texte, $delim = "\n_ ") {
-	if (!function_exists('echappe_html')) {
-		include_spip('inc/texte_mini');
-	}
-	$texte = str_replace("\r\n", "\r", $texte);
-	$texte = str_replace("\r", "\n", $texte);
-
-	if (preg_match(",\n+$,", $texte, $fin)) {
-		$texte = substr($texte, 0, -strlen($fin = $fin[0]));
-	} else {
-		$fin = '';
-	}
-
-	$texte = echappe_html($texte, '', true);
-
-	// echapper les modeles
-	if (strpos($texte, '<') !== false) {
-		include_spip('inc/lien');
-		if (defined('_PREG_MODELE')) {
-			$preg_modeles = '@' . _PREG_MODELE . '@imsS';
-			$texte = echappe_html($texte, '', true, $preg_modeles);
-		}
-	}
-
-	$debut = '';
-	$suite = $texte;
-	while ($t = strpos('-' . $suite, "\n", 1)) {
-		$debut .= substr($suite, 0, $t - 1);
-		$suite = substr($suite, $t);
-		$car = substr($suite, 0, 1);
-		if (
-			($car <> '-') and ($car <> '_') and ($car <> "\n") and ($car <> '|') and ($car <> '}')
-			and !preg_match(',^\s*(\n|</?(quote|div|dl|dt|dd)|$),S', ($suite))
-			and !preg_match(',</?(quote|div|dl|dt|dd)> *$,iS', $debut)
-		) {
-			$debut .= $delim;
-		} else {
-			$debut .= "\n";
-		}
-		if (preg_match(",^\n+,", $suite, $regs)) {
-			$debut .= $regs[0];
-			$suite = substr($suite, strlen($regs[0]));
-		}
-	}
-	$texte = $debut . $suite;
-
-	$texte = echappe_retour($texte);
-
-	return $texte . $fin;
+    if (!function_exists('echappe_html')) {
+        include_spip('inc/texte_mini');
+    }
+    $texte = str_replace("\r\n", "\r", $texte);
+    $texte = str_replace("\r", "\n", $texte);
+
+    if (preg_match(",\n+$,", $texte, $fin)) {
+        $texte = substr($texte, 0, -strlen($fin = $fin[0]));
+    } else {
+        $fin = '';
+    }
+
+    $texte = echappe_html($texte, '', true);
+
+    // echapper les modeles
+    if (strpos($texte, '<') !== false) {
+        include_spip('inc/lien');
+        if (defined('_PREG_MODELE')) {
+            $preg_modeles = '@' . _PREG_MODELE . '@imsS';
+            $texte = echappe_html($texte, '', true, $preg_modeles);
+        }
+    }
+
+    $debut = '';
+    $suite = $texte;
+    while ($t = strpos('-' . $suite, "\n", 1)) {
+        $debut .= substr($suite, 0, $t - 1);
+        $suite = substr($suite, $t);
+        $car = substr($suite, 0, 1);
+        if (
+            ($car <> '-') and ($car <> '_') and ($car <> "\n") and ($car <> '|') and ($car <> '}')
+            and !preg_match(',^\s*(\n|</?(quote|div|dl|dt|dd)|$),S', ($suite))
+            and !preg_match(',</?(quote|div|dl|dt|dd)> *$,iS', $debut)
+        ) {
+            $debut .= $delim;
+        } else {
+            $debut .= "\n";
+        }
+        if (preg_match(",^\n+,", $suite, $regs)) {
+            $debut .= $regs[0];
+            $suite = substr($suite, strlen($regs[0]));
+        }
+    }
+    $texte = $debut . $suite;
+
+    $texte = echappe_retour($texte);
+
+    return $texte . $fin;
 }
 
 
@@ -1688,47 +1688,47 @@ 
  * @return string
  **/
 function extraire_idiome($letexte, $lang = null, $options = []) {
-	static $traduire = false;
-	if (
-		$letexte
-		and preg_match_all(_EXTRAIRE_IDIOME, $letexte, $regs, PREG_SET_ORDER)
-	) {
-		if (!$traduire) {
-			$traduire = charger_fonction('traduire', 'inc');
-			include_spip('inc/lang');
-		}
-		if (!$lang) {
-			$lang = $GLOBALS['spip_lang'];
-		}
-		// Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
-		if (is_bool($options)) {
-			$options = ['echappe_span' => $options];
-		}
-		if (!isset($options['echappe_span'])) {
-			$options = array_merge($options, ['echappe_span' => false]);
-		}
-
-		foreach ($regs as $reg) {
-			$cle = ($reg[1] ? $reg[1] . ':' : '') . $reg[2];
-			$desc = $traduire($cle, $lang, true);
-			$l = $desc->langue;
-			// si pas de traduction, on laissera l'écriture de l'idiome entier dans le texte.
-			if (strlen($desc->texte ?? '')) {
-				$trad = code_echappement($desc->texte, 'idiome', false);
-				if ($l !== $lang) {
-					$trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
-				}
-				if (lang_dir($l) !== lang_dir($lang)) {
-					$trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
-				}
-				if (!$options['echappe_span']) {
-					$trad = echappe_retour($trad, 'idiome');
-				}
-				$letexte = str_replace($reg[0], $trad, $letexte);
-			}
-		}
-	}
-	return $letexte;
+    static $traduire = false;
+    if (
+        $letexte
+        and preg_match_all(_EXTRAIRE_IDIOME, $letexte, $regs, PREG_SET_ORDER)
+    ) {
+        if (!$traduire) {
+            $traduire = charger_fonction('traduire', 'inc');
+            include_spip('inc/lang');
+        }
+        if (!$lang) {
+            $lang = $GLOBALS['spip_lang'];
+        }
+        // Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
+        if (is_bool($options)) {
+            $options = ['echappe_span' => $options];
+        }
+        if (!isset($options['echappe_span'])) {
+            $options = array_merge($options, ['echappe_span' => false]);
+        }
+
+        foreach ($regs as $reg) {
+            $cle = ($reg[1] ? $reg[1] . ':' : '') . $reg[2];
+            $desc = $traduire($cle, $lang, true);
+            $l = $desc->langue;
+            // si pas de traduction, on laissera l'écriture de l'idiome entier dans le texte.
+            if (strlen($desc->texte ?? '')) {
+                $trad = code_echappement($desc->texte, 'idiome', false);
+                if ($l !== $lang) {
+                    $trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
+                }
+                if (lang_dir($l) !== lang_dir($lang)) {
+                    $trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
+                }
+                if (!$options['echappe_span']) {
+                    $trad = echappe_retour($trad, 'idiome');
+                }
+                $letexte = str_replace($reg[0], $trad, $letexte);
+            }
+        }
+    }
+    return $letexte;
 }
 
 /**
@@ -1780,68 +1780,68 @@ 
  **/
 function extraire_multi($letexte, $lang = null, $options = []) {
 
-	if (
-		$letexte
-		and preg_match_all(_EXTRAIRE_MULTI, $letexte, $regs, PREG_SET_ORDER)
-	) {
-		if (!$lang) {
-			$lang = $GLOBALS['spip_lang'];
-		}
-
-		// Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
-		if (is_bool($options)) {
-			$options = ['echappe_span' => $options, 'lang_defaut' => _LANGUE_PAR_DEFAUT];
-		}
-		if (!isset($options['echappe_span'])) {
-			$options = array_merge($options, ['echappe_span' => false]);
-		}
-		if (!isset($options['lang_defaut'])) {
-			$options = array_merge($options, ['lang_defaut' => _LANGUE_PAR_DEFAUT]);
-		}
-
-		include_spip('inc/lang');
-		foreach ($regs as $reg) {
-			// chercher la version de la langue courante
-			$trads = extraire_trads($reg[1]);
-			if ($l = approcher_langue($trads, $lang)) {
-				$trad = $trads[$l];
-			} else {
-				if ($options['lang_defaut'] == 'aucune') {
-					$trad = '';
-				} else {
-					// langue absente, prendre le fr ou une langue précisée (meme comportement que inc/traduire.php)
-					// ou la premiere dispo
-					// mais typographier le texte selon les regles de celle-ci
-					// Attention aux blocs multi sur plusieurs lignes
-					if (!$l = approcher_langue($trads, $options['lang_defaut'])) {
-						$l = key($trads);
-					}
-					$trad = $trads[$l];
-					$typographie = charger_fonction(lang_typo($l), 'typographie');
-					$trad = $typographie($trad);
-					// Tester si on echappe en span ou en div
-					// il ne faut pas echapper en div si propre produit un seul paragraphe
-					include_spip('inc/texte');
-					$trad_propre = preg_replace(',(^<p[^>]*>|</p>$),Uims', '', propre($trad));
-					$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $trad_propre) ? 'div' : 'span';
-					if ($mode === 'div') {
-						$trad = rtrim($trad) . "\n\n";
-					}
-					$trad = code_echappement($trad, 'multi', false, $mode);
-					$trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
-					if (lang_dir($l) !== lang_dir($lang)) {
-						$trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
-					}
-					if (!$options['echappe_span']) {
-						$trad = echappe_retour($trad, 'multi');
-					}
-				}
-			}
-			$letexte = str_replace($reg[0], $trad, $letexte);
-		}
-	}
-
-	return $letexte;
+    if (
+        $letexte
+        and preg_match_all(_EXTRAIRE_MULTI, $letexte, $regs, PREG_SET_ORDER)
+    ) {
+        if (!$lang) {
+            $lang = $GLOBALS['spip_lang'];
+        }
+
+        // Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
+        if (is_bool($options)) {
+            $options = ['echappe_span' => $options, 'lang_defaut' => _LANGUE_PAR_DEFAUT];
+        }
+        if (!isset($options['echappe_span'])) {
+            $options = array_merge($options, ['echappe_span' => false]);
+        }
+        if (!isset($options['lang_defaut'])) {
+            $options = array_merge($options, ['lang_defaut' => _LANGUE_PAR_DEFAUT]);
+        }
+
+        include_spip('inc/lang');
+        foreach ($regs as $reg) {
+            // chercher la version de la langue courante
+            $trads = extraire_trads($reg[1]);
+            if ($l = approcher_langue($trads, $lang)) {
+                $trad = $trads[$l];
+            } else {
+                if ($options['lang_defaut'] == 'aucune') {
+                    $trad = '';
+                } else {
+                    // langue absente, prendre le fr ou une langue précisée (meme comportement que inc/traduire.php)
+                    // ou la premiere dispo
+                    // mais typographier le texte selon les regles de celle-ci
+                    // Attention aux blocs multi sur plusieurs lignes
+                    if (!$l = approcher_langue($trads, $options['lang_defaut'])) {
+                        $l = key($trads);
+                    }
+                    $trad = $trads[$l];
+                    $typographie = charger_fonction(lang_typo($l), 'typographie');
+                    $trad = $typographie($trad);
+                    // Tester si on echappe en span ou en div
+                    // il ne faut pas echapper en div si propre produit un seul paragraphe
+                    include_spip('inc/texte');
+                    $trad_propre = preg_replace(',(^<p[^>]*>|</p>$),Uims', '', propre($trad));
+                    $mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $trad_propre) ? 'div' : 'span';
+                    if ($mode === 'div') {
+                        $trad = rtrim($trad) . "\n\n";
+                    }
+                    $trad = code_echappement($trad, 'multi', false, $mode);
+                    $trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
+                    if (lang_dir($l) !== lang_dir($lang)) {
+                        $trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
+                    }
+                    if (!$options['echappe_span']) {
+                        $trad = echappe_retour($trad, 'multi');
+                    }
+                }
+            }
+            $letexte = str_replace($reg[0], $trad, $letexte);
+        }
+    }
+
+    return $letexte;
 }
 
 /**
@@ -1857,21 +1857,21 @@ 
  *     Peut retourner un code de langue vide, lorsqu'un texte par défaut est indiqué.
  **/
 function extraire_trads($bloc) {
-	$trads = [];
-	$lang = '';
+    $trads = [];
+    $lang = '';
 // ce reg fait planter l'analyse multi s'il y a de l'{italique} dans le champ
 //	while (preg_match("/^(.*?)[{\[]([a-z_]+)[}\]]/siS", $bloc, $regs)) {
-	while (preg_match('/^(.*?)[\[]([a-z_]+)[\]]/siS', $bloc, $regs)) {
-		$texte = trim($regs[1]);
-		if ($texte or $lang) {
-			$trads[$lang] = $texte;
-		}
-		$bloc = substr($bloc, strlen($regs[0]));
-		$lang = $regs[2];
-	}
-	$trads[$lang] = $bloc;
+    while (preg_match('/^(.*?)[\[]([a-z_]+)[\]]/siS', $bloc, $regs)) {
+        $texte = trim($regs[1]);
+        if ($texte or $lang) {
+            $trads[$lang] = $texte;
+        }
+        $bloc = substr($bloc, strlen($regs[0]));
+        $lang = $regs[2];
+    }
+    $trads[$lang] = $bloc;
 
-	return $trads;
+    return $trads;
 }
 
 
@@ -1882,7 +1882,7 @@ 
  * @return string L'initiale en majuscule
  */
 function filtre_initiale($nom) {
-	return spip_substr(trim(strtoupper(extraire_multi($nom))), 0, 1);
+    return spip_substr(trim(strtoupper(extraire_multi($nom))), 0, 1);
 }
 
 
@@ -1927,33 +1927,33 @@ 
  *      - null (interne) : si on empile
  **/
 function unique($donnee, $famille = '', $cpt = false) {
-	static $mem = [];
-	// permettre de vider la pile et de la restaurer
-	// pour le calcul de introduction...
-	if ($famille == '_spip_raz_') {
-		$tmp = $mem;
-		$mem = [];
-
-		return $tmp;
-	} elseif ($famille == '_spip_set_') {
-		$mem = $donnee;
-
-		return;
-	}
-	// eviter une notice
-	if (!isset($mem[$famille])) {
-		$mem[$famille] = [];
-	}
-	if ($cpt) {
-		return is_countable($mem[$famille]) ? count($mem[$famille]) : 0;
-	}
-	// eviter une notice
-	if (!isset($mem[$famille][$donnee])) {
-		$mem[$famille][$donnee] = 0;
-	}
-	if (!($mem[$famille][$donnee]++)) {
-		return $donnee;
-	}
+    static $mem = [];
+    // permettre de vider la pile et de la restaurer
+    // pour le calcul de introduction...
+    if ($famille == '_spip_raz_') {
+        $tmp = $mem;
+        $mem = [];
+
+        return $tmp;
+    } elseif ($famille == '_spip_set_') {
+        $mem = $donnee;
+
+        return;
+    }
+    // eviter une notice
+    if (!isset($mem[$famille])) {
+        $mem[$famille] = [];
+    }
+    if ($cpt) {
+        return is_countable($mem[$famille]) ? count($mem[$famille]) : 0;
+    }
+    // eviter une notice
+    if (!isset($mem[$famille][$donnee])) {
+        $mem[$famille][$donnee] = 0;
+    }
+    if (!($mem[$famille][$donnee]++)) {
+        return $donnee;
+    }
 }
 
 
@@ -1983,20 +1983,20 @@ 
  *     Une des valeurs en fonction du compteur.
  **/
 function alterner($i, ...$args) {
-	// recuperer les arguments (attention fonctions un peu space)
-	$num = count($args);
+    // recuperer les arguments (attention fonctions un peu space)
+    $num = count($args);
 
-	if ($num === 1 && is_array($args[0])) {
-		// un tableau de valeur dont les cles sont numerotees de 0 a num
-		$args = array_values($args[0]);
-		$num = count($args);
-	}
+    if ($num === 1 && is_array($args[0])) {
+        // un tableau de valeur dont les cles sont numerotees de 0 a num
+        $args = array_values($args[0]);
+        $num = count($args);
+    }
 
-	// un index compris entre 0 et num exclus
-	$i = ((intval($i) - 1) % $num); // dans ]-$num;$num[
-	$i = ($i + $num) % $num; // dans [0;$num[
-	// renvoyer le i-ieme argument, modulo le nombre d'arguments
-	return $args[$i];
+    // un index compris entre 0 et num exclus
+    $i = ((intval($i) - 1) % $num); // dans ]-$num;$num[
+    $i = ($i + $num) % $num; // dans [0;$num[
+    // renvoyer le i-ieme argument, modulo le nombre d'arguments
+    return $args[$i];
 }
 
 
@@ -2022,51 +2022,51 @@ 
  *     - null lorsque l’attribut n’existe pas.
  **/
 function extraire_attribut($balise, $attribut, $complet = false) {
-	if (is_array($balise)) {
-		array_walk(
-			$balise,
-			function (&$a, $key, $t) {
-				$a = extraire_attribut($a, $t);
-			},
-			$attribut
-		);
-
-		return $balise;
-	}
-	if (
-		$balise
-		&& preg_match(
-			',(^.*?<(?:(?>\s*)(?>[\w:.-]+)(?>(?:=(?:"[^"]*"|\'[^\']*\'|[^\'"]\S*))?))*?)(\s+'
-			. $attribut
-			. '(?:=\s*("[^"]*"|\'[^\']*\'|[^\'"]\S*))?)()((?:[\s/][^>]*)?>.*),isS',
-			$balise,
-			$r
-		)
-	) {
-		if (isset($r[3][0]) and ($r[3][0] == '"' || $r[3][0] == "'")) {
-			$r[4] = substr($r[3], 1, -1);
-			$r[3] = $r[3][0];
-		} elseif ($r[3] !== '') {
-			$r[4] = $r[3];
-			$r[3] = '';
-		} else {
-			$r[4] = trim($r[2]);
-		}
-		$att = $r[4];
-		if (strpos($att, '&#') !== false) {
-			$att = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $att);
-		}
-		$att = filtrer_entites($att);
-	} else {
-		$att = null;
-		$r = [];
-	}
-
-	if ($complet) {
-		return [$att, $r];
-	} else {
-		return $att;
-	}
+    if (is_array($balise)) {
+        array_walk(
+            $balise,
+            function (&$a, $key, $t) {
+                $a = extraire_attribut($a, $t);
+            },
+            $attribut
+        );
+
+        return $balise;
+    }
+    if (
+        $balise
+        && preg_match(
+            ',(^.*?<(?:(?>\s*)(?>[\w:.-]+)(?>(?:=(?:"[^"]*"|\'[^\']*\'|[^\'"]\S*))?))*?)(\s+'
+            . $attribut
+            . '(?:=\s*("[^"]*"|\'[^\']*\'|[^\'"]\S*))?)()((?:[\s/][^>]*)?>.*),isS',
+            $balise,
+            $r
+        )
+    ) {
+        if (isset($r[3][0]) and ($r[3][0] == '"' || $r[3][0] == "'")) {
+            $r[4] = substr($r[3], 1, -1);
+            $r[3] = $r[3][0];
+        } elseif ($r[3] !== '') {
+            $r[4] = $r[3];
+            $r[3] = '';
+        } else {
+            $r[4] = trim($r[2]);
+        }
+        $att = $r[4];
+        if (strpos($att, '&#') !== false) {
+            $att = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $att);
+        }
+        $att = filtrer_entites($att);
+    } else {
+        $att = null;
+        $r = [];
+    }
+
+    if ($complet) {
+        return [$att, $r];
+    } else {
+        return $att;
+    }
 }
 
 /**
@@ -2099,41 +2099,41 @@ 
  **/
 function inserer_attribut(?string $balise, string $attribut, string $val, bool $proteger = true, bool $vider = false): string {
 
-	if ($balise === null or $balise === '') {
-		return '';
-	}
+    if ($balise === null or $balise === '') {
+        return '';
+    }
 
-	// preparer l'attribut
-	// supprimer les &nbsp; etc mais pas les balises html
-	// qui ont un sens dans un attribut value d'un input
-	if ($proteger) {
-		$val = attribut_html($val, false);
-	}
+    // preparer l'attribut
+    // supprimer les &nbsp; etc mais pas les balises html
+    // qui ont un sens dans un attribut value d'un input
+    if ($proteger) {
+        $val = attribut_html($val, false);
+    }
 
-	// echapper les ' pour eviter tout bug
-	$val = str_replace("'", '&#039;', $val);
-	if ($vider and strlen($val) === 0) {
-		$insert = '';
-	} else {
-		$insert = " $attribut='$val'";
-	}
+    // echapper les ' pour eviter tout bug
+    $val = str_replace("'", '&#039;', $val);
+    if ($vider and strlen($val) === 0) {
+        $insert = '';
+    } else {
+        $insert = " $attribut='$val'";
+    }
 
-	[$old, $r] = extraire_attribut($balise, $attribut, true);
+    [$old, $r] = extraire_attribut($balise, $attribut, true);
 
-	if ($old !== null) {
-		// Remplacer l'ancien attribut du meme nom
-		$balise = $r[1] . $insert . $r[5];
-	} else {
-		// preferer une balise " />" (comme <img />)
-		if (preg_match(',/>,', $balise)) {
-			$balise = preg_replace(',\s?/>,S', $insert . ' />', $balise, 1);
-		} // sinon une balise <a ...> ... </a>
-		else {
-			$balise = preg_replace(',\s?>,S', $insert . '>', $balise, 1);
-		}
-	}
+    if ($old !== null) {
+        // Remplacer l'ancien attribut du meme nom
+        $balise = $r[1] . $insert . $r[5];
+    } else {
+        // preferer une balise " />" (comme <img />)
+        if (preg_match(',/>,', $balise)) {
+            $balise = preg_replace(',\s?/>,S', $insert . ' />', $balise, 1);
+        } // sinon une balise <a ...> ... </a>
+        else {
+            $balise = preg_replace(',\s?>,S', $insert . '>', $balise, 1);
+        }
+    }
 
-	return $balise;
+    return $balise;
 }
 
 /**
@@ -2151,7 +2151,7 @@ 
  * @return string Code HTML sans l'attribut
  **/
 function vider_attribut(?string $balise, string $attribut): string {
-	return inserer_attribut($balise, $attribut, '', false, true);
+    return inserer_attribut($balise, $attribut, '', false, true);
 }
 
 /**
@@ -2163,53 +2163,53 @@ 
  * @return string
  */
 function modifier_class($balise, $class, $operation = 'ajouter') {
-	if (is_string($class)) {
-		$class = explode(' ', trim($class));
-	}
-	$class = array_filter($class);
-	$class = array_unique($class);
-	if (!$class) {
-		return $balise;
-	}
-
-	// si la ou les classes ont des caracteres invalides on ne fait rien
-	if (preg_match(',[^\w-],', implode('', $class))) {
-		return $balise;
-	}
-
-	$class_courante = extraire_attribut($balise, 'class');
-	$class_new = $class_courante;
-	foreach ($class as $c) {
-		$is_class_presente = false;
-		if (
-			$class_courante
-			and strpos($class_courante, (string) $c) !== false
-			and preg_match('/(^|\s)' . preg_quote($c) . '($|\s)/', $class_courante)
-		) {
-			$is_class_presente = true;
-		}
-		if (
-			in_array($operation, ['ajouter', 'commuter'])
-			and !$is_class_presente
-		) {
-			$class_new = ltrim(rtrim($class_new ?? '') . ' ' . $c);
-		} elseif (
-			in_array($operation, ['supprimer', 'commuter'])
-			and $is_class_presente
-		) {
-			$class_new = trim(preg_replace('/(^|\s)' . preg_quote($c) . '($|\s)/', "\\1", $class_new));
-		}
-	}
-
-	if ($class_new !== $class_courante) {
-		if (strlen($class_new)) {
-			$balise = inserer_attribut($balise, 'class', $class_new);
-		} elseif ($class_courante) {
-			$balise = vider_attribut($balise, 'class');
-		}
-	}
-
-	return $balise;
+    if (is_string($class)) {
+        $class = explode(' ', trim($class));
+    }
+    $class = array_filter($class);
+    $class = array_unique($class);
+    if (!$class) {
+        return $balise;
+    }
+
+    // si la ou les classes ont des caracteres invalides on ne fait rien
+    if (preg_match(',[^\w-],', implode('', $class))) {
+        return $balise;
+    }
+
+    $class_courante = extraire_attribut($balise, 'class');
+    $class_new = $class_courante;
+    foreach ($class as $c) {
+        $is_class_presente = false;
+        if (
+            $class_courante
+            and strpos($class_courante, (string) $c) !== false
+            and preg_match('/(^|\s)' . preg_quote($c) . '($|\s)/', $class_courante)
+        ) {
+            $is_class_presente = true;
+        }
+        if (
+            in_array($operation, ['ajouter', 'commuter'])
+            and !$is_class_presente
+        ) {
+            $class_new = ltrim(rtrim($class_new ?? '') . ' ' . $c);
+        } elseif (
+            in_array($operation, ['supprimer', 'commuter'])
+            and $is_class_presente
+        ) {
+            $class_new = trim(preg_replace('/(^|\s)' . preg_quote($c) . '($|\s)/', "\\1", $class_new));
+        }
+    }
+
+    if ($class_new !== $class_courante) {
+        if (strlen($class_new)) {
+            $balise = inserer_attribut($balise, 'class', $class_new);
+        } elseif ($class_courante) {
+            $balise = vider_attribut($balise, 'class');
+        }
+    }
+
+    return $balise;
 }
 
 /**
@@ -2219,7 +2219,7 @@ 
  * @return string
  */
 function ajouter_class($balise, $class) {
-	return modifier_class($balise, $class, 'ajouter');
+    return modifier_class($balise, $class, 'ajouter');
 }
 
 /**
@@ -2229,7 +2229,7 @@ 
  * @return string
  */
 function supprimer_class($balise, $class) {
-	return modifier_class($balise, $class, 'supprimer');
+    return modifier_class($balise, $class, 'supprimer');
 }
 
 /**
@@ -2240,7 +2240,7 @@ 
  * @return string
  */
 function commuter_class($balise, $class) {
-	return modifier_class($balise, $class, 'commuter');
+    return modifier_class($balise, $class, 'commuter');
 }
 
 /**
@@ -2251,19 +2251,19 @@ 
  * @return string
  */
 function tester_config($id, $mode = '') {
-	include_spip('action/inscrire_auteur');
+    include_spip('action/inscrire_auteur');
 
-	return tester_statut_inscription($mode, $id);
+    return tester_statut_inscription($mode, $id);
 }
 
 //
 // Quelques fonctions de calcul arithmetique
 //
 function floatstr($a) {
- return str_replace(',', '.', (string)floatval($a));
+    return str_replace(',', '.', (string)floatval($a));
 }
 function strize($f, $a, $b) {
- return floatstr($f(floatstr($a), floatstr($b)));
+    return floatstr($f(floatstr($a), floatstr($b)));
 }
 
 /**
@@ -2282,7 +2282,7 @@ 
  * @return int $a+$b
  **/
 function plus($a, $b) {
-	return $a + $b;
+    return $a + $b;
 }
 function strplus($a, $b) {
 return strize('plus', $a, $b);
@@ -2303,7 +2303,7 @@ 
  * @return int $a-$b
  **/
 function moins($a, $b) {
-	return $a - $b;
+    return $a - $b;
 }
 function strmoins($a, $b) {
 return strize('moins', $a, $b);
@@ -2326,7 +2326,7 @@ 
  * @return int $a*$b
  **/
 function mult($a, $b) {
-	return $a * $b;
+    return $a * $b;
 }
 function strmult($a, $b) {
 return strize('mult', $a, $b);
@@ -2349,7 +2349,7 @@ 
  * @return int $a/$b (ou 0 si $b est nul)
  **/
 function div($a, $b) {
-	return $b ? $a / $b : 0;
+    return $b ? $a / $b : 0;
 }
 function strdiv($a, $b) {
 return strize('div', $a, $b);
@@ -2373,7 +2373,7 @@ 
  * @return int ($nb % $mod) + $add
  **/
 function modulo($nb, $mod, $add = 0) {
-	return ($mod ? $nb % $mod : 0) + $add;
+    return ($mod ? $nb % $mod : 0) + $add;
 }
 
 
@@ -2388,26 +2388,26 @@ 
  *      - true sinon
  **/
 function nom_acceptable($nom) {
-	$remp2 = [];
-	$remp1 = [];
-	if (!is_string($nom)) {
-		return false;
-	}
-	if (!defined('_TAGS_NOM_AUTEUR')) {
-		define('_TAGS_NOM_AUTEUR', '');
-	}
-	$tags_acceptes = array_unique(explode(',', 'multi,' . _TAGS_NOM_AUTEUR));
-	foreach ($tags_acceptes as $tag) {
-		if (strlen($tag)) {
-			$remp1[] = '<' . trim($tag) . '>';
-			$remp1[] = '</' . trim($tag) . '>';
-			$remp2[] = '\x60' . trim($tag) . '\x61';
-			$remp2[] = '\x60/' . trim($tag) . '\x61';
-		}
-	}
-	$v_nom = str_replace($remp2, $remp1, supprimer_tags(str_replace($remp1, $remp2, $nom)));
-
-	return str_replace('&lt;', '<', $v_nom) == $nom;
+    $remp2 = [];
+    $remp1 = [];
+    if (!is_string($nom)) {
+        return false;
+    }
+    if (!defined('_TAGS_NOM_AUTEUR')) {
+        define('_TAGS_NOM_AUTEUR', '');
+    }
+    $tags_acceptes = array_unique(explode(',', 'multi,' . _TAGS_NOM_AUTEUR));
+    foreach ($tags_acceptes as $tag) {
+        if (strlen($tag)) {
+            $remp1[] = '<' . trim($tag) . '>';
+            $remp1[] = '</' . trim($tag) . '>';
+            $remp2[] = '\x60' . trim($tag) . '\x61';
+            $remp2[] = '\x60/' . trim($tag) . '\x61';
+        }
+    }
+    $v_nom = str_replace($remp2, $remp1, supprimer_tags(str_replace($remp1, $remp2, $nom)));
+
+    return str_replace('&lt;', '<', $v_nom) == $nom;
 }
 
 
@@ -2423,14 +2423,14 @@ 
  *      - renvoie un tableau si l'entree est un tableau
  **/
 function email_valide($adresses) {
-	if (is_array($adresses)) {
-		$adresses = array_map('email_valide', $adresses);
-		$adresses = array_filter($adresses);
-		return $adresses;
-	}
+    if (is_array($adresses)) {
+        $adresses = array_map('email_valide', $adresses);
+        $adresses = array_filter($adresses);
+        return $adresses;
+    }
 
-	$email_valide = charger_fonction('email_valide', 'inc');
-	return $email_valide($adresses);
+    $email_valide = charger_fonction('email_valide', 'inc');
+    return $email_valide($adresses);
 }
 
 /**
@@ -2444,29 +2444,29 @@ 
  * @return string Texte
  **/
 function afficher_enclosures($tags) {
-	$s = [];
-	foreach (extraire_balises($tags, 'a') as $tag) {
-		if (
-			extraire_attribut($tag, 'rel') == 'enclosure'
-			and $t = extraire_attribut($tag, 'href')
-		) {
-			$s[] = preg_replace(
-				',>[^<]+</a>,S',
-				'>'
-				. http_img_pack(
-					'attachment-16.png',
-					$t,
-					'',
-					$t,
-					['utiliser_suffixe_size' => true]
-				)
-				. '</a>',
-				$tag
-			);
-		}
-	}
-
-	return join('&nbsp;', $s);
+    $s = [];
+    foreach (extraire_balises($tags, 'a') as $tag) {
+        if (
+            extraire_attribut($tag, 'rel') == 'enclosure'
+            and $t = extraire_attribut($tag, 'href')
+        ) {
+            $s[] = preg_replace(
+                ',>[^<]+</a>,S',
+                '>'
+                . http_img_pack(
+                    'attachment-16.png',
+                    $t,
+                    '',
+                    $t,
+                    ['utiliser_suffixe_size' => true]
+                )
+                . '</a>',
+                $tag
+            );
+        }
+    }
+
+    return join('&nbsp;', $s);
 }
 
 /**
@@ -2481,15 +2481,15 @@ 
  * @return string Liens trouvés
  **/
 function afficher_tags($tags, $rels = 'tag,directory') {
-	$s = [];
-	foreach (extraire_balises($tags, 'a') as $tag) {
-		$rel = extraire_attribut($tag, 'rel');
-		if (strstr(",$rels,", (string) ",$rel,")) {
-			$s[] = $tag;
-		}
-	}
+    $s = [];
+    foreach (extraire_balises($tags, 'a') as $tag) {
+        $rel = extraire_attribut($tag, 'rel');
+        if (strstr(",$rels,", (string) ",$rel,")) {
+            $s[] = $tag;
+        }
+    }
 
-	return join(', ', $s);
+    return join(', ', $s);
 }
 
 
@@ -2511,21 +2511,21 @@ 
  * @return string Tag HTML `<a>` avec microformat.
  **/
 function enclosure2microformat($e) {
-	if (!$url = filtrer_entites(extraire_attribut($e, 'url'))) {
-		$url = filtrer_entites(extraire_attribut($e, 'href'));
-	}
-	$type = extraire_attribut($e, 'type');
-	if (!$length = extraire_attribut($e, 'length')) {
-		# <media:content : longeur dans fileSize. On tente.
-		$length = extraire_attribut($e, 'fileSize');
-	}
-	$fichier = basename($url);
+    if (!$url = filtrer_entites(extraire_attribut($e, 'url'))) {
+        $url = filtrer_entites(extraire_attribut($e, 'href'));
+    }
+    $type = extraire_attribut($e, 'type');
+    if (!$length = extraire_attribut($e, 'length')) {
+        # <media:content : longeur dans fileSize. On tente.
+        $length = extraire_attribut($e, 'fileSize');
+    }
+    $fichier = basename($url);
 
-	return '<a rel="enclosure"'
-	. ($url ? ' href="' . spip_htmlspecialchars($url) . '"' : '')
-	. ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
-	. ($length ? ' title="' . spip_htmlspecialchars($length) . '"' : '')
-	. '>' . $fichier . '</a>';
+    return '<a rel="enclosure"'
+    . ($url ? ' href="' . spip_htmlspecialchars($url) . '"' : '')
+    . ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
+    . ($length ? ' title="' . spip_htmlspecialchars($length) . '"' : '')
+    . '>' . $fichier . '</a>';
 }
 
 /**
@@ -2543,24 +2543,24 @@ 
  * @return string Tags RSS `<enclosure>`.
  **/
 function microformat2enclosure($tags) {
-	$enclosures = [];
-	foreach (extraire_balises($tags, 'a') as $e) {
-		if (extraire_attribut($e, 'rel') == 'enclosure') {
-			$url = filtrer_entites(extraire_attribut($e, 'href'));
-			$type = extraire_attribut($e, 'type');
-			if (!$length = intval(extraire_attribut($e, 'title'))) {
-				$length = intval(extraire_attribut($e, 'length'));
-			} # vieux data
-			$fichier = basename($url);
-			$enclosures[] = '<enclosure'
-				. ($url ? ' url="' . spip_htmlspecialchars($url) . '"' : '')
-				. ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
-				. ($length ? ' length="' . $length . '"' : '')
-				. ' />';
-		}
-	}
+    $enclosures = [];
+    foreach (extraire_balises($tags, 'a') as $e) {
+        if (extraire_attribut($e, 'rel') == 'enclosure') {
+            $url = filtrer_entites(extraire_attribut($e, 'href'));
+            $type = extraire_attribut($e, 'type');
+            if (!$length = intval(extraire_attribut($e, 'title'))) {
+                $length = intval(extraire_attribut($e, 'length'));
+            } # vieux data
+            $fichier = basename($url);
+            $enclosures[] = '<enclosure'
+                . ($url ? ' url="' . spip_htmlspecialchars($url) . '"' : '')
+                . ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
+                . ($length ? ' length="' . $length . '"' : '')
+                . ' />';
+        }
+    }
 
-	return join("\n", $enclosures);
+    return join("\n", $enclosures);
 }
 
 
@@ -2576,16 +2576,16 @@ 
  * @return string Tags RSS Atom `<dc:subject>`.
  **/
 function tags2dcsubject($tags) {
-	$subjects = '';
-	foreach (extraire_balises($tags, 'a') as $e) {
-		if (extraire_attribut($e, 'rel') == 'tag') {
-			$subjects .= '<dc:subject>'
-				. texte_backend(textebrut($e))
-				. '</dc:subject>' . "\n";
-		}
-	}
+    $subjects = '';
+    foreach (extraire_balises($tags, 'a') as $e) {
+        if (extraire_attribut($e, 'rel') == 'tag') {
+            $subjects .= '<dc:subject>'
+                . texte_backend(textebrut($e))
+                . '</dc:subject>' . "\n";
+        }
+    }
 
-	return $subjects;
+    return $subjects;
 }
 
 /**
@@ -2614,27 +2614,27 @@ 
  *     - Tableau de résultats, si tableau en entrée.
  **/
 function extraire_balise($texte, $tag = 'a') {
-	if (is_array($texte)) {
-		array_walk(
-			$texte,
-			function (&$a, $key, $t) {
-				$a = extraire_balise($a, $t);
-			},
-			$tag
-		);
-
-		return $texte;
-	}
-
-	if (
-		preg_match(
-			",<$tag\b[^>]*(/>|>.*</$tag\b[^>]*>|>),UimsS",
-			$texte,
-			$regs
-		)
-	) {
-		return $regs[0];
-	}
+    if (is_array($texte)) {
+        array_walk(
+            $texte,
+            function (&$a, $key, $t) {
+                $a = extraire_balise($a, $t);
+            },
+            $tag
+        );
+
+        return $texte;
+    }
+
+    if (
+        preg_match(
+            ",<$tag\b[^>]*(/>|>.*</$tag\b[^>]*>|>),UimsS",
+            $texte,
+            $regs
+        )
+    ) {
+        return $regs[0];
+    }
 }
 
 /**
@@ -2662,30 +2662,30 @@ 
  *     - Tableau de résultats, si tableau en entrée.
  **/
 function extraire_balises($texte, $tag = 'a') {
-	if (is_array($texte)) {
-		array_walk(
-			$texte,
-			function (&$a, $key, $t) {
-				$a = extraire_balises($a, $t);
-			},
-			$tag
-		);
-
-		return $texte;
-	}
-
-	if (
-		preg_match_all(
-			",<{$tag}\b[^>]*(/>|>.*</{$tag}\b[^>]*>|>),UimsS",
-			$texte,
-			$regs,
-			PREG_PATTERN_ORDER
-		)
-	) {
-		return $regs[0];
-	} else {
-		return [];
-	}
+    if (is_array($texte)) {
+        array_walk(
+            $texte,
+            function (&$a, $key, $t) {
+                $a = extraire_balises($a, $t);
+            },
+            $tag
+        );
+
+        return $texte;
+    }
+
+    if (
+        preg_match_all(
+            ",<{$tag}\b[^>]*(/>|>.*</{$tag}\b[^>]*>|>),UimsS",
+            $texte,
+            $regs,
+            PREG_PATTERN_ORDER
+        )
+    ) {
+        return $regs[0];
+    } else {
+        return [];
+    }
 }
 
 /**
@@ -2714,11 +2714,11 @@ 
  *     - `$def` si on n'a pas transmis de tableau
  **/
 function in_any($val, $vals, $def = '') {
-	if (!is_array($vals) and $vals and $v = unserialize($vals)) {
-		$vals = $v;
-	}
+    if (!is_array($vals) and $vals and $v = unserialize($vals)) {
+        $vals = $v;
+    }
 
-	return (!is_array($vals) ? $def : (in_array($val, $vals) ? ' ' : ''));
+    return (!is_array($vals) ? $def : (in_array($val, $vals) ? ' ' : ''));
 }
 
 
@@ -2739,12 +2739,12 @@ 
  *     Résultat du calcul
  **/
 function valeur_numerique($expr) {
-	$a = 0;
-	if (preg_match(',^[0-9]+(\s*[+*-]\s*[0-9]+)*$,S', trim($expr))) {
-		eval("\$a = $expr;");
-	}
+    $a = 0;
+    if (preg_match(',^[0-9]+(\s*[+*-]\s*[0-9]+)*$,S', trim($expr))) {
+        eval("\$a = $expr;");
+    }
 
-	return intval($a);
+    return intval($a);
 }
 
 /**
@@ -2763,7 +2763,7 @@ 
  *      Retourne `$a*$b/$c`
  **/
 function regledetrois($a, $b, $c) {
-	return round($a * $b / $c);
+    return round($a * $b / $c);
 }
 
 
@@ -2786,79 +2786,79 @@ 
  * @return string Suite de champs input hidden
  **/
 function form_hidden(?string $action = ''): string {
-	$action ??= '';
-
-	$contexte = [];
-	include_spip('inc/urls');
-	if (
-		$p = urls_decoder_url($action, '')
-		and reset($p)
-	) {
-		$fond = array_shift($p);
-		if ($fond != '404') {
-			$contexte = array_shift($p);
-			$contexte['page'] = $fond;
-			$action = preg_replace('/([?]' . preg_quote($fond) . '[^&=]*[0-9]+)(&|$)/', '?&', $action);
-		}
-	}
-	// defaire ce qu'a injecte urls_decoder_url : a revoir en modifiant la signature de urls_decoder_url
-	if (defined('_DEFINIR_CONTEXTE_TYPE') and _DEFINIR_CONTEXTE_TYPE) {
-		unset($contexte['type']);
-	}
-	if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') or _DEFINIR_CONTEXTE_TYPE_PAGE) {
-		unset($contexte['type-page']);
-	}
-
-	// on va remplir un tableau de valeurs en prenant bien soin de ne pas
-	// ecraser les elements de la forme mots[]=1&mots[]=2
-	$values = [];
-
-	// d'abord avec celles de l'url
-	if (false !== ($p = strpos($action, '?'))) {
-		foreach (preg_split('/&(amp;)?/S', substr($action, $p + 1)) as $c) {
-			$c = explode('=', $c, 2);
-			$var = array_shift($c);
-			$val = array_shift($c) ?? '';
-			if ($var) {
-				$val = rawurldecode($val);
-				$var = rawurldecode($var); // decoder les [] eventuels
-				if (preg_match(',\[\]$,S', $var)) {
-					$values[] = [$var, $val];
-				} else {
-					if (!isset($values[$var])) {
-						$values[$var] = [$var, $val];
-					}
-				}
-			}
-		}
-	}
-
-	// ensuite avec celles du contexte, sans doublonner !
-	foreach ($contexte as $var => $val) {
-		if (preg_match(',\[\]$,S', $var)) {
-			$values[] = [$var, $val];
-		} else {
-			if (!isset($values[$var])) {
-				$values[$var] = [$var, $val];
-			}
-		}
-	}
-
-	// puis on rassemble le tout
-	$hidden = [];
-	foreach ($values as $value) {
-		[$var, $val] = $value;
-		$hidden[] = '<input name="'
-			. entites_html($var)
-			. '"'
-			. (is_null($val)
-				? ''
-				: ' value="' . entites_html($val) . '"'
-			)
-			. ' type="hidden"' . "\n/>";
-	}
-
-	return join('', $hidden);
+    $action ??= '';
+
+    $contexte = [];
+    include_spip('inc/urls');
+    if (
+        $p = urls_decoder_url($action, '')
+        and reset($p)
+    ) {
+        $fond = array_shift($p);
+        if ($fond != '404') {
+            $contexte = array_shift($p);
+            $contexte['page'] = $fond;
+            $action = preg_replace('/([?]' . preg_quote($fond) . '[^&=]*[0-9]+)(&|$)/', '?&', $action);
+        }
+    }
+    // defaire ce qu'a injecte urls_decoder_url : a revoir en modifiant la signature de urls_decoder_url
+    if (defined('_DEFINIR_CONTEXTE_TYPE') and _DEFINIR_CONTEXTE_TYPE) {
+        unset($contexte['type']);
+    }
+    if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') or _DEFINIR_CONTEXTE_TYPE_PAGE) {
+        unset($contexte['type-page']);
+    }
+
+    // on va remplir un tableau de valeurs en prenant bien soin de ne pas
+    // ecraser les elements de la forme mots[]=1&mots[]=2
+    $values = [];
+
+    // d'abord avec celles de l'url
+    if (false !== ($p = strpos($action, '?'))) {
+        foreach (preg_split('/&(amp;)?/S', substr($action, $p + 1)) as $c) {
+            $c = explode('=', $c, 2);
+            $var = array_shift($c);
+            $val = array_shift($c) ?? '';
+            if ($var) {
+                $val = rawurldecode($val);
+                $var = rawurldecode($var); // decoder les [] eventuels
+                if (preg_match(',\[\]$,S', $var)) {
+                    $values[] = [$var, $val];
+                } else {
+                    if (!isset($values[$var])) {
+                        $values[$var] = [$var, $val];
+                    }
+                }
+            }
+        }
+    }
+
+    // ensuite avec celles du contexte, sans doublonner !
+    foreach ($contexte as $var => $val) {
+        if (preg_match(',\[\]$,S', $var)) {
+            $values[] = [$var, $val];
+        } else {
+            if (!isset($values[$var])) {
+                $values[$var] = [$var, $val];
+            }
+        }
+    }
+
+    // puis on rassemble le tout
+    $hidden = [];
+    foreach ($values as $value) {
+        [$var, $val] = $value;
+        $hidden[] = '<input name="'
+            . entites_html($var)
+            . '"'
+            . (is_null($val)
+                ? ''
+                : ' value="' . entites_html($val) . '"'
+            )
+            . ' type="hidden"' . "\n/>";
+    }
+
+    return join('', $hidden);
 }
 
 
@@ -2880,7 +2880,7 @@ 
  *    - la première valeur du tableau sinon.
  **/
 function filtre_reset($array) {
-	return !is_array($array) ? null : reset($array);
+    return !is_array($array) ? null : reset($array);
 }
 
 /**
@@ -2901,7 +2901,7 @@ 
  *    - la dernière valeur du tableau sinon.
  **/
 function filtre_end($array) {
-	return !is_array($array) ? null : end($array);
+    return !is_array($array) ? null : end($array);
 }
 
 /**
@@ -2921,11 +2921,11 @@ 
  *
  **/
 function filtre_push($array, $val) {
-	if (!is_array($array) or !array_push($array, $val)) {
-		return '';
-	}
+    if (!is_array($array) or !array_push($array, $val)) {
+        return '';
+    }
 
-	return $array;
+    return $array;
 }
 
 /**
@@ -2944,7 +2944,7 @@ 
  *     - `true` si la valeur existe dans le tableau, `false` sinon.
  **/
 function filtre_find($array, $val) {
-	return (is_array($array) and in_array($val, $array));
+    return (is_array($array) and in_array($val, $array));
 }
 
 
@@ -2961,13 +2961,13 @@ 
  *     Contenu avec urls en absolus
  **/
 function urls_absolues_css($contenu, $source) {
-	$path = suivre_lien(url_absolue($source), './');
+    $path = suivre_lien(url_absolue($source), './');
 
-	return preg_replace_callback(
-		",url\s*\(\s*['\"]?([^'\"/#\s][^:]*)['\"]?\s*\),Uims",
-		fn($x) => "url('" . suivre_lien($path, $x[1]) . "')",
-		$contenu
-	);
+    return preg_replace_callback(
+        ",url\s*\(\s*['\"]?([^'\"/#\s][^:]*)['\"]?\s*\),Uims",
+        fn($x) => "url('" . suivre_lien($path, $x[1]) . "')",
+        $contenu
+    );
 }
 
 
@@ -2996,119 +2996,119 @@ 
  *     Chemin du fichier CSS inversé
  **/
 function direction_css($css, $voulue = '') {
-	if (!preg_match(',(_rtl)?\.css$,i', $css, $r)) {
-		return $css;
-	}
-	include_spip('inc/lang');
-	// si on a precise le sens voulu en argument, le prendre en compte
-	if ($voulue = strtolower($voulue)) {
-		if ($voulue != 'rtl' and $voulue != 'ltr') {
-			$voulue = lang_dir($voulue);
-		}
-	} else {
-		$voulue = lang_dir();
-	}
-
-	$r = count($r) > 1;
-	$right = $r ? 'left' : 'right'; // 'right' de la css lue en entree
-	$dir = $r ? 'rtl' : 'ltr';
-	$ndir = $r ? 'ltr' : 'rtl';
-
-	if ($voulue == $dir) {
-		return $css;
-	}
-
-	if (
-		// url absolue
-		preg_match(',^https?:,i', $css)
-		// ou qui contient un ?
-		or (($p = strpos($css, '?')) !== false)
-	) {
-		$distant = true;
-		$cssf = parse_url($css);
-		$cssf = $cssf['path'] . ($cssf['query'] ? '?' . $cssf['query'] : '');
-		$cssf = preg_replace(',[?:&=],', '_', $cssf);
-	} else {
-		$distant = false;
-		$cssf = $css;
-		// 1. regarder d'abord si un fichier avec la bonne direction n'est pas aussi
-		//propose (rien a faire dans ce cas)
-		$f = preg_replace(',(_rtl)?\.css$,i', '_' . $ndir . '.css', $css);
-		if (@file_exists($f)) {
-			return $f;
-		}
-	}
-
-	// 2.
-	$dir_var = sous_repertoire(_DIR_VAR, 'cache-css');
-	$f = $dir_var
-		. preg_replace(',.*/(.*?)(_rtl)?\.css,', '\1', $cssf)
-		. '.' . substr(md5($cssf), 0, 4) . '_' . $ndir . '.css';
-
-	// la css peut etre distante (url absolue !)
-	if ($distant) {
-		include_spip('inc/distant');
-		$res = recuperer_url($css);
-		if (!$res or !$contenu = $res['page']) {
-			return $css;
-		}
-	} else {
-		if (
-			(@filemtime($f) > @filemtime($css))
-			and (_VAR_MODE != 'recalcul')
-		) {
-			return $f;
-		}
-		if (!lire_fichier($css, $contenu)) {
-			return $css;
-		}
-	}
-
-
-	// Inverser la direction gauche-droite en utilisant CSSTidy qui gere aussi les shorthands
-	include_spip('lib/csstidy/class.csstidy');
-	$parser = new csstidy();
-	$parser->set_cfg('optimise_shorthands', 0);
-	$parser->set_cfg('reverse_left_and_right', true);
-	$parser->parse($contenu);
-
-	$contenu = $parser->print->plain();
-
-
-	// reperer les @import auxquels il faut propager le direction_css
-	preg_match_all(",\@import\s*url\s*\(\s*['\"]?([^'\"/][^:]*)['\"]?\s*\),Uims", $contenu, $regs);
-	$src = [];
-	$src_direction_css = [];
-	$src_faux_abs = [];
-	$d = dirname($css);
-	foreach ($regs[1] as $k => $import_css) {
-		$css_direction = direction_css("$d/$import_css", $voulue);
-		// si la css_direction est dans le meme path que la css d'origine, on tronque le path, elle sera passee en absolue
-		if (substr($css_direction, 0, strlen($d) + 1) == "$d/") {
-			$css_direction = substr($css_direction, strlen($d) + 1);
-		} // si la css_direction commence par $dir_var on la fait passer pour une absolue
-		elseif (substr($css_direction, 0, strlen($dir_var)) == $dir_var) {
-			$css_direction = substr($css_direction, strlen($dir_var));
-			$src_faux_abs['/@@@@@@/' . $css_direction] = $css_direction;
-			$css_direction = '/@@@@@@/' . $css_direction;
-		}
-		$src[] = $regs[0][$k];
-		$src_direction_css[] = str_replace($import_css, $css_direction, $regs[0][$k]);
-	}
-	$contenu = str_replace($src, $src_direction_css, $contenu);
-
-	$contenu = urls_absolues_css($contenu, $css);
-
-	// virer les fausses url absolues que l'on a mis dans les import
-	if (count($src_faux_abs)) {
-		$contenu = str_replace(array_keys($src_faux_abs), $src_faux_abs, $contenu);
-	}
-
-	if (!ecrire_fichier($f, $contenu)) {
-		return $css;
-	}
-
-	return $f;
+    if (!preg_match(',(_rtl)?\.css$,i', $css, $r)) {
+        return $css;
+    }
+    include_spip('inc/lang');
+    // si on a precise le sens voulu en argument, le prendre en compte
+    if ($voulue = strtolower($voulue)) {
+        if ($voulue != 'rtl' and $voulue != 'ltr') {
+            $voulue = lang_dir($voulue);
+        }
+    } else {
+        $voulue = lang_dir();
+    }
+
+    $r = count($r) > 1;
+    $right = $r ? 'left' : 'right'; // 'right' de la css lue en entree
+    $dir = $r ? 'rtl' : 'ltr';
+    $ndir = $r ? 'ltr' : 'rtl';
+
+    if ($voulue == $dir) {
+        return $css;
+    }
+
+    if (
+        // url absolue
+        preg_match(',^https?:,i', $css)
+        // ou qui contient un ?
+        or (($p = strpos($css, '?')) !== false)
+    ) {
+        $distant = true;
+        $cssf = parse_url($css);
+        $cssf = $cssf['path'] . ($cssf['query'] ? '?' . $cssf['query'] : '');
+        $cssf = preg_replace(',[?:&=],', '_', $cssf);
+    } else {
+        $distant = false;
+        $cssf = $css;
+        // 1. regarder d'abord si un fichier avec la bonne direction n'est pas aussi
+        //propose (rien a faire dans ce cas)
+        $f = preg_replace(',(_rtl)?\.css$,i', '_' . $ndir . '.css', $css);
+        if (@file_exists($f)) {
+            return $f;
+        }
+    }
+
+    // 2.
+    $dir_var = sous_repertoire(_DIR_VAR, 'cache-css');
+    $f = $dir_var
+        . preg_replace(',.*/(.*?)(_rtl)?\.css,', '\1', $cssf)
+        . '.' . substr(md5($cssf), 0, 4) . '_' . $ndir . '.css';
+
+    // la css peut etre distante (url absolue !)
+    if ($distant) {
+        include_spip('inc/distant');
+        $res = recuperer_url($css);
+        if (!$res or !$contenu = $res['page']) {
+            return $css;
+        }
+    } else {
+        if (
+            (@filemtime($f) > @filemtime($css))
+            and (_VAR_MODE != 'recalcul')
+        ) {
+            return $f;
+        }
+        if (!lire_fichier($css, $contenu)) {
+            return $css;
+        }
+    }
+
+
+    // Inverser la direction gauche-droite en utilisant CSSTidy qui gere aussi les shorthands
+    include_spip('lib/csstidy/class.csstidy');
+    $parser = new csstidy();
+    $parser->set_cfg('optimise_shorthands', 0);
+    $parser->set_cfg('reverse_left_and_right', true);
+    $parser->parse($contenu);
+
+    $contenu = $parser->print->plain();
+
+
+    // reperer les @import auxquels il faut propager le direction_css
+    preg_match_all(",\@import\s*url\s*\(\s*['\"]?([^'\"/][^:]*)['\"]?\s*\),Uims", $contenu, $regs);
+    $src = [];
+    $src_direction_css = [];
+    $src_faux_abs = [];
+    $d = dirname($css);
+    foreach ($regs[1] as $k => $import_css) {
+        $css_direction = direction_css("$d/$import_css", $voulue);
+        // si la css_direction est dans le meme path que la css d'origine, on tronque le path, elle sera passee en absolue
+        if (substr($css_direction, 0, strlen($d) + 1) == "$d/") {
+            $css_direction = substr($css_direction, strlen($d) + 1);
+        } // si la css_direction commence par $dir_var on la fait passer pour une absolue
+        elseif (substr($css_direction, 0, strlen($dir_var)) == $dir_var) {
+            $css_direction = substr($css_direction, strlen($dir_var));
+            $src_faux_abs['/@@@@@@/' . $css_direction] = $css_direction;
+            $css_direction = '/@@@@@@/' . $css_direction;
+        }
+        $src[] = $regs[0][$k];
+        $src_direction_css[] = str_replace($import_css, $css_direction, $regs[0][$k]);
+    }
+    $contenu = str_replace($src, $src_direction_css, $contenu);
+
+    $contenu = urls_absolues_css($contenu, $css);
+
+    // virer les fausses url absolues que l'on a mis dans les import
+    if (count($src_faux_abs)) {
+        $contenu = str_replace(array_keys($src_faux_abs), $src_faux_abs, $contenu);
+    }
+
+    if (!ecrire_fichier($f, $contenu)) {
+        return $css;
+    }
+
+    return $f;
 }
 
 
@@ -3131,46 +3131,46 @@ 
  *     - Chemin ou URL du fichier CSS source sinon.
  **/
 function url_absolue_css($css) {
-	if (!preg_match(',\.css$,i', $css, $r)) {
-		return $css;
-	}
+    if (!preg_match(',\.css$,i', $css, $r)) {
+        return $css;
+    }
 
-	$url_absolue_css = url_absolue($css);
+    $url_absolue_css = url_absolue($css);
 
-	$f = basename($css, '.css');
-	$f = sous_repertoire(_DIR_VAR, 'cache-css')
-		. preg_replace(',(.*?)(_rtl|_ltr)?$,', "\\1-urlabs-" . substr(md5("$css-urlabs"), 0, 4) . "\\2", $f)
-		. '.css';
+    $f = basename($css, '.css');
+    $f = sous_repertoire(_DIR_VAR, 'cache-css')
+        . preg_replace(',(.*?)(_rtl|_ltr)?$,', "\\1-urlabs-" . substr(md5("$css-urlabs"), 0, 4) . "\\2", $f)
+        . '.css';
 
-	if ((@filemtime($f) > @filemtime($css)) and (_VAR_MODE != 'recalcul')) {
-		return $f;
-	}
+    if ((@filemtime($f) > @filemtime($css)) and (_VAR_MODE != 'recalcul')) {
+        return $f;
+    }
 
-	if ($url_absolue_css == $css) {
-		if (
-			strncmp($GLOBALS['meta']['adresse_site'], $css, $l = strlen($GLOBALS['meta']['adresse_site'])) != 0
-			or !lire_fichier(_DIR_RACINE . substr($css, $l), $contenu)
-		) {
-			include_spip('inc/distant');
-			$contenu = recuperer_url($css);
-			$contenu = $contenu['page'] ?? '';
-			if (!$contenu) {
-				return $css;
-			}
-		}
-	} elseif (!lire_fichier($css, $contenu)) {
-		return $css;
-	}
+    if ($url_absolue_css == $css) {
+        if (
+            strncmp($GLOBALS['meta']['adresse_site'], $css, $l = strlen($GLOBALS['meta']['adresse_site'])) != 0
+            or !lire_fichier(_DIR_RACINE . substr($css, $l), $contenu)
+        ) {
+            include_spip('inc/distant');
+            $contenu = recuperer_url($css);
+            $contenu = $contenu['page'] ?? '';
+            if (!$contenu) {
+                return $css;
+            }
+        }
+    } elseif (!lire_fichier($css, $contenu)) {
+        return $css;
+    }
 
-	// passer les url relatives a la css d'origine en url absolues
-	$contenu = urls_absolues_css($contenu, $css);
+    // passer les url relatives a la css d'origine en url absolues
+    $contenu = urls_absolues_css($contenu, $css);
 
-	// ecrire la css
-	if (!ecrire_fichier($f, $contenu)) {
-		return $css;
-	}
+    // ecrire la css
+    if (!ecrire_fichier($f, $contenu)) {
+        return $css;
+    }
 
-	return $f;
+    return $f;
 }
 
 
@@ -3204,24 +3204,24 @@ 
  *     Valeur trouvée ou valeur par défaut.
  **/
 function table_valeur($table, $cle, $defaut = '', $conserver_null = false) {
-	foreach (explode('/', $cle) as $k) {
-		$table = (is_string($table) ? @unserialize($table) : $table);
+    foreach (explode('/', $cle) as $k) {
+        $table = (is_string($table) ? @unserialize($table) : $table);
 
-		if (is_object($table)) {
-			$table = (($k !== '') and isset($table->$k)) ? $table->$k : $defaut;
-		} elseif (is_array($table)) {
-			if ($conserver_null) {
-				$table = array_key_exists($k, $table) ? $table[$k] : $defaut;
-			} else {
-				$table = ($table[$k] ?? $defaut);
-			}
-		} else {
-			$table = $defaut;
-			break;
-		}
-	}
+        if (is_object($table)) {
+            $table = (($k !== '') and isset($table->$k)) ? $table->$k : $defaut;
+        } elseif (is_array($table)) {
+            if ($conserver_null) {
+                $table = array_key_exists($k, $table) ? $table[$k] : $defaut;
+            } else {
+                $table = ($table[$k] ?? $defaut);
+            }
+        } else {
+            $table = $defaut;
+            break;
+        }
+    }
 
-	return $table;
+    return $table;
 }
 
 /**
@@ -3254,22 +3254,22 @@ 
  *     - string : expression trouvée.
  **/
 function filtre_match_dist(?string $texte, $expression, $modif = 'UuimsS', $capte = 0) {
-	if (intval($modif) and $capte == 0) {
-		$capte = $modif;
-		$modif = 'UuimsS';
-	}
-	$expression = str_replace('\/', '/', $expression);
-	$expression = str_replace('/', '\/', $expression);
+    if (intval($modif) and $capte == 0) {
+        $capte = $modif;
+        $modif = 'UuimsS';
+    }
+    $expression = str_replace('\/', '/', $expression);
+    $expression = str_replace('/', '\/', $expression);
 
-	if (preg_match('/' . $expression . '/' . $modif, $texte ?? '', $r)) {
-		if (isset($r[$capte])) {
-			return $r[$capte];
-		} else {
-			return true;
-		}
-	}
+    if (preg_match('/' . $expression . '/' . $modif, $texte ?? '', $r)) {
+        if (isset($r[$capte])) {
+            return $r[$capte];
+        } else {
+            return true;
+        }
+    }
 
-	return false;
+    return false;
 }
 
 
@@ -3296,10 +3296,10 @@ 
  *     Texte
  **/
 function replace($texte, $expression, $replace = '', $modif = 'UimsS') {
-	$expression = str_replace('\/', '/', $expression);
-	$expression = str_replace('/', '\/', $expression);
+    $expression = str_replace('\/', '/', $expression);
+    $expression = str_replace('/', '\/', $expression);
 
-	return preg_replace('/' . $expression . '/' . $modif, $replace, $texte);
+    return preg_replace('/' . $expression . '/' . $modif, $replace, $texte);
 }
 
 
@@ -3317,25 +3317,25 @@ 
  **/
 function traiter_doublons_documents(&$doublons, $letexte) {
 
-	// Verifier dans le texte & les notes (pas beau, helas)
-	$t = $letexte . $GLOBALS['les_notes'];
+    // Verifier dans le texte & les notes (pas beau, helas)
+    $t = $letexte . $GLOBALS['les_notes'];
 
-	if (
-		strstr($t, 'spip_document_') // evite le preg_match_all si inutile
-		and preg_match_all(
-			',<[^>]+\sclass=["\']spip_document_([0-9]+)[\s"\'],imsS',
-			$t,
-			$matches,
-			PREG_PATTERN_ORDER
-		)
-	) {
-		if (!isset($doublons['documents'])) {
-			$doublons['documents'] = '';
-		}
-		$doublons['documents'] .= ',' . join(',', $matches[1]);
-	}
+    if (
+        strstr($t, 'spip_document_') // evite le preg_match_all si inutile
+        and preg_match_all(
+            ',<[^>]+\sclass=["\']spip_document_([0-9]+)[\s"\'],imsS',
+            $t,
+            $matches,
+            PREG_PATTERN_ORDER
+        )
+    ) {
+        if (!isset($doublons['documents'])) {
+            $doublons['documents'] = '';
+        }
+        $doublons['documents'] .= ',' . join(',', $matches[1]);
+    }
 
-	return $letexte;
+    return $letexte;
 }
 
 /**
@@ -3349,7 +3349,7 @@ 
  * @return string Chaîne vide
  **/
 function vide($texte) {
-	return '';
+    return '';
 }
 
 //
@@ -3378,23 +3378,23 @@ 
  *      Code HTML résultant
  **/
 function env_to_params($env, $ignore_params = []) {
-	$ignore_params = array_merge(
-		['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
-		$ignore_params
-	);
-	if (!is_array($env)) {
-		$env = unserialize($env);
-	}
-	$texte = '';
-	if ($env) {
-		foreach ($env as $i => $j) {
-			if (is_string($j) and !in_array($i, $ignore_params)) {
-				$texte .= "<param name='" . attribut_html($i) . "'\n\tvalue='" . attribut_html($j) . "' />";
-			}
-		}
-	}
-
-	return $texte;
+    $ignore_params = array_merge(
+        ['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
+        $ignore_params
+    );
+    if (!is_array($env)) {
+        $env = unserialize($env);
+    }
+    $texte = '';
+    if ($env) {
+        foreach ($env as $i => $j) {
+            if (is_string($j) and !in_array($i, $ignore_params)) {
+                $texte .= "<param name='" . attribut_html($i) . "'\n\tvalue='" . attribut_html($j) . "' />";
+            }
+        }
+    }
+
+    return $texte;
 }
 
 /**
@@ -3417,23 +3417,23 @@ 
  *      Code HTML résultant
  **/
 function env_to_attributs($env, $ignore_params = []) {
-	$ignore_params = array_merge(
-		['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
-		$ignore_params
-	);
-	if (!is_array($env)) {
-		$env = unserialize($env);
-	}
-	$texte = '';
-	if ($env) {
-		foreach ($env as $i => $j) {
-			if (is_string($j) and !in_array($i, $ignore_params)) {
-				$texte .= attribut_html($i) . "='" . attribut_html($j) . "' ";
-			}
-		}
-	}
+    $ignore_params = array_merge(
+        ['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
+        $ignore_params
+    );
+    if (!is_array($env)) {
+        $env = unserialize($env);
+    }
+    $texte = '';
+    if ($env) {
+        foreach ($env as $i => $j) {
+            if (is_string($j) and !in_array($i, $ignore_params)) {
+                $texte .= attribut_html($i) . "='" . attribut_html($j) . "' ";
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -3451,7 +3451,7 @@ 
  * @return string Chaînes concaténés
  **/
 function concat(...$args): string {
-	return join('', $args);
+    return join('', $args);
 }
 
 
@@ -3471,23 +3471,23 @@ 
  *     Contenu du ou des fichiers, concaténé
  **/
 function charge_scripts($files, $script = true) {
-	$flux = '';
-	foreach (is_array($files) ? $files : explode('|', $files) as $file) {
-		if (!is_string($file)) {
-			continue;
-		}
-		if ($script) {
-			$file = preg_match(',^\w+$,', $file) ? "javascript/$file.js" : '';
-		}
-		if ($file) {
-			$path = find_in_path($file);
-			if ($path) {
-				$flux .= spip_file_get_contents($path);
-			}
-		}
-	}
-
-	return $flux;
+    $flux = '';
+    foreach (is_array($files) ? $files : explode('|', $files) as $file) {
+        if (!is_string($file)) {
+            continue;
+        }
+        if ($script) {
+            $file = preg_match(',^\w+$,', $file) ? "javascript/$file.js" : '';
+        }
+        if ($file) {
+            $path = find_in_path($file);
+            if ($path) {
+                $flux .= spip_file_get_contents($path);
+            }
+        }
+    }
+
+    return $flux;
 }
 
 /**
@@ -3498,22 +3498,22 @@ 
  * @return string
  */
 function http_img_variante_svg_si_possible($img_file) {
-	// on peut fournir une icone generique -xx.svg qui fera le job dans toutes les tailles, et qui est prioritaire sur le png
-	// si il y a un .svg a la bonne taille (-16.svg) a cote, on l'utilise en remplacement du -16.png
-	if (
-		preg_match(',-(\d+)[.](png|gif|svg)$,', $img_file, $m)
-		and $variante_svg_generique = substr($img_file, 0, -strlen($m[0])) . '-xx.svg'
-		and file_exists($variante_svg_generique)
-	) {
-		if ($variante_svg_size = substr($variante_svg_generique, 0, -6) . $m[1] . '.svg' and file_exists($variante_svg_size)) {
-			$img_file = $variante_svg_size;
-		}
-		else {
-			$img_file = $variante_svg_generique;
-		}
-	}
+    // on peut fournir une icone generique -xx.svg qui fera le job dans toutes les tailles, et qui est prioritaire sur le png
+    // si il y a un .svg a la bonne taille (-16.svg) a cote, on l'utilise en remplacement du -16.png
+    if (
+        preg_match(',-(\d+)[.](png|gif|svg)$,', $img_file, $m)
+        and $variante_svg_generique = substr($img_file, 0, -strlen($m[0])) . '-xx.svg'
+        and file_exists($variante_svg_generique)
+    ) {
+        if ($variante_svg_size = substr($variante_svg_generique, 0, -6) . $m[1] . '.svg' and file_exists($variante_svg_size)) {
+            $img_file = $variante_svg_size;
+        }
+        else {
+            $img_file = $variante_svg_generique;
+        }
+    }
 
-	return $img_file;
+    return $img_file;
 }
 
 /**
@@ -3534,54 +3534,54 @@ 
  */
 function http_img_pack($img, $alt, $atts = '', $title = '', $options = []) {
 
-	$img_file = $img;
-	if ($p = strpos($img_file, '?')) {
-		$img_file = substr($img_file, 0, $p);
-	}
-	if (!isset($options['chemin_image']) or $options['chemin_image'] == true) {
-		$img_file = chemin_image($img);
-	}
-	else {
-		if (!isset($options['variante_svg_si_possible']) or $options['variante_svg_si_possible'] == true) {
-			$img_file = http_img_variante_svg_si_possible($img_file);
-		}
-	}
-	if (stripos($atts, 'width') === false) {
-		// utiliser directement l'info de taille presente dans le nom
-		if (
-			(!isset($options['utiliser_suffixe_size'])
-				or $options['utiliser_suffixe_size'] == true
-			  or strpos($img_file, '-xx.svg') !== false)
-			and (preg_match(',-([0-9]+)[.](png|gif|svg)$,', $img, $regs)
-					 or preg_match(',\?([0-9]+)px$,', $img, $regs))
-		) {
-			$largeur = $hauteur = intval($regs[1]);
-		} else {
-			$taille = taille_image($img_file);
-			[$hauteur, $largeur] = $taille;
-			if (!$hauteur or !$largeur) {
-				return '';
-			}
-		}
-		$atts .= " width='" . $largeur . "' height='" . $hauteur . "'";
-	}
-
-	if (file_exists($img_file)) {
-		$img_file = timestamp($img_file);
-	}
-	if ($alt === false) {
-		$alt = '';
-	}
-	elseif ($alt or $alt === '') {
-		$alt = " alt='" . attribut_html($alt) . "'";
-	}
-	else {
-		$alt = " alt='" . attribut_html($title) . "'";
-	}
-	return "<img src='" . attribut_html($img_file) . "'$alt"
-	. ($title ? ' title="' . attribut_html($title) . '"' : '')
-	. ' ' . ltrim($atts)
-	. ' />';
+    $img_file = $img;
+    if ($p = strpos($img_file, '?')) {
+        $img_file = substr($img_file, 0, $p);
+    }
+    if (!isset($options['chemin_image']) or $options['chemin_image'] == true) {
+        $img_file = chemin_image($img);
+    }
+    else {
+        if (!isset($options['variante_svg_si_possible']) or $options['variante_svg_si_possible'] == true) {
+            $img_file = http_img_variante_svg_si_possible($img_file);
+        }
+    }
+    if (stripos($atts, 'width') === false) {
+        // utiliser directement l'info de taille presente dans le nom
+        if (
+            (!isset($options['utiliser_suffixe_size'])
+                or $options['utiliser_suffixe_size'] == true
+              or strpos($img_file, '-xx.svg') !== false)
+            and (preg_match(',-([0-9]+)[.](png|gif|svg)$,', $img, $regs)
+                     or preg_match(',\?([0-9]+)px$,', $img, $regs))
+        ) {
+            $largeur = $hauteur = intval($regs[1]);
+        } else {
+            $taille = taille_image($img_file);
+            [$hauteur, $largeur] = $taille;
+            if (!$hauteur or !$largeur) {
+                return '';
+            }
+        }
+        $atts .= " width='" . $largeur . "' height='" . $hauteur . "'";
+    }
+
+    if (file_exists($img_file)) {
+        $img_file = timestamp($img_file);
+    }
+    if ($alt === false) {
+        $alt = '';
+    }
+    elseif ($alt or $alt === '') {
+        $alt = " alt='" . attribut_html($alt) . "'";
+    }
+    else {
+        $alt = " alt='" . attribut_html($title) . "'";
+    }
+    return "<img src='" . attribut_html($img_file) . "'$alt"
+    . ($title ? ' title="' . attribut_html($title) . '"' : '')
+    . ' ' . ltrim($atts)
+    . ' />';
 }
 
 /**
@@ -3593,70 +3593,70 @@ 
  * @return string
  */
 function http_style_background($img, $att = '', $size = null) {
-	if ($size and is_numeric($size)) {
-		$size = trim($size) . 'px';
-	}
-	return " style='background" .
-		($att ? '' : '-image') . ': url("' . chemin_image($img) . '")' . ($att ? (' ' . $att) : '') . ';'
-		. ($size ? "background-size:{$size};" : '')
-		. "'";
+    if ($size and is_numeric($size)) {
+        $size = trim($size) . 'px';
+    }
+    return " style='background" .
+        ($att ? '' : '-image') . ': url("' . chemin_image($img) . '")' . ($att ? (' ' . $att) : '') . ';'
+        . ($size ? "background-size:{$size};" : '')
+        . "'";
 }
 
 
 function helper_filtre_balise_img_svg_arguments($alt_or_size, $class_or_size, $size) {
-	$args = [$alt_or_size, $class_or_size, $size];
-	while (is_null(end($args)) and count($args)) {
-		array_pop($args);
-	}
-	if (!count($args)) {
-		return [null, null, null];
-	}
-	if (count($args) < 3) {
-		$maybe_size = array_pop($args);
-		// @2x
-		// @1.5x
-		// 512
-		// 512x*
-		// 512x300
-		if (
-			!strlen($maybe_size)
-			or !preg_match(',^(@\d+(\.\d+)?x|\d+(x\*)?|\d+x\d+)$,', trim($maybe_size))
-		) {
-			$args[] = $maybe_size;
-			$maybe_size = null;
-		}
-		while (count($args) < 2) {
-			$args[] = null; // default alt or class
-		}
-		$args[] = $maybe_size;
-	}
-	return $args;
+    $args = [$alt_or_size, $class_or_size, $size];
+    while (is_null(end($args)) and count($args)) {
+        array_pop($args);
+    }
+    if (!count($args)) {
+        return [null, null, null];
+    }
+    if (count($args) < 3) {
+        $maybe_size = array_pop($args);
+        // @2x
+        // @1.5x
+        // 512
+        // 512x*
+        // 512x300
+        if (
+            !strlen($maybe_size)
+            or !preg_match(',^(@\d+(\.\d+)?x|\d+(x\*)?|\d+x\d+)$,', trim($maybe_size))
+        ) {
+            $args[] = $maybe_size;
+            $maybe_size = null;
+        }
+        while (count($args) < 2) {
+            $args[] = null; // default alt or class
+        }
+        $args[] = $maybe_size;
+    }
+    return $args;
 }
 
 function helper_filtre_balise_img_svg_size($img, $size) {
-	// si size est de la forme '@2x' c'est un coeff multiplicateur sur la densite
-	if (strpos($size, '@') === 0 and substr($size, -1) === 'x') {
-		$coef = floatval(substr($size, 1, -1));
-		[$h, $w] = taille_image($img);
-		$height = intval(round($h / $coef));
-		$width = intval(round($w / $coef));
-	}
-	// sinon c'est une valeur seule si image caree ou largeurxhauteur
-	else {
-		$size = explode('x', $size, 2);
-		$size = array_map('trim', $size);
-		$height = $width = intval(array_shift($size));
-
-		if (count($size) and reset($size)) {
-			$height = array_shift($size);
-			if ($height === '*') {
-				[$h, $w] = taille_image($img);
-				$height = intval(round($h * $width / $w));
-			}
-		}
-	}
-
-	return [$width, $height];
+    // si size est de la forme '@2x' c'est un coeff multiplicateur sur la densite
+    if (strpos($size, '@') === 0 and substr($size, -1) === 'x') {
+        $coef = floatval(substr($size, 1, -1));
+        [$h, $w] = taille_image($img);
+        $height = intval(round($h / $coef));
+        $width = intval(round($w / $coef));
+    }
+    // sinon c'est une valeur seule si image caree ou largeurxhauteur
+    else {
+        $size = explode('x', $size, 2);
+        $size = array_map('trim', $size);
+        $height = $width = intval(array_shift($size));
+
+        if (count($size) and reset($size)) {
+            $height = array_shift($size);
+            if ($height === '*') {
+                [$h, $w] = taille_image($img);
+                $height = intval(round($h * $width / $w));
+            }
+        }
+    }
+
+    return [$width, $height];
 }
 
 /**
@@ -3692,43 +3692,43 @@ 
  */
 function filtre_balise_img_dist($img, $alt = '', $class = null, $size = null) {
 
-	[$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
-
-	$img = trim((string) $img);
-	if (strpos($img, '<img') === 0) {
-		if (!is_null($alt)) {
-			$img = inserer_attribut($img, 'alt', $alt);
-		}
-		if (!is_null($class)) {
-			if (strlen($class)) {
-				$img = inserer_attribut($img, 'class', $class);
-			}
-			else {
-				$img = vider_attribut($img, 'class');
-			}
-		}
-	}
-	else {
-		$img = http_img_pack(
-			$img,
-			$alt,
-			$class ? " class='" . attribut_html($class) . "'" : '',
-			'',
-			['chemin_image' => false, 'utiliser_suffixe_size' => false]
-		);
-		if (is_null($alt)) {
-			$img = vider_attribut($img, 'alt');
-		}
-	}
-
-	if ($img and !is_null($size) and strlen($size = trim($size))) {
-		[$width, $height] = helper_filtre_balise_img_svg_size($img, $size);
-
-		$img = inserer_attribut($img, 'width', $width);
-		$img = inserer_attribut($img, 'height', $height);
-	}
-
-	return $img;
+    [$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
+
+    $img = trim((string) $img);
+    if (strpos($img, '<img') === 0) {
+        if (!is_null($alt)) {
+            $img = inserer_attribut($img, 'alt', $alt);
+        }
+        if (!is_null($class)) {
+            if (strlen($class)) {
+                $img = inserer_attribut($img, 'class', $class);
+            }
+            else {
+                $img = vider_attribut($img, 'class');
+            }
+        }
+    }
+    else {
+        $img = http_img_pack(
+            $img,
+            $alt,
+            $class ? " class='" . attribut_html($class) . "'" : '',
+            '',
+            ['chemin_image' => false, 'utiliser_suffixe_size' => false]
+        );
+        if (is_null($alt)) {
+            $img = vider_attribut($img, 'alt');
+        }
+    }
+
+    if ($img and !is_null($size) and strlen($size = trim($size))) {
+        [$width, $height] = helper_filtre_balise_img_svg_size($img, $size);
+
+        $img = inserer_attribut($img, 'width', $width);
+        $img = inserer_attribut($img, 'height', $height);
+    }
+
+    return $img;
 }
 
 
@@ -3762,80 +3762,80 @@ 
  */
 function filtre_balise_svg_dist($img, $alt = '', $class = null, $size = null) {
 
-	$svg = null;
-	$img = trim($img);
-	$img_file = $img;
-	if (strpos($img, '<svg') === false) {
-		if ($p = strpos($img_file, '?')) {
-			$img_file = substr($img_file, 0, $p);
-		}
-
-		// ne jamais operer directement sur une image distante pour des raisons de perfo
-		// la copie locale a toutes les chances d'etre la ou de resservir
-		if (tester_url_absolue($img_file)) {
-			include_spip('inc/distant');
-			$fichier = copie_locale($img_file);
-			$img_file = ($fichier ? _DIR_RACINE . $fichier : $img_file);
-		}
-
-		if (
-			!$img_file
-			or !file_exists($img_file)
-			or !$svg = file_get_contents($img_file)
-		) {
-			return '';
-		}
-	}
-
-	if (!preg_match(",<svg\b[^>]*>,UimsS", $svg, $match)) {
-		return '';
-	}
-
-	[$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
-
-	$balise_svg = $match[0];
-	$balise_svg_source = $balise_svg;
-
-	// entete XML à supprimer
-	$svg = preg_replace(',^\s*<\?xml[^>]*\?' . '>,', '', $svg);
-
-	// IE est toujours mon ami
-	$balise_svg = inserer_attribut($balise_svg, 'focusable', 'false');
-
-	// regler la classe
-	if (!is_null($class)) {
-		if (strlen($class)) {
-			$balise_svg = inserer_attribut($balise_svg, 'class', $class);
-		}
-		else {
-			$balise_svg = vider_attribut($balise_svg, 'class');
-		}
-	}
-
-	// regler le alt
-	if ($alt) {
-		$balise_svg = inserer_attribut($balise_svg, 'role', 'img');
-		$id = 'img-svg-title-' . substr(md5("$img_file:$svg:$alt"), 0, 4);
-		$balise_svg = inserer_attribut($balise_svg, 'aria-labelledby', $id);
-		$title = "<title id=\"$id\">" . entites_html($alt) . "</title>\n";
-		$balise_svg .= $title;
-	}
-	else {
-		$balise_svg = inserer_attribut($balise_svg, 'aria-hidden', 'true');
-	}
-
-	$svg = str_replace($balise_svg_source, $balise_svg, $svg);
-
-	if (!is_null($size) and strlen($size = trim($size))) {
-		[$width, $height] = helper_filtre_balise_img_svg_size($svg, $size);
-
-		if (!function_exists('svg_redimensionner')) {
-			include_spip('inc/svg');
-		}
-		$svg = svg_redimensionner($svg, $width, $height);
-	}
-
-	return $svg;
+    $svg = null;
+    $img = trim($img);
+    $img_file = $img;
+    if (strpos($img, '<svg') === false) {
+        if ($p = strpos($img_file, '?')) {
+            $img_file = substr($img_file, 0, $p);
+        }
+
+        // ne jamais operer directement sur une image distante pour des raisons de perfo
+        // la copie locale a toutes les chances d'etre la ou de resservir
+        if (tester_url_absolue($img_file)) {
+            include_spip('inc/distant');
+            $fichier = copie_locale($img_file);
+            $img_file = ($fichier ? _DIR_RACINE . $fichier : $img_file);
+        }
+
+        if (
+            !$img_file
+            or !file_exists($img_file)
+            or !$svg = file_get_contents($img_file)
+        ) {
+            return '';
+        }
+    }
+
+    if (!preg_match(",<svg\b[^>]*>,UimsS", $svg, $match)) {
+        return '';
+    }
+
+    [$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
+
+    $balise_svg = $match[0];
+    $balise_svg_source = $balise_svg;
+
+    // entete XML à supprimer
+    $svg = preg_replace(',^\s*<\?xml[^>]*\?' . '>,', '', $svg);
+
+    // IE est toujours mon ami
+    $balise_svg = inserer_attribut($balise_svg, 'focusable', 'false');
+
+    // regler la classe
+    if (!is_null($class)) {
+        if (strlen($class)) {
+            $balise_svg = inserer_attribut($balise_svg, 'class', $class);
+        }
+        else {
+            $balise_svg = vider_attribut($balise_svg, 'class');
+        }
+    }
+
+    // regler le alt
+    if ($alt) {
+        $balise_svg = inserer_attribut($balise_svg, 'role', 'img');
+        $id = 'img-svg-title-' . substr(md5("$img_file:$svg:$alt"), 0, 4);
+        $balise_svg = inserer_attribut($balise_svg, 'aria-labelledby', $id);
+        $title = "<title id=\"$id\">" . entites_html($alt) . "</title>\n";
+        $balise_svg .= $title;
+    }
+    else {
+        $balise_svg = inserer_attribut($balise_svg, 'aria-hidden', 'true');
+    }
+
+    $svg = str_replace($balise_svg_source, $balise_svg, $svg);
+
+    if (!is_null($size) and strlen($size = trim($size))) {
+        [$width, $height] = helper_filtre_balise_img_svg_size($svg, $size);
+
+        if (!function_exists('svg_redimensionner')) {
+            include_spip('inc/svg');
+        }
+        $svg = svg_redimensionner($svg, $width, $height);
+    }
+
+    return $svg;
 }
 
 
@@ -3861,18 +3861,18 @@ 
  *     Code HTML résultant
  **/
 function filtre_foreach_dist($tableau, $modele = 'foreach') {
-	$texte = '';
-	if (is_array($tableau)) {
-		foreach ($tableau as $k => $v) {
-			$res = recuperer_fond(
-				'modeles/' . $modele,
-				array_merge(['cle' => $k], (is_array($v) ? $v : ['valeur' => $v]))
-			);
-			$texte .= $res;
-		}
-	}
+    $texte = '';
+    if (is_array($tableau)) {
+        foreach ($tableau as $k => $v) {
+            $res = recuperer_fond(
+                'modeles/' . $modele,
+                array_merge(['cle' => $k], (is_array($v) ? $v : ['valeur' => $v]))
+            );
+            $texte .= $res;
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -3897,37 +3897,37 @@ 
  *         - tout : retourne toutes les informations du plugin actif
  **/
 function filtre_info_plugin_dist($plugin, $type_info, $reload = false) {
-	include_spip('inc/plugin');
-	$plugin = strtoupper($plugin);
-	$plugins_actifs = liste_plugin_actifs();
-
-	if (!$plugin) {
-		return serialize(array_keys($plugins_actifs));
-	} elseif (empty($plugins_actifs[$plugin]) and !$reload) {
-		return '';
-	} elseif (($type_info == 'est_actif') and !$reload) {
-		return $plugins_actifs[$plugin] ? 1 : 0;
-	} elseif (isset($plugins_actifs[$plugin][$type_info]) and !$reload) {
-		return $plugins_actifs[$plugin][$type_info];
-	} else {
-		$get_infos = charger_fonction('get_infos', 'plugins');
-		// On prend en compte les extensions
-		if (!is_dir($plugins_actifs[$plugin]['dir_type'])) {
-			$dir_plugins = constant($plugins_actifs[$plugin]['dir_type']);
-		} else {
-			$dir_plugins = $plugins_actifs[$plugin]['dir_type'];
-		}
-		if (!$infos = $get_infos($plugins_actifs[$plugin]['dir'], $reload, $dir_plugins)) {
-			return '';
-		}
-		if ($type_info == 'tout') {
-			return $infos;
-		} elseif ($type_info == 'est_actif') {
-			return $infos ? 1 : 0;
-		} else {
-			return strval($infos[$type_info]);
-		}
-	}
+    include_spip('inc/plugin');
+    $plugin = strtoupper($plugin);
+    $plugins_actifs = liste_plugin_actifs();
+
+    if (!$plugin) {
+        return serialize(array_keys($plugins_actifs));
+    } elseif (empty($plugins_actifs[$plugin]) and !$reload) {
+        return '';
+    } elseif (($type_info == 'est_actif') and !$reload) {
+        return $plugins_actifs[$plugin] ? 1 : 0;
+    } elseif (isset($plugins_actifs[$plugin][$type_info]) and !$reload) {
+        return $plugins_actifs[$plugin][$type_info];
+    } else {
+        $get_infos = charger_fonction('get_infos', 'plugins');
+        // On prend en compte les extensions
+        if (!is_dir($plugins_actifs[$plugin]['dir_type'])) {
+            $dir_plugins = constant($plugins_actifs[$plugin]['dir_type']);
+        } else {
+            $dir_plugins = $plugins_actifs[$plugin]['dir_type'];
+        }
+        if (!$infos = $get_infos($plugins_actifs[$plugin]['dir'], $reload, $dir_plugins)) {
+            return '';
+        }
+        if ($type_info == 'tout') {
+            return $infos;
+        } elseif ($type_info == 'est_actif') {
+            return $infos ? 1 : 0;
+        } else {
+            return strval($infos[$type_info]);
+        }
+    }
 }
 
 
@@ -3954,9 +3954,9 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function puce_changement_statut($id_objet, $statut, $id_rubrique, $type, $ajax = false) {
-	$puce_statut = charger_fonction('puce_statut', 'inc');
+    $puce_statut = charger_fonction('puce_statut', 'inc');
 
-	return $puce_statut($id_objet, $statut, $id_rubrique, $type, $ajax);
+    return $puce_statut($id_objet, $statut, $id_rubrique, $type, $ajax);
 }
 
 
@@ -3986,19 +3986,19 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function filtre_puce_statut_dist($statut, $objet, $id_objet = 0, $id_parent = 0) {
-	static $puce_statut = null;
-	if (!$puce_statut) {
-		$puce_statut = charger_fonction('puce_statut', 'inc');
-	}
+    static $puce_statut = null;
+    if (!$puce_statut) {
+        $puce_statut = charger_fonction('puce_statut', 'inc');
+    }
 
-	return $puce_statut(
-		$id_objet,
-		$statut,
-		$id_parent,
-		$objet,
-		false,
-		objet_info($objet, 'editable') ? _ACTIVER_PUCE_RAPIDE : false
-	);
+    return $puce_statut(
+        $id_objet,
+        $statut,
+        $id_parent,
+        $objet,
+        false,
+        objet_info($objet, 'editable') ? _ACTIVER_PUCE_RAPIDE : false
+    );
 }
 
 
@@ -4025,98 +4025,98 @@ 
  *   hash du contexte
  */
 function encoder_contexte_ajax($c, $form = '', $emboite = null, $ajaxid = '') {
-	$env = null;
-	if (
-		is_string($c)
-		and @unserialize($c) !== false
-	) {
-		$c = unserialize($c);
-	}
-
-	// supprimer les parametres debut_x
-	// pour que la pagination ajax ne soit pas plantee
-	// si on charge la page &debut_x=1 : car alors en cliquant sur l'item 0,
-	// le debut_x=0 n'existe pas, et on resterait sur 1
-	if (is_array($c)) {
-		foreach ($c as $k => $v) {
-			if (strpos($k, 'debut_') === 0) {
-				unset($c[$k]);
-			}
-		}
-	}
-
-	if (!function_exists('calculer_cle_action')) {
-		include_spip('inc/securiser_action');
-	}
-
-	$c = serialize($c);
-	$cle = calculer_cle_action($form . $c);
-	$c = "$cle:$c";
-
-	// on ne stocke pas les contextes dans des fichiers en cache
-	// par defaut, sauf si cette configuration a été forcée
-	// OU que la longueur de l’argument géneré est plus long
-	// que ce qui est toléré.
-	$cache_contextes_ajax = (defined('_CACHE_CONTEXTES_AJAX') and _CACHE_CONTEXTES_AJAX);
-	if (!$cache_contextes_ajax) {
-		$env = $c;
-		if (function_exists('gzdeflate') && function_exists('gzinflate')) {
-			$env = gzdeflate($env);
-		}
-		$env = _xor($env);
-		$env = base64_encode($env);
-		$len = strlen($env);
-		// Si l’url est trop longue pour le navigateur
-		$max_len = _CACHE_CONTEXTES_AJAX_SUR_LONGUEUR;
-		if ($len > $max_len) {
-			$cache_contextes_ajax = true;
-			spip_log(
-				'Contextes AJAX forces en fichiers !'
-				. ' Cela arrive lorsque la valeur du contexte'
-				. " depasse la longueur maximale autorisee ($max_len). Ici : $len.",
-				_LOG_AVERTISSEMENT
-			);
-		}
-		// Sinon si Suhosin est actif et a une la valeur maximale des variables en GET...
-		elseif (
-			$max_len = @ini_get('suhosin.get.max_value_length')
-			and $max_len < $len
-		) {
-			$cache_contextes_ajax = true;
-			spip_log('Contextes AJAX forces en fichiers !'
-				. ' Cela arrive lorsque la valeur du contexte'
-				. ' depasse la longueur maximale autorisee par Suhosin'
-				. " ($max_len) dans 'suhosin.get.max_value_length'. Ici : $len."
-				. ' Vous devriez modifier les parametres de Suhosin'
-				. ' pour accepter au moins 1024 caracteres.', _LOG_AVERTISSEMENT);
-		}
-	}
-
-	if ($cache_contextes_ajax) {
-		$dir = sous_repertoire(_DIR_CACHE, 'contextes');
-		// stocker les contextes sur disque et ne passer qu'un hash dans l'url
-		$md5 = md5($c);
-		ecrire_fichier("$dir/c$md5", $c);
-		$env = $md5;
-	}
-
-	if ($emboite === null) {
-		return $env;
-	}
-	if (!trim($emboite)) {
-		return '';
-	}
-	// toujours encoder l'url source dans le bloc ajax
-	$r = self();
-	$r = ' data-origin="' . $r . '"';
-	$class = 'ajaxbloc';
-	if ($ajaxid and is_string($ajaxid)) {
-		// ajaxid est normalement conforme a un nom de classe css
-		// on ne verifie pas la conformite, mais on passe entites_html par dessus par precaution
-		$class .= ' ajax-id-' . entites_html($ajaxid);
-	}
-
-	return "<div class='$class' " . "data-ajax-env='$env'$r>\n$emboite</div><!--ajaxbloc-->\n";
+    $env = null;
+    if (
+        is_string($c)
+        and @unserialize($c) !== false
+    ) {
+        $c = unserialize($c);
+    }
+
+    // supprimer les parametres debut_x
+    // pour que la pagination ajax ne soit pas plantee
+    // si on charge la page &debut_x=1 : car alors en cliquant sur l'item 0,
+    // le debut_x=0 n'existe pas, et on resterait sur 1
+    if (is_array($c)) {
+        foreach ($c as $k => $v) {
+            if (strpos($k, 'debut_') === 0) {
+                unset($c[$k]);
+            }
+        }
+    }
+
+    if (!function_exists('calculer_cle_action')) {
+        include_spip('inc/securiser_action');
+    }
+
+    $c = serialize($c);
+    $cle = calculer_cle_action($form . $c);
+    $c = "$cle:$c";
+
+    // on ne stocke pas les contextes dans des fichiers en cache
+    // par defaut, sauf si cette configuration a été forcée
+    // OU que la longueur de l’argument géneré est plus long
+    // que ce qui est toléré.
+    $cache_contextes_ajax = (defined('_CACHE_CONTEXTES_AJAX') and _CACHE_CONTEXTES_AJAX);
+    if (!$cache_contextes_ajax) {
+        $env = $c;
+        if (function_exists('gzdeflate') && function_exists('gzinflate')) {
+            $env = gzdeflate($env);
+        }
+        $env = _xor($env);
+        $env = base64_encode($env);
+        $len = strlen($env);
+        // Si l’url est trop longue pour le navigateur
+        $max_len = _CACHE_CONTEXTES_AJAX_SUR_LONGUEUR;
+        if ($len > $max_len) {
+            $cache_contextes_ajax = true;
+            spip_log(
+                'Contextes AJAX forces en fichiers !'
+                . ' Cela arrive lorsque la valeur du contexte'
+                . " depasse la longueur maximale autorisee ($max_len). Ici : $len.",
+                _LOG_AVERTISSEMENT
+            );
+        }
+        // Sinon si Suhosin est actif et a une la valeur maximale des variables en GET...
+        elseif (
+            $max_len = @ini_get('suhosin.get.max_value_length')
+            and $max_len < $len
+        ) {
+            $cache_contextes_ajax = true;
+            spip_log('Contextes AJAX forces en fichiers !'
+                . ' Cela arrive lorsque la valeur du contexte'
+                . ' depasse la longueur maximale autorisee par Suhosin'
+                . " ($max_len) dans 'suhosin.get.max_value_length'. Ici : $len."
+                . ' Vous devriez modifier les parametres de Suhosin'
+                . ' pour accepter au moins 1024 caracteres.', _LOG_AVERTISSEMENT);
+        }
+    }
+
+    if ($cache_contextes_ajax) {
+        $dir = sous_repertoire(_DIR_CACHE, 'contextes');
+        // stocker les contextes sur disque et ne passer qu'un hash dans l'url
+        $md5 = md5($c);
+        ecrire_fichier("$dir/c$md5", $c);
+        $env = $md5;
+    }
+
+    if ($emboite === null) {
+        return $env;
+    }
+    if (!trim($emboite)) {
+        return '';
+    }
+    // toujours encoder l'url source dans le bloc ajax
+    $r = self();
+    $r = ' data-origin="' . $r . '"';
+    $class = 'ajaxbloc';
+    if ($ajaxid and is_string($ajaxid)) {
+        // ajaxid est normalement conforme a un nom de classe css
+        // on ne verifie pas la conformite, mais on passe entites_html par dessus par precaution
+        $class .= ' ajax-id-' . entites_html($ajaxid);
+    }
+
+    return "<div class='$class' " . "data-ajax-env='$env'$r>\n$emboite</div><!--ajaxbloc-->\n";
 }
 
 /**
@@ -4136,37 +4136,37 @@ 
  *   - false : erreur de décodage
  */
 function decoder_contexte_ajax($c, $form = '') {
-	if (!function_exists('calculer_cle_action')) {
-		include_spip('inc/securiser_action');
-	}
-	if (
-		((defined('_CACHE_CONTEXTES_AJAX') and _CACHE_CONTEXTES_AJAX) or strlen($c) == 32)
-		and $dir = sous_repertoire(_DIR_CACHE, 'contextes')
-		and lire_fichier("$dir/c$c", $contexte)
-	) {
-		$c = $contexte;
-	} else {
-		$c = @base64_decode($c);
-		$c = _xor($c);
-		if (function_exists('gzdeflate') && function_exists('gzinflate')) {
-			$c = @gzinflate($c);
-		}
-	}
-
-	// extraire la signature en debut de contexte
-	// et la verifier avant de deserializer
-	// format : signature:donneesserializees
-	if ($p = strpos($c, ':')) {
-		$cle = substr($c, 0, $p);
-		$c = substr($c, $p + 1);
-
-		if ($cle == calculer_cle_action($form . $c)) {
-			$env = @unserialize($c);
-			return $env;
-		}
-	}
-
-	return false;
+    if (!function_exists('calculer_cle_action')) {
+        include_spip('inc/securiser_action');
+    }
+    if (
+        ((defined('_CACHE_CONTEXTES_AJAX') and _CACHE_CONTEXTES_AJAX) or strlen($c) == 32)
+        and $dir = sous_repertoire(_DIR_CACHE, 'contextes')
+        and lire_fichier("$dir/c$c", $contexte)
+    ) {
+        $c = $contexte;
+    } else {
+        $c = @base64_decode($c);
+        $c = _xor($c);
+        if (function_exists('gzdeflate') && function_exists('gzinflate')) {
+            $c = @gzinflate($c);
+        }
+    }
+
+    // extraire la signature en debut de contexte
+    // et la verifier avant de deserializer
+    // format : signature:donneesserializees
+    if ($p = strpos($c, ':')) {
+        $cle = substr($c, 0, $p);
+        $c = substr($c, $p + 1);
+
+        if ($cle == calculer_cle_action($form . $c)) {
+            $env = @unserialize($c);
+            return $env;
+        }
+    }
+
+    return false;
 }
 
 
@@ -4184,20 +4184,20 @@ 
  *    Message décrypté ou encrypté
  **/
 function _xor($message, $key = null) {
-	if (is_null($key)) {
-		if (!function_exists('calculer_cle_action')) {
-			include_spip('inc/securiser_action');
-		}
-		$key = pack('H*', calculer_cle_action('_xor'));
-	}
+    if (is_null($key)) {
+        if (!function_exists('calculer_cle_action')) {
+            include_spip('inc/securiser_action');
+        }
+        $key = pack('H*', calculer_cle_action('_xor'));
+    }
 
-	$keylen = strlen($key);
-	$messagelen = strlen($message);
-	for ($i = 0; $i < $messagelen; $i++) {
-		$message[$i] = ~($message[$i] ^ $key[$i % $keylen]);
-	}
+    $keylen = strlen($key);
+    $messagelen = strlen($message);
+    for ($i = 0; $i < $messagelen; $i++) {
+        $message[$i] = ~($message[$i] ^ $key[$i % $keylen]);
+    }
 
-	return $message;
+    return $message;
 }
 
 /**
@@ -4211,7 +4211,7 @@ 
  * @return string
  */
 function url_reponse_forum($texte) {
- return $texte;
+    return $texte;
 }
 
 /**
@@ -4225,7 +4225,7 @@ 
  * @return string
  */
 function url_rss_forum($texte) {
- return $texte;
+    return $texte;
 }
 
 
@@ -4264,37 +4264,37 @@ 
  *   Code HTML
  */
 function lien_ou_expose($url, $libelle = null, $on = false, $class = '', $title = '', $rel = '', $evt = '') {
-	if ($on) {
-		$bal = 'strong';
-		$class = '';
-		$att = '';
-		// si $on passe la balise et optionnelement une ou ++classe
-		// a.active span.selected.active etc....
-		if (is_string($on) and (strncmp($on, 'a', 1) == 0 or strncmp($on, 'span', 4) == 0 or strncmp($on, 'strong', 6) == 0)) {
-			$on = explode('.', $on);
-			// on verifie que c'est exactement une des 3 balises a, span ou strong
-			if (in_array(reset($on), ['a', 'span', 'strong'])) {
-				$bal = array_shift($on);
-				$class = implode(' ', $on);
-				if ($bal == 'a') {
-					$att = 'href="#" ';
-				}
-			}
-		}
-		$att .= 'class="' . ($class ? attribut_html($class) . ' ' : '') . (defined('_LIEN_OU_EXPOSE_CLASS_ON') ? _LIEN_OU_EXPOSE_CLASS_ON : 'on') . '"';
-	} else {
-		$bal = 'a';
-		$att = "href='$url'"
-			. ($title ? " title='" . attribut_html($title) . "'" : '')
-			. ($class ? " class='" . attribut_html($class) . "'" : '')
-			. ($rel ? " rel='" . attribut_html($rel) . "'" : '')
-			. $evt;
-	}
-	if ($libelle === null) {
-		$libelle = $url;
-	}
-
-	return "<$bal $att>$libelle</$bal>";
+    if ($on) {
+        $bal = 'strong';
+        $class = '';
+        $att = '';
+        // si $on passe la balise et optionnelement une ou ++classe
+        // a.active span.selected.active etc....
+        if (is_string($on) and (strncmp($on, 'a', 1) == 0 or strncmp($on, 'span', 4) == 0 or strncmp($on, 'strong', 6) == 0)) {
+            $on = explode('.', $on);
+            // on verifie que c'est exactement une des 3 balises a, span ou strong
+            if (in_array(reset($on), ['a', 'span', 'strong'])) {
+                $bal = array_shift($on);
+                $class = implode(' ', $on);
+                if ($bal == 'a') {
+                    $att = 'href="#" ';
+                }
+            }
+        }
+        $att .= 'class="' . ($class ? attribut_html($class) . ' ' : '') . (defined('_LIEN_OU_EXPOSE_CLASS_ON') ? _LIEN_OU_EXPOSE_CLASS_ON : 'on') . '"';
+    } else {
+        $bal = 'a';
+        $att = "href='$url'"
+            . ($title ? " title='" . attribut_html($title) . "'" : '')
+            . ($class ? " class='" . attribut_html($class) . "'" : '')
+            . ($rel ? " rel='" . attribut_html($rel) . "'" : '')
+            . $evt;
+    }
+    if ($libelle === null) {
+        $libelle = $url;
+    }
+
+    return "<$bal $att>$libelle</$bal>";
 }
 
 
@@ -4311,39 +4311,39 @@ 
  * @return string : la chaine de langue finale en utilisant la fonction _T()
  */
 function singulier_ou_pluriel($nb, $chaine_un, $chaine_plusieurs, $var = 'nb', $vars = []) {
-	static $local_singulier_ou_pluriel = [];
-
-	// si nb=0 ou pas de $vars valide on retourne une chaine vide, a traiter par un |sinon
-	if (!is_numeric($nb) or $nb == 0) {
-		return '';
-	}
-	if (!is_array($vars)) {
-		return '';
-	}
-
-	$langue = $GLOBALS['spip_lang'];
-	if (!isset($local_singulier_ou_pluriel[$langue])) {
-		$local_singulier_ou_pluriel[$langue] = false;
-		if (
-			$f = charger_fonction("singulier_ou_pluriel_{$langue}", 'inc', true)
-			or $f = charger_fonction('singulier_ou_pluriel', 'inc', true)
-		) {
-			$local_singulier_ou_pluriel[$langue] = $f;
-		}
-	}
-
-	// si on a une surcharge on l'utilise
-	if ($local_singulier_ou_pluriel[$langue]) {
-		return ($local_singulier_ou_pluriel[$langue])($nb, $chaine_un, $chaine_plusieurs, $var, $vars);
-	}
-
-	// sinon traitement par defaut
-	$vars[$var] = $nb;
-	if ($nb >= 2) {
-		return _T($chaine_plusieurs, $vars);
-	} else {
-		return _T($chaine_un, $vars);
-	}
+    static $local_singulier_ou_pluriel = [];
+
+    // si nb=0 ou pas de $vars valide on retourne une chaine vide, a traiter par un |sinon
+    if (!is_numeric($nb) or $nb == 0) {
+        return '';
+    }
+    if (!is_array($vars)) {
+        return '';
+    }
+
+    $langue = $GLOBALS['spip_lang'];
+    if (!isset($local_singulier_ou_pluriel[$langue])) {
+        $local_singulier_ou_pluriel[$langue] = false;
+        if (
+            $f = charger_fonction("singulier_ou_pluriel_{$langue}", 'inc', true)
+            or $f = charger_fonction('singulier_ou_pluriel', 'inc', true)
+        ) {
+            $local_singulier_ou_pluriel[$langue] = $f;
+        }
+    }
+
+    // si on a une surcharge on l'utilise
+    if ($local_singulier_ou_pluriel[$langue]) {
+        return ($local_singulier_ou_pluriel[$langue])($nb, $chaine_un, $chaine_plusieurs, $var, $vars);
+    }
+
+    // sinon traitement par defaut
+    $vars[$var] = $nb;
+    if ($nb >= 2) {
+        return _T($chaine_plusieurs, $vars);
+    } else {
+        return _T($chaine_un, $vars);
+    }
 }
 
 
@@ -4371,73 +4371,73 @@ 
  */
 function prepare_icone_base($type, $lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
 
-	$class_lien = $class_bouton = $class;
-
-	// Normaliser la fonction et compléter la classe en fonction
-	if (in_array($fonction, ['del', 'supprimer.gif'])) {
-		$class_lien .= ' danger';
-		$class_bouton .= ' btn_danger';
-	} elseif ($fonction == 'rien.gif') {
-		$fonction = '';
-	} elseif ($fonction == 'delsafe') {
-		$fonction = 'del';
-	}
-
-	$fond_origine = $fond;
-	// Remappage des icone : article-24.png+new => article-new-24.png
-	if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
-		[$fond, $fonction] = $icone_renommer($fond, $fonction);
-	}
-
-	// Ajouter le type d'objet dans la classe
-	$objet_type = substr(basename($fond), 0, -4);
-	$class_lien .= " $objet_type";
-	$class_bouton .= " $objet_type";
-
-	// Texte
-	$alt = attribut_html($texte);
-	$title = " title=\"$alt\""; // est-ce pertinent de doubler le alt par un title ?
-
-	// Liens : préparer les classes ajax
-	$ajax = '';
-	if ($type === 'lien') {
-		if (strpos($class_lien, 'ajax') !== false) {
-			$ajax = 'ajax';
-			if (strpos($class_lien, 'preload') !== false) {
-				$ajax .= ' preload';
-			}
-			if (strpos($class_lien, 'nocache') !== false) {
-				$ajax .= ' nocache';
-			}
-			$ajax = " class='$ajax'";
-		}
-	}
-
-	// Repérer la taille et l'ajouter dans la classe
-	$size = 24;
-	if (
-		preg_match('/-([0-9]{1,3})[.](gif|png|svg)$/i', $fond, $match)
-		or preg_match('/-([0-9]{1,3})([.](gif|png|svg))?$/i', $fond_origine, $match)
-	) {
-		$size = $match[1];
-	}
-	$class_lien .= " s$size";
-	$class_bouton .= " s$size";
-
-	// Icône
-	$icone = http_img_pack($fond, $alt, "width='$size' height='$size'");
-	$icone = '<span class="icone-image' . ($fonction ? " icone-fonction icone-fonction-$fonction" : '') . "\">$icone</span>";
-
-	// Markup final
-	if ($type == 'lien') {
-		return "<span class='icone $class_lien'>"
-		. "<a href='$lien'$title$ajax$javascript>"
-		. $icone
-		. "<b>$texte</b>"
-		. "</a></span>\n";
-	} else {
-		return bouton_action("$icone $texte", $lien, $class_bouton, $javascript, $alt);
-	}
+    $class_lien = $class_bouton = $class;
+
+    // Normaliser la fonction et compléter la classe en fonction
+    if (in_array($fonction, ['del', 'supprimer.gif'])) {
+        $class_lien .= ' danger';
+        $class_bouton .= ' btn_danger';
+    } elseif ($fonction == 'rien.gif') {
+        $fonction = '';
+    } elseif ($fonction == 'delsafe') {
+        $fonction = 'del';
+    }
+
+    $fond_origine = $fond;
+    // Remappage des icone : article-24.png+new => article-new-24.png
+    if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
+        [$fond, $fonction] = $icone_renommer($fond, $fonction);
+    }
+
+    // Ajouter le type d'objet dans la classe
+    $objet_type = substr(basename($fond), 0, -4);
+    $class_lien .= " $objet_type";
+    $class_bouton .= " $objet_type";
+
+    // Texte
+    $alt = attribut_html($texte);
+    $title = " title=\"$alt\""; // est-ce pertinent de doubler le alt par un title ?
+
+    // Liens : préparer les classes ajax
+    $ajax = '';
+    if ($type === 'lien') {
+        if (strpos($class_lien, 'ajax') !== false) {
+            $ajax = 'ajax';
+            if (strpos($class_lien, 'preload') !== false) {
+                $ajax .= ' preload';
+            }
+            if (strpos($class_lien, 'nocache') !== false) {
+                $ajax .= ' nocache';
+            }
+            $ajax = " class='$ajax'";
+        }
+    }
+
+    // Repérer la taille et l'ajouter dans la classe
+    $size = 24;
+    if (
+        preg_match('/-([0-9]{1,3})[.](gif|png|svg)$/i', $fond, $match)
+        or preg_match('/-([0-9]{1,3})([.](gif|png|svg))?$/i', $fond_origine, $match)
+    ) {
+        $size = $match[1];
+    }
+    $class_lien .= " s$size";
+    $class_bouton .= " s$size";
+
+    // Icône
+    $icone = http_img_pack($fond, $alt, "width='$size' height='$size'");
+    $icone = '<span class="icone-image' . ($fonction ? " icone-fonction icone-fonction-$fonction" : '') . "\">$icone</span>";
+
+    // Markup final
+    if ($type == 'lien') {
+        return "<span class='icone $class_lien'>"
+        . "<a href='$lien'$title$ajax$javascript>"
+        . $icone
+        . "<b>$texte</b>"
+        . "</a></span>\n";
+    } else {
+        return bouton_action("$icone $texte", $lien, $class_bouton, $javascript, $alt);
+    }
 }
 
 /**
@@ -4461,7 +4461,7 @@ 
  *     Code HTML du lien
  **/
 function icone_base($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return prepare_icone_base('lien', $lien, $texte, $fond, $fonction, $class, $javascript);
+    return prepare_icone_base('lien', $lien, $texte, $fond, $fonction, $class, $javascript);
 }
 
 /**
@@ -4496,7 +4496,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_icone_verticale_dist($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $class", $javascript);
 }
 
 /**
@@ -4541,7 +4541,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_icone_horizontale_dist($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "horizontale $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "horizontale $class", $javascript);
 }
 
 /**
@@ -4572,7 +4572,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_bouton_action_horizontal_dist($lien, $texte, $fond, $fonction = '', $class = '', $confirm = '') {
-	return prepare_icone_base('bouton', $lien, $texte, $fond, $fonction, $class, $confirm);
+    return prepare_icone_base('bouton', $lien, $texte, $fond, $fonction, $class, $confirm);
 }
 
 /**
@@ -4603,7 +4603,7 @@ 
  *     Code HTML du lien
  */
 function filtre_icone_dist($lien, $texte, $fond, $align = '', $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $align $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $align $class", $javascript);
 }
 
 
@@ -4625,7 +4625,7 @@ 
  * @return array Liste des éléments
  */
 function filtre_explode_dist($a, $b) {
-	return explode($b, (string) $a);
+    return explode($b, (string) $a);
 }
 
 /**
@@ -4646,7 +4646,7 @@ 
  * @return string Texte
  */
 function filtre_implode_dist($a, $b) {
-	return is_array($a) ? implode($b, $a) : $a;
+    return is_array($a) ? implode($b, $a) : $a;
 }
 
 /**
@@ -4655,22 +4655,22 @@ 
  * @return string Code CSS
  */
 function bando_images_background() {
-	include_spip('inc/bandeau');
-	// recuperer tous les boutons et leurs images
-	$boutons = definir_barre_boutons(definir_barre_contexte(), true, false);
+    include_spip('inc/bandeau');
+    // recuperer tous les boutons et leurs images
+    $boutons = definir_barre_boutons(definir_barre_contexte(), true, false);
 
-	$res = '';
-	foreach ($boutons as $page => $detail) {
-		$selecteur = (in_array($page, ['outils_rapides', 'outils_collaboratifs']) ? '' : '.navigation_avec_icones ');
-		foreach ($detail->sousmenu as $souspage => $sousdetail) {
-			if ($sousdetail->icone and strlen(trim($sousdetail->icone))) {
-				$img = http_img_variante_svg_si_possible($sousdetail->icone);
-				$res .= "\n$selecteur.bando2_$souspage {background-image:url($img);}";
-			}
-		}
-	}
+    $res = '';
+    foreach ($boutons as $page => $detail) {
+        $selecteur = (in_array($page, ['outils_rapides', 'outils_collaboratifs']) ? '' : '.navigation_avec_icones ');
+        foreach ($detail->sousmenu as $souspage => $sousdetail) {
+            if ($sousdetail->icone and strlen(trim($sousdetail->icone))) {
+                $img = http_img_variante_svg_si_possible($sousdetail->icone);
+                $res .= "\n$selecteur.bando2_$souspage {background-image:url($img);}";
+            }
+        }
+    }
 
-	return $res;
+    return $res;
 }
 
 /**
@@ -4695,27 +4695,27 @@ 
  */
 function bouton_action($libelle, $url, $class = '', $confirm = '', $title = '', $callback = '') {
 
-	// Classes : dispatcher `ajax` sur le formulaire
-	$class_form = '';
-	if (strpos($class, 'ajax') !== false) {
-		$class_form = 'ajax';
-		$class = str_replace('ajax', '', $class);
-	}
-	$class_btn = 'submit ' . trim($class);
+    // Classes : dispatcher `ajax` sur le formulaire
+    $class_form = '';
+    if (strpos($class, 'ajax') !== false) {
+        $class_form = 'ajax';
+        $class = str_replace('ajax', '', $class);
+    }
+    $class_btn = 'submit ' . trim($class);
 
-	if ($confirm) {
-		$confirm = 'confirm("' . attribut_html($confirm) . '")';
-		if ($callback) {
-			$callback = "$confirm?($callback):false";
-		} else {
-			$callback = $confirm;
-		}
-	}
-	$onclick = $callback ? " onclick='return " . addcslashes($callback, "'") . "'" : '';
-	$title = $title ? " title='$title'" : '';
+    if ($confirm) {
+        $confirm = 'confirm("' . attribut_html($confirm) . '")';
+        if ($callback) {
+            $callback = "$confirm?($callback):false";
+        } else {
+            $callback = $confirm;
+        }
+    }
+    $onclick = $callback ? " onclick='return " . addcslashes($callback, "'") . "'" : '';
+    $title = $title ? " title='$title'" : '';
 
-	return "<form class='bouton_action_post $class_form' method='post' action='$url'><div>" . form_hidden($url)
-	. "<button type='submit' class='$class_btn'$title$onclick>$libelle</button></div></form>";
+    return "<form class='bouton_action_post $class_form' method='post' action='$url'><div>" . form_hidden($url)
+    . "<button type='submit' class='$class_btn'$title$onclick>$libelle</button></div></form>";
 }
 
 /**
@@ -4738,101 +4738,101 @@ 
  * @return string
  */
 function generer_objet_info($id_objet, string $type_objet, string $info, string $etoile = '', array $params = []): string {
-	static $trouver_table = null;
-	static $objets;
-
-	// On verifie qu'on a tout ce qu'il faut
-	$id_objet = intval($id_objet);
-	if (!($id_objet and $type_objet and $info)) {
-		return '';
-	}
-
-	// si on a deja note que l'objet n'existe pas, ne pas aller plus loin
-	if (isset($objets[$type_objet]) and $objets[$type_objet] === false) {
-		return '';
-	}
-
-	// Si on demande l'url, on retourne direct la fonction
-	if ($info == 'url') {
-		return generer_objet_url($id_objet, $type_objet, ...$params);
-	}
-
-	// Sinon on va tout chercher dans la table et on garde en memoire
-	$demande_titre = ($info === 'titre');
-	$demande_introduction = ($info === 'introduction');
-
-	// On ne fait la requete que si on a pas deja l'objet ou si on demande le titre mais qu'on ne l'a pas encore
-	if (
-		!isset($objets[$type_objet][$id_objet])
-		or
-		($demande_titre and !isset($objets[$type_objet][$id_objet]['titre']))
-	) {
-		if (!$trouver_table) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-		}
-		$desc = $trouver_table(table_objet_sql($type_objet));
-		if (!$desc) {
-			return $objets[$type_objet] = false;
-		}
-
-		// Si on demande le titre, on le gere en interne
-		$champ_titre = '';
-		if ($demande_titre) {
-			// si pas de titre declare mais champ titre, il sera peuple par le select *
-			$champ_titre = (!empty($desc['titre'])) ? ', ' . $desc['titre'] : '';
-		}
-		include_spip('base/abstract_sql');
-		include_spip('base/connect_sql');
-		$objets[$type_objet][$id_objet] = sql_fetsel(
-			'*' . $champ_titre,
-			$desc['table_sql'],
-			id_table_objet($type_objet) . ' = ' . intval($id_objet)
-		);
-
-		// Toujours noter la longueur d'introduction, même si pas demandé cette fois-ci
-		$objets[$type_objet]['introduction_longueur'] = $desc['introduction_longueur'] ?? null;
-	}
-
-	// Pour les fonction generer_xxx, si on demande l'introduction,
-	// ajouter la longueur au début des params supplémentaires
-	if ($demande_introduction) {
-		$introduction_longueur = $objets[$type_objet]['introduction_longueur'];
-		array_unshift($params, $introduction_longueur);
-	}
-
-	// Si la fonction generer_TYPE_TRUC existe, on l'utilise pour formater $info_generee
-	if (
-		$generer = charger_fonction("generer_{$type_objet}_{$info}", '', true)
-		// @deprecated 4.1 generer_TRUC_TYPE
-		or $generer = charger_fonction("generer_{$info}_{$type_objet}", '', true)
-	) {
-		$info_generee = $generer($id_objet, $objets[$type_objet][$id_objet], ...$params);
-	}
-	// Si la fonction generer_objet_TRUC existe, on l'utilise pour formater $info_generee
-	elseif (
-		$generer = charger_fonction("generer_objet_{$info}", '', true)
-		// @deprecated 4.1 generer_TRUC_entite
-		or $generer = charger_fonction("generer_{$info}_entite", '', true)
-	) {
-		$info_generee = $generer($id_objet, $type_objet, $objets[$type_objet][$id_objet], ...$params);
-	} // Sinon on prend directement le champ SQL tel quel
-	else {
-		$info_generee = ($objets[$type_objet][$id_objet][$info] ?? '');
-	}
-
-	// On va ensuite appliquer les traitements automatiques si besoin
-	if (!$etoile) {
-		// FIXME: on fournit un ENV minimum avec id et type et connect=''
-		// mais ce fonctionnement est a ameliorer !
-		$info_generee = appliquer_traitement_champ(
-			$info_generee,
-			$info,
-			table_objet($type_objet),
-			['id_objet' => $id_objet, 'objet' => $type_objet, '']
-		);
-	}
-
-	return $info_generee;
+    static $trouver_table = null;
+    static $objets;
+
+    // On verifie qu'on a tout ce qu'il faut
+    $id_objet = intval($id_objet);
+    if (!($id_objet and $type_objet and $info)) {
+        return '';
+    }
+
+    // si on a deja note que l'objet n'existe pas, ne pas aller plus loin
+    if (isset($objets[$type_objet]) and $objets[$type_objet] === false) {
+        return '';
+    }
+
+    // Si on demande l'url, on retourne direct la fonction
+    if ($info == 'url') {
+        return generer_objet_url($id_objet, $type_objet, ...$params);
+    }
+
+    // Sinon on va tout chercher dans la table et on garde en memoire
+    $demande_titre = ($info === 'titre');
+    $demande_introduction = ($info === 'introduction');
+
+    // On ne fait la requete que si on a pas deja l'objet ou si on demande le titre mais qu'on ne l'a pas encore
+    if (
+        !isset($objets[$type_objet][$id_objet])
+        or
+        ($demande_titre and !isset($objets[$type_objet][$id_objet]['titre']))
+    ) {
+        if (!$trouver_table) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+        }
+        $desc = $trouver_table(table_objet_sql($type_objet));
+        if (!$desc) {
+            return $objets[$type_objet] = false;
+        }
+
+        // Si on demande le titre, on le gere en interne
+        $champ_titre = '';
+        if ($demande_titre) {
+            // si pas de titre declare mais champ titre, il sera peuple par le select *
+            $champ_titre = (!empty($desc['titre'])) ? ', ' . $desc['titre'] : '';
+        }
+        include_spip('base/abstract_sql');
+        include_spip('base/connect_sql');
+        $objets[$type_objet][$id_objet] = sql_fetsel(
+            '*' . $champ_titre,
+            $desc['table_sql'],
+            id_table_objet($type_objet) . ' = ' . intval($id_objet)
+        );
+
+        // Toujours noter la longueur d'introduction, même si pas demandé cette fois-ci
+        $objets[$type_objet]['introduction_longueur'] = $desc['introduction_longueur'] ?? null;
+    }
+
+    // Pour les fonction generer_xxx, si on demande l'introduction,
+    // ajouter la longueur au début des params supplémentaires
+    if ($demande_introduction) {
+        $introduction_longueur = $objets[$type_objet]['introduction_longueur'];
+        array_unshift($params, $introduction_longueur);
+    }
+
+    // Si la fonction generer_TYPE_TRUC existe, on l'utilise pour formater $info_generee
+    if (
+        $generer = charger_fonction("generer_{$type_objet}_{$info}", '', true)
+        // @deprecated 4.1 generer_TRUC_TYPE
+        or $generer = charger_fonction("generer_{$info}_{$type_objet}", '', true)
+    ) {
+        $info_generee = $generer($id_objet, $objets[$type_objet][$id_objet], ...$params);
+    }
+    // Si la fonction generer_objet_TRUC existe, on l'utilise pour formater $info_generee
+    elseif (
+        $generer = charger_fonction("generer_objet_{$info}", '', true)
+        // @deprecated 4.1 generer_TRUC_entite
+        or $generer = charger_fonction("generer_{$info}_entite", '', true)
+    ) {
+        $info_generee = $generer($id_objet, $type_objet, $objets[$type_objet][$id_objet], ...$params);
+    } // Sinon on prend directement le champ SQL tel quel
+    else {
+        $info_generee = ($objets[$type_objet][$id_objet][$info] ?? '');
+    }
+
+    // On va ensuite appliquer les traitements automatiques si besoin
+    if (!$etoile) {
+        // FIXME: on fournit un ENV minimum avec id et type et connect=''
+        // mais ce fonctionnement est a ameliorer !
+        $info_generee = appliquer_traitement_champ(
+            $info_generee,
+            $info,
+            table_objet($type_objet),
+            ['id_objet' => $id_objet, 'objet' => $type_objet, '']
+        );
+    }
+
+    return $info_generee;
 }
 
 /**
@@ -4840,7 +4840,7 @@ 
  * @see generer_objet_info
  */
 function generer_info_entite($id_objet, $type_objet, $info, $etoile = '', $params = []) {
-	return generer_objet_info(intval($id_objet), $type_objet, $info, $etoile, $params);
+    return generer_objet_info(intval($id_objet), $type_objet, $info, $etoile, $params);
 }
 
 /**
@@ -4873,36 +4873,36 @@ 
  */
 function generer_objet_introduction(int $id_objet, string $type_objet, array $ligne_sql, ?int $introduction_longueur = null, $longueur_ou_suite = null, ?string $suite = null, string $connect = ''): string {
 
-	$descriptif = $ligne_sql['descriptif'] ?? '';
-	$texte = $ligne_sql['texte'] ?? '';
-	// En absence de descriptif, on se rabat sur chapo + texte
-	if (isset($ligne_sql['chapo'])) {
-		$chapo = $ligne_sql['chapo'];
-		$texte = strlen($descriptif) ?
-			'' :
-			"$chapo \n\n $texte";
-	}
+    $descriptif = $ligne_sql['descriptif'] ?? '';
+    $texte = $ligne_sql['texte'] ?? '';
+    // En absence de descriptif, on se rabat sur chapo + texte
+    if (isset($ligne_sql['chapo'])) {
+        $chapo = $ligne_sql['chapo'];
+        $texte = strlen($descriptif) ?
+            '' :
+            "$chapo \n\n $texte";
+    }
 
-	// Longueur en paramètre, sinon celle renseignée dans la description de l'objet, sinon valeur en dur
-	if (!intval($longueur_ou_suite)) {
-		$longueur = intval($introduction_longueur ?: 600);
-	} else {
-		$longueur = intval($longueur_ou_suite);
-	}
+    // Longueur en paramètre, sinon celle renseignée dans la description de l'objet, sinon valeur en dur
+    if (!intval($longueur_ou_suite)) {
+        $longueur = intval($introduction_longueur ?: 600);
+    } else {
+        $longueur = intval($longueur_ou_suite);
+    }
 
-	// On peut optionnellement passer la suite en 1er paramètre de la balise
-	// Ex : #INTRODUCTION{...}
-	if (
-		is_null($suite)
-		and !intval($longueur_ou_suite)
-	) {
-		$suite = $longueur_ou_suite;
-	}
+    // On peut optionnellement passer la suite en 1er paramètre de la balise
+    // Ex : #INTRODUCTION{...}
+    if (
+        is_null($suite)
+        and !intval($longueur_ou_suite)
+    ) {
+        $suite = $longueur_ou_suite;
+    }
 
-	$f = chercher_filtre('introduction');
-	$introduction = $f($descriptif, $texte, $longueur, $connect, $suite);
+    $f = chercher_filtre('introduction');
+    $introduction = $f($descriptif, $texte, $longueur, $connect, $suite);
 
-	return $introduction;
+    return $introduction;
 }
 
 /**
@@ -4910,7 +4910,7 @@ 
  * @see generer_objet_introduction
  */
 function generer_introduction_entite($id_objet, $type_objet, $ligne_sql, $introduction_longueur = null, $longueur_ou_suite = null, $suite = null, string $connect = '') {
-	return generer_objet_introduction(intval($id_objet), $type_objet, $ligne_sql, $introduction_longueur, $longueur_ou_suite, $suite, $connect);
+    return generer_objet_introduction(intval($id_objet), $type_objet, $ligne_sql, $introduction_longueur, $longueur_ou_suite, $suite, $connect);
 }
 
 /**
@@ -4924,49 +4924,49 @@ 
  * @return string
  */
 function appliquer_traitement_champ($texte, $champ, $table_objet = '', $env = [], string $connect = '') {
-	if (!$champ) {
-		return $texte;
-	}
+    if (!$champ) {
+        return $texte;
+    }
 
-	// On charge les définitions des traitements (inc/texte et fichiers de fonctions)
-	// car il ne faut pas partir du principe que c'est déjà chargé (form ajax, etc)
-	include_fichiers_fonctions();
+    // On charge les définitions des traitements (inc/texte et fichiers de fonctions)
+    // car il ne faut pas partir du principe que c'est déjà chargé (form ajax, etc)
+    include_fichiers_fonctions();
 
-	$champ = strtoupper($champ);
-	$traitements = $GLOBALS['table_des_traitements'][$champ] ?? false;
-	if (!$traitements or !is_array($traitements)) {
-		return $texte;
-	}
+    $champ = strtoupper($champ);
+    $traitements = $GLOBALS['table_des_traitements'][$champ] ?? false;
+    if (!$traitements or !is_array($traitements)) {
+        return $texte;
+    }
 
-	$traitement = '';
-	if ($table_objet and (!isset($traitements[0]) or count($traitements) > 1)) {
-		// necessaire pour prendre en charge les vieux appels avec un table_objet_sql en 3e arg
-		$table_objet = table_objet($table_objet);
-		if (isset($traitements[$table_objet])) {
-			$traitement = $traitements[$table_objet];
-		}
-	}
-	if (!$traitement and isset($traitements[0])) {
-		$traitement = $traitements[0];
-	}
-	// (sinon prendre le premier de la liste par defaut ?)
+    $traitement = '';
+    if ($table_objet and (!isset($traitements[0]) or count($traitements) > 1)) {
+        // necessaire pour prendre en charge les vieux appels avec un table_objet_sql en 3e arg
+        $table_objet = table_objet($table_objet);
+        if (isset($traitements[$table_objet])) {
+            $traitement = $traitements[$table_objet];
+        }
+    }
+    if (!$traitement and isset($traitements[0])) {
+        $traitement = $traitements[0];
+    }
+    // (sinon prendre le premier de la liste par defaut ?)
 
-	if (!$traitement) {
-		return $texte;
-	}
+    if (!$traitement) {
+        return $texte;
+    }
 
-	$traitement = str_replace('%s', "'" . texte_script($texte) . "'", $traitement);
+    $traitement = str_replace('%s', "'" . texte_script($texte) . "'", $traitement);
 
-	// signaler qu'on est dans l'espace prive pour les filtres qui se servent de ce flag
-	if (test_espace_prive()) {
-		$env['espace_prive'] = 1;
-	}
+    // signaler qu'on est dans l'espace prive pour les filtres qui se servent de ce flag
+    if (test_espace_prive()) {
+        $env['espace_prive'] = 1;
+    }
 
-	// Fournir $connect et $Pile[0] au traitement si besoin
-	$Pile = [0 => $env];
-	eval("\$texte = $traitement;");
+    // Fournir $connect et $Pile[0] au traitement si besoin
+    $Pile = [0 => $env];
+    eval("\$texte = $traitement;");
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -4980,21 +4980,21 @@ 
  * @return string
  */
 function generer_objet_lien(int $id_objet, string $objet, int $longueur = 80, string $connect = ''): string {
-	include_spip('inc/liens');
-	$titre = traiter_raccourci_titre($id_objet, $objet, $connect);
-	// lorsque l'objet n'est plus declare (plugin desactive par exemple)
-	// le raccourcis n'est plus valide
-	$titre = typo($titre['titre'] ?? '');
-	// on essaye avec generer_info_entite ?
-	if (!strlen($titre) and !$connect) {
-		$titre = generer_objet_info($id_objet, $objet, 'titre');
-	}
-	if (!strlen($titre)) {
-		$titre = _T('info_sans_titre');
-	}
-	$url = generer_objet_url($id_objet, $objet, '', '', null, '', $connect);
+    include_spip('inc/liens');
+    $titre = traiter_raccourci_titre($id_objet, $objet, $connect);
+    // lorsque l'objet n'est plus declare (plugin desactive par exemple)
+    // le raccourcis n'est plus valide
+    $titre = typo($titre['titre'] ?? '');
+    // on essaye avec generer_info_entite ?
+    if (!strlen($titre) and !$connect) {
+        $titre = generer_objet_info($id_objet, $objet, 'titre');
+    }
+    if (!strlen($titre)) {
+        $titre = _T('info_sans_titre');
+    }
+    $url = generer_objet_url($id_objet, $objet, '', '', null, '', $connect);
 
-	return "<a href='$url' class='$objet'>" . couper($titre, $longueur) . '</a>';
+    return "<a href='$url' class='$objet'>" . couper($titre, $longueur) . '</a>';
 }
 
 /**
@@ -5002,7 +5002,7 @@ 
  * @see generer_objet_lien
  */
 function generer_lien_entite($id_objet, $objet, $longueur = 80, $connect = null) {
-	return generer_objet_lien(intval($id_objet), $objet, $longueur, $connect ?? '');
+    return generer_objet_lien(intval($id_objet), $objet, $longueur, $connect ?? '');
 }
 
 /**
@@ -5018,15 +5018,15 @@ 
  * @return string
  */
 function wrap($texte, $wrap) {
-	$balises = extraire_balises($wrap);
-	if (preg_match_all(",<([a-z]\w*)\b[^>]*>,UimsS", $wrap, $regs, PREG_PATTERN_ORDER)) {
-		$texte = $wrap . $texte;
-		$regs = array_reverse($regs[1]);
-		$wrap = '</' . implode('></', $regs) . '>';
-		$texte = $texte . $wrap;
-	}
+    $balises = extraire_balises($wrap);
+    if (preg_match_all(",<([a-z]\w*)\b[^>]*>,UimsS", $wrap, $regs, PREG_PATTERN_ORDER)) {
+        $texte = $wrap . $texte;
+        $regs = array_reverse($regs[1]);
+        $wrap = '</' . implode('></', $regs) . '>';
+        $texte = $texte . $wrap;
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -5046,44 +5046,44 @@ 
  * @return array|mixed|string
  */
 function filtre_print_dist($u, $join = '<br />', $indent = 0) {
-	if (is_string($u)) {
-		$u = typo($u);
+    if (is_string($u)) {
+        $u = typo($u);
 
-		return $u;
-	}
+        return $u;
+    }
 
-	// caster $u en array si besoin
-	if (is_object($u)) {
-		$u = (array)$u;
-	}
+    // caster $u en array si besoin
+    if (is_object($u)) {
+        $u = (array)$u;
+    }
 
-	if (is_array($u)) {
-		$out = '';
-		// toutes les cles sont numeriques ?
-		// et aucun enfant n'est un tableau
-		// liste simple separee par des virgules
-		$numeric_keys = array_map('is_numeric', array_keys($u));
-		$array_values = array_map('is_array', $u);
-		$object_values = array_map('is_object', $u);
-		if (
-			array_sum($numeric_keys) == count($numeric_keys)
-			and !array_sum($array_values)
-			and !array_sum($object_values)
-		) {
-			return join(', ', array_map('filtre_print_dist', $u));
-		}
+    if (is_array($u)) {
+        $out = '';
+        // toutes les cles sont numeriques ?
+        // et aucun enfant n'est un tableau
+        // liste simple separee par des virgules
+        $numeric_keys = array_map('is_numeric', array_keys($u));
+        $array_values = array_map('is_array', $u);
+        $object_values = array_map('is_object', $u);
+        if (
+            array_sum($numeric_keys) == count($numeric_keys)
+            and !array_sum($array_values)
+            and !array_sum($object_values)
+        ) {
+            return join(', ', array_map('filtre_print_dist', $u));
+        }
 
-		// sinon on passe a la ligne et on indente
-		$i_str = str_pad('', $indent, ' ');
-		foreach ($u as $k => $v) {
-			$out .= $join . $i_str . "$k: " . filtre_print_dist($v, $join, $indent + 2);
-		}
+        // sinon on passe a la ligne et on indente
+        $i_str = str_pad('', $indent, ' ');
+        foreach ($u as $k => $v) {
+            $out .= $join . $i_str . "$k: " . filtre_print_dist($v, $join, $indent + 2);
+        }
 
-		return $out;
-	}
+        return $out;
+    }
 
-	// on sait pas quoi faire...
-	return $u;
+    // on sait pas quoi faire...
+    return $u;
 }
 
 
@@ -5096,10 +5096,10 @@ 
  * @return string|array
  */
 function objet_info($objet, $info) {
-	$table = table_objet_sql($objet);
-	$infos = lister_tables_objets_sql($table);
+    $table = table_objet_sql($objet);
+    $infos = lister_tables_objets_sql($table);
 
-	return ($infos[$info] ?? '');
+    return ($infos[$info] ?? '');
 }
 
 /**
@@ -5114,11 +5114,11 @@ 
  *     Texte traduit du comptage, tel que '3 articles'
  */
 function objet_afficher_nb($nb, $objet) {
-	if (!$nb) {
-		return _T(objet_info($objet, 'info_aucun_objet'));
-	} else {
-		return _T(objet_info($objet, $nb == 1 ? 'info_1_objet' : 'info_nb_objets'), ['nb' => $nb]);
-	}
+    if (!$nb) {
+        return _T(objet_info($objet, 'info_aucun_objet'));
+    } else {
+        return _T(objet_info($objet, $nb == 1 ? 'info_1_objet' : 'info_nb_objets'), ['nb' => $nb]);
+    }
 }
 
 /**
@@ -5130,11 +5130,11 @@ 
  * @return string
  */
 function objet_icone($objet, $taille = 24, $class = '') {
-	$icone = objet_info($objet, 'icone_objet') . '-' . $taille . '.png';
-	$icone = chemin_image($icone);
-	$balise_img = charger_filtre('balise_img');
+    $icone = objet_info($objet, 'icone_objet') . '-' . $taille . '.png';
+    $icone = chemin_image($icone);
+    $balise_img = charger_filtre('balise_img');
 
-	return $icone ? $balise_img($icone, _T(objet_info($objet, 'texte_objet')), $class, $taille) : '';
+    return $icone ? $balise_img($icone, _T(objet_info($objet, 'texte_objet')), $class, $taille) : '';
 }
 
 /**
@@ -5155,12 +5155,12 @@ 
  * @return string
  */
 function objet_T($objet, $chaine, $args = [], $options = []) {
-	$chaine = explode(':', $chaine);
-	if ($t = _T($objet . ':' . end($chaine), $args, array_merge($options, ['force' => false]))) {
-		return $t;
-	}
-	$chaine = implode(':', $chaine);
-	return _T($chaine, $args, $options);
+    $chaine = explode(':', $chaine);
+    if ($t = _T($objet . ':' . end($chaine), $args, array_merge($options, ['force' => false]))) {
+        return $t;
+    }
+    $chaine = implode(':', $chaine);
+    return _T($chaine, $args, $options);
 }
 
 /**
@@ -5174,18 +5174,18 @@ 
  * @return string      Code HTML
  */
 function insert_head_css_conditionnel($flux) {
-	if (
-		strpos($flux, '<!-- insert_head_css -->') === false
-		and $p = strpos($flux, '<!-- insert_head -->')
-	) {
-		// plutot avant le premier js externe (jquery) pour etre non bloquant
-		if ($p1 = stripos($flux, '<script src=') and $p1 < $p) {
-			$p = $p1;
-		}
-		$flux = substr_replace($flux, pipeline('insert_head_css', '<!-- insert_head_css -->'), $p, 0);
-	}
+    if (
+        strpos($flux, '<!-- insert_head_css -->') === false
+        and $p = strpos($flux, '<!-- insert_head -->')
+    ) {
+        // plutot avant le premier js externe (jquery) pour etre non bloquant
+        if ($p1 = stripos($flux, '<script src=') and $p1 < $p) {
+            $p = $p1;
+        }
+        $flux = substr_replace($flux, pipeline('insert_head_css', '<!-- insert_head_css -->'), $p, 0);
+    }
 
-	return $flux;
+    return $flux;
 }
 
 /**
@@ -5208,75 +5208,75 @@ 
  * @return string
  */
 function produire_fond_statique($fond, $contexte = [], $options = [], string $connect = '') {
-	if (isset($contexte['format'])) {
-		$extension = $contexte['format'];
-		unset($contexte['format']);
-	} else {
-		$extension = 'html';
-		if (preg_match(',[.](css|js|json|xml|svg)$,', $fond, $m)) {
-			$extension = $m[1];
-		}
-	}
-	// recuperer le contenu produit par le squelette
-	$options['raw'] = true;
-	$cache = recuperer_fond($fond, $contexte, $options, $connect);
-
-	// calculer le nom de la css
-	$dir_var = sous_repertoire(_DIR_VAR, 'cache-' . $extension);
-	$nom_safe = preg_replace(',\W,', '_', str_replace('.', '_', $fond));
-	$contexte_implicite = calculer_contexte_implicite();
-
-	// par defaut on hash selon les contextes qui sont a priori moins variables
-	// mais on peut hasher selon le contenu a la demande, si plusieurs contextes produisent un meme contenu
-	// reduit la variabilite du nom et donc le nombre de css concatenees possibles in fine
-	if (isset($options['hash_on_content']) and $options['hash_on_content']) {
-		$hash = md5($contexte_implicite['host'] . '::' . $cache);
-	}
-	else {
-		unset($contexte_implicite['notes']); // pas pertinent pour signaler un changeemnt de contenu pour des css/js
-		ksort($contexte);
-		$hash = md5($fond . json_encode($contexte_implicite, JSON_THROW_ON_ERROR) . json_encode($contexte, JSON_THROW_ON_ERROR) . $connect);
-	}
-	$filename = $dir_var . $extension . "dyn-$nom_safe-" . substr($hash, 0, 8) . ".$extension";
-
-	// mettre a jour le fichier si il n'existe pas
-	// ou trop ancien
-	// le dernier fichier produit est toujours suffixe par .last
-	// et recopie sur le fichier cible uniquement si il change
-	if (
-		!file_exists($filename)
-		or !file_exists($filename . '.last')
-		or (isset($cache['lastmodified']) and $cache['lastmodified'] and filemtime($filename . '.last') < $cache['lastmodified'])
-		or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul')
-	) {
-		$contenu = $cache['texte'];
-		// passer les urls en absolu si c'est une css
-		if ($extension == 'css') {
-			$contenu = urls_absolues_css(
-				$contenu,
-				test_espace_prive() ? generer_url_ecrire('accueil') : generer_url_public($fond)
-			);
-		}
-
-		$comment = '';
-		// ne pas insérer de commentaire sur certains formats
-		if (!in_array($extension, ['json', 'xml', 'svg'])) {
-			$comment = "/* #PRODUIRE{fond=$fond";
-			foreach ($contexte as $k => $v) {
-				if (is_array($v)) {
-					$v = var_export($v, true);
-				}
-				$comment .= ",$k=$v";
-			}
-			// pas de date dans le commentaire car sinon ca invalide le md5 et force la maj
-			// mais on peut mettre un md5 du contenu, ce qui donne un aperu rapide si la feuille a change ou non
-			$comment .= "}\n   md5:" . md5($contenu) . " */\n";
-		}
-		// et ecrire le fichier si il change
-		ecrire_fichier_calcule_si_modifie($filename, $comment . $contenu, false, true);
-	}
-
-	return timestamp($filename);
+    if (isset($contexte['format'])) {
+        $extension = $contexte['format'];
+        unset($contexte['format']);
+    } else {
+        $extension = 'html';
+        if (preg_match(',[.](css|js|json|xml|svg)$,', $fond, $m)) {
+            $extension = $m[1];
+        }
+    }
+    // recuperer le contenu produit par le squelette
+    $options['raw'] = true;
+    $cache = recuperer_fond($fond, $contexte, $options, $connect);
+
+    // calculer le nom de la css
+    $dir_var = sous_repertoire(_DIR_VAR, 'cache-' . $extension);
+    $nom_safe = preg_replace(',\W,', '_', str_replace('.', '_', $fond));
+    $contexte_implicite = calculer_contexte_implicite();
+
+    // par defaut on hash selon les contextes qui sont a priori moins variables
+    // mais on peut hasher selon le contenu a la demande, si plusieurs contextes produisent un meme contenu
+    // reduit la variabilite du nom et donc le nombre de css concatenees possibles in fine
+    if (isset($options['hash_on_content']) and $options['hash_on_content']) {
+        $hash = md5($contexte_implicite['host'] . '::' . $cache);
+    }
+    else {
+        unset($contexte_implicite['notes']); // pas pertinent pour signaler un changeemnt de contenu pour des css/js
+        ksort($contexte);
+        $hash = md5($fond . json_encode($contexte_implicite, JSON_THROW_ON_ERROR) . json_encode($contexte, JSON_THROW_ON_ERROR) . $connect);
+    }
+    $filename = $dir_var . $extension . "dyn-$nom_safe-" . substr($hash, 0, 8) . ".$extension";
+
+    // mettre a jour le fichier si il n'existe pas
+    // ou trop ancien
+    // le dernier fichier produit est toujours suffixe par .last
+    // et recopie sur le fichier cible uniquement si il change
+    if (
+        !file_exists($filename)
+        or !file_exists($filename . '.last')
+        or (isset($cache['lastmodified']) and $cache['lastmodified'] and filemtime($filename . '.last') < $cache['lastmodified'])
+        or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul')
+    ) {
+        $contenu = $cache['texte'];
+        // passer les urls en absolu si c'est une css
+        if ($extension == 'css') {
+            $contenu = urls_absolues_css(
+                $contenu,
+                test_espace_prive() ? generer_url_ecrire('accueil') : generer_url_public($fond)
+            );
+        }
+
+        $comment = '';
+        // ne pas insérer de commentaire sur certains formats
+        if (!in_array($extension, ['json', 'xml', 'svg'])) {
+            $comment = "/* #PRODUIRE{fond=$fond";
+            foreach ($contexte as $k => $v) {
+                if (is_array($v)) {
+                    $v = var_export($v, true);
+                }
+                $comment .= ",$k=$v";
+            }
+            // pas de date dans le commentaire car sinon ca invalide le md5 et force la maj
+            // mais on peut mettre un md5 du contenu, ce qui donne un aperu rapide si la feuille a change ou non
+            $comment .= "}\n   md5:" . md5($contenu) . " */\n";
+        }
+        // et ecrire le fichier si il change
+        ecrire_fichier_calcule_si_modifie($filename, $comment . $contenu, false, true);
+    }
+
+    return timestamp($filename);
 }
 
 /**
@@ -5289,15 +5289,15 @@ 
  *    $fichier auquel on a ajouté le timestamp
  */
 function timestamp($fichier) {
-	if (
-		!$fichier
-		or !file_exists($fichier)
-		or !$m = filemtime($fichier)
-	) {
-		return $fichier;
-	}
+    if (
+        !$fichier
+        or !file_exists($fichier)
+        or !$m = filemtime($fichier)
+    ) {
+        return $fichier;
+    }
 
-	return "$fichier?$m";
+    return "$fichier?$m";
 }
 
 /**
@@ -5307,11 +5307,11 @@ 
  * @return string
  */
 function supprimer_timestamp($url) {
-	if (strpos($url, '?') === false) {
-		return $url;
-	}
+    if (strpos($url, '?') === false) {
+        return $url;
+    }
 
-	return preg_replace(',\?[[:digit:]]+$,', '', $url);
+    return preg_replace(',\?[[:digit:]]+$,', '', $url);
 }
 
 /**
@@ -5326,15 +5326,15 @@ 
  * @return string
  */
 function filtre_nettoyer_titre_email_dist($titre) {
-	include_spip('inc/envoyer_mail');
+    include_spip('inc/envoyer_mail');
 
-	$titre = nettoyer_titre_email($titre);
-	// on est dans un squelette : securiser le retour
-	if (strpos($titre, '<') !== false) {
-		$titre = interdire_scripts($titre);
-	}
+    $titre = nettoyer_titre_email($titre);
+    // on est dans un squelette : securiser le retour
+    if (strpos($titre, '<') !== false) {
+        $titre = interdire_scripts($titre);
+    }
 
-	return $titre;
+    return $titre;
 }
 
 /**
@@ -5356,27 +5356,27 @@ 
  * @return string
  */
 function filtre_chercher_rubrique_dist(
-	$titre,
-	$id_objet,
-	$id_parent,
-	$objet,
-	$id_secteur,
-	$restreint,
-	$actionable = false,
-	$retour_sans_cadre = false
+    $titre,
+    $id_objet,
+    $id_parent,
+    $objet,
+    $id_secteur,
+    $restreint,
+    $actionable = false,
+    $retour_sans_cadre = false
 ) {
-	include_spip('inc/filtres_ecrire');
+    include_spip('inc/filtres_ecrire');
 
-	return chercher_rubrique(
-		$titre,
-		$id_objet,
-		$id_parent,
-		$objet,
-		$id_secteur,
-		$restreint,
-		$actionable,
-		$retour_sans_cadre
-	);
+    return chercher_rubrique(
+        $titre,
+        $id_objet,
+        $id_parent,
+        $objet,
+        $id_secteur,
+        $restreint,
+        $actionable,
+        $retour_sans_cadre
+    );
 }
 
 /**
@@ -5405,56 +5405,56 @@ 
  *     Chaîne vide si l'accès est autorisé
  */
 function sinon_interdire_acces($ok = false, $url = '', $statut = 0, $message = null) {
-	if ($ok) {
-		return '';
-	}
-
-	// Vider tous les tampons
-	$level = @ob_get_level();
-	while ($level--) {
-		@ob_end_clean();
-	}
-
-	include_spip('inc/headers');
-
-	// S'il y a une URL, on redirige (si pas de statut, la fonction mettra 302 par défaut)
-	if ($url) {
-		redirige_par_entete($url, '', $statut);
-	}
-
-	// ecriture simplifiee avec message en 3eme argument (= statut 403)
-	if (!is_numeric($statut) and is_null($message)) {
-		$message = $statut;
-		$statut = 0;
-	}
-	if (!$message) {
-		$message = '';
-	}
-	$statut = intval($statut);
-
-	// Si on est dans l'espace privé, on génère du 403 Forbidden par defaut ou du 404
-	if (test_espace_prive()) {
-		if (!$statut or !in_array($statut, [404, 403])) {
-			$statut = 403;
-		}
-		http_response_code(403);
-		$echec = charger_fonction('403', 'exec');
-		$echec($message);
-	} else {
-		// Sinon dans l'espace public on redirige vers une 404 par défaut, car elle toujours présente normalement
-		if (!$statut) {
-			$statut = 404;
-		}
-		// Dans tous les cas on modifie l'entité avec ce qui est demandé
-		http_response_code($statut);
-		// Si le statut est une erreur et qu'il n'y a pas de redirection on va chercher le squelette du même nom
-		if ($statut >= 400) {
-			echo recuperer_fond("$statut", ['erreur' => $message]);
-		}
-	}
-
-
-	exit;
+    if ($ok) {
+        return '';
+    }
+
+    // Vider tous les tampons
+    $level = @ob_get_level();
+    while ($level--) {
+        @ob_end_clean();
+    }
+
+    include_spip('inc/headers');
+
+    // S'il y a une URL, on redirige (si pas de statut, la fonction mettra 302 par défaut)
+    if ($url) {
+        redirige_par_entete($url, '', $statut);
+    }
+
+    // ecriture simplifiee avec message en 3eme argument (= statut 403)
+    if (!is_numeric($statut) and is_null($message)) {
+        $message = $statut;
+        $statut = 0;
+    }
+    if (!$message) {
+        $message = '';
+    }
+    $statut = intval($statut);
+
+    // Si on est dans l'espace privé, on génère du 403 Forbidden par defaut ou du 404
+    if (test_espace_prive()) {
+        if (!$statut or !in_array($statut, [404, 403])) {
+            $statut = 403;
+        }
+        http_response_code(403);
+        $echec = charger_fonction('403', 'exec');
+        $echec($message);
+    } else {
+        // Sinon dans l'espace public on redirige vers une 404 par défaut, car elle toujours présente normalement
+        if (!$statut) {
+            $statut = 404;
+        }
+        // Dans tous les cas on modifie l'entité avec ce qui est demandé
+        http_response_code($statut);
+        // Si le statut est une erreur et qu'il n'y a pas de redirection on va chercher le squelette du même nom
+        if ($statut >= 400) {
+            echo recuperer_fond("$statut", ['erreur' => $message]);
+        }
+    }
+
+
+    exit;
 }
 
 /**
@@ -5465,11 +5465,11 @@ 
  * @return string
  */
 function filtre_compacte_dist($source, $format = null) {
-	if (function_exists('minifier')) {
-		return minifier($source, $format);
-	}
+    if (function_exists('minifier')) {
+        return minifier($source, $format);
+    }
 
-	return $source;
+    return $source;
 }
 
 
@@ -5481,32 +5481,32 @@ 
  * @return string
  */
 function spip_affiche_mot_de_passe_masque(?string $passe, bool $afficher_partiellement = false, ?int $portion_pourcent = null): string {
-	$passe ??= '';
-	$l = strlen($passe);
-
-	if ($l <= 8 or !$afficher_partiellement) {
-		if (!$l) {
-			return ''; // montrer qu'il y a pas de mot de passe si il y en a pas
-		}
-		return str_pad('', $afficher_partiellement ? $l : 16, '*');
-	}
-
-	if (is_null($portion_pourcent)) {
-		if (!defined('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT')) {
-			define('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT', 20); // 20%
-		}
-		$portion_pourcent = _SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT;
-	}
-	if ($portion_pourcent >= 100) {
-		return $passe;
-	}
-	$e = intval(ceil($l * $portion_pourcent / 100 / 2));
-	$e = max($e, 0);
-	$mid = str_pad('', $l - 2 * $e, '*');
-	if ($e > 0 and strlen($mid) > 8) {
-		$mid = '***...***';
-	}
-	return substr($passe, 0, $e) . $mid . ($e > 0 ? substr($passe, -$e) : '');
+    $passe ??= '';
+    $l = strlen($passe);
+
+    if ($l <= 8 or !$afficher_partiellement) {
+        if (!$l) {
+            return ''; // montrer qu'il y a pas de mot de passe si il y en a pas
+        }
+        return str_pad('', $afficher_partiellement ? $l : 16, '*');
+    }
+
+    if (is_null($portion_pourcent)) {
+        if (!defined('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT')) {
+            define('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT', 20); // 20%
+        }
+        $portion_pourcent = _SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT;
+    }
+    if ($portion_pourcent >= 100) {
+        return $passe;
+    }
+    $e = intval(ceil($l * $portion_pourcent / 100 / 2));
+    $e = max($e, 0);
+    $mid = str_pad('', $l - 2 * $e, '*');
+    if ($e > 0 and strlen($mid) > 8) {
+        $mid = '***...***';
+    }
+    return substr($passe, 0, $e) . $mid . ($e > 0 ? substr($passe, -$e) : '');
 }
 
 
@@ -5527,64 +5527,64 @@ 
  */
 function identifiant_slug($texte, $type = '', $options = []) {
 
-	$original = $texte;
-	$separateur = ($options['separateur'] ?? '_');
-	$longueur_maxi = ($options['longueur_maxi'] ?? 60);
-	$longueur_mini = ($options['longueur_mini'] ?? 0);
+    $original = $texte;
+    $separateur = ($options['separateur'] ?? '_');
+    $longueur_maxi = ($options['longueur_maxi'] ?? 60);
+    $longueur_mini = ($options['longueur_mini'] ?? 0);
 
-	if (!function_exists('translitteration')) {
-		include_spip('inc/charsets');
-	}
+    if (!function_exists('translitteration')) {
+        include_spip('inc/charsets');
+    }
 
-	// pas de balise html
-	if (strpos($texte, '<') !== false) {
-		$texte = strip_tags($texte);
-	}
-	if (strpos($texte, '&') !== false) {
-		$texte = unicode2charset($texte);
-	}
-	// On enlève les espaces indésirables
-	$texte = trim($texte);
+    // pas de balise html
+    if (strpos($texte, '<') !== false) {
+        $texte = strip_tags($texte);
+    }
+    if (strpos($texte, '&') !== false) {
+        $texte = unicode2charset($texte);
+    }
+    // On enlève les espaces indésirables
+    $texte = trim($texte);
 
-	// On enlève les accents et cie
-	$texte = translitteration($texte);
+    // On enlève les accents et cie
+    $texte = translitteration($texte);
 
-	// On remplace tout ce qui n'est pas un mot par un séparateur
-	$texte = preg_replace(',[\W_]+,ms', $separateur, $texte);
+    // On remplace tout ce qui n'est pas un mot par un séparateur
+    $texte = preg_replace(',[\W_]+,ms', $separateur, $texte);
 
-	// nettoyer les doubles occurences du separateur si besoin
-	while (strpos($texte, (string) "$separateur$separateur") !== false) {
-		$texte = str_replace("$separateur$separateur", $separateur, $texte);
-	}
+    // nettoyer les doubles occurences du separateur si besoin
+    while (strpos($texte, (string) "$separateur$separateur") !== false) {
+        $texte = str_replace("$separateur$separateur", $separateur, $texte);
+    }
 
-	// pas de separateur au debut ni a la fin
-	$texte = trim($texte, $separateur);
+    // pas de separateur au debut ni a la fin
+    $texte = trim($texte, $separateur);
 
-	// en minuscules
-	$texte = strtolower($texte);
+    // en minuscules
+    $texte = strtolower($texte);
 
-	switch ($type) {
-		case 'class':
-		case 'id':
-		case 'anchor':
-			if (preg_match(',^\d,', $texte)) {
-				$texte = substr($type, 0, 1) . $texte;
-			}
-	}
+    switch ($type) {
+        case 'class':
+        case 'id':
+        case 'anchor':
+            if (preg_match(',^\d,', $texte)) {
+                $texte = substr($type, 0, 1) . $texte;
+            }
+    }
 
-	if (strlen($texte) > $longueur_maxi) {
-		$texte = substr($texte, 0, $longueur_maxi);
-	}
+    if (strlen($texte) > $longueur_maxi) {
+        $texte = substr($texte, 0, $longueur_maxi);
+    }
 
-	if (strlen($texte) < $longueur_mini and $longueur_mini < $longueur_maxi) {
-		if (preg_match(',^\d,', $texte)) {
-			$texte = ($type ? substr($type, 0, 1) : 's') . $texte;
-		}
-		$texte .= $separateur . md5($original);
-		$texte = substr($texte, 0, $longueur_mini);
-	}
+    if (strlen($texte) < $longueur_mini and $longueur_mini < $longueur_maxi) {
+        if (preg_match(',^\d,', $texte)) {
+            $texte = ($type ? substr($type, 0, 1) : 's') . $texte;
+        }
+        $texte .= $separateur . md5($original);
+        $texte = substr($texte, 0, $longueur_mini);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -5605,11 +5605,11 @@ 
  * @exemple `<:info_maximum|label_nettoyer:>`
  */
 function label_nettoyer(string $text, bool $ucfirst = true): string {
-	$label = preg_replace('#([\s:]|\&nbsp;)+$#u', '', $text);
-	if ($ucfirst) {
-		$label = spip_ucfirst($label);
-	}
-	return $label;
+    $label = preg_replace('#([\s:]|\&nbsp;)+$#u', '', $text);
+    if ($ucfirst) {
+        $label = spip_ucfirst($label);
+    }
+    return $label;
 }
 
 /**
@@ -5622,8 +5622,8 @@ 
  * @exemple `<:info_maximum|label_ponctuer:>`
  */
 function label_ponctuer(string $text, bool $ucfirst = true): string {
-	$label = label_nettoyer($text, $ucfirst);
-	return _T('label_ponctuer', ['label' => $label]);
+    $label = label_nettoyer($text, $ucfirst);
+    return _T('label_ponctuer', ['label' => $label]);
 }
 
 
@@ -5636,19 +5636,19 @@ 
  * @return array
  */
 function helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, $fonction) {
-	if (!in_array($fonction, ['objet_lister_parents', 'objet_lister_enfants', 'objet_lister_parents_par_type', 'objet_lister_enfants_par_type'])) {
-		return [];
-	}
+    if (!in_array($fonction, ['objet_lister_parents', 'objet_lister_enfants', 'objet_lister_parents_par_type', 'objet_lister_enfants_par_type'])) {
+        return [];
+    }
 
-	// compatibilite signature inversee
-	if (is_numeric($objet) and !is_numeric($id_objet)) {
-		[$objet, $id_objet] = [$id_objet, $objet];
-	}
+    // compatibilite signature inversee
+    if (is_numeric($objet) and !is_numeric($id_objet)) {
+        [$objet, $id_objet] = [$id_objet, $objet];
+    }
 
-	if (!function_exists($fonction)) {
-		include_spip('base/objets');
-	}
-	return $fonction($objet, $id_objet);
+    if (!function_exists($fonction)) {
+        include_spip('base/objets');
+    }
+    return $fonction($objet, $id_objet);
 }
 
 
@@ -5663,7 +5663,7 @@ 
  * @return array
  */
 function filtre_objet_lister_parents_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents');
 }
 
 /**
@@ -5677,7 +5677,7 @@ 
  * @return array
  */
 function filtre_objet_lister_parents_par_type_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents_par_type');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents_par_type');
 }
 
 /**
@@ -5691,7 +5691,7 @@ 
  * @return array
  */
 function filtre_objet_lister_enfants_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants');
 }
 
 /**
@@ -5705,5 +5705,5 @@ 
  * @return array
  */
 function filtre_objet_lister_enfants_par_type_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants_par_type');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants_par_type');
 }

ecrire/inc/filtres_alertes.php

Indentation +82 added lines, -82 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -43,22 +43,22 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_MESSAGE_dist($p) {
-	$_texte = interprete_argument_balise(1, $p);
-	$_titre = interprete_argument_balise(2, $p);
-	$_class = interprete_argument_balise(3, $p);
-	$_role  = interprete_argument_balise(4, $p);
-	$_id    = interprete_argument_balise(5, $p);
-	$_texte = ($_texte ?: "''");
-	$_titre = ($_titre ? ", $_titre" : ', null');
-	$_class = ($_class ? ", $_class" : ', null');
-	$_role  = ($_role  ? ", $_role"  : ', null');
-	$_id    = ($_id    ? ", $_id"    : ', null');
+    $_texte = interprete_argument_balise(1, $p);
+    $_titre = interprete_argument_balise(2, $p);
+    $_class = interprete_argument_balise(3, $p);
+    $_role  = interprete_argument_balise(4, $p);
+    $_id    = interprete_argument_balise(5, $p);
+    $_texte = ($_texte ?: "''");
+    $_titre = ($_titre ? ", $_titre" : ', null');
+    $_class = ($_class ? ", $_class" : ', null');
+    $_role  = ($_role  ? ", $_role"  : ', null');
+    $_id    = ($_id    ? ", $_id"    : ', null');
 
-	$f = chercher_filtre('message_alerte');
-	$p->code = "$f($_texte$_titre$_class$_role$_id)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte');
+    $p->code = "$f($_texte$_titre$_class$_role$_id)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -86,20 +86,20 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_OUVRIR_dist($p) {
-	$_titre = interprete_argument_balise(1, $p);
-	$_class = interprete_argument_balise(2, $p);
-	$_role  = interprete_argument_balise(3, $p);
-	$_id    = interprete_argument_balise(4, $p);
-	$_titre = ($_titre ? "$_titre"   : 'null');
-	$_class = ($_class ? ", $_class" : ', null');
-	$_role  = ($_role  ? ", $_role"  : ', null');
-	$_id    = ($_id    ? ", $_id"    : ', null');
+    $_titre = interprete_argument_balise(1, $p);
+    $_class = interprete_argument_balise(2, $p);
+    $_role  = interprete_argument_balise(3, $p);
+    $_id    = interprete_argument_balise(4, $p);
+    $_titre = ($_titre ? "$_titre"   : 'null');
+    $_class = ($_class ? ", $_class" : ', null');
+    $_role  = ($_role  ? ", $_role"  : ', null');
+    $_id    = ($_id    ? ", $_id"    : ', null');
 
-	$f = chercher_filtre('message_alerte_ouvrir');
-	$p->code = "$f($_titre$_class$_role$_id)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte_ouvrir');
+    $p->code = "$f($_titre$_class$_role$_id)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -121,11 +121,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_FERMER_dist($p) {
-	$f = chercher_filtre('message_alerte_fermer');
-	$p->code = "$f()";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte_fermer');
+    $p->code = "$f()";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -160,14 +160,14 @@ 
  */
 function message_alerte(string $texte, ?string $titre = null, ?string $class = null, ?string $role = null, ?string $id = null): string {
 
-	$message_alerte_ouvrir = chercher_filtre('message_alerte_ouvrir');
-	$message_alerte_fermer = chercher_filtre('message_alerte_fermer');
-	$message =
-		$message_alerte_ouvrir($titre, $class, $role, $id) .
-		$texte .
-		$message_alerte_fermer();
+    $message_alerte_ouvrir = chercher_filtre('message_alerte_ouvrir');
+    $message_alerte_fermer = chercher_filtre('message_alerte_fermer');
+    $message =
+        $message_alerte_ouvrir($titre, $class, $role, $id) .
+        $texte .
+        $message_alerte_fermer();
 
-	return $message;
+    return $message;
 }
 
 /**
@@ -198,56 +198,56 @@ 
  */
 function message_alerte_ouvrir(?string $titre = null, ?string $class = null, ?string $role = null, ?string $id = null): string {
 
-	$prive = test_espace_prive();
+    $prive = test_espace_prive();
 
-	// Valeurs par défaut
-	$titre = trim($titre ?? '');
-	$role ??= 'alert'; // fallback uniquement si null
-	$class ??= 'notice'; // fallback uniquement si null
+    // Valeurs par défaut
+    $titre = trim($titre ?? '');
+    $role ??= 'alert'; // fallback uniquement si null
+    $class ??= 'notice'; // fallback uniquement si null
 
-	// Type d'alerte : le chercher dans les classes, nettoyer celles-ci, puis le réinjecter
-	$types = [
-		'notice',
-		'error',
-		'success',
-		'info',
-	];
-	$type  = array_intersect(explode(' ', $class), $types);
-	$type  = reset($type);
-	$class = trim(str_replace($types, '', $class) . " $type");
+    // Type d'alerte : le chercher dans les classes, nettoyer celles-ci, puis le réinjecter
+    $types = [
+        'notice',
+        'error',
+        'success',
+        'info',
+    ];
+    $type  = array_intersect(explode(' ', $class), $types);
+    $type  = reset($type);
+    $class = trim(str_replace($types, '', $class) . " $type");
 
-	// Classes
-	$class_racine = 'msg-alert';
-	$clearfix     = ($prive ? 'clearfix' : '');
-	$class_alerte = "$class_racine $class";
-	$class_texte  = "{$class_racine}__text $clearfix";
-	$class_titre  = "{$class_racine}__heading";
+    // Classes
+    $class_racine = 'msg-alert';
+    $clearfix     = ($prive ? 'clearfix' : '');
+    $class_alerte = "$class_racine $class";
+    $class_texte  = "{$class_racine}__text $clearfix";
+    $class_titre  = "{$class_racine}__heading";
 
-	// Titre : markup
-	$titre = trim($titre);
-	if (strlen($titre)) {
-		include_spip('inc/filtres');
-		// Si besoin on encapsule le titre : un h3 dans le privé, un simple div sinon.
-		$cherche_tag = ($prive ? '<h' : '<');
-		$wrap_tag    = ($prive ? '<h3>' : '<div>');
-		if (strpos($titre, $cherche_tag) !== 0) {
-			$titre = wrap($titre, $wrap_tag);
-		}
-		// puis on ajoute la classe
-		$titre = ajouter_class($titre, $class_titre);
-	}
+    // Titre : markup
+    $titre = trim($titre);
+    if (strlen($titre)) {
+        include_spip('inc/filtres');
+        // Si besoin on encapsule le titre : un h3 dans le privé, un simple div sinon.
+        $cherche_tag = ($prive ? '<h' : '<');
+        $wrap_tag    = ($prive ? '<h3>' : '<div>');
+        if (strpos($titre, $cherche_tag) !== 0) {
+            $titre = wrap($titre, $wrap_tag);
+        }
+        // puis on ajoute la classe
+        $titre = ajouter_class($titre, $class_titre);
+    }
 
-	// Attributs
-	$attr_role = ($role ? "role=\"$role\"" : '');
-	$attr_id   = ($id   ? "id=\"$id\"" : '');
-	$attr_data = ($type ? "data-alert=\"$type\"" : '');
+    // Attributs
+    $attr_role = ($role ? "role=\"$role\"" : '');
+    $attr_id   = ($id   ? "id=\"$id\"" : '');
+    $attr_data = ($type ? "data-alert=\"$type\"" : '');
 
-	$message =
-		"<div class=\"$class_alerte\" $attr_role $attr_id $attr_data>"
-			. $titre
-			. "<div class=\"$class_texte\">";
+    $message =
+        "<div class=\"$class_alerte\" $attr_role $attr_id $attr_data>"
+            . $titre
+            . "<div class=\"$class_texte\">";
 
-	return $message;
+    return $message;
 }
 
 /**
@@ -261,5 +261,5 @@ 
  *     HTML de fin de l'alerte
  */
 function message_alerte_fermer(): string {
-	return '</div></div>';
+    return '</div></div>';
 }

ecrire/inc/recherche_to_array.php

Indentation +267 added lines, -267 removed lines

@@ -11,298 +11,298 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
 // methodes sql
 function inc_recherche_to_array_dist($recherche, $options = []) {
 
-	// options par defaut
-	$options = array_merge(
-		[
-			'score' => true,
-			'champs' => false,
-			'toutvoir' => false,
-			'matches' => false,
-			'jointures' => false
-		],
-		$options
-	);
+    // options par defaut
+    $options = array_merge(
+        [
+            'score' => true,
+            'champs' => false,
+            'toutvoir' => false,
+            'matches' => false,
+            'jointures' => false
+        ],
+        $options
+    );
 
-	include_spip('inc/rechercher');
-	include_spip('inc/autoriser');
+    include_spip('inc/rechercher');
+    include_spip('inc/autoriser');
 
-	$requete = [
-		'SELECT' => [],
-		'FROM' => [],
-		'WHERE' => [],
-		'GROUPBY' => [],
-		'ORDERBY' => [],
-		'LIMIT' => '',
-		'HAVING' => []
-	];
+    $requete = [
+        'SELECT' => [],
+        'FROM' => [],
+        'WHERE' => [],
+        'GROUPBY' => [],
+        'ORDERBY' => [],
+        'LIMIT' => '',
+        'HAVING' => []
+    ];
 
-	$table = sinon($options['table'], 'article');
-	if ($options['champs']) {
-		$champs = $options['champs'];
-	} else {
-		$l = liste_des_champs();
-		$champs = $l['article'];
-	}
-	$serveur = $options['serveur'];
+    $table = sinon($options['table'], 'article');
+    if ($options['champs']) {
+        $champs = $options['champs'];
+    } else {
+        $l = liste_des_champs();
+        $champs = $l['article'];
+    }
+    $serveur = $options['serveur'];
 
-	[$methode, $q, $preg] = expression_recherche($recherche, $options);
+    [$methode, $q, $preg] = expression_recherche($recherche, $options);
 
-	$jointures = $options['jointures']
-		? liste_des_jointures()
-		: [];
+    $jointures = $options['jointures']
+        ? liste_des_jointures()
+        : [];
 
-	$_id_table = id_table_objet($table);
+    $_id_table = id_table_objet($table);
 
-	// c'est un pis-aller : ca a peu de chance de marcher, mais mieux quand meme que en conservant la ','
-	// (aka ca marche au moins dans certains cas comme avec spip_formulaires_reponses_champs)
-	if (strpos($_id_table, ',') !== false) {
-		$_id_table = explode(',', $_id_table);
-		$_id_table = reset($_id_table);
-	}
+    // c'est un pis-aller : ca a peu de chance de marcher, mais mieux quand meme que en conservant la ','
+    // (aka ca marche au moins dans certains cas comme avec spip_formulaires_reponses_champs)
+    if (strpos($_id_table, ',') !== false) {
+        $_id_table = explode(',', $_id_table);
+        $_id_table = reset($_id_table);
+    }
 
-	$requete['SELECT'][] = 't.' . $_id_table;
-	$a = [];
-	// Recherche fulltext
-	foreach ($champs as $champ => $poids) {
-		if (is_array($champ)) {
-			spip_log('requetes imbriquees interdites');
-		} else {
-			if (strpos($champ, '.') === false) {
-				$champ = "t.$champ";
-			}
-			$requete['SELECT'][] = $champ;
-			$a[] = $champ . ' ' . $methode . ' ' . $q;
-		}
-	}
-	if ($a) {
-		$requete['WHERE'][] = join(' OR ', $a);
-	}
-	$requete['FROM'][] = table_objet_sql($table) . ' AS t';
+    $requete['SELECT'][] = 't.' . $_id_table;
+    $a = [];
+    // Recherche fulltext
+    foreach ($champs as $champ => $poids) {
+        if (is_array($champ)) {
+            spip_log('requetes imbriquees interdites');
+        } else {
+            if (strpos($champ, '.') === false) {
+                $champ = "t.$champ";
+            }
+            $requete['SELECT'][] = $champ;
+            $a[] = $champ . ' ' . $methode . ' ' . $q;
+        }
+    }
+    if ($a) {
+        $requete['WHERE'][] = join(' OR ', $a);
+    }
+    $requete['FROM'][] = table_objet_sql($table) . ' AS t';
 
-	$results = [];
+    $results = [];
 
-	$s = sql_select(
-		$requete['SELECT'],
-		$requete['FROM'],
-		$requete['WHERE'],
-		implode(' ', $requete['GROUPBY']),
-		$requete['ORDERBY'],
-		$requete['LIMIT'],
-		$requete['HAVING'],
-		$serveur
-	);
+    $s = sql_select(
+        $requete['SELECT'],
+        $requete['FROM'],
+        $requete['WHERE'],
+        implode(' ', $requete['GROUPBY']),
+        $requete['ORDERBY'],
+        $requete['LIMIT'],
+        $requete['HAVING'],
+        $serveur
+    );
 
-	while (
-		$t = sql_fetch($s, $serveur)
-		and (!isset($t['score']) or $t['score'] > 0)
-	) {
-		$id = intval($t[$_id_table]);
+    while (
+        $t = sql_fetch($s, $serveur)
+        and (!isset($t['score']) or $t['score'] > 0)
+    ) {
+        $id = intval($t[$_id_table]);
 
-		if (
-			$options['toutvoir']
-			or autoriser('voir', $table, $id)
-		) {
-			// indiquer les champs concernes
-			$champs_vus = [];
-			$score = 0;
-			$matches = [];
+        if (
+            $options['toutvoir']
+            or autoriser('voir', $table, $id)
+        ) {
+            // indiquer les champs concernes
+            $champs_vus = [];
+            $score = 0;
+            $matches = [];
 
-			$vu = false;
-			foreach ($champs as $champ => $poids) {
-				$champ = explode('.', $champ);
-				$champ = end($champ);
-				// translitteration_rapide uniquement si on est deja en utf-8
-				$value = ($GLOBALS['meta']['charset'] == 'utf-8' ? translitteration_rapide($t[$champ]) : translitteration($t[$champ]));
-				if (
-					$n =
-					($options['score'] || $options['matches'])
-						? preg_match_all($preg, $value, $regs, PREG_SET_ORDER)
-						: preg_match($preg, $value)
-				) {
-					$vu = true;
+            $vu = false;
+            foreach ($champs as $champ => $poids) {
+                $champ = explode('.', $champ);
+                $champ = end($champ);
+                // translitteration_rapide uniquement si on est deja en utf-8
+                $value = ($GLOBALS['meta']['charset'] == 'utf-8' ? translitteration_rapide($t[$champ]) : translitteration($t[$champ]));
+                if (
+                    $n =
+                    ($options['score'] || $options['matches'])
+                        ? preg_match_all($preg, $value, $regs, PREG_SET_ORDER)
+                        : preg_match($preg, $value)
+                ) {
+                    $vu = true;
 
-					if ($options['champs']) {
-						$champs_vus[$champ] = $t[$champ];
-					}
-					if ($options['score']) {
-						// compter les points avec un peu de discernement : on pondere par la longueur du match compte en chars
-						$score += $poids * strlen(implode('', array_column($regs, 0)));
-					}
+                    if ($options['champs']) {
+                        $champs_vus[$champ] = $t[$champ];
+                    }
+                    if ($options['score']) {
+                        // compter les points avec un peu de discernement : on pondere par la longueur du match compte en chars
+                        $score += $poids * strlen(implode('', array_column($regs, 0)));
+                    }
 
-					if ($options['matches']) {
-						$matches[$champ] = $regs;
-					}
+                    if ($options['matches']) {
+                        $matches[$champ] = $regs;
+                    }
 
-					if (
-						!$options['champs']
-						and !$options['score']
-						and !$options['matches']
-					) {
-						break;
-					}
-				}
-			}
+                    if (
+                        !$options['champs']
+                        and !$options['score']
+                        and !$options['matches']
+                    ) {
+                        break;
+                    }
+                }
+            }
 
-			if ($vu) {
-				if (!isset($results)) {
-					$results = [];
-				}
-				$results[$id] = [];
-				if ($champs_vus) {
-					$results[$id]['champs'] = $champs_vus;
-				}
-				if ($score) {
-					$results[$id]['score'] = $score;
-				}
-				if ($matches) {
-					$results[$id]['matches'] = $matches;
-				}
-			}
-		}
-	}
+            if ($vu) {
+                if (!isset($results)) {
+                    $results = [];
+                }
+                $results[$id] = [];
+                if ($champs_vus) {
+                    $results[$id]['champs'] = $champs_vus;
+                }
+                if ($score) {
+                    $results[$id]['score'] = $score;
+                }
+                if ($matches) {
+                    $results[$id]['matches'] = $matches;
+                }
+            }
+        }
+    }
 
 
-	// Gerer les donnees associees
-	// ici on est un peu naze : pas capables de reconstruire une jointure complexe
-	// on ne sait passer que par table de laison en 1 coup
-	if (
-		isset($jointures[$table])
-		and $joints = recherche_en_base(
-			$recherche,
-			$jointures[$table],
-			array_merge($options, ['jointures' => false])
-		)
-	) {
-		include_spip('action/editer_liens');
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$cle_depart = id_table_objet($table);
-		$table_depart = table_objet($table, $serveur);
-		$desc_depart = $trouver_table($table_depart, $serveur);
-		$depart_associable = objet_associable($table);
-		foreach ($joints as $table_liee => $ids_trouves) {
-			// on peut definir une fonction de recherche jointe pour regler les cas particuliers
-			if (
-				!(
-				$rechercher_joints = charger_fonction("rechercher_joints_{$table}_{$table_liee}", 'inc', true)
-				or $rechercher_joints = charger_fonction("rechercher_joints_objet_{$table_liee}", 'inc', true)
-				or $rechercher_joints = charger_fonction("rechercher_joints_{$table}_objet_lie", 'inc', true)
-				)
-			) {
-				$cle_arrivee = id_table_objet($table_liee);
-				$table_arrivee = table_objet($table_liee, $serveur);
-				$desc_arrivee = $trouver_table($table_arrivee, $serveur);
-				// cas simple : $cle_depart dans la table_liee
-				if (isset($desc_arrivee['field'][$cle_depart])) {
-					$s = sql_select(
-						"$cle_depart, $cle_arrivee",
-						$desc_arrivee['table_sql'],
-						sql_in($cle_arrivee, array_keys($ids_trouves)),
-						'',
-						'',
-						'',
-						'',
-						$serveur
-					);
-				} // cas simple : $cle_arrivee dans la table
-				elseif (isset($desc_depart['field'][$cle_arrivee])) {
-					$s = sql_select(
-						"$cle_depart, $cle_arrivee",
-						$desc_depart['table_sql'],
-						sql_in($cle_arrivee, array_keys($ids_trouves)),
-						'',
-						'',
-						'',
-						'',
-						$serveur
-					);
-				}
-				// sinon cherchons une table de liaison
-				// cas recherche principale article, objet lie document : passer par spip_documents_liens
-				elseif ($l = objet_associable($table_liee)) {
-					[$primary, $table_liens] = $l;
-					$s = sql_select(
-						"id_objet as $cle_depart, $primary as $cle_arrivee",
-						$table_liens,
-						["objet='$table'", sql_in($primary, array_keys($ids_trouves))],
-						'',
-						'',
-						'',
-						'',
-						$serveur
-					);
-				} // cas recherche principale auteur, objet lie article: passer par spip_auteurs_liens
-				elseif ($l = $depart_associable) {
-					[$primary, $table_liens] = $l;
-					$s = sql_select(
-						"$primary as $cle_depart, id_objet as $cle_arrivee",
-						$table_liens,
-						["objet='$table_liee'", sql_in('id_objet', array_keys($ids_trouves))],
-						'',
-						'',
-						'',
-						'',
-						$serveur
-					);
-				} // cas table de liaison generique spip_xxx_yyy
-				elseif (
-					$t = $trouver_table($table_arrivee . '_' . $table_depart, $serveur)
-					or $t = $trouver_table($table_depart . '_' . $table_arrivee, $serveur)
-				) {
-					$s = sql_select(
-						"$cle_depart,$cle_arrivee",
-						$t['table_sql'],
-						sql_in($cle_arrivee, array_keys($ids_trouves)),
-						'',
-						'',
-						'',
-						'',
-						$serveur
-					);
-				}
-			} else {
-				[$cle_depart, $cle_arrivee, $s] = $rechercher_joints(
-					$table,
-					$table_liee,
-					array_keys($ids_trouves),
-					$serveur
-				);
-			}
+    // Gerer les donnees associees
+    // ici on est un peu naze : pas capables de reconstruire une jointure complexe
+    // on ne sait passer que par table de laison en 1 coup
+    if (
+        isset($jointures[$table])
+        and $joints = recherche_en_base(
+            $recherche,
+            $jointures[$table],
+            array_merge($options, ['jointures' => false])
+        )
+    ) {
+        include_spip('action/editer_liens');
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $cle_depart = id_table_objet($table);
+        $table_depart = table_objet($table, $serveur);
+        $desc_depart = $trouver_table($table_depart, $serveur);
+        $depart_associable = objet_associable($table);
+        foreach ($joints as $table_liee => $ids_trouves) {
+            // on peut definir une fonction de recherche jointe pour regler les cas particuliers
+            if (
+                !(
+                $rechercher_joints = charger_fonction("rechercher_joints_{$table}_{$table_liee}", 'inc', true)
+                or $rechercher_joints = charger_fonction("rechercher_joints_objet_{$table_liee}", 'inc', true)
+                or $rechercher_joints = charger_fonction("rechercher_joints_{$table}_objet_lie", 'inc', true)
+                )
+            ) {
+                $cle_arrivee = id_table_objet($table_liee);
+                $table_arrivee = table_objet($table_liee, $serveur);
+                $desc_arrivee = $trouver_table($table_arrivee, $serveur);
+                // cas simple : $cle_depart dans la table_liee
+                if (isset($desc_arrivee['field'][$cle_depart])) {
+                    $s = sql_select(
+                        "$cle_depart, $cle_arrivee",
+                        $desc_arrivee['table_sql'],
+                        sql_in($cle_arrivee, array_keys($ids_trouves)),
+                        '',
+                        '',
+                        '',
+                        '',
+                        $serveur
+                    );
+                } // cas simple : $cle_arrivee dans la table
+                elseif (isset($desc_depart['field'][$cle_arrivee])) {
+                    $s = sql_select(
+                        "$cle_depart, $cle_arrivee",
+                        $desc_depart['table_sql'],
+                        sql_in($cle_arrivee, array_keys($ids_trouves)),
+                        '',
+                        '',
+                        '',
+                        '',
+                        $serveur
+                    );
+                }
+                // sinon cherchons une table de liaison
+                // cas recherche principale article, objet lie document : passer par spip_documents_liens
+                elseif ($l = objet_associable($table_liee)) {
+                    [$primary, $table_liens] = $l;
+                    $s = sql_select(
+                        "id_objet as $cle_depart, $primary as $cle_arrivee",
+                        $table_liens,
+                        ["objet='$table'", sql_in($primary, array_keys($ids_trouves))],
+                        '',
+                        '',
+                        '',
+                        '',
+                        $serveur
+                    );
+                } // cas recherche principale auteur, objet lie article: passer par spip_auteurs_liens
+                elseif ($l = $depart_associable) {
+                    [$primary, $table_liens] = $l;
+                    $s = sql_select(
+                        "$primary as $cle_depart, id_objet as $cle_arrivee",
+                        $table_liens,
+                        ["objet='$table_liee'", sql_in('id_objet', array_keys($ids_trouves))],
+                        '',
+                        '',
+                        '',
+                        '',
+                        $serveur
+                    );
+                } // cas table de liaison generique spip_xxx_yyy
+                elseif (
+                    $t = $trouver_table($table_arrivee . '_' . $table_depart, $serveur)
+                    or $t = $trouver_table($table_depart . '_' . $table_arrivee, $serveur)
+                ) {
+                    $s = sql_select(
+                        "$cle_depart,$cle_arrivee",
+                        $t['table_sql'],
+                        sql_in($cle_arrivee, array_keys($ids_trouves)),
+                        '',
+                        '',
+                        '',
+                        '',
+                        $serveur
+                    );
+                }
+            } else {
+                [$cle_depart, $cle_arrivee, $s] = $rechercher_joints(
+                    $table,
+                    $table_liee,
+                    array_keys($ids_trouves),
+                    $serveur
+                );
+            }
 
-			while ($t = is_array($s) ? array_shift($s) : sql_fetch($s)) {
-				$id = $t[$cle_depart];
-				$joint = $ids_trouves[$t[$cle_arrivee]];
-				if (!isset($results)) {
-					$results = [];
-				}
-				if (!isset($results[$id])) {
-					$results[$id] = [];
-				}
-				if (isset($joint['score']) and $joint['score']) {
-					if (!isset($results[$id]['score'])) {
-						$results[$id]['score'] = 0;
-					}
-					$results[$id]['score'] += $joint['score'];
-				}
-				if (isset($joint['champs']) and $joint['champs']) {
-					foreach ($joint['champs'] as $c => $val) {
-						$results[$id]['champs'][$table_liee . '.' . $c] = $val;
-					}
-				}
-				if (isset($joint['matches']) and $joint['matches']) {
-					foreach ($joint['matches'] as $c => $val) {
-						$results[$id]['matches'][$table_liee . '.' . $c] = $val;
-					}
-				}
-			}
-		}
-	}
+            while ($t = is_array($s) ? array_shift($s) : sql_fetch($s)) {
+                $id = $t[$cle_depart];
+                $joint = $ids_trouves[$t[$cle_arrivee]];
+                if (!isset($results)) {
+                    $results = [];
+                }
+                if (!isset($results[$id])) {
+                    $results[$id] = [];
+                }
+                if (isset($joint['score']) and $joint['score']) {
+                    if (!isset($results[$id]['score'])) {
+                        $results[$id]['score'] = 0;
+                    }
+                    $results[$id]['score'] += $joint['score'];
+                }
+                if (isset($joint['champs']) and $joint['champs']) {
+                    foreach ($joint['champs'] as $c => $val) {
+                        $results[$id]['champs'][$table_liee . '.' . $c] = $val;
+                    }
+                }
+                if (isset($joint['matches']) and $joint['matches']) {
+                    foreach ($joint['matches'] as $c => $val) {
+                        $results[$id]['matches'][$table_liee . '.' . $c] = $val;
+                    }
+                }
+            }
+        }
+    }
 
-	return $results;
+    return $results;
 }

ecrire/inc/plugin.php

Indentation +984 added lines, -984 removed lines

@@ -17,12 +17,12 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /** l'adresse du repertoire de telechargement et de decompactage des plugins */
 if (!defined('_DIR_PLUGINS_AUTO')) {
-	define('_DIR_PLUGINS_AUTO', _DIR_PLUGINS . 'auto/');
+    define('_DIR_PLUGINS_AUTO', _DIR_PLUGINS . 'auto/');
 }
 
 #include_spip('inc/texte'); // ????? Appelle public/parametrer trop tot avant la reconstruction du chemin des plugins.
@@ -47,27 +47,27 @@ 
  * @return array
 **/
 function liste_plugin_files($dir_plugins = null) {
-	static $plugin_files = [];
-	if (is_null($dir_plugins)) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
-	if (
-		!isset($plugin_files[$dir_plugins])
-		or (is_countable($plugin_files[$dir_plugins]) ? count($plugin_files[$dir_plugins]) : 0) == 0
-	) {
-		$plugin_files[$dir_plugins] = [];
-		foreach (fast_find_plugin_dirs($dir_plugins) as $plugin) {
-			$plugin_files[$dir_plugins][] = substr($plugin, strlen($dir_plugins));
-		}
-
-		sort($plugin_files[$dir_plugins]);
-		// et on lit le XML de tous les plugins pour le mettre en cache
-		// et en profiter pour nettoyer ceux qui n'existent plus du cache
-		$get_infos = charger_fonction('get_infos', 'plugins');
-		$get_infos($plugin_files[$dir_plugins], false, $dir_plugins, true);
-	}
-
-	return $plugin_files[$dir_plugins];
+    static $plugin_files = [];
+    if (is_null($dir_plugins)) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
+    if (
+        !isset($plugin_files[$dir_plugins])
+        or (is_countable($plugin_files[$dir_plugins]) ? count($plugin_files[$dir_plugins]) : 0) == 0
+    ) {
+        $plugin_files[$dir_plugins] = [];
+        foreach (fast_find_plugin_dirs($dir_plugins) as $plugin) {
+            $plugin_files[$dir_plugins][] = substr($plugin, strlen($dir_plugins));
+        }
+
+        sort($plugin_files[$dir_plugins]);
+        // et on lit le XML de tous les plugins pour le mettre en cache
+        // et en profiter pour nettoyer ceux qui n'existent plus du cache
+        $get_infos = charger_fonction('get_infos', 'plugins');
+        $get_infos($plugin_files[$dir_plugins], false, $dir_plugins, true);
+    }
+
+    return $plugin_files[$dir_plugins];
 }
 
 /**
@@ -83,45 +83,45 @@ 
  *     Liste complète des répeertoires
 **/
 function fast_find_plugin_dirs($dir, $max_prof = 100) {
-	$fichiers = [];
-	// revenir au repertoire racine si on a recu dossier/truc
-	// pour regarder dossier/truc/ ne pas oublier le / final
-	$dir = preg_replace(',/[^/]*$,', '', $dir);
-	if ($dir == '') {
-		$dir = '.';
-	}
-
-	if (!is_dir($dir)) {
-		return $fichiers;
-	}
-	if (is_plugin_dir($dir, '')) {
-		$fichiers[] = $dir;
-
-		return $fichiers;
-	}
-	if ($max_prof <= 0) {
-		return $fichiers;
-	}
-
-	$subdirs = [];
-	if (@is_dir($dir) and is_readable($dir) and $d = opendir($dir)) {
-		while (($f = readdir($d)) !== false) {
-			if (
-				$f[0] != '.' # ignorer . .. .svn etc
-				and $f != 'CVS'
-				and is_dir($f = "$dir/$f")
-			) {
-				$subdirs[] = $f;
-			}
-		}
-		closedir($d);
-	}
-
-	foreach ($subdirs as $d) {
-		$fichiers = array_merge($fichiers, fast_find_plugin_dirs("$d/", $max_prof - 1));
-	}
-
-	return $fichiers;
+    $fichiers = [];
+    // revenir au repertoire racine si on a recu dossier/truc
+    // pour regarder dossier/truc/ ne pas oublier le / final
+    $dir = preg_replace(',/[^/]*$,', '', $dir);
+    if ($dir == '') {
+        $dir = '.';
+    }
+
+    if (!is_dir($dir)) {
+        return $fichiers;
+    }
+    if (is_plugin_dir($dir, '')) {
+        $fichiers[] = $dir;
+
+        return $fichiers;
+    }
+    if ($max_prof <= 0) {
+        return $fichiers;
+    }
+
+    $subdirs = [];
+    if (@is_dir($dir) and is_readable($dir) and $d = opendir($dir)) {
+        while (($f = readdir($d)) !== false) {
+            if (
+                $f[0] != '.' # ignorer . .. .svn etc
+                and $f != 'CVS'
+                and is_dir($f = "$dir/$f")
+            ) {
+                $subdirs[] = $f;
+            }
+        }
+        closedir($d);
+    }
+
+    foreach ($subdirs as $d) {
+        $fichiers = array_merge($fichiers, fast_find_plugin_dirs("$d/", $max_prof - 1));
+    }
+
+    return $fichiers;
 }
 
 /**
@@ -142,27 +142,27 @@ 
 **/
 function is_plugin_dir($dir, $dir_plugins = null) {
 
-	if (is_array($dir)) {
-		foreach ($dir as $k => $d) {
-			if (!is_plugin_dir($d, $dir_plugins)) {
-				unset($dir[$k]);
-			}
-		}
-
-		return $dir;
-	}
-	if (is_null($dir_plugins)) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
-	$search = ["$dir_plugins$dir/paquet.xml"];
-
-	foreach ($search as $s) {
-		if (file_exists($s)) {
-			return $dir;
-		}
-	}
-
-	return '';
+    if (is_array($dir)) {
+        foreach ($dir as $k => $d) {
+            if (!is_plugin_dir($d, $dir_plugins)) {
+                unset($dir[$k]);
+            }
+        }
+
+        return $dir;
+    }
+    if (is_null($dir_plugins)) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
+    $search = ["$dir_plugins$dir/paquet.xml"];
+
+    foreach ($search as $s) {
+        if (file_exists($s)) {
+            return $dir;
+        }
+    }
+
+    return '';
 }
 
 /** Regexp d'extraction des informations d'un intervalle de compatibilité */
@@ -189,51 +189,51 @@ 
  **/
 function plugin_version_compatible($intervalle, $version, $avec_quoi = '') {
 
-	if (!strlen($intervalle)) {
-		return true;
-	}
-	if (!preg_match(_EXTRAIRE_INTERVALLE, $intervalle, $regs)) {
-		return false;
-	}
-	// Extraction des bornes et traitement de * pour la borne sup :
-	// -- on autorise uniquement les ecritures 3.0.*, 3.*
-	$minimum = $regs[1];
-	$maximum = $regs[2];
-
-	//  si une version SPIP de compatibilité a été définie (dans
-	//  mes_options.php, sous la forme : define('_DEV_VERSION_SPIP_COMPAT', '3.1.0');
-	//  on l'utilise (phase de dev, de test...) mais *que* en cas de comparaison
-	//  avec la version de SPIP (ne nuit donc pas aux tests de necessite
-	//  entre plugins)
-	if (defined('_DEV_VERSION_SPIP_COMPAT') and $avec_quoi == 'spip' and $version !== _DEV_VERSION_SPIP_COMPAT) {
-		if (plugin_version_compatible($intervalle, _DEV_VERSION_SPIP_COMPAT, $avec_quoi)) {
-			return true;
-		}
-		// si pas de compatibilite avec _DEV_VERSION_SPIP_COMPAT, on essaye quand meme avec la vrai version
-		// cas du plugin qui n'est compatible qu'avec cette nouvelle version
-	}
-
-	$minimum_inc = $intervalle[0] == '[';
-	$maximum_inc = substr($intervalle, -1) == ']';
-
-	if (strlen($minimum)) {
-		if ($minimum_inc and spip_version_compare($version, $minimum, '<')) {
-			return false;
-		}
-		if (!$minimum_inc and spip_version_compare($version, $minimum, '<=')) {
-			return false;
-		}
-	}
-	if (strlen($maximum)) {
-		if ($maximum_inc and spip_version_compare($version, $maximum, '>')) {
-			return false;
-		}
-		if (!$maximum_inc and spip_version_compare($version, $maximum, '>=')) {
-			return false;
-		}
-	}
-
-	return true;
+    if (!strlen($intervalle)) {
+        return true;
+    }
+    if (!preg_match(_EXTRAIRE_INTERVALLE, $intervalle, $regs)) {
+        return false;
+    }
+    // Extraction des bornes et traitement de * pour la borne sup :
+    // -- on autorise uniquement les ecritures 3.0.*, 3.*
+    $minimum = $regs[1];
+    $maximum = $regs[2];
+
+    //  si une version SPIP de compatibilité a été définie (dans
+    //  mes_options.php, sous la forme : define('_DEV_VERSION_SPIP_COMPAT', '3.1.0');
+    //  on l'utilise (phase de dev, de test...) mais *que* en cas de comparaison
+    //  avec la version de SPIP (ne nuit donc pas aux tests de necessite
+    //  entre plugins)
+    if (defined('_DEV_VERSION_SPIP_COMPAT') and $avec_quoi == 'spip' and $version !== _DEV_VERSION_SPIP_COMPAT) {
+        if (plugin_version_compatible($intervalle, _DEV_VERSION_SPIP_COMPAT, $avec_quoi)) {
+            return true;
+        }
+        // si pas de compatibilite avec _DEV_VERSION_SPIP_COMPAT, on essaye quand meme avec la vrai version
+        // cas du plugin qui n'est compatible qu'avec cette nouvelle version
+    }
+
+    $minimum_inc = $intervalle[0] == '[';
+    $maximum_inc = substr($intervalle, -1) == ']';
+
+    if (strlen($minimum)) {
+        if ($minimum_inc and spip_version_compare($version, $minimum, '<')) {
+            return false;
+        }
+        if (!$minimum_inc and spip_version_compare($version, $minimum, '<=')) {
+            return false;
+        }
+    }
+    if (strlen($maximum)) {
+        if ($maximum_inc and spip_version_compare($version, $maximum, '>')) {
+            return false;
+        }
+        if (!$maximum_inc and spip_version_compare($version, $maximum, '>=')) {
+            return false;
+        }
+    }
+
+    return true;
 }
 
 /**
@@ -250,62 +250,62 @@ 
  * @return array
  */
 function liste_plugin_valides($liste_plug, $force = false) {
-	$liste_ext = liste_plugin_files(_DIR_PLUGINS_DIST);
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$infos = [
-		// lister les extensions qui sont automatiquement actives
-		'_DIR_PLUGINS_DIST' => $get_infos($liste_ext, $force, _DIR_PLUGINS_DIST),
-		'_DIR_PLUGINS' => $get_infos($liste_plug, $force, _DIR_PLUGINS)
-	];
-
-	// creer une premiere liste non ordonnee mais qui ne retient
-	// que les plugins valides, et dans leur derniere version en cas de doublon
-	$infos['_DIR_RESTREINT'][''] = $get_infos('./', $force, _DIR_RESTREINT);
-	$infos['_DIR_RESTREINT']['SPIP']['version'] = $GLOBALS['spip_version_branche'];
-	$infos['_DIR_RESTREINT']['SPIP']['chemin'] = [];
-	$liste_non_classee = [
-		'SPIP' => [
-			'nom' => 'SPIP',
-			'etat' => 'stable',
-			'version' => $GLOBALS['spip_version_branche'],
-			'dir_type' => '_DIR_RESTREINT',
-			'dir' => '',
-		]
-	];
-
-	$invalides = [];
-	foreach ($liste_ext as $plug) {
-		if (isset($infos['_DIR_PLUGINS_DIST'][$plug])) {
-			plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS_DIST');
-		}
-	}
-	foreach ($liste_plug as $plug) {
-		if (isset($infos['_DIR_PLUGINS'][$plug])) {
-			$r = plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS');
-			if (is_array($r)) {
-				$invalides = array_merge($invalides, $r);
-			}
-		}
-	}
-
-	if (defined('_DIR_PLUGINS_SUPPL') and _DIR_PLUGINS_SUPPL) {
-		$infos['_DIR_PLUGINS_SUPPL'] = $get_infos($liste_plug, false, _DIR_PLUGINS_SUPPL);
-		foreach ($liste_plug as $plug) {
-			if (isset($infos['_DIR_PLUGINS_SUPPL'][$plug])) {
-				$r = plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS_SUPPL');
-				if (is_array($r)) {
-					$invalides = array_merge($invalides, $r);
-				}
-			}
-		}
-	}
-
-	plugin_fixer_procure($liste_non_classee, $infos);
-
-	// les plugins qui sont dans $liste_non_classee ne sont pas invalides (on a trouve un autre version valide)
-	$invalides = array_diff_key($invalides, $liste_non_classee);
-
-	return [$infos, $liste_non_classee, $invalides];
+    $liste_ext = liste_plugin_files(_DIR_PLUGINS_DIST);
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $infos = [
+        // lister les extensions qui sont automatiquement actives
+        '_DIR_PLUGINS_DIST' => $get_infos($liste_ext, $force, _DIR_PLUGINS_DIST),
+        '_DIR_PLUGINS' => $get_infos($liste_plug, $force, _DIR_PLUGINS)
+    ];
+
+    // creer une premiere liste non ordonnee mais qui ne retient
+    // que les plugins valides, et dans leur derniere version en cas de doublon
+    $infos['_DIR_RESTREINT'][''] = $get_infos('./', $force, _DIR_RESTREINT);
+    $infos['_DIR_RESTREINT']['SPIP']['version'] = $GLOBALS['spip_version_branche'];
+    $infos['_DIR_RESTREINT']['SPIP']['chemin'] = [];
+    $liste_non_classee = [
+        'SPIP' => [
+            'nom' => 'SPIP',
+            'etat' => 'stable',
+            'version' => $GLOBALS['spip_version_branche'],
+            'dir_type' => '_DIR_RESTREINT',
+            'dir' => '',
+        ]
+    ];
+
+    $invalides = [];
+    foreach ($liste_ext as $plug) {
+        if (isset($infos['_DIR_PLUGINS_DIST'][$plug])) {
+            plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS_DIST');
+        }
+    }
+    foreach ($liste_plug as $plug) {
+        if (isset($infos['_DIR_PLUGINS'][$plug])) {
+            $r = plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS');
+            if (is_array($r)) {
+                $invalides = array_merge($invalides, $r);
+            }
+        }
+    }
+
+    if (defined('_DIR_PLUGINS_SUPPL') and _DIR_PLUGINS_SUPPL) {
+        $infos['_DIR_PLUGINS_SUPPL'] = $get_infos($liste_plug, false, _DIR_PLUGINS_SUPPL);
+        foreach ($liste_plug as $plug) {
+            if (isset($infos['_DIR_PLUGINS_SUPPL'][$plug])) {
+                $r = plugin_valide_resume($liste_non_classee, $plug, $infos, '_DIR_PLUGINS_SUPPL');
+                if (is_array($r)) {
+                    $invalides = array_merge($invalides, $r);
+                }
+            }
+        }
+    }
+
+    plugin_fixer_procure($liste_non_classee, $infos);
+
+    // les plugins qui sont dans $liste_non_classee ne sont pas invalides (on a trouve un autre version valide)
+    $invalides = array_diff_key($invalides, $liste_non_classee);
+
+    return [$infos, $liste_non_classee, $invalides];
 }
 
 /**
@@ -325,38 +325,38 @@ 
  *   array description short si on ne le retient pas (pour memorisation dans une table des erreurs)
  */
 function plugin_valide_resume(&$liste, $plug, $infos, $dir_type) {
-	$i = $infos[$dir_type][$plug];
-	// minimum syndical pour afficher si le xml avait des erreurs éventuelles
-	$short_desc = [
-		'dir' => $plug,
-		'dir_type' => $dir_type
-	];
-	if (empty($i['prefix'])) {
-		// erreur xml ? mais sans connaissance du prefix, on retourne le chemin…
-		$short_desc['erreur'] = $i['erreur'] ?? ['?'];
-		return [$plug => $short_desc];
-	}
-
-	$p = strtoupper($i['prefix']);
-	$short_desc['nom'] = $i['nom'];
-	$short_desc['etat'] = $i['etat'];
-	$short_desc['version'] = $i['version'];
-
-	if (isset($i['erreur']) and $i['erreur']) {
-		$short_desc['erreur'] = $i['erreur'];
-		return [$p => $short_desc];
-	}
-	if (!plugin_version_compatible($i['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
-		return [$p => $short_desc];
-	}
-	if (
-		!isset($liste[$p])
-		or spip_version_compare($i['version'], $liste[$p]['version'], '>')
-	) {
-		$liste[$p] = $short_desc;
-	}
-	// ok le plugin etait deja dans la liste ou on a choisi une version plus recente
-	return $p;
+    $i = $infos[$dir_type][$plug];
+    // minimum syndical pour afficher si le xml avait des erreurs éventuelles
+    $short_desc = [
+        'dir' => $plug,
+        'dir_type' => $dir_type
+    ];
+    if (empty($i['prefix'])) {
+        // erreur xml ? mais sans connaissance du prefix, on retourne le chemin…
+        $short_desc['erreur'] = $i['erreur'] ?? ['?'];
+        return [$plug => $short_desc];
+    }
+
+    $p = strtoupper($i['prefix']);
+    $short_desc['nom'] = $i['nom'];
+    $short_desc['etat'] = $i['etat'];
+    $short_desc['version'] = $i['version'];
+
+    if (isset($i['erreur']) and $i['erreur']) {
+        $short_desc['erreur'] = $i['erreur'];
+        return [$p => $short_desc];
+    }
+    if (!plugin_version_compatible($i['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
+        return [$p => $short_desc];
+    }
+    if (
+        !isset($liste[$p])
+        or spip_version_compare($i['version'], $liste[$p]['version'], '>')
+    ) {
+        $liste[$p] = $short_desc;
+    }
+    // ok le plugin etait deja dans la liste ou on a choisi une version plus recente
+    return $p;
 }
 
 /**
@@ -372,47 +372,47 @@ 
  * @param array $infos
  */
 function plugin_fixer_procure(&$liste, &$infos) {
-	foreach ($liste as $p => $resume) {
-		$i = $infos[$resume['dir_type']][$resume['dir']];
-		if (isset($i['procure']) and $i['procure']) {
-			foreach ($i['procure'] as $procure) {
-				$p = strtoupper($procure['nom']);
-				$dir = $resume['dir'];
-				if ($dir) {
-					$dir .= '/';
-				}
-				$dir .= 'procure:' . $procure['nom'];
-
-				$procure['etat'] = '?';
-				$procure['dir_type'] = $resume['dir_type'];
-				$procure['dir'] = $dir;
-
-				// si ce plugin n'est pas deja procure, ou dans une version plus ancienne
-				// on ajoute cette version a la liste
-				if (
-					!isset($liste[$p])
-					or spip_version_compare($procure['version'], $liste[$p]['version'], '>')
-				) {
-					$liste[$p] = $procure;
-
-					// on fournit une information minimale pour ne pas perturber la compilation
-					$infos[$resume['dir_type']][$dir] = [
-						'prefix' => $procure['nom'],
-						'nom' => $procure['nom'],
-						'etat' => $procure['etat'],
-						'version' => $procure['version'],
-						'chemin' => [],
-						'necessite' => [],
-						'utilise' => [],
-						'lib' => [],
-						'menu' => [],
-						'onglet' => [],
-						'procure' => [],
-					];
-				}
-			}
-		}
-	}
+    foreach ($liste as $p => $resume) {
+        $i = $infos[$resume['dir_type']][$resume['dir']];
+        if (isset($i['procure']) and $i['procure']) {
+            foreach ($i['procure'] as $procure) {
+                $p = strtoupper($procure['nom']);
+                $dir = $resume['dir'];
+                if ($dir) {
+                    $dir .= '/';
+                }
+                $dir .= 'procure:' . $procure['nom'];
+
+                $procure['etat'] = '?';
+                $procure['dir_type'] = $resume['dir_type'];
+                $procure['dir'] = $dir;
+
+                // si ce plugin n'est pas deja procure, ou dans une version plus ancienne
+                // on ajoute cette version a la liste
+                if (
+                    !isset($liste[$p])
+                    or spip_version_compare($procure['version'], $liste[$p]['version'], '>')
+                ) {
+                    $liste[$p] = $procure;
+
+                    // on fournit une information minimale pour ne pas perturber la compilation
+                    $infos[$resume['dir_type']][$dir] = [
+                        'prefix' => $procure['nom'],
+                        'nom' => $procure['nom'],
+                        'etat' => $procure['etat'],
+                        'version' => $procure['version'],
+                        'chemin' => [],
+                        'necessite' => [],
+                        'utilise' => [],
+                        'lib' => [],
+                        'menu' => [],
+                        'onglet' => [],
+                        'procure' => [],
+                    ];
+                }
+            }
+        }
+    }
 }
 
 /**
@@ -426,20 +426,20 @@ 
  * @return array
  */
 function liste_chemin_plugin($liste, $dir_plugins = _DIR_PLUGINS) {
-	foreach ($liste as $prefix => $infos) {
-		if (
-			!$dir_plugins
-			or (
-				defined($infos['dir_type'])
-				and constant($infos['dir_type']) == $dir_plugins)
-		) {
-			$liste[$prefix] = $infos['dir'];
-		} else {
-			unset($liste[$prefix]);
-		}
-	}
-
-	return $liste;
+    foreach ($liste as $prefix => $infos) {
+        if (
+            !$dir_plugins
+            or (
+                defined($infos['dir_type'])
+                and constant($infos['dir_type']) == $dir_plugins)
+        ) {
+            $liste[$prefix] = $infos['dir'];
+        } else {
+            unset($liste[$prefix]);
+        }
+    }
+
+    return $liste;
 }
 
 /**
@@ -454,9 +454,9 @@ 
  * @return array
  */
 function liste_chemin_plugin_actifs($dir_plugins = _DIR_PLUGINS) {
-	include_spip('plugins/installer');
+    include_spip('plugins/installer');
 
-	return liste_chemin_plugin(liste_plugin_actifs(), $dir_plugins);
+    return liste_chemin_plugin(liste_plugin_actifs(), $dir_plugins);
 }
 
 /**
@@ -487,54 +487,54 @@ 
  *                qui n'ont pas satisfait leurs dépendances
 **/
 function plugin_trier($infos, $liste_non_classee) {
-	$toute_la_liste = $liste_non_classee;
-	$liste = $ordre = [];
-	$count = 0;
-
-	while ($c = count($liste_non_classee) and $c != $count) { // tant qu'il reste des plugins a classer, et qu'on ne stagne pas
-		#echo "tour::";var_dump($liste_non_classee);
-		$count = $c;
-		foreach ($liste_non_classee as $p => $resume) {
-			$plug = $resume['dir'];
-			$dir_type = $resume['dir_type'];
-			$info1 = $infos[$dir_type][$plug];
-			// si des plugins sont necessaires,
-			// on ne peut inserer qu'apres eux
-			foreach ($info1['necessite'] as $need) {
-				$nom = strtoupper($need['nom']);
-				$compat = $need['compatibilite'] ?? '';
-				if (!isset($liste[$nom]) or !plugin_version_compatible($compat, $liste[$nom]['version'])) {
-					$info1 = false;
-					break;
-				}
-			}
-			if (!$info1) {
-				continue;
-			}
-			// idem si des plugins sont utiles,
-			// sauf si ils sont de toute facon absents de la liste
-			foreach ($info1['utilise'] as $need) {
-				$nom = strtoupper($need['nom']);
-				$compat = $need['compatibilite'] ?? '';
-				if (isset($toute_la_liste[$nom])) {
-					if (
-						!isset($liste[$nom]) or
-						!plugin_version_compatible($compat, $liste[$nom]['version'])
-					) {
-						$info1 = false;
-						break;
-					}
-				}
-			}
-			if ($info1) {
-				$ordre[$p] = $info1;
-				$liste[$p] = $liste_non_classee[$p];
-				unset($liste_non_classee[$p]);
-			}
-		}
-	}
-
-	return [$liste, $ordre, $liste_non_classee];
+    $toute_la_liste = $liste_non_classee;
+    $liste = $ordre = [];
+    $count = 0;
+
+    while ($c = count($liste_non_classee) and $c != $count) { // tant qu'il reste des plugins a classer, et qu'on ne stagne pas
+        #echo "tour::";var_dump($liste_non_classee);
+        $count = $c;
+        foreach ($liste_non_classee as $p => $resume) {
+            $plug = $resume['dir'];
+            $dir_type = $resume['dir_type'];
+            $info1 = $infos[$dir_type][$plug];
+            // si des plugins sont necessaires,
+            // on ne peut inserer qu'apres eux
+            foreach ($info1['necessite'] as $need) {
+                $nom = strtoupper($need['nom']);
+                $compat = $need['compatibilite'] ?? '';
+                if (!isset($liste[$nom]) or !plugin_version_compatible($compat, $liste[$nom]['version'])) {
+                    $info1 = false;
+                    break;
+                }
+            }
+            if (!$info1) {
+                continue;
+            }
+            // idem si des plugins sont utiles,
+            // sauf si ils sont de toute facon absents de la liste
+            foreach ($info1['utilise'] as $need) {
+                $nom = strtoupper($need['nom']);
+                $compat = $need['compatibilite'] ?? '';
+                if (isset($toute_la_liste[$nom])) {
+                    if (
+                        !isset($liste[$nom]) or
+                        !plugin_version_compatible($compat, $liste[$nom]['version'])
+                    ) {
+                        $info1 = false;
+                        break;
+                    }
+                }
+            }
+            if ($info1) {
+                $ordre[$p] = $info1;
+                $liste[$p] = $liste_non_classee[$p];
+                unset($liste_non_classee[$p]);
+            }
+        }
+    }
+
+    return [$liste, $ordre, $liste_non_classee];
 }
 
 /**
@@ -551,40 +551,40 @@ 
  *     Répertoire (plugins, plugins-dist, ...) => Couples (prefixes => infos completes) des plugins qu'ils contiennent
 **/
 function plugins_erreurs($liste_non_classee, $liste, $infos, $msg = []) {
-	static $erreurs = [];
-
-	if (!is_array($liste)) {
-		$liste = [];
-	}
-
-	// les plugins en erreur ne sont pas actifs ; ils ne doivent pas être dans la liste
-	$liste = array_diff_key($liste, $liste_non_classee);
-
-	foreach ($liste_non_classee as $p => $resume) {
-		$dir_type = $resume['dir_type'];
-		$plug = $resume['dir'];
-		$k = $infos[$dir_type][$plug];
-
-		$plug = constant($dir_type) . $plug;
-		if (!isset($msg[$p])) {
-			if (isset($resume['erreur']) and $resume['erreur']) {
-				$msg[$p] = [$resume['erreur']];
-			}
-			elseif (!plugin_version_compatible($k['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
-				$msg[$p] = [plugin_message_incompatibilite($k['compatibilite'], $GLOBALS['spip_version_branche'], 'SPIP', 'necessite')];
-			}
-			elseif (!$msg[$p] = plugin_necessite($k['necessite'], $liste, 'necessite')) {
-				$msg[$p] = plugin_necessite($k['utilise'], $liste, 'utilise');
-			}
-		} else {
-			foreach ($msg[$p] as $c => $l) {
-				$msg[$p][$c] = plugin_controler_lib($l['nom'], $l['lien']);
-			}
-		}
-		$erreurs[$plug] = $msg[$p];
-	}
-
-	ecrire_meta('plugin_erreur_activation', serialize($erreurs));
+    static $erreurs = [];
+
+    if (!is_array($liste)) {
+        $liste = [];
+    }
+
+    // les plugins en erreur ne sont pas actifs ; ils ne doivent pas être dans la liste
+    $liste = array_diff_key($liste, $liste_non_classee);
+
+    foreach ($liste_non_classee as $p => $resume) {
+        $dir_type = $resume['dir_type'];
+        $plug = $resume['dir'];
+        $k = $infos[$dir_type][$plug];
+
+        $plug = constant($dir_type) . $plug;
+        if (!isset($msg[$p])) {
+            if (isset($resume['erreur']) and $resume['erreur']) {
+                $msg[$p] = [$resume['erreur']];
+            }
+            elseif (!plugin_version_compatible($k['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
+                $msg[$p] = [plugin_message_incompatibilite($k['compatibilite'], $GLOBALS['spip_version_branche'], 'SPIP', 'necessite')];
+            }
+            elseif (!$msg[$p] = plugin_necessite($k['necessite'], $liste, 'necessite')) {
+                $msg[$p] = plugin_necessite($k['utilise'], $liste, 'utilise');
+            }
+        } else {
+            foreach ($msg[$p] as $c => $l) {
+                $msg[$p][$c] = plugin_controler_lib($l['nom'], $l['lien']);
+            }
+        }
+        $erreurs[$plug] = $msg[$p];
+    }
+
+    ecrire_meta('plugin_erreur_activation', serialize($erreurs));
 }
 
 /**
@@ -599,25 +599,25 @@ 
  *     - Liste des erreurs ou code HTML des erreurs
 **/
 function plugin_donne_erreurs($raw = false, $raz = true) {
-	if (!isset($GLOBALS['meta']['plugin_erreur_activation'])) {
-		return $raw ? [] : '';
-	}
-	$list = @unserialize($GLOBALS['meta']['plugin_erreur_activation']);
-	// Compat ancienne version
-	if (!$list) {
-		$list = $raw ? [] : $GLOBALS['meta']['plugin_erreur_activation'];
-	} elseif (!$raw) {
-		foreach ($list as $plug => $msg) {
-			$list[$plug] = '<li>' . _T('plugin_impossible_activer', ['plugin' => $plug])
-				. '<ul><li>' . implode('</li><li>', $msg) . '</li></ul></li>';
-		}
-		$list = '<ul>' . join("\n", $list) . '</ul>';
-	}
-	if ($raz) {
-		effacer_meta('plugin_erreur_activation');
-	}
-
-	return $list;
+    if (!isset($GLOBALS['meta']['plugin_erreur_activation'])) {
+        return $raw ? [] : '';
+    }
+    $list = @unserialize($GLOBALS['meta']['plugin_erreur_activation']);
+    // Compat ancienne version
+    if (!$list) {
+        $list = $raw ? [] : $GLOBALS['meta']['plugin_erreur_activation'];
+    } elseif (!$raw) {
+        foreach ($list as $plug => $msg) {
+            $list[$plug] = '<li>' . _T('plugin_impossible_activer', ['plugin' => $plug])
+                . '<ul><li>' . implode('</li><li>', $msg) . '</li></ul></li>';
+        }
+        $list = '<ul>' . join("\n", $list) . '</ul>';
+    }
+    if ($raz) {
+        effacer_meta('plugin_erreur_activation');
+    }
+
+    return $list;
 }
 
 /**
@@ -637,21 +637,21 @@ 
  *
  **/
 function plugin_necessite($n, $liste, $balise = 'necessite') {
-	$msg = [];
-	foreach ($n as $need) {
-		$id = strtoupper($need['nom']);
-		$r = plugin_controler_necessite(
-			$liste,
-			$id,
-			$need['compatibilite'] ?? '',
-			$balise
-		);
-		if ($r) {
-			$msg[] = $r;
-		}
-	}
-
-	return $msg;
+    $msg = [];
+    foreach ($n as $need) {
+        $id = strtoupper($need['nom']);
+        $r = plugin_controler_necessite(
+            $liste,
+            $id,
+            $need['compatibilite'] ?? '',
+            $balise
+        );
+        if ($r) {
+            $msg[] = $r;
+        }
+    }
+
+    return $msg;
 }
 
 /**
@@ -673,19 +673,19 @@ 
  *    Message d'erreur lorsque la dépendance est absente.
  **/
 function plugin_controler_necessite($liste, $nom, $intervalle, $balise) {
-	if (isset($liste[$nom]) and plugin_version_compatible($intervalle, $liste[$nom]['version'])) {
-		return '';
-	}
-	// Si l'on a un <utilise="plugin non actif" />, ne pas renvoyer d'erreur
-	if ($balise === 'utilise' and !isset($liste[$nom])) {
-		return '';
-	}
-	return plugin_message_incompatibilite(
-		$intervalle,
-		(isset($liste[$nom]) ? $liste[$nom]['version'] : ''),
-		$nom,
-		$balise
-	);
+    if (isset($liste[$nom]) and plugin_version_compatible($intervalle, $liste[$nom]['version'])) {
+        return '';
+    }
+    // Si l'on a un <utilise="plugin non actif" />, ne pas renvoyer d'erreur
+    if ($balise === 'utilise' and !isset($liste[$nom])) {
+        return '';
+    }
+    return plugin_message_incompatibilite(
+        $intervalle,
+        (isset($liste[$nom]) ? $liste[$nom]['version'] : ''),
+        $nom,
+        $balise
+    );
 }
 
 /**
@@ -702,70 +702,70 @@ 
  */
 function plugin_message_incompatibilite($intervalle, $version, $nom, $balise) {
 
-	// prendre en compte les erreurs de dépendances à PHP
-	// ou à une extension PHP avec des messages d'erreurs dédiés.
-	$type = 'plugin';
-	if ($nom === 'SPIP') {
-		$type = 'spip';
-	} elseif ($nom === 'PHP') {
-		$type = 'php';
-	} elseif (strncmp($nom, 'PHP:', 4) === 0) {
-		$type = 'extension_php';
-		[, $nom] = explode(':', $nom, 2);
-	}
-
-	if (preg_match(_EXTRAIRE_INTERVALLE, $intervalle, $regs)) {
-		$minimum = $regs[1];
-		$maximum = $regs[2];
-
-		$minimum_inclus = $intervalle[0] == '[';
-		$maximum_inclus = substr($intervalle, -1) == ']';
-
-		if (strlen($minimum)) {
-			if ($minimum_inclus and spip_version_compare($version, $minimum, '<')) {
-				return _T("plugin_{$balise}_{$type}", [
-					'plugin' => $nom,
-					'version' => ' &ge; ' . $minimum
-				]);
-			}
-			if (!$minimum_inclus and spip_version_compare($version, $minimum, '<=')) {
-				return _T("plugin_{$balise}_{$type}", [
-					'plugin' => $nom,
-					'version' => ' &gt; ' . $minimum
-				]);
-			}
-		}
-
-		if (strlen($maximum)) {
-			if ($maximum_inclus and spip_version_compare($version, $maximum, '>')) {
-				return _T("plugin_{$balise}_{$type}", [
-					'plugin' => $nom,
-					'version' => ' &le; ' . $maximum
-				]);
-			}
-			if (!$maximum_inclus and spip_version_compare($version, $maximum, '>=')) {
-				return _T("plugin_{$balise}_plugin", [
-					'plugin' => $nom,
-					'version' => ' &lt; ' . $maximum
-				]);
-			}
-		}
-	}
-
-	// note : il ne peut pas y avoir d'erreur sur
-	// - un 'utilise' sans version.
-	// - un 'php' sans version.
-	return _T("plugin_necessite_{$type}_sans_version", ['plugin' => $nom]);
+    // prendre en compte les erreurs de dépendances à PHP
+    // ou à une extension PHP avec des messages d'erreurs dédiés.
+    $type = 'plugin';
+    if ($nom === 'SPIP') {
+        $type = 'spip';
+    } elseif ($nom === 'PHP') {
+        $type = 'php';
+    } elseif (strncmp($nom, 'PHP:', 4) === 0) {
+        $type = 'extension_php';
+        [, $nom] = explode(':', $nom, 2);
+    }
+
+    if (preg_match(_EXTRAIRE_INTERVALLE, $intervalle, $regs)) {
+        $minimum = $regs[1];
+        $maximum = $regs[2];
+
+        $minimum_inclus = $intervalle[0] == '[';
+        $maximum_inclus = substr($intervalle, -1) == ']';
+
+        if (strlen($minimum)) {
+            if ($minimum_inclus and spip_version_compare($version, $minimum, '<')) {
+                return _T("plugin_{$balise}_{$type}", [
+                    'plugin' => $nom,
+                    'version' => ' &ge; ' . $minimum
+                ]);
+            }
+            if (!$minimum_inclus and spip_version_compare($version, $minimum, '<=')) {
+                return _T("plugin_{$balise}_{$type}", [
+                    'plugin' => $nom,
+                    'version' => ' &gt; ' . $minimum
+                ]);
+            }
+        }
+
+        if (strlen($maximum)) {
+            if ($maximum_inclus and spip_version_compare($version, $maximum, '>')) {
+                return _T("plugin_{$balise}_{$type}", [
+                    'plugin' => $nom,
+                    'version' => ' &le; ' . $maximum
+                ]);
+            }
+            if (!$maximum_inclus and spip_version_compare($version, $maximum, '>=')) {
+                return _T("plugin_{$balise}_plugin", [
+                    'plugin' => $nom,
+                    'version' => ' &lt; ' . $maximum
+                ]);
+            }
+        }
+    }
+
+    // note : il ne peut pas y avoir d'erreur sur
+    // - un 'utilise' sans version.
+    // - un 'php' sans version.
+    return _T("plugin_necessite_{$type}_sans_version", ['plugin' => $nom]);
 }
 
 
 function plugin_controler_lib($lib, $url) {
-	/* Feature sortie du core, voir STP
+    /* Feature sortie du core, voir STP
 	 * if ($url) {
 		include_spip('inc/charger_plugin');
 		$url = '<br />'	. bouton_telechargement_plugin($url, 'lib');
 	}*/
-	return _T('plugin_necessite_lib', ['lib' => $lib]) . " <a href='$url'>$url</a>";
+    return _T('plugin_necessite_lib', ['lib' => $lib]) . " <a href='$url'>$url</a>";
 }
 
 
@@ -780,7 +780,7 @@ 
  *     true si il y a eu des modifications sur la liste des plugins actifs, false sinon
  **/
 function actualise_plugins_actifs($pipe_recherche = false) {
-	return ecrire_plugin_actifs('', $pipe_recherche, 'force');
+    return ecrire_plugin_actifs('', $pipe_recherche, 'force');
 }
 
 
@@ -807,116 +807,116 @@ 
  **/
 function ecrire_plugin_actifs($plugin, $pipe_recherche = false, $operation = 'raz') {
 
-	// creer le repertoire cache/ si necessaire ! (installation notamment)
-	$cache = sous_repertoire(_DIR_CACHE, '', false, true);
-
-	// Si on n'a ni cache accessible, ni connexion SQL, on ne peut pas faire grand chose encore.
-	if (!$cache and !spip_connect()) {
-		return false;
-	}
-
-	if ($operation != 'raz') {
-		$plugin_valides = liste_chemin_plugin_actifs();
-		$plugin_valides = is_plugin_dir($plugin_valides);
-		if (defined('_DIR_PLUGINS_SUPPL') && _DIR_PLUGINS_SUPPL) {
-			$plugin_valides_supp = liste_chemin_plugin_actifs(_DIR_PLUGINS_SUPPL);
-			$plugin_valides_supp = is_plugin_dir($plugin_valides_supp, _DIR_PLUGINS_SUPPL);
-			$plugin_valides = array_merge($plugin_valides, $plugin_valides_supp);
-		}
-		// si des plugins sont en attentes (coches mais impossible a activer)
-		// on les reinjecte ici
-		if (
-			isset($GLOBALS['meta']['plugin_attente'])
-			and $a = unserialize($GLOBALS['meta']['plugin_attente'])
-		) {
-			$plugin_valides = $plugin_valides + liste_chemin_plugin($a);
-		}
-
-		if ($operation == 'ajoute') {
-			$plugin = array_merge($plugin_valides, $plugin);
-		} elseif ($operation == 'enleve') {
-			$plugin = array_diff($plugin_valides, $plugin);
-		} else {
-			$plugin = $plugin_valides;
-		}
-	}
-	$actifs_avant = $GLOBALS['meta']['plugin'] ?? '';
-
-	// si une fonction de gestion de dependances existe, l'appeler ici
-	if ($ajouter_dependances = charger_fonction('ajouter_dependances', 'plugins', true)) {
-		$plugin = $ajouter_dependances($plugin);
-	}
-
-	// recharger le xml des plugins a activer
-	// on force le reload ici, meme si le fichier xml n'a pas change
-	// pour ne pas rater l'ajout ou la suppression d'un fichier fonctions/options/administrations
-	// pourra etre evite quand on ne supportera plus les plugin.xml
-	// en deplacant la detection de ces fichiers dans la compilation ci dessous
-	[$infos, $liste, $invalides] = liste_plugin_valides($plugin, true);
-	// trouver l'ordre d'activation
-	[$plugin_valides, $ordre, $reste] = plugin_trier($infos, $liste);
-	if ($invalides or $reste) {
-		plugins_erreurs(array_merge($invalides, $reste), $liste, $infos);
-	}
-
-	// Ignorer les plugins necessitant une lib absente
-	// et preparer la meta d'entete Http
-	$err = $msg = $header = [];
-	foreach ($plugin_valides as $p => $resume) {
-		// Les headers ne doivent pas indiquer les versions des extensions PHP, ni la version PHP
-		if (0 !== strpos($p, 'PHP:') and $p !== 'PHP') {
-			$header[] = $p . ($resume['version'] ? '(' . $resume['version'] . ')' : '');
-		}
-		if ($resume['dir']) {
-			foreach ($infos[$resume['dir_type']][$resume['dir']]['lib'] as $l) {
-				if (!find_in_path($l['nom'], 'lib/')) {
-					$err[$p] = $resume;
-					$msg[$p][] = $l;
-					unset($plugin_valides[$p]);
-				}
-			}
-		}
-	}
-	if ($err) {
-		plugins_erreurs($err, '', $infos, $msg);
-	}
-
-	if (isset($GLOBALS['meta']['message_crash_plugins'])) {
-		effacer_meta('message_crash_plugins');
-	}
-	ecrire_meta('plugin', serialize($plugin_valides));
-	$liste = array_diff_key($liste, $plugin_valides);
-	ecrire_meta('plugin_attente', serialize($liste));
-	$header = strtolower(implode(',', $header));
-	if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
-		ecrire_fichier(
-			_DIR_VAR . 'config.txt',
-			(defined('_HEADER_COMPOSED_BY') ? _HEADER_COMPOSED_BY : 'Composed-By: SPIP') . ' ' . $GLOBALS['spip_version_affichee'] . ' @ www.spip.net + ' . $header
-		);
-	} else {
-		@unlink(_DIR_VAR . 'config.txt');
-	}
-	// generer charger_plugins_chemin.php
-	plugins_precompile_chemin($plugin_valides, $ordre);
-	// generer les fichiers
-	// - charger_plugins_options.php
-	// - charger_plugins_fonctions.php
-	plugins_precompile_xxxtions($plugin_valides, $ordre);
-	// charger les chemins des plugins et les fichiers d'options
-	// (qui peuvent déclarer / utiliser des pipelines, ajouter d'autres chemins)
-	plugins_amorcer_plugins_actifs();
-	// mise a jour de la matrice des pipelines
-	$prepend_code = pipeline_matrice_precompile($plugin_valides, $ordre, $pipe_recherche);
-	// generer le fichier _CACHE_PIPELINE
-	pipeline_precompile($prepend_code);
-
-	if (spip_connect()) {
-		// lancer et initialiser les nouveaux crons !
-		include_spip('inc/genie');
-		genie_queue_watch_dist();
-	}
-
-	return ($GLOBALS['meta']['plugin'] != $actifs_avant);
+    // creer le repertoire cache/ si necessaire ! (installation notamment)
+    $cache = sous_repertoire(_DIR_CACHE, '', false, true);
+
+    // Si on n'a ni cache accessible, ni connexion SQL, on ne peut pas faire grand chose encore.
+    if (!$cache and !spip_connect()) {
+        return false;
+    }
+
+    if ($operation != 'raz') {
+        $plugin_valides = liste_chemin_plugin_actifs();
+        $plugin_valides = is_plugin_dir($plugin_valides);
+        if (defined('_DIR_PLUGINS_SUPPL') && _DIR_PLUGINS_SUPPL) {
+            $plugin_valides_supp = liste_chemin_plugin_actifs(_DIR_PLUGINS_SUPPL);
+            $plugin_valides_supp = is_plugin_dir($plugin_valides_supp, _DIR_PLUGINS_SUPPL);
+            $plugin_valides = array_merge($plugin_valides, $plugin_valides_supp);
+        }
+        // si des plugins sont en attentes (coches mais impossible a activer)
+        // on les reinjecte ici
+        if (
+            isset($GLOBALS['meta']['plugin_attente'])
+            and $a = unserialize($GLOBALS['meta']['plugin_attente'])
+        ) {
+            $plugin_valides = $plugin_valides + liste_chemin_plugin($a);
+        }
+
+        if ($operation == 'ajoute') {
+            $plugin = array_merge($plugin_valides, $plugin);
+        } elseif ($operation == 'enleve') {
+            $plugin = array_diff($plugin_valides, $plugin);
+        } else {
+            $plugin = $plugin_valides;
+        }
+    }
+    $actifs_avant = $GLOBALS['meta']['plugin'] ?? '';
+
+    // si une fonction de gestion de dependances existe, l'appeler ici
+    if ($ajouter_dependances = charger_fonction('ajouter_dependances', 'plugins', true)) {
+        $plugin = $ajouter_dependances($plugin);
+    }
+
+    // recharger le xml des plugins a activer
+    // on force le reload ici, meme si le fichier xml n'a pas change
+    // pour ne pas rater l'ajout ou la suppression d'un fichier fonctions/options/administrations
+    // pourra etre evite quand on ne supportera plus les plugin.xml
+    // en deplacant la detection de ces fichiers dans la compilation ci dessous
+    [$infos, $liste, $invalides] = liste_plugin_valides($plugin, true);
+    // trouver l'ordre d'activation
+    [$plugin_valides, $ordre, $reste] = plugin_trier($infos, $liste);
+    if ($invalides or $reste) {
+        plugins_erreurs(array_merge($invalides, $reste), $liste, $infos);
+    }
+
+    // Ignorer les plugins necessitant une lib absente
+    // et preparer la meta d'entete Http
+    $err = $msg = $header = [];
+    foreach ($plugin_valides as $p => $resume) {
+        // Les headers ne doivent pas indiquer les versions des extensions PHP, ni la version PHP
+        if (0 !== strpos($p, 'PHP:') and $p !== 'PHP') {
+            $header[] = $p . ($resume['version'] ? '(' . $resume['version'] . ')' : '');
+        }
+        if ($resume['dir']) {
+            foreach ($infos[$resume['dir_type']][$resume['dir']]['lib'] as $l) {
+                if (!find_in_path($l['nom'], 'lib/')) {
+                    $err[$p] = $resume;
+                    $msg[$p][] = $l;
+                    unset($plugin_valides[$p]);
+                }
+            }
+        }
+    }
+    if ($err) {
+        plugins_erreurs($err, '', $infos, $msg);
+    }
+
+    if (isset($GLOBALS['meta']['message_crash_plugins'])) {
+        effacer_meta('message_crash_plugins');
+    }
+    ecrire_meta('plugin', serialize($plugin_valides));
+    $liste = array_diff_key($liste, $plugin_valides);
+    ecrire_meta('plugin_attente', serialize($liste));
+    $header = strtolower(implode(',', $header));
+    if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
+        ecrire_fichier(
+            _DIR_VAR . 'config.txt',
+            (defined('_HEADER_COMPOSED_BY') ? _HEADER_COMPOSED_BY : 'Composed-By: SPIP') . ' ' . $GLOBALS['spip_version_affichee'] . ' @ www.spip.net + ' . $header
+        );
+    } else {
+        @unlink(_DIR_VAR . 'config.txt');
+    }
+    // generer charger_plugins_chemin.php
+    plugins_precompile_chemin($plugin_valides, $ordre);
+    // generer les fichiers
+    // - charger_plugins_options.php
+    // - charger_plugins_fonctions.php
+    plugins_precompile_xxxtions($plugin_valides, $ordre);
+    // charger les chemins des plugins et les fichiers d'options
+    // (qui peuvent déclarer / utiliser des pipelines, ajouter d'autres chemins)
+    plugins_amorcer_plugins_actifs();
+    // mise a jour de la matrice des pipelines
+    $prepend_code = pipeline_matrice_precompile($plugin_valides, $ordre, $pipe_recherche);
+    // generer le fichier _CACHE_PIPELINE
+    pipeline_precompile($prepend_code);
+
+    if (spip_connect()) {
+        // lancer et initialiser les nouveaux crons !
+        include_spip('inc/genie');
+        genie_queue_watch_dist();
+    }
+
+    return ($GLOBALS['meta']['plugin'] != $actifs_avant);
 }
 
 /**
@@ -935,74 +935,74 @@ 
  *     Couples (prefixe => infos complètes) des plugins qui seront actifs, dans l'ordre de leurs dépendances
 **/
 function plugins_precompile_chemin($plugin_valides, $ordre) {
-	$chemins = [
-		'public' => [],
-		'prive' => []
-	];
-	$contenu = '';
-	foreach ($ordre as $p => $info) {
-		// $ordre peur contenir des plugins en attente et non valides pour ce hit
-		if (isset($plugin_valides[$p])) {
-			$dir_type = $plugin_valides[$p]['dir_type'];
-			$plug = $plugin_valides[$p]['dir'];
-			// definir le plugin, donc le path avant l'include du fichier options
-			// permet de faire des include_spip pour attraper un inc_ du plugin
-
-			$dir = $dir_type . ".'" . $plug . "/'";
-
-			$prefix = strtoupper(preg_replace(',\W,', '_', $info['prefix']));
-			if (
-				$prefix !== 'SPIP'
-				and strpos($dir, ':') === false // exclure le cas des procure:
-			) {
-				$contenu .= "define('_DIR_PLUGIN_$prefix',$dir);\n";
-				if (!$info['chemin']) {
-					$chemins['public'][] = "_DIR_PLUGIN_$prefix";
-					$chemins['prive'][] = "_DIR_PLUGIN_$prefix";
-					if (is_dir(constant($dir_type) . $plug . '/squelettes/')) {
-						$chemins['public'][] = "_DIR_PLUGIN_{$prefix}.'squelettes/'";
-					}
-				}
-				else {
-					foreach ($info['chemin'] as $chemin) {
-						if (
-							!isset($chemin['version']) or plugin_version_compatible(
-								$chemin['version'],
-								$GLOBALS['spip_version_branche'],
-								'spip'
-							)
-						) {
-							$dir = $chemin['path'];
-							if (strlen($dir) and $dir[0] == '/') {
-								$dir = substr($dir, 1);
-							}
-							if (strlen($dir) and $dir == './') {
-								$dir = '';
-							}
-							if (strlen($dir)) {
-								$dir = rtrim($dir, '/') . '/';
-							}
-							if (!isset($chemin['type']) or $chemin['type'] == 'public') {
-								$chemins['public'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
-							}
-							if (!isset($chemin['type']) or $chemin['type'] == 'prive') {
-								$chemins['prive'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
-							}
-						}
-					}
-				}
-			}
-		}
-	}
-	if (count($chemins['public']) or count($chemins['prive'])) {
-		$contenu .= 'if (_DIR_RESTREINT) _chemin([' . implode(
-			',',
-			array_reverse($chemins['public'])
-		) . "]);\n"
-			. 'else _chemin([' . implode(',', array_reverse($chemins['prive'])) . "]);\n";
-	}
-
-	ecrire_fichier_php(_CACHE_PLUGINS_PATH, $contenu);
+    $chemins = [
+        'public' => [],
+        'prive' => []
+    ];
+    $contenu = '';
+    foreach ($ordre as $p => $info) {
+        // $ordre peur contenir des plugins en attente et non valides pour ce hit
+        if (isset($plugin_valides[$p])) {
+            $dir_type = $plugin_valides[$p]['dir_type'];
+            $plug = $plugin_valides[$p]['dir'];
+            // definir le plugin, donc le path avant l'include du fichier options
+            // permet de faire des include_spip pour attraper un inc_ du plugin
+
+            $dir = $dir_type . ".'" . $plug . "/'";
+
+            $prefix = strtoupper(preg_replace(',\W,', '_', $info['prefix']));
+            if (
+                $prefix !== 'SPIP'
+                and strpos($dir, ':') === false // exclure le cas des procure:
+            ) {
+                $contenu .= "define('_DIR_PLUGIN_$prefix',$dir);\n";
+                if (!$info['chemin']) {
+                    $chemins['public'][] = "_DIR_PLUGIN_$prefix";
+                    $chemins['prive'][] = "_DIR_PLUGIN_$prefix";
+                    if (is_dir(constant($dir_type) . $plug . '/squelettes/')) {
+                        $chemins['public'][] = "_DIR_PLUGIN_{$prefix}.'squelettes/'";
+                    }
+                }
+                else {
+                    foreach ($info['chemin'] as $chemin) {
+                        if (
+                            !isset($chemin['version']) or plugin_version_compatible(
+                                $chemin['version'],
+                                $GLOBALS['spip_version_branche'],
+                                'spip'
+                            )
+                        ) {
+                            $dir = $chemin['path'];
+                            if (strlen($dir) and $dir[0] == '/') {
+                                $dir = substr($dir, 1);
+                            }
+                            if (strlen($dir) and $dir == './') {
+                                $dir = '';
+                            }
+                            if (strlen($dir)) {
+                                $dir = rtrim($dir, '/') . '/';
+                            }
+                            if (!isset($chemin['type']) or $chemin['type'] == 'public') {
+                                $chemins['public'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
+                            }
+                            if (!isset($chemin['type']) or $chemin['type'] == 'prive') {
+                                $chemins['prive'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+    if (count($chemins['public']) or count($chemins['prive'])) {
+        $contenu .= 'if (_DIR_RESTREINT) _chemin([' . implode(
+            ',',
+            array_reverse($chemins['public'])
+        ) . "]);\n"
+            . 'else _chemin([' . implode(',', array_reverse($chemins['prive'])) . "]);\n";
+    }
+
+    ecrire_fichier_php(_CACHE_PLUGINS_PATH, $contenu);
 }
 
 /**
@@ -1020,67 +1020,67 @@ 
  *     Couples (prefixe => infos complètes) des plugins qui seront actifs, dans l'ordre de leurs dépendances
 **/
 function plugins_precompile_xxxtions($plugin_valides, $ordre) {
-	$contenu = ['options' => '', 'fonctions' => ''];
-	$boutons = [];
-	$onglets = [];
-	$sign = '';
-
-	foreach ($ordre as $p => $info) {
-		// $ordre peur contenir des plugins en attente et non valides pour ce hit
-		if (isset($plugin_valides[$p])) {
-			$dir_type = $plugin_valides[$p]['dir_type'];
-			$plug = $plugin_valides[$p]['dir'];
-			$dir = constant($dir_type);
-			$root_dir_type = str_replace('_DIR_', '_ROOT_', $dir_type);
-			if ($info['menu']) {
-				$boutons = array_merge($boutons, $info['menu']);
-			}
-			if ($info['onglet']) {
-				$onglets = array_merge($onglets, $info['onglet']);
-			}
-			foreach ($contenu as $charge => $v) {
-				// si pas declare/detecte a la lecture du paquet.xml,
-				// detecer a nouveau ici puisque son ajout ne provoque pas une modif du paquet.xml
-				// donc ni sa relecture, ni sa detection
-				if (
-					!isset($info[$charge])
-					and $dir // exclure le cas du plugin "SPIP"
-					and strpos($dir, ':') === false // exclure le cas des procure:
-					and file_exists("$dir$plug/paquet.xml") // uniquement pour les paquet.xml
-				) {
-					if (is_readable("$dir$plug/" . ($file = $info['prefix'] . '_' . $charge . '.php'))) {
-						$info[$charge] = [$file];
-					}
-				}
-				if (isset($info[$charge])) {
-					$files = $info[$charge];
-					foreach ($files as $k => $file) {
-						// on genere un if file_exists devant chaque include
-						// pour pouvoir garder le meme niveau d'erreur general
-						$file = trim($file);
-						if (
-							!is_readable("$dir$plug/$file")
-							// uniquement pour les paquet.xml
-							and file_exists("$dir$plug/paquet.xml")
-						) {
-							unset($info[$charge][$k]);
-						} else {
-							$_file = $root_dir_type . ".'$plug/$file'";
-							$contenu[$charge] .= "include_once_check($_file);\n";
-						}
-					}
-				}
-			}
-			$sign .= md5(serialize($info));
-		}
-	}
-
-	$contenu['options'] = "define('_PLUGINS_HASH','" . md5($sign) . "');\n" . $contenu['options'];
-	$contenu['fonctions'] .= plugin_ongletbouton('boutons_plugins', $boutons)
-		. plugin_ongletbouton('onglets_plugins', $onglets);
-
-	ecrire_fichier_php(_CACHE_PLUGINS_OPT, $contenu['options']);
-	ecrire_fichier_php(_CACHE_PLUGINS_FCT, $contenu['fonctions']);
+    $contenu = ['options' => '', 'fonctions' => ''];
+    $boutons = [];
+    $onglets = [];
+    $sign = '';
+
+    foreach ($ordre as $p => $info) {
+        // $ordre peur contenir des plugins en attente et non valides pour ce hit
+        if (isset($plugin_valides[$p])) {
+            $dir_type = $plugin_valides[$p]['dir_type'];
+            $plug = $plugin_valides[$p]['dir'];
+            $dir = constant($dir_type);
+            $root_dir_type = str_replace('_DIR_', '_ROOT_', $dir_type);
+            if ($info['menu']) {
+                $boutons = array_merge($boutons, $info['menu']);
+            }
+            if ($info['onglet']) {
+                $onglets = array_merge($onglets, $info['onglet']);
+            }
+            foreach ($contenu as $charge => $v) {
+                // si pas declare/detecte a la lecture du paquet.xml,
+                // detecer a nouveau ici puisque son ajout ne provoque pas une modif du paquet.xml
+                // donc ni sa relecture, ni sa detection
+                if (
+                    !isset($info[$charge])
+                    and $dir // exclure le cas du plugin "SPIP"
+                    and strpos($dir, ':') === false // exclure le cas des procure:
+                    and file_exists("$dir$plug/paquet.xml") // uniquement pour les paquet.xml
+                ) {
+                    if (is_readable("$dir$plug/" . ($file = $info['prefix'] . '_' . $charge . '.php'))) {
+                        $info[$charge] = [$file];
+                    }
+                }
+                if (isset($info[$charge])) {
+                    $files = $info[$charge];
+                    foreach ($files as $k => $file) {
+                        // on genere un if file_exists devant chaque include
+                        // pour pouvoir garder le meme niveau d'erreur general
+                        $file = trim($file);
+                        if (
+                            !is_readable("$dir$plug/$file")
+                            // uniquement pour les paquet.xml
+                            and file_exists("$dir$plug/paquet.xml")
+                        ) {
+                            unset($info[$charge][$k]);
+                        } else {
+                            $_file = $root_dir_type . ".'$plug/$file'";
+                            $contenu[$charge] .= "include_once_check($_file);\n";
+                        }
+                    }
+                }
+            }
+            $sign .= md5(serialize($info));
+        }
+    }
+
+    $contenu['options'] = "define('_PLUGINS_HASH','" . md5($sign) . "');\n" . $contenu['options'];
+    $contenu['fonctions'] .= plugin_ongletbouton('boutons_plugins', $boutons)
+        . plugin_ongletbouton('onglets_plugins', $onglets);
+
+    ecrire_fichier_php(_CACHE_PLUGINS_OPT, $contenu['options']);
+    ecrire_fichier_php(_CACHE_PLUGINS_FCT, $contenu['fonctions']);
 }
 
 /**
@@ -1099,24 +1099,24 @@ 
  * @return string Code php
  */
 function plugin_ongletbouton($nom, $val) {
-	if (!$val) {
-		$val = [];
-	}
-
-	$val = serialize($val);
-	$md5 = md5($val);
-
-	if (!defined("_UPDATED_$nom")) {
-		define("_UPDATED_$nom", $val);
-		define("_UPDATED_md5_$nom", $md5);
-	}
-	$val = "unserialize('" . str_replace("'", "\'", $val) . "')";
-
-	return
-		"if (!function_exists('$nom')) {\n"
-		. "function $nom(){return defined('_UPDATED_$nom')?unserialize(_UPDATED_$nom):$val;}\n"
-		. "function md5_$nom(){return defined('_UPDATED_md5_$nom')?_UPDATED_md5_$nom:'" . $md5 . "';}\n"
-		. "}\n";
+    if (!$val) {
+        $val = [];
+    }
+
+    $val = serialize($val);
+    $md5 = md5($val);
+
+    if (!defined("_UPDATED_$nom")) {
+        define("_UPDATED_$nom", $val);
+        define("_UPDATED_md5_$nom", $md5);
+    }
+    $val = "unserialize('" . str_replace("'", "\'", $val) . "')";
+
+    return
+        "if (!function_exists('$nom')) {\n"
+        . "function $nom(){return defined('_UPDATED_$nom')?unserialize(_UPDATED_$nom):$val;}\n"
+        . "function md5_$nom(){return defined('_UPDATED_md5_$nom')?_UPDATED_md5_$nom:'" . $md5 . "';}\n"
+        . "}\n";
 }
 
 /**
@@ -1131,15 +1131,15 @@ 
 **/
 function plugins_amorcer_plugins_actifs() {
 
-	if (@is_readable(_CACHE_PLUGINS_PATH)) {
-		include_once(_CACHE_PLUGINS_PATH);
-	}
+    if (@is_readable(_CACHE_PLUGINS_PATH)) {
+        include_once(_CACHE_PLUGINS_PATH);
+    }
 
-	if (@is_readable(_CACHE_PLUGINS_OPT)) {
-		include_once(_CACHE_PLUGINS_OPT);
-	} else {
-		spip_log('pipelines desactives: impossible de produire ' . _CACHE_PLUGINS_OPT);
-	}
+    if (@is_readable(_CACHE_PLUGINS_OPT)) {
+        include_once(_CACHE_PLUGINS_OPT);
+    } else {
+        spip_log('pipelines desactives: impossible de produire ' . _CACHE_PLUGINS_OPT);
+    }
 }
 
 /**
@@ -1162,140 +1162,140 @@ 
  *     Couples (nom du pipeline => Code PHP à insérer au début du pipeline)
 **/
 function pipeline_matrice_precompile($plugin_valides, $ordre, $pipe_recherche) {
-	static $liste_pipe_manquants = [];
-	if (($pipe_recherche) && (!in_array($pipe_recherche, $liste_pipe_manquants))) {
-		$liste_pipe_manquants[] = $pipe_recherche;
-	}
-
-	$prepend_code = [];
-
-	foreach ($ordre as $p => $info) {
-		// $ordre peur contenir des plugins en attente et non valides pour ce hit
-		if (isset($plugin_valides[$p])) {
-			$dir_type = $plugin_valides[$p]['dir_type'];
-			$root_dir_type = str_replace('_DIR_', '_ROOT_', $dir_type);
-			$plug = $plugin_valides[$p]['dir'];
-			$prefix = (($info['prefix'] == 'spip') ? '' : $info['prefix'] . '_');
-			if (isset($info['pipeline']) and is_array($info['pipeline'])) {
-				foreach ($info['pipeline'] as $pipe) {
-					$nom = $pipe['nom'];
-					if (isset($pipe['action'])) {
-						$action = $pipe['action'];
-					} else {
-						$action = $nom;
-					}
-					$nomlower = strtolower($nom);
-					if (
-						$nomlower != $nom
-						and isset($GLOBALS['spip_pipeline'][$nom])
-						and !isset($GLOBALS['spip_pipeline'][$nomlower])
-					) {
-						$GLOBALS['spip_pipeline'][$nomlower] = $GLOBALS['spip_pipeline'][$nom];
-						unset($GLOBALS['spip_pipeline'][$nom]);
-					}
-					$nom = $nomlower;
-					// une action vide est une declaration qui ne doit pas etre compilee !
-					if (!isset($GLOBALS['spip_pipeline'][$nom])) { // creer le pipeline eventuel
-					$GLOBALS['spip_pipeline'][$nom] = '';
-					}
-					if ($action) {
-						if (strpos($GLOBALS['spip_pipeline'][$nom], (string) "|$prefix$action") === false) {
-							$GLOBALS['spip_pipeline'][$nom] = preg_replace(
-								',(\|\||$),',
-								"|$prefix$action\\1",
-								$GLOBALS['spip_pipeline'][$nom],
-								1
-							);
-						}
-						if (isset($pipe['inclure'])) {
-							$GLOBALS['spip_matrice']["$prefix$action"] =
-								"$root_dir_type:$plug/" . $pipe['inclure'];
-						}
-					}
-				}
-			}
-			if (isset($info['genie']) and is_countable($info['genie']) ? count($info['genie']) : 0) {
-				if (!isset($prepend_code['taches_generales_cron'])) {
-					$prepend_code['taches_generales_cron'] = '';
-				}
-				foreach ($info['genie'] as $genie) {
-					$nom = $prefix . $genie['nom'];
-					$periode = max(60, intval($genie['periode']));
-					if (charger_fonction($nom, 'genie', true)) {
-						$prepend_code['taches_generales_cron'] .= "\$val['$nom'] = $periode;\n";
-					} else {
-						spip_log("Fonction genie_$nom introuvable", _LOG_ERREUR);
-					}
-				}
-			}
-			if (isset($info['style']) and is_countable($info['style']) ? count($info['style']) : 0) {
-				if (!isset($prepend_code['insert_head_css'])) {
-					$prepend_code['insert_head_css'] = '';
-				}
-				if (!isset($prepend_code['header_prive_css'])) {
-					$prepend_code['header_prive_css'] = '';
-				}
-				foreach ($info['style'] as $style) {
-					if (isset($style['path']) and $style['path']) {
-						$code = "if (\$f=timestamp(direction_css(find_in_path('" . addslashes($style['path']) . "')))) ";
-					} else {
-						$code = "if (\$f='" . addslashes($style['url']) . "') ";
-					}
-					$code .= "\$val .= '<link rel=\"stylesheet\" href=\"'.\$f.'\" type=\"text/css\"";
-					if (isset($style['media']) and strlen($style['media'])) {
-						$code .= ' media="' . addslashes($style['media']) . '"';
-					}
-					$code .= "/>';\n";
-					if ($style['type'] != 'prive') {
-						$prepend_code['insert_head_css'] .= $code;
-					}
-					if ($style['type'] != 'public') {
-						$prepend_code['header_prive_css'] .= $code;
-					}
-				}
-			}
-			if (!isset($prepend_code['insert_head'])) {
-				$prepend_code['insert_head'] = '';
-			}
-			if (!isset($prepend_code['header_prive'])) {
-				$prepend_code['header_prive'] = '';
-			}
-			if (isset($info['script']) and is_countable($info['script']) ? count($info['script']) : 0) {
-				foreach ($info['script'] as $script) {
-					if (isset($script['path']) and $script['path']) {
-						$code = "if (\$f=timestamp(find_in_path('" . addslashes($script['path']) . "'))) ";
-					} else {
-						$code = "if (\$f='" . addslashes($script['url']) . "') ";
-					}
-					$code .= "\$val .= '<script src=\"'.\$f.'\" type=\"text/javascript\"></script>';\n";
-					if ($script['type'] != 'prive') {
-						$prepend_code['insert_head'] .= $code;
-					}
-					if ($script['type'] != 'public') {
-						$prepend_code['header_prive'] .= $code;
-					}
-				}
-			}
-		}
-	}
-
-	$prepend_code['insert_head'] =
-		"include_once_check(_DIR_RESTREINT . 'inc/pipelines.php');\n"
-		. "\$val = minipipe('f_jQuery', \$val);\n"
-		. $prepend_code['insert_head'];
-	$prepend_code['header_prive'] =
-		"include_once_check(_DIR_RESTREINT . 'inc/pipelines_ecrire.php');\n"
-		. "\$val = minipipe('f_jQuery_prive', \$val);\n"
-		. $prepend_code['header_prive'];
-
-	// on ajoute les pipe qui ont ete recenses manquants
-	foreach ($liste_pipe_manquants as $add_pipe) {
-		if (!isset($GLOBALS['spip_pipeline'][$add_pipe])) {
-			$GLOBALS['spip_pipeline'][$add_pipe] = '';
-		}
-	}
-
-	return $prepend_code;
+    static $liste_pipe_manquants = [];
+    if (($pipe_recherche) && (!in_array($pipe_recherche, $liste_pipe_manquants))) {
+        $liste_pipe_manquants[] = $pipe_recherche;
+    }
+
+    $prepend_code = [];
+
+    foreach ($ordre as $p => $info) {
+        // $ordre peur contenir des plugins en attente et non valides pour ce hit
+        if (isset($plugin_valides[$p])) {
+            $dir_type = $plugin_valides[$p]['dir_type'];
+            $root_dir_type = str_replace('_DIR_', '_ROOT_', $dir_type);
+            $plug = $plugin_valides[$p]['dir'];
+            $prefix = (($info['prefix'] == 'spip') ? '' : $info['prefix'] . '_');
+            if (isset($info['pipeline']) and is_array($info['pipeline'])) {
+                foreach ($info['pipeline'] as $pipe) {
+                    $nom = $pipe['nom'];
+                    if (isset($pipe['action'])) {
+                        $action = $pipe['action'];
+                    } else {
+                        $action = $nom;
+                    }
+                    $nomlower = strtolower($nom);
+                    if (
+                        $nomlower != $nom
+                        and isset($GLOBALS['spip_pipeline'][$nom])
+                        and !isset($GLOBALS['spip_pipeline'][$nomlower])
+                    ) {
+                        $GLOBALS['spip_pipeline'][$nomlower] = $GLOBALS['spip_pipeline'][$nom];
+                        unset($GLOBALS['spip_pipeline'][$nom]);
+                    }
+                    $nom = $nomlower;
+                    // une action vide est une declaration qui ne doit pas etre compilee !
+                    if (!isset($GLOBALS['spip_pipeline'][$nom])) { // creer le pipeline eventuel
+                    $GLOBALS['spip_pipeline'][$nom] = '';
+                    }
+                    if ($action) {
+                        if (strpos($GLOBALS['spip_pipeline'][$nom], (string) "|$prefix$action") === false) {
+                            $GLOBALS['spip_pipeline'][$nom] = preg_replace(
+                                ',(\|\||$),',
+                                "|$prefix$action\\1",
+                                $GLOBALS['spip_pipeline'][$nom],
+                                1
+                            );
+                        }
+                        if (isset($pipe['inclure'])) {
+                            $GLOBALS['spip_matrice']["$prefix$action"] =
+                                "$root_dir_type:$plug/" . $pipe['inclure'];
+                        }
+                    }
+                }
+            }
+            if (isset($info['genie']) and is_countable($info['genie']) ? count($info['genie']) : 0) {
+                if (!isset($prepend_code['taches_generales_cron'])) {
+                    $prepend_code['taches_generales_cron'] = '';
+                }
+                foreach ($info['genie'] as $genie) {
+                    $nom = $prefix . $genie['nom'];
+                    $periode = max(60, intval($genie['periode']));
+                    if (charger_fonction($nom, 'genie', true)) {
+                        $prepend_code['taches_generales_cron'] .= "\$val['$nom'] = $periode;\n";
+                    } else {
+                        spip_log("Fonction genie_$nom introuvable", _LOG_ERREUR);
+                    }
+                }
+            }
+            if (isset($info['style']) and is_countable($info['style']) ? count($info['style']) : 0) {
+                if (!isset($prepend_code['insert_head_css'])) {
+                    $prepend_code['insert_head_css'] = '';
+                }
+                if (!isset($prepend_code['header_prive_css'])) {
+                    $prepend_code['header_prive_css'] = '';
+                }
+                foreach ($info['style'] as $style) {
+                    if (isset($style['path']) and $style['path']) {
+                        $code = "if (\$f=timestamp(direction_css(find_in_path('" . addslashes($style['path']) . "')))) ";
+                    } else {
+                        $code = "if (\$f='" . addslashes($style['url']) . "') ";
+                    }
+                    $code .= "\$val .= '<link rel=\"stylesheet\" href=\"'.\$f.'\" type=\"text/css\"";
+                    if (isset($style['media']) and strlen($style['media'])) {
+                        $code .= ' media="' . addslashes($style['media']) . '"';
+                    }
+                    $code .= "/>';\n";
+                    if ($style['type'] != 'prive') {
+                        $prepend_code['insert_head_css'] .= $code;
+                    }
+                    if ($style['type'] != 'public') {
+                        $prepend_code['header_prive_css'] .= $code;
+                    }
+                }
+            }
+            if (!isset($prepend_code['insert_head'])) {
+                $prepend_code['insert_head'] = '';
+            }
+            if (!isset($prepend_code['header_prive'])) {
+                $prepend_code['header_prive'] = '';
+            }
+            if (isset($info['script']) and is_countable($info['script']) ? count($info['script']) : 0) {
+                foreach ($info['script'] as $script) {
+                    if (isset($script['path']) and $script['path']) {
+                        $code = "if (\$f=timestamp(find_in_path('" . addslashes($script['path']) . "'))) ";
+                    } else {
+                        $code = "if (\$f='" . addslashes($script['url']) . "') ";
+                    }
+                    $code .= "\$val .= '<script src=\"'.\$f.'\" type=\"text/javascript\"></script>';\n";
+                    if ($script['type'] != 'prive') {
+                        $prepend_code['insert_head'] .= $code;
+                    }
+                    if ($script['type'] != 'public') {
+                        $prepend_code['header_prive'] .= $code;
+                    }
+                }
+            }
+        }
+    }
+
+    $prepend_code['insert_head'] =
+        "include_once_check(_DIR_RESTREINT . 'inc/pipelines.php');\n"
+        . "\$val = minipipe('f_jQuery', \$val);\n"
+        . $prepend_code['insert_head'];
+    $prepend_code['header_prive'] =
+        "include_once_check(_DIR_RESTREINT . 'inc/pipelines_ecrire.php');\n"
+        . "\$val = minipipe('f_jQuery_prive', \$val);\n"
+        . $prepend_code['header_prive'];
+
+    // on ajoute les pipe qui ont ete recenses manquants
+    foreach ($liste_pipe_manquants as $add_pipe) {
+        if (!isset($GLOBALS['spip_pipeline'][$add_pipe])) {
+            $GLOBALS['spip_pipeline'][$add_pipe] = '';
+        }
+    }
+
+    return $prepend_code;
 }
 
 /**
@@ -1322,62 +1322,62 @@ 
 **/
 function pipeline_precompile($prepend_code = []) {
 
-	$all_pipes = $all_pipes_end = '';
-	if (!empty($GLOBALS['spip_pipeline']['all'])) {
-		$a = explode('||', $GLOBALS['spip_pipeline']['all'], 2);
-		unset($GLOBALS['spip_pipeline']['all']);
-		$all_pipes = trim(array_shift($a));
-		if ($all_pipes) {
-			$all_pipes = '|' . ltrim($all_pipes, '|');
-		}
-		if (count($a)) {
-			$all_pipes_end = '||' . array_shift($a);
-		}
-	}
-	$content = '';
-	foreach ($GLOBALS['spip_pipeline'] as $action => $pipeline) {
-		$s_inc = '';
-		$s_call = '';
-		if ($all_pipes) {
-			$pipeline = preg_replace(',(\|\||$),', "$all_pipes\\1", $pipeline, 1);
-		}
-		if ($all_pipes_end) {
-			$pipeline .= $all_pipes_end;
-		}
-		$pipe = array_filter(explode('|', $pipeline));
-		// Eclater le pipeline en filtres et appliquer chaque filtre
-		foreach ($pipe as $fonc) {
-			$fonc = trim($fonc);
-			$s_call .= '$val = minipipe(\'' . $fonc . '\', $val);' . "\n";
-			if (isset($GLOBALS['spip_matrice'][$fonc])) {
-				$file = $GLOBALS['spip_matrice'][$fonc];
-				$file = "'$file'";
-				// si un _DIR_XXX: est dans la chaine, on extrait la constante
-				if (preg_match(',(_(DIR|ROOT)_[A-Z_]+):,Ums', $file, $regs)) {
-					$dir = $regs[1];
-					$root_dir = str_replace('_DIR_', '_ROOT_', $dir);
-					if (defined($root_dir)) {
-						$dir = $root_dir;
-					}
-					$file = str_replace($regs[0], "'." . $dir . ".'", $file);
-					$file = str_replace("''.", '', $file);
-					$file = str_replace(constant($dir), '', $file);
-				}
-				$s_inc .= "include_once_check($file);\n";
-			}
-		}
-		if (strlen($s_inc)) {
-			$s_inc = "static \$inc=null;\nif (!\$inc){\n$s_inc\$inc=true;\n}\n";
-		}
-		$content .= "// Pipeline $action \n"
-			. "function execute_pipeline_$action(&\$val){\n"
-			. $s_inc
-			. ((isset($prepend_code[$action]) and strlen($prepend_code[$action])) ? trim($prepend_code[$action]) . "\n" : '')
-			. $s_call
-			. "return \$val;\n}\n";
-	}
-	ecrire_fichier_php(_CACHE_PIPELINES, $content);
-	clear_path_cache();
+    $all_pipes = $all_pipes_end = '';
+    if (!empty($GLOBALS['spip_pipeline']['all'])) {
+        $a = explode('||', $GLOBALS['spip_pipeline']['all'], 2);
+        unset($GLOBALS['spip_pipeline']['all']);
+        $all_pipes = trim(array_shift($a));
+        if ($all_pipes) {
+            $all_pipes = '|' . ltrim($all_pipes, '|');
+        }
+        if (count($a)) {
+            $all_pipes_end = '||' . array_shift($a);
+        }
+    }
+    $content = '';
+    foreach ($GLOBALS['spip_pipeline'] as $action => $pipeline) {
+        $s_inc = '';
+        $s_call = '';
+        if ($all_pipes) {
+            $pipeline = preg_replace(',(\|\||$),', "$all_pipes\\1", $pipeline, 1);
+        }
+        if ($all_pipes_end) {
+            $pipeline .= $all_pipes_end;
+        }
+        $pipe = array_filter(explode('|', $pipeline));
+        // Eclater le pipeline en filtres et appliquer chaque filtre
+        foreach ($pipe as $fonc) {
+            $fonc = trim($fonc);
+            $s_call .= '$val = minipipe(\'' . $fonc . '\', $val);' . "\n";
+            if (isset($GLOBALS['spip_matrice'][$fonc])) {
+                $file = $GLOBALS['spip_matrice'][$fonc];
+                $file = "'$file'";
+                // si un _DIR_XXX: est dans la chaine, on extrait la constante
+                if (preg_match(',(_(DIR|ROOT)_[A-Z_]+):,Ums', $file, $regs)) {
+                    $dir = $regs[1];
+                    $root_dir = str_replace('_DIR_', '_ROOT_', $dir);
+                    if (defined($root_dir)) {
+                        $dir = $root_dir;
+                    }
+                    $file = str_replace($regs[0], "'." . $dir . ".'", $file);
+                    $file = str_replace("''.", '', $file);
+                    $file = str_replace(constant($dir), '', $file);
+                }
+                $s_inc .= "include_once_check($file);\n";
+            }
+        }
+        if (strlen($s_inc)) {
+            $s_inc = "static \$inc=null;\nif (!\$inc){\n$s_inc\$inc=true;\n}\n";
+        }
+        $content .= "// Pipeline $action \n"
+            . "function execute_pipeline_$action(&\$val){\n"
+            . $s_inc
+            . ((isset($prepend_code[$action]) and strlen($prepend_code[$action])) ? trim($prepend_code[$action]) . "\n" : '')
+            . $s_call
+            . "return \$val;\n}\n";
+    }
+    ecrire_fichier_php(_CACHE_PIPELINES, $content);
+    clear_path_cache();
 }
 
 
@@ -1390,12 +1390,12 @@ 
  *     true si le plugin est actif, false sinon
 **/
 function plugin_est_installe($plug_path) {
-	$plugin_installes = isset($GLOBALS['meta']['plugin_installes']) ? unserialize($GLOBALS['meta']['plugin_installes']) : [];
-	if (!$plugin_installes) {
-		return false;
-	}
+    $plugin_installes = isset($GLOBALS['meta']['plugin_installes']) ? unserialize($GLOBALS['meta']['plugin_installes']) : [];
+    if (!$plugin_installes) {
+        return false;
+    }
 
-	return in_array($plug_path, $plugin_installes);
+    return in_array($plug_path, $plugin_installes);
 }
 
 
@@ -1408,46 +1408,46 @@ 
  * @uses plugins_installer_dist()
  **/
 function plugin_installes_meta() {
-	if (isset($GLOBALS['fichier_php_compile_recent'])) {
-		// attendre eventuellement l'invalidation du cache opcode
-		spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
-	}
-
-	$installer_plugins = charger_fonction('installer', 'plugins');
-	$meta_plug_installes = [];
-	foreach (unserialize($GLOBALS['meta']['plugin']) as $prefix => $resume) {
-		if ($plug = $resume['dir']) {
-			$infos = $installer_plugins($plug, 'install', $resume['dir_type']);
-			if ($infos) {
-				if (!is_array($infos) or $infos['install_test'][0]) {
-					$meta_plug_installes[] = $plug;
-				}
-				if (is_array($infos)) {
-					[$ok, $trace] = $infos['install_test'];
-					$titre = _T('plugin_titre_installation', ['plugin' => typo($infos['nom'])]);
-					$result = ($ok ? ((isset($infos['upgrade']) && $infos['upgrade']) ? _T('plugin_info_upgrade_ok') : _T('plugin_info_install_ok')) : _T('avis_operation_echec'));
-					if (_IS_CLI) {
-						include_spip('inc/filtres');
-						$trace = ltrim(textebrut($trace) . "\n" . $result);
-						$trace = '    ' . str_replace("\n", "\n    ", $trace);
-						echo "\n" . ($ok ? 'OK  ' : '/!\ ') . textebrut($titre) . "\n",
-						  $trace,
-						  "\n";
-					}
-					else {
-						include_spip('inc/filtres_boites');
-						echo "<div class='install-plugins svp_retour'>"
-							. boite_ouvrir($titre, ($ok ? 'success' : 'error'))
-							. $trace
-							. "<div class='result'>$result</div>"
-							. boite_fermer()
-							. '</div>';
-					}
-				}
-			}
-		}
-	}
-	ecrire_meta('plugin_installes', serialize($meta_plug_installes), 'non');
+    if (isset($GLOBALS['fichier_php_compile_recent'])) {
+        // attendre eventuellement l'invalidation du cache opcode
+        spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
+    }
+
+    $installer_plugins = charger_fonction('installer', 'plugins');
+    $meta_plug_installes = [];
+    foreach (unserialize($GLOBALS['meta']['plugin']) as $prefix => $resume) {
+        if ($plug = $resume['dir']) {
+            $infos = $installer_plugins($plug, 'install', $resume['dir_type']);
+            if ($infos) {
+                if (!is_array($infos) or $infos['install_test'][0]) {
+                    $meta_plug_installes[] = $plug;
+                }
+                if (is_array($infos)) {
+                    [$ok, $trace] = $infos['install_test'];
+                    $titre = _T('plugin_titre_installation', ['plugin' => typo($infos['nom'])]);
+                    $result = ($ok ? ((isset($infos['upgrade']) && $infos['upgrade']) ? _T('plugin_info_upgrade_ok') : _T('plugin_info_install_ok')) : _T('avis_operation_echec'));
+                    if (_IS_CLI) {
+                        include_spip('inc/filtres');
+                        $trace = ltrim(textebrut($trace) . "\n" . $result);
+                        $trace = '    ' . str_replace("\n", "\n    ", $trace);
+                        echo "\n" . ($ok ? 'OK  ' : '/!\ ') . textebrut($titre) . "\n",
+                            $trace,
+                            "\n";
+                    }
+                    else {
+                        include_spip('inc/filtres_boites');
+                        echo "<div class='install-plugins svp_retour'>"
+                            . boite_ouvrir($titre, ($ok ? 'success' : 'error'))
+                            . $trace
+                            . "<div class='result'>$result</div>"
+                            . boite_fermer()
+                            . '</div>';
+                    }
+                }
+            }
+        }
+    }
+    ecrire_meta('plugin_installes', serialize($meta_plug_installes), 'non');
 }
 
 /**
@@ -1461,29 +1461,29 @@ 
  *     Commentaire : code écrit en tout début de fichier, après la balise PHP ouvrante
 **/
 function ecrire_fichier_php($nom, $contenu, $comment = '') {
-	if (!isset($GLOBALS['fichier_php_compile_recent'])) {
-		$GLOBALS['fichier_php_compile_recent'] = 0;
-	}
-
-	$contenu = '<' . '?php' . "\n" . $comment . "\nif (defined('_ECRIRE_INC_VERSION')) {\n" . $contenu . "}\n?" . '>';
-	// si un fichier existe deja on verifie que son contenu change avant de l'ecraser
-	// si pas de modif on ne touche pas au fichier initial
-	if (file_exists($nom)) {
-		if (substr($nom, -4) == '.php') {
-			$fichier_tmp = substr($nom, 0, -4) . '.tmp.php';
-		}
-		else {
-			$fichier_tmp = $nom . '.tmp';
-		}
-		file_put_contents($fichier_tmp, $contenu);
-		if (md5_file($nom) == md5_file($fichier_tmp)) {
-			$GLOBALS['fichier_php_compile_recent'] = max($GLOBALS['fichier_php_compile_recent'], filemtime($nom));
-			@unlink($fichier_tmp);
-			return;
-		}
-		@unlink($fichier_tmp);
-	}
-	ecrire_fichier($nom, $contenu);
-	$GLOBALS['fichier_php_compile_recent'] = max($GLOBALS['fichier_php_compile_recent'], filemtime($nom));
-	spip_clear_opcode_cache(realpath($nom));
+    if (!isset($GLOBALS['fichier_php_compile_recent'])) {
+        $GLOBALS['fichier_php_compile_recent'] = 0;
+    }
+
+    $contenu = '<' . '?php' . "\n" . $comment . "\nif (defined('_ECRIRE_INC_VERSION')) {\n" . $contenu . "}\n?" . '>';
+    // si un fichier existe deja on verifie que son contenu change avant de l'ecraser
+    // si pas de modif on ne touche pas au fichier initial
+    if (file_exists($nom)) {
+        if (substr($nom, -4) == '.php') {
+            $fichier_tmp = substr($nom, 0, -4) . '.tmp.php';
+        }
+        else {
+            $fichier_tmp = $nom . '.tmp';
+        }
+        file_put_contents($fichier_tmp, $contenu);
+        if (md5_file($nom) == md5_file($fichier_tmp)) {
+            $GLOBALS['fichier_php_compile_recent'] = max($GLOBALS['fichier_php_compile_recent'], filemtime($nom));
+            @unlink($fichier_tmp);
+            return;
+        }
+        @unlink($fichier_tmp);
+    }
+    ecrire_fichier($nom, $contenu);
+    $GLOBALS['fichier_php_compile_recent'] = max($GLOBALS['fichier_php_compile_recent'], filemtime($nom));
+    spip_clear_opcode_cache(realpath($nom));
 }

ecrire/inc/traduire.php

Indentation +206 added lines, -206 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -38,20 +38,20 @@ 
  *     Liste des fichiers de langue trouvés, dans l'ordre des chemins
  */
 function find_langs_in_path($file, $dirname = 'lang') {
-	static $dirs = [];
-	$liste = [];
-	foreach (creer_chemin() as $dir) {
-		if (!isset($dirs[$a = $dir . $dirname])) {
-			$dirs[$a] = (is_dir($a) || !$a);
-		}
-		if ($dirs[$a]) {
-			if (is_readable($a .= $file)) {
-				$liste[] = $a;
-			}
-		}
-	}
+    static $dirs = [];
+    $liste = [];
+    foreach (creer_chemin() as $dir) {
+        if (!isset($dirs[$a = $dir . $dirname])) {
+            $dirs[$a] = (is_dir($a) || !$a);
+        }
+        if ($dirs[$a]) {
+            if (is_readable($a .= $file)) {
+                $liste[] = $a;
+            }
+        }
+    }
 
-	return array_reverse($liste);
+    return array_reverse($liste);
 }
 
 /**
@@ -66,23 +66,23 @@ 
  *     Liste des fichiers touvés pour ce module et cette langue.
  **/
 function chercher_module_lang($module, $lang = '') {
-	if ($lang) {
-		$lang = '_' . $lang;
-	}
+    if ($lang) {
+        $lang = '_' . $lang;
+    }
 
-	// 1) dans un repertoire nomme lang/ se trouvant sur le chemin
-	if (
-		$f = ($module == 'local'
-		? find_in_path($module . $lang . '.php', 'lang/')
-		: find_langs_in_path($module . $lang . '.php', 'lang/'))
-	) {
-		return is_array($f) ? $f : [$f];
-	}
+    // 1) dans un repertoire nomme lang/ se trouvant sur le chemin
+    if (
+        $f = ($module == 'local'
+        ? find_in_path($module . $lang . '.php', 'lang/')
+        : find_langs_in_path($module . $lang . '.php', 'lang/'))
+    ) {
+        return is_array($f) ? $f : [$f];
+    }
 
-	// 2) directement dans le chemin (old style, uniquement pour local)
-	return (($module == 'local') or strpos($module, '/'))
-		? (($f = find_in_path($module . $lang . '.php')) ? [$f] : false)
-		: false;
+    // 2) directement dans le chemin (old style, uniquement pour local)
+    return (($module == 'local') or strpos($module, '/'))
+        ? (($f = find_in_path($module . $lang . '.php')) ? [$f] : false)
+        : false;
 }
 
 /**
@@ -104,33 +104,33 @@ 
  * @return void
  **/
 function charger_langue($lang, $module = 'spip') {
-	static $langs = [];
-	$var = 'i18n_' . $module . '_' . $lang;
-	if (!isset($langs[$lang])) {
-		$langs[$lang] = [];
-		if ($lang) {
-			$langs[$lang][] = $lang;
-			if (strpos($lang, '_') !== false) {
-				$l = explode('_', $lang);
-				$langs[$lang][] = reset($l);
-			}
-		}
-		$langs[$lang][] = $GLOBALS['meta']['langue_site'];
-		$langs[$lang][] = _LANGUE_PAR_DEFAUT;
-	}
-	foreach ($langs[$lang] as $l) {
-		if ($fichiers_lang = chercher_module_lang($module, $l)) {
-			$GLOBALS['idx_lang'] = 'i18n_' . $module . '_' . $l;
-			$GLOBALS[$GLOBALS['idx_lang']] = lire_fichier_langue(array_shift($fichiers_lang));
-			surcharger_langue($fichiers_lang);
-			if ($l !== $lang) {
-				$GLOBALS[$var] = &$GLOBALS['i18n_' . $module . '_' . $l];
-			}
-			$GLOBALS['lang_' . $var] = $l;
-			#spip_log("module de langue : {$module}_$l.php", 'traduire');
-			break;
-		}
-	}
+    static $langs = [];
+    $var = 'i18n_' . $module . '_' . $lang;
+    if (!isset($langs[$lang])) {
+        $langs[$lang] = [];
+        if ($lang) {
+            $langs[$lang][] = $lang;
+            if (strpos($lang, '_') !== false) {
+                $l = explode('_', $lang);
+                $langs[$lang][] = reset($l);
+            }
+        }
+        $langs[$lang][] = $GLOBALS['meta']['langue_site'];
+        $langs[$lang][] = _LANGUE_PAR_DEFAUT;
+    }
+    foreach ($langs[$lang] as $l) {
+        if ($fichiers_lang = chercher_module_lang($module, $l)) {
+            $GLOBALS['idx_lang'] = 'i18n_' . $module . '_' . $l;
+            $GLOBALS[$GLOBALS['idx_lang']] = lire_fichier_langue(array_shift($fichiers_lang));
+            surcharger_langue($fichiers_lang);
+            if ($l !== $lang) {
+                $GLOBALS[$var] = &$GLOBALS['i18n_' . $module . '_' . $l];
+            }
+            $GLOBALS['lang_' . $var] = $l;
+            #spip_log("module de langue : {$module}_$l.php", 'traduire');
+            break;
+        }
+    }
 }
 
 /**
@@ -143,21 +143,21 @@ 
  * @return array<string, string>
  */
 function lire_fichier_langue(string $fichier): array {
-	$idx_lang_before = $GLOBALS['idx_lang'] ?? null;
-	$idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang') . '@temporaire';
-	$GLOBALS['idx_lang'] = $idx_lang_tmp;
-	$idx_lang = include $fichier;
-	$GLOBALS['idx_lang'] = $idx_lang_before;
-	if (!is_array($idx_lang)) {
-		if (isset($GLOBALS[$idx_lang_tmp]) and is_array($GLOBALS[$idx_lang_tmp])) {
-			$idx_lang = $GLOBALS[$idx_lang_tmp];
-		} else {
-			$idx_lang = [];
-			spip_log(sprintf('Fichier de langue incorrect : %s', $fichier), _LOG_ERREUR);
-		}
-		unset($GLOBALS[$idx_lang_tmp]);
-	}
-	return $idx_lang;
+    $idx_lang_before = $GLOBALS['idx_lang'] ?? null;
+    $idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang') . '@temporaire';
+    $GLOBALS['idx_lang'] = $idx_lang_tmp;
+    $idx_lang = include $fichier;
+    $GLOBALS['idx_lang'] = $idx_lang_before;
+    if (!is_array($idx_lang)) {
+        if (isset($GLOBALS[$idx_lang_tmp]) and is_array($GLOBALS[$idx_lang_tmp])) {
+            $idx_lang = $GLOBALS[$idx_lang_tmp];
+        } else {
+            $idx_lang = [];
+            spip_log(sprintf('Fichier de langue incorrect : %s', $fichier), _LOG_ERREUR);
+        }
+        unset($GLOBALS[$idx_lang_tmp]);
+    }
+    return $idx_lang;
 }
 
 /**
@@ -177,46 +177,46 @@ 
  *    Liste des chemins de fichiers de langue à surcharger.
  **/
 function surcharger_langue($fichiers) {
-	static $surcharges = [];
-	if (!isset($GLOBALS['idx_lang'])) {
-		return;
-	}
+    static $surcharges = [];
+    if (!isset($GLOBALS['idx_lang'])) {
+        return;
+    }
 
-	if (!is_array($fichiers)) {
-		$fichiers = [$fichiers];
-	}
-	if (!count($fichiers)) {
-		return;
-	}
-	foreach ($fichiers as $fichier) {
-		if (!isset($surcharges[$fichier])) {
-			$surcharges[$fichier] = lire_fichier_langue($fichier);
-		}
-		if (is_array($surcharges[$fichier])) {
-			$GLOBALS[$GLOBALS['idx_lang']] ??= [];
-			$GLOBALS[$GLOBALS['idx_lang']] = array_merge(
-				$GLOBALS[$GLOBALS['idx_lang']],
-				$surcharges[$fichier]
-			);
-		}
-	}
+    if (!is_array($fichiers)) {
+        $fichiers = [$fichiers];
+    }
+    if (!count($fichiers)) {
+        return;
+    }
+    foreach ($fichiers as $fichier) {
+        if (!isset($surcharges[$fichier])) {
+            $surcharges[$fichier] = lire_fichier_langue($fichier);
+        }
+        if (is_array($surcharges[$fichier])) {
+            $GLOBALS[$GLOBALS['idx_lang']] ??= [];
+            $GLOBALS[$GLOBALS['idx_lang']] = array_merge(
+                $GLOBALS[$GLOBALS['idx_lang']],
+                $surcharges[$fichier]
+            );
+        }
+    }
 }
 
 
 
 class SPIP_Traductions_Description {
-	/** @var string code de langue (hors module) */
-	public $code;
-	/** @var string nom du module de langue */
-	public $module;
-	/** @var string langue de la traduction */
-	public $langue;
-	/** @var string traduction */
-	public $texte;
-	/** @var string var mode particulier appliqué ? */
-	public $mode;
-	/** @var bool Corrections des textes appliqué ? */
-	public $corrections = false;
+    /** @var string code de langue (hors module) */
+    public $code;
+    /** @var string nom du module de langue */
+    public $module;
+    /** @var string langue de la traduction */
+    public $langue;
+    /** @var string traduction */
+    public $texte;
+    /** @var string var mode particulier appliqué ? */
+    public $mode;
+    /** @var bool Corrections des textes appliqué ? */
+    public $corrections = false;
 }
 
 
@@ -258,99 +258,99 @@ 
  *     - SPIP_Traductions_Description : traduction et description (texte, module, langue)
  **/
 function inc_traduire_dist($ori, $lang, $raw = false) {
-	static $deja_vu = [];
-	static $local = [];
+    static $deja_vu = [];
+    static $local = [];
 
-	if (isset($deja_vu[$lang][$ori]) and (_request('var_mode') != 'traduction')) {
-		return $raw ? $deja_vu[$lang][$ori] : $deja_vu[$lang][$ori]->texte;
-	}
+    if (isset($deja_vu[$lang][$ori]) and (_request('var_mode') != 'traduction')) {
+        return $raw ? $deja_vu[$lang][$ori] : $deja_vu[$lang][$ori]->texte;
+    }
 
-	// modules demandes explicitement <xxx|yyy|zzz:code> cf MODULES_IDIOMES
-	if (strpos($ori, ':')) {
-		[$modules, $code] = explode(':', $ori, 2);
-		$modules = explode('|', $modules);
-		$ori_complet = $ori;
-	} else {
-		$modules = ['spip', 'ecrire'];
-		$code = $ori;
-		$ori_complet = implode('|', $modules) . ':' . $ori;
-	}
+    // modules demandes explicitement <xxx|yyy|zzz:code> cf MODULES_IDIOMES
+    if (strpos($ori, ':')) {
+        [$modules, $code] = explode(':', $ori, 2);
+        $modules = explode('|', $modules);
+        $ori_complet = $ori;
+    } else {
+        $modules = ['spip', 'ecrire'];
+        $code = $ori;
+        $ori_complet = implode('|', $modules) . ':' . $ori;
+    }
 
-	$desc = new SPIP_Traductions_Description();
+    $desc = new SPIP_Traductions_Description();
 
-	// parcourir tous les modules jusqu'a ce qu'on trouve
-	foreach ($modules as $module) {
-		$var = 'i18n_' . $module . '_' . $lang;
+    // parcourir tous les modules jusqu'a ce qu'on trouve
+    foreach ($modules as $module) {
+        $var = 'i18n_' . $module . '_' . $lang;
 
-		if (empty($GLOBALS[$var])) {
-			charger_langue($lang, $module);
-			// surcharges persos -- on cherche
-			// (lang/)local_xx.php et/ou (lang/)local.php ...
-			if (!isset($local['local_' . $lang])) {
-				// redéfinir la langue en cours pour les surcharges (chercher_langue a pu le changer)
-				$GLOBALS['idx_lang'] = $var;
-				// ... (lang/)local_xx.php
-				$local['local_' . $lang] = chercher_module_lang('local', $lang);
-			}
-			if ($local['local_' . $lang]) {
-				surcharger_langue($local['local_' . $lang]);
-			}
-			// ... puis (lang/)local.php
-			if (!isset($local['local'])) {
-				$local['local'] = chercher_module_lang('local');
-			}
-			if ($local['local']) {
-				surcharger_langue($local['local']);
-			}
-		}
+        if (empty($GLOBALS[$var])) {
+            charger_langue($lang, $module);
+            // surcharges persos -- on cherche
+            // (lang/)local_xx.php et/ou (lang/)local.php ...
+            if (!isset($local['local_' . $lang])) {
+                // redéfinir la langue en cours pour les surcharges (chercher_langue a pu le changer)
+                $GLOBALS['idx_lang'] = $var;
+                // ... (lang/)local_xx.php
+                $local['local_' . $lang] = chercher_module_lang('local', $lang);
+            }
+            if ($local['local_' . $lang]) {
+                surcharger_langue($local['local_' . $lang]);
+            }
+            // ... puis (lang/)local.php
+            if (!isset($local['local'])) {
+                $local['local'] = chercher_module_lang('local');
+            }
+            if ($local['local']) {
+                surcharger_langue($local['local']);
+            }
+        }
 
-		if (isset($GLOBALS[$var][$code])) {
-			$desc->code = $code;
-			$desc->module = $module;
-			$desc->langue = $GLOBALS['lang_' . $var] ?? $lang;
-			$desc->texte = $GLOBALS[$var][$code];
-			break;
-		}
-	}
+        if (isset($GLOBALS[$var][$code])) {
+            $desc->code = $code;
+            $desc->module = $module;
+            $desc->langue = $GLOBALS['lang_' . $var] ?? $lang;
+            $desc->texte = $GLOBALS[$var][$code];
+            break;
+        }
+    }
 
-	if (!$desc->corrections) {
-		$desc->corrections = true;
-		// Retour aux sources si la chaine est absente dans la langue cible ;
-		// on essaie d'abord la langue du site, puis a defaut la langue fr
-		if (
-			($desc->texte === null || !strlen($desc->texte))
-			and $lang !== _LANGUE_PAR_DEFAUT
-		) {
-			if ($lang !== $GLOBALS['meta']['langue_site']) {
-				$desc = inc_traduire_dist($ori, $GLOBALS['meta']['langue_site'], true);
-			} else {
-				$desc = inc_traduire_dist($ori, _LANGUE_PAR_DEFAUT, true);
-			}
-		}
+    if (!$desc->corrections) {
+        $desc->corrections = true;
+        // Retour aux sources si la chaine est absente dans la langue cible ;
+        // on essaie d'abord la langue du site, puis a defaut la langue fr
+        if (
+            ($desc->texte === null || !strlen($desc->texte))
+            and $lang !== _LANGUE_PAR_DEFAUT
+        ) {
+            if ($lang !== $GLOBALS['meta']['langue_site']) {
+                $desc = inc_traduire_dist($ori, $GLOBALS['meta']['langue_site'], true);
+            } else {
+                $desc = inc_traduire_dist($ori, _LANGUE_PAR_DEFAUT, true);
+            }
+        }
 
-		// Supprimer la mention <NEW> ou <MODIF>
-		if ($desc->texte && substr($desc->texte, 0, 1) === '<') {
-			$desc->texte = str_replace(['<NEW>', '<MODIF>'], [], $desc->texte);
-		}
+        // Supprimer la mention <NEW> ou <MODIF>
+        if ($desc->texte && substr($desc->texte, 0, 1) === '<') {
+            $desc->texte = str_replace(['<NEW>', '<MODIF>'], [], $desc->texte);
+        }
 
-		// Si on n'est pas en utf-8, la chaine peut l'etre...
-		// le cas echeant on la convertit en entites html &#xxx;
-		if (
-			(!isset($GLOBALS['meta']['charset']) or $GLOBALS['meta']['charset'] !== 'utf-8')
-			and preg_match(',[\x7f-\xff],S', $desc->texte)
-		) {
-			include_spip('inc/charsets');
-			$desc->texte = charset2unicode($desc->texte, 'utf-8');
-		}
-	}
+        // Si on n'est pas en utf-8, la chaine peut l'etre...
+        // le cas echeant on la convertit en entites html &#xxx;
+        if (
+            (!isset($GLOBALS['meta']['charset']) or $GLOBALS['meta']['charset'] !== 'utf-8')
+            and preg_match(',[\x7f-\xff],S', $desc->texte)
+        ) {
+            include_spip('inc/charsets');
+            $desc->texte = charset2unicode($desc->texte, 'utf-8');
+        }
+    }
 
-	if (_request('var_mode') == 'traduction') {
-		$desc = definir_details_traduction($desc, $ori_complet);
-	} else {
-		$deja_vu[$lang][$ori] = $desc;
-	}
+    if (_request('var_mode') == 'traduction') {
+        $desc = definir_details_traduction($desc, $ori_complet);
+    } else {
+        $deja_vu[$lang][$ori] = $desc;
+    }
 
-	return $raw ? $desc : $desc->texte;
+    return $raw ? $desc : $desc->texte;
 }
 
 /**
@@ -362,23 +362,23 @@ 
  * @return SPIP_Traductions_Description
  */
 function definir_details_traduction($desc, $modules) {
-	if (!$desc->mode and $desc->texte) {
-		// ne pas modifier 2 fois l'affichage
-		$desc->mode = 'traduction';
-		$classe = 'debug-traduction' . ($desc->module == 'ecrire' ? '-prive' : '');
-		$desc->texte = '<span '
-			. 'lang=' . $desc->langue
-			. ' class=' . $classe
-			. ' data-module=' . $desc->module
-			. ' data-code=' . $desc->code
-			. ' title=' . $modules . '(' . $desc->langue . ')>'
-			. $desc->texte
-			. '</span>';
-		$desc->texte = str_replace(
-			["$desc->module:", "$desc->module|"],
-			["*$desc->module*:", "*$desc->module*|"],
-			$desc->texte
-		);
-	}
-	return $desc;
+    if (!$desc->mode and $desc->texte) {
+        // ne pas modifier 2 fois l'affichage
+        $desc->mode = 'traduction';
+        $classe = 'debug-traduction' . ($desc->module == 'ecrire' ? '-prive' : '');
+        $desc->texte = '<span '
+            . 'lang=' . $desc->langue
+            . ' class=' . $classe
+            . ' data-module=' . $desc->module
+            . ' data-code=' . $desc->code
+            . ' title=' . $modules . '(' . $desc->langue . ')>'
+            . $desc->texte
+            . '</span>';
+        $desc->texte = str_replace(
+            ["$desc->module:", "$desc->module|"],
+            ["*$desc->module*:", "*$desc->module*|"],
+            $desc->texte
+        );
+    }
+    return $desc;
 }

ecrire/iterateur/data.php

Indentation +636 added lines, -636 removed lines

@@ -17,11 +17,11 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_DATA_SOURCE_MAX_SIZE')) {
-	define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
+    define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
 }
 
 
@@ -42,17 +42,17 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_DATA_dist($b) {
-	$b->iterateur = 'DATA'; # designe la classe d'iterateur
-	$b->show = [
-		'field' => [
-			'cle' => 'STRING',
-			'valeur' => 'STRING',
-			'*' => 'ALL' // Champ joker *
-		]
-	];
-	$b->select[] = '.valeur';
-
-	return $b;
+    $b->iterateur = 'DATA'; # designe la classe d'iterateur
+    $b->show = [
+        'field' => [
+            'cle' => 'STRING',
+            'valeur' => 'STRING',
+            '*' => 'ALL' // Champ joker *
+        ]
+    ];
+    $b->select[] = '.valeur';
+
+    return $b;
 }
 
 
@@ -62,518 +62,518 @@ 
  * Pour itérer sur des données quelconques (transformables en tableau)
  */
 class IterateurDATA implements Iterator {
-	/** Tableau de données */
-	protected array $tableau = [];
-
-	/**
-	 * Conditions de filtrage
-	 * ie criteres de selection
-	 */
-	protected array $filtre = [];
-
-
-	/**
-	 * Cle courante
-	 *
-	 * @var scalar
-	 */
-	protected $cle = null;
-
-	/**
-	 * Valeur courante
-	 *
-	 * @var mixed
-	 */
-	protected $valeur = null;
-
-	protected string $type = 'DATA';
-
-	protected array $command = [];
-
-	protected array $info = [];
-
-	/** Erreur presente ? */
-	public bool $err = false;
-
-	/**
-	 * Calcul du total des elements
-	 *
-	 * @var int|null
-	 **/
-	public $total = null;
-
-	/**
-	 * Constructeur
-	 *
-	 * @param  $command
-	 * @param array $info
-	 */
-	public function __construct($command, $info = []) {
-		$this->type = 'DATA';
-		$this->command = $command;
-		$this->info = $info;
-
-		$this->select($command);
-	}
-
-	/**
-	 * Revenir au depart
-	 *
-	 * @return void
-	 */
-	public function rewind(): void {
-		reset($this->tableau);
-		$this->cle = array_key_first($this->tableau);
-		$this->valeur = current($this->tableau);
-		next($this->tableau);
-	}
-
-	/**
-	 * Déclarer les critères exceptions
-	 *
-	 * @return array
-	 */
-	public function exception_des_criteres() {
-		return ['tableau'];
-	}
-
-	/**
-	 * Récupérer depuis le cache si possible
-	 *
-	 * @param string $cle
-	 * @return mixed
-	 */
-	protected function cache_get($cle) {
-		if (!$cle) {
-			return;
-		}
-		# utiliser memoization si dispo
-		if (!function_exists('cache_get')) {
-			return;
-		}
-
-		return cache_get($cle);
-	}
-
-	/**
-	 * Stocker en cache si possible
-	 *
-	 * @param string $cle
-	 * @param int $ttl
-	 * @param null|mixed $valeur
-	 * @return bool
-	 */
-	protected function cache_set($cle, $ttl, $valeur = null) {
-		if (!$cle) {
-			return;
-		}
-		if (is_null($valeur)) {
-			$valeur = $this->tableau;
-		}
-		# utiliser memoization si dispo
-		if (!function_exists('cache_set')) {
-			return;
-		}
-
-		return cache_set(
-			$cle,
-			[
-				'data' => $valeur,
-				'time' => time(),
-				'ttl' => $ttl
-			],
-			3600 + $ttl
-		);
-		# conserver le cache 1h de plus que la validite demandee,
-		# pour le cas ou le serveur distant ne reponde plus
-	}
-
-	/**
-	 * Aller chercher les données de la boucle DATA
-	 *
-	 * @throws Exception
-	 * @param array $command
-	 * @return void
-	 */
-	protected function select($command) {
-
-		// l'iterateur DATA peut etre appele en passant (data:type)
-		// le type se retrouve dans la commande 'from'
-		// dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument
-		if (isset($this->command['from'][0])) {
-			if (isset($this->command['source']) and is_array($this->command['source'])) {
-				array_unshift($this->command['source'], $this->command['sourcemode']);
-			}
-			$this->command['sourcemode'] = $this->command['from'][0];
-		}
-
-		// cherchons differents moyens de creer le tableau de donnees
-		// les commandes connues pour l'iterateur DATA
-		// sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...}
-
-		// {source format, [URL], [arg2]...}
-		if (
-			isset($this->command['source'])
-			and isset($this->command['sourcemode'])
-		) {
-			$this->select_source();
-		}
-
-		// Critere {liste X1, X2, X3}
-		if (isset($this->command['liste'])) {
-			$this->select_liste();
-		}
-		if (isset($this->command['enum'])) {
-			$this->select_enum();
-		}
-
-		// Si a ce stade on n'a pas de table, il y a un bug
-		if (!is_array($this->tableau)) {
-			$this->err = true;
-			spip_log('erreur datasource ' . var_export($command, true));
-		}
-
-		// {datapath query.results}
-		// extraire le chemin "query.results" du tableau de donnees
-		if (
-			!$this->err
-			and isset($this->command['datapath'])
-			and is_array($this->command['datapath'])
-		) {
-			$this->select_datapath();
-		}
-
-		// tri {par x}
-		if ($this->command['orderby']) {
-			$this->select_orderby();
-		}
-
-		// grouper les resultats {fusion /x/y/z} ;
-		if ($this->command['groupby']) {
-			$this->select_groupby();
-		}
-
-		$this->rewind();
-		#var_dump($this->tableau);
-	}
-
-
-	/**
-	 * Aller chercher les donnees de la boucle DATA
-	 * depuis une source
-	 * {source format, [URL], [arg2]...}
-	 */
-	protected function select_source() {
-		# un peu crado : avant de charger le cache il faut charger
-		# les class indispensables, sinon PHP ne saura pas gerer
-		# l'objet en cache ; cf plugins/icalendar
-		# perf : pas de fonction table_to_array ! (table est deja un array)
-		if (
-			isset($this->command['sourcemode'])
-			and !in_array($this->command['sourcemode'], ['table', 'array', 'tableau'])
-		) {
-			charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true);
-		}
-
-		# le premier argument peut etre un array, une URL etc.
-		$src = $this->command['source'][0];
-
-		# avons-nous un cache dispo ?
-		$cle = null;
-		if (is_string($src)) {
-			$cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true));
-		}
-
-		$cache = $this->cache_get($cle);
-		if (isset($this->command['datacache'])) {
-			$ttl = intval($this->command['datacache']);
-		}
-		if (
-			$cache
-			and ($cache['time'] + ($ttl ?? $cache['ttl'])
-				> time())
-			and !(_request('var_mode') === 'recalcul'
-				and include_spip('inc/autoriser')
-				and autoriser('recalcul')
-			)
-		) {
-			$this->tableau = $cache['data'];
-		} else {
-			try {
-				if (
-					isset($this->command['sourcemode'])
-					and in_array(
-						$this->command['sourcemode'],
-						['table', 'array', 'tableau']
-					)
-				) {
-					if (
-						is_array($a = $src)
-						or (is_string($a)
-							and $a = str_replace('"', '"', $a) # fragile!
-							and is_array($a = @unserialize($a)))
-					) {
-						$this->tableau = $a;
-					}
-				} else {
-					$data = $src;
-					if (is_string($src)) {
-						if (tester_url_absolue($src)) {
-							include_spip('inc/distant');
-							$data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]);
-							$data = $data['page'] ?? '';
-							if (!$data) {
-								throw new Exception('404');
-							}
-							if (!isset($ttl)) {
-								$ttl = 24 * 3600;
-							}
-						} elseif (@is_dir($src)) {
-							$data = $src;
-						} elseif (@is_readable($src) && @is_file($src)) {
-							$data = spip_file_get_contents($src);
-						}
-						if (!isset($ttl)) {
-							$ttl = 10;
-						}
-					}
-
-					if (
-						!$this->err
-						and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true)
-					) {
-						$args = $this->command['source'];
-						$args[0] = $data;
-						if (is_array($a = $data_to_array(...$args))) {
-							$this->tableau = $a;
-						}
-					}
-				}
-
-				if (!is_array($this->tableau)) {
-					$this->err = true;
-				}
-
-				if (!$this->err and isset($ttl) and $ttl > 0) {
-					$this->cache_set($cle, $ttl);
-				}
-			} catch (Exception $e) {
-				$e = $e->getMessage();
-				$err = sprintf(
-					"[%s, %s] $e",
-					$src,
-					$this->command['sourcemode']
-				);
-				erreur_squelette([$err, []]);
-				$this->err = true;
-			}
-		}
-
-		# en cas d'erreur, utiliser le cache si encore dispo
-		if (
-			$this->err
-			and $cache
-		) {
-			$this->tableau = $cache['data'];
-			$this->err = false;
-		}
-	}
-
-
-	/**
-	 * Retourne un tableau donne depuis un critère liste
-	 *
-	 * Critère `{liste X1, X2, X3}`
-	 *
-	 * @see critere_DATA_liste_dist()
-	 *
-	 **/
-	protected function select_liste() {
-		# s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
-		if (!isset($this->command['liste'][1])) {
-			if (!is_array($this->command['liste'][0])) {
-				$this->command['liste'] = explode(',', $this->command['liste'][0]);
-			} else {
-				$this->command['liste'] = $this->command['liste'][0];
-			}
-		}
-		$this->tableau = $this->command['liste'];
-	}
-
-	/**
-	 * Retourne un tableau donne depuis un critere liste
-	 * Critere {enum Xmin, Xmax}
-	 *
-	 **/
-	protected function select_enum() {
-		# s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
-		if (!isset($this->command['enum'][1])) {
-			if (!is_array($this->command['enum'][0])) {
-				$this->command['enum'] = explode(',', $this->command['enum'][0]);
-			} else {
-				$this->command['enum'] = $this->command['enum'][0];
-			}
-		}
-		if ((is_countable($this->command['enum']) ? count($this->command['enum']) : 0) >= 3) {
-			$enum = range(
-				array_shift($this->command['enum']),
-				array_shift($this->command['enum']),
-				array_shift($this->command['enum'])
-			);
-		} else {
-			$enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']));
-		}
-		$this->tableau = $enum;
-	}
-
-
-	/**
-	 * extraire le chemin "query.results" du tableau de donnees
-	 * {datapath query.results}
-	 *
-	 **/
-	protected function select_datapath() {
-		$base = reset($this->command['datapath']);
-		if (strlen($base = ltrim(trim($base), '/'))) {
-			$this->tableau = table_valeur($this->tableau, $base);
-			if (!is_array($this->tableau)) {
-				$this->tableau = [];
-				$this->err = true;
-				spip_log("datapath '$base' absent");
-			}
-		}
-	}
-
-	/**
-	 * Ordonner les resultats
-	 * {par x}
-	 *
-	 **/
-	protected function select_orderby() {
-		$sortfunc = '';
-		$aleas = 0;
-		foreach ($this->command['orderby'] as $tri) {
-			// virer le / initial pour les criteres de la forme {par /xx}
-			if (preg_match(',^\.?([/\w:_-]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) {
-				$r = array_pad($r, 3, null);
-
-				// tri par cle
-				if ($r[1] == 'cle') {
-					if (isset($r[2]) and $r[2]) {
-						krsort($this->tableau);
-					} else {
-						ksort($this->tableau);
-					}
-				} # {par hasard}
-				else {
-					if ($r[1] == 'hasard') {
-						$k = array_keys($this->tableau);
-						shuffle($k);
-						$v = [];
-						foreach ($k as $cle) {
-							$v[$cle] = $this->tableau[$cle];
-						}
-						$this->tableau = $v;
-					} else {
-						# {par valeur}
-						if ($r[1] == 'valeur') {
-							$tv = '%s';
-						} # {par valeur/xx/yy} ??
-						else {
-							$tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')';
-						}
-						$sortfunc .= '
+    /** Tableau de données */
+    protected array $tableau = [];
+
+    /**
+     * Conditions de filtrage
+     * ie criteres de selection
+     */
+    protected array $filtre = [];
+
+
+    /**
+     * Cle courante
+     *
+     * @var scalar
+     */
+    protected $cle = null;
+
+    /**
+     * Valeur courante
+     *
+     * @var mixed
+     */
+    protected $valeur = null;
+
+    protected string $type = 'DATA';
+
+    protected array $command = [];
+
+    protected array $info = [];
+
+    /** Erreur presente ? */
+    public bool $err = false;
+
+    /**
+     * Calcul du total des elements
+     *
+     * @var int|null
+     **/
+    public $total = null;
+
+    /**
+     * Constructeur
+     *
+     * @param  $command
+     * @param array $info
+     */
+    public function __construct($command, $info = []) {
+        $this->type = 'DATA';
+        $this->command = $command;
+        $this->info = $info;
+
+        $this->select($command);
+    }
+
+    /**
+     * Revenir au depart
+     *
+     * @return void
+     */
+    public function rewind(): void {
+        reset($this->tableau);
+        $this->cle = array_key_first($this->tableau);
+        $this->valeur = current($this->tableau);
+        next($this->tableau);
+    }
+
+    /**
+     * Déclarer les critères exceptions
+     *
+     * @return array
+     */
+    public function exception_des_criteres() {
+        return ['tableau'];
+    }
+
+    /**
+     * Récupérer depuis le cache si possible
+     *
+     * @param string $cle
+     * @return mixed
+     */
+    protected function cache_get($cle) {
+        if (!$cle) {
+            return;
+        }
+        # utiliser memoization si dispo
+        if (!function_exists('cache_get')) {
+            return;
+        }
+
+        return cache_get($cle);
+    }
+
+    /**
+     * Stocker en cache si possible
+     *
+     * @param string $cle
+     * @param int $ttl
+     * @param null|mixed $valeur
+     * @return bool
+     */
+    protected function cache_set($cle, $ttl, $valeur = null) {
+        if (!$cle) {
+            return;
+        }
+        if (is_null($valeur)) {
+            $valeur = $this->tableau;
+        }
+        # utiliser memoization si dispo
+        if (!function_exists('cache_set')) {
+            return;
+        }
+
+        return cache_set(
+            $cle,
+            [
+                'data' => $valeur,
+                'time' => time(),
+                'ttl' => $ttl
+            ],
+            3600 + $ttl
+        );
+        # conserver le cache 1h de plus que la validite demandee,
+        # pour le cas ou le serveur distant ne reponde plus
+    }
+
+    /**
+     * Aller chercher les données de la boucle DATA
+     *
+     * @throws Exception
+     * @param array $command
+     * @return void
+     */
+    protected function select($command) {
+
+        // l'iterateur DATA peut etre appele en passant (data:type)
+        // le type se retrouve dans la commande 'from'
+        // dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument
+        if (isset($this->command['from'][0])) {
+            if (isset($this->command['source']) and is_array($this->command['source'])) {
+                array_unshift($this->command['source'], $this->command['sourcemode']);
+            }
+            $this->command['sourcemode'] = $this->command['from'][0];
+        }
+
+        // cherchons differents moyens de creer le tableau de donnees
+        // les commandes connues pour l'iterateur DATA
+        // sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...}
+
+        // {source format, [URL], [arg2]...}
+        if (
+            isset($this->command['source'])
+            and isset($this->command['sourcemode'])
+        ) {
+            $this->select_source();
+        }
+
+        // Critere {liste X1, X2, X3}
+        if (isset($this->command['liste'])) {
+            $this->select_liste();
+        }
+        if (isset($this->command['enum'])) {
+            $this->select_enum();
+        }
+
+        // Si a ce stade on n'a pas de table, il y a un bug
+        if (!is_array($this->tableau)) {
+            $this->err = true;
+            spip_log('erreur datasource ' . var_export($command, true));
+        }
+
+        // {datapath query.results}
+        // extraire le chemin "query.results" du tableau de donnees
+        if (
+            !$this->err
+            and isset($this->command['datapath'])
+            and is_array($this->command['datapath'])
+        ) {
+            $this->select_datapath();
+        }
+
+        // tri {par x}
+        if ($this->command['orderby']) {
+            $this->select_orderby();
+        }
+
+        // grouper les resultats {fusion /x/y/z} ;
+        if ($this->command['groupby']) {
+            $this->select_groupby();
+        }
+
+        $this->rewind();
+        #var_dump($this->tableau);
+    }
+
+
+    /**
+     * Aller chercher les donnees de la boucle DATA
+     * depuis une source
+     * {source format, [URL], [arg2]...}
+     */
+    protected function select_source() {
+        # un peu crado : avant de charger le cache il faut charger
+        # les class indispensables, sinon PHP ne saura pas gerer
+        # l'objet en cache ; cf plugins/icalendar
+        # perf : pas de fonction table_to_array ! (table est deja un array)
+        if (
+            isset($this->command['sourcemode'])
+            and !in_array($this->command['sourcemode'], ['table', 'array', 'tableau'])
+        ) {
+            charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true);
+        }
+
+        # le premier argument peut etre un array, une URL etc.
+        $src = $this->command['source'][0];
+
+        # avons-nous un cache dispo ?
+        $cle = null;
+        if (is_string($src)) {
+            $cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true));
+        }
+
+        $cache = $this->cache_get($cle);
+        if (isset($this->command['datacache'])) {
+            $ttl = intval($this->command['datacache']);
+        }
+        if (
+            $cache
+            and ($cache['time'] + ($ttl ?? $cache['ttl'])
+                > time())
+            and !(_request('var_mode') === 'recalcul'
+                and include_spip('inc/autoriser')
+                and autoriser('recalcul')
+            )
+        ) {
+            $this->tableau = $cache['data'];
+        } else {
+            try {
+                if (
+                    isset($this->command['sourcemode'])
+                    and in_array(
+                        $this->command['sourcemode'],
+                        ['table', 'array', 'tableau']
+                    )
+                ) {
+                    if (
+                        is_array($a = $src)
+                        or (is_string($a)
+                            and $a = str_replace('"', '"', $a) # fragile!
+                            and is_array($a = @unserialize($a)))
+                    ) {
+                        $this->tableau = $a;
+                    }
+                } else {
+                    $data = $src;
+                    if (is_string($src)) {
+                        if (tester_url_absolue($src)) {
+                            include_spip('inc/distant');
+                            $data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]);
+                            $data = $data['page'] ?? '';
+                            if (!$data) {
+                                throw new Exception('404');
+                            }
+                            if (!isset($ttl)) {
+                                $ttl = 24 * 3600;
+                            }
+                        } elseif (@is_dir($src)) {
+                            $data = $src;
+                        } elseif (@is_readable($src) && @is_file($src)) {
+                            $data = spip_file_get_contents($src);
+                        }
+                        if (!isset($ttl)) {
+                            $ttl = 10;
+                        }
+                    }
+
+                    if (
+                        !$this->err
+                        and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true)
+                    ) {
+                        $args = $this->command['source'];
+                        $args[0] = $data;
+                        if (is_array($a = $data_to_array(...$args))) {
+                            $this->tableau = $a;
+                        }
+                    }
+                }
+
+                if (!is_array($this->tableau)) {
+                    $this->err = true;
+                }
+
+                if (!$this->err and isset($ttl) and $ttl > 0) {
+                    $this->cache_set($cle, $ttl);
+                }
+            } catch (Exception $e) {
+                $e = $e->getMessage();
+                $err = sprintf(
+                    "[%s, %s] $e",
+                    $src,
+                    $this->command['sourcemode']
+                );
+                erreur_squelette([$err, []]);
+                $this->err = true;
+            }
+        }
+
+        # en cas d'erreur, utiliser le cache si encore dispo
+        if (
+            $this->err
+            and $cache
+        ) {
+            $this->tableau = $cache['data'];
+            $this->err = false;
+        }
+    }
+
+
+    /**
+     * Retourne un tableau donne depuis un critère liste
+     *
+     * Critère `{liste X1, X2, X3}`
+     *
+     * @see critere_DATA_liste_dist()
+     *
+     **/
+    protected function select_liste() {
+        # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
+        if (!isset($this->command['liste'][1])) {
+            if (!is_array($this->command['liste'][0])) {
+                $this->command['liste'] = explode(',', $this->command['liste'][0]);
+            } else {
+                $this->command['liste'] = $this->command['liste'][0];
+            }
+        }
+        $this->tableau = $this->command['liste'];
+    }
+
+    /**
+     * Retourne un tableau donne depuis un critere liste
+     * Critere {enum Xmin, Xmax}
+     *
+     **/
+    protected function select_enum() {
+        # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
+        if (!isset($this->command['enum'][1])) {
+            if (!is_array($this->command['enum'][0])) {
+                $this->command['enum'] = explode(',', $this->command['enum'][0]);
+            } else {
+                $this->command['enum'] = $this->command['enum'][0];
+            }
+        }
+        if ((is_countable($this->command['enum']) ? count($this->command['enum']) : 0) >= 3) {
+            $enum = range(
+                array_shift($this->command['enum']),
+                array_shift($this->command['enum']),
+                array_shift($this->command['enum'])
+            );
+        } else {
+            $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']));
+        }
+        $this->tableau = $enum;
+    }
+
+
+    /**
+     * extraire le chemin "query.results" du tableau de donnees
+     * {datapath query.results}
+     *
+     **/
+    protected function select_datapath() {
+        $base = reset($this->command['datapath']);
+        if (strlen($base = ltrim(trim($base), '/'))) {
+            $this->tableau = table_valeur($this->tableau, $base);
+            if (!is_array($this->tableau)) {
+                $this->tableau = [];
+                $this->err = true;
+                spip_log("datapath '$base' absent");
+            }
+        }
+    }
+
+    /**
+     * Ordonner les resultats
+     * {par x}
+     *
+     **/
+    protected function select_orderby() {
+        $sortfunc = '';
+        $aleas = 0;
+        foreach ($this->command['orderby'] as $tri) {
+            // virer le / initial pour les criteres de la forme {par /xx}
+            if (preg_match(',^\.?([/\w:_-]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) {
+                $r = array_pad($r, 3, null);
+
+                // tri par cle
+                if ($r[1] == 'cle') {
+                    if (isset($r[2]) and $r[2]) {
+                        krsort($this->tableau);
+                    } else {
+                        ksort($this->tableau);
+                    }
+                } # {par hasard}
+                else {
+                    if ($r[1] == 'hasard') {
+                        $k = array_keys($this->tableau);
+                        shuffle($k);
+                        $v = [];
+                        foreach ($k as $cle) {
+                            $v[$cle] = $this->tableau[$cle];
+                        }
+                        $this->tableau = $v;
+                    } else {
+                        # {par valeur}
+                        if ($r[1] == 'valeur') {
+                            $tv = '%s';
+                        } # {par valeur/xx/yy} ??
+                        else {
+                            $tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')';
+                        }
+                        $sortfunc .= '
 					$a = ' . sprintf($tv, '$aa') . ';
 					$b = ' . sprintf($tv, '$bb') . ';
 					if ($a <> $b)
 						return ($a ' . (!empty($r[2]) ? '>' : '<') . ' $b) ? -1 : 1;';
-					}
-				}
-			}
-		}
-
-		if ($sortfunc) {
-			$sortfunc .= "\n return 0;";
-			uasort($this->tableau, fn($aa, $bb) => eval($sortfunc));
-		}
-	}
-
-
-	/**
-	 * Grouper les resultats
-	 * {fusion /x/y/z}
-	 *
-	 **/
-	protected function select_groupby() {
-		// virer le / initial pour les criteres de la forme {fusion /xx}
-		if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) {
-			$vu = [];
-			foreach ($this->tableau as $k => $v) {
-				$val = table_valeur($v, $fusion);
-				if (isset($vu[$val])) {
-					unset($this->tableau[$k]);
-				} else {
-					$vu[$val] = true;
-				}
-			}
-		}
-	}
-
-
-	/**
-	 * L'iterateur est-il encore valide ?
-	 *
-	 * @return bool
-	 */
-	public function valid(): bool {
-		return !is_null($this->cle);
-	}
-
-	/**
-	 * Retourner la valeur
-	 *
-	 * @return mixed
-	 */
-	#[\ReturnTypeWillChange]
-	public function current() {
-		return $this->valeur;
-	}
-
-	/**
-	 * Retourner la cle
-	 *
-	 * @return mixed
-	 */
-	#[\ReturnTypeWillChange]
-	public function key() {
-		return $this->cle;
-	}
-
-	/**
-	 * Passer a la valeur suivante
-	 *
-	 * @return void
-	 */
-	public function next(): void {
-		if ($this->valid()) {
-			$this->cle = key($this->tableau);
-			$this->valeur = current($this->tableau);
-			next($this->tableau);
-		}
-	}
-
-	/**
-	 * Compter le nombre total de resultats
-	 *
-	 * @return int
-	 */
-	public function count() {
-		if (is_null($this->total)) {
-			$this->total = count($this->tableau);
-		}
-
-		return $this->total;
-	}
+                    }
+                }
+            }
+        }
+
+        if ($sortfunc) {
+            $sortfunc .= "\n return 0;";
+            uasort($this->tableau, fn($aa, $bb) => eval($sortfunc));
+        }
+    }
+
+
+    /**
+     * Grouper les resultats
+     * {fusion /x/y/z}
+     *
+     **/
+    protected function select_groupby() {
+        // virer le / initial pour les criteres de la forme {fusion /xx}
+        if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) {
+            $vu = [];
+            foreach ($this->tableau as $k => $v) {
+                $val = table_valeur($v, $fusion);
+                if (isset($vu[$val])) {
+                    unset($this->tableau[$k]);
+                } else {
+                    $vu[$val] = true;
+                }
+            }
+        }
+    }
+
+
+    /**
+     * L'iterateur est-il encore valide ?
+     *
+     * @return bool
+     */
+    public function valid(): bool {
+        return !is_null($this->cle);
+    }
+
+    /**
+     * Retourner la valeur
+     *
+     * @return mixed
+     */
+    #[\ReturnTypeWillChange]
+    public function current() {
+        return $this->valeur;
+    }
+
+    /**
+     * Retourner la cle
+     *
+     * @return mixed
+     */
+    #[\ReturnTypeWillChange]
+    public function key() {
+        return $this->cle;
+    }
+
+    /**
+     * Passer a la valeur suivante
+     *
+     * @return void
+     */
+    public function next(): void {
+        if ($this->valid()) {
+            $this->cle = key($this->tableau);
+            $this->valeur = current($this->tableau);
+            next($this->tableau);
+        }
+    }
+
+    /**
+     * Compter le nombre total de resultats
+     *
+     * @return int
+     */
+    public function count() {
+        if (is_null($this->total)) {
+            $this->total = count($this->tableau);
+        }
+
+        return $this->total;
+    }
 }
 
 /*
@@ -587,7 +587,7 @@ 
  * @return array
  */
 function inc_file_to_array_dist($data) {
-	return preg_split('/\r?\n/', $data);
+    return preg_split('/\r?\n/', $data);
 }
 
 /**
@@ -596,9 +596,9 @@ 
  * @return array
  */
 function inc_plugins_to_array_dist() {
-	include_spip('inc/plugin');
+    include_spip('inc/plugin');
 
-	return liste_chemin_plugin_actifs();
+    return liste_chemin_plugin_actifs();
 }
 
 /**
@@ -608,7 +608,7 @@ 
  * @return array
  */
 function inc_xml_to_array_dist($data) {
-	return @XMLObjectToArray(new SimpleXmlIterator($data));
+    return @XMLObjectToArray(new SimpleXmlIterator($data));
 }
 
 /**
@@ -620,14 +620,14 @@ 
  *
  */
 function inc_object_to_array($object) {
-	if (!is_object($object) && !is_array($object)) {
-		return $object;
-	}
-	if (is_object($object)) {
-		$object = get_object_vars($object);
-	}
-
-	return array_map('inc_object_to_array', $object);
+    if (!is_object($object) && !is_array($object)) {
+        return $object;
+    }
+    if (is_object($object)) {
+        $object = get_object_vars($object);
+    }
+
+    return array_map('inc_object_to_array', $object);
 }
 
 /**
@@ -637,20 +637,20 @@ 
  * @return array|bool
  */
 function inc_sql_to_array_dist($data) {
-	# sortir le connecteur de $data
-	preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
-	$serveur = (string)$v[1];
-	$req = trim($v[2]);
-	if ($s = sql_query($req, $serveur)) {
-		$r = [];
-		while ($t = sql_fetch($s)) {
-			$r[] = $t;
-		}
-
-		return $r;
-	}
-
-	return false;
+    # sortir le connecteur de $data
+    preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
+    $serveur = (string)$v[1];
+    $req = trim($v[2]);
+    if ($s = sql_query($req, $serveur)) {
+        $r = [];
+        while ($t = sql_fetch($s)) {
+            $r[] = $t;
+        }
+
+        return $r;
+    }
+
+    return false;
 }
 
 /**
@@ -660,13 +660,13 @@ 
  * @return array|bool
  */
 function inc_json_to_array_dist($data) {
-	try {
-		$json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
-	} catch (JsonException $e) {
-		$json = null;
-		spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
-	}
-	return is_array($json) ? (array) $json : [];
+    try {
+        $json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
+    } catch (JsonException $e) {
+        $json = null;
+        spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
+    }
+    return is_array($json) ? (array) $json : [];
 }
 
 /**
@@ -676,30 +676,30 @@ 
  * @return array|bool
  */
 function inc_csv_to_array_dist($data) {
-	include_spip('inc/csv');
-	[$entete, $csv] = analyse_csv($data);
-	array_unshift($csv, $entete);
-
-	include_spip('inc/charsets');
-	$i = 1;
-	foreach ($entete as $k => $v) {
-		if (trim($v) == '') {
-			$v = 'col' . $i;
-		} // reperer des eventuelles cases vides
-		if (is_numeric($v) and $v < 0) {
-			$v = '__' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		if (is_numeric($v)) {
-			$v = '_' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		$v = strtolower(preg_replace(',\W+,', '_', translitteration($v)));
-		foreach ($csv as &$item) {
-			$item[$v] = &$item[$k];
-		}
-		$i++;
-	}
-
-	return $csv;
+    include_spip('inc/csv');
+    [$entete, $csv] = analyse_csv($data);
+    array_unshift($csv, $entete);
+
+    include_spip('inc/charsets');
+    $i = 1;
+    foreach ($entete as $k => $v) {
+        if (trim($v) == '') {
+            $v = 'col' . $i;
+        } // reperer des eventuelles cases vides
+        if (is_numeric($v) and $v < 0) {
+            $v = '__' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        if (is_numeric($v)) {
+            $v = '_' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        $v = strtolower(preg_replace(',\W+,', '_', translitteration($v)));
+        foreach ($csv as &$item) {
+            $item[$v] = &$item[$k];
+        }
+        $i++;
+    }
+
+    return $csv;
 }
 
 /**
@@ -709,13 +709,13 @@ 
  * @return array|bool
  */
 function inc_rss_to_array_dist($data) {
-	$tableau = null;
-	include_spip('inc/syndic');
-	if (is_array($rss = analyser_backend($data))) {
-		$tableau = $rss;
-	}
+    $tableau = null;
+    include_spip('inc/syndic');
+    if (is_array($rss = analyser_backend($data))) {
+        $tableau = $rss;
+    }
 
-	return $tableau;
+    return $tableau;
 }
 
 /**
@@ -725,9 +725,9 @@ 
  * @return array|bool
  */
 function inc_atom_to_array_dist($data) {
-	$rss_to_array = charger_fonction('rss_to_array', 'inc');
+    $rss_to_array = charger_fonction('rss_to_array', 'inc');
 
-	return $rss_to_array($data);
+    return $rss_to_array($data);
 }
 
 /**
@@ -738,12 +738,12 @@ 
  * @return array|bool
  */
 function inc_glob_to_array_dist($data) {
-	$a = glob(
-		$data,
-		GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
-	);
+    $a = glob(
+        $data,
+        GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
+    );
 
-	return $a ?: [];
+    return $a ?: [];
 }
 
 /**
@@ -754,14 +754,14 @@ 
  * @throws Exception
  */
 function inc_yaml_to_array_dist($data) {
-	include_spip('inc/yaml-mini');
-	if (!function_exists('yaml_decode')) {
-		throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
+    include_spip('inc/yaml-mini');
+    if (!function_exists('yaml_decode')) {
+        throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
 
-		return false;
-	}
+        return false;
+    }
 
-	return yaml_decode($data);
+    return yaml_decode($data);
 }
 
 
@@ -776,7 +776,7 @@ 
  * @return array|bool
  */
 function inc_pregfiles_to_array_dist($dir, $regexp = -1, $limit = 10000) {
-	return (array)preg_files($dir, $regexp, $limit);
+    return (array)preg_files($dir, $regexp, $limit);
 }
 
 /**
@@ -788,23 +788,23 @@ 
  * @return array|bool
  */
 function inc_ls_to_array_dist($data) {
-	$glob_to_array = charger_fonction('glob_to_array', 'inc');
-	$a = $glob_to_array($data);
-	foreach ($a as &$v) {
-		$b = (array)@stat($v);
-		foreach ($b as $k => $ignore) {
-			if (is_numeric($k)) {
-				unset($b[$k]);
-			}
-		}
-		$b['file'] = preg_replace('`/$`', '', $v) ;
-		$v = array_merge(
-			pathinfo($v),
-			$b
-		);
-	}
-
-	return $a;
+    $glob_to_array = charger_fonction('glob_to_array', 'inc');
+    $a = $glob_to_array($data);
+    foreach ($a as &$v) {
+        $b = (array)@stat($v);
+        foreach ($b as $k => $ignore) {
+            if (is_numeric($k)) {
+                unset($b[$k]);
+            }
+        }
+        $b['file'] = preg_replace('`/$`', '', $v) ;
+        $v = array_merge(
+            pathinfo($v),
+            $b
+        );
+    }
+
+    return $a;
 }
 
 /**
@@ -814,25 +814,25 @@ 
  * @return array|bool
  */
 function XMLObjectToArray($object) {
-	$xml_array = [];
-	for ($object->rewind(); $object->valid(); $object->next()) {
-		if (array_key_exists($key = $object->key(), $xml_array)) {
-			$key .= '-' . uniqid();
-		}
-		$vars = get_object_vars($object->current());
-		if (isset($vars['@attributes'])) {
-			foreach ($vars['@attributes'] as $k => $v) {
-				$xml_array[$key][$k] = $v;
-			}
-		}
-		if ($object->hasChildren()) {
-			$xml_array[$key][] = XMLObjectToArray(
-				$object->current()
-			);
-		} else {
-			$xml_array[$key][] = strval($object->current());
-		}
-	}
-
-	return $xml_array;
+    $xml_array = [];
+    for ($object->rewind(); $object->valid(); $object->next()) {
+        if (array_key_exists($key = $object->key(), $xml_array)) {
+            $key .= '-' . uniqid();
+        }
+        $vars = get_object_vars($object->current());
+        if (isset($vars['@attributes'])) {
+            foreach ($vars['@attributes'] as $k => $v) {
+                $xml_array[$key][$k] = $v;
+            }
+        }
+        if ($object->hasChildren()) {
+            $xml_array[$key][] = XMLObjectToArray(
+                $object->current()
+            );
+        } else {
+            $xml_array[$key][] = strval($object->current());
+        }
+    }
+
+    return $xml_array;
 }