spip / SPIP

prive/formulaires/editer_article.php

Indentation +93 added lines, -93 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/actions');
@@ -45,30 +45,30 @@ 
  *     Environnement du formulaire
  **/
 function formulaires_editer_article_charger_dist(
-	$id_article = 'new',
-	$id_rubrique = 0,
-	$retour = '',
-	$lier_trad = 0,
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $id_article = 'new',
+    $id_rubrique = 0,
+    $retour = '',
+    $lier_trad = 0,
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
-	$valeurs = formulaires_editer_objet_charger(
-		'article',
-		$id_article,
-		$id_rubrique,
-		$lier_trad,
-		$retour,
-		$config_fonc,
-		$row,
-		$hidden
-	);
+    $valeurs = formulaires_editer_objet_charger(
+        'article',
+        $id_article,
+        $id_rubrique,
+        $lier_trad,
+        $retour,
+        $config_fonc,
+        $row,
+        $hidden
+    );
 
-	if (intval($id_article) and !autoriser('modifier', 'article', intval($id_article))) {
-		$valeurs['editable'] = '';
-	}
+    if (intval($id_article) and !autoriser('modifier', 'article', intval($id_article))) {
+        $valeurs['editable'] = '';
+    }
 
-	return $valeurs;
+    return $valeurs;
 }
 
 /**
@@ -93,15 +93,15 @@ 
  *     Hash du formulaire
  */
 function formulaires_editer_article_identifier_dist(
-	$id_article = 'new',
-	$id_rubrique = 0,
-	$retour = '',
-	$lier_trad = 0,
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $id_article = 'new',
+    $id_rubrique = 0,
+    $retour = '',
+    $lier_trad = 0,
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
-	return serialize([intval($id_article), $lier_trad]);
+    return serialize([intval($id_article), $lier_trad]);
 }
 
 /**
@@ -114,12 +114,12 @@ 
  */
 function articles_edit_config(array $row): array {
 
-	$config = [];
-	$config['lignes'] = 8;
-	$config['langue'] = $GLOBALS['spip_lang'];
-	$config['restreint'] = ($row['statut'] === 'publie');
+    $config = [];
+    $config['lignes'] = 8;
+    $config['langue'] = $GLOBALS['spip_lang'];
+    $config['restreint'] = ($row['statut'] === 'publie');
 
-	return $config;
+    return $config;
 }
 
 /**
@@ -145,43 +145,43 @@ 
  *     Erreurs du formulaire
  **/
 function formulaires_editer_article_verifier_dist(
-	$id_article = 'new',
-	$id_rubrique = 0,
-	$retour = '',
-	$lier_trad = 0,
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $id_article = 'new',
+    $id_rubrique = 0,
+    $retour = '',
+    $lier_trad = 0,
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
-	// auto-renseigner le titre si il n'existe pas
-	titre_automatique('titre', ['descriptif', 'chapo', 'texte']);
-	if (!_request('id_parent') and !intval($id_article)) {
-		$valeurs = formulaires_editer_objet_charger(
-			'article',
-			$id_article,
-			$id_rubrique,
-			$lier_trad,
-			$retour,
-			$config_fonc,
-			$row,
-			$hidden
-		);
-		set_request('id_parent', $valeurs['id_parent']);
-	}
-	// on ne demande pas le titre obligatoire : il sera rempli a la volee dans editer_article si vide
-	$erreurs = formulaires_editer_objet_verifier('article', $id_article, ['id_parent']);
-	// si on utilise le formulaire dans le public
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-	if (
-		!isset($erreurs['id_parent'])
-		and !autoriser('creerarticledans', 'rubrique', _request('id_parent'))
-	) {
-		$erreurs['id_parent'] = _T('info_creerdansrubrique_non_autorise');
-	}
+    // auto-renseigner le titre si il n'existe pas
+    titre_automatique('titre', ['descriptif', 'chapo', 'texte']);
+    if (!_request('id_parent') and !intval($id_article)) {
+        $valeurs = formulaires_editer_objet_charger(
+            'article',
+            $id_article,
+            $id_rubrique,
+            $lier_trad,
+            $retour,
+            $config_fonc,
+            $row,
+            $hidden
+        );
+        set_request('id_parent', $valeurs['id_parent']);
+    }
+    // on ne demande pas le titre obligatoire : il sera rempli a la volee dans editer_article si vide
+    $erreurs = formulaires_editer_objet_verifier('article', $id_article, ['id_parent']);
+    // si on utilise le formulaire dans le public
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+    if (
+        !isset($erreurs['id_parent'])
+        and !autoriser('creerarticledans', 'rubrique', _request('id_parent'))
+    ) {
+        $erreurs['id_parent'] = _T('info_creerdansrubrique_non_autorise');
+    }
 
-	return $erreurs;
+    return $erreurs;
 }
 
 /**
@@ -207,29 +207,29 @@ 
  *     Retours des traitements
  **/
 function formulaires_editer_article_traiter_dist(
-	$id_article = 'new',
-	$id_rubrique = 0,
-	$retour = '',
-	$lier_trad = 0,
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $id_article = 'new',
+    $id_rubrique = 0,
+    $retour = '',
+    $lier_trad = 0,
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
-	// ici on ignore changer_lang qui est poste en cas de trad,
-	// car l'heuristique du choix de la langue est pris en charge par article_inserer
-	// en fonction de la config du site et de la rubrique choisie
-	if (!$lier_trad) {
-		set_request('changer_lang');
-	}
+    // ici on ignore changer_lang qui est poste en cas de trad,
+    // car l'heuristique du choix de la langue est pris en charge par article_inserer
+    // en fonction de la config du site et de la rubrique choisie
+    if (!$lier_trad) {
+        set_request('changer_lang');
+    }
 
-	return formulaires_editer_objet_traiter(
-		'article',
-		$id_article,
-		$id_rubrique,
-		$lier_trad,
-		$retour,
-		$config_fonc,
-		$row,
-		$hidden
-	);
+    return formulaires_editer_objet_traiter(
+        'article',
+        $id_article,
+        $id_rubrique,
+        $lier_trad,
+        $retour,
+        $config_fonc,
+        $row,
+        $hidden
+    );
 }

ecrire/public/quete.php

Indentation +431 added lines, -431 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -32,16 +32,16 @@ 
  * @return array|bool|null
  */
 function quete_virtuel($id_article, $connect) {
-	return sql_getfetsel(
-		'virtuel',
-		'spip_articles',
-		['id_article=' . intval($id_article), "statut='publie'"],
-		'',
-		'',
-		'',
-		'',
-		$connect
-	);
+    return sql_getfetsel(
+        'virtuel',
+        'spip_articles',
+        ['id_article=' . intval($id_article), "statut='publie'"],
+        '',
+        '',
+        '',
+        '',
+        $connect
+    );
 }
 
 /**
@@ -56,41 +56,41 @@ 
  * @return array
  */
 function quete_parent_lang($table, $id, string $connect = '') {
-	static $cache_quete = [];
-
-	if (!isset($cache_quete[$connect][$table][$id])) {
-		if (!isset($cache_quete[$connect][$table]['_select'])) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			if (
-				!$desc = $trouver_table(
-					$table,
-					$connect
-				) or !isset($desc['field']['id_rubrique'])
-			) {
-				// pas de parent rubrique, on passe
-				$cache_quete[$connect][$table]['_select'] = false;
-			} else {
-				$select = ($table == 'spip_rubriques' ? 'id_parent' : 'id_rubrique');
-				$select .= isset($desc['field']['lang']) ? ', lang' : '';
-				$cache_quete[$connect][$table]['_select'] = $select;
-				$cache_quete[$connect][$table]['_id'] = id_table_objet(objet_type($table));
-			}
-		}
-		if ($cache_quete[$connect][$table]['_select']) {
-			$cache_quete[$connect][$table][$id] = sql_fetsel(
-				$cache_quete[$connect][$table]['_select'],
-				$table,
-				$cache_quete[$connect][$table]['_id'] . '=' . intval($id),
-				'',
-				'',
-				'',
-				'',
-				$connect
-			);
-		}
-	}
-
-	return $cache_quete[$connect][$table][$id] ?? null;
+    static $cache_quete = [];
+
+    if (!isset($cache_quete[$connect][$table][$id])) {
+        if (!isset($cache_quete[$connect][$table]['_select'])) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            if (
+                !$desc = $trouver_table(
+                    $table,
+                    $connect
+                ) or !isset($desc['field']['id_rubrique'])
+            ) {
+                // pas de parent rubrique, on passe
+                $cache_quete[$connect][$table]['_select'] = false;
+            } else {
+                $select = ($table == 'spip_rubriques' ? 'id_parent' : 'id_rubrique');
+                $select .= isset($desc['field']['lang']) ? ', lang' : '';
+                $cache_quete[$connect][$table]['_select'] = $select;
+                $cache_quete[$connect][$table]['_id'] = id_table_objet(objet_type($table));
+            }
+        }
+        if ($cache_quete[$connect][$table]['_select']) {
+            $cache_quete[$connect][$table][$id] = sql_fetsel(
+                $cache_quete[$connect][$table]['_select'],
+                $table,
+                $cache_quete[$connect][$table]['_id'] . '=' . intval($id),
+                '',
+                '',
+                '',
+                '',
+                $connect
+            );
+        }
+    }
+
+    return $cache_quete[$connect][$table][$id] ?? null;
 }
 
 
@@ -107,11 +107,11 @@ 
  * @return int
  */
 function quete_parent($id_rubrique, string $connect = '') {
-	if (!$id_rubrique = intval($id_rubrique)) {
-		return 0;
-	}
-	$id_parent = quete_parent_lang('spip_rubriques', $id_rubrique, $connect);
-	return $id_parent ? $id_parent['id_parent'] : 0;
+    if (!$id_rubrique = intval($id_rubrique)) {
+        return 0;
+    }
+    $id_parent = quete_parent_lang('spip_rubriques', $id_rubrique, $connect);
+    return $id_parent ? $id_parent['id_parent'] : 0;
 }
 
 /**
@@ -127,9 +127,9 @@ 
  * @return int
  */
 function quete_rubrique($id_article, $serveur) {
-	$id_parent = quete_parent_lang('spip_articles', $id_article, $serveur);
+    $id_parent = quete_parent_lang('spip_articles', $id_article, $serveur);
 
-	return $id_parent['id_rubrique'] ?? 0;
+    return $id_parent['id_rubrique'] ?? 0;
 }
 
 
@@ -143,13 +143,13 @@ 
  * @return int
  */
 function quete_profondeur($id, string $connect = '') {
-	$n = 0;
-	while ($id) {
-		$n++;
-		$id = quete_parent($id, $connect);
-	}
+    $n = 0;
+    while ($id) {
+        $n++;
+        $id = quete_parent($id, $connect);
+    }
 
-	return $n;
+    return $n;
 }
 
 
@@ -165,15 +165,15 @@ 
  *     Morceau de la requête SQL testant la date
  */
 function quete_condition_postdates($champ_date, $serveur = '', $ignore_previsu = false) {
-	if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and !$ignore_previsu) {
-		return '1=1';
-	}
-
-	return
-		(isset($GLOBALS['meta']['date_prochain_postdate'])
-			and $GLOBALS['meta']['date_prochain_postdate'] > time())
-			? "$champ_date<" . sql_quote(date('Y-m-d H:i:s', $GLOBALS['meta']['date_prochain_postdate']), $serveur)
-			: '1=1';
+    if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and !$ignore_previsu) {
+        return '1=1';
+    }
+
+    return
+        (isset($GLOBALS['meta']['date_prochain_postdate'])
+            and $GLOBALS['meta']['date_prochain_postdate'] > time())
+            ? "$champ_date<" . sql_quote(date('Y-m-d H:i:s', $GLOBALS['meta']['date_prochain_postdate']), $serveur)
+            : '1=1';
 }
 
 
