spip / SPIP

ecrire/inc/rubriques.php

Indentation +620 added lines, -620 removed lines

@@ -18,7 +18,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -54,65 +54,65 @@ 
  * @return void
  **/
 function calculer_rubriques_if($id_rubrique, $modifs, $infos = [], $postdate = false) {
-	$statuts_publies = null;
-	$neuf = false;
-
-	// Compat avec l'ancienne signature
-	if (is_string($infos)) {
-		$infos = ['statut_ancien' => $infos];
-	}
-	if (!isset($infos['statut_ancien'])) {
-		$infos['statut_ancien'] = '';
-	}
-
-	// On recherche quels statuts tester
-	if (
-		isset($infos['objet'])
-		&& include_spip('inc/filtres')
-		&& ($declaration_statut = objet_info($infos['objet'], 'statut'))
-		&& is_array($declaration_statut)
-	) {
-		foreach ($declaration_statut as $champ_statut) {
-			if ($champ_statut['champ'] == 'statut') {
-				$statuts_publies = array_map('trim', explode(',', $champ_statut['publie']));
-				break; // stop on a trouvé le bon champ
-			}
-		}
-	} else {
-		$statuts_publies = ['publie'];
-	}
-
-	if (in_array($infos['statut_ancien'], $statuts_publies)) {
-		if (
-			isset($modifs['statut'])
-			|| isset($modifs['id_rubrique'])
-			|| $postdate && strtotime($postdate) > time()
-		) {
-			$neuf |= depublier_branche_rubrique_if($id_rubrique);
-		}
-		// ne publier que si c'est pas un postdate, ou si la date n'est pas dans le futur
-		if ($postdate) {
-			calculer_prochain_postdate(true);
-			$neuf |= (strtotime($postdate) <= time()); // par securite
-		} elseif (isset($modifs['id_rubrique'])) {
-			$neuf |= publier_branche_rubrique($modifs['id_rubrique']);
-		}
-	} elseif (isset($modifs['statut']) && in_array($modifs['statut'], $statuts_publies)) {
-		if ($postdate) {
-			calculer_prochain_postdate(true);
-			$neuf |= (strtotime($postdate) <= time()); // par securite
-		} else {
-			$neuf |= publier_branche_rubrique($id_rubrique);
-		}
-	}
-
-	if ($neuf) {
-		// Sauver la date de la derniere mise a jour (pour menu_rubriques)
-		ecrire_meta('date_calcul_rubriques', date('U'));
-	}
-
-	$langues = calculer_langues_utilisees();
-	ecrire_meta('langues_utilisees', $langues);
+    $statuts_publies = null;
+    $neuf = false;
+
+    // Compat avec l'ancienne signature
+    if (is_string($infos)) {
+        $infos = ['statut_ancien' => $infos];
+    }
+    if (!isset($infos['statut_ancien'])) {
+        $infos['statut_ancien'] = '';
+    }
+
+    // On recherche quels statuts tester
+    if (
+        isset($infos['objet'])
+        && include_spip('inc/filtres')
+        && ($declaration_statut = objet_info($infos['objet'], 'statut'))
+        && is_array($declaration_statut)
+    ) {
+        foreach ($declaration_statut as $champ_statut) {
+            if ($champ_statut['champ'] == 'statut') {
+                $statuts_publies = array_map('trim', explode(',', $champ_statut['publie']));
+                break; // stop on a trouvé le bon champ
+            }
+        }
+    } else {
+        $statuts_publies = ['publie'];
+    }
+
+    if (in_array($infos['statut_ancien'], $statuts_publies)) {
+        if (
+            isset($modifs['statut'])
+            || isset($modifs['id_rubrique'])
+            || $postdate && strtotime($postdate) > time()
+        ) {
+            $neuf |= depublier_branche_rubrique_if($id_rubrique);
+        }
+        // ne publier que si c'est pas un postdate, ou si la date n'est pas dans le futur
+        if ($postdate) {
+            calculer_prochain_postdate(true);
+            $neuf |= (strtotime($postdate) <= time()); // par securite
+        } elseif (isset($modifs['id_rubrique'])) {
+            $neuf |= publier_branche_rubrique($modifs['id_rubrique']);
+        }
+    } elseif (isset($modifs['statut']) && in_array($modifs['statut'], $statuts_publies)) {
+        if ($postdate) {
+            calculer_prochain_postdate(true);
+            $neuf |= (strtotime($postdate) <= time()); // par securite
+        } else {
+            $neuf |= publier_branche_rubrique($id_rubrique);
+        }
+    }
+
+    if ($neuf) {
+        // Sauver la date de la derniere mise a jour (pour menu_rubriques)
+        ecrire_meta('date_calcul_rubriques', date('U'));
+    }
+
+    $langues = calculer_langues_utilisees();
+    ecrire_meta('langues_utilisees', $langues);
 }
 
 