@@ -193,101 +193,101 @@ 
  * @return array|string
  */
 function quete_condition_statut($mstatut, $previsu, $publie, $serveur = '', $ignore_previsu = false) {
-	static $cond = [];
-	$key = func_get_args();
-	$key = implode('-', $key);
-	if (isset($cond[$key])) {
-		return $cond[$key];
-	}
-
-	$liste_statuts = $publie;
-	if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and !$ignore_previsu) {
-		$liste_statuts = $previsu;
-	}
-	$not = false;
-	if (strncmp($liste_statuts, '!', 1) == 0) {
-		$not = true;
-		$liste_statuts = substr($liste_statuts, 1);
-	}
-	// '' => ne rien afficher, '!'=> ne rien filtrer
-	if (!strlen($liste_statuts)) {
-		return $cond[$key] = ($not ? '1=1' : '0=1');
-	}
-
-	$liste_statuts = explode(',', $liste_statuts);
-	$where = [];
-	foreach ($liste_statuts as $k => $v) {
-		// filtrage /auteur pour limiter les objets d'un statut (prepa en general)
-		// a ceux de l'auteur identifie
-		if (strpos($v, '/') !== false) {
-			$v = explode('/', $v);
-			$filtre = end($v);
-			$v = reset($v);
-			$v = preg_replace(',\W,', '', $v);
-			if (
-				$filtre == 'auteur'
-				and (strpos($mstatut, '.') !== false)
-				and $objet = explode('.', $mstatut)
-				and $id_table = reset($objet)
-				and $objet = objet_type($id_table)
-			) {
-				$w = "$mstatut<>" . sql_quote($v);
-
-				// retrouver l’id_auteur qui a filé un lien de prévisu éventuellement,
-				// sinon l’auteur en session
-				include_spip('inc/securiser_action');
-				if ($desc = decrire_token_previsu()) {
-					$id_auteur = $desc['id_auteur'];
-				} elseif (isset($GLOBALS['visiteur_session']['id_auteur'])) {
-					$id_auteur = intval($GLOBALS['visiteur_session']['id_auteur']);
-				} else {
-					$id_auteur = null;
-				}
-
-				// dans ce cas (admin en general), pas de filtrage sur ce statut
-				if (!autoriser('previsualiser' . $v, $objet, '', $id_auteur)) {
-					// si pas d'auteur identifie pas de sous-requete car pas d'article qui matche
-					if (!$id_auteur) {
-						$where[] = $w;
-					} else {
-						$primary = id_table_objet($objet);
-						$where[] = "($w OR $id_table.$primary IN (" . sql_get_select(
-							'ssss.id_objet',
-							'spip_auteurs_liens AS ssss',
-							'ssss.objet=' . sql_quote($objet) . ' AND ssss.id_auteur=' . intval($id_auteur),
-							'',
-							'',
-							'',
-							'',
-							$serveur
-						) . '))';
-					}
-				}
-			} // ignorer ce statut si on ne sait pas comment le filtrer
-			else {
-				$v = '';
-			}
-		}
-		// securite
-		$liste_statuts[$k] = preg_replace(',\W,', '', $v);
-	}
-	$liste_statuts = array_filter($liste_statuts);
-	if (count($liste_statuts) == 1) {
-		$where[] = ['=', $mstatut, sql_quote(reset($liste_statuts), $serveur)];
-	} else {
-		$where[] = sql_in($mstatut, $liste_statuts, $not, $serveur);
-	}
-
-	while (count($where) > 1) {
-		$and = ['AND', array_pop($where), array_pop($where)];
-		$where[] = $and;
-	}
-	$cond[$key] = reset($where);
-	if ($not) {
-		$cond[$key] = ['NOT', $cond[$key]];
-	}
-
-	return $cond[$key];
+    static $cond = [];
+    $key = func_get_args();
+    $key = implode('-', $key);
+    if (isset($cond[$key])) {
+        return $cond[$key];
+    }
+
+    $liste_statuts = $publie;
+    if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and !$ignore_previsu) {
+        $liste_statuts = $previsu;
+    }
+    $not = false;
+    if (strncmp($liste_statuts, '!', 1) == 0) {
+        $not = true;
+        $liste_statuts = substr($liste_statuts, 1);
+    }
+    // '' => ne rien afficher, '!'=> ne rien filtrer
+    if (!strlen($liste_statuts)) {
+        return $cond[$key] = ($not ? '1=1' : '0=1');
+    }
+
+    $liste_statuts = explode(',', $liste_statuts);
+    $where = [];
+    foreach ($liste_statuts as $k => $v) {
+        // filtrage /auteur pour limiter les objets d'un statut (prepa en general)
+        // a ceux de l'auteur identifie
+        if (strpos($v, '/') !== false) {
+            $v = explode('/', $v);
+            $filtre = end($v);
+            $v = reset($v);
+            $v = preg_replace(',\W,', '', $v);
+            if (
+                $filtre == 'auteur'
+                and (strpos($mstatut, '.') !== false)
+                and $objet = explode('.', $mstatut)
+                and $id_table = reset($objet)
+                and $objet = objet_type($id_table)
+            ) {
+                $w = "$mstatut<>" . sql_quote($v);
+
+                // retrouver l’id_auteur qui a filé un lien de prévisu éventuellement,
+                // sinon l’auteur en session
+                include_spip('inc/securiser_action');
+                if ($desc = decrire_token_previsu()) {
+                    $id_auteur = $desc['id_auteur'];
+                } elseif (isset($GLOBALS['visiteur_session']['id_auteur'])) {
+                    $id_auteur = intval($GLOBALS['visiteur_session']['id_auteur']);
+                } else {
+                    $id_auteur = null;
+                }
+
+                // dans ce cas (admin en general), pas de filtrage sur ce statut
+                if (!autoriser('previsualiser' . $v, $objet, '', $id_auteur)) {
+                    // si pas d'auteur identifie pas de sous-requete car pas d'article qui matche
+                    if (!$id_auteur) {
+                        $where[] = $w;
+                    } else {
+                        $primary = id_table_objet($objet);
+                        $where[] = "($w OR $id_table.$primary IN (" . sql_get_select(
+                            'ssss.id_objet',
+                            'spip_auteurs_liens AS ssss',
+                            'ssss.objet=' . sql_quote($objet) . ' AND ssss.id_auteur=' . intval($id_auteur),
+                            '',
+                            '',
+                            '',
+                            '',
+                            $serveur
+                        ) . '))';
+                    }
+                }
+            } // ignorer ce statut si on ne sait pas comment le filtrer
+            else {
+                $v = '';
+            }
+        }
+        // securite
+        $liste_statuts[$k] = preg_replace(',\W,', '', $v);
+    }
+    $liste_statuts = array_filter($liste_statuts);
+    if (count($liste_statuts) == 1) {
+        $where[] = ['=', $mstatut, sql_quote(reset($liste_statuts), $serveur)];
+    } else {
+        $where[] = sql_in($mstatut, $liste_statuts, $not, $serveur);
+    }
+
+    while (count($where) > 1) {
+        $and = ['AND', array_pop($where), array_pop($where)];
+        $where[] = $and;
+    }
+    $cond[$key] = reset($where);
+    if ($not) {
+        $cond[$key] = ['NOT', $cond[$key]];
+    }
+
+    return $cond[$key];
 }
 
 /**
@@ -298,7 +298,7 @@ 
  * @return array|bool|null
  */
 function quete_fichier($id_document, $serveur = '') {
-	return sql_getfetsel('fichier', 'spip_documents', ('id_document=' . intval($id_document)), '', [], '', '', $serveur);
+    return sql_getfetsel('fichier', 'spip_documents', ('id_document=' . intval($id_document)), '', [], '', '', $serveur);
 }
 
 /**
@@ -309,7 +309,7 @@ 
  * @return array|bool
  */
 function quete_document($id_document, $serveur = '') {
-	return sql_fetsel('*', 'spip_documents', ('id_document=' . intval($id_document)), '', [], '', '', $serveur);
+    return sql_fetsel('*', 'spip_documents', ('id_document=' . intval($id_document)), '', [], '', '', $serveur);
 }
 
 /**
@@ -320,7 +320,7 @@ 
  * @return array|bool|null
  */
 function quete_meta($nom, $serveur) {
-	return sql_getfetsel('valeur', 'spip_meta', 'nom=' . sql_quote($nom), '', '', '', '', $serveur);
+    return sql_getfetsel('valeur', 'spip_meta', 'nom=' . sql_quote($nom), '', '', '', '', $serveur);
 }
 
 /**
@@ -346,72 +346,72 @@ 
  *     Retourne soit un tableau, soit le chemin du fichier.
  */
 function quete_logo($cle_objet, $onoff, $id, $id_rubrique, $flag = false) {
-	include_spip('base/objets');
-	$nom = strtolower($onoff);
-
-	$cle_objet = id_table_objet($cle_objet);
-
-	while (1) {
-		$objet = objet_type($cle_objet);
-
-		$on = quete_logo_objet($id, $objet, $nom);
-
-		if ($on) {
-			if ($flag) {
-				return $on['fichier'];
-			} else {
-				$taille = @spip_getimagesize($on['chemin']);
-
-				// Si on a déjà demandé un survol directement ($onoff = off)
-				// ou qu'on a demandé uniquement le normal ($onoff = on)
-				// alors on ne cherche pas du tout le survol ici
-				if ($onoff != 'ON') {
-					$off = '';
-				} else {
-					// Sinon, c'est qu'on demande normal ET survol à la fois, donc on cherche maintenant le survol
-					$off = quete_logo_objet($id, $objet, 'off');
-				}
-
-				// on retourne une url du type IMG/artonXX?timestamp
-				// qui permet de distinguer le changement de logo
-				// et placer un expire sur le dossier IMG/
-				$res = [
-					$on['chemin'] . ($on['timestamp'] ? "?{$on['timestamp']}" : ''),
-					($off ? $off['chemin'] . ($off['timestamp'] ? "?{$off['timestamp']}" : '') : ''),
-					(!$taille ? '' : (' ' . $taille[3]))
-				];
-				$res['src'] = $res[0];
-				$res['logo_on'] = $res[0];
-				$res['logo_off'] = $res[1];
-				$res['width'] = ($taille ? $taille[0] : '');
-				$res['height'] = ($taille ? $taille[1] : '');
-				$res['fichier'] = $on['fichier'];
-				$res['titre'] = ($on['titre'] ?? '');
-				$res['descriptif'] = ($on['descriptif'] ?? '');
-				$res['credits'] = ($on['credits'] ?? '');
-				$res['alt'] = ($on['alt'] ?? '');
-				$res['id'] = ($on['id_document'] ?? 0);
-
-				return $res;
-			}
-		} else {
-			if (defined('_LOGO_RUBRIQUE_DESACTIVER_HERITAGE')) {
-				return '';
-			} else {
-				if ($id_rubrique) {
-					$cle_objet = 'id_rubrique';
-					$id = $id_rubrique;
-					$id_rubrique = 0;
-				} else {
-					if ($id and $cle_objet == 'id_rubrique') {
-						$id = quete_parent($id);
-					} else {
-						return '';
-					}
-				}
-			}
-		}
-	}
+    include_spip('base/objets');
+    $nom = strtolower($onoff);
+
+    $cle_objet = id_table_objet($cle_objet);
+
+    while (1) {
+        $objet = objet_type($cle_objet);
+
+        $on = quete_logo_objet($id, $objet, $nom);
+
+        if ($on) {
+            if ($flag) {
+                return $on['fichier'];
+            } else {
+                $taille = @spip_getimagesize($on['chemin']);
+
+                // Si on a déjà demandé un survol directement ($onoff = off)
+                // ou qu'on a demandé uniquement le normal ($onoff = on)
+                // alors on ne cherche pas du tout le survol ici
+                if ($onoff != 'ON') {
+                    $off = '';
+                } else {
+                    // Sinon, c'est qu'on demande normal ET survol à la fois, donc on cherche maintenant le survol
+                    $off = quete_logo_objet($id, $objet, 'off');
+                }
+
+                // on retourne une url du type IMG/artonXX?timestamp
+                // qui permet de distinguer le changement de logo
+                // et placer un expire sur le dossier IMG/
+                $res = [
+                    $on['chemin'] . ($on['timestamp'] ? "?{$on['timestamp']}" : ''),
+                    ($off ? $off['chemin'] . ($off['timestamp'] ? "?{$off['timestamp']}" : '') : ''),
+                    (!$taille ? '' : (' ' . $taille[3]))
+                ];
+                $res['src'] = $res[0];
+                $res['logo_on'] = $res[0];
+                $res['logo_off'] = $res[1];
+                $res['width'] = ($taille ? $taille[0] : '');
+                $res['height'] = ($taille ? $taille[1] : '');
+                $res['fichier'] = $on['fichier'];
+                $res['titre'] = ($on['titre'] ?? '');
+                $res['descriptif'] = ($on['descriptif'] ?? '');
+                $res['credits'] = ($on['credits'] ?? '');
+                $res['alt'] = ($on['alt'] ?? '');
+                $res['id'] = ($on['id_document'] ?? 0);
+
+                return $res;
+            }
+        } else {
+            if (defined('_LOGO_RUBRIQUE_DESACTIVER_HERITAGE')) {
+                return '';
+            } else {
+                if ($id_rubrique) {
+                    $cle_objet = 'id_rubrique';
+                    $id = $id_rubrique;
+                    $id_rubrique = 0;
+                } else {
+                    if ($id and $cle_objet == 'id_rubrique') {
+                        $id = quete_parent($id);
+                    } else {
+                        return '';
+                    }
+                }
+            }
+        }
+    }
 }
 
 /**
@@ -426,43 +426,43 @@ 
  * @return bool|array
  **/
 function quete_logo_objet($id_objet, $objet, $mode) {
-	static $chercher_logo;
-	if (is_null($chercher_logo)) {
-		$chercher_logo = charger_fonction('chercher_logo', 'inc');
-	}
-	$cle_objet = id_table_objet($objet);
-
-	// On cherche pas la méthode classique
-	$infos_logo = $chercher_logo($id_objet, $cle_objet, $mode);
-
-	// Si la méthode classique a trouvé quelque chose, on utilise le nouveau format
-	if (!empty($infos_logo)) {
-		$infos = [
-			'chemin' => $infos_logo[0],
-			'timestamp' => $infos_logo[4],
-			'id_document' => ($infos_logo[5]['id_document'] ?? ''),
-		];
-		foreach (['fichier', 'titre', 'descriptif', 'credits', 'alt'] as $champ) {
-			$infos[$champ] = ($infos_logo[5][$champ] ?? '');
-		}
-		$infos_logo = $infos;
-	}
-
-	// On passe cette recherche de logo dans un pipeline
-	$infos_logo = pipeline(
-		'quete_logo_objet',
-		[
-			'args' => [
-				'id_objet' => $id_objet,
-				'objet' => $objet,
-				'cle_objet' => $cle_objet,
-				'mode' => $mode,
-			],
-			'data' => $infos_logo,
-		]
-	);
-
-	return $infos_logo;
+    static $chercher_logo;
+    if (is_null($chercher_logo)) {
+        $chercher_logo = charger_fonction('chercher_logo', 'inc');
+    }
+    $cle_objet = id_table_objet($objet);
+
+    // On cherche pas la méthode classique
+    $infos_logo = $chercher_logo($id_objet, $cle_objet, $mode);
+
+    // Si la méthode classique a trouvé quelque chose, on utilise le nouveau format
+    if (!empty($infos_logo)) {
+        $infos = [
+            'chemin' => $infos_logo[0],
+            'timestamp' => $infos_logo[4],
+            'id_document' => ($infos_logo[5]['id_document'] ?? ''),
+        ];
+        foreach (['fichier', 'titre', 'descriptif', 'credits', 'alt'] as $champ) {
+            $infos[$champ] = ($infos_logo[5][$champ] ?? '');
+        }
+        $infos_logo = $infos;
+    }
+
+    // On passe cette recherche de logo dans un pipeline
+    $infos_logo = pipeline(
+        'quete_logo_objet',
+        [
+            'args' => [
+                'id_objet' => $id_objet,
+                'objet' => $objet,
+                'cle_objet' => $cle_objet,
+                'mode' => $mode,
+            ],
+            'data' => $infos_logo,
+        ]
+    );
+
+    return $infos_logo;
 }
 
 /**
@@ -475,25 +475,25 @@ 
  * @return bool|string
  */
 function quete_logo_file($row, $connect = null) {
-	include_spip('inc/documents');
-	$logo = vignette_logo_document($row, $connect);
-	if (!$logo) {
-		$logo = image_du_document($row, $connect);
-	}
-	if (!$logo) {
-		$f = charger_fonction('vignette', 'inc');
-		$logo = $f($row['extension'], false);
-	}
-	// si c'est une vignette type doc, la renvoyer direct
-	if (
-		strcmp($logo, _DIR_PLUGINS) == 0
-		or strcmp($logo, _DIR_PLUGINS_DIST) == 0
-		or strcmp($logo, _DIR_RACINE . 'prive/') == 0
-	) {
-		return $logo;
-	}
-
-	return get_spip_doc($logo);
+    include_spip('inc/documents');
+    $logo = vignette_logo_document($row, $connect);
+    if (!$logo) {
+        $logo = image_du_document($row, $connect);
+    }
+    if (!$logo) {
+        $f = charger_fonction('vignette', 'inc');
+        $logo = $f($row['extension'], false);
+    }
+    // si c'est une vignette type doc, la renvoyer direct
+    if (
+        strcmp($logo, _DIR_PLUGINS) == 0
+        or strcmp($logo, _DIR_PLUGINS_DIST) == 0
+        or strcmp($logo, _DIR_RACINE . 'prive/') == 0
+    ) {
+        return $logo;
+    }
+
+    return get_spip_doc($logo);
 }
 
 /**
@@ -521,20 +521,20 @@ 
  */
 function quete_logo_document($row, $lien, $align, $mode_logo, $x, $y, string $connect = '') {
 
-	include_spip('inc/documents');
-	$logo = '';
-	if (!in_array($mode_logo, ['icone', 'apercu'])) {
-		$logo = vignette_logo_document($row, $connect);
-	}
-	// si on veut explicitement la vignette, ne rien renvoyer si il n'y en a pas
-	if ($mode_logo == 'vignette' and !$logo) {
-		return '';
-	}
-	if ($mode_logo == 'icone') {
-		$row['fichier'] = '';
-	}
-
-	return vignette_automatique($logo, $row, $lien, $x, $y, $align, null, $connect);
+    include_spip('inc/documents');
+    $logo = '';
+    if (!in_array($mode_logo, ['icone', 'apercu'])) {
+        $logo = vignette_logo_document($row, $connect);
+    }
+    // si on veut explicitement la vignette, ne rien renvoyer si il n'y en a pas
+    if ($mode_logo == 'vignette' and !$logo) {
+        return '';
+    }
+    if ($mode_logo == 'icone') {
+        $row['fichier'] = '';
+    }
+
+    return vignette_automatique($logo, $row, $lien, $x, $y, $align, null, $connect);
 }
 
 /**
@@ -546,26 +546,26 @@ 
  */
 function quete_html_logo($logo, $align, $lien) {
 
-	if (!is_array($logo)) {
-		return '';
-	}
-
-	$contexte = [];
-	foreach ($logo as $k => $v) {
-		if (!is_numeric($k)) {
-			$contexte[$k] = $v;
-		}
-	}
-
-	foreach (['titre', 'descriptif', 'credits', 'alt'] as $champ) {
-		if (!empty($contexte[$champ])) {
-			$contexte[$champ] = appliquer_traitement_champ($contexte[$champ] , $champ, 'document');
-		}
-	}
-
-	$contexte['align'] = $align;
-	$contexte['lien'] = $lien;
-	return recuperer_fond('modeles/logo', $contexte);
+    if (!is_array($logo)) {
+        return '';
+    }
+
+    $contexte = [];
+    foreach ($logo as $k => $v) {
+        if (!is_numeric($k)) {
+            $contexte[$k] = $v;
+        }
+    }
+
+    foreach (['titre', 'descriptif', 'credits', 'alt'] as $champ) {
+        if (!empty($contexte[$champ])) {
+            $contexte[$champ] = appliquer_traitement_champ($contexte[$champ] , $champ, 'document');
+        }
+    }
+
+    $contexte['align'] = $align;
+    $contexte['lien'] = $lien;
+    return recuperer_fond('modeles/logo', $contexte);
 }
 
 /**
@@ -579,14 +579,14 @@ 
  * @return string|false
  */
 function document_spip_externe($fichier, $connect) {
-	if ($connect) {
-		$site = quete_meta('adresse_site', $connect);
-		if ($site) {
-			$dir = quete_meta('dir_img', $connect);
-			return "$site/$dir$fichier";
-		}
-	}
-	return false;
+    if ($connect) {
+        $site = quete_meta('adresse_site', $connect);
+        if ($site) {
+            $dir = quete_meta('dir_img', $connect);
+            return "$site/$dir$fichier";
+        }
+    }
+    return false;
 }
 
 /**
@@ -600,23 +600,23 @@ 
  */
 function vignette_logo_document($row, string $connect = '') {
 
-	if (!$row or empty($row['id_vignette'])) {
-		return '';
-	}
-	$fichier = quete_fichier($row['id_vignette'], $connect);
-	if ($url = document_spip_externe($fichier, $connect)) {
-		return $url;
-	}
-
-	$f = get_spip_doc($fichier);
-	if ($f and @file_exists($f)) {
-		return $f;
-	}
-	if ($row['mode'] !== 'vignette') {
-		return '';
-	}
-
-	return generer_objet_url($row['id_document'], 'document', '', '', null, '', $connect);
+    if (!$row or empty($row['id_vignette'])) {
+        return '';
+    }
+    $fichier = quete_fichier($row['id_vignette'], $connect);
+    if ($url = document_spip_externe($fichier, $connect)) {
+        return $url;
+    }
+
+    $f = get_spip_doc($fichier);
+    if ($f and @file_exists($f)) {
+        return $f;
+    }
+    if ($row['mode'] !== 'vignette') {
+        return '';
+    }
+
+    return generer_objet_url($row['id_document'], 'document', '', '', null, '', $connect);
 }
 
 /**
@@ -632,66 +632,66 @@ 
  * @return bool|string
  */
 function calcul_exposer($id, $prim, $reference, $parent, $type, string $connect = '') {
-	static $exposer = [];
-
-	// Que faut-il exposer ? Tous les elements de $reference
-	// ainsi que leur hierarchie ; on ne fait donc ce calcul
-	// qu'une fois (par squelette) et on conserve le resultat
-	// en static.
-	if (!isset($exposer[$m = md5(serialize($reference))][$prim])) {
-		$principal = $reference[$type] ?? $reference["@$type"] ?? '';
-		// le parent fournit en argument est le parent de $id, pas celui de $principal
-		// il n'est donc pas utile
-		$parent = 0;
-		if (!$principal) { // regarder si un enfant est dans le contexte, auquel cas il expose peut etre le parent courant
-			$enfants = ['id_rubrique' => ['id_article'], 'id_groupe' => ['id_mot']];
-			if (isset($enfants[$type])) {
-				foreach ($enfants[$type] as $t) {
-					if (
-						isset($reference[$t])
-						// cas de la reference donnee dynamiquement par la pagination
-						or isset($reference["@$t"])
-					) {
-						$type = $t;
-						$principal = $reference[$type] ?? $reference["@$type"];
-						continue;
-					}
-				}
-			}
-		}
-		$exposer[$m][$type] = [];
-		if ($principal) {
-			$principaux = is_array($principal) ? $principal : [$principal];
-			foreach ($principaux as $principal) {
-				$exposer[$m][$type][$principal] = true;
-				if ($type == 'id_mot') {
-					if (!$parent) {
-						$parent = sql_getfetsel('id_groupe', 'spip_mots', 'id_mot=' . intval($principal), '', '', '', '', $connect);
-					}
-					if ($parent) {
-						$exposer[$m]['id_groupe'][$parent] = true;
-					}
-				} else {
-					if ($type != 'id_groupe') {
-						if (!$parent) {
-							if ($type == 'id_rubrique') {
-								$parent = $principal;
-							}
-							if ($type == 'id_article') {
-								$parent = quete_rubrique($principal, $connect);
-							}
-						}
-						do {
-							$exposer[$m]['id_rubrique'][$parent] = true;
-						} while ($parent = quete_parent($parent, $connect));
-					}
-				}
-			}
-		}
-	}
-
-	// And the winner is...
-	return isset($exposer[$m][$prim]) ? isset($exposer[$m][$prim][$id]) : '';
+    static $exposer = [];
+
+    // Que faut-il exposer ? Tous les elements de $reference
+    // ainsi que leur hierarchie ; on ne fait donc ce calcul
+    // qu'une fois (par squelette) et on conserve le resultat
+    // en static.
+    if (!isset($exposer[$m = md5(serialize($reference))][$prim])) {
+        $principal = $reference[$type] ?? $reference["@$type"] ?? '';
+        // le parent fournit en argument est le parent de $id, pas celui de $principal
+        // il n'est donc pas utile
+        $parent = 0;
+        if (!$principal) { // regarder si un enfant est dans le contexte, auquel cas il expose peut etre le parent courant
+            $enfants = ['id_rubrique' => ['id_article'], 'id_groupe' => ['id_mot']];
+            if (isset($enfants[$type])) {
+                foreach ($enfants[$type] as $t) {
+                    if (
+                        isset($reference[$t])
+                        // cas de la reference donnee dynamiquement par la pagination
+                        or isset($reference["@$t"])
+                    ) {
+                        $type = $t;
+                        $principal = $reference[$type] ?? $reference["@$type"];
+                        continue;
+                    }
+                }
+            }
+        }
+        $exposer[$m][$type] = [];
+        if ($principal) {
+            $principaux = is_array($principal) ? $principal : [$principal];
+            foreach ($principaux as $principal) {
+                $exposer[$m][$type][$principal] = true;
+                if ($type == 'id_mot') {
+                    if (!$parent) {
+                        $parent = sql_getfetsel('id_groupe', 'spip_mots', 'id_mot=' . intval($principal), '', '', '', '', $connect);
+                    }
+                    if ($parent) {
+                        $exposer[$m]['id_groupe'][$parent] = true;
+                    }
+                } else {
+                    if ($type != 'id_groupe') {
+                        if (!$parent) {
+                            if ($type == 'id_rubrique') {
+                                $parent = $principal;
+                            }
+                            if ($type == 'id_article') {
+                                $parent = quete_rubrique($principal, $connect);
+                            }
+                        }
+                        do {
+                            $exposer[$m]['id_rubrique'][$parent] = true;
+                        } while ($parent = quete_parent($parent, $connect));
+                    }
+                }
+            }
+        }
+    }
+
+    // And the winner is...
+    return isset($exposer[$m][$prim]) ? isset($exposer[$m][$prim][$id]) : '';
 }
 
 /**
@@ -706,23 +706,23 @@ 
  * @return int
  */
 function quete_debut_pagination($primary, $valeur, $pas, $iter) {
-	// on ne devrait pas arriver ici si la cle primaire est inexistante
-	// ou composee, mais verifions
-	if (!$primary or preg_match('/[,\s]/', $primary)) {
-		return 0;
-	}
-
-	$pos = 0;
-	while ($row = $iter->fetch() and $row[$primary] != $valeur) {
-		$pos++;
-	}
-	// si on a pas trouve
-	if (!$row or $row[$primary] != $valeur) {
-		return 0;
-	}
-
-	// sinon, calculer le bon numero de page
-	return floor($pos / $pas) * $pas;
+    // on ne devrait pas arriver ici si la cle primaire est inexistante
+    // ou composee, mais verifions
+    if (!$primary or preg_match('/[,\s]/', $primary)) {
+        return 0;
+    }
+
+    $pos = 0;
+    while ($row = $iter->fetch() and $row[$primary] != $valeur) {
+        $pos++;
+    }
+    // si on a pas trouve
+    if (!$row or $row[$primary] != $valeur) {
+        return 0;
+    }
+
+    // sinon, calculer le bon numero de page
+    return floor($pos / $pas) * $pas;
 }
 
 /**
@@ -733,11 +733,11 @@ 
  * @return boolean
  */
 function is_whereable($value): bool {
-	if (is_array($value) && count($value)) {
-		return true;
-	}
-	if (is_scalar($value) && strlen($value)) {
-		return true;
-	}
-	return false;
+    if (is_array($value) && count($value)) {
+        return true;
+    }
+    if (is_scalar($value) && strlen($value)) {
+        return true;
+    }
+    return false;
 }

ecrire/inc/lang.php

Indentation +256 added lines, -256 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Langue
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -38,35 +38,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 str_contains($liste_langues, (string) ",$lang,"))
-	) {
-		$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 str_contains($liste_langues, (string) ",$lang,"))
+    ) {
+        $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;
+    }
 }
 
 //
@@ -79,9 +79,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
@@ -89,21 +89,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 '';
 }
 
 /**
@@ -118,10 +118,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);
 }
 
 //
@@ -134,10 +134,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 ?
@@ -146,29 +146,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']);
+    }
 }
 
 //
@@ -178,58 +178,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>';
 }
 
 /**
@@ -251,34 +251,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;
 }
 
 
@@ -293,39 +293,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'];
 }
 
 
@@ -343,22 +343,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'];
 }
 
 /**
@@ -377,35 +377,35 @@ 
  **/
 function utiliser_langue_visiteur($liste_langues = null) {
 
-	// si on est dans l'espace public et pas de $liste_langues : se limiter a la config langues_multilingue si définie
-	if (is_null($liste_langues) and !test_espace_prive() and !empty($GLOBALS['meta']['langues_multilingue'])) {
-		$liste_langues = $GLOBALS['meta']['langues_multilingue'];
-	}
-
-	$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);
+    // si on est dans l'espace public et pas de $liste_langues : se limiter a la config langues_multilingue si définie
+    if (is_null($liste_langues) and !test_espace_prive() and !empty($GLOBALS['meta']['langues_multilingue'])) {
+        $liste_langues = $GLOBALS['meta']['langues_multilingue'];
+    }
+
+    $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);
 }
 
 
@@ -415,7 +415,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);
 }
 
 /**
@@ -433,36 +433,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);
+    }
 }
 
 /**
@@ -476,10 +476,10 @@ 
  *     Code html de la balise <html>
  **/
 function html_lang_attributes() {
-	$lang = $GLOBALS['spip_lang'];
-	$dir = lang_dir($lang);
+    $lang = $GLOBALS['spip_lang'];
+    $dir = lang_dir($lang);
 
-	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";
 }
 
 
@@ -493,7 +493,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_dates.php

Indentation +589 added lines, -589 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Filtres
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -36,11 +36,11 @@ 
  *    Date au format SQL tel que `2008-04-01` sinon ''
  **/
 function extraire_date($texte): string {
-	// format = 2001-08
-	if (preg_match(',([1-2][0-9]{3})[^0-9]*(1[0-2]|0?[1-9]),', $texte, $regs)) {
-		return $regs[1] . '-' . sprintf('%02d', $regs[2]) . '-01';
-	}
-	return '';
+    // format = 2001-08
+    if (preg_match(',([1-2][0-9]{3})[^0-9]*(1[0-2]|0?[1-9]),', $texte, $regs)) {
+        return $regs[1] . '-' . sprintf('%02d', $regs[2]) . '-01';
+    }
+    return '';
 }
 
 