@@ -130,22 +130,22 @@ 
  *     true si le statut change effectivement
  */
 function publier_branche_rubrique($id_rubrique) {
-	$id_pred = $id_rubrique;
-	while (true) {
-		sql_updateq(
-			'spip_rubriques',
-			['statut' => 'publie', 'date' => date('Y-m-d H:i:s')],
-			'id_rubrique=' . intval($id_rubrique)
-		);
-		$id_parent = sql_getfetsel('id_parent', 'spip_rubriques AS R', 'R.id_rubrique=' . intval($id_rubrique));
-		if (!$id_parent) {
-			break;
-		}
-		$id_rubrique = $id_parent;
-	}
+    $id_pred = $id_rubrique;
+    while (true) {
+        sql_updateq(
+            'spip_rubriques',
+            ['statut' => 'publie', 'date' => date('Y-m-d H:i:s')],
+            'id_rubrique=' . intval($id_rubrique)
+        );
+        $id_parent = sql_getfetsel('id_parent', 'spip_rubriques AS R', 'R.id_rubrique=' . intval($id_rubrique));
+        if (!$id_parent) {
+            break;
+        }
+        $id_rubrique = $id_parent;
+    }
 
 #	spip_logger()->info(" publier_branche_rubrique($id_rubrique $id_pred");
-	return $id_pred != $id_rubrique;
+    return $id_pred != $id_rubrique;
 }
 
 /**
@@ -163,20 +163,20 @@ 
  *     true si le statut change effectivement
  */
 function depublier_branche_rubrique_if($id_rubrique) {
-	$date = date('Y-m-d H:i:s'); // figer la date
-
-	#	spip_logger()->info("depublier_branche_rubrique($id_rubrique ?");
-	$id_pred = $id_rubrique;
-	while ($id_pred) {
-		if (!depublier_rubrique_if($id_pred, $date)) {
-			return $id_pred != $id_rubrique;
-		}
-		// passer au parent si on a depublie
-		$r = sql_fetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id_pred));
-		$id_pred = $r['id_parent'];
-	}
-
-	return $id_pred != $id_rubrique;
+    $date = date('Y-m-d H:i:s'); // figer la date
+
+    #	spip_logger()->info("depublier_branche_rubrique($id_rubrique ?");
+    $id_pred = $id_rubrique;
+    while ($id_pred) {
+        if (!depublier_rubrique_if($id_pred, $date)) {
+            return $id_pred != $id_rubrique;
+        }
+        // passer au parent si on a depublie
+        $r = sql_fetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id_pred));
+        $id_pred = $r['id_parent'];
+    }
+
+    return $id_pred != $id_rubrique;
 }
 
 /**
@@ -193,61 +193,61 @@ 
  *    true si la rubrique a été dépubliée
  */
 function depublier_rubrique_if($id_rubrique, $date = null) {
-	if (is_null($date)) {
-		$date = date('Y-m-d H:i:s');
-	}
-	$postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
-		' AND date <= ' . sql_quote($date) : '';
-
-	if (!$id_rubrique = intval($id_rubrique)) {
-		return false;
-	}
-
-	// verifier qu'elle existe et est bien publiee
-	$r = sql_fetsel('id_rubrique,statut', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
-	if (!$r || $r['statut'] !== 'publie') {
-		return false;
-	}
-
-	// On met le nombre de chaque type d'enfants dans un tableau
-	// Le type de l'objet est au pluriel
-	$compte = [
-		'articles' => sql_countsel(
-			'spip_articles',
-			'id_rubrique=' . intval($id_rubrique) . " AND statut='publie'$postdates"
-		),
-		'rubriques' => sql_countsel('spip_rubriques', 'id_parent=' . intval($id_rubrique) . " AND statut='publie'"),
-		'documents' => sql_countsel(
-			'spip_documents AS D JOIN spip_documents_liens AS L ON D.id_document=L.id_document',
-			'L.id_objet=' . intval($id_rubrique) . " AND L.objet='rubrique' and D.mode NOT IN('logoon', 'logooff') "
-		)
-	];
-
-	// On passe le tableau des comptes dans un pipeline pour que les plugins puissent ajouter (ou retirer) des enfants
-	$compte = pipeline(
-		'objet_compte_enfants',
-		[
-			'args' => [
-				'objet' => 'rubrique',
-				'id_objet' => $id_rubrique,
-				'statut' => 'publie',
-				'date' => $date
-			],
-			'data' => $compte
-		]
-	);
-
-	// S'il y a au moins un enfant de n'importe quoi, on ne dépublie pas
-	foreach ($compte as $objet => $n) {
-		if ($n) {
-			return false;
-		}
-	}
-
-	sql_updateq('spip_rubriques', ['statut' => 'prepa'], 'id_rubrique=' . intval($id_rubrique));
+    if (is_null($date)) {
+        $date = date('Y-m-d H:i:s');
+    }
+    $postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
+        ' AND date <= ' . sql_quote($date) : '';
+
+    if (!$id_rubrique = intval($id_rubrique)) {
+        return false;
+    }
+
+    // verifier qu'elle existe et est bien publiee
+    $r = sql_fetsel('id_rubrique,statut', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
+    if (!$r || $r['statut'] !== 'publie') {
+        return false;
+    }
+
+    // On met le nombre de chaque type d'enfants dans un tableau
+    // Le type de l'objet est au pluriel
+    $compte = [
+        'articles' => sql_countsel(
+            'spip_articles',
+            'id_rubrique=' . intval($id_rubrique) . " AND statut='publie'$postdates"
+        ),
+        'rubriques' => sql_countsel('spip_rubriques', 'id_parent=' . intval($id_rubrique) . " AND statut='publie'"),
+        'documents' => sql_countsel(
+            'spip_documents AS D JOIN spip_documents_liens AS L ON D.id_document=L.id_document',
+            'L.id_objet=' . intval($id_rubrique) . " AND L.objet='rubrique' and D.mode NOT IN('logoon', 'logooff') "
+        )
+    ];
+
+    // On passe le tableau des comptes dans un pipeline pour que les plugins puissent ajouter (ou retirer) des enfants
+    $compte = pipeline(
+        'objet_compte_enfants',
+        [
+            'args' => [
+                'objet' => 'rubrique',
+                'id_objet' => $id_rubrique,
+                'statut' => 'publie',
+                'date' => $date
+            ],
+            'data' => $compte
+        ]
+    );
+
+    // S'il y a au moins un enfant de n'importe quoi, on ne dépublie pas
+    foreach ($compte as $objet => $n) {
+        if ($n) {
+            return false;
+        }
+    }
+
+    sql_updateq('spip_rubriques', ['statut' => 'prepa'], 'id_rubrique=' . intval($id_rubrique));
 
 #		spip_logger()->info("depublier_rubrique $id_pred");
-	return true;
+    return true;
 }
 
 
@@ -270,18 +270,18 @@ 
  **/
 function calculer_rubriques() {
 
-	calculer_rubriques_publiees();
+    calculer_rubriques_publiees();
 
-	// Apres chaque (de)publication
-	// recalculer les langues utilisees sur le site
-	$langues = calculer_langues_utilisees();
-	ecrire_meta('langues_utilisees', $langues);
+    // Apres chaque (de)publication
+    // recalculer les langues utilisees sur le site
+    $langues = calculer_langues_utilisees();
+    ecrire_meta('langues_utilisees', $langues);
 
-	// Sauver la date de la derniere mise a jour (pour menu_rubriques)
-	ecrire_meta('date_calcul_rubriques', date('U'));
+    // Sauver la date de la derniere mise a jour (pour menu_rubriques)
+    ecrire_meta('date_calcul_rubriques', date('U'));
 
-	// on calcule la date du prochain article post-date
-	calculer_prochain_postdate();
+    // on calcule la date du prochain article post-date
+    calculer_prochain_postdate();
 }
 
 
@@ -298,61 +298,61 @@ 
  **/
 function calculer_rubriques_publiees() {
 
-	// Mettre les compteurs a zero
-	sql_updateq('spip_rubriques', ['date_tmp' => '0000-00-00 00:00:00', 'statut_tmp' => 'prepa']);
-
-	//
-	// Publier et dater les rubriques qui ont un article publie
-	//
-
-	// Afficher les articles post-dates ?
-	$postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
-		'AND A.date <= ' . sql_quote(date('Y-m-d H:i:s')) : '';
-
-	$r = sql_select(
-		'R.id_rubrique AS id, max(A.date) AS date_h',
-		'spip_rubriques AS R JOIN spip_articles AS A ON R.id_rubrique = A.id_rubrique',
-		"A.date>R.date_tmp AND A.statut='publie' $postdates ",
-		'R.id_rubrique'
-	);
-	while ($row = sql_fetch($r)) {
-		sql_updateq(
-			'spip_rubriques',
-			['statut_tmp' => 'publie', 'date_tmp' => $row['date_h']],
-			'id_rubrique=' . intval($row['id'])
-		);
-	}
-
-	// point d'entree pour permettre a des plugins de gerer le statut
-	// autrement (par ex: toute rubrique est publiee des sa creation)
-	// Ce pipeline fait ce qu'il veut, mais s'il touche aux statuts/dates
-	// c'est statut_tmp/date_tmp qu'il doit modifier
-	// [C'est un trigger... a renommer en trig_calculer_rubriques ?]
-	pipeline('calculer_rubriques', null);
-
-
-	// Les rubriques qui ont une rubrique fille plus recente
-	// on tourne tant que les donnees remontent vers la racine.
-	do {
-		$continuer = false;
-		$r = sql_select(
-			'R.id_rubrique AS id, max(SR.date_tmp) AS date_h',
-			'spip_rubriques AS R JOIN spip_rubriques AS SR ON R.id_rubrique = SR.id_parent',
-			"(SR.date_tmp>R.date_tmp OR R.statut_tmp<>'publie') AND SR.statut_tmp='publie' ",
-			'R.id_rubrique'
-		);
-		while ($row = sql_fetch($r)) {
-			sql_updateq(
-				'spip_rubriques',
-				['statut_tmp' => 'publie', 'date_tmp' => $row['date_h']],
-				'id_rubrique=' . intval($row['id'])
-			);
-			$continuer = true;
-		}
-	} while ($continuer);
-
-	// Enregistrement des modifs
-	sql_update('spip_rubriques', ['date' => 'date_tmp', 'statut' => 'statut_tmp']);
+    // Mettre les compteurs a zero
+    sql_updateq('spip_rubriques', ['date_tmp' => '0000-00-00 00:00:00', 'statut_tmp' => 'prepa']);
+
+    //
+    // Publier et dater les rubriques qui ont un article publie
+    //
+
+    // Afficher les articles post-dates ?
+    $postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
+        'AND A.date <= ' . sql_quote(date('Y-m-d H:i:s')) : '';
+
+    $r = sql_select(
+        'R.id_rubrique AS id, max(A.date) AS date_h',
+        'spip_rubriques AS R JOIN spip_articles AS A ON R.id_rubrique = A.id_rubrique',
+        "A.date>R.date_tmp AND A.statut='publie' $postdates ",
+        'R.id_rubrique'
+    );
+    while ($row = sql_fetch($r)) {
+        sql_updateq(
+            'spip_rubriques',
+            ['statut_tmp' => 'publie', 'date_tmp' => $row['date_h']],
+            'id_rubrique=' . intval($row['id'])
+        );
+    }
+
+    // point d'entree pour permettre a des plugins de gerer le statut
+    // autrement (par ex: toute rubrique est publiee des sa creation)
+    // Ce pipeline fait ce qu'il veut, mais s'il touche aux statuts/dates
+    // c'est statut_tmp/date_tmp qu'il doit modifier
+    // [C'est un trigger... a renommer en trig_calculer_rubriques ?]
+    pipeline('calculer_rubriques', null);
+
+
+    // Les rubriques qui ont une rubrique fille plus recente
+    // on tourne tant que les donnees remontent vers la racine.
+    do {
+        $continuer = false;
+        $r = sql_select(
+            'R.id_rubrique AS id, max(SR.date_tmp) AS date_h',
+            'spip_rubriques AS R JOIN spip_rubriques AS SR ON R.id_rubrique = SR.id_parent',
+            "(SR.date_tmp>R.date_tmp OR R.statut_tmp<>'publie') AND SR.statut_tmp='publie' ",
+            'R.id_rubrique'
+        );
+        while ($row = sql_fetch($r)) {
+            sql_updateq(
+                'spip_rubriques',
+                ['statut_tmp' => 'publie', 'date_tmp' => $row['date_h']],
+                'id_rubrique=' . intval($row['id'])
+            );
+            $continuer = true;
+        }
+    } while ($continuer);
+
+    // Enregistrement des modifs
+    sql_update('spip_rubriques', ['date' => 'date_tmp', 'statut' => 'statut_tmp']);
 }
 
 /**
@@ -367,122 +367,122 @@ 
  * @return void
  **/
 function propager_les_secteurs() {
-	// Profondeur 0
-	// Toutes les rubriques racines sont de profondeur 0
-	// et fixer les id_secteur des rubriques racines
-	sql_update('spip_rubriques', ['id_secteur' => 'id_rubrique', 'profondeur' => 0], 'id_parent=0');
-	// Toute rubrique non racine est de profondeur >0
-	sql_updateq('spip_rubriques', ['profondeur' => 1], 'id_parent<>0 AND profondeur=0');
-
-	// securite : pas plus d'iteration que de rubriques dans la base
-	$maxiter = sql_countsel('spip_rubriques');
-
-	// reparer les rubriques qui n'ont pas l'id_secteur de leur parent
-	// on fait profondeur par profondeur
-
-	$prof = 0;
-	do {
-		$continuer = false;
-
-		// Par recursivite : si toutes les rubriques de profondeur $prof sont bonnes
-		// on fixe le profondeur $prof+1
-
-		// Toutes les rubriques dont le parent est de profondeur $prof ont une profondeur $prof+1
-		// on teste A.profondeur > $prof+1 car :
-		// - toutes les rubriques de profondeur 0 à $prof sont bonnes
-		// - si A.profondeur = $prof+1 c'est bon
-		// - cela nous protege de la boucle infinie en cas de reference circulaire dans les rubriques
-		$maxiter2 = $maxiter;
-		while (
-			$maxiter2--
-			&& ($rows = sql_allfetsel(
-				'A.id_rubrique AS id, R.id_secteur AS id_secteur, R.profondeur+1 as profondeur',
-				'spip_rubriques AS A JOIN spip_rubriques AS R ON A.id_parent = R.id_rubrique',
-				'R.profondeur=' . intval($prof) . ' AND (A.id_secteur <> R.id_secteur OR A.profondeur > R.profondeur+1)',
-				'',
-				'R.id_secteur',
-				'0,100'
-			))
-		) {
-			$id_secteur = null;
-			$ids = [];
-			while ($row = array_shift($rows)) {
-				if ($row['id_secteur'] !== $id_secteur) {
-					if (count($ids)) {
-						sql_updateq(
-							'spip_rubriques',
-							['id_secteur' => $id_secteur, 'profondeur' => $prof + 1],
-							sql_in('id_rubrique', $ids)
-						);
-					}
-					$id_secteur = $row['id_secteur'];
-					$ids = [];
-				}
-				$ids[] = $row['id'];
-			}
-			if (count($ids)) {
-				sql_updateq(
-					'spip_rubriques',
-					['id_secteur' => $id_secteur, 'profondeur' => $prof + 1],
-					sql_in('id_rubrique', $ids)
-				);
-			}
-		}
-
-
-		// Toutes les rubriques de profondeur $prof+1 qui n'ont pas un parent de profondeur $prof sont decalees
-		$maxiter2 = $maxiter;
-		while (
-			$maxiter2--
-			&& ($rows = sql_allfetsel(
-				'id_rubrique as id',
-				'spip_rubriques',
-				'profondeur=' . intval($prof + 1) . ' AND id_parent NOT IN (' . sql_get_select(
-					'zzz.id_rubrique',
-					'spip_rubriques AS zzz',
-					'zzz.profondeur=' . intval($prof)
-				) . ')',
-				'',
-				'',
-				'0,100'
-			))
-		) {
-			$rows = array_column($rows, 'id');
-			sql_updateq('spip_rubriques', ['profondeur' => $prof + 2], sql_in('id_rubrique', $rows));
-		}
-
-		// ici on a fini de valider $prof+1, toutes les rubriques de prondeur 0 a $prof+1 sont OK
-		// si pas de rubrique a profondeur $prof+1 pas la peine de continuer
-		// si il reste des rubriques non vues, c'est une branche morte ou reference circulaire (base foireuse)
-		// on arrete les frais
-		if (sql_countsel('spip_rubriques', 'profondeur=' . intval($prof + 1))) {
-			$prof++;
-			$continuer = true;
-		}
-	} while ($continuer && $maxiter--);
-
-	// loger si la table des rubriques semble foireuse
-	// et mettre un id_secteur=0 sur ces rubriques pour eviter toute selection par les boucles
-	if (sql_countsel('spip_rubriques', 'profondeur>' . intval($prof + 1))) {
-		spip_logger()->critical(
-			'Les rubriques de profondeur>' . ($prof + 1) . ' semblent suspectes (branches morte ou reference circulaire dans les parents)',
-		);
-		sql_update('spip_rubriques', ['id_secteur' => 0], 'profondeur>' . intval($prof + 1));
-	}
-
-	// reparer les articles
-	$r = sql_select(
-		'A.id_article AS id, R.id_secteur AS secteur',
-		'spip_articles AS A, spip_rubriques AS R',
-		'A.id_rubrique = R.id_rubrique AND A.id_secteur <> R.id_secteur'
-	);
-
-	while ($row = sql_fetch($r)) {
-		sql_update('spip_articles', ['id_secteur' => $row['secteur']], 'id_article=' . intval($row['id']));
-	}
-
-	// avertir les plugins qui peuvent faire leur mises a jour egalement
-	pipeline('trig_propager_les_secteurs', '');
+    // Profondeur 0
+    // Toutes les rubriques racines sont de profondeur 0
+    // et fixer les id_secteur des rubriques racines
+    sql_update('spip_rubriques', ['id_secteur' => 'id_rubrique', 'profondeur' => 0], 'id_parent=0');
+    // Toute rubrique non racine est de profondeur >0
+    sql_updateq('spip_rubriques', ['profondeur' => 1], 'id_parent<>0 AND profondeur=0');
+
+    // securite : pas plus d'iteration que de rubriques dans la base
+    $maxiter = sql_countsel('spip_rubriques');
+
+    // reparer les rubriques qui n'ont pas l'id_secteur de leur parent
+    // on fait profondeur par profondeur
+
+    $prof = 0;
+    do {
+        $continuer = false;
+
+        // Par recursivite : si toutes les rubriques de profondeur $prof sont bonnes
+        // on fixe le profondeur $prof+1
+
+        // Toutes les rubriques dont le parent est de profondeur $prof ont une profondeur $prof+1
+        // on teste A.profondeur > $prof+1 car :
+        // - toutes les rubriques de profondeur 0 à $prof sont bonnes
+        // - si A.profondeur = $prof+1 c'est bon
+        // - cela nous protege de la boucle infinie en cas de reference circulaire dans les rubriques
+        $maxiter2 = $maxiter;
+        while (
+            $maxiter2--
+            && ($rows = sql_allfetsel(
+                'A.id_rubrique AS id, R.id_secteur AS id_secteur, R.profondeur+1 as profondeur',
+                'spip_rubriques AS A JOIN spip_rubriques AS R ON A.id_parent = R.id_rubrique',
+                'R.profondeur=' . intval($prof) . ' AND (A.id_secteur <> R.id_secteur OR A.profondeur > R.profondeur+1)',
+                '',
+                'R.id_secteur',
+                '0,100'
+            ))
+        ) {
+            $id_secteur = null;
+            $ids = [];
+            while ($row = array_shift($rows)) {
+                if ($row['id_secteur'] !== $id_secteur) {
+                    if (count($ids)) {
+                        sql_updateq(
+                            'spip_rubriques',
+                            ['id_secteur' => $id_secteur, 'profondeur' => $prof + 1],
+                            sql_in('id_rubrique', $ids)
+                        );
+                    }
+                    $id_secteur = $row['id_secteur'];
+                    $ids = [];
+                }
+                $ids[] = $row['id'];
+            }
+            if (count($ids)) {
+                sql_updateq(
+                    'spip_rubriques',
+                    ['id_secteur' => $id_secteur, 'profondeur' => $prof + 1],
+                    sql_in('id_rubrique', $ids)
+                );
+            }
+        }
+
+
+        // Toutes les rubriques de profondeur $prof+1 qui n'ont pas un parent de profondeur $prof sont decalees
+        $maxiter2 = $maxiter;
+        while (
+            $maxiter2--
+            && ($rows = sql_allfetsel(
+                'id_rubrique as id',
+                'spip_rubriques',
+                'profondeur=' . intval($prof + 1) . ' AND id_parent NOT IN (' . sql_get_select(
+                    'zzz.id_rubrique',
+                    'spip_rubriques AS zzz',
+                    'zzz.profondeur=' . intval($prof)
+                ) . ')',
+                '',
+                '',
+                '0,100'
+            ))
+        ) {
+            $rows = array_column($rows, 'id');
+            sql_updateq('spip_rubriques', ['profondeur' => $prof + 2], sql_in('id_rubrique', $rows));
+        }
+
+        // ici on a fini de valider $prof+1, toutes les rubriques de prondeur 0 a $prof+1 sont OK
+        // si pas de rubrique a profondeur $prof+1 pas la peine de continuer
+        // si il reste des rubriques non vues, c'est une branche morte ou reference circulaire (base foireuse)
+        // on arrete les frais
+        if (sql_countsel('spip_rubriques', 'profondeur=' . intval($prof + 1))) {
+            $prof++;
+            $continuer = true;
+        }
+    } while ($continuer && $maxiter--);
+
+    // loger si la table des rubriques semble foireuse
+    // et mettre un id_secteur=0 sur ces rubriques pour eviter toute selection par les boucles
+    if (sql_countsel('spip_rubriques', 'profondeur>' . intval($prof + 1))) {
+        spip_logger()->critical(
+            'Les rubriques de profondeur>' . ($prof + 1) . ' semblent suspectes (branches morte ou reference circulaire dans les parents)',
+        );
+        sql_update('spip_rubriques', ['id_secteur' => 0], 'profondeur>' . intval($prof + 1));
+    }
+
+    // reparer les articles
+    $r = sql_select(
+        'A.id_article AS id, R.id_secteur AS secteur',
+        'spip_articles AS A, spip_rubriques AS R',
+        'A.id_rubrique = R.id_rubrique AND A.id_secteur <> R.id_secteur'
+    );
+
+    while ($row = sql_fetch($r)) {
+        sql_update('spip_articles', ['id_secteur' => $row['secteur']], 'id_article=' . intval($row['id']));
+    }
+
+    // avertir les plugins qui peuvent faire leur mises a jour egalement
+    pipeline('trig_propager_les_secteurs', '');
 }
 
 
@@ -497,23 +497,23 @@ 
  *     true si un changement a eu lieu
  **/
 function calculer_langues_rubriques_etape() {
-	$s = sql_select(
-		'A.id_rubrique AS id_rubrique, R.lang AS lang',
-		'spip_rubriques AS A, spip_rubriques AS R',
-		"A.id_parent = R.id_rubrique AND A.langue_choisie != 'oui' AND R.lang<>'' AND R.lang<>A.lang"
-	);
-
-	$t = false;
-	while ($row = sql_fetch($s)) {
-		$id_rubrique = $row['id_rubrique'];
-		$t = sql_updateq(
-			'spip_rubriques',
-			['lang' => $row['lang'], 'langue_choisie' => 'non'],
-			'id_rubrique=' . intval($id_rubrique)
-		);
-	}
-
-	return $t;
+    $s = sql_select(
+        'A.id_rubrique AS id_rubrique, R.lang AS lang',
+        'spip_rubriques AS A, spip_rubriques AS R',
+        "A.id_parent = R.id_rubrique AND A.langue_choisie != 'oui' AND R.lang<>'' AND R.lang<>A.lang"
+    );
+
+    $t = false;
+    while ($row = sql_fetch($s)) {
+        $id_rubrique = $row['id_rubrique'];
+        $t = sql_updateq(
+            'spip_rubriques',
+            ['lang' => $row['lang'], 'langue_choisie' => 'non'],
+            'id_rubrique=' . intval($id_rubrique)
+        );
+    }
+
+    return $t;
 }
 
 /**
@@ -533,38 +533,38 @@ 
  **/
 function calculer_langues_rubriques() {
 
-	// rubriques (recursivite)
-	sql_updateq(
-		'spip_rubriques',
-		['lang' => $GLOBALS['meta']['langue_site'], 'langue_choisie' => 'non'],
-		"id_parent=0 AND langue_choisie != 'oui'"
-	);
-	while (calculer_langues_rubriques_etape()) {
-		;
-	}
-
-	// articles
-	$s = sql_select(
-		'A.id_article AS id_article, R.lang AS lang',
-		'spip_articles AS A, spip_rubriques AS R',
-		"A.id_rubrique = R.id_rubrique AND A.langue_choisie != 'oui' AND (length(A.lang)=0 OR length(R.lang)>0) AND R.lang<>A.lang"
-	);
-	while ($row = sql_fetch($s)) {
-		$id_article = $row['id_article'];
-		sql_updateq(
-			'spip_articles',
-			['lang' => $row['lang'], 'langue_choisie' => 'non'],
-			'id_article=' . intval($id_article)
-		);
-	}
-
-	if ($GLOBALS['meta']['multi_rubriques'] == 'oui') {
-		$langues = calculer_langues_utilisees();
-		ecrire_meta('langues_utilisees', $langues);
-	}
-
-	// avertir les plugins qui peuvent faire leur mises a jour egalement
-	pipeline('trig_calculer_langues_rubriques', '');
+    // rubriques (recursivite)
+    sql_updateq(
+        'spip_rubriques',
+        ['lang' => $GLOBALS['meta']['langue_site'], 'langue_choisie' => 'non'],
+        "id_parent=0 AND langue_choisie != 'oui'"
+    );
+    while (calculer_langues_rubriques_etape()) {
+        ;
+    }
+
+    // articles
+    $s = sql_select(
+        'A.id_article AS id_article, R.lang AS lang',
+        'spip_articles AS A, spip_rubriques AS R',
+        "A.id_rubrique = R.id_rubrique AND A.langue_choisie != 'oui' AND (length(A.lang)=0 OR length(R.lang)>0) AND R.lang<>A.lang"
+    );
+    while ($row = sql_fetch($s)) {
+        $id_article = $row['id_article'];
+        sql_updateq(
+            'spip_articles',
+            ['lang' => $row['lang'], 'langue_choisie' => 'non'],
+            'id_article=' . intval($id_article)
+        );
+    }
+
+    if ($GLOBALS['meta']['multi_rubriques'] == 'oui') {
+        $langues = calculer_langues_utilisees();
+        ecrire_meta('langues_utilisees', $langues);
+    }
+
+    // avertir les plugins qui peuvent faire leur mises a jour egalement
+    pipeline('trig_calculer_langues_rubriques', '');
 }
 
 
@@ -581,80 +581,80 @@ 
  *    Liste des langues utilisées séparées par des virgules
  **/
 function calculer_langues_utilisees($serveur = '') {
-	include_spip('public/interfaces');
-	include_spip('public/compiler');
-	include_spip('public/composer');
-	include_spip('public/phraser_html');
-	$langues = [];
-
-	$langues[$GLOBALS['meta']['langue_site']] = 1;
-
-	include_spip('base/objets');
-	$tables = lister_tables_objets_sql();
-	$trouver_table = charger_fonction('trouver_table', 'base');
-
-	foreach (array_keys($tables) as $t) {
-		$desc = $trouver_table($t, $serveur);
-		// c'est une table avec des langues
-		if (
-			$desc['exist']
-			&& isset($desc['field']['lang'])
-			&& isset($desc['field']['langue_choisie'])
-		) {
-			$boucle = new Boucle();
-			$boucle->show = $desc;
-			$boucle->nom = 'calculer_langues_utilisees';
-			$boucle->id_boucle = $desc['table_objet'];
-			$boucle->id_table = $desc['table_objet'];
-			$boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
-			$boucle->sql_serveur = $serveur;
-			$boucle->select[] = 'DISTINCT lang';
-			$boucle->from[$desc['table_objet']] = $t;
-			$boucle->separateur[] = ',';
-			$boucle->return = '$Pile[$SP][\'lang\']';
-			$boucle->iterateur = 'sql';
-
-			$boucle->descr['nom'] = 'calculer_langues_utilisees'; // eviter notice php
-			$boucle->descr['sourcefile'] = 'internal';
-			$boucle->descr['gram'] = 'html';
-
-			$boucle = pipeline('pre_boucle', $boucle);
-
-			if (
-				isset($desc['statut'])
-				&& $desc['statut']
-			) {
-				$boucles = [
-					'calculer_langues_utilisees' => $boucle,
-				];
-				// generer un nom de fonction "anonyme" unique
-				do {
-					$functionname = 'f_calculer_langues_utilisees_' . $boucle->id_table . '_' . time() . '_' . random_int(0, mt_getrandmax());
-				} while (function_exists($functionname));
-				$code = calculer_boucle('calculer_langues_utilisees', $boucles);
-				$code = '$SP=0; $command=array();$command["connect"] = $connect = "' . $serveur . '"; $Pile=array(0=>array());' . "\n" . $code;
-				$code = 'function ' . $functionname . '(){' . $code . '};$res = ' . $functionname . '();';
-				$res = '';
-				eval($code);
-				$res = explode(',', $res);
-				foreach ($res as $lang) {
-					$langues[$lang] = 1;
-				}
-			} else {
-				$res = sql_select(implode(',', $boucle->select), $boucle->from);
-				while ($row = sql_fetch($res)) {
-					$langues[$row['lang']] = 1;
-				}
-			}
-		}
-	}
-
-	$langues = array_filter(array_keys($langues));
-	sort($langues);
-	$langues = join(',', $langues);
-	spip_logger()->info("langues utilisees: $langues");
-
-	return $langues;
+    include_spip('public/interfaces');
+    include_spip('public/compiler');
+    include_spip('public/composer');
+    include_spip('public/phraser_html');
+    $langues = [];
+
+    $langues[$GLOBALS['meta']['langue_site']] = 1;
+
+    include_spip('base/objets');
+    $tables = lister_tables_objets_sql();
+    $trouver_table = charger_fonction('trouver_table', 'base');
+
+    foreach (array_keys($tables) as $t) {
+        $desc = $trouver_table($t, $serveur);
+        // c'est une table avec des langues
+        if (
+            $desc['exist']
+            && isset($desc['field']['lang'])
+            && isset($desc['field']['langue_choisie'])
+        ) {
+            $boucle = new Boucle();
+            $boucle->show = $desc;
+            $boucle->nom = 'calculer_langues_utilisees';
+            $boucle->id_boucle = $desc['table_objet'];
+            $boucle->id_table = $desc['table_objet'];
+            $boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
+            $boucle->sql_serveur = $serveur;
+            $boucle->select[] = 'DISTINCT lang';
+            $boucle->from[$desc['table_objet']] = $t;
+            $boucle->separateur[] = ',';
+            $boucle->return = '$Pile[$SP][\'lang\']';
+            $boucle->iterateur = 'sql';
+
+            $boucle->descr['nom'] = 'calculer_langues_utilisees'; // eviter notice php
+            $boucle->descr['sourcefile'] = 'internal';
+            $boucle->descr['gram'] = 'html';
+
+            $boucle = pipeline('pre_boucle', $boucle);
+
+            if (
+                isset($desc['statut'])
+                && $desc['statut']
+            ) {
+                $boucles = [
+                    'calculer_langues_utilisees' => $boucle,
+                ];
+                // generer un nom de fonction "anonyme" unique
+                do {
+                    $functionname = 'f_calculer_langues_utilisees_' . $boucle->id_table . '_' . time() . '_' . random_int(0, mt_getrandmax());
+                } while (function_exists($functionname));
+                $code = calculer_boucle('calculer_langues_utilisees', $boucles);
+                $code = '$SP=0; $command=array();$command["connect"] = $connect = "' . $serveur . '"; $Pile=array(0=>array());' . "\n" . $code;
+                $code = 'function ' . $functionname . '(){' . $code . '};$res = ' . $functionname . '();';
+                $res = '';
+                eval($code);
+                $res = explode(',', $res);
+                foreach ($res as $lang) {
+                    $langues[$lang] = 1;
+                }
+            } else {
+                $res = sql_select(implode(',', $boucle->select), $boucle->from);
+                while ($row = sql_fetch($res)) {
+                    $langues[$row['lang']] = 1;
+                }
+            }
+        }
+    }
+
+    $langues = array_filter(array_keys($langues));
+    sort($langues);
+    $langues = join(',', $langues);
+    spip_logger()->info("langues utilisees: $langues");
+
+    return $langues;
 }
 
 /**
@@ -671,9 +671,9 @@ 
  *     incluant les rubriques noeuds et toutes leurs descendances
  */
 function calcul_branche_in($id) {
-	$calcul_branche_in = charger_fonction('calcul_branche_in', 'inc');
+    $calcul_branche_in = charger_fonction('calcul_branche_in', 'inc');
 
-	return $calcul_branche_in($id);
+    return $calcul_branche_in($id);
 }
 
 /**
@@ -691,9 +691,9 @@ 
  *     incluant les rubriques transmises et toutes leurs parentées
  */
 function calcul_hierarchie_in($id, $tout = true) {
-	$calcul_hierarchie_in = charger_fonction('calcul_hierarchie_in', 'inc');
+    $calcul_hierarchie_in = charger_fonction('calcul_hierarchie_in', 'inc');
 
-	return $calcul_hierarchie_in($id, $tout);
+    return $calcul_hierarchie_in($id, $tout);
 }
 
 
@@ -714,40 +714,40 @@ 
  *     incluant les rubriques noeuds et toutes leurs descendances
  */
 function inc_calcul_branche_in_dist($id) {
-	static $b = [];
-
-	// normaliser $id qui a pu arriver comme un array, comme un entier, ou comme une chaine NN,NN,NN
-	if (!is_array($id)) {
-		$id = explode(',', $id);
-	}
-	$id = join(',', array_map('intval', $id));
-	if (isset($b[$id])) {
-		return $b[$id];
-	}
-
-	// Notre branche commence par la rubrique de depart
-	$branche = $r = $id;
-
-	// On ajoute une generation (les filles de la generation precedente)
-	// jusqu'a epuisement, en se protegeant des references circulaires
-	$maxiter = 10000;
-	while (
-		$maxiter-- && ($filles = sql_allfetsel(
-			'id_rubrique',
-			'spip_rubriques',
-			sql_in('id_parent', $r) . ' AND ' . sql_in('id_rubrique', $r, 'NOT')
-		))
-	) {
-		$r = join(',', array_column($filles, 'id_rubrique'));
-		$branche .= ',' . $r;
-	}
-
-	# securite pour ne pas plomber la conso memoire sur les sites prolifiques
-	if (strlen($branche) < 10000) {
-		$b[$id] = $branche;
-	}
-
-	return $branche;
+    static $b = [];
+
+    // normaliser $id qui a pu arriver comme un array, comme un entier, ou comme une chaine NN,NN,NN
+    if (!is_array($id)) {
+        $id = explode(',', $id);
+    }
+    $id = join(',', array_map('intval', $id));
+    if (isset($b[$id])) {
+        return $b[$id];
+    }
+
+    // Notre branche commence par la rubrique de depart
+    $branche = $r = $id;
+
+    // On ajoute une generation (les filles de la generation precedente)
+    // jusqu'a epuisement, en se protegeant des references circulaires
+    $maxiter = 10000;
+    while (
+        $maxiter-- && ($filles = sql_allfetsel(
+            'id_rubrique',
+            'spip_rubriques',
+            sql_in('id_parent', $r) . ' AND ' . sql_in('id_rubrique', $r, 'NOT')
+        ))
+    ) {
+        $r = join(',', array_column($filles, 'id_rubrique'));
+        $branche .= ',' . $r;
+    }
+
+    # securite pour ne pas plomber la conso memoire sur les sites prolifiques
+    if (strlen($branche) < 10000) {
+        $b[$id] = $branche;
+    }
+
+    return $branche;
 }
 
 
@@ -769,45 +769,45 @@ 
  *     incluant les rubriques transmises et toutes leurs parentées
  */
 function inc_calcul_hierarchie_in_dist($id, $tout = true) {
-	static $b = [];
-
-	// normaliser $id qui a pu arriver comme un array, comme un entier, ou comme une chaine NN,NN,NN
-	if (!is_array($id)) {
-		$id = explode(',', $id);
-	}
-	$id = join(',', array_map('intval', $id));
-
-	if (isset($b[$id])) {
-		// Notre branche commence par la rubrique de depart si $tout=true
-		return $tout ? (strlen($b[$id]) ? $b[$id] . ",$id" : $id) : $b[$id];
-	}
-
-	$hier = '';
-
-	// On ajoute une generation (les filles de la generation precedente)
-	// jusqu'a epuisement, en se protegeant des references circulaires
-	$ids_nouveaux_parents = $id;
-	$maxiter = 10000;
-	while (
-		$maxiter-- && ($parents = sql_allfetsel(
-			'id_parent',
-			'spip_rubriques',
-			sql_in('id_rubrique', $ids_nouveaux_parents) . ' AND ' . sql_in('id_parent', $hier, 'NOT')
-		))
-	) {
-		$ids_nouveaux_parents = join(',', array_column($parents, 'id_parent'));
-		$hier = $ids_nouveaux_parents . (strlen($hier) ? ',' . $hier : '');
-	}
-
-	# securite pour ne pas plomber la conso memoire sur les sites prolifiques
-	if (strlen($hier) < 10000) {
-		$b[$id] = $hier;
-	}
-
-	// Notre branche commence par la rubrique de depart si $tout=true
-	$hier = $tout ? (strlen($hier) ? "$hier,$id" : $id) : $hier;
-
-	return $hier;
+    static $b = [];
+
+    // normaliser $id qui a pu arriver comme un array, comme un entier, ou comme une chaine NN,NN,NN
+    if (!is_array($id)) {
+        $id = explode(',', $id);
+    }
+    $id = join(',', array_map('intval', $id));
+
+    if (isset($b[$id])) {
+        // Notre branche commence par la rubrique de depart si $tout=true
+        return $tout ? (strlen($b[$id]) ? $b[$id] . ",$id" : $id) : $b[$id];
+    }
+
+    $hier = '';
+
+    // On ajoute une generation (les filles de la generation precedente)
+    // jusqu'a epuisement, en se protegeant des references circulaires
+    $ids_nouveaux_parents = $id;
+    $maxiter = 10000;
+    while (
+        $maxiter-- && ($parents = sql_allfetsel(
+            'id_parent',
+            'spip_rubriques',
+            sql_in('id_rubrique', $ids_nouveaux_parents) . ' AND ' . sql_in('id_parent', $hier, 'NOT')
+        ))
+    ) {
+        $ids_nouveaux_parents = join(',', array_column($parents, 'id_parent'));
+        $hier = $ids_nouveaux_parents . (strlen($hier) ? ',' . $hier : '');
+    }
+
+    # securite pour ne pas plomber la conso memoire sur les sites prolifiques
+    if (strlen($hier) < 10000) {
+        $b[$id] = $hier;
+    }
+
+    // Notre branche commence par la rubrique de depart si $tout=true
+    $hier = $tout ? (strlen($hier) ? "$hier,$id" : $id) : $hier;
+
+    return $hier;
 }
 
 
@@ -825,47 +825,47 @@ 
  * @return void
  **/
 function calculer_prochain_postdate($check = false) {
-	include_spip('base/abstract_sql');
-	if ($check) {
-		$postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
-			'AND A.date <= ' . sql_quote(date('Y-m-d H:i:s')) : '';
-
-		$r = sql_select(
-			'DISTINCT A.id_rubrique AS id',
-			'spip_articles AS A LEFT JOIN spip_rubriques AS R ON A.id_rubrique=R.id_rubrique',
-			"R.statut != 'publie' AND A.statut='publie'$postdates"
-		);
-		while ($row = sql_fetch($r)) {
-			publier_branche_rubrique($row['id']);
-		}
-
-		pipeline('trig_calculer_prochain_postdate', '');
-	}
-
-	$t = sql_fetsel(
-		'date',
-		'spip_articles',
-		"statut='publie' AND date > " . sql_quote(date('Y-m-d H:i:s')),
-		'',
-		'date',
-		'1'
-	);
-
-	if ($t) {
-		$t = $t['date'];
-		if (
-			!isset($GLOBALS['meta']['date_prochain_postdate'])
-			|| $t <> $GLOBALS['meta']['date_prochain_postdate']
-		) {
-			ecrire_meta('date_prochain_postdate', strtotime($t));
-			ecrire_meta('derniere_modif', time());
-		}
-	} else {
-		effacer_meta('date_prochain_postdate');
-		ecrire_meta('derniere_modif', time());
-	}
-
-	spip_logger()->info("prochain postdate: $t");
+    include_spip('base/abstract_sql');
+    if ($check) {
+        $postdates = ($GLOBALS['meta']['post_dates'] == 'non') ?
+            'AND A.date <= ' . sql_quote(date('Y-m-d H:i:s')) : '';
+
+        $r = sql_select(
+            'DISTINCT A.id_rubrique AS id',
+            'spip_articles AS A LEFT JOIN spip_rubriques AS R ON A.id_rubrique=R.id_rubrique',
+            "R.statut != 'publie' AND A.statut='publie'$postdates"
+        );
+        while ($row = sql_fetch($r)) {
+            publier_branche_rubrique($row['id']);
+        }
+
+        pipeline('trig_calculer_prochain_postdate', '');
+    }
+
+    $t = sql_fetsel(
+        'date',
+        'spip_articles',
+        "statut='publie' AND date > " . sql_quote(date('Y-m-d H:i:s')),
+        '',
+        'date',
+        '1'
+    );
+
+    if ($t) {
+        $t = $t['date'];
+        if (
+            !isset($GLOBALS['meta']['date_prochain_postdate'])
+            || $t <> $GLOBALS['meta']['date_prochain_postdate']
+        ) {
+            ecrire_meta('date_prochain_postdate', strtotime($t));
+            ecrire_meta('derniere_modif', time());
+        }
+    } else {
+        effacer_meta('date_prochain_postdate');
+        ecrire_meta('derniere_modif', time());
+    }
+
+    spip_logger()->info("prochain postdate: $t");
 }
 
 /**
@@ -890,62 +890,62 @@ 
  */
 function creer_rubrique_nommee($titre, $id_parent = 0, $serveur = '') {
 
-	// eclater l'arborescence demandee
-	// echapper les </multi> et autres balises fermantes html
-	$titre = preg_replace(',</([a-z][^>]*)>,ims', "<@\\1>", $titre);
-	$arbo = explode('/', preg_replace(',^/,', '', $titre));
-	include_spip('base/abstract_sql');
-	foreach ($arbo as $titre) {
-		// retablir les </multi> et autres balises fermantes html
-		$titre = preg_replace(',<@([a-z][^>]*)>,ims', "</\\1>", $titre);
-		$r = sql_getfetsel(
-			'id_rubrique',
-			'spip_rubriques',
-			'titre = ' . sql_quote($titre) . ' AND id_parent=' . intval($id_parent),
-			$groupby = [],
-			$orderby = [],
-			$limit = '',
-			$having = [],
-			$serveur
-		);
-		if ($r !== null) {
-			$id_parent = $r;
-		} else {
-			$id_rubrique = sql_insertq('spip_rubriques', [
-					'titre' => $titre,
-					'id_parent' => $id_parent,
-					'statut' => 'prepa'
-				], $desc = [], $serveur);
-			if ($id_parent > 0) {
-				$data = sql_fetsel(
-					'id_secteur,lang',
-					'spip_rubriques',
-					"id_rubrique=$id_parent",
-					$groupby = [],
-					$orderby = [],
-					$limit = '',
-					$having = [],
-					$serveur
-				);
-				$id_secteur = $data['id_secteur'];
-				$lang = $data['lang'];
-			} else {
-				$id_secteur = $id_rubrique;
-				$lang = $GLOBALS['meta']['langue_site'];
-			}
-
-			sql_updateq(
-				'spip_rubriques',
-				['id_secteur' => $id_secteur, 'lang' => $lang],
-				'id_rubrique=' . intval($id_rubrique),
-				[],
-				$serveur
-			);
-
-			// pour la recursion
-			$id_parent = $id_rubrique;
-		}
-	}
-
-	return intval($id_parent);
+    // eclater l'arborescence demandee
+    // echapper les </multi> et autres balises fermantes html
+    $titre = preg_replace(',</([a-z][^>]*)>,ims', "<@\\1>", $titre);
+    $arbo = explode('/', preg_replace(',^/,', '', $titre));
+    include_spip('base/abstract_sql');
+    foreach ($arbo as $titre) {
+        // retablir les </multi> et autres balises fermantes html
+        $titre = preg_replace(',<@([a-z][^>]*)>,ims', "</\\1>", $titre);
+        $r = sql_getfetsel(
+            'id_rubrique',
+            'spip_rubriques',
+            'titre = ' . sql_quote($titre) . ' AND id_parent=' . intval($id_parent),
+            $groupby = [],
+            $orderby = [],
+            $limit = '',
+            $having = [],
+            $serveur
+        );
+        if ($r !== null) {
+            $id_parent = $r;
+        } else {
+            $id_rubrique = sql_insertq('spip_rubriques', [
+                    'titre' => $titre,
+                    'id_parent' => $id_parent,
+                    'statut' => 'prepa'
+                ], $desc = [], $serveur);
+            if ($id_parent > 0) {
+                $data = sql_fetsel(
+                    'id_secteur,lang',
+                    'spip_rubriques',
+                    "id_rubrique=$id_parent",
+                    $groupby = [],
+                    $orderby = [],
+                    $limit = '',
+                    $having = [],
+                    $serveur
+                );
+                $id_secteur = $data['id_secteur'];
+                $lang = $data['lang'];
+            } else {
+                $id_secteur = $id_rubrique;
+                $lang = $GLOBALS['meta']['langue_site'];
+            }
+
+            sql_updateq(
+                'spip_rubriques',
+                ['id_secteur' => $id_secteur, 'lang' => $lang],
+                'id_rubrique=' . intval($id_rubrique),
+                [],
+                $serveur
+            );
+
+            // pour la recursion
+            $id_parent = $id_rubrique;
+        }
+    }
+
+    return intval($id_parent);
 }

ecrire/inc/securiser_action.php

Indentation +174 added lines, -174 removed lines

@@ -15,10 +15,10 @@ 
  * @package SPIP\Core\Actions
  **/
 
- use Spip\Chiffrer\SpipCles;
+    use Spip\Chiffrer\SpipCles;
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -51,19 +51,19 @@ 
  * @return array|string
  */
 function inc_securiser_action_dist($action = '', $arg = '', $redirect = '', $mode = false, $att = '', $public = false) {
-	if ($action) {
-		return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
-	} else {
-		$arg = _request('arg');
-		$hash = _request('hash');
-		$action = _request('action') ?: _request('formulaire_action');
-		if ($a = verifier_action_auteur("$action-$arg", $hash)) {
-			return $arg;
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	}
+    if ($action) {
+        return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
+    } else {
+        $arg = _request('arg');
+        $hash = _request('hash');
+        $action = _request('action') ?: _request('formulaire_action');
+        if ($a = verifier_action_auteur("$action-$arg", $hash)) {
+            return $arg;
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    }
 }
 
 /**
@@ -82,29 +82,29 @@ 
  */
 function demander_confirmation_avant_action($titre, $titre_bouton, $url_action = null) {
 
-	if (!$url_action) {
-		$url_action = self();
-		$action = _request('action');
-		$url_action = parametre_url($url_action, 'action', $action, '&');
-	}
-	else {
-		$action = parametre_url($url_action, 'action');
-	}
-
-	$arg = parametre_url($url_action, 'arg');
-	$confirm = md5("$action:$arg:" . realpath(__FILE__));
-	if (_request('confirm_action') === $confirm) {
-		return true;
-	}
-
-	$url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
-	include_spip('inc/filtres');
-	$bouton_action = bouton_action($titre_bouton, $url_confirm);
-	$corps = "<div style='text-align:center;'>$bouton_action</div>";
-
-	include_spip('inc/minipres');
-	echo minipres($titre, $corps);
-	exit;
+    if (!$url_action) {
+        $url_action = self();
+        $action = _request('action');
+        $url_action = parametre_url($url_action, 'action', $action, '&');
+    }
+    else {
+        $action = parametre_url($url_action, 'action');
+    }
+
+    $arg = parametre_url($url_action, 'arg');
+    $confirm = md5("$action:$arg:" . realpath(__FILE__));
+    if (_request('confirm_action') === $confirm) {
+        return true;
+    }
+
+    $url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
+    include_spip('inc/filtres');
+    $bouton_action = bouton_action($titre_bouton, $url_confirm);
+    $corps = "<div style='text-align:center;'>$bouton_action</div>";
+
+    include_spip('inc/minipres');
+    echo minipres($titre, $corps);
+    exit;
 }
 
 /**
@@ -135,34 +135,34 @@ 
  */
 function securiser_action_auteur($action, $arg, $redirect = '', $mode = false, $att = '', $public = false) {
 
-	// mode URL ou array
-	if (!is_string($mode)) {
-		$hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
-
-		$r = rawurlencode($redirect);
-		if ($mode === -1) {
-			return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
-		} else {
-			return generer_url_action(
-				$action,
-				'arg=' . rawurlencode($arg) . "&hash=$hash" . ($r ? "&redirect=$r" : ''),
-				$mode,
-				$public
-			);
-		}
-	}
-
-	// mode formulaire
-	$hash = calculer_action_auteur("$action-$arg");
-	$att .= " style='margin: 0px; border: 0px'";
-	if ($redirect) {
-		$redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
-	}
-	$mode .= $redirect . "
+    // mode URL ou array
+    if (!is_string($mode)) {
+        $hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
+
+        $r = rawurlencode($redirect);
+        if ($mode === -1) {
+            return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
+        } else {
+            return generer_url_action(
+                $action,
+                'arg=' . rawurlencode($arg) . "&hash=$hash" . ($r ? "&redirect=$r" : ''),
+                $mode,
+                $public
+            );
+        }
+    }
+
+    // mode formulaire
+    $hash = calculer_action_auteur("$action-$arg");
+    $att .= " style='margin: 0px; border: 0px'";
+    if ($redirect) {
+        $redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
+    }
+    $mode .= $redirect . "
 <input name='hash' type='hidden' value='$hash' />
 <input name='arg' type='hidden' value='$arg' />";
 
-	return generer_form_action($action, $mode, $att, $public);
+    return generer_form_action($action, $mode, $att, $public);
 }
 
 /**
@@ -172,46 +172,46 @@ 
  * @return array
  */
 function caracteriser_auteur($id_auteur = null) {
-	static $caracterisation = [];
-
-	if (is_null($id_auteur) && !isset($GLOBALS['visiteur_session']['id_auteur'])) {
-		include_spip('inc/session');
-		// si l'auteur courant n'est pas connu alors qu'il peut demander une action
-		// c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
-		// S'il n'avait pas le droit de realiser cette action, le hash sera faux.
-		if ($cookie = lire_cookie_session()) {
-			return [intval($cookie), ''];
-			// Necessaire aux forums anonymes.
-			// Pour le reste, ca echouera.
-		} else {
-			return ['0', ''];
-		}
-	}
-	// Eviter l'acces SQL si le pass est connu de PHP
-	if (is_null($id_auteur)) {
-		$id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
-		if (isset($GLOBALS['visiteur_session']['pass']) && $GLOBALS['visiteur_session']['pass']) {
-			return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
-		}
-	}
-
-	if (isset($caracterisation[$id_auteur])) {
-		return $caracterisation[$id_auteur];
-	}
-
-	if ($id_auteur) {
-		include_spip('base/abstract_sql');
-		$t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
-		if ($t) {
-			return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	} // Visiteur anonyme, pour ls forums par exemple
-	else {
-		return ['0', ''];
-	}
+    static $caracterisation = [];
+
+    if (is_null($id_auteur) && !isset($GLOBALS['visiteur_session']['id_auteur'])) {
+        include_spip('inc/session');
+        // si l'auteur courant n'est pas connu alors qu'il peut demander une action
+        // c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
+        // S'il n'avait pas le droit de realiser cette action, le hash sera faux.
+        if ($cookie = lire_cookie_session()) {
+            return [intval($cookie), ''];
+            // Necessaire aux forums anonymes.
+            // Pour le reste, ca echouera.
+        } else {
+            return ['0', ''];
+        }
+    }
+    // Eviter l'acces SQL si le pass est connu de PHP
+    if (is_null($id_auteur)) {
+        $id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
+        if (isset($GLOBALS['visiteur_session']['pass']) && $GLOBALS['visiteur_session']['pass']) {
+            return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
+        }
+    }
+
+    if (isset($caracterisation[$id_auteur])) {
+        return $caracterisation[$id_auteur];
+    }
+
+    if ($id_auteur) {
+        include_spip('base/abstract_sql');
+        $t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
+        if ($t) {
+            return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    } // Visiteur anonyme, pour ls forums par exemple
+    else {
+        return ['0', ''];
+    }
 }
 
 /**
@@ -220,31 +220,31 @@ 
  * et verifier la legitimite de l'appel a l'action
  */
 function _action_auteur(string $action, int $id_auteur, #[\SensitiveParameter] ?string $pass, string $alea): string {
-	static $sha = [];
-	$pass ??= '';
-	$entry = "$action:$id_auteur:$pass:$alea";
-	if (!isset($sha[$entry])) {
-		$sha[$entry] = hash_hmac('sha256', "$action::$id_auteur", "$pass::" . _action_get_alea($alea));
-	}
-
-	return $sha[$entry];
+    static $sha = [];
+    $pass ??= '';
+    $entry = "$action:$id_auteur:$pass:$alea";
+    if (!isset($sha[$entry])) {
+        $sha[$entry] = hash_hmac('sha256', "$action::$id_auteur", "$pass::" . _action_get_alea($alea));
+    }
+
+    return $sha[$entry];
 }
 
 function _action_get_alea(string $alea): string {
-	if (!isset($GLOBALS['meta'][$alea])) {
-		$exec = _request('exec');
-		if (!$exec || !autoriser_sans_cookie($exec)) {
-			include_spip('inc/acces');
-			charger_aleas();
-			if (empty($GLOBALS['meta'][$alea])) {
-				include_spip('inc/minipres');
-				echo minipres();
-				spip_logger()->info("$alea indisponible");
-				exit;
-			}
-		}
-	}
-	return $GLOBALS['meta'][$alea] ?? '';
+    if (!isset($GLOBALS['meta'][$alea])) {
+        $exec = _request('exec');
+        if (!$exec || !autoriser_sans_cookie($exec)) {
+            include_spip('inc/acces');
+            charger_aleas();
+            if (empty($GLOBALS['meta'][$alea])) {
+                include_spip('inc/minipres');
+                echo minipres();
+                spip_logger()->info("$alea indisponible");
+                exit;
+            }
+        }
+    }
+    return $GLOBALS['meta'][$alea] ?? '';
 }
 
 /**
@@ -255,9 +255,9 @@ 
  * @return string
  */
 function calculer_action_auteur($action, $id_auteur = null) {
-	[$id_auteur, $pass] = caracteriser_auteur($id_auteur);
+    [$id_auteur, $pass] = caracteriser_auteur($id_auteur);
 
-	return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
+    return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
 }
 
 
@@ -270,9 +270,9 @@ 
  * @return bool
  */
 function verifier_action_auteur($action, $hash) {
-	[$id_auteur, $pass] = caracteriser_auteur();
-	return hash_equals($hash, _action_auteur($action, $id_auteur, $pass, 'alea_ephemere'))
-		|| hash_equals($hash, _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien'));
+    [$id_auteur, $pass] = caracteriser_auteur();
+    return hash_equals($hash, _action_auteur($action, $id_auteur, $pass, 'alea_ephemere'))
+        || hash_equals($hash, _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien'));
 }
 
 //
@@ -287,7 +287,7 @@ 
  * @return string
  */
 function secret_du_site() {
-	return SpipCles::secret_du_site();
+    return SpipCles::secret_du_site();
 }
 
 /**
@@ -297,7 +297,7 @@ 
  * @return string
  */
 function calculer_cle_action($action) {
-	return hash_hmac('sha256', $action, secret_du_site());
+    return hash_hmac('sha256', $action, secret_du_site());
 }
 
 /**
@@ -308,7 +308,7 @@ 
  * @return bool
  */
 function verifier_cle_action($action, #[\SensitiveParameter] $cle) {
-	return hash_equals($cle, calculer_cle_action($action));
+    return hash_equals($cle, calculer_cle_action($action));
 }
 
 
@@ -325,17 +325,17 @@ 
  * @return string Token, de la forme "{id}*{hash}"
  */
 function calculer_token_previsu($url, $id_auteur = null, $alea = 'alea_ephemere') {
-	if (is_null($id_auteur) && !empty($GLOBALS['visiteur_session']['id_auteur'])) {
-		$id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
-	}
-	if (!$id_auteur = (int) $id_auteur) {
-		return '';
-	}
-	// On nettoie l’URL de tous les var_.
-	$url = nettoyer_uri_var($url);
-
-	$token = _action_auteur('previsualiser-' . $url, $id_auteur, secret_du_site(), $alea);
-	return "$id_auteur-$token";
+    if (is_null($id_auteur) && !empty($GLOBALS['visiteur_session']['id_auteur'])) {
+        $id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
+    }
+    if (!$id_auteur = (int) $id_auteur) {
+        return '';
+    }
+    // On nettoie l’URL de tous les var_.
+    $url = nettoyer_uri_var($url);
+
+    $token = _action_auteur('previsualiser-' . $url, $id_auteur, secret_du_site(), $alea);
+    return "$id_auteur-$token";
 }
 
 
@@ -353,31 +353,31 @@ 
  *     + Tableau (id auteur, type d’objet, id_objet) sinon.
  */
 function verifier_token_previsu(#[\SensitiveParameter] $token) {
-	// retrouver auteur / hash
-	$e = explode('-', $token, 2);
-	if (count($e) == 2 && is_numeric(reset($e))) {
-		$id_auteur = (int) reset($e);
-	} else {
-		return false;
-	}
-
-	// calculer le type et id de l’url actuelle
-	include_spip('inc/urls');
-	include_spip('inc/filtres_mini');
-	$url = url_absolue(self());
-
-	// verifier le token
-	$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
-	if (!$_token || !hash_equals($token, $_token)) {
-		$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
-		if (!$_token || !hash_equals($token, $_token)) {
-			return false;
-		}
-	}
-
-	return [
-		'id_auteur' => $id_auteur,
-	];
+    // retrouver auteur / hash
+    $e = explode('-', $token, 2);
+    if (count($e) == 2 && is_numeric(reset($e))) {
+        $id_auteur = (int) reset($e);
+    } else {
+        return false;
+    }
+
+    // calculer le type et id de l’url actuelle
+    include_spip('inc/urls');
+    include_spip('inc/filtres_mini');
+    $url = url_absolue(self());
+
+    // verifier le token
+    $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
+    if (!$_token || !hash_equals($token, $_token)) {
+        $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
+        if (!$_token || !hash_equals($token, $_token)) {
+            return false;
+        }
+    }
+
+    return [
+        'id_auteur' => $id_auteur,
+    ];
 }
 
 /**
@@ -386,9 +386,9 @@ 
  * @return bool|array
  */
 function decrire_token_previsu() {
-	static $desc = null;
-	if (is_null($desc)) {
-		$desc = ($token = _request('var_previewtoken')) ? verifier_token_previsu($token) : false;
-	}
-	return $desc;
+    static $desc = null;
+    if (is_null($desc)) {
+        $desc = ($token = _request('var_previewtoken')) ? verifier_token_previsu($token) : false;
+    }
+    return $desc;
 }

ecrire/inc/charsets.php

Indentation +632 added lines, -632 removed lines

@@ -21,7 +21,7 @@ 
 
 // securité
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // se faciliter la lecture du charset
@@ -31,19 +31,19 @@ 
  * Initialisation
  */
 function init_charset(): void {
-	// Initialisation
-	$GLOBALS['CHARSET'] = [];
-
-	// noter a l'occasion dans la meta pcre_u notre capacite a utiliser le flag /u
-	// dans les preg_replace pour ne pas casser certaines lettres accentuees :
-	// en utf-8 chr(195).chr(160) = a` alors qu'en iso-latin chr(160) = nbsp
-	if (
-		!isset($GLOBALS['meta']['pcre_u'])
-		|| isset($_GET['var_mode']) && !isset($_GET['var_profile'])
-	) {
-		include_spip('inc/meta');
-		ecrire_meta('pcre_u', (lire_config('charset', _DEFAULT_CHARSET) === 'utf-8') ? 'u' : '');
-	}
+    // Initialisation
+    $GLOBALS['CHARSET'] = [];
+
+    // noter a l'occasion dans la meta pcre_u notre capacite a utiliser le flag /u
+    // dans les preg_replace pour ne pas casser certaines lettres accentuees :
+    // en utf-8 chr(195).chr(160) = a` alors qu'en iso-latin chr(160) = nbsp
+    if (
+        !isset($GLOBALS['meta']['pcre_u'])
+        || isset($_GET['var_mode']) && !isset($_GET['var_profile'])
+    ) {
+        include_spip('inc/meta');
+        ecrire_meta('pcre_u', (lire_config('charset', _DEFAULT_CHARSET) === 'utf-8') ? 'u' : '');
+    }
 }
 
 // TODO: code d’exécution en dehors du fichier.
@@ -64,39 +64,39 @@ 
  *     - false si le charset n'est pas décrit dans le répertoire charsets/
  **/
 function load_charset($charset = 'AUTO') {
-	if ($charset == 'AUTO') {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	$charset = trim(strtolower((string) $charset));
-	if (isset($GLOBALS['CHARSET'][$charset])) {
-		return $charset;
-	}
-
-	if ($charset == 'utf-8') {
-		$GLOBALS['CHARSET'][$charset] = [];
-
-		return $charset;
-	}
-
-	// Quelques synonymes
-	if ($charset === '') {
-		$charset = 'iso-8859-1';
-	} elseif ($charset === 'windows-1250') {
-		$charset = 'cp1250';
-	} elseif ($charset === 'windows-1251') {
-		$charset = 'cp1251';
-	} elseif ($charset === 'windows-1256') {
-		$charset = 'cp1256';
-	}
-
-	if (find_in_path($charset . '.php', 'charsets/', true)) {
-		return $charset;
-	} else {
-		spip_logger()->info("Erreur: pas de fichier de conversion 'charsets/$charset'");
-		$GLOBALS['CHARSET'][$charset] = [];
-
-		return false;
-	}
+    if ($charset == 'AUTO') {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    $charset = trim(strtolower((string) $charset));
+    if (isset($GLOBALS['CHARSET'][$charset])) {
+        return $charset;
+    }
+
+    if ($charset == 'utf-8') {
+        $GLOBALS['CHARSET'][$charset] = [];
+
+        return $charset;
+    }
+
+    // Quelques synonymes
+    if ($charset === '') {
+        $charset = 'iso-8859-1';
+    } elseif ($charset === 'windows-1250') {
+        $charset = 'cp1250';
+    } elseif ($charset === 'windows-1251') {
+        $charset = 'cp1251';
+    } elseif ($charset === 'windows-1256') {
+        $charset = 'cp1256';
+    }
+
+    if (find_in_path($charset . '.php', 'charsets/', true)) {
+        return $charset;
+    } else {
+        spip_logger()->info("Erreur: pas de fichier de conversion 'charsets/$charset'");
+        $GLOBALS['CHARSET'][$charset] = [];
+
+        return false;
+    }
 }
 
 
@@ -109,19 +109,19 @@ 
  *     true si notre charset est utilisable par mb_strsing
  **/
 function init_mb_string(): bool {
-	static $mb;
-
-	// verifier que le charset interne est connu de mb_string
-	if (!$mb) {
-		if (mb_detect_order(lire_config('charset', _DEFAULT_CHARSET))) {
-			mb_internal_encoding('utf-8');
-			$mb = 1;
-		} else {
-			$mb = -1;
-		}
-	}
-
-	return ($mb === 1);
+    static $mb;
+
+    // verifier que le charset interne est connu de mb_string
+    if (!$mb) {
+        if (mb_detect_order(lire_config('charset', _DEFAULT_CHARSET))) {
+            mb_internal_encoding('utf-8');
+            $mb = 1;
+        } else {
+            $mb = -1;
+        }
+    }
+
+    return ($mb === 1);
 }
 
 /**
@@ -136,17 +136,17 @@ 
  *     true si iconv fonctionne correctement
  **/
 function test_iconv(): bool {
-	static $iconv_ok;
+    static $iconv_ok;
 
-	if (!$iconv_ok) {
-		if (!function_exists('iconv')) {
-			$iconv_ok = -1;
-		} else {
-			$iconv_ok = utf_32_to_unicode(@iconv('utf-8', 'utf-32', 'chaine de test')) === 'chaine de test' ? 1 : -1;
-		}
-	}
+    if (!$iconv_ok) {
+        if (!function_exists('iconv')) {
+            $iconv_ok = -1;
+        } else {
+            $iconv_ok = utf_32_to_unicode(@iconv('utf-8', 'utf-32', 'chaine de test')) === 'chaine de test' ? 1 : -1;
+        }
+    }
 
-	return ($iconv_ok === 1);
+    return ($iconv_ok === 1);
 }
 
 /**
@@ -166,75 +166,75 @@ 
  *     texte corrigé
  **/
 function corriger_caracteres_windows($texte, $charset = 'AUTO', $charset_cible = 'unicode') {
-	static $trans;
-
-	if (is_array($texte)) {
-		return array_map('corriger_caracteres_windows', $texte);
-	}
-
-	if ($charset == 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-	if ($charset == 'utf-8') {
-		$p = chr(194);
-		if (!str_contains($texte, $p)) {
-			return $texte;
-		}
-	} else {
-		if ($charset == 'iso-8859-1') {
-			$p = '';
-		} else {
-			return $texte;
-		}
-	}
-
-	if (!isset($trans[$charset][$charset_cible])) {
-		$trans[$charset][$charset_cible] = [
-			$p . chr(128) => '€',
-			$p . chr(129) => ' ', # pas affecte
-			$p . chr(130) => '‚',
-			$p . chr(131) => 'ƒ',
-			$p . chr(132) => '„',
-			$p . chr(133) => '…',
-			$p . chr(134) => '†',
-			$p . chr(135) => '‡',
-			$p . chr(136) => 'ˆ',
-			$p . chr(137) => '‰',
-			$p . chr(138) => 'Š',
-			$p . chr(139) => '‹',
-			$p . chr(140) => 'Œ',
-			$p . chr(141) => ' ', # pas affecte
-			$p . chr(142) => 'Ž',
-			$p . chr(143) => ' ', # pas affecte
-			$p . chr(144) => ' ', # pas affecte
-			$p . chr(145) => '‘',
-			$p . chr(146) => '’',
-			$p . chr(147) => '“',
-			$p . chr(148) => '”',
-			$p . chr(149) => '•',
-			$p . chr(150) => '–',
-			$p . chr(151) => '—',
-			$p . chr(152) => '˜',
-			$p . chr(153) => '™',
-			$p . chr(154) => 'š',
-			$p . chr(155) => '›',
-			$p . chr(156) => 'œ',
-			$p . chr(157) => ' ', # pas affecte
-			$p . chr(158) => 'ž',
-			$p . chr(159) => 'Ÿ',
-		];
-		if ($charset_cible != 'unicode') {
-			foreach ($trans[$charset][$charset_cible] as $k => $c) {
-				$trans[$charset][$charset_cible][$k] = unicode2charset($c, $charset_cible);
-			}
-		}
-	}
-
-	return @str_replace(
-		array_keys($trans[$charset][$charset_cible]),
-		array_values($trans[$charset][$charset_cible]),
-		$texte
-	);
+    static $trans;
+
+    if (is_array($texte)) {
+        return array_map('corriger_caracteres_windows', $texte);
+    }
+
+    if ($charset == 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+    if ($charset == 'utf-8') {
+        $p = chr(194);
+        if (!str_contains($texte, $p)) {
+            return $texte;
+        }
+    } else {
+        if ($charset == 'iso-8859-1') {
+            $p = '';
+        } else {
+            return $texte;
+        }
+    }
+
+    if (!isset($trans[$charset][$charset_cible])) {
+        $trans[$charset][$charset_cible] = [
+            $p . chr(128) => '€',
+            $p . chr(129) => ' ', # pas affecte
+            $p . chr(130) => '‚',
+            $p . chr(131) => 'ƒ',
+            $p . chr(132) => '„',
+            $p . chr(133) => '…',
+            $p . chr(134) => '†',
+            $p . chr(135) => '‡',
+            $p . chr(136) => 'ˆ',
+            $p . chr(137) => '‰',
+            $p . chr(138) => 'Š',
+            $p . chr(139) => '‹',
+            $p . chr(140) => 'Œ',
+            $p . chr(141) => ' ', # pas affecte
+            $p . chr(142) => 'Ž',
+            $p . chr(143) => ' ', # pas affecte
+            $p . chr(144) => ' ', # pas affecte
+            $p . chr(145) => '‘',
+            $p . chr(146) => '’',
+            $p . chr(147) => '“',
+            $p . chr(148) => '”',
+            $p . chr(149) => '•',
+            $p . chr(150) => '–',
+            $p . chr(151) => '—',
+            $p . chr(152) => '˜',
+            $p . chr(153) => '™',
+            $p . chr(154) => 'š',
+            $p . chr(155) => '›',
+            $p . chr(156) => 'œ',
+            $p . chr(157) => ' ', # pas affecte
+            $p . chr(158) => 'ž',
+            $p . chr(159) => 'Ÿ',
+        ];
+        if ($charset_cible != 'unicode') {
+            foreach ($trans[$charset][$charset_cible] as $k => $c) {
+                $trans[$charset][$charset_cible][$k] = unicode2charset($c, $charset_cible);
+            }
+        }
+    }
+
+    return @str_replace(
+        array_keys($trans[$charset][$charset_cible]),
+        array_values($trans[$charset][$charset_cible]),
+        $texte
+    );
 }
 
 
@@ -251,31 +251,31 @@ 
  *     texte converti
  **/
 function html2unicode(string $texte, bool $secure = false): string {
-	static $trans = [];
-
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	if (!str_contains($texte, '&')) {
-		return $texte;
-	}
-
-	if (!$trans) {
-		load_charset('html');
-		foreach ($GLOBALS['CHARSET']['html'] as $key => $val) {
-			$trans["&$key;"] = $val;
-		}
-	}
-
-	$texte = str_replace(array_keys($trans), array_values($trans), $texte);
-	if (!$secure) {
-		$texte = str_replace(
-			['&', '"', '<', '>'],
-			['&', '"', '<', '>'],
-			$texte
-		);
-	}
-	return $texte;
+    static $trans = [];
+
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    if (!str_contains($texte, '&')) {
+        return $texte;
+    }
+
+    if (!$trans) {
+        load_charset('html');
+        foreach ($GLOBALS['CHARSET']['html'] as $key => $val) {
+            $trans["&$key;"] = $val;
+        }
+    }
+
+    $texte = str_replace(array_keys($trans), array_values($trans), $texte);
+    if (!$secure) {
+        $texte = str_replace(
+            ['&amp;', '&quot;', '&lt;', '&gt;'],
+            ['&', '"', '<', '>'],
+            $texte
+        );
+    }
+    return $texte;
 }
 
 
@@ -290,16 +290,16 @@ 
  *     texte converti
  **/
 function mathml2unicode($texte) {
-	static $trans;
-	if (!$trans) {
-		load_charset('mathml');
+    static $trans;
+    if (!$trans) {
+        load_charset('mathml');
 
-		foreach ($GLOBALS['CHARSET']['mathml'] as $key => $val) {
-			$trans["&$key;"] = $val;
-		}
-	}
+        foreach ($GLOBALS['CHARSET']['mathml'] as $key => $val) {
+            $trans["&$key;"] = $val;
+        }
+    }
 
-	return str_replace(array_keys($trans), array_values($trans), $texte);
+    return str_replace(array_keys($trans), array_values($trans), $texte);
 }
 
 
@@ -321,74 +321,74 @@ 
  *     texte converti en unicode
  **/
 function charset2unicode(?string $texte, string $charset = 'AUTO' /* $forcer: obsolete*/) {
-	static $trans;
-
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-
-	if ($charset === 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-
-	if ($charset === '') {
-		$charset = 'iso-8859-1';
-	}
-	$charset = strtolower((string) $charset);
-
-	switch ($charset) {
-		case 'utf-8':
-		case 'utf8':
-			return utf_8_to_unicode($texte);
-
-		case 'iso-8859-1':
-			$texte = corriger_caracteres_windows($texte, 'iso-8859-1');
-		// pas de break; ici, on suit sur default:
-
-		default:
-			// mbstring presente ?
-			if (init_mb_string()) {
-				$order = mb_detect_order();
-				try {
-					# mb_string connait-il $charset?
-					if ($order && mb_detect_order($charset)) {
-						$s = mb_convert_encoding($texte, 'utf-8', $charset);
-						if ($s && $s != $texte) {
-							return utf_8_to_unicode($s);
-						}
-					}
-				} catch (\Error) {
-					// Le charset n'existe probablement pas
-				} finally {
-					mb_detect_order($order); # remettre comme precedemment
-				}
-			}
-
-			// Sinon, peut-etre connaissons-nous ce charset ?
-			if (!isset($trans[$charset]) && (($cset = load_charset($charset)) && is_array($GLOBALS['CHARSET'][$cset]))) {
-				foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-					$trans[$charset][chr($key)] = '&#' . $val . ';';
-				}
-			}
-			if (isset($trans[$charset]) && (is_countable($trans[$charset]) ? count($trans[$charset]) : 0)) {
-				return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-			}
-
-			// Sinon demander a iconv (malgre le fait qu'il coupe quand un
-			// caractere n'appartient pas au charset, mais c'est un probleme
-			// surtout en utf-8, gere ci-dessus)
-			if (test_iconv()) {
-				$s = iconv($charset, 'utf-32le', $texte);
-				if ($s) {
-					return utf_32_to_unicode($s);
-				}
-			}
-
-			// Au pire ne rien faire
-			spip_logger()->info("erreur charset '$charset' non supporte");
-
-			return $texte;
-	}
+    static $trans;
+
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+
+    if ($charset === 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+
+    if ($charset === '') {
+        $charset = 'iso-8859-1';
+    }
+    $charset = strtolower((string) $charset);
+
+    switch ($charset) {
+        case 'utf-8':
+        case 'utf8':
+            return utf_8_to_unicode($texte);
+
+        case 'iso-8859-1':
+            $texte = corriger_caracteres_windows($texte, 'iso-8859-1');
+        // pas de break; ici, on suit sur default:
+
+        default:
+            // mbstring presente ?
+            if (init_mb_string()) {
+                $order = mb_detect_order();
+                try {
+                    # mb_string connait-il $charset?
+                    if ($order && mb_detect_order($charset)) {
+                        $s = mb_convert_encoding($texte, 'utf-8', $charset);
+                        if ($s && $s != $texte) {
+                            return utf_8_to_unicode($s);
+                        }
+                    }
+                } catch (\Error) {
+                    // Le charset n'existe probablement pas
+                } finally {
+                    mb_detect_order($order); # remettre comme precedemment
+                }
+            }
+
+            // Sinon, peut-etre connaissons-nous ce charset ?
+            if (!isset($trans[$charset]) && (($cset = load_charset($charset)) && is_array($GLOBALS['CHARSET'][$cset]))) {
+                foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
+                    $trans[$charset][chr($key)] = '&#' . $val . ';';
+                }
+            }
+            if (isset($trans[$charset]) && (is_countable($trans[$charset]) ? count($trans[$charset]) : 0)) {
+                return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+            }
+
+            // Sinon demander a iconv (malgre le fait qu'il coupe quand un
+            // caractere n'appartient pas au charset, mais c'est un probleme
+            // surtout en utf-8, gere ci-dessus)
+            if (test_iconv()) {
+                $s = iconv($charset, 'utf-32le', $texte);
+                if ($s) {
+                    return utf_32_to_unicode($s);
+                }
+            }
+
+            // Au pire ne rien faire
+            spip_logger()->info("erreur charset '$charset' non supporte");
+
+            return $texte;
+    }
 }
 
 
@@ -407,42 +407,42 @@ 
  *     texte transformé dans le charset souhaité
  **/
 function unicode2charset($texte, $charset = 'AUTO') {
-	static $CHARSET_REVERSE = [];
-	static $trans = [];
-
-	if ($charset == 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-
-	switch ($charset) {
-		case 'utf-8':
-			return unicode_to_utf_8($texte);
-
-		default:
-			$charset = load_charset($charset);
-
-			if (empty($CHARSET_REVERSE[$charset])) {
-				$CHARSET_REVERSE[$charset] = array_flip($GLOBALS['CHARSET'][$charset]);
-			}
-
-			if (!isset($trans[$charset])) {
-				$trans[$charset] = [];
-				$t = &$trans[$charset];
-				for ($e = 128; $e < 255; $e++) {
-					$h = dechex($e);
-					if ($s = isset($CHARSET_REVERSE[$charset][$e])) {
-						$s = $CHARSET_REVERSE[$charset][$e];
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($s);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($s);
-					} else {
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($e);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($e);
-					}
-				}
-			}
-
-			return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-	}
+    static $CHARSET_REVERSE = [];
+    static $trans = [];
+
+    if ($charset == 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+
+    switch ($charset) {
+        case 'utf-8':
+            return unicode_to_utf_8($texte);
+
+        default:
+            $charset = load_charset($charset);
+
+            if (empty($CHARSET_REVERSE[$charset])) {
+                $CHARSET_REVERSE[$charset] = array_flip($GLOBALS['CHARSET'][$charset]);
+            }
+
+            if (!isset($trans[$charset])) {
+                $trans[$charset] = [];
+                $t = &$trans[$charset];
+                for ($e = 128; $e < 255; $e++) {
+                    $h = dechex($e);
+                    if ($s = isset($CHARSET_REVERSE[$charset][$e])) {
+                        $s = $CHARSET_REVERSE[$charset][$e];
+                        $t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($s);
+                        $t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($s);
+                    } else {
+                        $t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($e);
+                        $t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($e);
+                    }
+                }
+            }
+
+            return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+    }
 }
 
 
@@ -460,39 +460,39 @@ 
  *     texte transformé dans le charset site
  **/
 function importer_charset($texte, $charset = 'AUTO') {
-	$s = null;
-	static $trans = [];
-	// on traite le cas le plus frequent iso-8859-1 vers utf directement pour aller plus vite !
-	if (($charset == 'iso-8859-1') && ($GLOBALS['meta']['charset'] == 'utf-8')) {
-		$texte = corriger_caracteres_windows($texte, 'iso-8859-1', $GLOBALS['meta']['charset']);
-		if (init_mb_string()) {
-			if (
-				($order = mb_detect_order())
-				&& mb_detect_order($charset)
-			) {
-				$s = mb_convert_encoding($texte, 'utf-8', $charset);
-			}
-			mb_detect_order($order); # remettre comme precedemment
-			return $s;
-		}
-		// Sinon, peut-etre connaissons-nous ce charset ?
-		if (
-			!isset($trans[$charset])
-			&& (($cset = load_charset($charset))
-			&& is_array($GLOBALS['CHARSET'][$cset]))
-		) {
-			foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-				$trans[$charset][chr($key)] = unicode2charset('&#' . $val . ';');
-			}
-		}
-		if (is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
-			return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-		}
-
-		return $texte;
-	}
-
-	return unicode2charset(charset2unicode($texte, $charset));
+    $s = null;
+    static $trans = [];
+    // on traite le cas le plus frequent iso-8859-1 vers utf directement pour aller plus vite !
+    if (($charset == 'iso-8859-1') && ($GLOBALS['meta']['charset'] == 'utf-8')) {
+        $texte = corriger_caracteres_windows($texte, 'iso-8859-1', $GLOBALS['meta']['charset']);
+        if (init_mb_string()) {
+            if (
+                ($order = mb_detect_order())
+                && mb_detect_order($charset)
+            ) {
+                $s = mb_convert_encoding($texte, 'utf-8', $charset);
+            }
+            mb_detect_order($order); # remettre comme precedemment
+            return $s;
+        }
+        // Sinon, peut-etre connaissons-nous ce charset ?
+        if (
+            !isset($trans[$charset])
+            && (($cset = load_charset($charset))
+            && is_array($GLOBALS['CHARSET'][$cset]))
+        ) {
+            foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
+                $trans[$charset][chr($key)] = unicode2charset('&#' . $val . ';');
+            }
+        }
+        if (is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
+            return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+        }
+
+        return $texte;
+    }
+
+    return unicode2charset(charset2unicode($texte, $charset));
 }
 
 
@@ -508,92 +508,92 @@ 
  **/
 function utf_8_to_unicode($source) {
 
-	// mb_string : methode rapide
-	if (init_mb_string()) {
-		$convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
-
-		return mb_encode_numericentity($source, $convmap, 'UTF-8');
-	}
-
-	// Sinon methode pas a pas
-	static $decrement;
-	static $shift;
-
-	// Cf. php.net, par Ronen. Adapte pour compatibilite < php4
-	if (!is_array($decrement)) {
-		// array used to figure what number to decrement from character order value
-		// according to number of characters used to map unicode to ascii by utf-8
-		$decrement[4] = 240;
-		$decrement[3] = 224;
-		$decrement[2] = 192;
-		$decrement[1] = 0;
-		// the number of bits to shift each charNum by
-		$shift[1][0] = 0;
-		$shift[2][0] = 6;
-		$shift[2][1] = 0;
-		$shift[3][0] = 12;
-		$shift[3][1] = 6;
-		$shift[3][2] = 0;
-		$shift[4][0] = 18;
-		$shift[4][1] = 12;
-		$shift[4][2] = 6;
-		$shift[4][3] = 0;
-	}
-
-	$pos = 0;
-	$len = strlen($source);
-	$encodedString = '';
-	while ($pos < $len) {
-		$char = '';
-		$ischar = false;
-		$asciiPos = ord(substr($source, $pos, 1));
-		if (($asciiPos >= 240) && ($asciiPos <= 255)) {
-			// 4 chars representing one unicode character
-			$thisLetter = substr($source, $pos, 4);
-			$pos += 4;
-		} else {
-			if (($asciiPos >= 224) && ($asciiPos <= 239)) {
-				// 3 chars representing one unicode character
-				$thisLetter = substr($source, $pos, 3);
-				$pos += 3;
-			} else {
-				if (($asciiPos >= 192) && ($asciiPos <= 223)) {
-					// 2 chars representing one unicode character
-					$thisLetter = substr($source, $pos, 2);
-					$pos += 2;
-				} else {
-					// 1 char (lower ascii)
-					$thisLetter = substr($source, $pos, 1);
-					$pos += 1;
-					$char = $thisLetter;
-					$ischar = true;
-				}
-			}
-		}
-
-		if ($ischar) {
-			$encodedString .= $char;
-		} else {  // process the string representing the letter to a unicode entity
-			$thisLen = strlen($thisLetter);
-			$thisPos = 0;
-			$decimalCode = 0;
-			while ($thisPos < $thisLen) {
-				$thisCharOrd = ord(substr($thisLetter, $thisPos, 1));
-				if ($thisPos == 0) {
-					$charNum = (int) ($thisCharOrd - $decrement[$thisLen]);
-					$decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
-				} else {
-					$charNum = (int) ($thisCharOrd - 128);
-					$decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
-				}
-				$thisPos++;
-			}
-			$encodedLetter = '&#' . preg_replace('/^0+/', '', $decimalCode) . ';';
-			$encodedString .= $encodedLetter;
-		}
-	}
-
-	return $encodedString;
+    // mb_string : methode rapide
+    if (init_mb_string()) {
+        $convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
+
+        return mb_encode_numericentity($source, $convmap, 'UTF-8');
+    }
+
+    // Sinon methode pas a pas
+    static $decrement;
+    static $shift;
+
+    // Cf. php.net, par Ronen. Adapte pour compatibilite < php4
+    if (!is_array($decrement)) {
+        // array used to figure what number to decrement from character order value
+        // according to number of characters used to map unicode to ascii by utf-8
+        $decrement[4] = 240;
+        $decrement[3] = 224;
+        $decrement[2] = 192;
+        $decrement[1] = 0;
+        // the number of bits to shift each charNum by
+        $shift[1][0] = 0;
+        $shift[2][0] = 6;
+        $shift[2][1] = 0;
+        $shift[3][0] = 12;
+        $shift[3][1] = 6;
+        $shift[3][2] = 0;
+        $shift[4][0] = 18;
+        $shift[4][1] = 12;
+        $shift[4][2] = 6;
+        $shift[4][3] = 0;
+    }
+
+    $pos = 0;
+    $len = strlen($source);
+    $encodedString = '';
+    while ($pos < $len) {
+        $char = '';
+        $ischar = false;
+        $asciiPos = ord(substr($source, $pos, 1));
+        if (($asciiPos >= 240) && ($asciiPos <= 255)) {
+            // 4 chars representing one unicode character
+            $thisLetter = substr($source, $pos, 4);
+            $pos += 4;
+        } else {
+            if (($asciiPos >= 224) && ($asciiPos <= 239)) {
+                // 3 chars representing one unicode character
+                $thisLetter = substr($source, $pos, 3);
+                $pos += 3;
+            } else {
+                if (($asciiPos >= 192) && ($asciiPos <= 223)) {
+                    // 2 chars representing one unicode character
+                    $thisLetter = substr($source, $pos, 2);
+                    $pos += 2;
+                } else {
+                    // 1 char (lower ascii)
+                    $thisLetter = substr($source, $pos, 1);
+                    $pos += 1;
+                    $char = $thisLetter;
+                    $ischar = true;
+                }
+            }
+        }
+
+        if ($ischar) {
+            $encodedString .= $char;
+        } else {  // process the string representing the letter to a unicode entity
+            $thisLen = strlen($thisLetter);
+            $thisPos = 0;
+            $decimalCode = 0;
+            while ($thisPos < $thisLen) {
+                $thisCharOrd = ord(substr($thisLetter, $thisPos, 1));
+                if ($thisPos == 0) {
+                    $charNum = (int) ($thisCharOrd - $decrement[$thisLen]);
+                    $decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
+                } else {
+                    $charNum = (int) ($thisCharOrd - 128);
+                    $decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
+                }
+                $thisPos++;
+            }
+            $encodedLetter = '&#' . preg_replace('/^0+/', '', $decimalCode) . ';';
+            $encodedString .= $encodedLetter;
+        }
+    }
+
+    return $encodedString;
 }
 
 /**
@@ -612,32 +612,32 @@ 
  **/
 function utf_32_to_unicode($source) {
 
-	// mb_string : methode rapide
-	if (init_mb_string()) {
-		$convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
-		$source = mb_encode_numericentity($source, $convmap, 'UTF-32LE');
-
-		return str_replace(chr(0), '', $source);
-	}
-
-	// Sinon methode lente
-	$texte = '';
-	while ($source) {
-		$words = unpack('V*', substr($source, 0, 1024));
-		$source = substr($source, 1024);
-		foreach ($words as $word) {
-			if ($word < 128) {
-				$texte .= chr($word);
-			} // ignorer le BOM - http://www.unicode.org/faq/utf_bom.html
-			else {
-				if ($word != 65279) {
-					$texte .= '&#' . $word . ';';
-				}
-			}
-		}
-	}
-
-	return $texte;
+    // mb_string : methode rapide
+    if (init_mb_string()) {
+        $convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
+        $source = mb_encode_numericentity($source, $convmap, 'UTF-32LE');
+
+        return str_replace(chr(0), '', $source);
+    }
+
+    // Sinon methode lente
+    $texte = '';
+    while ($source) {
+        $words = unpack('V*', substr($source, 0, 1024));
+        $source = substr($source, 1024);
+        foreach ($words as $word) {
+            if ($word < 128) {
+                $texte .= chr($word);
+            } // ignorer le BOM - http://www.unicode.org/faq/utf_bom.html
+            else {
+                if ($word != 65279) {
+                    $texte .= '&#' . $word . ';';
+                }
+            }
+        }
+    }
+
+    return $texte;
 }
 
 
@@ -654,21 +654,21 @@ 
  *    Caractère utf8 si trouvé, '' sinon
  **/
 function caractere_utf_8($num) {
-	$num = (int) $num;
-	if ($num < 128) {
-		return chr($num);
-	}
-	if ($num < 2048) {
-		return chr(($num >> 6) + 192) . chr(($num & 63) + 128);
-	}
-	if ($num < 65536) {
-		return chr(($num >> 12) + 224) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
-	}
-	if ($num < 1_114_112) {
-		return chr(($num >> 18) + 240) . chr((($num >> 12) & 63) + 128) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
-	}
-
-	return '';
+    $num = (int) $num;
+    if ($num < 128) {
+        return chr($num);
+    }
+    if ($num < 2048) {
+        return chr(($num >> 6) + 192) . chr(($num & 63) + 128);
+    }
+    if ($num < 65536) {
+        return chr(($num >> 12) + 224) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+    }
+    if ($num < 1_114_112) {
+        return chr(($num >> 18) + 240) . chr((($num >> 12) & 63) + 128) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+    }
+
+    return '';
 }
 
 /**
@@ -681,42 +681,42 @@ 
  **/
 function unicode_to_utf_8($texte) {
 
-	// 1. Entites &#128; et suivantes
-	$vu = [];
-	if (
-		preg_match_all(
-			',&#0*([1-9]\d\d+);,S',
-			$texte,
-			$regs,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($regs as $reg) {
-			if ($reg[1] > 127 && !isset($vu[$reg[0]])) {
-				$vu[$reg[0]] = caractere_utf_8($reg[1]);
-			}
-		}
-	}
-	//$texte = str_replace(array_keys($vu), array_values($vu), $texte);
-
-	// 2. Entites > &#xFF;
-	//$vu = array();
-	if (
-		preg_match_all(
-			',&#x0*([1-9a-f][0-9a-f][0-9a-f]+);,iS',
-			$texte,
-			$regs,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($regs as $reg) {
-			if (!isset($vu[$reg[0]])) {
-				$vu[$reg[0]] = caractere_utf_8(hexdec($reg[1]));
-			}
-		}
-	}
-
-	return str_replace(array_keys($vu), array_values($vu), $texte);
+    // 1. Entites &#128; et suivantes
+    $vu = [];
+    if (
+        preg_match_all(
+            ',&#0*([1-9]\d\d+);,S',
+            $texte,
+            $regs,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($regs as $reg) {
+            if ($reg[1] > 127 && !isset($vu[$reg[0]])) {
+                $vu[$reg[0]] = caractere_utf_8($reg[1]);
+            }
+        }
+    }
+    //$texte = str_replace(array_keys($vu), array_values($vu), $texte);
+
+    // 2. Entites > &#xFF;
+    //$vu = array();
+    if (
+        preg_match_all(
+            ',&#x0*([1-9a-f][0-9a-f][0-9a-f]+);,iS',
+            $texte,
+            $regs,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($regs as $reg) {
+            if (!isset($vu[$reg[0]])) {
+                $vu[$reg[0]] = caractere_utf_8(hexdec($reg[1]));
+            }
+        }
+    }
+
+    return str_replace(array_keys($vu), array_values($vu), $texte);
 }
 
 /**
@@ -728,15 +728,15 @@ 
  *     texte converti
  **/
 function unicode_to_javascript($texte) {
-	$vu = [];
-	while (preg_match(',&#0*(\d+);,S', $texte, $regs) && !isset($vu[$regs[1]])) {
-		$num = $regs[1];
-		$vu[$num] = true;
-		$s = '\u' . sprintf('%04x', $num);
-		$texte = str_replace($regs[0], $s, $texte);
-	}
-
-	return $texte;
+    $vu = [];
+    while (preg_match(',&#0*(\d+);,S', $texte, $regs) && !isset($vu[$regs[1]])) {
+        $num = $regs[1];
+        $vu[$num] = true;
+        $s = '\u' . sprintf('%04x', $num);
+        $texte = str_replace($regs[0], $s, $texte);
+    }
+
+    return $texte;
 }
 
 /**
@@ -748,11 +748,11 @@ 
  *     texte converti
  **/
 function javascript_to_unicode($texte) {
-	while (preg_match(',%u([0-9A-F][0-9A-F][0-9A-F][0-9A-F]),', $texte, $regs)) {
-		$texte = str_replace($regs[0], '&#' . hexdec($regs[1]) . ';', $texte);
-	}
+    while (preg_match(',%u([0-9A-F][0-9A-F][0-9A-F][0-9A-F]),', $texte, $regs)) {
+        $texte = str_replace($regs[0], '&#' . hexdec($regs[1]) . ';', $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -764,11 +764,11 @@ 
  *     texte converti
  **/
 function javascript_to_binary($texte) {
-	while (preg_match(',%([0-9A-F][0-9A-F]),', $texte, $regs)) {
-		$texte = str_replace($regs[0], chr(hexdec($regs[1])), $texte);
-	}
+    while (preg_match(',%([0-9A-F][0-9A-F]),', $texte, $regs)) {
+        $texte = str_replace($regs[0], chr(hexdec($regs[1])), $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -786,26 +786,26 @@ 
  * @return string
  */
 function translitteration_rapide(?string $texte, string $charset = 'AUTO', string $complexe = ''): string {
-	static $trans = [];
-	if ($charset == 'AUTO') {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-
-	$table_translit = 'translit' . $complexe;
-
-	// 2. Translitterer grace a la table predefinie
-	if (!isset($trans[$complexe])) {
-		$trans[$complexe] = [];
-		load_charset($table_translit);
-		foreach ($GLOBALS['CHARSET'][$table_translit] as $key => $val) {
-			$trans[$complexe][caractere_utf_8($key)] = $val;
-		}
-	}
-
-	return str_replace(array_keys($trans[$complexe]), array_values($trans[$complexe]), $texte);
+    static $trans = [];
+    if ($charset == 'AUTO') {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+
+    $table_translit = 'translit' . $complexe;
+
+    // 2. Translitterer grace a la table predefinie
+    if (!isset($trans[$complexe])) {
+        $trans[$complexe] = [];
+        load_charset($table_translit);
+        foreach ($GLOBALS['CHARSET'][$table_translit] as $key => $val) {
+            $trans[$complexe][caractere_utf_8($key)] = $val;
+        }
+    }
+
+    return str_replace(array_keys($trans[$complexe]), array_values($trans[$complexe]), $texte);
 }
 
 /**
@@ -828,18 +828,18 @@ 
  * @return string
  */
 function translitteration(?string $texte, string $charset = 'AUTO', string $complexe = ''): string {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
+    if ($texte === null || $texte === '') {
+        return '';
+    }
 
-	// 0. Supprimer les caracteres illegaux
-	include_spip('inc/filtres');
-	$texte = corriger_caracteres($texte);
+    // 0. Supprimer les caracteres illegaux
+    include_spip('inc/filtres');
+    $texte = corriger_caracteres($texte);
 
-	// 1. Passer le charset et les &eacute en utf-8
-	$texte = unicode_to_utf_8(html2unicode(charset2unicode($texte, $charset)));
+    // 1. Passer le charset et les &eacute en utf-8
+    $texte = unicode_to_utf_8(html2unicode(charset2unicode($texte, $charset)));
 
-	return translitteration_rapide($texte, $charset, $complexe);
+    return translitteration_rapide($texte, $charset, $complexe);
 }
 
 /**
@@ -854,17 +854,17 @@ 
  * @return string
  */
 function translitteration_complexe(?string $texte, bool $chiffres = false): string {
-	$texte = translitteration($texte, 'AUTO', 'complexe');
+    $texte = translitteration($texte, 'AUTO', 'complexe');
 
-	if ($chiffres) {
-		$texte = preg_replace_callback(
-			"/[aeiuoyd]['`?~.^+(-]{1,2}/S",
-			fn($m) => translitteration_chiffree($m[0]),
-			$texte
-		);
-	}
+    if ($chiffres) {
+        $texte = preg_replace_callback(
+            "/[aeiuoyd]['`?~.^+(-]{1,2}/S",
+            fn($m) => translitteration_chiffree($m[0]),
+            $texte
+        );
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -876,7 +876,7 @@ 
  * @return string
  */
 function translitteration_chiffree(string $car): string {
-	return strtr($car, "'`?~.^+(-", '123456789');
+    return strtr($car, "'`?~.^+(-", '123456789');
 }
 
 
@@ -889,7 +889,7 @@ 
  *    true s'il a un BOM
  **/
 function bom_utf8($texte): bool {
-	return (substr($texte, 0, 3) === chr(0xEF) . chr(0xBB) . chr(0xBF));
+    return (substr($texte, 0, 3) === chr(0xEF) . chr(0xBB) . chr(0xBF));
 }
 
 /**
@@ -906,21 +906,21 @@ 
  *     true si c'est le cas
  **/
 function is_utf8($string): bool {
-	return !strlen(
-		preg_replace(
-			',[\x09\x0A\x0D\x20-\x7E]'            # ASCII
-			. '|[\xC2-\xDF][\x80-\xBF]'             # non-overlong 2-byte
-			. '|\xE0[\xA0-\xBF][\x80-\xBF]'         # excluding overlongs
-			. '|[\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}'  # straight 3-byte
-			. '|\xED[\x80-\x9F][\x80-\xBF]'         # excluding surrogates
-			. '|\xF0[\x90-\xBF][\x80-\xBF]{2}'      # planes 1-3
-			. '|[\xF1-\xF3][\x80-\xBF]{3}'          # planes 4-15
-			. '|\xF4[\x80-\x8F][\x80-\xBF]{2}'      # plane 16
-			. ',sS',
-			'',
-			$string
-		)
-	);
+    return !strlen(
+        preg_replace(
+            ',[\x09\x0A\x0D\x20-\x7E]'            # ASCII
+            . '|[\xC2-\xDF][\x80-\xBF]'             # non-overlong 2-byte
+            . '|\xE0[\xA0-\xBF][\x80-\xBF]'         # excluding overlongs
+            . '|[\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}'  # straight 3-byte
+            . '|\xED[\x80-\x9F][\x80-\xBF]'         # excluding surrogates
+            . '|\xF0[\x90-\xBF][\x80-\xBF]{2}'      # planes 1-3
+            . '|[\xF1-\xF3][\x80-\xBF]{3}'          # planes 4-15
+            . '|\xF4[\x80-\x8F][\x80-\xBF]{2}'      # plane 16
+            . ',sS',
+            '',
+            $string
+        )
+    );
 }
 
 /**
@@ -932,13 +932,13 @@ 
  *     true si c'est le cas
  **/
 function is_ascii($string): bool {
-	return !strlen(
-		preg_replace(
-			',[\x09\x0A\x0D\x20-\x7E],sS',
-			'',
-			$string
-		)
-	);
+    return !strlen(
+        preg_replace(
+            ',[\x09\x0A\x0D\x20-\x7E],sS',
+            '',
+            $string
+        )
+    );
 }
 
 /**
@@ -957,50 +957,50 @@ 
  **/
 function transcoder_page($texte, $headers = ''): string {
 
-	// Si tout est < 128 pas la peine d'aller plus loin
-	if (is_ascii($texte)) {
-		#spip_logger()->info('charset: ascii');
-		return $texte;
-	}
-
-	if (bom_utf8($texte)) {
-		// Reconnaitre le BOM utf-8 (0xEFBBBF)
-		$charset = 'utf-8';
-		$texte = substr($texte, 3);
-	} elseif (preg_match(',<[?]xml[^>]*encoding[^>]*=[^>]*([-_a-z0-9]+?),UimsS', $texte, $regs)) {
-		// charset precise par le contenu (xml)
-		$charset = trim(strtolower($regs[1]));
-	} elseif (
-		// charset precise par le contenu (html)
-		preg_match(',<(meta|html|body)[^>]*charset[^>]*=[^>]*([#-_a-z0-9]+?),UimsS', $texte, $regs)
-		# eviter toute balise SPIP tel que #CHARSET ou #CONFIG d'un squelette
-
-		&& !str_contains($regs[2], '#')
-		&& ($tmp = trim(strtolower($regs[2])))
-	) {
-		$charset = $tmp;
-	} elseif (preg_match(',charset=([-_a-z0-9]+),i', $headers, $regs)) {
-		// charset de la reponse http
-		$charset = trim(strtolower($regs[1]));
-	} else {
-		$charset = '';
-	}
-
-
-	// normaliser les noms du shif-jis japonais
-	if (preg_match(',^(x|shift)[_-]s?jis$,i', $charset)) {
-		$charset = 'shift-jis';
-	}
-
-	if ($charset) {
-		spip_logger()->info("charset: $charset");
-	} else {
-		// valeur par defaut
-		$charset = is_utf8($texte) ? 'utf-8' : 'iso-8859-1';
-		spip_logger()->info("charset probable: $charset");
-	}
-
-	return importer_charset($texte, $charset);
+    // Si tout est < 128 pas la peine d'aller plus loin
+    if (is_ascii($texte)) {
+        #spip_logger()->info('charset: ascii');
+        return $texte;
+    }
+
+    if (bom_utf8($texte)) {
+        // Reconnaitre le BOM utf-8 (0xEFBBBF)
+        $charset = 'utf-8';
+        $texte = substr($texte, 3);
+    } elseif (preg_match(',<[?]xml[^>]*encoding[^>]*=[^>]*([-_a-z0-9]+?),UimsS', $texte, $regs)) {
+        // charset precise par le contenu (xml)
+        $charset = trim(strtolower($regs[1]));
+    } elseif (
+        // charset precise par le contenu (html)
+        preg_match(',<(meta|html|body)[^>]*charset[^>]*=[^>]*([#-_a-z0-9]+?),UimsS', $texte, $regs)
+        # eviter toute balise SPIP tel que #CHARSET ou #CONFIG d'un squelette
+
+        && !str_contains($regs[2], '#')
+        && ($tmp = trim(strtolower($regs[2])))
+    ) {
+        $charset = $tmp;
+    } elseif (preg_match(',charset=([-_a-z0-9]+),i', $headers, $regs)) {
+        // charset de la reponse http
+        $charset = trim(strtolower($regs[1]));
+    } else {
+        $charset = '';
+    }
+
+
+    // normaliser les noms du shif-jis japonais
+    if (preg_match(',^(x|shift)[_-]s?jis$,i', $charset)) {
+        $charset = 'shift-jis';
+    }
+
+    if ($charset) {
+        spip_logger()->info("charset: $charset");
+    } else {
+        // valeur par defaut
+        $charset = is_utf8($texte) ? 'utf-8' : 'iso-8859-1';
+        spip_logger()->info("charset probable: $charset");
+    }
+
+    return importer_charset($texte, $charset);
 }
 
 
@@ -1024,19 +1024,19 @@ 
  *     Le texte coupé
  **/
 function spip_substr($c, $start = 0, $length = null) {
-	if ($GLOBALS['meta']['charset'] !== 'utf-8') {
-		if ($length) {
-			return substr($c, $start, $length);
-		} else {
-			return substr($c, $start);
-		}
-	}
-
-	if ($length) {
-		return mb_substr($c, $start, $length);
-	} else {
-		return mb_substr($c, $start);
-	}
+    if ($GLOBALS['meta']['charset'] !== 'utf-8') {
+        if ($length) {
+            return substr($c, $start, $length);
+        } else {
+            return substr($c, $start);
+        }
+    }
+
+    if ($length) {
+        return mb_substr($c, $start, $length);
+    } else {
+        return mb_substr($c, $start);
+    }
 }
 
 /**
@@ -1050,13 +1050,13 @@ 
  *     La chaîne avec une majuscule sur le premier mot
  */
 function spip_ucfirst($c) {
-	if ($GLOBALS['meta']['charset'] !== 'utf-8') {
-		return ucfirst($c);
-	}
+    if ($GLOBALS['meta']['charset'] !== 'utf-8') {
+        return ucfirst($c);
+    }
 
-	$lettre1 = mb_strtoupper(spip_substr($c, 0, 1));
+    $lettre1 = mb_strtoupper(spip_substr($c, 0, 1));
 
-	return $lettre1 . spip_substr($c, 1);
+    return $lettre1 . spip_substr($c, 1);
 }
 
 /**
@@ -1070,11 +1070,11 @@ 
  *     La chaîne en minuscules
  */
 function spip_strtolower($c) {
-	if ($GLOBALS['meta']['charset'] !== 'utf-8') {
-		return strtolower($c);
-	}
+    if ($GLOBALS['meta']['charset'] !== 'utf-8') {
+        return strtolower($c);
+    }
 
-	return mb_strtolower($c);
+    return mb_strtolower($c);
 }
 
 /**
@@ -1088,15 +1088,15 @@ 
  *     Longueur de la chaîne
  */
 function spip_strlen($c) {
-	// On transforme les sauts de ligne pour ne pas compter deux caractères
-	$c = str_replace("\r\n", "\n", $c);
+    // On transforme les sauts de ligne pour ne pas compter deux caractères
+    $c = str_replace("\r\n", "\n", $c);
 
-	// Si ce n'est pas utf-8, utiliser strlen
-	if ($GLOBALS['meta']['charset'] !== 'utf-8') {
-		return strlen($c);
-	}
+    // Si ce n'est pas utf-8, utiliser strlen
+    if ($GLOBALS['meta']['charset'] !== 'utf-8') {
+        return strlen($c);
+    }
 
-	return mb_strlen($c);
+    return mb_strlen($c);
 }
 
 /**
@@ -1111,17 +1111,17 @@ 
  *     en unicode : &#128169;
  */
 function utf8_noplanes($x): string {
-	$regexp_utf8_4bytes = '/(
+    $regexp_utf8_4bytes = '/(
       \xF0[\x90-\xBF][\x80-\xBF]{2}     # planes 1-3
    | [\xF1-\xF3][\x80-\xBF]{3}          # planes 4-15
    |  \xF4[\x80-\x8F][\x80-\xBF]{2}     # plane 16
 )/xS';
-	if (preg_match_all($regexp_utf8_4bytes, $x, $z, PREG_PATTERN_ORDER)) {
-		foreach ($z[0] as $k) {
-			$ku = utf_8_to_unicode($k);
-			$x = str_replace($k, $ku, $x);
-		}
-	}
-
-	return $x;
+    if (preg_match_all($regexp_utf8_4bytes, $x, $z, PREG_PATTERN_ORDER)) {
+        foreach ($z[0] as $k) {
+            $ku = utf_8_to_unicode($k);
+            $x = str_replace($k, $ku, $x);
+        }
+    }
+
+    return $x;
 }

ecrire/inc/flock.php

Indentation +414 added lines, -414 removed lines

@@ -16,12 +16,12 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_TEST_FILE_EXISTS')) {
-	/** Permettre d'éviter des tests file_exists sur certains hébergeurs */
-	define('_TEST_FILE_EXISTS', preg_match(',(online|free)[.]fr$,', $_ENV['HTTP_HOST'] ?? ''));
+    /** Permettre d'éviter des tests file_exists sur certains hébergeurs */
+    define('_TEST_FILE_EXISTS', preg_match(',(online|free)[.]fr$,', $_ENV['HTTP_HOST'] ?? ''));
 }
 
 #define('_SPIP_LOCK_MODE',0); // ne pas utiliser de lock (deconseille)
@@ -29,7 +29,7 @@ 
 #define('_SPIP_LOCK_MODE',2); // utiliser le nfslock de spip
 
 if (_SPIP_LOCK_MODE == 2) {
-	include_spip('inc/nfslock');
+    include_spip('inc/nfslock');
 }
 
 $GLOBALS['liste_verrous'] = [];
@@ -52,24 +52,24 @@ 
  *     Ressource sur le fichier ouvert, sinon false.
  **/
 function spip_fopen_lock($fichier, $mode, $verrou) {
-	if (_SPIP_LOCK_MODE == 1) {
-		if ($fl = @fopen($fichier, $mode)) {
-			// verrou
-			@flock($fl, $verrou);
-		}
-
-		return $fl;
-	} elseif (_SPIP_LOCK_MODE == 2) {
-		if (($verrou = spip_nfslock($fichier)) && ($fl = @fopen($fichier, $mode))) {
-			$GLOBALS['liste_verrous'][$fl] = [$fichier, $verrou];
-
-			return $fl;
-		} else {
-			return false;
-		}
-	}
-
-	return @fopen($fichier, $mode);
+    if (_SPIP_LOCK_MODE == 1) {
+        if ($fl = @fopen($fichier, $mode)) {
+            // verrou
+            @flock($fl, $verrou);
+        }
+
+        return $fl;
+    } elseif (_SPIP_LOCK_MODE == 2) {
+        if (($verrou = spip_nfslock($fichier)) && ($fl = @fopen($fichier, $mode))) {
+            $GLOBALS['liste_verrous'][$fl] = [$fichier, $verrou];
+
+            return $fl;
+        } else {
+            return false;
+        }
+    }
+
+    return @fopen($fichier, $mode);
 }
 
 /**
@@ -84,14 +84,14 @@ 
  *     true si succès, false sinon.
  **/
 function spip_fclose_unlock($handle) {
-	if (_SPIP_LOCK_MODE == 1) {
-		@flock($handle, LOCK_UN);
-	} elseif (_SPIP_LOCK_MODE == 2) {
-		spip_nfsunlock(reset($GLOBALS['liste_verrous'][$handle]), end($GLOBALS['liste_verrous'][$handle]));
-		unset($GLOBALS['liste_verrous'][$handle]);
-	}
-
-	return @fclose($handle);
+    if (_SPIP_LOCK_MODE == 1) {
+        @flock($handle, LOCK_UN);
+    } elseif (_SPIP_LOCK_MODE == 2) {
+        spip_nfsunlock(reset($GLOBALS['liste_verrous'][$handle]), end($GLOBALS['liste_verrous'][$handle]));
+        unset($GLOBALS['liste_verrous'][$handle]);
+    }
+
+    return @fclose($handle);
 }
 
 
@@ -105,23 +105,23 @@ 
  *     Contenu du fichier
  **/
 function spip_file_get_contents($fichier) {
-	if (!str_ends_with($fichier, '.gz')) {
-		if (function_exists('file_get_contents')) {
-			// quand on est sous windows on ne sait pas si file_get_contents marche
-			// on essaye : si ca retourne du contenu alors c'est bon
-			// sinon on fait un file() pour avoir le coeur net
-			$contenu = @file_get_contents($fichier);
-			if (!$contenu && _OS_SERVEUR == 'windows') {
-				$contenu = @file($fichier);
-			}
-		} else {
-			$contenu = @file($fichier);
-		}
-	} else {
-		$contenu = @gzfile($fichier);
-	}
-
-	return is_array($contenu) ? implode('', $contenu) : (string)$contenu;
+    if (!str_ends_with($fichier, '.gz')) {
+        if (function_exists('file_get_contents')) {
+            // quand on est sous windows on ne sait pas si file_get_contents marche
+            // on essaye : si ca retourne du contenu alors c'est bon
+            // sinon on fait un file() pour avoir le coeur net
+            $contenu = @file_get_contents($fichier);
+            if (!$contenu && _OS_SERVEUR == 'windows') {
+                $contenu = @file($fichier);
+            }
+        } else {
+            $contenu = @file($fichier);
+        }
+    } else {
+        $contenu = @gzfile($fichier);
+    }
+
+    return is_array($contenu) ? implode('', $contenu) : (string)$contenu;
 }
 
 
@@ -146,48 +146,48 @@ 
  *     true si l'opération a réussie, false sinon.
  **/
 function lire_fichier($fichier, &$contenu, $options = []) {
-	$contenu = '';
-	// inutile car si le fichier n'existe pas, le lock va renvoyer false juste apres
-	// economisons donc les acces disque, sauf chez free qui rale pour un rien
-	if (_TEST_FILE_EXISTS && !@file_exists($fichier)) {
-		return false;
-	}
-
-	#spip_timer('lire_fichier');
-
-	// pas de @ sur spip_fopen_lock qui est silencieux de toute facon
-	if ($fl = spip_fopen_lock($fichier, 'r', LOCK_SH)) {
-		// lire le fichier avant tout
-		$contenu = spip_file_get_contents($fichier);
-
-		// le fichier a-t-il ete supprime par le locker ?
-		// on ne verifie que si la tentative de lecture a echoue
-		// pour discriminer un contenu vide d'un fichier absent
-		// et eviter un acces disque
-		if (!$contenu && !@file_exists($fichier)) {
-			spip_fclose_unlock($fl);
-
-			return false;
-		}
-
-		// liberer le verrou
-		spip_fclose_unlock($fl);
-
-		// Verifications
-		$ok = true;
-		if (isset($options['phpcheck']) && $options['phpcheck'] == 'oui') {
-			$ok &= (preg_match(",[?]>\n?$,", $contenu));
-		}
-
-		#spip_logger()->info("$fread $fichier ".spip_timer('lire_fichier'));
-		if (!$ok) {
-			spip_logger()->info("echec lecture $fichier");
-		}
-
-		return $ok;
-	}
-
-	return false;
+    $contenu = '';
+    // inutile car si le fichier n'existe pas, le lock va renvoyer false juste apres
+    // economisons donc les acces disque, sauf chez free qui rale pour un rien
+    if (_TEST_FILE_EXISTS && !@file_exists($fichier)) {
+        return false;
+    }
+
+    #spip_timer('lire_fichier');
+
+    // pas de @ sur spip_fopen_lock qui est silencieux de toute facon
+    if ($fl = spip_fopen_lock($fichier, 'r', LOCK_SH)) {
+        // lire le fichier avant tout
+        $contenu = spip_file_get_contents($fichier);
+
+        // le fichier a-t-il ete supprime par le locker ?
+        // on ne verifie que si la tentative de lecture a echoue
+        // pour discriminer un contenu vide d'un fichier absent
+        // et eviter un acces disque
+        if (!$contenu && !@file_exists($fichier)) {
+            spip_fclose_unlock($fl);
+
+            return false;
+        }
+
+        // liberer le verrou
+        spip_fclose_unlock($fl);
+
+        // Verifications
+        $ok = true;
+        if (isset($options['phpcheck']) && $options['phpcheck'] == 'oui') {
+            $ok &= (preg_match(",[?]>\n?$,", $contenu));
+        }
+
+        #spip_logger()->info("$fread $fichier ".spip_timer('lire_fichier'));
+        if (!$ok) {
+            spip_logger()->info("echec lecture $fichier");
+        }
+
+        return $ok;
+    }
+
+    return false;
 }
 
 
@@ -215,92 +215,92 @@ 
  **/
 function ecrire_fichier($fichier, $contenu, $ignorer_echec = false, $truncate = true) {
 
-	#spip_timer('ecrire_fichier');
-
-	// verrouiller le fichier destination
-	if ($fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
-		// ecrire les donnees, compressees le cas echeant
-		// (on ouvre un nouveau pointeur sur le fichier, ce qui a l'avantage
-		// de le recreer si le locker qui nous precede l'avait supprime...)
-		if (str_ends_with($fichier, '.gz')) {
-			$contenu = gzencode($contenu);
-		}
-		// si c'est une ecriture avec troncation , on fait plutot une ecriture complete a cote suivie unlink+rename
-		// pour etre sur d'avoir une operation atomique
-		// y compris en NFS : http://www.ietf.org/rfc/rfc1094.txt
-		// sauf sous wintruc ou ca ne marche pas
-		$ok = false;
-		if ($truncate && _OS_SERVEUR != 'windows') {
-			if (!function_exists('creer_uniqid')) {
-				include_spip('inc/acces');
-			}
-			$id = creer_uniqid();
-			// on ouvre un pointeur sur un fichier temporaire en ecriture +raz
-			if ($fp2 = spip_fopen_lock("$fichier.$id", 'w', LOCK_EX)) {
-				$s = @fwrite($fp2, (string) $contenu, $a = strlen((string) $contenu));
-				$ok = ($s === $a);
-				spip_fclose_unlock($fp2);
-				spip_fclose_unlock($fp);
-				$fp = null;
-				// unlink direct et pas spip_unlink car on avait deja le verrou
-				// a priori pas besoin car rename ecrase la cible
-				// @unlink($fichier);
-				// le rename aussitot, atomique quand on est pas sous windows
-				// au pire on arrive en second en cas de concourance, et le rename echoue
-				// --> on a la version de l'autre process qui doit etre identique
-				@rename("$fichier.$id", $fichier);
-				// precaution en cas d'echec du rename
-				if (!_TEST_FILE_EXISTS || @file_exists("$fichier.$id")) {
-					@unlink("$fichier.$id");
-				}
-				if ($ok) {
-					$ok = file_exists($fichier);
-				}
-			} else // echec mais penser a fermer ..
-			{
-				spip_fclose_unlock($fp);
-				$fp = null;
-			}
-		}
-		// sinon ou si methode precedente a echoueee
-		// on se rabat sur la methode ancienne
-		if (!$ok && !is_null($fp)) {
-			// ici on est en ajout ou sous windows, cas desespere
-			if ($truncate) {
-				@ftruncate($fp, 0);
-			}
-			$s = @fwrite($fp, $contenu, $a = strlen($contenu));
-
-			$ok = ($s == $a);
-			spip_fclose_unlock($fp);
-		}
-		// on tente une dernière fois file_put_contents
-		if (!$ok) {
-			$l = file_put_contents($fichier, $contenu, $truncate ? LOCK_EX : LOCK_EX | FILE_APPEND);
-			$ok = ($l === strlen($contenu));
-		}
-
-		// liberer le verrou et fermer le fichier
-		@chmod($fichier, _SPIP_CHMOD & 0666);
-		if ($ok) {
-			if (str_contains($fichier, '.php')) {
-				spip_clear_opcode_cache(realpath($fichier));
-			}
-
-			return $ok;
-		}
-	}
-
-	if (!$ignorer_echec) {
-		include_spip('inc/autoriser');
-		if (autoriser('chargerftp')) {
-			raler_fichier($fichier);
-		}
-		spip_unlink($fichier);
-	}
-	spip_logger()->notice("Ecriture fichier $fichier impossible");
-
-	return false;
+    #spip_timer('ecrire_fichier');
+
+    // verrouiller le fichier destination
+    if ($fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
+        // ecrire les donnees, compressees le cas echeant
+        // (on ouvre un nouveau pointeur sur le fichier, ce qui a l'avantage
+        // de le recreer si le locker qui nous precede l'avait supprime...)
+        if (str_ends_with($fichier, '.gz')) {
+            $contenu = gzencode($contenu);
+        }
+        // si c'est une ecriture avec troncation , on fait plutot une ecriture complete a cote suivie unlink+rename
+        // pour etre sur d'avoir une operation atomique
+        // y compris en NFS : http://www.ietf.org/rfc/rfc1094.txt
+        // sauf sous wintruc ou ca ne marche pas
+        $ok = false;
+        if ($truncate && _OS_SERVEUR != 'windows') {
+            if (!function_exists('creer_uniqid')) {
+                include_spip('inc/acces');
+            }
+            $id = creer_uniqid();
+            // on ouvre un pointeur sur un fichier temporaire en ecriture +raz
+            if ($fp2 = spip_fopen_lock("$fichier.$id", 'w', LOCK_EX)) {
+                $s = @fwrite($fp2, (string) $contenu, $a = strlen((string) $contenu));
+                $ok = ($s === $a);
+                spip_fclose_unlock($fp2);
+                spip_fclose_unlock($fp);
+                $fp = null;
+                // unlink direct et pas spip_unlink car on avait deja le verrou
+                // a priori pas besoin car rename ecrase la cible
+                // @unlink($fichier);
+                // le rename aussitot, atomique quand on est pas sous windows
+                // au pire on arrive en second en cas de concourance, et le rename echoue
+                // --> on a la version de l'autre process qui doit etre identique
+                @rename("$fichier.$id", $fichier);
+                // precaution en cas d'echec du rename
+                if (!_TEST_FILE_EXISTS || @file_exists("$fichier.$id")) {
+                    @unlink("$fichier.$id");
+                }
+                if ($ok) {
+                    $ok = file_exists($fichier);
+                }
+            } else // echec mais penser a fermer ..
+            {
+                spip_fclose_unlock($fp);
+                $fp = null;
+            }
+        }
+        // sinon ou si methode precedente a echoueee
+        // on se rabat sur la methode ancienne
+        if (!$ok && !is_null($fp)) {
+            // ici on est en ajout ou sous windows, cas desespere
+            if ($truncate) {
+                @ftruncate($fp, 0);
+            }
+            $s = @fwrite($fp, $contenu, $a = strlen($contenu));
+
+            $ok = ($s == $a);
+            spip_fclose_unlock($fp);
+        }
+        // on tente une dernière fois file_put_contents
+        if (!$ok) {
+            $l = file_put_contents($fichier, $contenu, $truncate ? LOCK_EX : LOCK_EX | FILE_APPEND);
+            $ok = ($l === strlen($contenu));
+        }
+
+        // liberer le verrou et fermer le fichier
+        @chmod($fichier, _SPIP_CHMOD & 0666);
+        if ($ok) {
+            if (str_contains($fichier, '.php')) {
+                spip_clear_opcode_cache(realpath($fichier));
+            }
+
+            return $ok;
+        }
+    }
+
+    if (!$ignorer_echec) {
+        include_spip('inc/autoriser');
+        if (autoriser('chargerftp')) {
+            raler_fichier($fichier);
+        }
+        spip_unlink($fichier);
+    }
+    spip_logger()->notice("Ecriture fichier $fichier impossible");
+
+    return false;
 }
 
 /**
@@ -320,12 +320,12 @@ 
  *     Écriture avec troncation ?
  */
 function ecrire_fichier_securise($fichier, $contenu, $ecrire_quand_meme = false, $truncate = true) {
-	if (!str_ends_with($fichier, '.php')) {
-		spip_logger()->info('Erreur de programmation: ' . $fichier . ' doit finir par .php');
-	}
-	$contenu = '<' . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
+    if (!str_ends_with($fichier, '.php')) {
+        spip_logger()->info('Erreur de programmation: ' . $fichier . ' doit finir par .php');
+    }
+    $contenu = '<' . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
 
-	return ecrire_fichier($fichier, $contenu, $ecrire_quand_meme, $truncate);
+    return ecrire_fichier($fichier, $contenu, $ecrire_quand_meme, $truncate);
 }
 
 
@@ -336,25 +336,25 @@ 
  * @return bool
  */
 function ecrire_fichier_calcule_si_modifie($fichier, $contenu, $force = false, $use_copy = false) {
-	$fichier_tmp = $fichier . '.last';
-	if (!ecrire_fichier($fichier_tmp, $contenu, true)) {
-		return false;
-	}
-	if (
-		$force
-		|| !file_exists($fichier)
-		|| md5_file($fichier) !== md5_file($fichier_tmp)
-	) {
-		if ($use_copy) {
-			@copy($fichier_tmp, $fichier);
-		}
-		else {
-			@rename($fichier_tmp, $fichier);
-		}
-		// eviter que PHP ne reserve le vieux timestamp
-		clearstatcache(true, $fichier);
-	}
-	return true;
+    $fichier_tmp = $fichier . '.last';
+    if (!ecrire_fichier($fichier_tmp, $contenu, true)) {
+        return false;
+    }
+    if (
+        $force
+        || !file_exists($fichier)
+        || md5_file($fichier) !== md5_file($fichier_tmp)
+    ) {
+        if ($use_copy) {
+            @copy($fichier_tmp, $fichier);
+        }
+        else {
+            @rename($fichier_tmp, $fichier);
+        }
+        // eviter que PHP ne reserve le vieux timestamp
+        clearstatcache(true, $fichier);
+    }
+    return true;
 }
 
 
@@ -375,11 +375,11 @@ 
  *     true si l'opération a réussie, false sinon.
  */
 function lire_fichier_securise($fichier, &$contenu, $options = []) {
-	if ($res = lire_fichier($fichier, $contenu, $options)) {
-		$contenu = substr((string) $contenu, strlen('<?php die (\'Acces interdit\'); ?>' . "\n"));
-	}
+    if ($res = lire_fichier($fichier, $contenu, $options)) {
+        $contenu = substr((string) $contenu, strlen('<?php die (\'Acces interdit\'); ?>' . "\n"));
+    }
 
-	return $res;
+    return $res;
 }
 
 /**
@@ -391,25 +391,25 @@ 
  * @uses minipres() Pour afficher le message
  **/
 function raler_fichier(string $fichier): never {
-	if (!defined('_SPIP_ECRIRE_SCRIPT')) {
-		spip_initialisation_suite();
-	}
-	include_spip('inc/minipres');
-	$dir = dirname($fichier);
-	http_response_code(401);
-	echo minipres(_T('texte_inc_meta_2'), "<h4 style='color: red'>"
-		. _T('texte_inc_meta_1', ['fichier' => $fichier])
-		. " <a href='"
-		. generer_url_ecrire('install', "etape=chmod&test_dir=$dir")
-		. "'>"
-		. _T('texte_inc_meta_2')
-		. '</a> '
-		. _T(
-			'texte_inc_meta_3',
-			['repertoire' => joli_repertoire($dir)]
-		)
-		. "</h4>\n");
-	exit;
+    if (!defined('_SPIP_ECRIRE_SCRIPT')) {
+        spip_initialisation_suite();
+    }
+    include_spip('inc/minipres');
+    $dir = dirname($fichier);
+    http_response_code(401);
+    echo minipres(_T('texte_inc_meta_2'), "<h4 style='color: red'>"
+        . _T('texte_inc_meta_1', ['fichier' => $fichier])
+        . " <a href='"
+        . generer_url_ecrire('install', "etape=chmod&test_dir=$dir")
+        . "'>"
+        . _T('texte_inc_meta_2')
+        . '</a> '
+        . _T(
+            'texte_inc_meta_3',
+            ['repertoire' => joli_repertoire($dir)]
+        )
+        . "</h4>\n");
+    exit;
 }
 
 
@@ -424,14 +424,14 @@ 
  *     - true si récent, false sinon
  */
 function jeune_fichier($fichier, $n) {
-	if (!file_exists($fichier)) {
-		return false;
-	}
-	if (!$c = @filemtime($fichier)) {
-		return false;
-	}
-
-	return (time() - $n <= $c);
+    if (!file_exists($fichier)) {
+        return false;
+    }
+    if (!$c = @filemtime($fichier)) {
+        return false;
+    }
+
+    return (time() - $n <= $c);
 }
 
 /**
@@ -446,22 +446,22 @@ 
  *     - false si on n'arrive pas poser le verrou ou si la suppression échoue
  */
 function supprimer_fichier($fichier, $lock = true) {
-	if (!@file_exists($fichier)) {
-		return true;
-	}
-
-	if ($lock) {
-		// verrouiller le fichier destination
-		if (!$fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
-			return false;
-		}
-
-		// liberer le verrou
-		spip_fclose_unlock($fp);
-	}
-
-	// supprimer
-	return @unlink($fichier);
+    if (!@file_exists($fichier)) {
+        return true;
+    }
+
+    if ($lock) {
+        // verrouiller le fichier destination
+        if (!$fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
+            return false;
+        }
+
+        // liberer le verrou
+        spip_fclose_unlock($fp);
+    }
+
+    // supprimer
+    return @unlink($fichier);
 }
 
 /**
@@ -471,12 +471,12 @@ 
  *     Chemin du fichier
  */
 function spip_unlink($f) {
-	if (!is_dir($f)) {
-		supprimer_fichier($f, false);
-	} else {
-		@unlink("$f/.ok");
-		@rmdir($f);
-	}
+    if (!is_dir($f)) {
+        supprimer_fichier($f, false);
+    } else {
+        @unlink("$f/.ok");
+        @rmdir($f);
+    }
 }
 
 /**
@@ -490,26 +490,26 @@ 
  *   The absolute path of the PHP file to invalidate.
  */
 function spip_clear_opcode_cache($filepath) {
-	clearstatcache(true, $filepath);
-
-	// Zend OPcache
-	if (function_exists('opcache_invalidate')) {
-		$invalidate = @opcache_invalidate($filepath, true);
-		// si l'invalidation a echoue lever un flag
-		if (!$invalidate && !defined('_spip_attend_invalidation_opcode_cache')) {
-			define('_spip_attend_invalidation_opcode_cache', true);
-		}
-	} elseif (!defined('_spip_attend_invalidation_opcode_cache')) {
-		// n'agira que si opcache est effectivement actif (il semble qu'on a pas toujours la fonction opcache_invalidate)
-		define('_spip_attend_invalidation_opcode_cache', true);
-	}
-	// APC.
-	if (function_exists('apc_delete_file')) {
-		// apc_delete_file() throws a PHP warning in case the specified file was
-		// not compiled yet.
-		// @see http://php.net/apc-delete-file
-		@apc_delete_file($filepath);
-	}
+    clearstatcache(true, $filepath);
+
+    // Zend OPcache
+    if (function_exists('opcache_invalidate')) {
+        $invalidate = @opcache_invalidate($filepath, true);
+        // si l'invalidation a echoue lever un flag
+        if (!$invalidate && !defined('_spip_attend_invalidation_opcode_cache')) {
+            define('_spip_attend_invalidation_opcode_cache', true);
+        }
+    } elseif (!defined('_spip_attend_invalidation_opcode_cache')) {
+        // n'agira que si opcache est effectivement actif (il semble qu'on a pas toujours la fonction opcache_invalidate)
+        define('_spip_attend_invalidation_opcode_cache', true);
+    }
+    // APC.
+    if (function_exists('apc_delete_file')) {
+        // apc_delete_file() throws a PHP warning in case the specified file was
+        // not compiled yet.
+        // @see http://php.net/apc-delete-file
+        @apc_delete_file($filepath);
+    }
 }
 
 /**
@@ -532,25 +532,25 @@ 
  *
  */
 function spip_attend_invalidation_opcode_cache($timestamp = null) {
-	if (
-		function_exists('opcache_get_configuration')
-		&& @ini_get('opcache.enable')
-		&& @ini_get('opcache.validate_timestamps')
-		&& (($duree = (int) @ini_get('opcache.revalidate_freq')) || ($duree = 2))
-		&& defined('_spip_attend_invalidation_opcode_cache') // des invalidations ont echouees
-	) {
-		$wait = $duree + 1;
-		if ($timestamp) {
-			$wait -= (time() - $timestamp);
-			if ($wait < 0) {
-				$wait = 0;
-			}
-		}
-		spip_logger()->notice('Probleme de configuration opcache.revalidate_freq ' . $duree . 's : on attend ' . $wait . 's');
-		if ($wait) {
-			sleep($duree + 1);
-		}
-	}
+    if (
+        function_exists('opcache_get_configuration')
+        && @ini_get('opcache.enable')
+        && @ini_get('opcache.validate_timestamps')
+        && (($duree = (int) @ini_get('opcache.revalidate_freq')) || ($duree = 2))
+        && defined('_spip_attend_invalidation_opcode_cache') // des invalidations ont echouees
+    ) {
+        $wait = $duree + 1;
+        if ($timestamp) {
+            $wait -= (time() - $timestamp);
+            if ($wait < 0) {
+                $wait = 0;
+            }
+        }
+        spip_logger()->notice('Probleme de configuration opcache.revalidate_freq ' . $duree . 's : on attend ' . $wait . 's');
+        if ($wait) {
+            sleep($duree + 1);
+        }
+    }
 }
 
 
@@ -563,26 +563,26 @@ 
  * @return bool Suppression reussie.
  */
 function supprimer_repertoire($dir) {
-	if (!file_exists($dir)) {
-		return true;
-	}
-	if (!is_dir($dir) || is_link($dir)) {
-		return @unlink($dir);
-	}
-
-	foreach (scandir($dir) as $item) {
-		if ($item == '.' || $item == '..') {
-			continue;
-		}
-		if (!supprimer_repertoire($dir . '/' . $item)) {
-			@chmod($dir . '/' . $item, 0777);
-			if (!supprimer_repertoire($dir . '/' . $item)) {
-				return false;
-			}
-		};
-	}
-
-	return @rmdir($dir);
+    if (!file_exists($dir)) {
+        return true;
+    }
+    if (!is_dir($dir) || is_link($dir)) {
+        return @unlink($dir);
+    }
+
+    foreach (scandir($dir) as $item) {
+        if ($item == '.' || $item == '..') {
+            continue;
+        }
+        if (!supprimer_repertoire($dir . '/' . $item)) {
+            @chmod($dir . '/' . $item, 0777);
+            if (!supprimer_repertoire($dir . '/' . $item)) {
+                return false;
+            }
+        };
+    }
+
+    return @rmdir($dir);
 }
 
 
@@ -611,58 +611,58 @@ 
  *     Chemin du répertoire créé.
  **/
 function sous_repertoire($base, $subdir = '', $nobase = false, $tantpis = false): string {
-	static $dirs = [];
-
-	$base = str_replace('//', '/', $base);
-
-	# suppr le dernier caractere si c'est un /
-	$base = rtrim($base, '/');
-
-	if (!strlen($subdir)) {
-		$n = strrpos($base, '/');
-		if ($n === false) {
-			return $nobase ? '' : ($base . '/');
-		}
-		$subdir = substr($base, $n + 1);
-		$base = substr($base, 0, $n + 1);
-	} else {
-		$base .= '/';
-		$subdir = str_replace('/', '', $subdir);
-	}
-
-	$baseaff = $nobase ? '' : $base;
-	if (isset($dirs[$base . $subdir])) {
-		return $baseaff . $dirs[$base . $subdir];
-	}
-
-	$path = $base . $subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
-
-	if (file_exists("$path/.ok")) {
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
-	}
-
-	@mkdir($path, _SPIP_CHMOD);
-	@chmod($path, _SPIP_CHMOD);
-
-	if (is_dir($path) && is_writable($path)) {
-		@touch("$path/.ok");
-		spip_logger()->info("creation $base$subdir/");
-
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
-	}
-
-	// en cas d'echec c'est peut etre tout simplement que le disque est plein :
-	// l'inode du fichier dir_test existe, mais impossible d'y mettre du contenu
-	spip_logger()->info("echec creation $base{$subdir}");
-	if ($tantpis) {
-		return '';
-	}
-	// FIXME: throw an Exception…
-	if (!_DIR_RESTREINT) {
-		$base = preg_replace(',^' . _DIR_RACINE . ',', '', $base);
-	}
-	$base .= $subdir;
-	raler_fichier($base . '/.ok');
+    static $dirs = [];
+
+    $base = str_replace('//', '/', $base);
+
+    # suppr le dernier caractere si c'est un /
+    $base = rtrim($base, '/');
+
+    if (!strlen($subdir)) {
+        $n = strrpos($base, '/');
+        if ($n === false) {
+            return $nobase ? '' : ($base . '/');
+        }
+        $subdir = substr($base, $n + 1);
+        $base = substr($base, 0, $n + 1);
+    } else {
+        $base .= '/';
+        $subdir = str_replace('/', '', $subdir);
+    }
+
+    $baseaff = $nobase ? '' : $base;
+    if (isset($dirs[$base . $subdir])) {
+        return $baseaff . $dirs[$base . $subdir];
+    }
+
+    $path = $base . $subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
+
+    if (file_exists("$path/.ok")) {
+        return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+    }
+
+    @mkdir($path, _SPIP_CHMOD);
+    @chmod($path, _SPIP_CHMOD);
+
+    if (is_dir($path) && is_writable($path)) {
+        @touch("$path/.ok");
+        spip_logger()->info("creation $base$subdir/");
+
+        return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+    }
+
+    // en cas d'echec c'est peut etre tout simplement que le disque est plein :
+    // l'inode du fichier dir_test existe, mais impossible d'y mettre du contenu
+    spip_logger()->info("echec creation $base{$subdir}");
+    if ($tantpis) {
+        return '';
+    }
+    // FIXME: throw an Exception…
+    if (!_DIR_RESTREINT) {
+        $base = preg_replace(',^' . _DIR_RACINE . ',', '', $base);
+    }
+    $base .= $subdir;
+    raler_fichier($base . '/.ok');
 }
 
 
@@ -695,55 +695,55 @@ 
  *     Chemins des fichiers trouvés.
  **/
 function preg_files($dir, $pattern = -1 /* AUTO */, $maxfiles = 10000, $recurs = []) {
-	$nbfiles = 0;
-	if ($pattern == -1) {
-		$pattern = '';
-	}
-	$fichiers = [];
-	// revenir au repertoire racine si on a recu dossier/truc
-	// pour regarder dossier/truc/ ne pas oublier le / final
-	$dir = preg_replace(',/[^/]*$,', '', $dir);
-	if ($dir == '') {
-		$dir = '.';
-	}
-
-	if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
-		while (($f = readdir($d)) !== false && ($nbfiles < $maxfiles)) {
-			if (
-				$f[0] != '.'
-				&& $f != 'remove.txt'
-				&& is_readable($f = "$dir/$f")
-			) {
-				if (is_file($f)) {
-					if (!$pattern || preg_match(";$pattern;iS", $f)) {
-						$fichiers[] = $f;
-						$nbfiles++;
-					}
-				} else {
-					if (is_dir($f) && is_array($recurs)) {
-						$rp = @realpath($f);
-						if (!is_string($rp) || !strlen($rp)) {
-							$rp = $f;
-						} # realpath n'est peut etre pas autorise
-						if (!isset($recurs[$rp])) {
-							$recurs[$rp] = true;
-							$beginning = $fichiers;
-							$end = preg_files(
-								"$f/",
-								$pattern,
-								$maxfiles - $nbfiles,
-								$recurs
-							);
-							$fichiers = array_merge((array)$beginning, (array)$end);
-							$nbfiles = count($fichiers);
-						}
-					}
-				}
-			}
-		}
-		closedir($d);
-	}
-	sort($fichiers);
-
-	return $fichiers;
+    $nbfiles = 0;
+    if ($pattern == -1) {
+        $pattern = '';
+    }
+    $fichiers = [];
+    // revenir au repertoire racine si on a recu dossier/truc
+    // pour regarder dossier/truc/ ne pas oublier le / final
+    $dir = preg_replace(',/[^/]*$,', '', $dir);
+    if ($dir == '') {
+        $dir = '.';
+    }
+
+    if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
+        while (($f = readdir($d)) !== false && ($nbfiles < $maxfiles)) {
+            if (
+                $f[0] != '.'
+                && $f != 'remove.txt'
+                && is_readable($f = "$dir/$f")
+            ) {
+                if (is_file($f)) {
+                    if (!$pattern || preg_match(";$pattern;iS", $f)) {
+                        $fichiers[] = $f;
+                        $nbfiles++;
+                    }
+                } else {
+                    if (is_dir($f) && is_array($recurs)) {
+                        $rp = @realpath($f);
+                        if (!is_string($rp) || !strlen($rp)) {
+                            $rp = $f;
+                        } # realpath n'est peut etre pas autorise
+                        if (!isset($recurs[$rp])) {
+                            $recurs[$rp] = true;
+                            $beginning = $fichiers;
+                            $end = preg_files(
+                                "$f/",
+                                $pattern,
+                                $maxfiles - $nbfiles,
+                                $recurs
+                            );
+                            $fichiers = array_merge((array)$beginning, (array)$end);
+                            $nbfiles = count($fichiers);
+                        }
+                    }
+                }
+            }
+        }
+        closedir($d);
+    }
+    sort($fichiers);
+
+    return $fichiers;
 }

ecrire/inc/urls.php

Indentation +203 added lines, -203 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('base/objets');
 
@@ -56,106 +56,106 @@ 
  *
  */
 function urls_decoder_url($url, $fond = '', $contexte = [], $assembler = false) {
-	static $current_base = null;
+    static $current_base = null;
 
-	// les anciennes fonctions modifient directement les globales
-	// on les sauve avant l'appel, et on les retablit apres !
-	$save = [
-		$GLOBALS['fond'] ?? null,
-		$GLOBALS['contexte'] ?? null,
-		$_SERVER['REDIRECT_url_propre'] ?? null,
-		$_ENV['url_propre'] ?? null,
-		$GLOBALS['profondeur_url']
-	];
+    // les anciennes fonctions modifient directement les globales
+    // on les sauve avant l'appel, et on les retablit apres !
+    $save = [
+        $GLOBALS['fond'] ?? null,
+        $GLOBALS['contexte'] ?? null,
+        $_SERVER['REDIRECT_url_propre'] ?? null,
+        $_ENV['url_propre'] ?? null,
+        $GLOBALS['profondeur_url']
+    ];
 
-	if (is_null($current_base)) {
-		include_spip('inc/filtres_mini');
-		// le decodage des urls se fait toujours par rapport au site public
-		$current_base = url_absolue(_DIR_RACINE ?: './');
-	}
-	if (str_starts_with($url, $current_base)) {
-		$url = substr($url, strlen($current_base));
-	}
+    if (is_null($current_base)) {
+        include_spip('inc/filtres_mini');
+        // le decodage des urls se fait toujours par rapport au site public
+        $current_base = url_absolue(_DIR_RACINE ?: './');
+    }
+    if (str_starts_with($url, $current_base)) {
+        $url = substr($url, strlen($current_base));
+    }
 
-	// si on est en train d'assembler la page principale,
-	// recuperer l'url depuis les globales url propres si fournies
-	// sinon extraire la bonne portion d'url
-	if ($assembler) {
-		if (isset($_SERVER['REDIRECT_url_propre'])) {
-			$url = $_SERVER['REDIRECT_url_propre'];
-		} elseif (isset($_ENV['url_propre'])) {
-			$url = $_ENV['url_propre'];
-		} else {
-			$qs = explode('?', $url);
-			// ne prendre que le segment d'url qui correspond, en fonction de la profondeur calculee
-			$url = ltrim($qs[0], '/');
-			$url = explode('/', $url);
-			while (count($url) > $GLOBALS['profondeur_url'] + 1) {
-				array_shift($url);
-			}
-			$qs[0] = implode('/', $url);
-			$url = implode('?', $qs);
-		}
-	}
+    // si on est en train d'assembler la page principale,
+    // recuperer l'url depuis les globales url propres si fournies
+    // sinon extraire la bonne portion d'url
+    if ($assembler) {
+        if (isset($_SERVER['REDIRECT_url_propre'])) {
+            $url = $_SERVER['REDIRECT_url_propre'];
+        } elseif (isset($_ENV['url_propre'])) {
+            $url = $_ENV['url_propre'];
+        } else {
+            $qs = explode('?', $url);
+            // ne prendre que le segment d'url qui correspond, en fonction de la profondeur calculee
+            $url = ltrim($qs[0], '/');
+            $url = explode('/', $url);
+            while (count($url) > $GLOBALS['profondeur_url'] + 1) {
+                array_shift($url);
+            }
+            $qs[0] = implode('/', $url);
+            $url = implode('?', $qs);
+        }
+    }
 
-	unset($_SERVER['REDIRECT_url_propre']);
-	unset($_ENV['url_propre']);
-	include_spip('inc/filtres_mini');
-	if (!str_contains($url, '://')) {
-		$GLOBALS['profondeur_url'] = substr_count(ltrim(resolve_path("/$url"), '/'), '/');
-	} else {
-		$GLOBALS['profondeur_url'] = max(0, substr_count($url, '/') - substr_count($current_base, '/'));
-	}
+    unset($_SERVER['REDIRECT_url_propre']);
+    unset($_ENV['url_propre']);
+    include_spip('inc/filtres_mini');
+    if (!str_contains($url, '://')) {
+        $GLOBALS['profondeur_url'] = substr_count(ltrim(resolve_path("/$url"), '/'), '/');
+    } else {
+        $GLOBALS['profondeur_url'] = max(0, substr_count($url, '/') - substr_count($current_base, '/'));
+    }
 
-	$url_redirect = '';
-	$decoder = charger_fonction_url('decoder');
-	if ($decoder) {
-		$a = $decoder($url, $fond, $contexte);
-		if (is_array($a)) {
-			[$ncontexte, $type, $url_redirect, $nfond] = array_pad($a, 4, null);
-			$url_redirect ??= '';
-			if ($url_redirect === $url) {
-				$url_redirect = '';
-			} // securite pour eviter une redirection infinie
-			if ($assembler && strlen($url_redirect)) {
-				spip_logger()->info("Redirige $url vers $url_redirect");
-				include_spip('inc/headers');
-				redirige_par_entete($url_redirect, '', 301);
-			}
-			if (isset($nfond)) {
-				$fond = $nfond;
-			} else {
-				if (
-					$fond == ''
-					|| $fond == 'type_urls' /* compat avec htaccess 2.0.0 */
-				) {
-					$fond = $type;
-				}
-			}
-			if (isset($ncontexte)) {
-				$contexte = $ncontexte;
-			}
-			if (defined('_DEFINIR_CONTEXTE_TYPE') && _DEFINIR_CONTEXTE_TYPE) {
-				$contexte['type'] = $type;
-			}
-			if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') || _DEFINIR_CONTEXTE_TYPE_PAGE) {
-				$contexte['type-page'] = $type;
-			}
-		}
-	}
+    $url_redirect = '';
+    $decoder = charger_fonction_url('decoder');
+    if ($decoder) {
+        $a = $decoder($url, $fond, $contexte);
+        if (is_array($a)) {
+            [$ncontexte, $type, $url_redirect, $nfond] = array_pad($a, 4, null);
+            $url_redirect ??= '';
+            if ($url_redirect === $url) {
+                $url_redirect = '';
+            } // securite pour eviter une redirection infinie
+            if ($assembler && strlen($url_redirect)) {
+                spip_logger()->info("Redirige $url vers $url_redirect");
+                include_spip('inc/headers');
+                redirige_par_entete($url_redirect, '', 301);
+            }
+            if (isset($nfond)) {
+                $fond = $nfond;
+            } else {
+                if (
+                    $fond == ''
+                    || $fond == 'type_urls' /* compat avec htaccess 2.0.0 */
+                ) {
+                    $fond = $type;
+                }
+            }
+            if (isset($ncontexte)) {
+                $contexte = $ncontexte;
+            }
+            if (defined('_DEFINIR_CONTEXTE_TYPE') && _DEFINIR_CONTEXTE_TYPE) {
+                $contexte['type'] = $type;
+            }
+            if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') || _DEFINIR_CONTEXTE_TYPE_PAGE) {
+                $contexte['type-page'] = $type;
+            }
+        }
+    }
 
-	// retablir les globales
-	[$GLOBALS['fond'], $GLOBALS['contexte'], $_SERVER['REDIRECT_url_propre'], $_ENV['url_propre'], $GLOBALS['profondeur_url']] = $save;
+    // retablir les globales
+    [$GLOBALS['fond'], $GLOBALS['contexte'], $_SERVER['REDIRECT_url_propre'], $_ENV['url_propre'], $GLOBALS['profondeur_url']] = $save;
 
-	// vider les globales url propres qui ne doivent plus etre utilisees en cas
-	// d'inversion url => objet
-	// maintenir pour compat ?
-	#if ($assembler) {
-	#	unset($_SERVER['REDIRECT_url_propre']);
-	#	unset($_ENV['url_propre']);
-	#}
+    // vider les globales url propres qui ne doivent plus etre utilisees en cas
+    // d'inversion url => objet
+    // maintenir pour compat ?
+    #if ($assembler) {
+    #	unset($_SERVER['REDIRECT_url_propre']);
+    #	unset($_ENV['url_propre']);
+    #}
 
-	return [$fond, $contexte, $url_redirect];
+    return [$fond, $contexte, $url_redirect];
 }
 
 /**
@@ -163,20 +163,20 @@ 
  * le mode 'urls-propres' vers les modes 'urls-standard' et 'url-html'
  */
 function urls_transition_retrouver_anciennes_url_propres(string $url_propre, string $entite, array $contexte = []): array {
-	if ($url_propre) {
-		if ($GLOBALS['profondeur_url'] <= 0) {
-			$urls_anciennes = charger_fonction_url('decoder', 'propres');
-		} else {
-			$urls_anciennes = charger_fonction_url('decoder', 'arbo');
-		}
+    if ($url_propre) {
+        if ($GLOBALS['profondeur_url'] <= 0) {
+            $urls_anciennes = charger_fonction_url('decoder', 'propres');
+        } else {
+            $urls_anciennes = charger_fonction_url('decoder', 'arbo');
+        }
 
-		if ($urls_anciennes) {
-			$urls_anciennes = $urls_anciennes($url_propre, $entite, $contexte);
-		}
-		return $urls_anciennes ?: [];
-	}
+        if ($urls_anciennes) {
+            $urls_anciennes = $urls_anciennes($url_propre, $entite, $contexte);
+        }
+        return $urls_anciennes ?: [];
+    }
 
-	return [];
+    return [];
 }
 
 /**
@@ -184,41 +184,41 @@ 
  * le mode 'urls-html/standard' vers les modes 'urls propres|arbos'
  */
 function urls_transition_retrouver_anciennes_url_html(string $url, string $entite, array $contexte = []): array {
-	// Migration depuis anciennes URLs ?
-	// traiter les injections domain.tld/spip.php/n/importe/quoi/rubrique23
-	if (
-		$url
-		&& $GLOBALS['profondeur_url'] <= 0
-	) {
-		$r = nettoyer_url_page($url, $contexte);
-		if ($r) {
-			[$contexte, $type, , , $suite] = $r;
-			$_id = id_table_objet($type);
-			$id_objet = $contexte[$_id];
-			$url_propre = generer_objet_url($id_objet, $type);
-			if (
-				strlen($url_propre)
-				&& !strstr($url, (string) $url_propre)
-				&& (
-					objet_test_si_publie($type, $id_objet)
-					|| defined('_VAR_PREVIEW') && _VAR_PREVIEW && autoriser('voir', $type, $id_objet)
-				)
-			) {
-				[, $hash] = array_pad(explode('#', $url_propre), 2, '');
-				$args = [];
-				foreach (array_filter(explode('&', $suite ?? '')) as $fragment) {
-					if ($fragment != "$_id=$id_objet") {
-						$args[] = $fragment;
-					}
-				}
-				$url_redirect = generer_objet_url($id_objet, $type, join('&', array_filter($args)), $hash);
+    // Migration depuis anciennes URLs ?
+    // traiter les injections domain.tld/spip.php/n/importe/quoi/rubrique23
+    if (
+        $url
+        && $GLOBALS['profondeur_url'] <= 0
+    ) {
+        $r = nettoyer_url_page($url, $contexte);
+        if ($r) {
+            [$contexte, $type, , , $suite] = $r;
+            $_id = id_table_objet($type);
+            $id_objet = $contexte[$_id];
+            $url_propre = generer_objet_url($id_objet, $type);
+            if (
+                strlen($url_propre)
+                && !strstr($url, (string) $url_propre)
+                && (
+                    objet_test_si_publie($type, $id_objet)
+                    || defined('_VAR_PREVIEW') && _VAR_PREVIEW && autoriser('voir', $type, $id_objet)
+                )
+            ) {
+                [, $hash] = array_pad(explode('#', $url_propre), 2, '');
+                $args = [];
+                foreach (array_filter(explode('&', $suite ?? '')) as $fragment) {
+                    if ($fragment != "$_id=$id_objet") {
+                        $args[] = $fragment;
+                    }
+                }
+                $url_redirect = generer_objet_url($id_objet, $type, join('&', array_filter($args)), $hash);
 
-				return [$contexte, $type, $url_redirect, $type];
-			}
-		}
-	}
-	/* Fin compatibilite anciennes urls */
-	return [];
+                return [$contexte, $type, $url_redirect, $type];
+            }
+        }
+    }
+    /* Fin compatibilite anciennes urls */
+    return [];
 }
 
 /**
@@ -231,24 +231,24 @@ 
  * @return string|array
  */
 function urls_liste_objets($preg = true) {
-	static $url_objets = null;
-	if (is_null($url_objets)) {
-		$url_objets = [];
-		// recuperer les tables_objets_sql declarees
-		$tables_objets = lister_tables_objets_sql();
-		foreach ($tables_objets as $t => $infos) {
-			if ($infos['page']) {
-				$url_objets[] = $infos['type'];
-				$url_objets = array_merge($url_objets, $infos['type_surnoms']);
-			}
-		}
-		$url_objets = pipeline('declarer_url_objets', $url_objets);
-	}
-	if (!$preg) {
-		return $url_objets;
-	}
+    static $url_objets = null;
+    if (is_null($url_objets)) {
+        $url_objets = [];
+        // recuperer les tables_objets_sql declarees
+        $tables_objets = lister_tables_objets_sql();
+        foreach ($tables_objets as $t => $infos) {
+            if ($infos['page']) {
+                $url_objets[] = $infos['type'];
+                $url_objets = array_merge($url_objets, $infos['type_surnoms']);
+            }
+        }
+        $url_objets = pipeline('declarer_url_objets', $url_objets);
+    }
+    if (!$preg) {
+        return $url_objets;
+    }
 
-	return implode('|', array_map('preg_quote', $url_objets));
+    return implode('|', array_map('preg_quote', $url_objets));
 }
 
 /**
@@ -262,26 +262,26 @@ 
  * @return array
  */
 function nettoyer_url_page($url, $contexte = []) {
-	$url_objets = urls_liste_objets();
-	$raccourci_url_page_html = ',^(?:[^?]*/)?(' . $url_objets . ')([0-9]+)(?:\.html)?([?&].*)?$,';
-	$raccourci_url_page_id = ',^(?:[^?]*/)?(' . $url_objets . ')\.php3?[?]id_\1=([0-9]+)([?&].*)?$,';
-	$raccourci_url_page_spip = ',^(?:[^?]*/)?(?:spip[.]php)?[?](' . $url_objets . ')([0-9]+)=?(&.*)?$,';
+    $url_objets = urls_liste_objets();
+    $raccourci_url_page_html = ',^(?:[^?]*/)?(' . $url_objets . ')([0-9]+)(?:\.html)?([?&].*)?$,';
+    $raccourci_url_page_id = ',^(?:[^?]*/)?(' . $url_objets . ')\.php3?[?]id_\1=([0-9]+)([?&].*)?$,';
+    $raccourci_url_page_spip = ',^(?:[^?]*/)?(?:spip[.]php)?[?](' . $url_objets . ')([0-9]+)=?(&.*)?$,';
 
-	if (
-		preg_match($raccourci_url_page_html, $url, $regs)
-		|| preg_match($raccourci_url_page_id, $url, $regs)
-		|| preg_match($raccourci_url_page_spip, $url, $regs)
-	) {
-		$regs = array_pad($regs, 4, null);
-		$type = objet_type($regs[1]);
-		$_id = id_table_objet($type);
-		$contexte[$_id] = $regs[2];
-		$suite = $regs[3];
+    if (
+        preg_match($raccourci_url_page_html, $url, $regs)
+        || preg_match($raccourci_url_page_id, $url, $regs)
+        || preg_match($raccourci_url_page_spip, $url, $regs)
+    ) {
+        $regs = array_pad($regs, 4, null);
+        $type = objet_type($regs[1]);
+        $_id = id_table_objet($type);
+        $contexte[$_id] = $regs[2];
+        $suite = $regs[3];
 
-		return [$contexte, $type, null, $type, $suite];
-	}
+        return [$contexte, $type, null, $type, $suite];
+    }
 
-	return [];
+    return [];
 }
 
 /**
@@ -299,35 +299,35 @@ 
  * @return string
  */
 function generer_objet_url_ecrire($id, string $objet, string $args = '', string $ancre = '', ?bool $public = null, string $connect = ''): string {
-	static $furls = [];
-	$id = intval($id);
-	if (!isset($furls[$objet])) {
-		if (
-			function_exists($f = 'generer_' . $objet . '_url_ecrire')
-			|| ($f = charger_fonction($f, 'urls', true))
-			|| function_exists($f = 'generer_url_ecrire_' . $objet) // deprecated
-			|| ($f = charger_fonction($f, 'urls', true)) // deprecated
-		) {
-			$furls[$objet] = $f;
-		} else {
-			$furls[$objet] = '';
-		}
-	}
-	if ($furls[$objet]) {
-		return $furls[$objet]($id, $args, $ancre, $public, $connect);
-	}
-	// si pas de flag public fourni
-	// le calculer en fonction de la declaration de statut
-	if (is_null($public) && !$connect) {
-		$public = objet_test_si_publie($objet, $id, $connect);
-	}
-	if ($public || $connect) {
-		return generer_objet_url_absolue($id, $objet, $args, $ancre, $public, '', $connect);
-	}
-	$a = id_table_objet($objet) . '=' . intval($id);
-	if (!function_exists('objet_info')) {
-		include_spip('inc/filtres');
-	}
+    static $furls = [];
+    $id = intval($id);
+    if (!isset($furls[$objet])) {
+        if (
+            function_exists($f = 'generer_' . $objet . '_url_ecrire')
+            || ($f = charger_fonction($f, 'urls', true))
+            || function_exists($f = 'generer_url_ecrire_' . $objet) // deprecated
+            || ($f = charger_fonction($f, 'urls', true)) // deprecated
+        ) {
+            $furls[$objet] = $f;
+        } else {
+            $furls[$objet] = '';
+        }
+    }
+    if ($furls[$objet]) {
+        return $furls[$objet]($id, $args, $ancre, $public, $connect);
+    }
+    // si pas de flag public fourni
+    // le calculer en fonction de la declaration de statut
+    if (is_null($public) && !$connect) {
+        $public = objet_test_si_publie($objet, $id, $connect);
+    }
+    if ($public || $connect) {
+        return generer_objet_url_absolue($id, $objet, $args, $ancre, $public, '', $connect);
+    }
+    $a = id_table_objet($objet) . '=' . intval($id);
+    if (!function_exists('objet_info')) {
+        include_spip('inc/filtres');
+    }
 
-	return generer_url_ecrire(objet_info($objet, 'url_voir'), $a . ($args ? "&$args" : '')) . ($ancre ? "#$ancre" : '');
+    return generer_url_ecrire(objet_info($objet, 'url_voir'), $a . ($args ? "&$args" : '')) . ($ancre ? "#$ancre" : '');
 }

ecrire/inc/notifications.php

Indentation +108 added lines, -108 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Notifications
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -32,16 +32,16 @@ 
  */
 function inc_notifications_dist($quoi, $id = 0, $options = []) {
 
-	// charger les fichiers qui veulent ajouter des definitions
-	// ou faire des trucs aussi dans le pipeline, ca fait deux api pour le prix d'une ...
-	pipeline('notifications', ['args' => ['quoi' => $quoi, 'id' => $id, 'options' => $options]]);
+    // charger les fichiers qui veulent ajouter des definitions
+    // ou faire des trucs aussi dans le pipeline, ca fait deux api pour le prix d'une ...
+    pipeline('notifications', ['args' => ['quoi' => $quoi, 'id' => $id, 'options' => $options]]);
 
-	if ($notification = charger_fonction($quoi, 'notifications', true)) {
-		spip_logger('notifications')->info("$notification($quoi,$id"
-			. ($options ? ',' . serialize($options) : '')
-			. ')');
-		$notification($quoi, $id, $options);
-	}
+    if ($notification = charger_fonction($quoi, 'notifications', true)) {
+        spip_logger('notifications')->info("$notification($quoi,$id"
+            . ($options ? ',' . serialize($options) : '')
+            . ')');
+        $notification($quoi, $id, $options);
+    }
 }
 
 /**
@@ -55,15 +55,15 @@ 
  * @param array $exclure
  */
 function notifications_nettoyer_emails(&$emails, $exclure = []) {
-	// filtrer et unifier
-	include_spip('inc/filtres');
-	$emails = array_unique(array_filter(array_map('email_valide', array_map('trim', $emails))));
-	if ($exclure && count($exclure)) {
-		// nettoyer les exclusions d'abord
-		notifications_nettoyer_emails($exclure);
-		// faire un diff
-		$emails = array_diff($emails, $exclure);
-	}
+    // filtrer et unifier
+    include_spip('inc/filtres');
+    $emails = array_unique(array_filter(array_map('email_valide', array_map('trim', $emails))));
+    if ($exclure && count($exclure)) {
+        // nettoyer les exclusions d'abord
+        notifications_nettoyer_emails($exclure);
+        // faire un diff
+        $emails = array_diff($emails, $exclure);
+    }
 }
 
 /**
@@ -78,90 +78,90 @@ 
  * @param string $headers
  */
 function notifications_envoyer_mails($emails, $texte, $sujet = '', $from = '', $headers = '') {
-	// rien a faire si pas de texte !
-	if (!strlen($texte)) {
-		return;
-	}
-
-	// si on ne specifie qu'un email, le mettre dans un tableau
-	if (!is_array($emails)) {
-		$emails = explode(',', $emails);
-	}
-
-	notifications_nettoyer_emails($emails);
-
-	// tester si le mail est deja en html
-	if (
-		str_contains($texte, '<')
-		&& ($ttrim = trim($texte))
-		&& str_starts_with($ttrim, '<')
-		&& str_ends_with($ttrim, '>')
-		&& stripos($ttrim, '</html>') !== false
-	) {
-		if (!strlen($sujet)) {
-			// dans ce cas on ruse un peu : extraire le sujet du title
-			if (preg_match(',<title>(.*)</title>,Uims', $texte, $m)) {
-				$sujet = $m[1];
-			} else {
-				// fallback, on prend le body si on le trouve
-				if (preg_match(',<body[^>]*>(.*)</body>,Uims', $texte, $m)) {
-					$ttrim = $m[1];
-				}
-
-				// et on extrait la premiere ligne de vrai texte...
-				// nettoyer le html et les retours chariots
-				$ttrim = textebrut($ttrim);
-				$ttrim = str_replace("\r\n", "\r", $ttrim);
-				$ttrim = str_replace("\r", "\n", $ttrim);
-				// decouper
-				$ttrim = explode("\n", trim($ttrim));
-				// extraire la premiere ligne de texte brut
-				$sujet = array_shift($ttrim);
-			}
-		}
-
-		// si besoin on ajoute le content-type dans les headers
-		if (stripos($headers, 'Content-Type') === false) {
-			$headers .= "Content-Type: text/html\n";
-		}
-	}
-
-	// si le sujet est vide, extraire la premiere ligne du corps
-	// du mail qui est donc du texte
-	if (!strlen($sujet)) {
-		// nettoyer un peu les retours chariots
-		$texte = str_replace("\r\n", "\r", $texte);
-		$texte = str_replace("\r", "\n", $texte);
-		// decouper
-		$texte = explode("\n", trim($texte));
-		// extraire la premiere ligne
-		$sujet = array_shift($texte);
-		$texte = trim(implode("\n", $texte));
-	}
-
-	$envoyer_mail = charger_fonction('envoyer_mail', 'inc');
-	foreach ($emails as $email) {
-		// passer dans un pipeline qui permet un ajout eventuel
-		// (url de suivi des notifications par exemple)
-		$envoi = pipeline(
-			'notifications_envoyer_mails',
-			[
-				'email' => $email,
-				'sujet' => $sujet,
-				'texte' => $texte,
-				'from' => $from,
-				'headers' => $headers,
-			]
-		);
-		$email = $envoi['email'];
-
-		job_queue_add(
-			'envoyer_mail',
-			">$email : " . $envoi['sujet'],
-			[$email, $envoi['sujet'], $envoi['texte'], $envoi['from'], $envoi['headers']],
-			'inc/'
-		);
-	}
+    // rien a faire si pas de texte !
+    if (!strlen($texte)) {
+        return;
+    }
+
+    // si on ne specifie qu'un email, le mettre dans un tableau
+    if (!is_array($emails)) {
+        $emails = explode(',', $emails);
+    }
+
+    notifications_nettoyer_emails($emails);
+
+    // tester si le mail est deja en html
+    if (
+        str_contains($texte, '<')
+        && ($ttrim = trim($texte))
+        && str_starts_with($ttrim, '<')
+        && str_ends_with($ttrim, '>')
+        && stripos($ttrim, '</html>') !== false
+    ) {
+        if (!strlen($sujet)) {
+            // dans ce cas on ruse un peu : extraire le sujet du title
+            if (preg_match(',<title>(.*)</title>,Uims', $texte, $m)) {
+                $sujet = $m[1];
+            } else {
+                // fallback, on prend le body si on le trouve
+                if (preg_match(',<body[^>]*>(.*)</body>,Uims', $texte, $m)) {
+                    $ttrim = $m[1];
+                }
+
+                // et on extrait la premiere ligne de vrai texte...
+                // nettoyer le html et les retours chariots
+                $ttrim = textebrut($ttrim);
+                $ttrim = str_replace("\r\n", "\r", $ttrim);
+                $ttrim = str_replace("\r", "\n", $ttrim);
+                // decouper
+                $ttrim = explode("\n", trim($ttrim));
+                // extraire la premiere ligne de texte brut
+                $sujet = array_shift($ttrim);
+            }
+        }
+
+        // si besoin on ajoute le content-type dans les headers
+        if (stripos($headers, 'Content-Type') === false) {
+            $headers .= "Content-Type: text/html\n";
+        }
+    }
+
+    // si le sujet est vide, extraire la premiere ligne du corps
+    // du mail qui est donc du texte
+    if (!strlen($sujet)) {
+        // nettoyer un peu les retours chariots
+        $texte = str_replace("\r\n", "\r", $texte);
+        $texte = str_replace("\r", "\n", $texte);
+        // decouper
+        $texte = explode("\n", trim($texte));
+        // extraire la premiere ligne
+        $sujet = array_shift($texte);
+        $texte = trim(implode("\n", $texte));
+    }
+
+    $envoyer_mail = charger_fonction('envoyer_mail', 'inc');
+    foreach ($emails as $email) {
+        // passer dans un pipeline qui permet un ajout eventuel
+        // (url de suivi des notifications par exemple)
+        $envoi = pipeline(
+            'notifications_envoyer_mails',
+            [
+                'email' => $email,
+                'sujet' => $sujet,
+                'texte' => $texte,
+                'from' => $from,
+                'headers' => $headers,
+            ]
+        );
+        $email = $envoi['email'];
+
+        job_queue_add(
+            'envoyer_mail',
+            ">$email : " . $envoi['sujet'],
+            [$email, $envoi['sujet'], $envoi['texte'], $envoi['from'], $envoi['headers']],
+            'inc/'
+        );
+    }
 }
 
 /**
@@ -177,10 +177,10 @@ 
  * @return string
  */
 function email_notification_objet($id_objet, $type_objet, $modele) {
-	$envoyer_mail = charger_fonction('envoyer_mail', 'inc'); // pour nettoyer_titre_email
-	$id_type = id_table_objet($type_objet);
+    $envoyer_mail = charger_fonction('envoyer_mail', 'inc'); // pour nettoyer_titre_email
+    $id_type = id_table_objet($type_objet);
 
-	return recuperer_fond($modele, [$id_type => $id_objet, 'id' => $id_objet]);
+    return recuperer_fond($modele, [$id_type => $id_objet, 'id' => $id_objet]);
 }
 
 /**
@@ -195,7 +195,7 @@ 
  * @return string
  */
 function email_notification_article($id_article, $modele) {
-	$envoyer_mail = charger_fonction('envoyer_mail', 'inc'); // pour nettoyer_titre_email
+    $envoyer_mail = charger_fonction('envoyer_mail', 'inc'); // pour nettoyer_titre_email
 
-	return recuperer_fond($modele, ['id_article' => $id_article]);
+    return recuperer_fond($modele, ['id_article' => $id_article]);
 }

ecrire/inc/cookie.php

Indentation +94 added lines, -94 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -50,66 +50,66 @@ 
  *     true si le cookie a été posé, false sinon.
  **/
 function spip_setcookie(
-	string $name = '',
-	string $value = '',
-	int|array $expires_or_options = 0,
-	string $path = '',
-	string $domain = '',
-	bool $secure = false,
-	bool $httponly = false
+    string $name = '',
+    string $value = '',
+    int|array $expires_or_options = 0,
+    string $path = '',
+    string $domain = '',
+    bool $secure = false,
+    bool $httponly = false
 ) {
-	if (!is_array($expires_or_options)) {
-		# anciens paramètres : spip_setcookie($name = '', $value = '', $expire = 0, $path = 'AUTO', $domain = '', $secure = '')
-		$options = [
-			'expires' => (int) $expires_or_options,
-			'path' => $path,
-			'domain' => $domain,
-			'secure' => $secure,
-			'httponly' => $httponly,
-		];
-	} else {
-		$options = $expires_or_options;
-	}
-
-	// expires
-	$options['expires'] ??= 0;
-	if (!isset($options['path']) || $options['path'] === 'AUTO') {
-		$options['path'] = defined('_COOKIE_PATH') ? constant('_COOKIE_PATH') : preg_replace(',^\w+://[^/]*,', '', url_de_base());
-	}
-	if (empty($options['domain']) && defined('_COOKIE_DOMAIN') && constant('_COOKIE_DOMAIN')) {
-		$options['domain'] = constant('_COOKIE_DOMAIN');
-	}
-	$options['secure'] ??= false;
-	$options['secure'] = ($options['secure'] ?: ($_SERVER['HTTPS'] ?? false));
-	if (defined('_COOKIE_SECURE') && constant('_COOKIE_SECURE')) {
-		trigger_deprecation('spip', '5.0', 'Using "%s" constant is deprecated, use option "%s" when call "%s" instead (automatic in HTTPS).', '_COOKIE_SECURE', 'secure: true', __FUNCTION__);
-		$options['secure'] = true;
-	}
-	$options['httponly'] ??= false;
-	$options['samesite'] = ($options['samesite'] ?? 'Lax') ?: 'Lax';
-
-	/** @deprecated 5.0 Use option `'httponly' => true` */
-	if (defined('_COOKIE_SECURE_LIST')) {
-		trigger_deprecation('spip', '5.0', 'Using "%s" constant is deprecated, use option "%s" when call "%s" instead.', '_COOKIE_SECURE_LIST', 'httponly: true', __FUNCTION__);
-		if (
-			is_array(constant('_COOKIE_SECURE_LIST'))
-			&& in_array($name, constant('_COOKIE_SECURE_LIST'))
-		) {
-			$options['httponly'] = true;
-		}
-	}
-
-	// in fine renommer le prefixe si besoin
-	if (str_starts_with($name, 'spip_')) {
-		$name = $GLOBALS['cookie_prefix'] . '_' . substr($name, 5);
-	}
-
-	#spip_logger('cookies')->info("cookie('$name', '$value', " . json_encode($options, true) . ")");
-	$a = @setcookie($name, $value, $options);
-
-	spip_cookie_envoye(true);
-
-	return $a;
+    if (!is_array($expires_or_options)) {
+        # anciens paramètres : spip_setcookie($name = '', $value = '', $expire = 0, $path = 'AUTO', $domain = '', $secure = '')
+        $options = [
+            'expires' => (int) $expires_or_options,
+            'path' => $path,
+            'domain' => $domain,
+            'secure' => $secure,
+            'httponly' => $httponly,
+        ];
+    } else {
+        $options = $expires_or_options;
+    }
+
+    // expires
+    $options['expires'] ??= 0;
+    if (!isset($options['path']) || $options['path'] === 'AUTO') {
+        $options['path'] = defined('_COOKIE_PATH') ? constant('_COOKIE_PATH') : preg_replace(',^\w+://[^/]*,', '', url_de_base());
+    }
+    if (empty($options['domain']) && defined('_COOKIE_DOMAIN') && constant('_COOKIE_DOMAIN')) {
+        $options['domain'] = constant('_COOKIE_DOMAIN');
+    }
+    $options['secure'] ??= false;
+    $options['secure'] = ($options['secure'] ?: ($_SERVER['HTTPS'] ?? false));
+    if (defined('_COOKIE_SECURE') && constant('_COOKIE_SECURE')) {
+        trigger_deprecation('spip', '5.0', 'Using "%s" constant is deprecated, use option "%s" when call "%s" instead (automatic in HTTPS).', '_COOKIE_SECURE', 'secure: true', __FUNCTION__);
+        $options['secure'] = true;
+    }
+    $options['httponly'] ??= false;
+    $options['samesite'] = ($options['samesite'] ?? 'Lax') ?: 'Lax';
+
+    /** @deprecated 5.0 Use option `'httponly' => true` */
+    if (defined('_COOKIE_SECURE_LIST')) {
+        trigger_deprecation('spip', '5.0', 'Using "%s" constant is deprecated, use option "%s" when call "%s" instead.', '_COOKIE_SECURE_LIST', 'httponly: true', __FUNCTION__);
+        if (
+            is_array(constant('_COOKIE_SECURE_LIST'))
+            && in_array($name, constant('_COOKIE_SECURE_LIST'))
+        ) {
+            $options['httponly'] = true;
+        }
+    }
+
+    // in fine renommer le prefixe si besoin
+    if (str_starts_with($name, 'spip_')) {
+        $name = $GLOBALS['cookie_prefix'] . '_' . substr($name, 5);
+    }
+
+    #spip_logger('cookies')->info("cookie('$name', '$value', " . json_encode($options, true) . ")");
+    $a = @setcookie($name, $value, $options);
+
+    spip_cookie_envoye(true);
+
+    return $a;
 }
 
 /**
@@ -125,12 +125,12 @@ 
  * @return bool
  **/
 function spip_cookie_envoye($set = '') {
-	static $envoye = false;
-	if ($set) {
-		$envoye = true;
-	}
+    static $envoye = false;
+    if ($set) {
+        $envoye = true;
+    }
 
-	return $envoye;
+    return $envoye;
 }
 
 /**
@@ -149,21 +149,21 @@ 
  *     Préfixe des cookies de SPIP
  **/
 function recuperer_cookies_spip($cookie_prefix) {
-	$prefix_long = strlen($cookie_prefix);
-
-	foreach (array_keys($_COOKIE) as $name) {
-		if (str_starts_with($name, 'spip_') && substr($name, 0, $prefix_long) != $cookie_prefix) {
-			unset($_COOKIE[$name]);
-			unset($GLOBALS[$name]);
-		}
-	}
-	foreach ($_COOKIE as $name => $value) {
-		if (substr($name, 0, $prefix_long) == $cookie_prefix) {
-			$spipname = preg_replace('/^' . $cookie_prefix . '_/', 'spip_', $name);
-			$_COOKIE[$spipname] = $value;
-			$GLOBALS[$spipname] = $value;
-		}
-	}
+    $prefix_long = strlen($cookie_prefix);
+
+    foreach (array_keys($_COOKIE) as $name) {
+        if (str_starts_with($name, 'spip_') && substr($name, 0, $prefix_long) != $cookie_prefix) {
+            unset($_COOKIE[$name]);
+            unset($GLOBALS[$name]);
+        }
+    }
+    foreach ($_COOKIE as $name => $value) {
+        if (substr($name, 0, $prefix_long) == $cookie_prefix) {
+            $spipname = preg_replace('/^' . $cookie_prefix . '_/', 'spip_', $name);
+            $_COOKIE[$spipname] = $value;
+            $GLOBALS[$spipname] = $value;
+        }
+    }
 }
 
 
@@ -182,18 +182,18 @@ 
  *
  **/
 function exec_test_ajax_dist() {
-	switch (_request('js')) {
-		// on est appele par <noscript>
-		case -1:
-			spip_setcookie('spip_accepte_ajax', -1);
-			include_spip('inc/headers');
-			redirige_par_entete(chemin_image('erreur-xx.svg'));
-			break;
-
-		// ou par ajax
-		case 1:
-		default:
-			spip_setcookie('spip_accepte_ajax', 1);
-			break;
-	}
+    switch (_request('js')) {
+        // on est appele par <noscript>
+        case -1:
+            spip_setcookie('spip_accepte_ajax', -1);
+            include_spip('inc/headers');
+            redirige_par_entete(chemin_image('erreur-xx.svg'));
+            break;
+
+        // ou par ajax
+        case 1:
+        default:
+            spip_setcookie('spip_accepte_ajax', 1);
+            break;
+    }
 }

ecrire/base/repair.php

Indentation +63 added lines, -63 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -35,20 +35,20 @@ 
  **/
 function base_repair_dist($titre = '', $reprise = '') {
 
-	$res = admin_repair_tables();
-	if (!$res) {
-		$res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
-	} else {
-		include_spip('inc/rubriques');
-		calculer_rubriques();
-		propager_les_secteurs();
-	}
-	include_spip('inc/minipres');
-	$res .= pipeline('base_admin_repair', $res);
-	echo minipres(
-		_T('texte_tentative_recuperation'),
-		$res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site'))
-	);
+    $res = admin_repair_tables();
+    if (!$res) {
+        $res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
+    } else {
+        include_spip('inc/rubriques');
+        calculer_rubriques();
+        propager_les_secteurs();
+    }
+    include_spip('inc/minipres');
+    $res .= pipeline('base_admin_repair', $res);
+    echo minipres(
+        _T('texte_tentative_recuperation'),
+        $res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site'))
+    );
 }
 
 /**
@@ -62,60 +62,60 @@ 
  **/
 function admin_repair_tables() {
 
-	$repair = sql_serveur('repair', '', true);
+    $repair = sql_serveur('repair', '', true);
 
-	// recreer les tables manquantes eventuelles
-	include_spip('base/create');
-	creer_base();
-	$tables = sql_alltable();
+    // recreer les tables manquantes eventuelles
+    include_spip('base/create');
+    creer_base();
+    $tables = sql_alltable();
 
-	$res = '';
-	foreach ($tables as $tab) {
-		$class = '';
-		$m = "<strong>$tab</strong> ";
-		spip_logger()->notice("Repare $tab");
-		// supprimer la meta avant de lancer la reparation
-		// car le repair peut etre long ; on ne veut pas boucler
-		effacer_meta('admin_repair');
-		if ($repair) {
-			$result_repair = sql_repair($tab);
-			if (!$result_repair) {
-				return false;
-			}
-		}
+    $res = '';
+    foreach ($tables as $tab) {
+        $class = '';
+        $m = "<strong>$tab</strong> ";
+        spip_logger()->notice("Repare $tab");
+        // supprimer la meta avant de lancer la reparation
+        // car le repair peut etre long ; on ne veut pas boucler
+        effacer_meta('admin_repair');
+        if ($repair) {
+            $result_repair = sql_repair($tab);
+            if (!$result_repair) {
+                return false;
+            }
+        }
 
-		// essayer de maj la table (creation de champs manquants)
-		maj_tables($tab);
+        // essayer de maj la table (creation de champs manquants)
+        maj_tables($tab);
 
-		$count = sql_countsel($tab);
+        $count = sql_countsel($tab);
 
-		if ($count > 1) {
-			$m .= '(' . _T('texte_compte_elements', ['count' => $count]) . ")\n";
-		} else {
-			if ($count == 1) {
-				$m .= '(' . _T('texte_compte_element', ['count' => $count]) . ")\n";
-			} else {
-				$m .= '(' . _T('texte_vide') . ")\n";
-			}
-		}
+        if ($count > 1) {
+            $m .= '(' . _T('texte_compte_elements', ['count' => $count]) . ")\n";
+        } else {
+            if ($count == 1) {
+                $m .= '(' . _T('texte_compte_element', ['count' => $count]) . ")\n";
+            } else {
+                $m .= '(' . _T('texte_vide') . ")\n";
+            }
+        }
 
-		if (
-			$repair
-			&& $result_repair
-			&& ($msg = implode(
-				' ',
-				(is_resource($result_repair) || is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair
-			) . ' ')
-			&& !str_contains($msg, ' OK ')
-		) {
-			$class = " class='notice'";
-			$m .= '<br /><tt>' . spip_htmlentities($msg) . "</tt>\n";
-		} else {
-			$m .= ' ' . _T('texte_table_ok');
-		}
+        if (
+            $repair
+            && $result_repair
+            && ($msg = implode(
+                ' ',
+                (is_resource($result_repair) || is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair
+            ) . ' ')
+            && !str_contains($msg, ' OK ')
+        ) {
+            $class = " class='notice'";
+            $m .= '<br /><tt>' . spip_htmlentities($msg) . "</tt>\n";
+        } else {
+            $m .= ' ' . _T('texte_table_ok');
+        }
 
-		$res .= "<div$class>$m</div>";
-	}
+        $res .= "<div$class>$m</div>";
+    }
 
-	return $res;
+    return $res;
 }

ecrire/base/objets.php

Indentation +1240 added lines, -1240 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,7 +33,7 @@ 
  * @return void
  **/
 function array_set_merge(&$table, $index, $valeur) {
-	$table[$index] = isset($table[$index]) ? array_merge($table[$index], $valeur) : $valeur;
+    $table[$index] = isset($table[$index]) ? array_merge($table[$index], $valeur) : $valeur;
 }
 
 /**
@@ -52,441 +52,441 @@ 
  *   - string (interne) si table '::md5' retourne un hash
  */
 function lister_tables_objets_sql(?string $table_sql = null, $desc = []) {
-	static $deja_la = false;
-	static $infos_tables = null;
-	static $md5 = null;
-	static $plugin_hash = null;
-
-	// plugins hash connu ? non si _CACHE_PLUGINS_OPT est pas encore chargé.
-	$_PLUGINS_HASH = defined('_PLUGINS_HASH') ? _PLUGINS_HASH : '!_CACHE_PLUGINS_OPT';
-
-	// prealablement recuperer les tables_principales
-	if (is_null($infos_tables) || $plugin_hash !== $_PLUGINS_HASH) {
-		// pas de reentrance (cas base/serial)
-		if ($deja_la) {
-			spip_logger()->critical('Re-entrance anormale sur lister_tables_objets_sql : '
-				. var_export(debug_backtrace(), true));
-
-			return ($table_sql === '::md5' ? $md5 : []);
-		}
-		$deja_la = true;
-		$plugin_hash = $_PLUGINS_HASH; // avant de lancer les pipelines
-
-		// recuperer les declarations explicites ancienne mode
-		// qui servent a completer declarer_tables_objets_sql
-		base_serial($GLOBALS['tables_principales']);
-		base_auxiliaires($GLOBALS['tables_auxiliaires']);
-		$infos_tables = [
-			'spip_articles' => [
-				'page' => 'article',
-				'texte_retour' => 'icone_retour_article',
-				'texte_modifier' => 'icone_modifier_article',
-				'texte_creer' => 'icone_ecrire_article',
-				'texte_objets' => 'public:articles',
-				'texte_objet' => 'public:article',
-				'texte_signale_edition' => 'texte_travail_article',
-				'info_aucun_objet' => 'info_aucun_article',
-				'info_1_objet' => 'info_1_article',
-				'info_nb_objets' => 'info_nb_articles',
-				'texte_logo_objet' => 'logo_article',
-				'texte_langue_objet' => 'titre_langue_article',
-				'texte_definir_comme_traduction_objet' => 'trad_lier',
-				'titre' => 'titre, lang',
-				'date' => 'date',
-				'principale' => 'oui',
-				'introduction_longueur' => '500',
-				'champs_editables' => [
-					'surtitre',
-					'titre',
-					'soustitre',
-					'descriptif',
-					'nom_site',
-					'url_site',
-					'chapo',
-					'texte',
-					'ps',
-					'virtuel'
-				],
-				'champs_versionnes' => [
-					'id_rubrique',
-					'surtitre',
-					'titre',
-					'soustitre',
-					'jointure_auteurs',
-					'descriptif',
-					'nom_site',
-					'url_site',
-					'chapo',
-					'texte',
-					'ps'
-				],
-				'field' => [
-					'id_article' => 'bigint(21) NOT NULL',
-					'surtitre' => "text DEFAULT '' NOT NULL",
-					'titre' => "text DEFAULT '' NOT NULL",
-					'soustitre' => "text DEFAULT '' NOT NULL",
-					'id_rubrique' => "bigint(21) DEFAULT '0' NOT NULL",
-					'descriptif' => "text DEFAULT '' NOT NULL",
-					'chapo' => "mediumtext DEFAULT '' NOT NULL",
-					'texte' => "longtext DEFAULT '' NOT NULL",
-					'ps' => "mediumtext DEFAULT '' NOT NULL",
-					'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'statut' => "varchar(10) DEFAULT '0' NOT NULL",
-					'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'export' => "VARCHAR(10) DEFAULT 'oui'",
-					'date_redac' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'visites' => "integer DEFAULT '0' NOT NULL",
-					'referers' => "integer DEFAULT '0' NOT NULL",
-					'popularite' => "DOUBLE DEFAULT '0' NOT NULL",
-					'accepter_forum' => "CHAR(3) DEFAULT '' NOT NULL",
-					'date_modif' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
-					'id_trad' => "bigint(21) DEFAULT '0' NOT NULL",
-					'nom_site' => "tinytext DEFAULT '' NOT NULL",
-					'url_site' => "text DEFAULT '' NOT NULL",
-					'virtuel' => "text DEFAULT '' NOT NULL",
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_article',
-					'KEY id_rubrique' => 'id_rubrique',
-					'KEY id_secteur' => 'id_secteur',
-					'KEY id_trad' => 'id_trad',
-					'KEY lang' => 'lang',
-					'KEY statut' => 'statut, date',
-				],
-				'join' => [
-					'id_article' => 'id_article',
-					'id_rubrique' => 'id_rubrique'
-				],
-				'parent' => [
-					['type' => 'rubrique', 'champ' => 'id_rubrique']
-				],
-				'rechercher_champs' => [
-					'surtitre' => 5,
-					'titre' => 8,
-					'soustitre' => 5,
-					'chapo' => 3,
-					'texte' => 1,
-					'ps' => 1,
-					'nom_site' => 1,
-					'url_site' => 1,
-					'descriptif' => 4
-				],
-				'rechercher_jointures' => [
-					'auteur' => ['nom' => 10],
-				],
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => 'publie',
-						'previsu' => 'publie,prop,prepa/auteur',
-						'post_date' => 'date',
-						'exception' => ['statut', 'tout']
-					]
-				],
-				'statut_titres' => [
-					'prepa' => 'info_article_redaction',
-					'prop' => 'info_article_propose',
-					'publie' => 'info_article_publie',
-					'refuse' => 'info_article_refuse',
-					'poubelle' => 'info_article_supprime'
-				],
-				'statut_textes_instituer' => [
-					'prepa' => 'texte_statut_en_cours_redaction',
-					'prop' => 'texte_statut_propose_evaluation',
-					'publie' => 'texte_statut_publie',
-					'refuse' => 'texte_statut_refuse',
-					'poubelle' => 'texte_statut_poubelle',
-				],
-				'texte_changer_statut' => 'texte_article_statut',
-				'aide_changer_statut' => 'artstatut',
-				'tables_jointures' => [
-					'profondeur' => 'rubriques',
-					#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			'spip_auteurs' => [
-				'page' => 'auteur',
-				'texte_retour' => 'icone_retour',
-				'texte_ajouter' => 'titre_ajouter_un_auteur',
-				'texte_modifier' => 'admin_modifier_auteur',
-				'texte_objets' => 'icone_auteurs',
-				'texte_objet' => 'public:auteur',
-				'info_aucun_objet' => 'info_aucun_auteur',
-				'info_1_objet' => 'info_1_auteur',
-				'info_nb_objets' => 'info_nb_auteurs',
-				'texte_logo_objet' => 'logo_auteur',
-				'texte_creer_associer' => 'creer_et_associer_un_auteur',
-				'titre' => "nom AS titre, '' AS lang",
-				'date' => 'date',
-				'principale' => 'oui',
-				'champs_editables' => ['nom', 'email', 'lang', 'bio', 'nom_site', 'url_site', 'imessage', 'pgp'],
-				'champs_versionnes' => ['nom', 'bio', 'lang', 'email', 'nom_site', 'url_site', 'login'],
-				'field' => [
-					'id_auteur' => 'bigint(21) NOT NULL',
-					'nom' => "text DEFAULT '' NOT NULL",
-					'bio' => "text DEFAULT '' NOT NULL",
-					'email' => "tinytext DEFAULT '' NOT NULL",
-					'nom_site' => "tinytext DEFAULT '' NOT NULL",
-					'url_site' => "text DEFAULT '' NOT NULL",
-					'login' => 'VARCHAR(255) BINARY',
-					'pass' => "tinytext DEFAULT '' NOT NULL",
-					'low_sec' => "tinytext DEFAULT '' NOT NULL",
-					'statut' => "varchar(255)  DEFAULT '0' NOT NULL",
-					'webmestre' => "varchar(3)  DEFAULT 'non' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'pgp' => "TEXT DEFAULT '' NOT NULL",
-					'htpass' => "tinytext DEFAULT '' NOT NULL",
-					'en_ligne' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'alea_actuel' => 'tinytext',
-					'alea_futur' => 'tinytext',
-					'prefs' => 'text',
-					'cookie_oubli' => 'tinytext',
-					'source' => "VARCHAR(10) DEFAULT 'spip' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'imessage' => "VARCHAR(3) DEFAULT '' NOT NULL",
-					'backup_cles' => "mediumtext DEFAULT '' NOT NULL",
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_auteur',
-					'KEY login' => 'login',
-					'KEY statut' => 'statut',
-					'KEY en_ligne' => 'en_ligne',
-				],
-				'join' => [
-					'id_auteur' => 'id_auteur',
-					'login' => 'login'
-				],
-				'rechercher_champs' => [
-					'nom' => 5,
-					'bio' => 1,
-					'email' => 1,
-					'nom_site' => 1,
-					'url_site' => 1,
-					'login' => 1
-				],
-				// 2 conditions pour les auteurs : statut!=poubelle,
-				// et avoir des articles publies
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => '!5poubelle',
-						'previsu' => '!5poubelle',
-						'exception' => 'statut'
-					],
-					[
-						'champ' => [
-							['spip_auteurs_liens', 'id_auteur'],
-							[
-								'spip_articles',
-								['id_objet', 'id_article', 'objet', 'article']
-							],
-							'statut'
-						],
-						'publie' => 'publie',
-						'previsu' => '!',
-						'post_date' => 'date',
-						'exception' => ['statut', 'lien', 'tout']
-					],
-				],
-				'statut_images' => [
-					'auteur-6forum-16.png',
-					'0minirezo' => 'auteur-0minirezo-16.png',
-					'1comite' => 'auteur-1comite-16.png',
-					'6forum' => 'auteur-6forum-16.png',
-					'5poubelle' => 'auteur-5poubelle-16.png',
-					'nouveau' => ''
-				],
-				'statut_titres' => [
-					'titre_image_visiteur',
-					'0minirezo' => 'titre_image_administrateur',
-					'1comite' => 'titre_image_redacteur_02',
-					'6forum' => 'titre_image_visiteur',
-					'5poubelle' => 'titre_image_auteur_supprime',
-				],
-				'tables_jointures' => [#'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			'spip_rubriques' => [
-				'page' => 'rubrique',
-				'url_voir' => 'rubrique',
-				'url_edit' => 'rubrique_edit',
-				'texte_retour' => 'icone_retour',
-				'texte_objets' => 'public:rubriques',
-				'texte_objet' => 'public:rubrique',
-				'texte_modifier' => 'icone_modifier_rubrique',
-				'texte_creer' => 'icone_creer_rubrique',
-				'texte_ajouter' => 'titre_ajouter_une_rubrique',
-				'texte_creer_associer' => 'creer_et_associer_une_rubrique',
-				'info_aucun_objet' => 'info_aucun_rubrique',
-				'info_1_objet' => 'info_1_rubrique',
-				'info_nb_objets' => 'info_nb_rubriques',
-				'texte_logo_objet' => 'logo_rubrique',
-				'texte_langue_objet' => 'titre_langue_rubrique',
-				'texte_definir_comme_traduction_objet' => 'texte_definir_comme_traduction_rubrique',
-				'titre' => 'titre, lang',
-				'date' => 'date',
-				'principale' => 'oui',
-				'introduction_longueur' => '600',
-				'champs_editables' => ['titre', 'texte', 'descriptif', 'extra'],
-				'champs_versionnes' => ['titre', 'descriptif', 'texte'],
-				'field' => [
-					'id_rubrique' => 'bigint(21) NOT NULL',
-					'id_parent' => "bigint(21) DEFAULT '0' NOT NULL",
-					'titre' => "text DEFAULT '' NOT NULL",
-					'descriptif' => "text DEFAULT '' NOT NULL",
-					'texte' => "longtext DEFAULT '' NOT NULL",
-					'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'statut' => "varchar(10) DEFAULT '0' NOT NULL",
-					'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
-					'statut_tmp' => "varchar(10) DEFAULT '0' NOT NULL",
-					'date_tmp' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'profondeur' => "smallint(5) DEFAULT '0' NOT NULL"
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_rubrique',
-					'KEY lang' => 'lang',
-					'KEY id_parent' => 'id_parent',
-				],
-				'parent' => [
-					['type' => 'rubrique', 'champ' => 'id_parent']
-				],
-				'rechercher_champs' => [
-					'titre' => 8,
-					'descriptif' => 5,
-					'texte' => 1
-				],
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => 'publie',
-						'previsu' => '!',
-						'exception' => ['statut', 'tout']
-					],
-				],
-				'tables_jointures' => [#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			// toutes les tables ont le droit a une jointure sur les auteurs
-			['tables_jointures' => ['id_auteur' => 'auteurs_liens']]
-		];
-
-		// avant d'appeller les pipeline qui peuvent generer une reentrance a l'install
-		// initialiser la signature
-		$md5 = md5(serialize($infos_tables));
-
-		$GLOBALS['tables_principales'] = pipeline('declarer_tables_principales', $GLOBALS['tables_principales']);
-		$GLOBALS['tables_auxiliaires'] = pipeline('declarer_tables_auxiliaires', $GLOBALS['tables_auxiliaires']);
-		$infos_tables = pipeline('declarer_tables_objets_sql', $infos_tables);
-
-		// completer les informations manquantes ou implicites
-		$all = [];
-		foreach (array_keys($infos_tables) as $t) {
-			// les cles numeriques servent a declarer
-			// les proprietes applicables a tous les objets
-			// on les mets de cote
-			if (is_numeric($t)) {
-				$all = array_merge_recursive($all, $infos_tables[$t]);
-				unset($infos_tables[$t]);
-			} else {
-				$infos_tables[$t] = renseigner_table_objet_sql($t, $infos_tables[$t]);
-			}
-		}
-
-		// repercuter les proprietes generales communes a tous les objets
-		foreach (array_keys($infos_tables) as $t) {
-			foreach (array_keys($all) as $i) {
-				if (in_array($i, ['tables_jointures', 'champs_versionnes'])) {
-					$add = $all[$i];
-					// eviter les doublons de declaration de table jointure (ex des mots sur auteurs)
-					// pour les declarations generiques avec cles numeriques
-					if ($i == 'tables_jointures' && isset($infos_tables[$t][$i]) && (is_countable($infos_tables[$t][$i]) ? count($infos_tables[$t][$i]) : 0)) {
-						$doublons = array_intersect($infos_tables[$t][$i], $add);
-						foreach ($doublons as $d) {
-							if (
-								is_numeric(array_search($d, $infos_tables[$t][$i]))
-								&& is_numeric($k = array_search($d, $add))
-							) {
-								unset($add[$k]);
-							}
-						}
-					}
-					$infos_tables[$t][$i] = array_merge($infos_tables[$t][$i] ?? [], $add);
-				} else {
-					$infos_tables[$t][$i] = array_merge_recursive(
-						$infos_tables[$t][$i] ?? [],
-						$all[$i]
-					);
-				}
-			}
-		}
-
-		// completer les tables principales et auxiliaires
-		// avec celles declarees uniquement dans declarer_table_objets_sql
-		// pour assurer la compat en transition
-		foreach ($infos_tables as $table => $infos) {
-			$principale_ou_auxiliaire = ($infos['principale'] ? 'tables_principales' : 'tables_auxiliaires');
-			// memoriser des champs eventuels declares par des plugins dans le pipeline tables_xxx
-			// qui a ete appelle avant
-			$mem = ($GLOBALS[$principale_ou_auxiliaire][$table] ?? []);
-			// l'ajouter au tableau
-			$GLOBALS[$principale_ou_auxiliaire][$table] = [];
-			if (isset($infos['field']) && isset($infos['key'])) {
-				foreach (['field', 'key', 'join'] as $k) {
-					if (isset($infos_tables[$table][$k])) {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = &$infos_tables[$table][$k];
-					}
-				}
-			} else {
-				// ici on ne renvoie que les declarations, donc RIEN
-				// pour avoir la vrai description en base, il faut passer par trouver_table
-				$GLOBALS[$principale_ou_auxiliaire][$table] = [];
-			}
-			if (is_countable($mem) ? count($mem) : 0) {
-				foreach (array_keys($mem) as $k) {
-					if (isset($GLOBALS[$principale_ou_auxiliaire][$table][$k])) {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = array_merge(
-							$GLOBALS[$principale_ou_auxiliaire][$table][$k],
-							$mem[$k]
-						);
-					} else {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = $mem[$k];
-					}
-				}
-			}
-		}
-
-		// recuperer les interfaces (table_titre, table_date)
-		// on ne le fait que dans un second temps pour que table_objet soit fonctionnel
-		// dans le pipeline de declarer_tables_interfaces
-		include_spip('public/interfaces');
-		foreach (array_keys($infos_tables) as $t) {
-			$infos_tables[$t] = renseigner_table_objet_interfaces($t, $infos_tables[$t]);
-		}
-
-		$deja_la = false;
-		// signature
-		$md5 = md5(serialize($infos_tables));
-	}
-	if ($table_sql === '::md5') {
-		return $md5;
-	}
-	if ($table_sql && !isset($infos_tables[$table_sql])) {
-		#$desc = renseigner_table_objet_sql($table_sql,$desc);
-		$desc = renseigner_table_objet_interfaces($table_sql, $desc);
-
-		return $desc;
-	}
-	if ($table_sql) {
-		return $infos_tables[$table_sql] ?? [];
-	}
-
-	return $infos_tables;
+    static $deja_la = false;
+    static $infos_tables = null;
+    static $md5 = null;
+    static $plugin_hash = null;
+
+    // plugins hash connu ? non si _CACHE_PLUGINS_OPT est pas encore chargé.
+    $_PLUGINS_HASH = defined('_PLUGINS_HASH') ? _PLUGINS_HASH : '!_CACHE_PLUGINS_OPT';
+
+    // prealablement recuperer les tables_principales
+    if (is_null($infos_tables) || $plugin_hash !== $_PLUGINS_HASH) {
+        // pas de reentrance (cas base/serial)
+        if ($deja_la) {
+            spip_logger()->critical('Re-entrance anormale sur lister_tables_objets_sql : '
+                . var_export(debug_backtrace(), true));
+
+            return ($table_sql === '::md5' ? $md5 : []);
+        }
+        $deja_la = true;
+        $plugin_hash = $_PLUGINS_HASH; // avant de lancer les pipelines
+
+        // recuperer les declarations explicites ancienne mode
+        // qui servent a completer declarer_tables_objets_sql
+        base_serial($GLOBALS['tables_principales']);
+        base_auxiliaires($GLOBALS['tables_auxiliaires']);
+        $infos_tables = [
+            'spip_articles' => [
+                'page' => 'article',
+                'texte_retour' => 'icone_retour_article',
+                'texte_modifier' => 'icone_modifier_article',
+                'texte_creer' => 'icone_ecrire_article',
+                'texte_objets' => 'public:articles',
+                'texte_objet' => 'public:article',
+                'texte_signale_edition' => 'texte_travail_article',
+                'info_aucun_objet' => 'info_aucun_article',
+                'info_1_objet' => 'info_1_article',
+                'info_nb_objets' => 'info_nb_articles',
+                'texte_logo_objet' => 'logo_article',
+                'texte_langue_objet' => 'titre_langue_article',
+                'texte_definir_comme_traduction_objet' => 'trad_lier',
+                'titre' => 'titre, lang',
+                'date' => 'date',
+                'principale' => 'oui',
+                'introduction_longueur' => '500',
+                'champs_editables' => [
+                    'surtitre',
+                    'titre',
+                    'soustitre',
+                    'descriptif',
+                    'nom_site',
+                    'url_site',
+                    'chapo',
+                    'texte',
+                    'ps',
+                    'virtuel'
+                ],
+                'champs_versionnes' => [
+                    'id_rubrique',
+                    'surtitre',
+                    'titre',
+                    'soustitre',
+                    'jointure_auteurs',
+                    'descriptif',
+                    'nom_site',
+                    'url_site',
+                    'chapo',
+                    'texte',
+                    'ps'
+                ],
+                'field' => [
+                    'id_article' => 'bigint(21) NOT NULL',
+                    'surtitre' => "text DEFAULT '' NOT NULL",
+                    'titre' => "text DEFAULT '' NOT NULL",
+                    'soustitre' => "text DEFAULT '' NOT NULL",
+                    'id_rubrique' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'descriptif' => "text DEFAULT '' NOT NULL",
+                    'chapo' => "mediumtext DEFAULT '' NOT NULL",
+                    'texte' => "longtext DEFAULT '' NOT NULL",
+                    'ps' => "mediumtext DEFAULT '' NOT NULL",
+                    'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'statut' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'export' => "VARCHAR(10) DEFAULT 'oui'",
+                    'date_redac' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'visites' => "integer DEFAULT '0' NOT NULL",
+                    'referers' => "integer DEFAULT '0' NOT NULL",
+                    'popularite' => "DOUBLE DEFAULT '0' NOT NULL",
+                    'accepter_forum' => "CHAR(3) DEFAULT '' NOT NULL",
+                    'date_modif' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
+                    'id_trad' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'nom_site' => "tinytext DEFAULT '' NOT NULL",
+                    'url_site' => "text DEFAULT '' NOT NULL",
+                    'virtuel' => "text DEFAULT '' NOT NULL",
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_article',
+                    'KEY id_rubrique' => 'id_rubrique',
+                    'KEY id_secteur' => 'id_secteur',
+                    'KEY id_trad' => 'id_trad',
+                    'KEY lang' => 'lang',
+                    'KEY statut' => 'statut, date',
+                ],
+                'join' => [
+                    'id_article' => 'id_article',
+                    'id_rubrique' => 'id_rubrique'
+                ],
+                'parent' => [
+                    ['type' => 'rubrique', 'champ' => 'id_rubrique']
+                ],
+                'rechercher_champs' => [
+                    'surtitre' => 5,
+                    'titre' => 8,
+                    'soustitre' => 5,
+                    'chapo' => 3,
+                    'texte' => 1,
+                    'ps' => 1,
+                    'nom_site' => 1,
+                    'url_site' => 1,
+                    'descriptif' => 4
+                ],
+                'rechercher_jointures' => [
+                    'auteur' => ['nom' => 10],
+                ],
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => 'publie',
+                        'previsu' => 'publie,prop,prepa/auteur',
+                        'post_date' => 'date',
+                        'exception' => ['statut', 'tout']
+                    ]
+                ],
+                'statut_titres' => [
+                    'prepa' => 'info_article_redaction',
+                    'prop' => 'info_article_propose',
+                    'publie' => 'info_article_publie',
+                    'refuse' => 'info_article_refuse',
+                    'poubelle' => 'info_article_supprime'
+                ],
+                'statut_textes_instituer' => [
+                    'prepa' => 'texte_statut_en_cours_redaction',
+                    'prop' => 'texte_statut_propose_evaluation',
+                    'publie' => 'texte_statut_publie',
+                    'refuse' => 'texte_statut_refuse',
+                    'poubelle' => 'texte_statut_poubelle',
+                ],
+                'texte_changer_statut' => 'texte_article_statut',
+                'aide_changer_statut' => 'artstatut',
+                'tables_jointures' => [
+                    'profondeur' => 'rubriques',
+                    #'id_auteur' => 'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            'spip_auteurs' => [
+                'page' => 'auteur',
+                'texte_retour' => 'icone_retour',
+                'texte_ajouter' => 'titre_ajouter_un_auteur',
+                'texte_modifier' => 'admin_modifier_auteur',
+                'texte_objets' => 'icone_auteurs',
+                'texte_objet' => 'public:auteur',
+                'info_aucun_objet' => 'info_aucun_auteur',
+                'info_1_objet' => 'info_1_auteur',
+                'info_nb_objets' => 'info_nb_auteurs',
+                'texte_logo_objet' => 'logo_auteur',
+                'texte_creer_associer' => 'creer_et_associer_un_auteur',
+                'titre' => "nom AS titre, '' AS lang",
+                'date' => 'date',
+                'principale' => 'oui',
+                'champs_editables' => ['nom', 'email', 'lang', 'bio', 'nom_site', 'url_site', 'imessage', 'pgp'],
+                'champs_versionnes' => ['nom', 'bio', 'lang', 'email', 'nom_site', 'url_site', 'login'],
+                'field' => [
+                    'id_auteur' => 'bigint(21) NOT NULL',
+                    'nom' => "text DEFAULT '' NOT NULL",
+                    'bio' => "text DEFAULT '' NOT NULL",
+                    'email' => "tinytext DEFAULT '' NOT NULL",
+                    'nom_site' => "tinytext DEFAULT '' NOT NULL",
+                    'url_site' => "text DEFAULT '' NOT NULL",
+                    'login' => 'VARCHAR(255) BINARY',
+                    'pass' => "tinytext DEFAULT '' NOT NULL",
+                    'low_sec' => "tinytext DEFAULT '' NOT NULL",
+                    'statut' => "varchar(255)  DEFAULT '0' NOT NULL",
+                    'webmestre' => "varchar(3)  DEFAULT 'non' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'pgp' => "TEXT DEFAULT '' NOT NULL",
+                    'htpass' => "tinytext DEFAULT '' NOT NULL",
+                    'en_ligne' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'alea_actuel' => 'tinytext',
+                    'alea_futur' => 'tinytext',
+                    'prefs' => 'text',
+                    'cookie_oubli' => 'tinytext',
+                    'source' => "VARCHAR(10) DEFAULT 'spip' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'imessage' => "VARCHAR(3) DEFAULT '' NOT NULL",
+                    'backup_cles' => "mediumtext DEFAULT '' NOT NULL",
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_auteur',
+                    'KEY login' => 'login',
+                    'KEY statut' => 'statut',
+                    'KEY en_ligne' => 'en_ligne',
+                ],
+                'join' => [
+                    'id_auteur' => 'id_auteur',
+                    'login' => 'login'
+                ],
+                'rechercher_champs' => [
+                    'nom' => 5,
+                    'bio' => 1,
+                    'email' => 1,
+                    'nom_site' => 1,
+                    'url_site' => 1,
+                    'login' => 1
+                ],
+                // 2 conditions pour les auteurs : statut!=poubelle,
+                // et avoir des articles publies
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => '!5poubelle',
+                        'previsu' => '!5poubelle',
+                        'exception' => 'statut'
+                    ],
+                    [
+                        'champ' => [
+                            ['spip_auteurs_liens', 'id_auteur'],
+                            [
+                                'spip_articles',
+                                ['id_objet', 'id_article', 'objet', 'article']
+                            ],
+                            'statut'
+                        ],
+                        'publie' => 'publie',
+                        'previsu' => '!',
+                        'post_date' => 'date',
+                        'exception' => ['statut', 'lien', 'tout']
+                    ],
+                ],
+                'statut_images' => [
+                    'auteur-6forum-16.png',
+                    '0minirezo' => 'auteur-0minirezo-16.png',
+                    '1comite' => 'auteur-1comite-16.png',
+                    '6forum' => 'auteur-6forum-16.png',
+                    '5poubelle' => 'auteur-5poubelle-16.png',
+                    'nouveau' => ''
+                ],
+                'statut_titres' => [
+                    'titre_image_visiteur',
+                    '0minirezo' => 'titre_image_administrateur',
+                    '1comite' => 'titre_image_redacteur_02',
+                    '6forum' => 'titre_image_visiteur',
+                    '5poubelle' => 'titre_image_auteur_supprime',
+                ],
+                'tables_jointures' => [#'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            'spip_rubriques' => [
+                'page' => 'rubrique',
+                'url_voir' => 'rubrique',
+                'url_edit' => 'rubrique_edit',
+                'texte_retour' => 'icone_retour',
+                'texte_objets' => 'public:rubriques',
+                'texte_objet' => 'public:rubrique',
+                'texte_modifier' => 'icone_modifier_rubrique',
+                'texte_creer' => 'icone_creer_rubrique',
+                'texte_ajouter' => 'titre_ajouter_une_rubrique',
+                'texte_creer_associer' => 'creer_et_associer_une_rubrique',
+                'info_aucun_objet' => 'info_aucun_rubrique',
+                'info_1_objet' => 'info_1_rubrique',
+                'info_nb_objets' => 'info_nb_rubriques',
+                'texte_logo_objet' => 'logo_rubrique',
+                'texte_langue_objet' => 'titre_langue_rubrique',
+                'texte_definir_comme_traduction_objet' => 'texte_definir_comme_traduction_rubrique',
+                'titre' => 'titre, lang',
+                'date' => 'date',
+                'principale' => 'oui',
+                'introduction_longueur' => '600',
+                'champs_editables' => ['titre', 'texte', 'descriptif', 'extra'],
+                'champs_versionnes' => ['titre', 'descriptif', 'texte'],
+                'field' => [
+                    'id_rubrique' => 'bigint(21) NOT NULL',
+                    'id_parent' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'titre' => "text DEFAULT '' NOT NULL",
+                    'descriptif' => "text DEFAULT '' NOT NULL",
+                    'texte' => "longtext DEFAULT '' NOT NULL",
+                    'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'statut' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
+                    'statut_tmp' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'date_tmp' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'profondeur' => "smallint(5) DEFAULT '0' NOT NULL"
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_rubrique',
+                    'KEY lang' => 'lang',
+                    'KEY id_parent' => 'id_parent',
+                ],
+                'parent' => [
+                    ['type' => 'rubrique', 'champ' => 'id_parent']
+                ],
+                'rechercher_champs' => [
+                    'titre' => 8,
+                    'descriptif' => 5,
+                    'texte' => 1
+                ],
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => 'publie',
+                        'previsu' => '!',
+                        'exception' => ['statut', 'tout']
+                    ],
+                ],
+                'tables_jointures' => [#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            // toutes les tables ont le droit a une jointure sur les auteurs
+            ['tables_jointures' => ['id_auteur' => 'auteurs_liens']]
+        ];
+
+        // avant d'appeller les pipeline qui peuvent generer une reentrance a l'install
+        // initialiser la signature
+        $md5 = md5(serialize($infos_tables));
+
+        $GLOBALS['tables_principales'] = pipeline('declarer_tables_principales', $GLOBALS['tables_principales']);
+        $GLOBALS['tables_auxiliaires'] = pipeline('declarer_tables_auxiliaires', $GLOBALS['tables_auxiliaires']);
+        $infos_tables = pipeline('declarer_tables_objets_sql', $infos_tables);
+
+        // completer les informations manquantes ou implicites
+        $all = [];
+        foreach (array_keys($infos_tables) as $t) {
+            // les cles numeriques servent a declarer
+            // les proprietes applicables a tous les objets
+            // on les mets de cote
+            if (is_numeric($t)) {
+                $all = array_merge_recursive($all, $infos_tables[$t]);
+                unset($infos_tables[$t]);
+            } else {
+                $infos_tables[$t] = renseigner_table_objet_sql($t, $infos_tables[$t]);
+            }
+        }
+
+        // repercuter les proprietes generales communes a tous les objets
+        foreach (array_keys($infos_tables) as $t) {
+            foreach (array_keys($all) as $i) {
+                if (in_array($i, ['tables_jointures', 'champs_versionnes'])) {
+                    $add = $all[$i];
+                    // eviter les doublons de declaration de table jointure (ex des mots sur auteurs)
+                    // pour les declarations generiques avec cles numeriques
+                    if ($i == 'tables_jointures' && isset($infos_tables[$t][$i]) && (is_countable($infos_tables[$t][$i]) ? count($infos_tables[$t][$i]) : 0)) {
+                        $doublons = array_intersect($infos_tables[$t][$i], $add);
+                        foreach ($doublons as $d) {
+                            if (
+                                is_numeric(array_search($d, $infos_tables[$t][$i]))
+                                && is_numeric($k = array_search($d, $add))
+                            ) {
+                                unset($add[$k]);
+                            }
+                        }
+                    }
+                    $infos_tables[$t][$i] = array_merge($infos_tables[$t][$i] ?? [], $add);
+                } else {
+                    $infos_tables[$t][$i] = array_merge_recursive(
+                        $infos_tables[$t][$i] ?? [],
+                        $all[$i]
+                    );
+                }
+            }
+        }
+
+        // completer les tables principales et auxiliaires
+        // avec celles declarees uniquement dans declarer_table_objets_sql
+        // pour assurer la compat en transition
+        foreach ($infos_tables as $table => $infos) {
+            $principale_ou_auxiliaire = ($infos['principale'] ? 'tables_principales' : 'tables_auxiliaires');
+            // memoriser des champs eventuels declares par des plugins dans le pipeline tables_xxx
+            // qui a ete appelle avant
+            $mem = ($GLOBALS[$principale_ou_auxiliaire][$table] ?? []);
+            // l'ajouter au tableau
+            $GLOBALS[$principale_ou_auxiliaire][$table] = [];
+            if (isset($infos['field']) && isset($infos['key'])) {
+                foreach (['field', 'key', 'join'] as $k) {
+                    if (isset($infos_tables[$table][$k])) {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = &$infos_tables[$table][$k];
+                    }
+                }
+            } else {
+                // ici on ne renvoie que les declarations, donc RIEN
+                // pour avoir la vrai description en base, il faut passer par trouver_table
+                $GLOBALS[$principale_ou_auxiliaire][$table] = [];
+            }
+            if (is_countable($mem) ? count($mem) : 0) {
+                foreach (array_keys($mem) as $k) {
+                    if (isset($GLOBALS[$principale_ou_auxiliaire][$table][$k])) {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = array_merge(
+                            $GLOBALS[$principale_ou_auxiliaire][$table][$k],
+                            $mem[$k]
+                        );
+                    } else {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = $mem[$k];
+                    }
+                }
+            }
+        }
+
+        // recuperer les interfaces (table_titre, table_date)
+        // on ne le fait que dans un second temps pour que table_objet soit fonctionnel
+        // dans le pipeline de declarer_tables_interfaces
+        include_spip('public/interfaces');
+        foreach (array_keys($infos_tables) as $t) {
+            $infos_tables[$t] = renseigner_table_objet_interfaces($t, $infos_tables[$t]);
+        }
+
+        $deja_la = false;
+        // signature
+        $md5 = md5(serialize($infos_tables));
+    }
+    if ($table_sql === '::md5') {
+        return $md5;
+    }
+    if ($table_sql && !isset($infos_tables[$table_sql])) {
+        #$desc = renseigner_table_objet_sql($table_sql,$desc);
+        $desc = renseigner_table_objet_interfaces($table_sql, $desc);
+
+        return $desc;
+    }
+    if ($table_sql) {
+        return $infos_tables[$table_sql] ?? [];
+    }
+
+    return $infos_tables;
 }
 
 
@@ -501,27 +501,27 @@ 
  **/
 function base_serial(&$tables_principales) {
 
-	$spip_jobs = [
-		'id_job' => 'bigint(21) NOT NULL',
-		'descriptif' => "text DEFAULT '' NOT NULL",
-		'fonction' => 'varchar(255) NOT NULL', //nom de la fonction
-		'args' => "longblob DEFAULT '' NOT NULL", // arguments
-		'md5args' => "char(32) NOT NULL default ''", // signature des arguments
-		'inclure' => 'varchar(255) NOT NULL', // fichier a inclure ou path/ pour charger_fonction
-		'priorite' => 'smallint(6) NOT NULL default 0',
-		'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL", // date au plus tot
-		'status' => 'tinyint NOT NULL default 1',
-	];
-
-	$spip_jobs_key = [
-		'PRIMARY KEY' => 'id_job',
-		'KEY date' => 'date',
-		'KEY status' => 'status',
-	];
-
-	/// Attention: mes_fonctions peut avoir deja defini cette variable
-	/// il faut donc rajouter, mais pas reinitialiser
-	$tables_principales['spip_jobs'] = ['field' => &$spip_jobs, 'key' => &$spip_jobs_key];
+    $spip_jobs = [
+        'id_job' => 'bigint(21) NOT NULL',
+        'descriptif' => "text DEFAULT '' NOT NULL",
+        'fonction' => 'varchar(255) NOT NULL', //nom de la fonction
+        'args' => "longblob DEFAULT '' NOT NULL", // arguments
+        'md5args' => "char(32) NOT NULL default ''", // signature des arguments
+        'inclure' => 'varchar(255) NOT NULL', // fichier a inclure ou path/ pour charger_fonction
+        'priorite' => 'smallint(6) NOT NULL default 0',
+        'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL", // date au plus tot
+        'status' => 'tinyint NOT NULL default 1',
+    ];
+
+    $spip_jobs_key = [
+        'PRIMARY KEY' => 'id_job',
+        'KEY date' => 'date',
+        'KEY status' => 'status',
+    ];
+
+    /// Attention: mes_fonctions peut avoir deja defini cette variable
+    /// il faut donc rajouter, mais pas reinitialiser
+    $tables_principales['spip_jobs'] = ['field' => &$spip_jobs, 'key' => &$spip_jobs_key];
 }
 
 
@@ -533,71 +533,71 @@ 
  * @return void
  **/
 function base_auxiliaires(&$tables_auxiliaires) {
-	$spip_resultats = [
-		'recherche' => "char(16) DEFAULT '' NOT NULL",
-		'id' => 'INT UNSIGNED NOT NULL',
-		'points' => "INT UNSIGNED DEFAULT '0' NOT NULL",
-		'table_objet' => "varchar(30) DEFAULT '' NOT NULL",
-		'serveur' => "char(16) DEFAULT '' NOT NULL", // hash md5 partiel du serveur de base ('' pour le serveur principal)
-		'maj' => 'TIMESTAMP'
-	];
-
-	$spip_resultats_key = [// pas de cle ni index, ca fait des insertions plus rapides et les requetes jointes utilisees en recheche ne sont pas plus lentes ...
-	];
-
-	$spip_auteurs_liens = [
-		'id_auteur' => "bigint(21) DEFAULT '0' NOT NULL",
-		'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
-		'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
-		'vu' => "VARCHAR(6) DEFAULT 'non' NOT NULL"
-	];
-
-	$spip_auteurs_liens_key = [
-		'PRIMARY KEY' => 'id_auteur,id_objet,objet',
-		'KEY id_auteur' => 'id_auteur',
-		'KEY id_objet' => 'id_objet',
-		'KEY objet' => 'objet',
-	];
-
-	$spip_meta = [
-		'nom' => 'VARCHAR (255) NOT NULL',
-		'valeur' => "text DEFAULT ''",
-		'impt' => "ENUM('non', 'oui') DEFAULT 'oui' NOT NULL",
-		'maj' => 'TIMESTAMP'
-	];
-
-	$spip_meta_key = [
-		'PRIMARY KEY' => 'nom'
-	];
-
-	$spip_jobs_liens = [
-		'id_job' => "bigint(21) DEFAULT '0' NOT NULL",
-		'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
-		'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
-	];
-
-	$spip_jobs_liens_key = [
-		'PRIMARY KEY' => 'id_job,id_objet,objet',
-		'KEY id_job' => 'id_job'
-	];
-
-	$tables_auxiliaires['spip_auteurs_liens'] = [
-		'field' => &$spip_auteurs_liens,
-		'key' => &$spip_auteurs_liens_key
-	];
-
-	$tables_auxiliaires['spip_meta'] = [
-		'field' => &$spip_meta,
-		'key' => &$spip_meta_key
-	];
-	$tables_auxiliaires['spip_resultats'] = [
-		'field' => &$spip_resultats,
-		'key' => &$spip_resultats_key
-	];
-	$tables_auxiliaires['spip_jobs_liens'] = [
-		'field' => &$spip_jobs_liens,
-		'key' => &$spip_jobs_liens_key
-	];
+    $spip_resultats = [
+        'recherche' => "char(16) DEFAULT '' NOT NULL",
+        'id' => 'INT UNSIGNED NOT NULL',
+        'points' => "INT UNSIGNED DEFAULT '0' NOT NULL",
+        'table_objet' => "varchar(30) DEFAULT '' NOT NULL",
+        'serveur' => "char(16) DEFAULT '' NOT NULL", // hash md5 partiel du serveur de base ('' pour le serveur principal)
+        'maj' => 'TIMESTAMP'
+    ];
+
+    $spip_resultats_key = [// pas de cle ni index, ca fait des insertions plus rapides et les requetes jointes utilisees en recheche ne sont pas plus lentes ...
+    ];
+
+    $spip_auteurs_liens = [
+        'id_auteur' => "bigint(21) DEFAULT '0' NOT NULL",
+        'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
+        'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
+        'vu' => "VARCHAR(6) DEFAULT 'non' NOT NULL"
+    ];
+
+    $spip_auteurs_liens_key = [
+        'PRIMARY KEY' => 'id_auteur,id_objet,objet',
+        'KEY id_auteur' => 'id_auteur',
+        'KEY id_objet' => 'id_objet',
+        'KEY objet' => 'objet',
+    ];
+
+    $spip_meta = [
+        'nom' => 'VARCHAR (255) NOT NULL',
+        'valeur' => "text DEFAULT ''",
+        'impt' => "ENUM('non', 'oui') DEFAULT 'oui' NOT NULL",
+        'maj' => 'TIMESTAMP'
+    ];
+
+    $spip_meta_key = [
+        'PRIMARY KEY' => 'nom'
+    ];
+
+    $spip_jobs_liens = [
+        'id_job' => "bigint(21) DEFAULT '0' NOT NULL",
+        'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
+        'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
+    ];
+
+    $spip_jobs_liens_key = [
+        'PRIMARY KEY' => 'id_job,id_objet,objet',
+        'KEY id_job' => 'id_job'
+    ];
+
+    $tables_auxiliaires['spip_auteurs_liens'] = [
+        'field' => &$spip_auteurs_liens,
+        'key' => &$spip_auteurs_liens_key
+    ];
+
+    $tables_auxiliaires['spip_meta'] = [
+        'field' => &$spip_meta,
+        'key' => &$spip_meta_key
+    ];
+    $tables_auxiliaires['spip_resultats'] = [
+        'field' => &$spip_resultats,
+        'key' => &$spip_resultats_key
+    ];
+    $tables_auxiliaires['spip_jobs_liens'] = [
+        'field' => &$spip_jobs_liens,
+        'key' => &$spip_jobs_liens_key
+    ];
 }
 
 
@@ -654,129 +654,129 @@ 
  * @return array
  */
 function renseigner_table_objet_sql($table_sql, &$infos) {
-	if (!isset($infos['type'])) {
-		// si on arrive de base/trouver_table, on a la cle primaire :
-		// s'en servir pour extrapoler le type
-		if (isset($infos['key']['PRIMARY KEY'])) {
-			$primary = $infos['key']['PRIMARY KEY'];
-			$primary = explode(',', (string) $primary);
-			$primary = reset($primary);
-			$infos['type'] = preg_replace(',^spip_|^id_|s$,', '', $primary);
-		} else {
-			$infos['type'] = preg_replace(',^spip_|s$,', '', $table_sql);
-		}
-	}
-	if (!isset($infos['type_surnoms'])) {
-		$infos['type_surnoms'] = [];
-	}
-
-	if (!isset($infos['table_objet'])) {
-		$infos['table_objet'] = preg_replace(',^spip_,', '', $table_sql);
-	}
-	if (!isset($infos['table_objet_surnoms'])) {
-		$infos['table_objet_surnoms'] = [];
-	}
-
-	if (!isset($infos['principale'])) {
-		$infos['principale'] = (isset($GLOBALS['tables_principales'][$table_sql]) ? 'oui' : false);
-	}
-
-	// normaliser pour pouvoir tester en php $infos['principale']?
-	// et dans une boucle {principale=oui}
-	$infos['principale'] = (($infos['principale'] && $infos['principale'] != 'non') ? 'oui' : false);
-
-	// declarer et normaliser pour pouvoir tester en php $infos['editable']?
-	// et dans une boucle {editable=oui}
-	if (!isset($infos['editable'])) {
-		$infos['editable'] = 'oui';
-	}
-
-	$infos['editable'] = (($infos['editable'] && $infos['editable'] != 'non') ? 'oui' : false);
-
-	// les urls publiques sont par defaut page=type pour les tables principales, et rien pour les autres
-	// seules les exceptions sont donc a declarer
-	if (!isset($infos['page'])) {
-		$infos['page'] = ($infos['principale'] ? $infos['type'] : '');
-	}
-
-	if (!isset($infos['url_voir'])) {
-		$infos['url_voir'] = $infos['type'];
-	}
-	if (!isset($infos['url_edit'])) {
-		$infos['url_edit'] = $infos['url_voir'] . ($infos['editable'] ? '_edit' : '');
-	}
-	if (!isset($infos['icone_objet'])) {
-		$infos['icone_objet'] = $infos['type'];
-	}
-
-	// chaines de langue
-	// par defaut : objet:icone_xxx_objet
-	if (!isset($infos['texte_retour'])) {
-		$infos['texte_retour'] = 'icone_retour';
-	}
-	if (!isset($infos['texte_modifier'])) {
-		$infos['texte_modifier'] = $infos['type'] . ':' . 'icone_modifier_' . $infos['type'];
-	}
-	if (!isset($infos['texte_creer'])) {
-		$infos['texte_creer'] = $infos['type'] . ':' . 'icone_creer_' . $infos['type'];
-	}
-	if (!isset($infos['texte_creer_associer'])) {
-		$infos['texte_creer_associer'] = $infos['type'] . ':' . 'texte_creer_associer_' . $infos['type'];
-	}
-	if (!isset($infos['texte_ajouter'])) {
-		// Ajouter un X
-		$infos['texte_ajouter'] = $infos['type'] . ':' . 'texte_ajouter_' . $infos['type'];
-	}
-	if (!isset($infos['texte_objets'])) {
-		$infos['texte_objets'] = $infos['type'] . ':' . 'titre_' . $infos['table_objet'];
-	}
-	if (!isset($infos['texte_objet'])) {
-		$infos['texte_objet'] = $infos['type'] . ':' . 'titre_' . $infos['type'];
-	}
-	if (!isset($infos['texte_logo_objet'])) {
-		// objet:titre_logo_objet "Logo de ce X"
-		$infos['texte_logo_objet'] = $infos['type'] . ':' . 'titre_logo_' . $infos['type'];
-	}
-	if (!isset($infos['texte_langue_objet'])) {
-		// objet:texte_langue_objet "Langue de ce X"
-		$infos['texte_langue_objet'] = $infos['type'] . ':' . 'titre_langue_' . $infos['type'];
-	}
-	if (!isset($infos['texte_definir_comme_traduction_objet'])) {
-		// "Ce X est une traduction du X numéro :"
-		$infos['texte_definir_comme_traduction_objet'] = $infos['type'] . ':' . 'texte_definir_comme_traduction_' . $infos['type'];
-	}
-
-	// objet:info_aucun_objet
-	if (!isset($infos['info_aucun_objet'])) {
-		$infos['info_aucun_objet'] = $infos['type'] . ':' . 'info_aucun_' . $infos['type'];
-	}
-	// objet:info_1_objet
-	if (!isset($infos['info_1_objet'])) {
-		$infos['info_1_objet'] = $infos['type'] . ':' . 'info_1_' . $infos['type'];
-	}
-	// objet:info_nb_objets
-	if (!isset($infos['info_nb_objets'])) {
-		$infos['info_nb_objets'] = $infos['type'] . ':' . 'info_nb_' . $infos['table_objet'];
-	}
-
-	if (!isset($infos['champs_editables'])) {
-		$infos['champs_editables'] = [];
-	}
-	if (!isset($infos['champs_versionnes'])) {
-		$infos['champs_versionnes'] = [];
-	}
-	if (!isset($infos['rechercher_champs'])) {
-		$infos['rechercher_champs'] = [];
-	}
-	if (!isset($infos['rechercher_jointures'])) {
-		$infos['rechercher_jointures'] = [];
-	}
-
-	if (!isset($infos['modeles'])) {
-		$infos['modeles'] = [$infos['type']];
-	}
-
-	return $infos;
+    if (!isset($infos['type'])) {
+        // si on arrive de base/trouver_table, on a la cle primaire :
+        // s'en servir pour extrapoler le type
+        if (isset($infos['key']['PRIMARY KEY'])) {
+            $primary = $infos['key']['PRIMARY KEY'];
+            $primary = explode(',', (string) $primary);
+            $primary = reset($primary);
+            $infos['type'] = preg_replace(',^spip_|^id_|s$,', '', $primary);
+        } else {
+            $infos['type'] = preg_replace(',^spip_|s$,', '', $table_sql);
+        }
+    }
+    if (!isset($infos['type_surnoms'])) {
+        $infos['type_surnoms'] = [];
+    }
+
+    if (!isset($infos['table_objet'])) {
+        $infos['table_objet'] = preg_replace(',^spip_,', '', $table_sql);
+    }
+    if (!isset($infos['table_objet_surnoms'])) {
+        $infos['table_objet_surnoms'] = [];
+    }
+
+    if (!isset($infos['principale'])) {
+        $infos['principale'] = (isset($GLOBALS['tables_principales'][$table_sql]) ? 'oui' : false);
+    }
+
+    // normaliser pour pouvoir tester en php $infos['principale']?
+    // et dans une boucle {principale=oui}
+    $infos['principale'] = (($infos['principale'] && $infos['principale'] != 'non') ? 'oui' : false);
+
+    // declarer et normaliser pour pouvoir tester en php $infos['editable']?
+    // et dans une boucle {editable=oui}
+    if (!isset($infos['editable'])) {
+        $infos['editable'] = 'oui';
+    }
+
+    $infos['editable'] = (($infos['editable'] && $infos['editable'] != 'non') ? 'oui' : false);
+
+    // les urls publiques sont par defaut page=type pour les tables principales, et rien pour les autres
+    // seules les exceptions sont donc a declarer
+    if (!isset($infos['page'])) {
+        $infos['page'] = ($infos['principale'] ? $infos['type'] : '');
+    }
+
+    if (!isset($infos['url_voir'])) {
+        $infos['url_voir'] = $infos['type'];
+    }
+    if (!isset($infos['url_edit'])) {
+        $infos['url_edit'] = $infos['url_voir'] . ($infos['editable'] ? '_edit' : '');
+    }
+    if (!isset($infos['icone_objet'])) {
+        $infos['icone_objet'] = $infos['type'];
+    }
+
+    // chaines de langue
+    // par defaut : objet:icone_xxx_objet
+    if (!isset($infos['texte_retour'])) {
+        $infos['texte_retour'] = 'icone_retour';
+    }
+    if (!isset($infos['texte_modifier'])) {
+        $infos['texte_modifier'] = $infos['type'] . ':' . 'icone_modifier_' . $infos['type'];
+    }
+    if (!isset($infos['texte_creer'])) {
+        $infos['texte_creer'] = $infos['type'] . ':' . 'icone_creer_' . $infos['type'];
+    }
+    if (!isset($infos['texte_creer_associer'])) {
+        $infos['texte_creer_associer'] = $infos['type'] . ':' . 'texte_creer_associer_' . $infos['type'];
+    }
+    if (!isset($infos['texte_ajouter'])) {
+        // Ajouter un X
+        $infos['texte_ajouter'] = $infos['type'] . ':' . 'texte_ajouter_' . $infos['type'];
+    }
+    if (!isset($infos['texte_objets'])) {
+        $infos['texte_objets'] = $infos['type'] . ':' . 'titre_' . $infos['table_objet'];
+    }
+    if (!isset($infos['texte_objet'])) {
+        $infos['texte_objet'] = $infos['type'] . ':' . 'titre_' . $infos['type'];
+    }
+    if (!isset($infos['texte_logo_objet'])) {
+        // objet:titre_logo_objet "Logo de ce X"
+        $infos['texte_logo_objet'] = $infos['type'] . ':' . 'titre_logo_' . $infos['type'];
+    }
+    if (!isset($infos['texte_langue_objet'])) {
+        // objet:texte_langue_objet "Langue de ce X"
+        $infos['texte_langue_objet'] = $infos['type'] . ':' . 'titre_langue_' . $infos['type'];
+    }
+    if (!isset($infos['texte_definir_comme_traduction_objet'])) {
+        // "Ce X est une traduction du X numéro :"
+        $infos['texte_definir_comme_traduction_objet'] = $infos['type'] . ':' . 'texte_definir_comme_traduction_' . $infos['type'];
+    }
+
+    // objet:info_aucun_objet
+    if (!isset($infos['info_aucun_objet'])) {
+        $infos['info_aucun_objet'] = $infos['type'] . ':' . 'info_aucun_' . $infos['type'];
+    }
+    // objet:info_1_objet
+    if (!isset($infos['info_1_objet'])) {
+        $infos['info_1_objet'] = $infos['type'] . ':' . 'info_1_' . $infos['type'];
+    }
+    // objet:info_nb_objets
+    if (!isset($infos['info_nb_objets'])) {
+        $infos['info_nb_objets'] = $infos['type'] . ':' . 'info_nb_' . $infos['table_objet'];
+    }
+
+    if (!isset($infos['champs_editables'])) {
+        $infos['champs_editables'] = [];
+    }
+    if (!isset($infos['champs_versionnes'])) {
+        $infos['champs_versionnes'] = [];
+    }
+    if (!isset($infos['rechercher_champs'])) {
+        $infos['rechercher_champs'] = [];
+    }
+    if (!isset($infos['rechercher_jointures'])) {
+        $infos['rechercher_jointures'] = [];
+    }
+
+    if (!isset($infos['modeles'])) {
+        $infos['modeles'] = [$infos['type']];
+    }
+
+    return $infos;
 }
 
 /**
@@ -793,30 +793,30 @@ 
  * @return array
  */
 function renseigner_table_objet_interfaces($table_sql, &$infos) {
-	if (!isset($infos['titre'])) {
-		if (isset($infos['table_objet']) && isset($GLOBALS['table_titre'][$infos['table_objet']])) {
-			$infos['titre'] = $GLOBALS['table_titre'][$infos['table_objet']];
-		} else {
-			$infos['titre'] = ((isset($infos['field']['titre'])) ? 'titre,' : "'' as titre,");
-			$infos['titre'] .= ((isset($infos['field']['lang'])) ? 'lang' : "'' as lang");
-		}
-	}
-	if (!isset($infos['date'])) {
-		if (isset($infos['table_objet']) && isset($GLOBALS['table_date'][$infos['table_objet']])) {
-			$infos['date'] = $GLOBALS['table_date'][$infos['table_objet']];
-		} else {
-			$infos['date'] = ((isset($infos['field']['date'])) ? 'date' : '');
-		}
-	}
-
-	$infos['statut'] ??= $GLOBALS['table_statut'][$table_sql] ?? '';
-	$infos['tables_jointures'] ??= [];
-
-	if (isset($GLOBALS['tables_jointures'][$table_sql])) {
-		$infos['tables_jointures'] = array_merge($infos['tables_jointures'], $GLOBALS['tables_jointures'][$table_sql]);
-	}
-
-	return $infos;
+    if (!isset($infos['titre'])) {
+        if (isset($infos['table_objet']) && isset($GLOBALS['table_titre'][$infos['table_objet']])) {
+            $infos['titre'] = $GLOBALS['table_titre'][$infos['table_objet']];
+        } else {
+            $infos['titre'] = ((isset($infos['field']['titre'])) ? 'titre,' : "'' as titre,");
+            $infos['titre'] .= ((isset($infos['field']['lang'])) ? 'lang' : "'' as lang");
+        }
+    }
+    if (!isset($infos['date'])) {
+        if (isset($infos['table_objet']) && isset($GLOBALS['table_date'][$infos['table_objet']])) {
+            $infos['date'] = $GLOBALS['table_date'][$infos['table_objet']];
+        } else {
+            $infos['date'] = ((isset($infos['field']['date'])) ? 'date' : '');
+        }
+    }
+
+    $infos['statut'] ??= $GLOBALS['table_statut'][$table_sql] ?? '';
+    $infos['tables_jointures'] ??= [];
+
+    if (isset($GLOBALS['tables_jointures'][$table_sql])) {
+        $infos['tables_jointures'] = array_merge($infos['tables_jointures'], $GLOBALS['tables_jointures'][$table_sql]);
+    }
+
+    return $infos;
 }
 
 /**
@@ -827,13 +827,13 @@ 
  *     Liste et descriptions des tables principales
  **/
 function lister_tables_principales() {
-	static $done = false;
-	if (!$done || !(is_countable($GLOBALS['tables_principales']) ? count($GLOBALS['tables_principales']) : 0)) {
-		lister_tables_objets_sql();
-		$done = true;
-	}
+    static $done = false;
+    if (!$done || !(is_countable($GLOBALS['tables_principales']) ? count($GLOBALS['tables_principales']) : 0)) {
+        lister_tables_objets_sql();
+        $done = true;
+    }
 
-	return $GLOBALS['tables_principales'];
+    return $GLOBALS['tables_principales'];
 }
 
 /**
@@ -844,13 +844,13 @@ 
  *     Liste et descriptions des tables auxiliaires
  **/
 function lister_tables_auxiliaires() {
-	static $done = false;
-	if (!$done || !(is_countable($GLOBALS['tables_auxiliaires']) ? count($GLOBALS['tables_auxiliaires']) : 0)) {
-		lister_tables_objets_sql();
-		$done = true;
-	}
+    static $done = false;
+    if (!$done || !(is_countable($GLOBALS['tables_auxiliaires']) ? count($GLOBALS['tables_auxiliaires']) : 0)) {
+        lister_tables_objets_sql();
+        $done = true;
+    }
 
-	return $GLOBALS['tables_auxiliaires'];
+    return $GLOBALS['tables_auxiliaires'];
 }
 
 /**
@@ -859,44 +859,44 @@ 
  * @return array
  */
 function lister_tables_objets_surnoms() {
-	static $surnoms = null;
-	static $md5 = null;
-	if (
-		!$surnoms || $md5 != lister_tables_objets_sql('::md5')
-	) {
-		// passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
-		// pour compatibilite, car il faut dorenavent utiliser
-		// declarer_table_objets_sql
-		$surnoms = pipeline(
-			'declarer_tables_objets_surnoms',
-			[
-				# pour les modeles
-				# a enlever ?
-				'doc' => 'documents',
-				'img' => 'documents',
-				'emb' => 'documents',
-			]
-		);
-		$infos_tables = lister_tables_objets_sql();
-		foreach ($infos_tables as $t => $infos) {
-			// cas de base type=>table
-			// et preg_replace(',^spip_|^id_|s$,',table)=>table
-			if ($infos['table_objet']) { // securite, si la fonction est appelee trop tot, c'est vide
-				// optimisations pour table_objet
-				//$surnoms[$infos['type']] = $infos['table_objet'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['table_objet'])] = $infos['table_objet'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['type'])] = $infos['table_objet'];
-				if (is_array($infos['table_objet_surnoms']) && count($infos['table_objet_surnoms'])) {
-					foreach ($infos['table_objet_surnoms'] as $surnom) {
-						$surnoms[$surnom] = $infos['table_objet'];
-					}
-				}
-			}
-		}
-		$md5 = lister_tables_objets_sql('::md5');
-	}
-
-	return $surnoms;
+    static $surnoms = null;
+    static $md5 = null;
+    if (
+        !$surnoms || $md5 != lister_tables_objets_sql('::md5')
+    ) {
+        // passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
+        // pour compatibilite, car il faut dorenavent utiliser
+        // declarer_table_objets_sql
+        $surnoms = pipeline(
+            'declarer_tables_objets_surnoms',
+            [
+                # pour les modeles
+                # a enlever ?
+                'doc' => 'documents',
+                'img' => 'documents',
+                'emb' => 'documents',
+            ]
+        );
+        $infos_tables = lister_tables_objets_sql();
+        foreach ($infos_tables as $t => $infos) {
+            // cas de base type=>table
+            // et preg_replace(',^spip_|^id_|s$,',table)=>table
+            if ($infos['table_objet']) { // securite, si la fonction est appelee trop tot, c'est vide
+                // optimisations pour table_objet
+                //$surnoms[$infos['type']] = $infos['table_objet'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['table_objet'])] = $infos['table_objet'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['type'])] = $infos['table_objet'];
+                if (is_array($infos['table_objet_surnoms']) && count($infos['table_objet_surnoms'])) {
+                    foreach ($infos['table_objet_surnoms'] as $surnom) {
+                        $surnoms[$surnom] = $infos['table_objet'];
+                    }
+                }
+            }
+        }
+        $md5 = lister_tables_objets_sql('::md5');
+    }
+
+    return $surnoms;
 }
 
 /**
@@ -905,34 +905,34 @@ 
  * @return array
  */
 function lister_types_surnoms() {
-	static $surnoms = null;
-	static $md5 = null;
-	if (
-		!$surnoms || $md5 != lister_tables_objets_sql('::md5')
-	) {
-		// passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
-		// pour compatibilite, car il faut dorenavent utiliser
-		// declarer_table_objets_sql
-		$surnoms = pipeline('declarer_type_surnoms', ['racine-site' => 'site']);
-		$infos_tables = lister_tables_objets_sql();
-		foreach ($infos_tables as $t => $infos) {
-			if ($infos['type']) { // securite, si la fonction est appelee trop tot, c'est vide
-				// optimisations pour objet_type
-				//$surnoms[$infos['type']] = $infos['type'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['table_objet'])] = $infos['type'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['type'])] = $infos['type'];
-				// surnoms declares
-				if (is_array($infos['type_surnoms']) && count($infos['type_surnoms'])) {
-					foreach ($infos['type_surnoms'] as $surnom) {
-						$surnoms[$surnom] = $infos['type'];
-					}
-				}
-			}
-		}
-		$md5 = lister_tables_objets_sql('::md5');
-	}
-
-	return $surnoms;
+    static $surnoms = null;
+    static $md5 = null;
+    if (
+        !$surnoms || $md5 != lister_tables_objets_sql('::md5')
+    ) {
+        // passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
+        // pour compatibilite, car il faut dorenavent utiliser
+        // declarer_table_objets_sql
+        $surnoms = pipeline('declarer_type_surnoms', ['racine-site' => 'site']);
+        $infos_tables = lister_tables_objets_sql();
+        foreach ($infos_tables as $t => $infos) {
+            if ($infos['type']) { // securite, si la fonction est appelee trop tot, c'est vide
+                // optimisations pour objet_type
+                //$surnoms[$infos['type']] = $infos['type'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['table_objet'])] = $infos['type'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', (string) $infos['type'])] = $infos['type'];
+                // surnoms declares
+                if (is_array($infos['type_surnoms']) && count($infos['type_surnoms'])) {
+                    foreach ($infos['type_surnoms'] as $surnom) {
+                        $surnoms[$surnom] = $infos['type'];
+                    }
+                }
+            }
+        }
+        $md5 = lister_tables_objets_sql('::md5');
+    }
+
+    return $surnoms;
 }
 
 /**
@@ -946,22 +946,22 @@ 
  *     Couples (nom de la table SQL => même nom, sans 'spip_' devant)
  **/
 function lister_tables_spip($serveur = '') {
-	static $tables = [];
-	if (!isset($tables[$serveur])) {
-		$tables[$serveur] = [];
-		if (!function_exists('sql_alltable')) {
-			include_spip('base/abstract_sql');
-		}
-		$ts = sql_alltable(null, $serveur); // toutes les tables "spip_" (ou prefixe perso)
-		$connexion = $GLOBALS['connexions'][$serveur ?: 0];
-		$spip = $connexion['prefixe'] . '_';
-		foreach ($ts as $t) {
-			$t = substr((string) $t, strlen($spip));
-			$tables[$serveur]["spip_$t"] = $t;
-		}
-	}
-
-	return $tables[$serveur];
+    static $tables = [];
+    if (!isset($tables[$serveur])) {
+        $tables[$serveur] = [];
+        if (!function_exists('sql_alltable')) {
+            include_spip('base/abstract_sql');
+        }
+        $ts = sql_alltable(null, $serveur); // toutes les tables "spip_" (ou prefixe perso)
+        $connexion = $GLOBALS['connexions'][$serveur ?: 0];
+        $spip = $connexion['prefixe'] . '_';
+        foreach ($ts as $t) {
+            $t = substr((string) $t, strlen($spip));
+            $tables[$serveur]["spip_$t"] = $t;
+        }
+    }
+
+    return $tables[$serveur];
 }
 
 
@@ -976,18 +976,18 @@ 
  *     Couples (nom de la table SQL => même nom)
  **/
 function lister_toutes_tables($serveur) {
-	static $tables = [];
-	if (!isset($tables[$serveur])) {
-		$tables[$serveur] = [];
-		if (!function_exists('sql_alltable')) {
-			include_spip('base/abstract_sql');
-		}
-		$ts = sql_alltable('%', $serveur); // toutes les tables
-		foreach ($ts as $t) {
-			$tables[$serveur][$t] = $t;
-		}
-	}
-	return $tables[$serveur];
+    static $tables = [];
+    if (!isset($tables[$serveur])) {
+        $tables[$serveur] = [];
+        if (!function_exists('sql_alltable')) {
+            include_spip('base/abstract_sql');
+        }
+        $ts = sql_alltable('%', $serveur); // toutes les tables
+        foreach ($ts as $t) {
+            $tables[$serveur][$t] = $t;
+        }
+    }
+    return $tables[$serveur];
 }
 
 /**
@@ -1009,37 +1009,37 @@ 
  **/
 function table_objet(string $type, string|false $serveur = ''): string {
 
-	if ($type) {
-		$type = preg_replace(',^spip_|^id_|s$,', '', $type);
-	}
-	if (!strlen($type)) {
-		return '';
-	}
-
-	$surnoms = lister_tables_objets_surnoms();
-	if (isset($surnoms[$type])) {
-		return $surnoms[$type];
-	}
-
-	if ($serveur !== false) {
-		$t = lister_tables_spip($serveur);
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$typetrim = rtrim($type, 's') . 's';
-		if (
-			(isset($t[$typetrim]) || in_array($typetrim, $t)) && ($desc = $trouver_table(rtrim($type, 's') . 's', $serveur))
-		) {
-			return $desc['id_table'];
-		} elseif (
-			(isset($t[$type]) || in_array($type, $t)) && ($desc = $trouver_table($type, $serveur))
-		) {
-			return $desc['id_table'];
-		}
-
-		spip_logger()->info('table_objet(' . $type . ') calculee sans verification');
-		#spip_logger('db')->debug(debug_backtrace());
-	}
-
-	return rtrim($type, 's') . 's'; # cas historique ne devant plus servir, sauf si $serveur=false
+    if ($type) {
+        $type = preg_replace(',^spip_|^id_|s$,', '', $type);
+    }
+    if (!strlen($type)) {
+        return '';
+    }
+
+    $surnoms = lister_tables_objets_surnoms();
+    if (isset($surnoms[$type])) {
+        return $surnoms[$type];
+    }
+
+    if ($serveur !== false) {
+        $t = lister_tables_spip($serveur);
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $typetrim = rtrim($type, 's') . 's';
+        if (
+            (isset($t[$typetrim]) || in_array($typetrim, $t)) && ($desc = $trouver_table(rtrim($type, 's') . 's', $serveur))
+        ) {
+            return $desc['id_table'];
+        } elseif (
+            (isset($t[$type]) || in_array($type, $t)) && ($desc = $trouver_table($type, $serveur))
+        ) {
+            return $desc['id_table'];
+        }
+
+        spip_logger()->info('table_objet(' . $type . ') calculee sans verification');
+        #spip_logger('db')->debug(debug_backtrace());
+    }
+
+    return rtrim($type, 's') . 's'; # cas historique ne devant plus servir, sauf si $serveur=false
 }
 
 /**
@@ -1060,33 +1060,33 @@ 
  *     Nom de la table SQL
  **/
 function table_objet_sql(string $type, string|false $serveur = ''): string {
-	$nom = table_objet($type, $serveur);
-	if (!strlen($nom)) {
-		return '';
-	}
-	if (!isset($GLOBALS['table_des_tables']['articles'])) {
-		// eviter de multiples inclusions
-		include_spip('public/interfaces');
-	}
-	if (isset($GLOBALS['table_des_tables'][$nom])) {
-		$nom = $GLOBALS['table_des_tables'][$nom];
-		$nom = "spip_$nom";
-	} else {
-		$infos_tables = lister_tables_objets_sql();
-		if (isset($infos_tables["spip_$nom"])) {
-			$nom = "spip_$nom";
-		} elseif ($serveur !== false) {
-			$t = lister_tables_spip($serveur);
-			if (isset($t[$nom]) || in_array($nom, $t)) {
-				$trouver_table = charger_fonction('trouver_table', 'base');
-				if ($desc = $trouver_table($nom, $serveur)) {
-					return $desc['table_sql'];
-				}
-			}
-		}
-	}
-
-	return $nom;
+    $nom = table_objet($type, $serveur);
+    if (!strlen($nom)) {
+        return '';
+    }
+    if (!isset($GLOBALS['table_des_tables']['articles'])) {
+        // eviter de multiples inclusions
+        include_spip('public/interfaces');
+    }
+    if (isset($GLOBALS['table_des_tables'][$nom])) {
+        $nom = $GLOBALS['table_des_tables'][$nom];
+        $nom = "spip_$nom";
+    } else {
+        $infos_tables = lister_tables_objets_sql();
+        if (isset($infos_tables["spip_$nom"])) {
+            $nom = "spip_$nom";
+        } elseif ($serveur !== false) {
+            $t = lister_tables_spip($serveur);
+            if (isset($t[$nom]) || in_array($nom, $t)) {
+                $trouver_table = charger_fonction('trouver_table', 'base');
+                if ($desc = $trouver_table($nom, $serveur)) {
+                    return $desc['table_sql'];
+                }
+            }
+        }
+    }
+
+    return $nom;
 }
 
 /**
@@ -1105,34 +1105,34 @@ 
  *     Nom de la clé primaire
  **/
 function id_table_objet(string $type, string $serveur = ''): ?string {
-	static $trouver_table = null;
-	$type = objet_type($type, $serveur);
-	if (!$type) {
-		return null;
-	}
-	$t = table_objet($type);
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-
-	$ts = lister_tables_spip($serveur);
-	if (
-		in_array($t, $ts) || in_array($t, lister_toutes_tables($serveur))
-	) {
-		$desc = $trouver_table($t, $serveur);
-		if (isset($desc['key']['PRIMARY KEY'])) {
-			return $desc['key']['PRIMARY KEY'];
-		}
-		if (!$desc || isset($desc['field']["id_$type"])) {
-			return "id_$type";
-		}
-		// sinon renvoyer le premier champ de la table...
-		$keys = array_keys($desc['field']);
-
-		return array_shift($keys);
-	}
-
-	return "id_$type";
+    static $trouver_table = null;
+    $type = objet_type($type, $serveur);
+    if (!$type) {
+        return null;
+    }
+    $t = table_objet($type);
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+
+    $ts = lister_tables_spip($serveur);
+    if (
+        in_array($t, $ts) || in_array($t, lister_toutes_tables($serveur))
+    ) {
+        $desc = $trouver_table($t, $serveur);
+        if (isset($desc['key']['PRIMARY KEY'])) {
+            return $desc['key']['PRIMARY KEY'];
+        }
+        if (!$desc || isset($desc['field']["id_$type"])) {
+            return "id_$type";
+        }
+        // sinon renvoyer le premier champ de la table...
+        $keys = array_keys($desc['field']);
+
+        return array_shift($keys);
+    }
+
+    return "id_$type";
 }
 
 /**
@@ -1152,60 +1152,60 @@ 
  *     Type de l'objet
  **/
 function objet_type(string $table_objet, string|false $serveur = ''): ?string {
-	if (!$table_objet) {
-		return null;
-	}
-	$surnoms = lister_types_surnoms();
-
-	// scenario de base
-	// le type est decline a partir du nom de la table en enlevant le prefixe eventuel
-	// et la marque du pluriel
-	// on accepte id_xx en entree aussi
-	$type = preg_replace(',^spip_|^id_|s$,', '', $table_objet);
-	if (isset($surnoms[$type])) {
-		return $surnoms[$type];
-	}
-
-	// securite : eliminer les caracteres non \w
-	$type = preg_replace(',[^\w-],', '', $type);
-
-	// si le type redonne bien la table c'est bon
-	// oui si table_objet ressemblait deja a un type
-	if (
-		$type == $table_objet
-		|| table_objet($type, $serveur) === $table_objet
-		|| table_objet_sql($type, $serveur) === $table_objet
-	) {
-		return $type;
-	}
-
-	// si on ne veut pas chercher en base
-	if ($serveur === false) {
-		return $type;
-	}
-
-	// sinon on passe par la cle primaire id_xx pour trouver le type
-	// car le s a la fin est incertain
-	// notamment en cas de pluriel derogatoire
-	// id_jeu/spip_jeux id_journal/spip_journaux qui necessitent tout deux
-	// une declaration jeu => jeux, journal => journaux
-	// dans le pipeline declarer_tables_objets_surnoms
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$ts = lister_tables_spip($serveur);
-	$desc = false;
-	if (in_array($table_objet, $ts)) {
-		$desc = $trouver_table($table_objet);
-	}
-	if (!$desc && in_array($table_objet = table_objet($type, $serveur), $ts)) {
-		$desc = $trouver_table($table_objet, $serveur);
-	}
-	// si le type est declare : bingo !
-	if ($desc && isset($desc['type'])) {
-		return $desc['type'];
-	}
-
-	// on a fait ce qu'on a pu
-	return $type;
+    if (!$table_objet) {
+        return null;
+    }
+    $surnoms = lister_types_surnoms();
+
+    // scenario de base
+    // le type est decline a partir du nom de la table en enlevant le prefixe eventuel
+    // et la marque du pluriel
+    // on accepte id_xx en entree aussi
+    $type = preg_replace(',^spip_|^id_|s$,', '', $table_objet);
+    if (isset($surnoms[$type])) {
+        return $surnoms[$type];
+    }
+
+    // securite : eliminer les caracteres non \w
+    $type = preg_replace(',[^\w-],', '', $type);
+
+    // si le type redonne bien la table c'est bon
+    // oui si table_objet ressemblait deja a un type
+    if (
+        $type == $table_objet
+        || table_objet($type, $serveur) === $table_objet
+        || table_objet_sql($type, $serveur) === $table_objet
+    ) {
+        return $type;
+    }
+
+    // si on ne veut pas chercher en base
+    if ($serveur === false) {
+        return $type;
+    }
+
+    // sinon on passe par la cle primaire id_xx pour trouver le type
+    // car le s a la fin est incertain
+    // notamment en cas de pluriel derogatoire
+    // id_jeu/spip_jeux id_journal/spip_journaux qui necessitent tout deux
+    // une declaration jeu => jeux, journal => journaux
+    // dans le pipeline declarer_tables_objets_surnoms
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $ts = lister_tables_spip($serveur);
+    $desc = false;
+    if (in_array($table_objet, $ts)) {
+        $desc = $trouver_table($table_objet);
+    }
+    if (!$desc && in_array($table_objet = table_objet($type, $serveur), $ts)) {
+        $desc = $trouver_table($table_objet, $serveur);
+    }
+    // si le type est declare : bingo !
+    if ($desc && isset($desc['type'])) {
+        return $desc['type'];
+    }
+
+    // on a fait ce qu'on a pu
+    return $type;
 }
 
 /**
@@ -1221,58 +1221,58 @@ 
  * @return bool
  */
 function objet_test_si_publie($objet, $id_objet, $serveur = '') {
-	// voir si une fonction est definie pour faire le boulot
-	// elle a la priorite dans ce cas
-	if ($f = charger_fonction($objet . '_test_si_publie', 'base', true)) {
-		return $f($objet, $id_objet, $serveur);
-	}
-
-	// sinon on se fie a la declaration de l'objet si presente
-	$id_table = $table_objet = table_objet($objet);
-	$id_table_objet = id_table_objet($objet, $serveur);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	if (
-		($desc = $trouver_table($table_objet, $serveur))
-		&& isset($desc['statut'])
-		&& $desc['statut']
-	) {
-		$boucle = new Boucle();
-		$boucle->show = $desc;
-		$boucle->nom = 'objet_test_si_publie';
-		$boucle->id_boucle = $id_table;
-		$boucle->id_table = $id_table;
-		$boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
-		$boucle->sql_serveur = $serveur;
-		$boucle->select[] = $id_table_objet;
-		$boucle->from[$table_objet] = table_objet_sql($objet, $serveur);
-		$boucle->where[] = $id_table . '.' . $id_table_objet . '=' . (int) $id_objet;
-
-		$boucle->descr['nom'] = 'objet_test_si_publie'; // eviter notice php
-		$boucle->descr['sourcefile'] = 'internal';
-		$boucle->descr['gram'] = 'html';
-
-		include_spip('public/compiler');
-		include_spip('public/composer');
-		instituer_boucle($boucle, false, true);
-		$res = calculer_select(
-			$boucle->select,
-			$boucle->from,
-			$boucle->from_type,
-			$boucle->where,
-			$boucle->join,
-			$boucle->group,
-			$boucle->order,
-			$boucle->limit,
-			$boucle->having,
-			$table_objet,
-			$id_table,
-			$serveur
-		);
-		return (bool) sql_fetch($res);
-	}
-
-	// si pas d'info statut ni de fonction : l'objet est publie
-	return true;
+    // voir si une fonction est definie pour faire le boulot
+    // elle a la priorite dans ce cas
+    if ($f = charger_fonction($objet . '_test_si_publie', 'base', true)) {
+        return $f($objet, $id_objet, $serveur);
+    }
+
+    // sinon on se fie a la declaration de l'objet si presente
+    $id_table = $table_objet = table_objet($objet);
+    $id_table_objet = id_table_objet($objet, $serveur);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    if (
+        ($desc = $trouver_table($table_objet, $serveur))
+        && isset($desc['statut'])
+        && $desc['statut']
+    ) {
+        $boucle = new Boucle();
+        $boucle->show = $desc;
+        $boucle->nom = 'objet_test_si_publie';
+        $boucle->id_boucle = $id_table;
+        $boucle->id_table = $id_table;
+        $boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
+        $boucle->sql_serveur = $serveur;
+        $boucle->select[] = $id_table_objet;
+        $boucle->from[$table_objet] = table_objet_sql($objet, $serveur);
+        $boucle->where[] = $id_table . '.' . $id_table_objet . '=' . (int) $id_objet;
+
+        $boucle->descr['nom'] = 'objet_test_si_publie'; // eviter notice php
+        $boucle->descr['sourcefile'] = 'internal';
+        $boucle->descr['gram'] = 'html';
+
+        include_spip('public/compiler');
+        include_spip('public/composer');
+        instituer_boucle($boucle, false, true);
+        $res = calculer_select(
+            $boucle->select,
+            $boucle->from,
+            $boucle->from_type,
+            $boucle->where,
+            $boucle->join,
+            $boucle->group,
+            $boucle->order,
+            $boucle->limit,
+            $boucle->having,
+            $table_objet,
+            $id_table,
+            $serveur
+        );
+        return (bool) sql_fetch($res);
+    }
+
+    // si pas d'info statut ni de fonction : l'objet est publie
+    return true;
 }
 
 
@@ -1307,124 +1307,124 @@ 
  *     Retourne un tableau décrivant les parents trouvés
  */
 function objet_lister_parents($objet, $id_objet, $parent_direct_seulement = false) {
-	$parents = [];
-
-	// Si on trouve une ou des méthodes de parent
-	if ($parent_methodes = objet_type_decrire_infos_parents($objet)) {
-		// On identifie les informations sur l'objet source dont on cherche le parent.
-		include_spip('base/abstract_sql');
-		$table_objet = table_objet_sql($objet);
-		$cle_objet = id_table_objet($objet);
-		$id_objet = (int) $id_objet;
-
-		// On teste chacun méthode dans l'ordre, et dès qu'on a trouvé un parent on s'arrête
-		foreach ($parent_methodes as $parent_methode) {
-			// Champ identifiant le parent (id et éventuellement le type)
-			// -- cette identification ne dépend pas du fait que le parent soit stocké dans une table de différente
-			//    de celle de l'objet source
-			$select = [];
-			if (isset($parent_methode['champ'])) {
-				$select[] = $parent_methode['champ'];
-			}
-			if (isset($parent_methode['champ_type'])) {
-				$select[] = $parent_methode['champ_type'];
-			}
-
-			// Détermination de la table du parent et des conditions sur l'objet source et le parent.
-			$condition_objet_invalide = false;
-			$where = [];
-			if (!isset($parent_methode['table'])) {
-				// Le parent est stocké dans la même table que l'objet source :
-				// -- toutes les conditions s'appliquent à la table source.
-				$table = $table_objet;
-				$where = ["$cle_objet = $id_objet"];
-				// -- Condition supplémentaire sur la détection du parent
-				if (isset($parent_methode['condition'])) {
-					$where[] = $parent_methode['condition'];
-				}
-			} elseif (!$parent_direct_seulement) {
-				// Le parent est stocké dans une table différente de l'objet source.
-				// -- on vérifie d'emblée si il y a une condition sur l'objet source et si celle-ci est vérifiée
-				//    Si non, on peut arrêter le traitement.
-				if (isset($parent_methode['condition'])) {
-					$where = [
-						"$cle_objet = $id_objet",
-						$parent_methode['condition']
-					];
-					if (!sql_countsel($table_objet, $where)) {
-						$condition_objet_invalide = true;
-					}
-				}
-
-				// Si pas de condition sur l'objet source ou que la condition est vérifiée, on peut construire
-				// la requête sur la table qui accueille le parent.
-				if (!$condition_objet_invalide) {
-					$table = $parent_methode['table'];
-					// On construit les conditions en fonction de l'identification de l'objet source
-					$where = [];
-					// -- si le champ_source de l'id n'est pas précisé c'est qu'il est déjà connu et donc que c'est
-					//    le même que celui de l'objet source.
-					$where[] = isset($parent_methode['source_champ'])
-						? "{$parent_methode['source_champ']} = $id_objet"
-						: "$cle_objet = $id_objet";
-					if (isset($parent_methode['source_champ_type'])) {
-						$where[] = "{$parent_methode['source_champ_type']} = " . sql_quote($objet);
-					}
-					// -- Condition supplémentaire sur la détection du parent
-					if (isset($parent_methode['table_condition'])) {
-						$where[] = $parent_methode['table_condition'];
-					}
-				}
-			}
-
-			// On lance la requête de récupération du parent
-			$is_table_lien = (str_contains((string) $table, '_liens') && str_ends_with((string) $table, '_liens'));
-			if (
-				!$condition_objet_invalide
-				&& $where
-				&& ($lignes = sql_allfetsel($is_table_lien ? '*' : $select, $table, $where))
-			) {
-				foreach ($lignes as $ligne) {
-					// Si le type est fixe
-					if (isset($parent_methode['type'])) {
-						$parent = [
-							'objet' 	=> $parent_methode['type'],
-							'id_objet'	=> (int) $ligne[$parent_methode['champ']],
-							'champ' 	=> $parent_methode['champ'],
-							'table'    => $table,
-						];
-					}
-					elseif (isset($parent_methode['champ_type'])) {
-						$parent = [
-							'objet' 	 => $ligne[$parent_methode['champ_type']],
-							'id_objet' 	 => (int) $ligne[$parent_methode['champ']],
-							'champ' 	 => $parent_methode['champ'],
-							'champ_type' => $parent_methode['champ_type'],
-							'table'    => $table,
-						];
-					}
-					if ($is_table_lien) {
-						$parent['lien'] = $ligne;
-					}
-					$parents[] = $parent;
-				}
-			}
-		}
-	}
-
-	// On passe par un pipeline avant de retourner
-	$parents = pipeline(
-		'objet_lister_parents',
-		[
-			'args' => [
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-			],
-			'data' => $parents,
-		]
-	);
-
-	return $parents;
+    $parents = [];
+
+    // Si on trouve une ou des méthodes de parent
+    if ($parent_methodes = objet_type_decrire_infos_parents($objet)) {
+        // On identifie les informations sur l'objet source dont on cherche le parent.
+        include_spip('base/abstract_sql');
+        $table_objet = table_objet_sql($objet);
+        $cle_objet = id_table_objet($objet);
+        $id_objet = (int) $id_objet;
+
+        // On teste chacun méthode dans l'ordre, et dès qu'on a trouvé un parent on s'arrête
+        foreach ($parent_methodes as $parent_methode) {
+            // Champ identifiant le parent (id et éventuellement le type)
+            // -- cette identification ne dépend pas du fait que le parent soit stocké dans une table de différente
+            //    de celle de l'objet source
+            $select = [];
+            if (isset($parent_methode['champ'])) {
+                $select[] = $parent_methode['champ'];
+            }
+            if (isset($parent_methode['champ_type'])) {
+                $select[] = $parent_methode['champ_type'];
+            }
+
+            // Détermination de la table du parent et des conditions sur l'objet source et le parent.
+            $condition_objet_invalide = false;
+            $where = [];
+            if (!isset($parent_methode['table'])) {
+                // Le parent est stocké dans la même table que l'objet source :
+                // -- toutes les conditions s'appliquent à la table source.
+                $table = $table_objet;
+                $where = ["$cle_objet = $id_objet"];
+                // -- Condition supplémentaire sur la détection du parent
+                if (isset($parent_methode['condition'])) {
+                    $where[] = $parent_methode['condition'];
+                }
+            } elseif (!$parent_direct_seulement) {
+                // Le parent est stocké dans une table différente de l'objet source.
+                // -- on vérifie d'emblée si il y a une condition sur l'objet source et si celle-ci est vérifiée
+                //    Si non, on peut arrêter le traitement.
+                if (isset($parent_methode['condition'])) {
+                    $where = [
+                        "$cle_objet = $id_objet",
+                        $parent_methode['condition']
+                    ];
+                    if (!sql_countsel($table_objet, $where)) {
+                        $condition_objet_invalide = true;
+                    }
+                }
+
+                // Si pas de condition sur l'objet source ou que la condition est vérifiée, on peut construire
+                // la requête sur la table qui accueille le parent.
+                if (!$condition_objet_invalide) {
+                    $table = $parent_methode['table'];
+                    // On construit les conditions en fonction de l'identification de l'objet source
+                    $where = [];
+                    // -- si le champ_source de l'id n'est pas précisé c'est qu'il est déjà connu et donc que c'est
+                    //    le même que celui de l'objet source.
+                    $where[] = isset($parent_methode['source_champ'])
+                        ? "{$parent_methode['source_champ']} = $id_objet"
+                        : "$cle_objet = $id_objet";
+                    if (isset($parent_methode['source_champ_type'])) {
+                        $where[] = "{$parent_methode['source_champ_type']} = " . sql_quote($objet);
+                    }
+                    // -- Condition supplémentaire sur la détection du parent
+                    if (isset($parent_methode['table_condition'])) {
+                        $where[] = $parent_methode['table_condition'];
+                    }
+                }
+            }
+
+            // On lance la requête de récupération du parent
+            $is_table_lien = (str_contains((string) $table, '_liens') && str_ends_with((string) $table, '_liens'));
+            if (
+                !$condition_objet_invalide
+                && $where
+                && ($lignes = sql_allfetsel($is_table_lien ? '*' : $select, $table, $where))
+            ) {
+                foreach ($lignes as $ligne) {
+                    // Si le type est fixe
+                    if (isset($parent_methode['type'])) {
+                        $parent = [
+                            'objet' 	=> $parent_methode['type'],
+                            'id_objet'	=> (int) $ligne[$parent_methode['champ']],
+                            'champ' 	=> $parent_methode['champ'],
+                            'table'    => $table,
+                        ];
+                    }
+                    elseif (isset($parent_methode['champ_type'])) {
+                        $parent = [
+                            'objet' 	 => $ligne[$parent_methode['champ_type']],
+                            'id_objet' 	 => (int) $ligne[$parent_methode['champ']],
+                            'champ' 	 => $parent_methode['champ'],
+                            'champ_type' => $parent_methode['champ_type'],
+                            'table'    => $table,
+                        ];
+                    }
+                    if ($is_table_lien) {
+                        $parent['lien'] = $ligne;
+                    }
+                    $parents[] = $parent;
+                }
+            }
+        }
+    }
+
+    // On passe par un pipeline avant de retourner
+    $parents = pipeline(
+        'objet_lister_parents',
+        [
+            'args' => [
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+            ],
+            'data' => $parents,
+        ]
+    );
+
+    return $parents;
 }
 
 /**
@@ -1436,17 +1436,17 @@ 
  * @return array
  */
 function objet_lister_parents_par_type($objet, $id_objet) {
-	$parents = objet_lister_parents($objet, $id_objet);
+    $parents = objet_lister_parents($objet, $id_objet);
 
-	$parents_par_type = [];
-	foreach ($parents as $parent) {
-		if (!isset($parents_par_type[$parent['objet']])) {
-			$parents_par_type[$parent['objet']] = [];
-		}
-		$parents_par_type[$parent['objet']][] = $parent['id_objet'];
-	}
+    $parents_par_type = [];
+    foreach ($parents as $parent) {
+        if (!isset($parents_par_type[$parent['objet']])) {
+            $parents_par_type[$parent['objet']] = [];
+        }
+        $parents_par_type[$parent['objet']][] = $parent['id_objet'];
+    }
 
-	return $parents_par_type;
+    return $parents_par_type;
 }
 
 
@@ -1479,85 +1479,85 @@ 
  *     Retourne un tableau de tableaux, avec comme clés les types des objets, et dans chacun un tableau des identifiants trouvés
  */
 function objet_lister_enfants($objet, $id_objet) {
-	$enfants = [];
-
-	// Si on trouve des types d'enfants et leurs méthodes
-	if ($enfants_methodes = objet_type_decrire_infos_enfants($objet)) {
-		include_spip('base/abstract_sql');
-		$id_objet = (int) $id_objet;
-
-		// On parcourt tous les types d'enfants trouvés
-		foreach ($enfants_methodes as $objet_enfant => $_methode_parent) {
-			// On construit les conditions d'identification du parent
-			$where = [];
-			// -- L'identifiant du parent
-			if (isset($_methode_parent['champ'])) {
-				$where[] = $_methode_parent['champ'] . ' = ' . $id_objet;
-			}
-			// -- Si le parent est variable
-			if (isset($_methode_parent['champ_type'])) {
-				$where[] = $_methode_parent['champ_type'] . ' = ' . sql_quote($objet);
-			}
-
-			// On détermine la table, le champ id des enfants et on complète éventuellement les conditions
-			if (!isset($_methode_parent['table'])) {
-				// Les enfants sont stockés dans la même table que l'objet parent :
-				$table_enfant = table_objet_sql($objet_enfant);
-				$cle_objet_enfant = id_table_objet($objet_enfant);
-
-				// S'il y a une condition supplémentaire
-				if (isset($_methode_parent['condition'])) {
-					$where[] = $_methode_parent['condition'];
-				}
-			} else {
-				// Les enfants sont stockés dans une table différente de l'objet parent.
-				$table_enfant = $_methode_parent['table'];
-				$cle_objet_enfant = $_methode_parent['source_champ'] ?? id_table_objet($objet_enfant);
-
-				// S'il y a une condition supplémentaire
-				if (isset($_methode_parent['table_condition'])) {
-					$where[] = $_methode_parent['table_condition'];
-				}
-			}
-
-			// On lance la requête
-			$is_table_lien = (str_contains((string) $table_enfant, '_liens') && str_ends_with((string) $table_enfant, '_liens'));
-			if ($rows = sql_allfetsel($is_table_lien ? '*' : $cle_objet_enfant, $table_enfant, $where)) {
-				$enfant = [
-					'objet' => $objet_enfant,
-					'id_objet' => 0,
-					'table' => $table_enfant
-				];
-				if (isset($_methode_parent['champ'])) {
-					$enfant['champ'] = $_methode_parent['champ'];
-				}
-				if (isset($_methode_parent['champ_type'])) {
-					$enfant['champ_type'] = $_methode_parent['champ_type'];
-				}
-				foreach ($rows as $row) {
-					$enfant['id_objet'] = (int) $row[$cle_objet_enfant];
-					if ($is_table_lien) {
-						$enfant['lien'] = $row;
-					}
-					$enfants[] = $enfant;
-				}
-			}
-		}
-	}
-
-	// On passe par un pipeline avant de retourner
-	$enfants = pipeline(
-		'objet_lister_enfants',
-		[
-			'args' => [
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-			],
-			'data' => $enfants,
-		]
-	);
-
-	return $enfants;
+    $enfants = [];
+
+    // Si on trouve des types d'enfants et leurs méthodes
+    if ($enfants_methodes = objet_type_decrire_infos_enfants($objet)) {
+        include_spip('base/abstract_sql');
+        $id_objet = (int) $id_objet;
+
+        // On parcourt tous les types d'enfants trouvés
+        foreach ($enfants_methodes as $objet_enfant => $_methode_parent) {
+            // On construit les conditions d'identification du parent
+            $where = [];
+            // -- L'identifiant du parent
+            if (isset($_methode_parent['champ'])) {
+                $where[] = $_methode_parent['champ'] . ' = ' . $id_objet;
+            }
+            // -- Si le parent est variable
+            if (isset($_methode_parent['champ_type'])) {
+                $where[] = $_methode_parent['champ_type'] . ' = ' . sql_quote($objet);
+            }
+
+            // On détermine la table, le champ id des enfants et on complète éventuellement les conditions
+            if (!isset($_methode_parent['table'])) {
+                // Les enfants sont stockés dans la même table que l'objet parent :
+                $table_enfant = table_objet_sql($objet_enfant);
+                $cle_objet_enfant = id_table_objet($objet_enfant);
+
+                // S'il y a une condition supplémentaire
+                if (isset($_methode_parent['condition'])) {
+                    $where[] = $_methode_parent['condition'];
+                }
+            } else {
+                // Les enfants sont stockés dans une table différente de l'objet parent.
+                $table_enfant = $_methode_parent['table'];
+                $cle_objet_enfant = $_methode_parent['source_champ'] ?? id_table_objet($objet_enfant);
+
+                // S'il y a une condition supplémentaire
+                if (isset($_methode_parent['table_condition'])) {
+                    $where[] = $_methode_parent['table_condition'];
+                }
+            }
+
+            // On lance la requête
+            $is_table_lien = (str_contains((string) $table_enfant, '_liens') && str_ends_with((string) $table_enfant, '_liens'));
+            if ($rows = sql_allfetsel($is_table_lien ? '*' : $cle_objet_enfant, $table_enfant, $where)) {
+                $enfant = [
+                    'objet' => $objet_enfant,
+                    'id_objet' => 0,
+                    'table' => $table_enfant
+                ];
+                if (isset($_methode_parent['champ'])) {
+                    $enfant['champ'] = $_methode_parent['champ'];
+                }
+                if (isset($_methode_parent['champ_type'])) {
+                    $enfant['champ_type'] = $_methode_parent['champ_type'];
+                }
+                foreach ($rows as $row) {
+                    $enfant['id_objet'] = (int) $row[$cle_objet_enfant];
+                    if ($is_table_lien) {
+                        $enfant['lien'] = $row;
+                    }
+                    $enfants[] = $enfant;
+                }
+            }
+        }
+    }
+
+    // On passe par un pipeline avant de retourner
+    $enfants = pipeline(
+        'objet_lister_enfants',
+        [
+            'args' => [
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+            ],
+            'data' => $enfants,
+        ]
+    );
+
+    return $enfants;
 }
 
 /**
@@ -1569,17 +1569,17 @@ 
  * @return array
  */
 function objet_lister_enfants_par_type($objet, $id_objet) {
-	$enfants = objet_lister_enfants($objet, $id_objet);
+    $enfants = objet_lister_enfants($objet, $id_objet);
 
-	$enfants_par_type = [];
-	foreach ($enfants as $enfant) {
-		if (!isset($enfants_par_type[$enfant['objet']])) {
-			$enfants_par_type[$enfant['objet']] = [];
-		}
-		$enfants_par_type[$enfant['objet']][] = $enfant['id_objet'];
-	}
+    $enfants_par_type = [];
+    foreach ($enfants as $enfant) {
+        if (!isset($enfants_par_type[$enfant['objet']])) {
+            $enfants_par_type[$enfant['objet']] = [];
+        }
+        $enfants_par_type[$enfant['objet']][] = $enfant['id_objet'];
+    }
 
-	return $enfants_par_type;
+    return $enfants_par_type;
 }
 
 /**
@@ -1591,31 +1591,31 @@ 
  *     Retourne un tableau de tableau contenant les informations de type et de champ pour trouver le parent ou false sinon
  */
 function objet_type_decrire_infos_parents($objet) {
-	static $parents = [];
-
-	// Si on ne l'a pas encore cherché pour cet objet
-	if (!isset($parents[$objet])) {
-		$parents[$objet] = false;
-		$table = table_objet_sql($objet);
-
-		// Si on trouve bien la description de cet objet
-		if ($infos = lister_tables_objets_sql($table)) {
-			if (isset($infos['parent']) && is_array($infos['parent'])) {
-				// S'il y a une description explicite de parent, c'est prioritaire
-				// -- on traite les cas où il y a une ou plusieurs description mais on renvoie toujours un tableau
-				//    de description
-				$parents[$objet] = isset($infos['parent'][0]) ? $infos['parent'] : [$infos['parent']];
-			} elseif (isset($infos['field']['id_rubrique'])) {
-				// Sinon on cherche des cas courants connus magiquement, à commencer par id_rubrique
-				$parents[$objet] = [['type' => 'rubrique', 'champ' => 'id_rubrique']];
-			} elseif (isset($infos['field']['id_parent'])) {
-				// Sinon on cherche un champ id_parent, ce qui signifie que l'objet est parent de lui-même
-				$parents[$objet] = [['type' => $objet, 'champ' => 'id_parent']];
-			}
-		}
-	}
-
-	return $parents[$objet];
+    static $parents = [];
+
+    // Si on ne l'a pas encore cherché pour cet objet
+    if (!isset($parents[$objet])) {
+        $parents[$objet] = false;
+        $table = table_objet_sql($objet);
+
+        // Si on trouve bien la description de cet objet
+        if ($infos = lister_tables_objets_sql($table)) {
+            if (isset($infos['parent']) && is_array($infos['parent'])) {
+                // S'il y a une description explicite de parent, c'est prioritaire
+                // -- on traite les cas où il y a une ou plusieurs description mais on renvoie toujours un tableau
+                //    de description
+                $parents[$objet] = isset($infos['parent'][0]) ? $infos['parent'] : [$infos['parent']];
+            } elseif (isset($infos['field']['id_rubrique'])) {
+                // Sinon on cherche des cas courants connus magiquement, à commencer par id_rubrique
+                $parents[$objet] = [['type' => 'rubrique', 'champ' => 'id_rubrique']];
+            } elseif (isset($infos['field']['id_parent'])) {
+                // Sinon on cherche un champ id_parent, ce qui signifie que l'objet est parent de lui-même
+                $parents[$objet] = [['type' => $objet, 'champ' => 'id_parent']];
+            }
+        }
+    }
+
+    return $parents[$objet];
 }
 
 /**
@@ -1627,36 +1627,36 @@ 
  *     Retourne un tableau de tableaux contenant chacun les informations d'un type d'enfant
  */
 function objet_type_decrire_infos_enfants($objet) {
-	static $enfants = [];
-
-	// Si on a déjà fait la recherche pour ce type d'objet
-	if (!isset($enfants[$objet])) {
-		$enfants[$objet] = [];
-		$tables = lister_tables_objets_sql();
-
-		// On parcourt toutes les tables d'objet, et on cherche si chacune peut être enfant
-		foreach ($tables as $table => $infos) {
-			$objet_enfant = objet_type($table);
-
-			// On ne va pas refaire les tests des différents cas, on réutilise
-			if ($parent_methodes = objet_type_decrire_infos_parents($objet_enfant)) {
-				// On parcourt les différents cas possible, si certains peuvent concerner l'objet demandé
-				foreach ($parent_methodes as $parent_methode) {
-					// Si la méthode qu'on teste n'exclut pas le parent demandé
-					if (!isset($parent_methode['exclus']) || !in_array($objet, $parent_methode['exclus'])) {
-						// Si le type du parent est fixe et directement l'objet demandé
-						if (isset($parent_methode['type']) && isset($parent_methode['champ']) && $parent_methode['type'] == $objet) {
-							$enfants[$objet][$objet_enfant] = $parent_methode;
-						}
-						// Si le type est variable, alors l'objet demandé peut forcément être parent
-						elseif (isset($parent_methode['champ_type']) && isset($parent_methode['champ'])) {
-							$enfants[$objet][$objet_enfant] = $parent_methode;
-						}
-					}
-				}
-			}
-		}
-	}
-
-	return $enfants[$objet];
+    static $enfants = [];
+
+    // Si on a déjà fait la recherche pour ce type d'objet
+    if (!isset($enfants[$objet])) {
+        $enfants[$objet] = [];
+        $tables = lister_tables_objets_sql();
+
+        // On parcourt toutes les tables d'objet, et on cherche si chacune peut être enfant
+        foreach ($tables as $table => $infos) {
+            $objet_enfant = objet_type($table);
+
+            // On ne va pas refaire les tests des différents cas, on réutilise
+            if ($parent_methodes = objet_type_decrire_infos_parents($objet_enfant)) {
+                // On parcourt les différents cas possible, si certains peuvent concerner l'objet demandé
+                foreach ($parent_methodes as $parent_methode) {
+                    // Si la méthode qu'on teste n'exclut pas le parent demandé
+                    if (!isset($parent_methode['exclus']) || !in_array($objet, $parent_methode['exclus'])) {
+                        // Si le type du parent est fixe et directement l'objet demandé
+                        if (isset($parent_methode['type']) && isset($parent_methode['champ']) && $parent_methode['type'] == $objet) {
+                            $enfants[$objet][$objet_enfant] = $parent_methode;
+                        }
+                        // Si le type est variable, alors l'objet demandé peut forcément être parent
+                        elseif (isset($parent_methode['champ_type']) && isset($parent_methode['champ'])) {
+                            $enfants[$objet][$objet_enfant] = $parent_methode;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    return $enfants[$objet];
 }