@@ -62,29 +62,29 @@ 
  *     - une chaîne vide si la date est considérée nulle
  **/
 function normaliser_date($date, $forcer_jour = false): string {
-	$date = vider_date($date);
-	if ($date) {
-		if (preg_match('/^[0-9]{8,10}$/', $date)) {
-			$date = date('Y-m-d H:i:s', $date);
-		}
-		if (preg_match('#^([12][0-9]{3})([-/]00)?( [-0-9:]+)?$#', $date, $regs)) {
-			$regs = array_pad($regs, 4, null); // eviter notice php
-			$date = $regs[1] . '-00-00' . $regs[3];
-		} else {
-			if (preg_match('#^([12][0-9]{3}[-/][01]?[0-9])([-/]00)?( [-0-9:]+)?$#', $date, $regs)) {
-				$regs = array_pad($regs, 4, null); // eviter notice php
-				$date = preg_replace('@/@', '-', $regs[1]) . '-00' . $regs[3];
-			} else {
-				$date = date('Y-m-d H:i:s', strtotime($date));
-			}
-		}
-
-		if ($forcer_jour) {
-			$date = str_replace('-00', '-01', $date);
-		}
-	}
-
-	return $date;
+    $date = vider_date($date);
+    if ($date) {
+        if (preg_match('/^[0-9]{8,10}$/', $date)) {
+            $date = date('Y-m-d H:i:s', $date);
+        }
+        if (preg_match('#^([12][0-9]{3})([-/]00)?( [-0-9:]+)?$#', $date, $regs)) {
+            $regs = array_pad($regs, 4, null); // eviter notice php
+            $date = $regs[1] . '-00-00' . $regs[3];
+        } else {
+            if (preg_match('#^([12][0-9]{3}[-/][01]?[0-9])([-/]00)?( [-0-9:]+)?$#', $date, $regs)) {
+                $regs = array_pad($regs, 4, null); // eviter notice php
+                $date = preg_replace('@/@', '-', $regs[1]) . '-00' . $regs[3];
+            } else {
+                $date = date('Y-m-d H:i:s', strtotime($date));
+            }
+        }
+
+        if ($forcer_jour) {
+            $date = str_replace('-00', '-01', $date);
+        }
+    }
+
+    return $date;
 }
 
 /**
@@ -97,23 +97,23 @@ 
  *     - Une chaine vide
  **/
 function vider_date($letexte, $verif_format_date = false): string {
-	$letexte ??= '';
-	if (
-		!$verif_format_date
-		or (in_array(strlen($letexte), [10,19]) and
-			  preg_match('/^[0-9]{4}-[0-9]{2}-[0-9]{2}(\s[0-9]{2}:[0-9]{2}:[0-9]{2})?$/', $letexte))
-	) {
-		if (strncmp('0000-00-00', $letexte, 10) == 0) {
-			return '';
-		}
-		if (strncmp('0001-01-01', $letexte, 10) == 0) {
-			return '';
-		}
-		if (strncmp('1970-01-01', $letexte, 10) == 0) {
-			return '';
-		}  // eviter le bug GMT-1
-	}
-	return $letexte;
+    $letexte ??= '';
+    if (
+        !$verif_format_date
+        or (in_array(strlen($letexte), [10,19]) and
+              preg_match('/^[0-9]{4}-[0-9]{2}-[0-9]{2}(\s[0-9]{2}:[0-9]{2}:[0-9]{2})?$/', $letexte))
+    ) {
+        if (strncmp('0000-00-00', $letexte, 10) == 0) {
+            return '';
+        }
+        if (strncmp('0001-01-01', $letexte, 10) == 0) {
+            return '';
+        }
+        if (strncmp('1970-01-01', $letexte, 10) == 0) {
+            return '';
+        }  // eviter le bug GMT-1
+    }
+    return $letexte;
 }
 
 /**
@@ -129,17 +129,17 @@ 
  **/
 function recup_heure($date): array {
 
-	if (preg_match('#([0-9]{1,2}):([0-9]{1,2})(?::([0-9]{1,2}))?#', $date, $elements)) {
-		array_shift($elements);
-		if (!isset($elements[2])) {
-			$elements[2] = 0;
-		}
-		$heure = $elements;
-	} else {
-		$heure = [0, 0, 0];
-	}
-
-	return $heure;
+    if (preg_match('#([0-9]{1,2}):([0-9]{1,2})(?::([0-9]{1,2}))?#', $date, $elements)) {
+        array_shift($elements);
+        if (!isset($elements[2])) {
+            $elements[2] = 0;
+        }
+        $heure = $elements;
+    } else {
+        $heure = [0, 0, 0];
+    }
+
+    return $heure;
 }
 
 /**
@@ -153,13 +153,13 @@ 
  * @return string heures, sinon 0
  **/
 function heures($numdate): string {
-	$heures = null;
-	$date_array = recup_heure($numdate);
-	if ($date_array) {
-		[$heures, $minutes, $secondes] = $date_array;
-	}
+    $heures = null;
+    $date_array = recup_heure($numdate);
+    if ($date_array) {
+        [$heures, $minutes, $secondes] = $date_array;
+    }
 
-	return $heures;
+    return $heures;
 }
 
 /**
@@ -173,13 +173,13 @@ 
  * @return string minutes, sinon 0
  **/
 function minutes($numdate): string {
-	$minutes = null;
-	$date_array = recup_heure($numdate);
-	if ($date_array) {
-		[$heures, $minutes, $secondes] = $date_array;
-	}
+    $minutes = null;
+    $date_array = recup_heure($numdate);
+    if ($date_array) {
+        [$heures, $minutes, $secondes] = $date_array;
+    }
 
-	return $minutes;
+    return $minutes;
 }
 
 /**
@@ -193,13 +193,13 @@ 
  * @return string secondes, sinon 0
  **/
 function secondes($numdate): string {
-	$secondes = null;
-	$date_array = recup_heure($numdate);
-	if ($date_array) {
-		[$heures, $minutes, $secondes] = $date_array;
-	}
+    $secondes = null;
+    $date_array = recup_heure($numdate);
+    if ($date_array) {
+        [$heures, $minutes, $secondes] = $date_array;
+    }
 
-	return $secondes;
+    return $secondes;
 }
 
 /**
@@ -218,11 +218,11 @@ 
  * @return string L'heure formatée dans la langue en cours.
  **/
 function heures_minutes($numdate, $forme = ''): string {
-	if ($forme !== 'abbr') {
-		return _T('date_fmt_heures_minutes', ['h' => heures($numdate), 'm' => minutes($numdate)]);
-	} else {
-		return _T('date_fmt_heures_minutes_court', ['h' => heures($numdate), 'm' => minutes($numdate)]);
-	}
+    if ($forme !== 'abbr') {
+        return _T('date_fmt_heures_minutes', ['h' => heures($numdate), 'm' => minutes($numdate)]);
+    } else {
+        return _T('date_fmt_heures_minutes_court', ['h' => heures($numdate), 'm' => minutes($numdate)]);
+    }
 }
 
 /**
@@ -247,57 +247,57 @@ 
  * @return array [année, mois, jour, heures, minutes, secondes] ou []
  **/
 function recup_date($numdate, $forcer_jour = true): array {
-	if (!$numdate) {
-		return [];
-	}
-	$heures = $minutes = $secondes = 0;
-	if (preg_match('#([0-9]{1,2})/([0-9]{1,2})/([0-9]{4}|[0-9]{1,2})#', $numdate, $regs)) {
-		$jour = $regs[1];
-		$mois = $regs[2];
-		$annee = $regs[3];
-		if ($annee < 90) {
-			$annee = 2000 + $annee;
-		} elseif ($annee < 100) {
-			$annee = 1900 + $annee;
-		}
-		[$heures, $minutes, $secondes] = recup_heure($numdate);
-	} elseif (preg_match('#([0-9]{4})-([0-9]{1,2})-([0-9]{1,2})#', $numdate, $regs)) {
-		$annee = $regs[1];
-		$mois = $regs[2];
-		$jour = $regs[3];
-		[$heures, $minutes, $secondes] = recup_heure($numdate);
-	} elseif (preg_match('#([0-9]{4})-([0-9]{2})#', $numdate, $regs)) {
-		$annee = $regs[1];
-		$mois = $regs[2];
-		$jour = '';
-		[$heures, $minutes, $secondes] = recup_heure($numdate);
-	} elseif (preg_match('#^([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})$#', $numdate, $regs)) {
-		$annee = $regs[1];
-		$mois = $regs[2];
-		$jour = $regs[3];
-		$heures = $regs[4];
-		$minutes = $regs[5];
-		$secondes = $regs[6];
-	} else {
-		$annee = $mois = $jour = '';
-	}
-	if ($annee > 4000) {
-		$annee -= 9000;
-	}
-	if (strlen($jour) and substr($jour, 0, 1) == '0') {
-		$jour = substr($jour, 1);
-	}
-
-	if ($forcer_jour and $jour == '0') {
-		$jour = '1';
-	}
-	if ($forcer_jour and $mois == '0') {
-		$mois = '1';
-	}
-	if ($annee or $mois or $jour or $heures or $minutes or $secondes) {
-		return [$annee, $mois, $jour, $heures, $minutes, $secondes];
-	}
-	return [];
+    if (!$numdate) {
+        return [];
+    }
+    $heures = $minutes = $secondes = 0;
+    if (preg_match('#([0-9]{1,2})/([0-9]{1,2})/([0-9]{4}|[0-9]{1,2})#', $numdate, $regs)) {
+        $jour = $regs[1];
+        $mois = $regs[2];
+        $annee = $regs[3];
+        if ($annee < 90) {
+            $annee = 2000 + $annee;
+        } elseif ($annee < 100) {
+            $annee = 1900 + $annee;
+        }
+        [$heures, $minutes, $secondes] = recup_heure($numdate);
+    } elseif (preg_match('#([0-9]{4})-([0-9]{1,2})-([0-9]{1,2})#', $numdate, $regs)) {
+        $annee = $regs[1];
+        $mois = $regs[2];
+        $jour = $regs[3];
+        [$heures, $minutes, $secondes] = recup_heure($numdate);
+    } elseif (preg_match('#([0-9]{4})-([0-9]{2})#', $numdate, $regs)) {
+        $annee = $regs[1];
+        $mois = $regs[2];
+        $jour = '';
+        [$heures, $minutes, $secondes] = recup_heure($numdate);
+    } elseif (preg_match('#^([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})$#', $numdate, $regs)) {
+        $annee = $regs[1];
+        $mois = $regs[2];
+        $jour = $regs[3];
+        $heures = $regs[4];
+        $minutes = $regs[5];
+        $secondes = $regs[6];
+    } else {
+        $annee = $mois = $jour = '';
+    }
+    if ($annee > 4000) {
+        $annee -= 9000;
+    }
+    if (strlen($jour) and substr($jour, 0, 1) == '0') {
+        $jour = substr($jour, 1);
+    }
+
+    if ($forcer_jour and $jour == '0') {
+        $jour = '1';
+    }
+    if ($forcer_jour and $mois == '0') {
+        $mois = '1';
+    }
+    if ($annee or $mois or $jour or $heures or $minutes or $secondes) {
+        return [$annee, $mois, $jour, $heures, $minutes, $secondes];
+    }
+    return [];
 }
 
 /**
@@ -324,10 +324,10 @@ 
  *     La date relative ou complète
  **/
 function date_interface($date, $decalage_maxi = 43200 /* 12*3600 */): string {
-	return sinon(
-		date_relative($date, $decalage_maxi),
-		affdate_heure($date)
-	);
+    return sinon(
+        date_relative($date, $decalage_maxi),
+        affdate_heure($date)
+    );
 }
 
 /**
@@ -360,86 +360,86 @@ 
  **/
 function date_relative($date, $decalage_maxi = 0, $ref_date = null): string {
 
-	if (!$date) {
-		return '';
-	}
-
-	if (is_null($ref_date)) {
-		$ref_time = time();
-	} else {
-		$ref_time = strtotime($ref_date);
-	}
-
-	$decal = date('U', $ref_time) - date('U', strtotime($date));
-
-	if ($decalage_maxi and ($decal > $decalage_maxi or $decal < 0)) {
-		return '';
-	}
-
-	if ($decal < 0) {
-		$il_y_a = 'date_dans';
-		$decal = -1 * $decal;
-	} else {
-		$il_y_a = 'date_il_y_a';
-	}
-
-	if ($decal > 3600 * 24 * 30 * 6) {
-		return affdate_court($date);
-	}
-
-	if ($decal > 3600 * 24 * 30) {
-		$mois = floor($decal / (3600 * 24 * 30));
-		if ($mois < 2) {
-			$delai = "$mois " . _T('date_un_mois');
-		} else {
-			$delai = "$mois " . _T('date_mois');
-		}
-	} else {
-		if ($decal > 3600 * 24 * 7) {
-			$semaines = floor($decal / (3600 * 24 * 7));
-			if ($semaines < 2) {
-				$delai = "$semaines " . _T('date_une_semaine');
-			} else {
-				$delai = "$semaines " . _T('date_semaines');
-			}
-		} else {
-			if ($decal > 3600 * 24) {
-				$jours = floor($decal / (3600 * 24));
-				if ($jours < 2) {
-					return $il_y_a == 'date_dans' ? _T('date_demain') : _T('date_hier');
-				} else {
-					$delai = "$jours " . _T('date_jours');
-				}
-			} else {
-				if ($decal >= 3600) {
-					$heures = floor($decal / 3600);
-					if ($heures < 2) {
-						$delai = "$heures " . _T('date_une_heure');
-					} else {
-						$delai = "$heures " . _T('date_heures');
-					}
-				} else {
-					if ($decal >= 60) {
-						$minutes = floor($decal / 60);
-						if ($minutes < 2) {
-							$delai = "$minutes " . _T('date_une_minute');
-						} else {
-							$delai = "$minutes " . _T('date_minutes');
-						}
-					} else {
-						$secondes = ceil($decal);
-						if ($secondes < 2) {
-							$delai = "$secondes " . _T('date_une_seconde');
-						} else {
-							$delai = "$secondes " . _T('date_secondes');
-						}
-					}
-				}
-			}
-		}
-	}
-
-	return _T($il_y_a, ['delai' => $delai]);
+    if (!$date) {
+        return '';
+    }
+
+    if (is_null($ref_date)) {
+        $ref_time = time();
+    } else {
+        $ref_time = strtotime($ref_date);
+    }
+
+    $decal = date('U', $ref_time) - date('U', strtotime($date));
+
+    if ($decalage_maxi and ($decal > $decalage_maxi or $decal < 0)) {
+        return '';
+    }
+
+    if ($decal < 0) {
+        $il_y_a = 'date_dans';
+        $decal = -1 * $decal;
+    } else {
+        $il_y_a = 'date_il_y_a';
+    }
+
+    if ($decal > 3600 * 24 * 30 * 6) {
+        return affdate_court($date);
+    }
+
+    if ($decal > 3600 * 24 * 30) {
+        $mois = floor($decal / (3600 * 24 * 30));
+        if ($mois < 2) {
+            $delai = "$mois " . _T('date_un_mois');
+        } else {
+            $delai = "$mois " . _T('date_mois');
+        }
+    } else {
+        if ($decal > 3600 * 24 * 7) {
+            $semaines = floor($decal / (3600 * 24 * 7));
+            if ($semaines < 2) {
+                $delai = "$semaines " . _T('date_une_semaine');
+            } else {
+                $delai = "$semaines " . _T('date_semaines');
+            }
+        } else {
+            if ($decal > 3600 * 24) {
+                $jours = floor($decal / (3600 * 24));
+                if ($jours < 2) {
+                    return $il_y_a == 'date_dans' ? _T('date_demain') : _T('date_hier');
+                } else {
+                    $delai = "$jours " . _T('date_jours');
+                }
+            } else {
+                if ($decal >= 3600) {
+                    $heures = floor($decal / 3600);
+                    if ($heures < 2) {
+                        $delai = "$heures " . _T('date_une_heure');
+                    } else {
+                        $delai = "$heures " . _T('date_heures');
+                    }
+                } else {
+                    if ($decal >= 60) {
+                        $minutes = floor($decal / 60);
+                        if ($minutes < 2) {
+                            $delai = "$minutes " . _T('date_une_minute');
+                        } else {
+                            $delai = "$minutes " . _T('date_minutes');
+                        }
+                    } else {
+                        $secondes = ceil($decal);
+                        if ($secondes < 2) {
+                            $delai = "$secondes " . _T('date_une_seconde');
+                        } else {
+                            $delai = "$secondes " . _T('date_secondes');
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    return _T($il_y_a, ['delai' => $delai]);
 }
 
 
@@ -465,32 +465,32 @@ 
  **/
 function date_relativecourt($date, $decalage_maxi = 0): string {
 
-	if (!$date) {
-		return '';
-	}
-	$decal = date('U', strtotime(date('Y-m-d')) - strtotime(date('Y-m-d', strtotime($date))));
-
-	if ($decalage_maxi and ($decal > $decalage_maxi or $decal < 0)) {
-		return '';
-	}
-
-	if ($decal < -24 * 3600) {
-		$retour = date_relative($date, $decalage_maxi);
-	} elseif ($decal < 0) {
-		$retour = _T('date_demain');
-	} else {
-		if ($decal < (3600 * 24)) {
-			$retour = _T('date_aujourdhui');
-		} else {
-			if ($decal < (3600 * 24 * 2)) {
-				$retour = _T('date_hier');
-			} else {
-				$retour = date_relative($date, $decalage_maxi);
-			}
-		}
-	}
-
-	return $retour;
+    if (!$date) {
+        return '';
+    }
+    $decal = date('U', strtotime(date('Y-m-d')) - strtotime(date('Y-m-d', strtotime($date))));
+
+    if ($decalage_maxi and ($decal > $decalage_maxi or $decal < 0)) {
+        return '';
+    }
+
+    if ($decal < -24 * 3600) {
+        $retour = date_relative($date, $decalage_maxi);
+    } elseif ($decal < 0) {
+        $retour = _T('date_demain');
+    } else {
+        if ($decal < (3600 * 24)) {
+            $retour = _T('date_aujourdhui');
+        } else {
+            if ($decal < (3600 * 24 * 2)) {
+                $retour = _T('date_hier');
+            } else {
+                $retour = date_relative($date, $decalage_maxi);
+            }
+        }
+    }
+
+    return $retour;
 }
 
 /**
@@ -507,174 +507,174 @@ 
  * @return string
  */
 function affdate_base($numdate, $vue, $options = []): string {
-	if (is_string($options)) {
-		$options = ['param' => $options];
-	}
-	$date_array = recup_date($numdate, false);
-	if (!$date_array) {
-		return '';
-	}
-	[$annee, $mois, $jour, $heures, $minutes, $secondes] = $date_array;
-
-	// 1er, 21st, etc.
-	$journum = $jour;
-
-	if ($jour == 0) {
-		$jour = '';
-		$njour = 0;
-	} else {
-		$njour = intval($jour);
-		if ($jourth = _T('date_jnum' . $jour)) {
-			$jour = $jourth;
-		}
-	}
-
-	$mois = intval($mois);
-	if ($mois > 0 and $mois < 13) {
-		/* Traiter le cas "abbr" pour les noms de mois */
-		$param = ((isset($options['param']) and $options['param'] === 'abbr') ? '_' . $options['param'] : '');
-		$nommois = _T('date_mois_' . $mois . $param);
-		if ($jour) {
-			$jourmois = _T('date_de_mois_' . $mois, ['j' => $jour, 'nommois' => $nommois]);
-		} else {
-			$jourmois = $nommois;
-		}
-	} else {
-		$nommois = '';
-		$jourmois = '';
-	}
-
-	if ($annee < 0) {
-		$annee = -$annee . ' ' . _T('date_avant_jc');
-		$avjc = true;
-	} else {
-		$avjc = false;
-	}
-
-	switch ($vue) {
-		case 'saison':
-		case 'saison_annee':
-			$saison = '';
-			if ($mois > 0) {
-				$saison = ($options['param'] == 'sud') ? 3 : 1;
-				if (($mois == 3 and $jour >= 21) or $mois > 3) {
-					$saison = ($options['param'] == 'sud') ? 4 : 2;
-				}
-				if (($mois == 6 and $jour >= 21) or $mois > 6) {
-					$saison = ($options['param'] == 'sud') ? 1 : 3;
-				}
-				if (($mois == 9 and $jour >= 21) or $mois > 9) {
-					$saison = ($options['param'] == 'sud') ? 2 : 4;
-				}
-				if (($mois == 12 and $jour >= 21) or $mois > 12) {
-					$saison = ($options['param'] == 'sud') ? 3 : 1;
-				}
-			}
-			if ($vue == 'saison') {
-				return $saison ? _T('date_saison_' . $saison) : '';
-			} else {
-				return $saison ? trim(_T(
-					'date_fmt_saison_annee',
-					['saison' => _T('date_saison_' . $saison), 'annee' => $annee]
-				)) : '';
-			}
-
-		case 'court':
-			if ($avjc) {
-				return $annee;
-			}
-			$a = ((isset($options['annee_courante']) and $options['annee_courante']) ? $options['annee_courante'] : date('Y'));
-			if ($annee < ($a - 100) or $annee > ($a + 100)) {
-				return $annee;
-			}
-			if ($annee != $a) {
-				return _T(
-					'date_fmt_mois_annee',
-					['mois' => $mois, 'nommois' => spip_ucfirst($nommois), 'annee' => $annee]
-				);
-			}
-
-			return _T(
-				'date_fmt_jour_mois',
-				['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
-			);
-
-		case 'jourcourt':
-			if ($avjc) {
-				return $annee;
-			}
-			$a = ((isset($options['annee_courante']) and $options['annee_courante']) ? $options['annee_courante'] : date('Y'));
-			if ($annee < ($a - 100) or $annee > ($a + 100)) {
-				return $annee;
-			}
-			if ($annee != $a) {
-				return _T(
-					'date_fmt_jour_mois_annee',
-					['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
-				);
-			}
-
-			return _T(
-				'date_fmt_jour_mois',
-				['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
-			);
-
-		case 'entier':
-			if ($avjc) {
-				return $annee;
-			}
-			if ($jour) {
-				return _T(
-					'date_fmt_jour_mois_annee',
-					['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
-				);
-			} elseif ($mois) {
-				return trim(_T('date_fmt_mois_annee', ['mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]));
-			} else {
-				return $annee;
-			}
-
-		case 'nom_mois':
-			return $nommois;
-
-		case 'mois':
-			return sprintf('%02s', $mois);
-
-		case 'jour':
-			return $jour;
-
-		case 'journum':
-			return $journum;
-
-		case 'nom_jour':
-			if (!$mois or !$njour) {
-				return '';
-			}
-			$nom = mktime(1, 1, 1, $mois, $njour, $annee);
-			$nom = 1 + (int) date('w', $nom);
-			$param = ((isset($options['param']) and $options['param']) ? '_' . $options['param'] : '');
-
-			return _T('date_jour_' . $nom . $param);
-
-		case 'mois_annee':
-			if ($avjc) {
-				return $annee;
-			}
-
-			return trim(_T('date_fmt_mois_annee', ['mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]));
-
-		case 'annee':
-			return $annee;
-
-		// Cas d'une vue non definie : retomber sur le format
-		// de date propose par http://www.php.net/date
-		default:
-			[$annee, $mois, $jour, $heures, $minutes, $secondes] = $date_array;
-			if (!$time = mktime($heures, $minutes, $secondes, $mois, (int) $jour, $annee)) {
-				$time = strtotime($numdate);
-			}
-			return date($vue, $time);
-	}
+    if (is_string($options)) {
+        $options = ['param' => $options];
+    }
+    $date_array = recup_date($numdate, false);
+    if (!$date_array) {
+        return '';
+    }
+    [$annee, $mois, $jour, $heures, $minutes, $secondes] = $date_array;
+
+    // 1er, 21st, etc.
+    $journum = $jour;
+
+    if ($jour == 0) {
+        $jour = '';
+        $njour = 0;
+    } else {
+        $njour = intval($jour);
+        if ($jourth = _T('date_jnum' . $jour)) {
+            $jour = $jourth;
+        }
+    }
+
+    $mois = intval($mois);
+    if ($mois > 0 and $mois < 13) {
+        /* Traiter le cas "abbr" pour les noms de mois */
+        $param = ((isset($options['param']) and $options['param'] === 'abbr') ? '_' . $options['param'] : '');
+        $nommois = _T('date_mois_' . $mois . $param);
+        if ($jour) {
+            $jourmois = _T('date_de_mois_' . $mois, ['j' => $jour, 'nommois' => $nommois]);
+        } else {
+            $jourmois = $nommois;
+        }
+    } else {
+        $nommois = '';
+        $jourmois = '';
+    }
+
+    if ($annee < 0) {
+        $annee = -$annee . ' ' . _T('date_avant_jc');
+        $avjc = true;
+    } else {
+        $avjc = false;
+    }
+
+    switch ($vue) {
+        case 'saison':
+        case 'saison_annee':
+            $saison = '';
+            if ($mois > 0) {
+                $saison = ($options['param'] == 'sud') ? 3 : 1;
+                if (($mois == 3 and $jour >= 21) or $mois > 3) {
+                    $saison = ($options['param'] == 'sud') ? 4 : 2;
+                }
+                if (($mois == 6 and $jour >= 21) or $mois > 6) {
+                    $saison = ($options['param'] == 'sud') ? 1 : 3;
+                }
+                if (($mois == 9 and $jour >= 21) or $mois > 9) {
+                    $saison = ($options['param'] == 'sud') ? 2 : 4;
+                }
+                if (($mois == 12 and $jour >= 21) or $mois > 12) {
+                    $saison = ($options['param'] == 'sud') ? 3 : 1;
+                }
+            }
+            if ($vue == 'saison') {
+                return $saison ? _T('date_saison_' . $saison) : '';
+            } else {
+                return $saison ? trim(_T(
+                    'date_fmt_saison_annee',
+                    ['saison' => _T('date_saison_' . $saison), 'annee' => $annee]
+                )) : '';
+            }
+
+        case 'court':
+            if ($avjc) {
+                return $annee;
+            }
+            $a = ((isset($options['annee_courante']) and $options['annee_courante']) ? $options['annee_courante'] : date('Y'));
+            if ($annee < ($a - 100) or $annee > ($a + 100)) {
+                return $annee;
+            }
+            if ($annee != $a) {
+                return _T(
+                    'date_fmt_mois_annee',
+                    ['mois' => $mois, 'nommois' => spip_ucfirst($nommois), 'annee' => $annee]
+                );
+            }
+
+            return _T(
+                'date_fmt_jour_mois',
+                ['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
+            );
+
+        case 'jourcourt':
+            if ($avjc) {
+                return $annee;
+            }
+            $a = ((isset($options['annee_courante']) and $options['annee_courante']) ? $options['annee_courante'] : date('Y'));
+            if ($annee < ($a - 100) or $annee > ($a + 100)) {
+                return $annee;
+            }
+            if ($annee != $a) {
+                return _T(
+                    'date_fmt_jour_mois_annee',
+                    ['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
+                );
+            }
+
+            return _T(
+                'date_fmt_jour_mois',
+                ['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
+            );
+
+        case 'entier':
+            if ($avjc) {
+                return $annee;
+            }
+            if ($jour) {
+                return _T(
+                    'date_fmt_jour_mois_annee',
+                    ['jourmois' => $jourmois, 'jour' => $jour, 'mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]
+                );
+            } elseif ($mois) {
+                return trim(_T('date_fmt_mois_annee', ['mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]));
+            } else {
+                return $annee;
+            }
+
+        case 'nom_mois':
+            return $nommois;
+
+        case 'mois':
+            return sprintf('%02s', $mois);
+
+        case 'jour':
+            return $jour;
+
+        case 'journum':
+            return $journum;
+
+        case 'nom_jour':
+            if (!$mois or !$njour) {
+                return '';
+            }
+            $nom = mktime(1, 1, 1, $mois, $njour, $annee);
+            $nom = 1 + (int) date('w', $nom);
+            $param = ((isset($options['param']) and $options['param']) ? '_' . $options['param'] : '');
+
+            return _T('date_jour_' . $nom . $param);
+
+        case 'mois_annee':
+            if ($avjc) {
+                return $annee;
+            }
+
+            return trim(_T('date_fmt_mois_annee', ['mois' => $mois, 'nommois' => $nommois, 'annee' => $annee]));
+
+        case 'annee':
+            return $annee;
+
+        // Cas d'une vue non definie : retomber sur le format
+        // de date propose par http://www.php.net/date
+        default:
+            [$annee, $mois, $jour, $heures, $minutes, $secondes] = $date_array;
+            if (!$time = mktime($heures, $minutes, $secondes, $mois, (int) $jour, $annee)) {
+                $time = strtotime($numdate);
+            }
+            return date($vue, $time);
+    }
 }
 
 
@@ -701,11 +701,11 @@ 
  *     Nom du jour
  **/
 function nom_jour($numdate, $forme = ''): string {
-	if (!($forme === 'abbr' or $forme === 'initiale')) {
-		$forme = '';
-	}
+    if (!($forme === 'abbr' or $forme === 'initiale')) {
+        $forme = '';
+    }
 
-	return affdate_base($numdate, 'nom_jour', ['param' => $forme]);
+    return affdate_base($numdate, 'nom_jour', ['param' => $forme]);
 }
 
 /**
@@ -727,7 +727,7 @@ 
  *     Numéro du jour
  **/
 function jour($numdate): string {
-	return affdate_base($numdate, 'jour');
+    return affdate_base($numdate, 'jour');
 }
 
 /**
@@ -745,7 +745,7 @@ 
  *     Numéro du jour
  **/
 function journum($numdate): string {
-	return affdate_base($numdate, 'journum');
+    return affdate_base($numdate, 'journum');
 }
 
 /**
@@ -763,7 +763,7 @@ 
  *     Numéro du mois (sur 2 chiffres)
  **/
 function mois($numdate): string {
-	return  affdate_base($numdate, 'mois');
+    return  affdate_base($numdate, 'mois');
 }
 
 /**
@@ -787,11 +787,11 @@ 
  *     Nom du mois
  **/
 function nom_mois($numdate, $forme = ''): string {
-	if (!($forme === 'abbr')) {
-		$forme = '';
-	}
+    if (!($forme === 'abbr')) {
+        $forme = '';
+    }
 
-	return affdate_base($numdate, 'nom_mois', ['param' => $forme]);
+    return affdate_base($numdate, 'nom_mois', ['param' => $forme]);
 }
 
 /**
@@ -809,7 +809,7 @@ 
  *     Année (sur 4 chiffres)
  **/
 function annee($numdate): string {
-	return affdate_base($numdate, 'annee');
+    return affdate_base($numdate, 'annee');
 }
 
 
@@ -839,11 +839,11 @@ 
  *     La date formatée
  **/
 function saison($numdate, $hemisphere = 'nord'): string {
-	if ($hemisphere !== 'sud') {
-		$hemisphere = 'nord';
-	}
+    if ($hemisphere !== 'sud') {
+        $hemisphere = 'nord';
+    }
 
-	return affdate_base($numdate, 'saison', ['param' => $hemisphere]);
+    return affdate_base($numdate, 'saison', ['param' => $hemisphere]);
 }
 
 
@@ -872,11 +872,11 @@ 
  *     La date formatée
  **/
 function saison_annee($numdate, $hemisphere = 'nord'): string {
-	if ($hemisphere !== 'sud') {
-		$hemisphere = 'nord';
-	}
+    if ($hemisphere !== 'sud') {
+        $hemisphere = 'nord';
+    }
 
-	return affdate_base($numdate, 'saison_annee', ['param' => $hemisphere]);
+    return affdate_base($numdate, 'saison_annee', ['param' => $hemisphere]);
 }
 
 /**
@@ -904,7 +904,7 @@ 
  *     La date formatée
  **/
 function affdate($numdate, $format = 'entier'): string {
-	return affdate_base($numdate, $format);
+    return affdate_base($numdate, $format);
 }
 
 
@@ -931,7 +931,7 @@ 
  *     La date formatée
  **/
 function affdate_court($numdate, $annee_courante = null): string {
-	return affdate_base($numdate, 'court', ['annee_courante' => $annee_courante]);
+    return affdate_base($numdate, 'court', ['annee_courante' => $annee_courante]);
 }
 
 
@@ -958,7 +958,7 @@ 
  *     La date formatée
  **/
 function affdate_jourcourt($numdate, $annee_courante = null): string {
-	return affdate_base($numdate, 'jourcourt', ['annee_courante' => $annee_courante]);
+    return affdate_base($numdate, 'jourcourt', ['annee_courante' => $annee_courante]);
 }
 
 /**
@@ -976,7 +976,7 @@ 
  *     La date formatée
  **/
 function affdate_mois_annee($numdate): string {
-	return affdate_base($numdate, 'mois_annee');
+    return affdate_base($numdate, 'mois_annee');
 }
 
 /**
@@ -994,16 +994,16 @@ 
  *     La date formatée, sinon ''
  **/
 function affdate_heure($numdate): string {
-	$date_array = recup_date($numdate);
-	if (!$date_array) {
-		return '';
-	}
-	[$annee, $mois, $jour, $heures, $minutes, $sec] = $date_array;
-
-	return _T('date_fmt_jour_heure', [
-		'jour' => affdate($numdate),
-		'heure' => _T('date_fmt_heures_minutes', ['h' => $heures, 'm' => $minutes])
-	]);
+    $date_array = recup_date($numdate);
+    if (!$date_array) {
+        return '';
+    }
+    [$annee, $mois, $jour, $heures, $minutes, $sec] = $date_array;
+
+    return _T('date_fmt_jour_heure', [
+        'jour' => affdate($numdate),
+        'heure' => _T('date_fmt_heures_minutes', ['h' => $heures, 'm' => $minutes])
+    ]);
 }
 
 /**
@@ -1035,117 +1035,117 @@ 
  *     texte de la date
  */
 function affdate_debut_fin($date_debut, $date_fin, $horaire = 'oui', $forme = ''): string {
-	$abbr = $jour = '';
-	$affdate = 'affdate_jourcourt';
-	if (strpos($forme, 'abbr') !== false) {
-		$abbr = 'abbr';
-	}
-	if (strpos($forme, 'annee') !== false) {
-		$affdate = 'affdate';
-	}
-	if (strpos($forme, 'jour') !== false) {
-		$jour = 'jour';
-	}
-
-	$dtstart = $dtend = $dtabbr = '';
-	if (strpos($forme, 'hcal') !== false) {
-		$dtstart = "<abbr class='dtstart' title='" . date_iso($date_debut) . "'>";
-		$dtend = "<abbr class='dtend' title='" . date_iso($date_fin) . "'>";
-		$dtabbr = '</abbr>';
-	}
-
-	$date_debut = strtotime($date_debut);
-	$date_fin = strtotime($date_fin);
-	$d = date('Y-m-d', $date_debut);
-	$f = date('Y-m-d', $date_fin);
-	$h = ($horaire === 'oui' or $horaire === true);
-	$hd = _T('date_fmt_heures_minutes_court', ['h' => date('H', $date_debut), 'm' => date('i', $date_debut)]);
-	$hf = _T('date_fmt_heures_minutes_court', ['h' => date('H', $date_fin), 'm' => date('i', $date_fin)]);
-
-	if ($d == $f) { // meme jour
-		$nomjour = nom_jour($d, $abbr);
-		$s = $affdate($d);
-		$s = _T('date_fmt_jour', ['nomjour' => $nomjour, 'jour' => $s]);
-		if ($h) {
-			if ($hd == $hf) {
-				// Lundi 20 fevrier a 18h25
-				$s = spip_ucfirst(_T('date_fmt_jour_heure', ['jour' => $s, 'heure' => $hd]));
-				$s = "$dtstart$s$dtabbr";
-			} else {
-				// Le <abbr...>lundi 20 fevrier de 18h00</abbr> a <abbr...>20h00</abbr>
-				if ($dtabbr && $dtstart && $dtend) {
-					$s = _T(
-						'date_fmt_jour_heure_debut_fin_abbr',
-						[
-						'jour' => spip_ucfirst($s),
-						'heure_debut' => $hd,
-						'heure_fin' => $hf,
-						'dtstart' => $dtstart,
-						'dtend' => $dtend,
-						'dtabbr' => $dtabbr
-						],
-						[
-							'sanitize' => false
-						]
-					);
-				} // Le lundi 20 fevrier de 18h00 a 20h00
-				else {
-					$s = spip_ucfirst(_T(
-						'date_fmt_jour_heure_debut_fin',
-						['jour' => $s, 'heure_debut' => $hd, 'heure_fin' => $hf]
-					));
-				}
-			}
-		} else {
-			if ($dtabbr && $dtstart) {
-				$s = $dtstart . spip_ucfirst($s) . $dtabbr;
-			} else {
-				$s = spip_ucfirst($s);
-			}
-		}
-	} else {
-		if ((date('Y-m', $date_debut)) == date('Y-m', $date_fin)) { // meme annee et mois, jours differents
-			if (!$h) {
-				$date_debut = jour($d);
-			} else {
-				$date_debut = affdate_jourcourt($d, date('Y', $date_fin));
-			}
-			$date_fin = $affdate($f);
-			if ($jour) {
-				$nomjour_debut = nom_jour($d, $abbr);
-				$date_debut = _T('date_fmt_jour', ['nomjour' => $nomjour_debut, 'jour' => $date_debut]);
-				$nomjour_fin = nom_jour($f, $abbr);
-				$date_fin = _T('date_fmt_jour', ['nomjour' => $nomjour_fin, 'jour' => $date_fin]);
-			}
-			if ($h) {
-				$date_debut = _T('date_fmt_jour_heure', ['jour' => $date_debut, 'heure' => $hd]);
-				$date_fin = _T('date_fmt_jour_heure', ['jour' => $date_fin, 'heure' => $hf]);
-			}
-			$date_debut = $dtstart . $date_debut . $dtabbr;
-			$date_fin = $dtend . $date_fin . $dtabbr;
-
-			$s = _T('date_fmt_periode', ['date_debut' => $date_debut, 'date_fin' => $date_fin]);
-		} else {
-			$date_debut = affdate_jourcourt($d, date('Y', $date_fin));
-			$date_fin = $affdate($f);
-			if ($jour) {
-				$nomjour_debut = nom_jour($d, $abbr);
-				$date_debut = _T('date_fmt_jour', ['nomjour' => $nomjour_debut, 'jour' => $date_debut]);
-				$nomjour_fin = nom_jour($f, $abbr);
-				$date_fin = _T('date_fmt_jour', ['nomjour' => $nomjour_fin, 'jour' => $date_fin]);
-			}
-			if ($h) {
-				$date_debut = _T('date_fmt_jour_heure', ['jour' => $date_debut, 'heure' => $hd]);
-				$date_fin = _T('date_fmt_jour_heure', ['jour' => $date_fin, 'heure' => $hf]);
-			}
-
-			$date_debut = $dtstart . $date_debut . $dtabbr;
-			$date_fin = $dtend . $date_fin . $dtabbr;
-			$s = _T('date_fmt_periode', ['date_debut' => $date_debut, 'date_fin' => $date_fin]);
-		}
-	}
-
-	return $s;
+    $abbr = $jour = '';
+    $affdate = 'affdate_jourcourt';
+    if (strpos($forme, 'abbr') !== false) {
+        $abbr = 'abbr';
+    }
+    if (strpos($forme, 'annee') !== false) {
+        $affdate = 'affdate';
+    }
+    if (strpos($forme, 'jour') !== false) {
+        $jour = 'jour';
+    }
+
+    $dtstart = $dtend = $dtabbr = '';
+    if (strpos($forme, 'hcal') !== false) {
+        $dtstart = "<abbr class='dtstart' title='" . date_iso($date_debut) . "'>";
+        $dtend = "<abbr class='dtend' title='" . date_iso($date_fin) . "'>";
+        $dtabbr = '</abbr>';
+    }
+
+    $date_debut = strtotime($date_debut);
+    $date_fin = strtotime($date_fin);
+    $d = date('Y-m-d', $date_debut);
+    $f = date('Y-m-d', $date_fin);
+    $h = ($horaire === 'oui' or $horaire === true);
+    $hd = _T('date_fmt_heures_minutes_court', ['h' => date('H', $date_debut), 'm' => date('i', $date_debut)]);
+    $hf = _T('date_fmt_heures_minutes_court', ['h' => date('H', $date_fin), 'm' => date('i', $date_fin)]);
+
+    if ($d == $f) { // meme jour
+        $nomjour = nom_jour($d, $abbr);
+        $s = $affdate($d);
+        $s = _T('date_fmt_jour', ['nomjour' => $nomjour, 'jour' => $s]);
+        if ($h) {
+            if ($hd == $hf) {
+                // Lundi 20 fevrier a 18h25
+                $s = spip_ucfirst(_T('date_fmt_jour_heure', ['jour' => $s, 'heure' => $hd]));
+                $s = "$dtstart$s$dtabbr";
+            } else {
+                // Le <abbr...>lundi 20 fevrier de 18h00</abbr> a <abbr...>20h00</abbr>
+                if ($dtabbr && $dtstart && $dtend) {
+                    $s = _T(
+                        'date_fmt_jour_heure_debut_fin_abbr',
+                        [
+                        'jour' => spip_ucfirst($s),
+                        'heure_debut' => $hd,
+                        'heure_fin' => $hf,
+                        'dtstart' => $dtstart,
+                        'dtend' => $dtend,
+                        'dtabbr' => $dtabbr
+                        ],
+                        [
+                            'sanitize' => false
+                        ]
+                    );
+                } // Le lundi 20 fevrier de 18h00 a 20h00
+                else {
+                    $s = spip_ucfirst(_T(
+                        'date_fmt_jour_heure_debut_fin',
+                        ['jour' => $s, 'heure_debut' => $hd, 'heure_fin' => $hf]
+                    ));
+                }
+            }
+        } else {
+            if ($dtabbr && $dtstart) {
+                $s = $dtstart . spip_ucfirst($s) . $dtabbr;
+            } else {
+                $s = spip_ucfirst($s);
+            }
+        }
+    } else {
+        if ((date('Y-m', $date_debut)) == date('Y-m', $date_fin)) { // meme annee et mois, jours differents
+            if (!$h) {
+                $date_debut = jour($d);
+            } else {
+                $date_debut = affdate_jourcourt($d, date('Y', $date_fin));
+            }
+            $date_fin = $affdate($f);
+            if ($jour) {
+                $nomjour_debut = nom_jour($d, $abbr);
+                $date_debut = _T('date_fmt_jour', ['nomjour' => $nomjour_debut, 'jour' => $date_debut]);
+                $nomjour_fin = nom_jour($f, $abbr);
+                $date_fin = _T('date_fmt_jour', ['nomjour' => $nomjour_fin, 'jour' => $date_fin]);
+            }
+            if ($h) {
+                $date_debut = _T('date_fmt_jour_heure', ['jour' => $date_debut, 'heure' => $hd]);
+                $date_fin = _T('date_fmt_jour_heure', ['jour' => $date_fin, 'heure' => $hf]);
+            }
+            $date_debut = $dtstart . $date_debut . $dtabbr;
+            $date_fin = $dtend . $date_fin . $dtabbr;
+
+            $s = _T('date_fmt_periode', ['date_debut' => $date_debut, 'date_fin' => $date_fin]);
+        } else {
+            $date_debut = affdate_jourcourt($d, date('Y', $date_fin));
+            $date_fin = $affdate($f);
+            if ($jour) {
+                $nomjour_debut = nom_jour($d, $abbr);
+                $date_debut = _T('date_fmt_jour', ['nomjour' => $nomjour_debut, 'jour' => $date_debut]);
+                $nomjour_fin = nom_jour($f, $abbr);
+                $date_fin = _T('date_fmt_jour', ['nomjour' => $nomjour_fin, 'jour' => $date_fin]);
+            }
+            if ($h) {
+                $date_debut = _T('date_fmt_jour_heure', ['jour' => $date_debut, 'heure' => $hd]);
+                $date_fin = _T('date_fmt_jour_heure', ['jour' => $date_fin, 'heure' => $hf]);
+            }
+
+            $date_debut = $dtstart . $date_debut . $dtabbr;
+            $date_fin = $dtend . $date_fin . $dtabbr;
+            $s = _T('date_fmt_periode', ['date_debut' => $date_debut, 'date_fin' => $date_fin]);
+        }
+    }
+
+    return $s;
 }
 
 /**
@@ -1166,10 +1166,10 @@ 
  *     Date au format ical
  **/
 function date_ical($date, $addminutes = 0): string {
-	[$heures, $minutes, $secondes] = recup_heure($date);
-	[$annee, $mois, $jour] = recup_date($date);
+    [$heures, $minutes, $secondes] = recup_heure($date);
+    [$annee, $mois, $jour] = recup_date($date);
 
-	return gmdate('Ymd\THis\Z', mktime($heures, $minutes + $addminutes, $secondes, $mois, $jour, $annee));
+    return gmdate('Ymd\THis\Z', mktime($heures, $minutes + $addminutes, $secondes, $mois, $jour, $annee));
 }
 
 
@@ -1193,14 +1193,14 @@ 
  *     La date formatée
  **/
 function date_iso($date_heure): string {
-	$date = recup_date($date_heure);
-	$annee = $date[0] ?? null;
-	$mois = $date[1] ?? null;
-	$jour = $date[2] ?? null;
-	[$heures, $minutes, $secondes] = recup_heure($date_heure);
-	$time = @mktime($heures, $minutes, $secondes, $mois, $jour, $annee);
-
-	return gmdate('Y-m-d\TH:i:s\Z', $time);
+    $date = recup_date($date_heure);
+    $annee = $date[0] ?? null;
+    $mois = $date[1] ?? null;
+    $jour = $date[2] ?? null;
+    [$heures, $minutes, $secondes] = recup_heure($date_heure);
+    $time = @mktime($heures, $minutes, $secondes, $mois, $jour, $annee);
+
+    return gmdate('Y-m-d\TH:i:s\Z', $time);
 }
 
 /**
@@ -1223,11 +1223,11 @@ 
  *     La date formatée
  **/
 function date_822($date_heure): string {
-	[$annee, $mois, $jour] = recup_date($date_heure);
-	[$heures, $minutes, $secondes] = recup_heure($date_heure);
-	$time = mktime($heures, $minutes, $secondes, $mois, $jour, $annee);
+    [$annee, $mois, $jour] = recup_date($date_heure);
+    [$heures, $minutes, $secondes] = recup_heure($date_heure);
+    $time = mktime($heures, $minutes, $secondes, $mois, $jour, $annee);
 
-	return date('r', $time);
+    return date('r', $time);
 }
 
 /**
@@ -1243,11 +1243,11 @@ 
  *     Date au format `Ymd`
  **/
 function date_anneemoisjour($d): string {
-	if (!$d) {
-		$d = date('Y-m-d');
-	}
+    if (!$d) {
+        $d = date('Y-m-d');
+    }
 
-	return substr($d, 0, 4) . substr($d, 5, 2) . substr($d, 8, 2);
+    return substr($d, 0, 4) . substr($d, 5, 2) . substr($d, 8, 2);
 }
 
 /**
@@ -1263,11 +1263,11 @@ 
  *     Date au format `Ym`
  **/
 function date_anneemois($d): string {
-	if (!$d) {
-		$d = date('Y-m-d');
-	}
+    if (!$d) {
+        $d = date('Y-m-d');
+    }
 
-	return substr($d, 0, 4) . substr($d, 5, 2);
+    return substr($d, 0, 4) . substr($d, 5, 2);
 }
 
 /**
@@ -1283,13 +1283,13 @@ 
  *     Date au lundi de la même semaine au format `Ymd`
  **/
 function date_debut_semaine($annee, $mois, $jour): string {
-	$w_day = date('w', mktime(0, 0, 0, $mois, $jour, $annee));
-	if ($w_day == 0) {
-		$w_day = 7;
-	} // Gaffe: le dimanche est zero
-	$debut = $jour - $w_day + 1;
+    $w_day = date('w', mktime(0, 0, 0, $mois, $jour, $annee));
+    if ($w_day == 0) {
+        $w_day = 7;
+    } // Gaffe: le dimanche est zero
+    $debut = $jour - $w_day + 1;
 
-	return date('Ymd', mktime(0, 0, 0, $mois, $debut, $annee));
+    return date('Ymd', mktime(0, 0, 0, $mois, $debut, $annee));
 }
 
 /**
@@ -1305,11 +1305,11 @@ 
  *     Date au dimanche de la même semaine au format `Ymd`
  **/
 function date_fin_semaine($annee, $mois, $jour): string {
-	$w_day = date('w', mktime(0, 0, 0, $mois, $jour, $annee));
-	if ($w_day == 0) {
-		$w_day = 7;
-	} // Gaffe: le dimanche est zero
-	$debut = $jour - $w_day + 1;
+    $w_day = date('w', mktime(0, 0, 0, $mois, $jour, $annee));
+    if ($w_day == 0) {
+        $w_day = 7;
+    } // Gaffe: le dimanche est zero
+    $debut = $jour - $w_day + 1;
 
-	return date('Ymd', mktime(0, 0, 0, $mois, $debut + 6, $annee));
+    return date('Ymd', mktime(0, 0, 0, $mois, $debut + 6, $annee));
 }

ecrire/inc/texte_mini.php

Indentation +518 added lines, -518 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/filtres');
 include_spip('inc/lang');
@@ -38,21 +38,21 @@ 
  **/
 function definir_puce() {
 
-	// Attention au sens, qui n'est pas defini de la meme facon dans
-	// l'espace prive (spip_lang est la langue de l'interface, lang_dir
-	// celle du texte) et public (spip_lang est la langue du texte)
-	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
+    // Attention au sens, qui n'est pas defini de la meme facon dans
+    // l'espace prive (spip_lang est la langue de l'interface, lang_dir
+    // celle du texte) et public (spip_lang est la langue du texte)
+    $dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
-	if ($dir == 'rtl') {
-		$p .= '_rtl';
-	}
+    $p = 'puce' . (test_espace_prive() ? '_prive' : '');
+    if ($dir == 'rtl') {
+        $p .= '_rtl';
+    }
 
-	if (!isset($GLOBALS[$p])) {
-		$GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
-	}
+    if (!isset($GLOBALS[$p])) {
+        $GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
+    }
 
-	return $GLOBALS[$p];
+    return $GLOBALS[$p];
 }
 
 /**
@@ -66,31 +66,31 @@ 
  */
 function spip_balisage_code(string $corps, bool $bloc = false, string $attributs = '', string $langage = '') {
 
-	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
-	$class = "spip_code " . ($bloc ? 'spip_code_block' : 'spip_code_inline');
-	if ($attributs) {
-		$attributs = " " . trim($attributs);
-	}
-	if ($langage) {
-		$class .= " language-$langage";
-		$attributs .= ' data-language="'. $langage .'"';
-	}
-	if ($bloc) {
-		$html = "<div class=\"precode\">"
-		  . "<pre class=\"$class\" dir=\"ltr\" style=\"text-align: left;\"$attributs>"
-		  . "<code>"
-		  . $echap
-		  . '</code>'
-		  . '</pre>'
-		  . '</div>';
-	}
-	else {
-		$echap = str_replace("\t", "&nbsp; &nbsp; &nbsp; &nbsp; ", $echap);
-		$echap = str_replace("  ", " &nbsp;", $echap);
-		$html = "<code class=\"$class\" dir=\"ltr\"$attributs>" . $echap . '</code>';
-	}
-
-	return $html;
+    $echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
+    $class = "spip_code " . ($bloc ? 'spip_code_block' : 'spip_code_inline');
+    if ($attributs) {
+        $attributs = " " . trim($attributs);
+    }
+    if ($langage) {
+        $class .= " language-$langage";
+        $attributs .= ' data-language="'. $langage .'"';
+    }
+    if ($bloc) {
+        $html = "<div class=\"precode\">"
+            . "<pre class=\"$class\" dir=\"ltr\" style=\"text-align: left;\"$attributs>"
+            . "<code>"
+            . $echap
+            . '</code>'
+            . '</pre>'
+            . '</div>';
+    }
+    else {
+        $echap = str_replace("\t", "&nbsp; &nbsp; &nbsp; &nbsp; ", $echap);
+        $echap = str_replace("  ", " &nbsp;", $echap);
+        $html = "<code class=\"$class\" dir=\"ltr\"$attributs>" . $echap . '</code>';
+    }
+
+    return $html;
 }
 
 
@@ -98,14 +98,14 @@ 
 // dont on souhaite qu'ils provoquent un saut de paragraphe
 
 if (!defined('_BALISES_BLOCS')) {
-	define(
-		'_BALISES_BLOCS',
-		'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
-	);
+    define(
+        '_BALISES_BLOCS',
+        'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
+    );
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+    define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
 }
 
 //
@@ -116,100 +116,100 @@ 
 // une $source differente ; le script detecte automagiquement si ce qu'on
 // echappe est un div ou un span
 function code_echappement($rempl, $source = '', $no_transform = false, $mode = null) {
-	if (!strlen($rempl)) {
-		return '';
-	}
-
-	// Tester si on echappe en span ou en div
-	if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
-	}
-
-	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
-	$taille = 30000;
-	$return = '';
-	for ($i = 0; $i < strlen($rempl); $i += $taille) {
-		// Convertir en base64 et cacher dans un attribut
-		// utiliser les " pour eviter le re-encodage de ' et &#8217
-		$base64 = base64_encode(substr($rempl, $i, $taille));
-		$return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
-	}
-
-	return $return;
+    if (!strlen($rempl)) {
+        return '';
+    }
+
+    // Tester si on echappe en span ou en div
+    if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
+        $mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+    }
+
+    // Decouper en morceaux, base64 a des probleme selon la taille de la pile
+    $taille = 30000;
+    $return = '';
+    for ($i = 0; $i < strlen($rempl); $i += $taille) {
+        // Convertir en base64 et cacher dans un attribut
+        // utiliser les " pour eviter le re-encodage de ' et &#8217
+        $base64 = base64_encode(substr($rempl, $i, $taille));
+        $return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
+    }
+
+    return $return;
 }
 
 
 // Echapper les <html>...</ html>
 function traiter_echap_html_dist($regs, $options = []) {
-	return $regs[3];
+    return $regs[3];
 }
 
 // Echapper les <pre>...</ pre>
 function traiter_echap_pre_dist($regs, $options = []) {
-	// echapper les <code> dans <pre>
-	$pre = $regs[3];
-
-	// echapper les < dans <code>
-	// on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
-	if (
-		strpos($pre, '<') !== false
-		and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $m) {
-			if ($m[1] === 'code') {
-				$code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
-				$pre = str_replace($m[0], $code, $pre);
-			}
-		}
-	}
-	return "<pre>$pre</pre>";
+    // echapper les <code> dans <pre>
+    $pre = $regs[3];
+
+    // echapper les < dans <code>
+    // on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
+    if (
+        strpos($pre, '<') !== false
+        and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $m) {
+            if ($m[1] === 'code') {
+                $code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
+                $pre = str_replace($m[0], $code, $pre);
+            }
+        }
+    }
+    return "<pre>$pre</pre>";
 }
 
 // Echapper les <code>...</ code>
 function traiter_echap_code_dist($regs, $options = []) {
-	[, , $att, $corps] = $regs;
+    [, , $att, $corps] = $regs;
 
-	// ne pas mettre le <div...> s'il n'y a qu'une ligne
-	if (strpos($corps, "\n") !== false) {
-		// supprimer les sauts de ligne debut/fin
-		// (mais pas les espaces => ascii art).
-		$corps = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $corps);
+    // ne pas mettre le <div...> s'il n'y a qu'une ligne
+    if (strpos($corps, "\n") !== false) {
+        // supprimer les sauts de ligne debut/fin
+        // (mais pas les espaces => ascii art).
+        $corps = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $corps);
 
-		$echap = spip_balisage_code($corps, true, $att);
-	} else {
-		$echap = spip_balisage_code($corps, false, $att);
-	}
+        $echap = spip_balisage_code($corps, true, $att);
+    } else {
+        $echap = spip_balisage_code($corps, false, $att);
+    }
 
-	return $echap;
+    return $echap;
 }
 
 // Echapper les <cadre>...</ cadre> aka <frame>...</ frame>
 function traiter_echap_cadre_dist($regs, $options = []) {
-	$echap = trim(entites_html($regs[3]));
-	// compter les lignes un peu plus finement qu'avec les \n
-	$lignes = explode("\n", trim($echap));
-	$n = 0;
-	foreach ($lignes as $l) {
-		$n += floor(strlen($l) / 60) + 1;
-	}
-	$n = max($n, 2);
-	$echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre spip_cadre_block' dir='ltr'>$echap</textarea>";
-
-	return $echap;
+    $echap = trim(entites_html($regs[3]));
+    // compter les lignes un peu plus finement qu'avec les \n
+    $lignes = explode("\n", trim($echap));
+    $n = 0;
+    foreach ($lignes as $l) {
+        $n += floor(strlen($l) / 60) + 1;
+    }
+    $n = max($n, 2);
+    $echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre spip_cadre_block' dir='ltr'>$echap</textarea>";
+
+    return $echap;
 }
 
 function traiter_echap_frame_dist($regs, $options = []) {
-	return traiter_echap_cadre_dist($regs);
+    return traiter_echap_cadre_dist($regs);
 }
 
 function traiter_echap_script_dist($regs, $options = []) {
-	// rendre joli (et inactif) si c'est un script language=php
-	if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
-		return highlight_string($regs[0], true);
-	}
+    // rendre joli (et inactif) si c'est un script language=php
+    if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
+        return highlight_string($regs[0], true);
+    }
 
-	// Cas normal : le script passe tel quel
-	return $regs[0];
+    // Cas normal : le script passe tel quel
+    return $regs[0];
 }
 
 define('_PROTEGE_BLOCS', ',<(html|pre|code|cadre|frame|script|style)(\b[^>]*)?>(.*)</\1>,UimsS');
@@ -228,74 +228,74 @@ 
  * @return string|string[]
  */
 function echappe_html(
-	$letexte,
-	$source = '',
-	$no_transform = false,
-	$preg = '',
-	$callback_prefix = '',
-	$callback_options = []
+    $letexte,
+    $source = '',
+    $no_transform = false,
+    $preg = '',
+    $callback_prefix = '',
+    $callback_options = []
 ) {
-	if (!is_string($letexte) or !strlen($letexte)) {
-		return $letexte;
-	}
-
-	if (
-		($preg or str_contains($letexte, '<'))
-		and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $regs) {
-			$echap = '';
-			// echappements tels quels ?
-			if ($no_transform) {
-				$echap = $regs[0];
-			} else {
-				// sinon les traiter selon le cas
-				$callback_secure_prefix = ($callback_options['secure_prefix'] ?? '');
-				if (
-					function_exists($f = $callback_prefix . $callback_secure_prefix . 'traiter_echap_' . strtolower($regs[1]))
-					or function_exists($f = $f . '_dist')
-					or ($callback_secure_prefix and (
-						function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
-						or function_exists($f = $f . '_dist')
-					))
-				) {
-					$echap = $f($regs, $callback_options);
-				}
-			}
-
-			$p = strpos($letexte, (string) $regs[0]);
-			$letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
-		}
-	}
-
-	if ($no_transform) {
-		return $letexte;
-	}
-
-	// Echapper le php pour faire joli (ici, c'est pas pour la securite)
-	// seulement si on a echappe les <script>
-	// (derogatoire car on ne peut pas faire passer < ? ... ? >
-	// dans une callback autonommee
-	if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
-		if (
-			strpos($letexte, '<' . '?') !== false and preg_match_all(
-				',<[?].*($|[?]>),UisS',
-				$letexte,
-				$matches,
-				PREG_SET_ORDER
-			)
-		) {
-			foreach ($matches as $regs) {
-				$letexte = str_replace(
-					$regs[0],
-					code_echappement(highlight_string($regs[0], true), $source),
-					$letexte
-				);
-			}
-		}
-	}
-
-	return $letexte;
+    if (!is_string($letexte) or !strlen($letexte)) {
+        return $letexte;
+    }
+
+    if (
+        ($preg or str_contains($letexte, '<'))
+        and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $regs) {
+            $echap = '';
+            // echappements tels quels ?
+            if ($no_transform) {
+                $echap = $regs[0];
+            } else {
+                // sinon les traiter selon le cas
+                $callback_secure_prefix = ($callback_options['secure_prefix'] ?? '');
+                if (
+                    function_exists($f = $callback_prefix . $callback_secure_prefix . 'traiter_echap_' . strtolower($regs[1]))
+                    or function_exists($f = $f . '_dist')
+                    or ($callback_secure_prefix and (
+                        function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
+                        or function_exists($f = $f . '_dist')
+                    ))
+                ) {
+                    $echap = $f($regs, $callback_options);
+                }
+            }
+
+            $p = strpos($letexte, (string) $regs[0]);
+            $letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
+        }
+    }
+
+    if ($no_transform) {
+        return $letexte;
+    }
+
+    // Echapper le php pour faire joli (ici, c'est pas pour la securite)
+    // seulement si on a echappe les <script>
+    // (derogatoire car on ne peut pas faire passer < ? ... ? >
+    // dans une callback autonommee
+    if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
+        if (
+            strpos($letexte, '<' . '?') !== false and preg_match_all(
+                ',<[?].*($|[?]>),UisS',
+                $letexte,
+                $matches,
+                PREG_SET_ORDER
+            )
+        ) {
+            foreach ($matches as $regs) {
+                $letexte = str_replace(
+                    $regs[0],
+                    code_echappement(highlight_string($regs[0], true), $source),
+                    $letexte
+                );
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 //
@@ -303,57 +303,57 @@ 
 // Rq: $source sert a faire des echappements "a soi" qui ne sont pas nettoyes
 // par propre() : exemple dans multi et dans typo()
 function echappe_retour($letexte, $source = '', $filtre = '') {
-	if (strpos($letexte, (string) "base64$source")) {
-		# spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
-		$max_prof = 5;
-		while (
-			strpos($letexte, '<') !== false
-			and
-			preg_match_all(
-				',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
-				$letexte,
-				$regs,
-				PREG_SET_ORDER
-			)
-			and $max_prof--
-		) {
-			foreach ($regs as $reg) {
-				$rempl = base64_decode(extraire_attribut($reg[0], 'title'));
-				// recherche d'attributs supplementaires
-				$at = [];
-				foreach (['lang', 'dir'] as $attr) {
-					if ($a = extraire_attribut($reg[0], $attr)) {
-						$at[$attr] = $a;
-					}
-				}
-				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
-					foreach ($at as $attr => $a) {
-						$rempl = inserer_attribut($rempl, $attr, $a);
-					}
-				}
-				if ($filtre) {
-					$rempl = $filtre($rempl);
-				}
-				$letexte = str_replace($reg[0], $rempl, $letexte);
-			}
-		}
-	}
-
-	return $letexte;
+    if (strpos($letexte, (string) "base64$source")) {
+        # spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
+        $max_prof = 5;
+        while (
+            strpos($letexte, '<') !== false
+            and
+            preg_match_all(
+                ',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+                $letexte,
+                $regs,
+                PREG_SET_ORDER
+            )
+            and $max_prof--
+        ) {
+            foreach ($regs as $reg) {
+                $rempl = base64_decode(extraire_attribut($reg[0], 'title'));
+                // recherche d'attributs supplementaires
+                $at = [];
+                foreach (['lang', 'dir'] as $attr) {
+                    if ($a = extraire_attribut($reg[0], $attr)) {
+                        $at[$attr] = $a;
+                    }
+                }
+                if ($at) {
+                    $rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+                    foreach ($at as $attr => $a) {
+                        $rempl = inserer_attribut($rempl, $attr, $a);
+                    }
+                }
+                if ($filtre) {
+                    $rempl = $filtre($rempl);
+                }
+                $letexte = str_replace($reg[0], $rempl, $letexte);
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 // Reinserer le javascript de confiance (venant des modeles)
 
 function echappe_retour_modeles($letexte, $interdire_scripts = false) {
-	$letexte = echappe_retour($letexte);
+    $letexte = echappe_retour($letexte);
 
-	// Dans les appels directs hors squelette, securiser aussi ici
-	if ($interdire_scripts) {
-		$letexte = interdire_scripts($letexte);
-	}
+    // Dans les appels directs hors squelette, securiser aussi ici
+    if ($interdire_scripts) {
+        $letexte = interdire_scripts($letexte);
+    }
 
-	return trim($letexte);
+    return trim($letexte);
 }
 
 
@@ -381,128 +381,128 @@ 
  *     texte coupé
  **/
 function couper($texte, $taille = 50, $suite = null) {
-	if (!($length = strlen($texte)) or $taille <= 0) {
-		return '';
-	}
-	$offset = 400 + 2 * $taille;
-	while (
-		$offset < $length
-		and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
-	) {
-		$offset = 2 * $offset;
-	}
-	if (
-		$offset < $length
-		&& ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
-	) {
-		$p_tag_fermant = strpos($texte, '>', $offset);
-		if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
-			$offset = $p_tag_fermant + 1;
-		} // prolonger la coupe jusqu'au tag fermant suivant eventuel
-	}
-	$texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
-
-	if (!function_exists('nettoyer_raccourcis_typo')) {
-		include_spip('inc/lien');
-	}
-	$texte = nettoyer_raccourcis_typo($texte);
-
-	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace('/<p( [^>]*)?' . '>/', "\r\r", $texte);
-	$texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
-
-	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
-	$texte = str_replace("\n\n", "\r\r", $texte);
-
-	// supprimer les tags
-	$texte = supprimer_tags($texte);
-	$texte = trim(str_replace("\n", ' ', $texte));
-
-	// tester s'il est nécessaire de couper le texte
-	if (spip_strlen($texte) <= $taille) {
-		$points = '';
-	} else {
-		// points de suite
-		if (is_null($suite)) {
-			$suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
-		}
-		$taille_suite = spip_strlen(filtrer_entites($suite));
-
-		// couper au mot precedent (ou au début de la chaîne si c'est le premier mot)
-		// on coupe avec un caractère de plus que la taille demandée afin de pouvoir
-		// détecter si le dernier mot du texte coupé est complet ou non. ce caractère
-		// excédentaire est ensuite supprimé par l'appel à preg_replace()
-		$long = spip_substr($texte, 0, max($taille + 1 - $taille_suite, 1));
-		$u = $GLOBALS['meta']['pcre_u'];
-		$court = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
-		$points = $suite;
-
-		// trop court ? ne pas faire de (...)
-		if (spip_strlen($court) < max(0.75 * $taille, 2)) {
-			$points = '';
-			$long = spip_substr($texte, 0, $taille + 1);
-			preg_match('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, $long, $m);
-			$texte = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
-			// encore trop court ? couper au caractere
-			if (spip_strlen($texte) < 0.75 * $taille) {
-				$texte = spip_substr($long, 0, $taille);
-			}
-		} else {
-			$texte = $court;
-		}
-	}
-
-	// remettre les paragraphes
-	$texte = preg_replace("/\r\r+/", "\n\n", $texte);
-
-	// supprimer l'eventuelle entite finale mal coupee
-	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
-
-	return quote_amp(trim($texte)) . $points;
+    if (!($length = strlen($texte)) or $taille <= 0) {
+        return '';
+    }
+    $offset = 400 + 2 * $taille;
+    while (
+        $offset < $length
+        and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
+    ) {
+        $offset = 2 * $offset;
+    }
+    if (
+        $offset < $length
+        && ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
+    ) {
+        $p_tag_fermant = strpos($texte, '>', $offset);
+        if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
+            $offset = $p_tag_fermant + 1;
+        } // prolonger la coupe jusqu'au tag fermant suivant eventuel
+    }
+    $texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
+
+    if (!function_exists('nettoyer_raccourcis_typo')) {
+        include_spip('inc/lien');
+    }
+    $texte = nettoyer_raccourcis_typo($texte);
+
+    // balises de sauts de ligne et paragraphe
+    $texte = preg_replace('/<p( [^>]*)?' . '>/', "\r\r", $texte);
+    $texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
+
+    // on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
+    $texte = str_replace("\n\n", "\r\r", $texte);
+
+    // supprimer les tags
+    $texte = supprimer_tags($texte);
+    $texte = trim(str_replace("\n", ' ', $texte));
+
+    // tester s'il est nécessaire de couper le texte
+    if (spip_strlen($texte) <= $taille) {
+        $points = '';
+    } else {
+        // points de suite
+        if (is_null($suite)) {
+            $suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
+        }
+        $taille_suite = spip_strlen(filtrer_entites($suite));
+
+        // couper au mot precedent (ou au début de la chaîne si c'est le premier mot)
+        // on coupe avec un caractère de plus que la taille demandée afin de pouvoir
+        // détecter si le dernier mot du texte coupé est complet ou non. ce caractère
+        // excédentaire est ensuite supprimé par l'appel à preg_replace()
+        $long = spip_substr($texte, 0, max($taille + 1 - $taille_suite, 1));
+        $u = $GLOBALS['meta']['pcre_u'];
+        $court = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
+        $points = $suite;
+
+        // trop court ? ne pas faire de (...)
+        if (spip_strlen($court) < max(0.75 * $taille, 2)) {
+            $points = '';
+            $long = spip_substr($texte, 0, $taille + 1);
+            preg_match('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, $long, $m);
+            $texte = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
+            // encore trop court ? couper au caractere
+            if (spip_strlen($texte) < 0.75 * $taille) {
+                $texte = spip_substr($long, 0, $taille);
+            }
+        } else {
+            $texte = $court;
+        }
+    }
+
+    // remettre les paragraphes
+    $texte = preg_replace("/\r\r+/", "\n\n", $texte);
+
+    // supprimer l'eventuelle entite finale mal coupee
+    $texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
+
+    return quote_amp(trim($texte)) . $points;
 }
 
 
 function protege_js_modeles($t) {
-	if (isset($GLOBALS['visiteur_session'])) {
-		if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_JS_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_JS_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
-			}
-		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_PHP_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_PHP_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
-			}
-		}
-	}
-
-	return $t;
+    if (isset($GLOBALS['visiteur_session'])) {
+        if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_JS_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_JS_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+            }
+        }
+        if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_PHP_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_PHP_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+            }
+        }
+    }
+
+    return $t;
 }
 
 
 function echapper_faux_tags($letexte) {
-	if (strpos($letexte, '<') === false) {
-		return $letexte;
-	}
-	$textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
-
-	$letexte = '';
-	while (is_countable($textMatches) ? count($textMatches) : 0) {
-		// un texte a echapper
-		$letexte .= str_replace('<', '&lt;', array_shift($textMatches));
-		// un tag html qui a servit a faite le split
-		$letexte .= array_shift($textMatches);
-	}
-
-	return $letexte;
+    if (strpos($letexte, '<') === false) {
+        return $letexte;
+    }
+    $textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
+
+    $letexte = '';
+    while (is_countable($textMatches) ? count($textMatches) : 0) {
+        // un texte a echapper
+        $letexte .= str_replace('<', '&lt;', array_shift($textMatches));
+        // un tag html qui a servit a faite le split
+        $letexte .= array_shift($textMatches);
+    }
+
+    return $letexte;
 }
 
 /**
@@ -522,115 +522,115 @@ 
  * @return string
  */
 function echapper_html_suspect($texte, $options = [], $connect = null, $env = []) {
-	static $echapper_html_suspect;
-	if (!$texte or !is_string($texte)) {
-		return $texte;
-	}
-
-	if (!isset($echapper_html_suspect)) {
-		$echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
-	}
-	// si fonction personalisee, on delegue
-	if ($echapper_html_suspect) {
-		// on collecte le tableau d'arg minimal pour ne pas casser un appel a une fonction inc_echapper_html_suspect() selon l'ancienne signature
-		$args = [$texte, $options];
-		if ($connect or !empty($env)) {
-			$args[] = $connect;
-		}
-		if (!empty($env)) {
-			$args[] = $env;
-		}
-		return $echapper_html_suspect(...$args);
-	}
-
-	if (is_bool($options)) {
-		$options = ['strict' => $options];
-	}
-	$strict = $options['strict'] ?? true;
-
-	// pas de balise html ou pas d'attribut sur les balises ? c'est OK
-	if (
-		strpos($texte, '<') === false
-		or !str_contains($texte, '=')
-	) {
-		return $texte;
-	}
-
-	// dans le prive, on veut afficher tout echappé pour la moderation
-	if (!isset($env['espace_prive'])) {
-		// conserver le comportement historique en cas d'appel court sans env
-		$env['espace_prive'] = test_espace_prive();
-	}
-	if (!empty($env['espace_prive']) or !empty($env['wysiwyg'])) {
-
-		// quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
-		// car sinon on declenche sur les modeles ou ressources
-		if (
-			!$strict and
-			(strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
-		) {
-			return $texte;
-		}
-
-		include_spip("src/Texte/Collecteur/AbstractCollecteur");
-		include_spip("src/Texte/Collecteur/Modeles");
-		$collecteurModeles = new Spip\Texte\Collecteur\Modeles();
-		$texte = $collecteurModeles->echapper($texte);
-		$texte = echappe_js($texte);
-
-		$texte_to_check = $texte;
-		// si les raccourcis liens vont etre interprétés, il faut les expanser avant de vérifier que le html est safe
-		// car un raccourci peut etre utilisé pour faire un lien malin
-		// et un raccourci est potentiellement modifié par safehtml, ce qui fait un faux positif dans is_html_safe
-		if (!empty($options['expanser_liens'])) {
-			$texte_to_check = expanser_liens($texte_to_check, $env['connect'] ?? '', $env['env'] ?? []);
-		}
-		if (!is_html_safe($texte_to_check)) {
-			$texte = $options['texte_source_affiche'] ?? $texte;
-			$texte = preg_replace(",<(/?\w+\b[^>]*>),", "<tt>&lt;\\1</tt>", $texte);
-			$texte = str_replace('<', '&lt;', $texte);
-			$texte = str_replace('&lt;tt>', '<tt>', $texte);
-			$texte = str_replace('&lt;/tt>', '</tt>', $texte);
-			if (!function_exists('attribut_html')) {
-				include_spip('inc/filtres');
-			}
-			if (!empty($options['wrap_suspect'])) {
-				$texte = wrap($texte, $options['wrap_suspect']);
-			}
-			$texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
-		}
-
-		$texte = $collecteurModeles->retablir($texte);
-	}
-
-	// si on est là dans le public c'est le mode parano
-	// on veut donc un rendu propre et secure, et virer silencieusement ce qui est dangereux
-	else {
-		$collecteurLiens = $collecteurModeles = null;
-		if (!empty($options['expanser_liens'])) {
-			$texte = expanser_liens($texte, $env['connect'] ?? '', $env['env'] ?? []);
-		}
-		else {
-			include_spip("src/Texte/Collecteur/AbstractCollecteur");
-			include_spip("src/Texte/Collecteur/Liens");
-			include_spip("src/Texte/Collecteur/Modeles");
-
-			$collecteurLiens = new Spip\Texte\Collecteur\Liens();
-			$texte = $collecteurLiens->echapper($texte, ['sanitize_callback' => 'safehtml']);
-
-			$collecteurModeles = new Spip\Texte\Collecteur\Modeles();
-			$texte = $collecteurModeles->echapper($texte);
-		}
-		$texte = safehtml($texte);
-		if ($collecteurModeles) {
-			$texte = $collecteurModeles->retablir($texte);
-		}
-		if ($collecteurLiens) {
-			$texte = $collecteurLiens->retablir($texte);
-		}
-	}
-
-	return $texte;
+    static $echapper_html_suspect;
+    if (!$texte or !is_string($texte)) {
+        return $texte;
+    }
+
+    if (!isset($echapper_html_suspect)) {
+        $echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
+    }
+    // si fonction personalisee, on delegue
+    if ($echapper_html_suspect) {
+        // on collecte le tableau d'arg minimal pour ne pas casser un appel a une fonction inc_echapper_html_suspect() selon l'ancienne signature
+        $args = [$texte, $options];
+        if ($connect or !empty($env)) {
+            $args[] = $connect;
+        }
+        if (!empty($env)) {
+            $args[] = $env;
+        }
+        return $echapper_html_suspect(...$args);
+    }
+
+    if (is_bool($options)) {
+        $options = ['strict' => $options];
+    }
+    $strict = $options['strict'] ?? true;
+
+    // pas de balise html ou pas d'attribut sur les balises ? c'est OK
+    if (
+        strpos($texte, '<') === false
+        or !str_contains($texte, '=')
+    ) {
+        return $texte;
+    }
+
+    // dans le prive, on veut afficher tout echappé pour la moderation
+    if (!isset($env['espace_prive'])) {
+        // conserver le comportement historique en cas d'appel court sans env
+        $env['espace_prive'] = test_espace_prive();
+    }
+    if (!empty($env['espace_prive']) or !empty($env['wysiwyg'])) {
+
+        // quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
+        // car sinon on declenche sur les modeles ou ressources
+        if (
+            !$strict and
+            (strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
+        ) {
+            return $texte;
+        }
+
+        include_spip("src/Texte/Collecteur/AbstractCollecteur");
+        include_spip("src/Texte/Collecteur/Modeles");
+        $collecteurModeles = new Spip\Texte\Collecteur\Modeles();
+        $texte = $collecteurModeles->echapper($texte);
+        $texte = echappe_js($texte);
+
+        $texte_to_check = $texte;
+        // si les raccourcis liens vont etre interprétés, il faut les expanser avant de vérifier que le html est safe
+        // car un raccourci peut etre utilisé pour faire un lien malin
+        // et un raccourci est potentiellement modifié par safehtml, ce qui fait un faux positif dans is_html_safe
+        if (!empty($options['expanser_liens'])) {
+            $texte_to_check = expanser_liens($texte_to_check, $env['connect'] ?? '', $env['env'] ?? []);
+        }
+        if (!is_html_safe($texte_to_check)) {
+            $texte = $options['texte_source_affiche'] ?? $texte;
+            $texte = preg_replace(",<(/?\w+\b[^>]*>),", "<tt>&lt;\\1</tt>", $texte);
+            $texte = str_replace('<', '&lt;', $texte);
+            $texte = str_replace('&lt;tt>', '<tt>', $texte);
+            $texte = str_replace('&lt;/tt>', '</tt>', $texte);
+            if (!function_exists('attribut_html')) {
+                include_spip('inc/filtres');
+            }
+            if (!empty($options['wrap_suspect'])) {
+                $texte = wrap($texte, $options['wrap_suspect']);
+            }
+            $texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
+        }
+
+        $texte = $collecteurModeles->retablir($texte);
+    }
+
+    // si on est là dans le public c'est le mode parano
+    // on veut donc un rendu propre et secure, et virer silencieusement ce qui est dangereux
+    else {
+        $collecteurLiens = $collecteurModeles = null;
+        if (!empty($options['expanser_liens'])) {
+            $texte = expanser_liens($texte, $env['connect'] ?? '', $env['env'] ?? []);
+        }
+        else {
+            include_spip("src/Texte/Collecteur/AbstractCollecteur");
+            include_spip("src/Texte/Collecteur/Liens");
+            include_spip("src/Texte/Collecteur/Modeles");
+
+            $collecteurLiens = new Spip\Texte\Collecteur\Liens();
+            $texte = $collecteurLiens->echapper($texte, ['sanitize_callback' => 'safehtml']);
+
+            $collecteurModeles = new Spip\Texte\Collecteur\Modeles();
+            $texte = $collecteurModeles->echapper($texte);
+        }
+        $texte = safehtml($texte);
+        if ($collecteurModeles) {
+            $texte = $collecteurModeles->retablir($texte);
+        }
+        if ($collecteurLiens) {
+            $texte = $collecteurLiens->retablir($texte);
+        }
+    }
+
+    return $texte;
 }
 
 
@@ -651,52 +651,52 @@ 
  *      texte sécurisé
  **/
 function safehtml($t) {
-	static $safehtml;
-
-	if (!$t or !is_string($t)) {
-		return $t;
-	}
-	# attention safehtml nettoie deux ou trois caracteres de plus. A voir
-	if (strpos($t, '<') === false) {
-		return str_replace("\x00", '', $t);
-	}
-
-	$collecteurIdiomes = null;
-	if (stripos($t, '<:') !== false) {
-		include_spip("src/Texte/Collecteur/AbstractCollecteur");
-		include_spip("src/Texte/Collecteur/Idiomes");
-		$collecteurIdiomes = new Spip\Texte\Collecteur\Idiomes();
-		$t = $collecteurIdiomes->echapper($t);
-	}
-	$collecteurMultis = null;
-	if (stripos($t, '<multi') !== false) {
-		include_spip("src/Texte/Collecteur/AbstractCollecteur");
-		include_spip("src/Texte/Collecteur/Multis");
-		$collecteurMultis = new Spip\Texte\Collecteur\Multis();
-		$t = $collecteurMultis->echapper($t, ['sanitize_callback' => 'safehtml']);
-	}
-
-	if (!function_exists('interdire_scripts')) {
-		include_spip('inc/texte');
-	}
-	$t = interdire_scripts($t); // jolifier le php
-	$t = echappe_js($t);
-
-	if (!isset($safehtml)) {
-		$safehtml = charger_fonction('safehtml', 'inc', true);
-	}
-	if ($safehtml) {
-		$t = $safehtml($t);
-	}
-
-	if ($collecteurMultis) {
-		$t = $collecteurMultis->retablir($t);
-	}
-	if ($collecteurIdiomes) {
-		$t = $collecteurIdiomes->retablir($t);
-	}
-
-	return interdire_scripts($t); // interdire le php (2 precautions)
+    static $safehtml;
+
+    if (!$t or !is_string($t)) {
+        return $t;
+    }
+    # attention safehtml nettoie deux ou trois caracteres de plus. A voir
+    if (strpos($t, '<') === false) {
+        return str_replace("\x00", '', $t);
+    }
+
+    $collecteurIdiomes = null;
+    if (stripos($t, '<:') !== false) {
+        include_spip("src/Texte/Collecteur/AbstractCollecteur");
+        include_spip("src/Texte/Collecteur/Idiomes");
+        $collecteurIdiomes = new Spip\Texte\Collecteur\Idiomes();
+        $t = $collecteurIdiomes->echapper($t);
+    }
+    $collecteurMultis = null;
+    if (stripos($t, '<multi') !== false) {
+        include_spip("src/Texte/Collecteur/AbstractCollecteur");
+        include_spip("src/Texte/Collecteur/Multis");
+        $collecteurMultis = new Spip\Texte\Collecteur\Multis();
+        $t = $collecteurMultis->echapper($t, ['sanitize_callback' => 'safehtml']);
+    }
+
+    if (!function_exists('interdire_scripts')) {
+        include_spip('inc/texte');
+    }
+    $t = interdire_scripts($t); // jolifier le php
+    $t = echappe_js($t);
+
+    if (!isset($safehtml)) {
+        $safehtml = charger_fonction('safehtml', 'inc', true);
+    }
+    if ($safehtml) {
+        $t = $safehtml($t);
+    }
+
+    if ($collecteurMultis) {
+        $t = $collecteurMultis->retablir($t);
+    }
+    if ($collecteurIdiomes) {
+        $t = $collecteurIdiomes->retablir($t);
+    }
+
+    return interdire_scripts($t); // interdire le php (2 precautions)
 }
 
 
@@ -704,25 +704,25 @@ 
  * Detecter si un texte est "safe" ie non modifie significativement par safehtml()
  */
 function is_html_safe(string $texte): bool {
-	if ($is_html_safe = charger_fonction('is_html_safe', 'inc', true)) {
-		return $is_html_safe($texte);
-	}
-
-	// simplifier les retour ligne pour etre certain de ce que l'on compare
-	$texte = str_replace("\r\n", "\n", $texte);
-	// safehtml reduit aussi potentiellement les &nbsp;
-	$texte = str_replace("&nbsp;", " ", $texte);
-	// safehtml remplace les entités numériques
-	if (strpos($texte, '&#') !== false) {
-		$texte = unicode2charset($texte);
-	}
-
-	$texte_safe = safehtml($texte);
-
-	// on teste sur strlen car safehtml supprime le contenu dangereux
-	// mais il peut aussi changer des ' en " sur les attributs html,
-	// donc un test d'egalite est trop strict
-	return strlen($texte_safe) === strlen($texte);
+    if ($is_html_safe = charger_fonction('is_html_safe', 'inc', true)) {
+        return $is_html_safe($texte);
+    }
+
+    // simplifier les retour ligne pour etre certain de ce que l'on compare
+    $texte = str_replace("\r\n", "\n", $texte);
+    // safehtml reduit aussi potentiellement les &nbsp;
+    $texte = str_replace("&nbsp;", " ", $texte);
+    // safehtml remplace les entités numériques
+    if (strpos($texte, '&#') !== false) {
+        $texte = unicode2charset($texte);
+    }
+
+    $texte_safe = safehtml($texte);
+
+    // on teste sur strlen car safehtml supprime le contenu dangereux
+    // mais il peut aussi changer des ' en " sur les attributs html,
+    // donc un test d'egalite est trop strict
+    return strlen($texte_safe) === strlen($texte);
 }
 
 /**
@@ -743,13 +743,13 @@ 
  *     texte sans les modèles d'image
  **/
 function supprime_img($letexte, $message = null) {
-	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
-	}
-
-	return preg_replace(
-		',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
-		$message,
-		$letexte
-	);
+    if ($message === null) {
+        $message = '(' . _T('img_indisponible') . ')';
+    }
+
+    return preg_replace(
+        ',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+        $message,
+        $letexte
+    );
 }

Spacing +29 added lines, -29 removed lines

@@ -43,13 +43,13 @@ 
 	// celle du texte) et public (spip_lang est la langue du texte)
 	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
+	$p = 'puce'.(test_espace_prive() ? '_prive' : '');
 	if ($dir == 'rtl') {
 		$p .= '_rtl';
 	}
 
 	if (!isset($GLOBALS[$p])) {
-		$GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
+		$GLOBALS[$p] = '<span class="spip-puce '.$dir.'"><b>–</b></span>';
 	}
 
 	return $GLOBALS[$p];
@@ -67,13 +67,13 @@ 
 function spip_balisage_code(string $corps, bool $bloc = false, string $attributs = '', string $langage = '') {
 
 	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
-	$class = "spip_code " . ($bloc ? 'spip_code_block' : 'spip_code_inline');
+	$class = "spip_code ".($bloc ? 'spip_code_block' : 'spip_code_inline');
 	if ($attributs) {
-		$attributs = " " . trim($attributs);
+		$attributs = " ".trim($attributs);
 	}
 	if ($langage) {
 		$class .= " language-$langage";
-		$attributs .= ' data-language="'. $langage .'"';
+		$attributs .= ' data-language="'.$langage.'"';
 	}
 	if ($bloc) {
 		$html = "<div class=\"precode\">"
@@ -87,7 +87,7 @@ 
 	else {
 		$echap = str_replace("\t", "&nbsp; &nbsp; &nbsp; &nbsp; ", $echap);
 		$echap = str_replace("  ", " &nbsp;", $echap);
-		$html = "<code class=\"$class\" dir=\"ltr\"$attributs>" . $echap . '</code>';
+		$html = "<code class=\"$class\" dir=\"ltr\"$attributs>".$echap.'</code>';
 	}
 
 	return $html;
@@ -105,7 +105,7 @@ 
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+	define('_BALISES_BLOCS_REGEXP', ',</?('._BALISES_BLOCS.')[>[:space:]],iS');
 }
 
 //
@@ -122,7 +122,7 @@ 
 
 	// Tester si on echappe en span ou en div
 	if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+		$mode = preg_match(',</?('._BALISES_BLOCS.')[>[:space:]],iS', $rempl) ? 'div' : 'span';
 	}
 
 	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
@@ -157,7 +157,7 @@ 
 	) {
 		foreach ($matches as $m) {
 			if ($m[1] === 'code') {
-				$code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
+				$code = '<code'.$m[2].'>'.spip_htmlspecialchars($m[3]).'</code>';
 				$pre = str_replace($m[0], $code, $pre);
 			}
 		}
@@ -167,7 +167,7 @@ 
 
 // Echapper les <code>...</ code>
 function traiter_echap_code_dist($regs, $options = []) {
-	[, , $att, $corps] = $regs;
+	[,, $att, $corps] = $regs;
 
 	// ne pas mettre le <div...> s'il n'y a qu'une ligne
 	if (strpos($corps, "\n") !== false) {
@@ -252,11 +252,11 @@ 
 				// sinon les traiter selon le cas
 				$callback_secure_prefix = ($callback_options['secure_prefix'] ?? '');
 				if (
-					function_exists($f = $callback_prefix . $callback_secure_prefix . 'traiter_echap_' . strtolower($regs[1]))
-					or function_exists($f = $f . '_dist')
+					function_exists($f = $callback_prefix.$callback_secure_prefix.'traiter_echap_'.strtolower($regs[1]))
+					or function_exists($f = $f.'_dist')
 					or ($callback_secure_prefix and (
-						function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
-						or function_exists($f = $f . '_dist')
+						function_exists($f = $callback_prefix.'traiter_echap_'.strtolower($regs[1]))
+						or function_exists($f = $f.'_dist')
 					))
 				) {
 					$echap = $f($regs, $callback_options);
@@ -278,7 +278,7 @@ 
 	// dans une callback autonommee
 	if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
 		if (
-			strpos($letexte, '<' . '?') !== false and preg_match_all(
+			strpos($letexte, '<'.'?') !== false and preg_match_all(
 				',<[?].*($|[?]>),UisS',
 				$letexte,
 				$matches,
@@ -310,7 +310,7 @@ 
 			strpos($letexte, '<') !== false
 			and
 			preg_match_all(
-				',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+				',<(span|div)\sclass=[\'"]base64'.$source.'[\'"]\s(.*)>\s*</\1>,UmsS',
 				$letexte,
 				$regs,
 				PREG_SET_ORDER
@@ -327,7 +327,7 @@ 
 					}
 				}
 				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+					$rempl = '<'.$reg[1].'>'.$rempl.'</'.$reg[1].'>';
 					foreach ($at as $attr => $a) {
 						$rempl = inserer_attribut($rempl, $attr, $a);
 					}
@@ -408,8 +408,8 @@ 
 	$texte = nettoyer_raccourcis_typo($texte);
 
 	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace('/<p( [^>]*)?' . '>/', "\r\r", $texte);
-	$texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
+	$texte = preg_replace('/<p( [^>]*)?'.'>/', "\r\r", $texte);
+	$texte = preg_replace('/<br( [^>]*)?'.'>/', "\n", $texte);
 
 	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
 	$texte = str_replace("\n\n", "\r\r", $texte);
@@ -434,15 +434,15 @@ 
 		// excédentaire est ensuite supprimé par l'appel à preg_replace()
 		$long = spip_substr($texte, 0, max($taille + 1 - $taille_suite, 1));
 		$u = $GLOBALS['meta']['pcre_u'];
-		$court = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
+		$court = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D'.$u, "\\2", $long);
 		$points = $suite;
 
 		// trop court ? ne pas faire de (...)
 		if (spip_strlen($court) < max(0.75 * $taille, 2)) {
 			$points = '';
 			$long = spip_substr($texte, 0, $taille + 1);
-			preg_match('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, $long, $m);
-			$texte = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D' . $u, "\\2", $long);
+			preg_match('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D'.$u, $long, $m);
+			$texte = preg_replace('/(^|([^\s ])[\s ]+)([\s ]|[^\s ]+)?$/D'.$u, "\\2", $long);
 			// encore trop court ? couper au caractere
 			if (spip_strlen($texte) < 0.75 * $taille) {
 				$texte = spip_substr($long, 0, $taille);
@@ -458,7 +458,7 @@ 
 	// supprimer l'eventuelle entite finale mal coupee
 	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
 
-	return quote_amp(trim($texte)) . $points;
+	return quote_amp(trim($texte)).$points;
 }
 
 
@@ -470,16 +470,16 @@ 
 				define('_PROTEGE_JS_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript'._PROTEGE_JS_MODELES), $t);
 			}
 		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+		if (preg_match_all(',<\?php.*?($|\?'.'>),isS', $t, $r, PREG_SET_ORDER)) {
 			if (!defined('_PROTEGE_PHP_MODELES')) {
 				include_spip('inc/acces');
 				define('_PROTEGE_PHP_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'php'._PROTEGE_PHP_MODELES), $t);
 			}
 		}
 	}
@@ -597,7 +597,7 @@ 
 			if (!empty($options['wrap_suspect'])) {
 				$texte = wrap($texte, $options['wrap_suspect']);
 			}
-			$texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
+			$texte = "<mark class='danger-js' title='".attribut_html(_T('erreur_contenu_suspect'))."'>⚠️</mark> ".$texte;
 		}
 
 		$texte = $collecteurModeles->retablir($texte);
@@ -744,11 +744,11 @@ 
  **/
 function supprime_img($letexte, $message = null) {
 	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
+		$message = '('._T('img_indisponible').')';
 	}
 
 	return preg_replace(
-		',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+		',<(img|doc|emb)([0-9]+)(\|([^>]*))?'.'\s*/?'.'>,i',
 		$message,
 		$letexte
 	);

ecrire/action/confirmer_inscription.php

Indentation +44 added lines, -44 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -27,51 +27,51 @@ 
  * @return void
  */
 function action_confirmer_inscription_dist() {
-	$jeton = _request('jeton');
-	$email = _request('email');
+    $jeton = _request('jeton');
+    $email = _request('email');
 
-	include_spip('action/inscrire_auteur');
-	if (
-		$auteur = auteur_verifier_jeton($jeton)
-		and $auteur['email'] == $email
-		and $auteur['statut'] == 'nouveau'
-	) {
-		// d'abord on confirme son statut
-		$auteur = confirmer_statut_inscription($auteur);
+    include_spip('action/inscrire_auteur');
+    if (
+        $auteur = auteur_verifier_jeton($jeton)
+        and $auteur['email'] == $email
+        and $auteur['statut'] == 'nouveau'
+    ) {
+        // d'abord on confirme son statut
+        $auteur = confirmer_statut_inscription($auteur);
 
-		// OK c'est un nouvel inscrit qui confirme :
-		// on le loge => ca va confirmer son statut et c'est plus sympa
-		include_spip('inc/auth');
-		auth_loger($auteur);
+        // OK c'est un nouvel inscrit qui confirme :
+        // on le loge => ca va confirmer son statut et c'est plus sympa
+        include_spip('inc/auth');
+        auth_loger($auteur);
 
-		// et on efface son jeton
-		auteur_effacer_jeton($auteur['id_auteur']);
+        // et on efface son jeton
+        auteur_effacer_jeton($auteur['id_auteur']);
 
-		// si pas de redirection demandee, rediriger vers public ou prive selon le statut de l'auteur
-		// TODO: ne semble pas marcher si inscrit non visiteur, a debug
-		if (!_request('redirect')) {
-			// on passe id_auteur explicite pour forcer une lecture en base de toutes les infos
-			if (autoriser('ecrire', '', '', $auteur['id_auteur'])) {
-				// poser un cookie admin aussi
-				$cookie = charger_fonction('cookie', 'action');
-				$cookie('@' . $GLOBALS['visiteur_session']['login']);
-				$GLOBALS['redirect'] = _DIR_RESTREINT_ABS;
-			} else {
-				$GLOBALS['redirect'] = $GLOBALS['meta']['adresse_site'];
-			}
-		}
-	} else {
-		// lien perime :
-		if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
-			// on passe id_auteur explicite pour forcer une lecture en base de toutes les infos
-			if (autoriser('ecrire', '', '', $GLOBALS['visiteur_session']['id_auteur'])) {
-				$GLOBALS['redirect'] = _DIR_RESTREINT_ABS;
-			} else {
-				$GLOBALS['redirect'] = $GLOBALS['meta']['adresse_site'];
-			}
-		} else {
-			// rediriger vers la page de login si pas encore loge
-			$GLOBALS['redirect'] = parametre_url(generer_url_public('login', '', false), 'url', _request('redirect'));
-		}
-	}
+        // si pas de redirection demandee, rediriger vers public ou prive selon le statut de l'auteur
+        // TODO: ne semble pas marcher si inscrit non visiteur, a debug
+        if (!_request('redirect')) {
+            // on passe id_auteur explicite pour forcer une lecture en base de toutes les infos
+            if (autoriser('ecrire', '', '', $auteur['id_auteur'])) {
+                // poser un cookie admin aussi
+                $cookie = charger_fonction('cookie', 'action');
+                $cookie('@' . $GLOBALS['visiteur_session']['login']);
+                $GLOBALS['redirect'] = _DIR_RESTREINT_ABS;
+            } else {
+                $GLOBALS['redirect'] = $GLOBALS['meta']['adresse_site'];
+            }
+        }
+    } else {
+        // lien perime :
+        if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
+            // on passe id_auteur explicite pour forcer une lecture en base de toutes les infos
+            if (autoriser('ecrire', '', '', $GLOBALS['visiteur_session']['id_auteur'])) {
+                $GLOBALS['redirect'] = _DIR_RESTREINT_ABS;
+            } else {
+                $GLOBALS['redirect'] = $GLOBALS['meta']['adresse_site'];
+            }
+        } else {
+            // rediriger vers la page de login si pas encore loge
+            $GLOBALS['redirect'] = parametre_url(generer_url_public('login', '', false), 'url', _request('redirect'));
+        }
+    }
 }

ecrire/src/Compilateur/Iterateur/Data.php

Indentation +490 added lines, -490 removed lines

@@ -12,498 +12,498 @@
  */
 class Data extends AbstractIterateur 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;
-
-	/**
-	 * Constructeur
-	 *
-	 * @param  $command
-	 * @param array $info
-	 */
-	public function __construct(array $command, array $info = []) {
-		include_spip('iterateur/data');
-		$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] ?? null;
-
-		# 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;
+
+    /**
+     * Constructeur
+     *
+     * @param  $command
+     * @param array $info
+     */
+    public function __construct(array $command, array $info = []) {
+        include_spip('iterateur/data');
+        $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] ?? null;
+
+        # 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;
+    }
 }