spip / SPIP

ecrire/inc/queue.php

Indentation +474 added lines, -474 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Queue
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('_JQ_SCHEDULED', 1);
@@ -49,101 +49,101 @@ 
  *  id of job
  */
 function queue_add_job(
-	$function,
-	$description,
-	$arguments = [],
-	$file = '',
-	$no_duplicate = false,
-	$time = 0,
-	$priority = 0
+    $function,
+    $description,
+    $arguments = [],
+    $file = '',
+    $no_duplicate = false,
+    $time = 0,
+    $priority = 0
 ) {
-	include_spip('base/abstract_sql');
-
-	// cas pourri de ecrire/action/editer_site avec l'option reload=oui
-	if (defined('_GENIE_SYNDIC_NOW')) {
-		$arguments['id_syndic'] = _GENIE_SYNDIC_NOW;
-	}
-
-	// serialiser les arguments
-	$arguments = serialize($arguments);
-	$md5args = md5($arguments);
-
-	// si pas de date programee, des que possible
-	$duplicate_where = 'status=' . intval(_JQ_SCHEDULED) . ' AND ';
-	if (!$time) {
-		$time = time();
-		$duplicate_where = ''; // ne pas dupliquer si deja le meme job en cours d'execution
-	}
-	$date = date('Y-m-d H:i:s', $time);
-
-	$set_job = [
-		'fonction' => $function,
-		'descriptif' => $description,
-		'args' => $arguments,
-		'md5args' => $md5args,
-		'inclure' => $file,
-		'priorite' => max(-10, min(10, intval($priority))),
-		'date' => $date,
-		'status' => _JQ_SCHEDULED,
-	];
-	// si option ne pas dupliquer, regarder si la fonction existe deja
-	// avec les memes args et file
-	if (
-		$no_duplicate
-		&& ($id_job = sql_getfetsel(
-			'id_job',
-			'spip_jobs',
-			$duplicate_where =
-				$duplicate_where . 'fonction=' . sql_quote($function)
-				. (($no_duplicate === 'function_only') ? '' :
-			' AND md5args=' . sql_quote($md5args) . ' AND inclure=' . sql_quote($file))
-		))
-	) {
-		return $id_job;
-	}
-
-	$id_job = sql_insertq('spip_jobs', $set_job);
-	// en cas de concurrence, deux process peuvent arriver jusqu'ici en parallele
-	// avec le meme job unique a inserer. Dans ce cas, celui qui a eu l'id le plus grand
-	// doit s'effacer
-	if (
-		$no_duplicate
-		&& ($id_prev = sql_getfetsel('id_job', 'spip_jobs', 'id_job<' . intval($id_job) . " AND $duplicate_where"))
-	) {
-		sql_delete('spip_jobs', 'id_job=' . intval($id_job));
-
-		return $id_prev;
-	}
-
-	// verifier la non duplication qui peut etre problematique en cas de concurence
-	// il faut dans ce cas que seul le dernier ajoute se supprime !
-
-	// une option de debug pour verifier que les arguments en base sont bons
-	// ie cas d'un char non acceptables sur certains type de champs
-	// qui coupe la valeur
-	if (defined('_JQ_INSERT_CHECK_ARGS') && $id_job) {
-		$args = sql_getfetsel('args', 'spip_jobs', 'id_job=' . intval($id_job));
-		if ($args !== $arguments) {
-			spip_log('arguments job errones / longueur ' . strlen($args) . ' vs ' . strlen($arguments) . ' / valeur : ' . var_export(
-				$arguments,
-				true
-			), 'queue');
-		}
-	}
-
-	if ($id_job) {
-		queue_update_next_job_time($time);
-	}
-	// si la mise en file d'attente du job echoue,
-	// il ne faut pas perdre l'execution de la fonction
-	// on la lance immediatement, c'est un fallback
-	// sauf en cas d'upgrade necessaire (table spip_jobs inexistante)
-	elseif ($GLOBALS['meta']['version_installee'] == $GLOBALS['spip_version_base']) {
-		$set_job['id_job'] = 0;
-		queue_start_job($set_job);
-	}
-
-	return $id_job;
+    include_spip('base/abstract_sql');
+
+    // cas pourri de ecrire/action/editer_site avec l'option reload=oui
+    if (defined('_GENIE_SYNDIC_NOW')) {
+        $arguments['id_syndic'] = _GENIE_SYNDIC_NOW;
+    }
+
+    // serialiser les arguments
+    $arguments = serialize($arguments);
+    $md5args = md5($arguments);
+
+    // si pas de date programee, des que possible
+    $duplicate_where = 'status=' . intval(_JQ_SCHEDULED) . ' AND ';
+    if (!$time) {
+        $time = time();
+        $duplicate_where = ''; // ne pas dupliquer si deja le meme job en cours d'execution
+    }
+    $date = date('Y-m-d H:i:s', $time);
+
+    $set_job = [
+        'fonction' => $function,
+        'descriptif' => $description,
+        'args' => $arguments,
+        'md5args' => $md5args,
+        'inclure' => $file,
+        'priorite' => max(-10, min(10, intval($priority))),
+        'date' => $date,
+        'status' => _JQ_SCHEDULED,
+    ];
+    // si option ne pas dupliquer, regarder si la fonction existe deja
+    // avec les memes args et file
+    if (
+        $no_duplicate
+        && ($id_job = sql_getfetsel(
+            'id_job',
+            'spip_jobs',
+            $duplicate_where =
+                $duplicate_where . 'fonction=' . sql_quote($function)
+                . (($no_duplicate === 'function_only') ? '' :
+            ' AND md5args=' . sql_quote($md5args) . ' AND inclure=' . sql_quote($file))
+        ))
+    ) {
+        return $id_job;
+    }
+
+    $id_job = sql_insertq('spip_jobs', $set_job);
+    // en cas de concurrence, deux process peuvent arriver jusqu'ici en parallele
+    // avec le meme job unique a inserer. Dans ce cas, celui qui a eu l'id le plus grand
+    // doit s'effacer
+    if (
+        $no_duplicate
+        && ($id_prev = sql_getfetsel('id_job', 'spip_jobs', 'id_job<' . intval($id_job) . " AND $duplicate_where"))
+    ) {
+        sql_delete('spip_jobs', 'id_job=' . intval($id_job));
+
+        return $id_prev;
+    }
+
+    // verifier la non duplication qui peut etre problematique en cas de concurence
+    // il faut dans ce cas que seul le dernier ajoute se supprime !
+
+    // une option de debug pour verifier que les arguments en base sont bons
+    // ie cas d'un char non acceptables sur certains type de champs
+    // qui coupe la valeur
+    if (defined('_JQ_INSERT_CHECK_ARGS') && $id_job) {
+        $args = sql_getfetsel('args', 'spip_jobs', 'id_job=' . intval($id_job));
+        if ($args !== $arguments) {
+            spip_log('arguments job errones / longueur ' . strlen($args) . ' vs ' . strlen($arguments) . ' / valeur : ' . var_export(
+                $arguments,
+                true
+            ), 'queue');
+        }
+    }
+
+    if ($id_job) {
+        queue_update_next_job_time($time);
+    }
+    // si la mise en file d'attente du job echoue,
+    // il ne faut pas perdre l'execution de la fonction
+    // on la lance immediatement, c'est un fallback
+    // sauf en cas d'upgrade necessaire (table spip_jobs inexistante)
+    elseif ($GLOBALS['meta']['version_installee'] == $GLOBALS['spip_version_base']) {
+        $set_job['id_job'] = 0;
+        queue_start_job($set_job);
+    }
+
+    return $id_job;
 }
 
 /**
@@ -152,11 +152,11 @@ 
  * @return void
  */
 function queue_purger() {
-	include_spip('base/abstract_sql');
-	sql_delete('spip_jobs');
-	sql_delete('spip_jobs_liens', 'id_job NOT IN (' . sql_get_select('id_job', 'spip_jobs') . ')');
-	include_spip('inc/genie');
-	genie_queue_watch_dist();
+    include_spip('base/abstract_sql');
+    sql_delete('spip_jobs');
+    sql_delete('spip_jobs_liens', 'id_job NOT IN (' . sql_get_select('id_job', 'spip_jobs') . ')');
+    include_spip('inc/genie');
+    genie_queue_watch_dist();
 }
 
 /**
@@ -167,25 +167,25 @@ 
  * @return int|bool
  */
 function queue_remove_job($id_job) {
-	include_spip('base/abstract_sql');
-
-	if (
-		($row = sql_fetsel('fonction,inclure,date', 'spip_jobs', 'id_job=' . intval($id_job)))
-		&& ($res = sql_delete('spip_jobs', 'id_job=' . intval($id_job)))
-	) {
-		queue_unlink_job($id_job);
-		// est-ce une tache cron qu'il faut relancer ?
-		if ($periode = queue_is_cron_job($row['fonction'], $row['inclure'])) {
-			// relancer avec les nouveaux arguments de temps
-			include_spip('inc/genie');
-			// relancer avec la periode prevue
-			queue_genie_replan_job($row['fonction'], $periode, strtotime($row['date']));
-		}
-		queue_update_next_job_time();
-		return $res;
-	}
-
-	return false;
+    include_spip('base/abstract_sql');
+
+    if (
+        ($row = sql_fetsel('fonction,inclure,date', 'spip_jobs', 'id_job=' . intval($id_job)))
+        && ($res = sql_delete('spip_jobs', 'id_job=' . intval($id_job)))
+    ) {
+        queue_unlink_job($id_job);
+        // est-ce une tache cron qu'il faut relancer ?
+        if ($periode = queue_is_cron_job($row['fonction'], $row['inclure'])) {
+            // relancer avec les nouveaux arguments de temps
+            include_spip('inc/genie');
+            // relancer avec la periode prevue
+            queue_genie_replan_job($row['fonction'], $periode, strtotime($row['date']));
+        }
+        queue_update_next_job_time();
+        return $res;
+    }
+
+    return false;
 }
 
 /**
@@ -198,18 +198,18 @@ 
  *  ou un tableau composé de tableaux simples pour lieur plusieurs objets en une fois
  */
 function queue_link_job($id_job, $objets) {
-	include_spip('base/abstract_sql');
-
-	if (is_array($objets) && count($objets)) {
-		if (is_array(reset($objets))) {
-			foreach ($objets as $k => $o) {
-				$objets[$k]['id_job'] = $id_job;
-			}
-			sql_insertq_multi('spip_jobs_liens', $objets);
-		} else {
-			sql_insertq('spip_jobs_liens', array_merge(['id_job' => $id_job], $objets));
-		}
-	}
+    include_spip('base/abstract_sql');
+
+    if (is_array($objets) && count($objets)) {
+        if (is_array(reset($objets))) {
+            foreach ($objets as $k => $o) {
+                $objets[$k]['id_job'] = $id_job;
+            }
+            sql_insertq_multi('spip_jobs_liens', $objets);
+        } else {
+            sql_insertq('spip_jobs_liens', array_merge(['id_job' => $id_job], $objets));
+        }
+    }
 }
 
 /**
@@ -221,7 +221,7 @@ 
  *  resultat du sql_delete
  */
 function queue_unlink_job($id_job) {
-	return sql_delete('spip_jobs_liens', 'id_job=' . intval($id_job));
+    return sql_delete('spip_jobs_liens', 'id_job=' . intval($id_job));
 }
 
 /**
@@ -234,36 +234,36 @@ 
  */
 function queue_start_job($row) {
 
-	// deserialiser les arguments
-	$args = unserialize($row['args']);
-	if (!is_array($args)) {
-		spip_log('arguments job errones ' . var_export($row, true), 'queue');
-		return false;
-	}
-
-	$fonction = $row['fonction'];
-	if (strlen($inclure = trim($row['inclure']))) {
-		if (str_ends_with($inclure, '/')) { // c'est un chemin pour charger_fonction
-			$f = charger_fonction($fonction, rtrim($inclure, '/'), false);
-			if ($f) {
-				$fonction = $f;
-			}
-		} else {
-			include_spip($inclure);
-		}
-	}
-
-	if (!function_exists($fonction)) {
-		spip_log("fonction $fonction ($inclure) inexistante " . var_export($row, true), 'queue');
-
-		return false;
-	}
-
-	spip_log('queue [' . $row['id_job'] . "]: $fonction() start", 'queue');
-	$res = $fonction(...$args);
-	spip_log('queue [' . $row['id_job'] . "]: $fonction() end", 'queue');
-
-	return $res;
+    // deserialiser les arguments
+    $args = unserialize($row['args']);
+    if (!is_array($args)) {
+        spip_log('arguments job errones ' . var_export($row, true), 'queue');
+        return false;
+    }
+
+    $fonction = $row['fonction'];
+    if (strlen($inclure = trim($row['inclure']))) {
+        if (str_ends_with($inclure, '/')) { // c'est un chemin pour charger_fonction
+            $f = charger_fonction($fonction, rtrim($inclure, '/'), false);
+            if ($f) {
+                $fonction = $f;
+            }
+        } else {
+            include_spip($inclure);
+        }
+    }
+
+    if (!function_exists($fonction)) {
+        spip_log("fonction $fonction ($inclure) inexistante " . var_export($row, true), 'queue');
+
+        return false;
+    }
+
+    spip_log('queue [' . $row['id_job'] . "]: $fonction() start", 'queue');
+    $res = $fonction(...$args);
+    spip_log('queue [' . $row['id_job'] . "]: $fonction() end", 'queue');
+
+    return $res;
 }
 
 /**
@@ -290,89 +290,89 @@ 
  *     - true : une planification a été faite.
  */
 function queue_schedule($force_jobs = null) {
-	$time = time();
-	if (defined('_DEBUG_BLOCK_QUEUE')) {
-		spip_log('_DEBUG_BLOCK_QUEUE : schedule stop', 'jq' . _LOG_DEBUG);
-
-		return;
-	}
-
-	// rien a faire si le prochain job est encore dans le futur
-	if (queue_sleep_time_to_next_job() > 0 && (!$force_jobs || !count($force_jobs))) {
-		spip_log('queue_sleep_time_to_next_job', 'jq' . _LOG_DEBUG);
-
-		return;
-	}
-
-	include_spip('base/abstract_sql');
-	// on ne peut rien faire si pas de connexion SQL
-	if (!spip_connect()) {
-		return false;
-	}
-
-	if (!defined('_JQ_MAX_JOBS_TIME_TO_EXECUTE')) {
-		$max_time = ini_get('max_execution_time') / 2;
-		// valeur conservatrice si on a pas reussi a lire le max_execution_time
-		if (!$max_time) {
-			$max_time = 5;
-		}
-		define('_JQ_MAX_JOBS_TIME_TO_EXECUTE', min($max_time, 15)); // une valeur maxi en temps.
-	}
-	$end_time = $time + _JQ_MAX_JOBS_TIME_TO_EXECUTE;
-
-	spip_log("JQ schedule $time / $end_time", 'jq' . _LOG_DEBUG);
-
-	if (!defined('_JQ_MAX_JOBS_EXECUTE')) {
-		define('_JQ_MAX_JOBS_EXECUTE', 200);
-	}
-	$nbj = 0;
-	// attraper les jobs
-	// dont la date est passee (echus en attente),
-	// par ordre :
-	//	- de priorite
-	//	- de date
-	// lorsqu'un job cron n'a pas fini, sa priorite est descendue
-	// pour qu'il ne bloque pas les autres jobs en attente
-	if (is_array($force_jobs) && count($force_jobs)) {
-		$cond = 'status=' . intval(_JQ_SCHEDULED) . ' AND ' . sql_in('id_job', $force_jobs);
-	} else {
-		$now = date('Y-m-d H:i:s', $time);
-		$cond = 'status=' . intval(_JQ_SCHEDULED) . ' AND date<=' . sql_quote($now);
-	}
-
-	register_shutdown_function('queue_error_handler'); // recuperer les erreurs auant que possible
-	$res = sql_allfetsel('*', 'spip_jobs', $cond, '', 'priorite DESC,date', '0,' . (_JQ_MAX_JOBS_EXECUTE + 1));
-	do {
-		if ($row = array_shift($res)) {
-			$nbj++;
-			// il faut un verrou, a base de sql_delete
-			if (sql_delete('spip_jobs', 'id_job=' . intval($row['id_job']) . ' AND status=' . intval(_JQ_SCHEDULED))) {
-				#spip_log("JQ schedule job ".$nbj." OK",'jq');
-				// on reinsert dans la base aussitot avec un status=_JQ_PENDING
-				$row['status'] = _JQ_PENDING;
-				$row['date'] = date('Y-m-d H:i:s', $time);
-				sql_insertq('spip_jobs', $row);
-
-				// on a la main sur le job :
-				// l'executer
-				$result = queue_start_job($row);
-
-				$time = time();
-				queue_close_job($row, $time, $result);
-			}
-		}
-		spip_log('JQ schedule job end time ' . $time, 'jq' . _LOG_DEBUG);
-	} while ($nbj < _JQ_MAX_JOBS_EXECUTE && $row && $time < $end_time);
-	spip_log('JQ schedule end time ' . time(), 'jq' . _LOG_DEBUG);
-
-	if ($row = array_shift($res)) {
-		queue_update_next_job_time(0); // on sait qu'il y a encore des jobs a lancer ASAP
-		spip_log('JQ encore !', 'jq' . _LOG_DEBUG);
-	} else {
-		queue_update_next_job_time();
-	}
-
-	return true;
+    $time = time();
+    if (defined('_DEBUG_BLOCK_QUEUE')) {
+        spip_log('_DEBUG_BLOCK_QUEUE : schedule stop', 'jq' . _LOG_DEBUG);
+
+        return;
+    }
+
+    // rien a faire si le prochain job est encore dans le futur
+    if (queue_sleep_time_to_next_job() > 0 && (!$force_jobs || !count($force_jobs))) {
+        spip_log('queue_sleep_time_to_next_job', 'jq' . _LOG_DEBUG);
+
+        return;
+    }
+
+    include_spip('base/abstract_sql');
+    // on ne peut rien faire si pas de connexion SQL
+    if (!spip_connect()) {
+        return false;
+    }
+
+    if (!defined('_JQ_MAX_JOBS_TIME_TO_EXECUTE')) {
+        $max_time = ini_get('max_execution_time') / 2;
+        // valeur conservatrice si on a pas reussi a lire le max_execution_time
+        if (!$max_time) {
+            $max_time = 5;
+        }
+        define('_JQ_MAX_JOBS_TIME_TO_EXECUTE', min($max_time, 15)); // une valeur maxi en temps.
+    }
+    $end_time = $time + _JQ_MAX_JOBS_TIME_TO_EXECUTE;
+
+    spip_log("JQ schedule $time / $end_time", 'jq' . _LOG_DEBUG);
+
+    if (!defined('_JQ_MAX_JOBS_EXECUTE')) {
+        define('_JQ_MAX_JOBS_EXECUTE', 200);
+    }
+    $nbj = 0;
+    // attraper les jobs
+    // dont la date est passee (echus en attente),
+    // par ordre :
+    //	- de priorite
+    //	- de date
+    // lorsqu'un job cron n'a pas fini, sa priorite est descendue
+    // pour qu'il ne bloque pas les autres jobs en attente
+    if (is_array($force_jobs) && count($force_jobs)) {
+        $cond = 'status=' . intval(_JQ_SCHEDULED) . ' AND ' . sql_in('id_job', $force_jobs);
+    } else {
+        $now = date('Y-m-d H:i:s', $time);
+        $cond = 'status=' . intval(_JQ_SCHEDULED) . ' AND date<=' . sql_quote($now);
+    }
+
+    register_shutdown_function('queue_error_handler'); // recuperer les erreurs auant que possible
+    $res = sql_allfetsel('*', 'spip_jobs', $cond, '', 'priorite DESC,date', '0,' . (_JQ_MAX_JOBS_EXECUTE + 1));
+    do {
+        if ($row = array_shift($res)) {
+            $nbj++;
+            // il faut un verrou, a base de sql_delete
+            if (sql_delete('spip_jobs', 'id_job=' . intval($row['id_job']) . ' AND status=' . intval(_JQ_SCHEDULED))) {
+                #spip_log("JQ schedule job ".$nbj." OK",'jq');
+                // on reinsert dans la base aussitot avec un status=_JQ_PENDING
+                $row['status'] = _JQ_PENDING;
+                $row['date'] = date('Y-m-d H:i:s', $time);
+                sql_insertq('spip_jobs', $row);
+
+                // on a la main sur le job :
+                // l'executer
+                $result = queue_start_job($row);
+
+                $time = time();
+                queue_close_job($row, $time, $result);
+            }
+        }
+        spip_log('JQ schedule job end time ' . $time, 'jq' . _LOG_DEBUG);
+    } while ($nbj < _JQ_MAX_JOBS_EXECUTE && $row && $time < $end_time);
+    spip_log('JQ schedule end time ' . time(), 'jq' . _LOG_DEBUG);
+
+    if ($row = array_shift($res)) {
+        queue_update_next_job_time(0); // on sait qu'il y a encore des jobs a lancer ASAP
+        spip_log('JQ encore !', 'jq' . _LOG_DEBUG);
+    } else {
+        queue_update_next_job_time();
+    }
+
+    return true;
 }
 
 /**
@@ -390,21 +390,21 @@ 
  * @param int $result
  */
 function queue_close_job(&$row, $time, $result = 0) {
-	// est-ce une tache cron qu'il faut relancer ?
-	if ($periode = queue_is_cron_job($row['fonction'], $row['inclure'])) {
-		// relancer avec les nouveaux arguments de temps
-		include_spip('inc/genie');
-		if ($result < 0) { // relancer tout de suite, mais en baissant la priorite
-		queue_genie_replan_job($row['fonction'], $periode, 0 - $result, null, $row['priorite'] - 1);
-		} else // relancer avec la periode prevue
-		{
-			queue_genie_replan_job($row['fonction'], $periode, $time);
-		}
-	}
-	// purger ses liens eventuels avec des objets
-	sql_delete('spip_jobs_liens', 'id_job=' . intval($row['id_job']));
-	// supprimer le job fini
-	sql_delete('spip_jobs', 'id_job=' . intval($row['id_job']));
+    // est-ce une tache cron qu'il faut relancer ?
+    if ($periode = queue_is_cron_job($row['fonction'], $row['inclure'])) {
+        // relancer avec les nouveaux arguments de temps
+        include_spip('inc/genie');
+        if ($result < 0) { // relancer tout de suite, mais en baissant la priorite
+        queue_genie_replan_job($row['fonction'], $periode, 0 - $result, null, $row['priorite'] - 1);
+        } else // relancer avec la periode prevue
+        {
+            queue_genie_replan_job($row['fonction'], $periode, $time);
+        }
+    }
+    // purger ses liens eventuels avec des objets
+    sql_delete('spip_jobs_liens', 'id_job=' . intval($row['id_job']));
+    // supprimer le job fini
+    sql_delete('spip_jobs', 'id_job=' . intval($row['id_job']));
 }
 
 /**
@@ -414,10 +414,10 @@ 
  * @uses queue_update_next_job_time()
  */
 function queue_error_handler() {
-	// se remettre dans le bon dossier, car Apache le change parfois (toujours?)
-	chdir(_ROOT_CWD);
+    // se remettre dans le bon dossier, car Apache le change parfois (toujours?)
+    chdir(_ROOT_CWD);
 
-	queue_update_next_job_time();
+    queue_update_next_job_time();
 }
 
 
@@ -434,18 +434,18 @@ 
  *     Périodicité de la tâche en secondes, si tâche périodique, sinon false.
  */
 function queue_is_cron_job($function, $inclure) {
-	static $taches = null;
-	if (str_starts_with($inclure, 'genie/')) {
-		if (is_null($taches)) {
-			include_spip('inc/genie');
-			$taches = taches_generales();
-		}
-		if (isset($taches[$function])) {
-			return $taches[$function];
-		}
-	}
-
-	return false;
+    static $taches = null;
+    if (str_starts_with($inclure, 'genie/')) {
+        if (is_null($taches)) {
+            include_spip('inc/genie');
+            $taches = taches_generales();
+        }
+        if (isset($taches[$function])) {
+            return $taches[$function];
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -459,62 +459,62 @@ 
  *  temps de la tache ajoutee ou 0 pour ASAP
  */
 function queue_update_next_job_time($next_time = null) {
-	static $nb_jobs_scheduled = null;
-	static $deja_la = false;
-	// prendre le min des $next_time que l'on voit passer ici, en cas de reentrance
-	static $next = null;
-	// queue_close_job peut etre reentrant ici
-	if ($deja_la) {
-		return;
-	}
-	$deja_la = true;
-
-	include_spip('base/abstract_sql');
-	$time = time();
-
-	// traiter les jobs morts au combat (_JQ_PENDING depuis plus de 180s)
-	// pour cause de timeout ou autre erreur fatale
-	$res = sql_allfetsel(
-		'*',
-		'spip_jobs',
-		'status=' . intval(_JQ_PENDING) . ' AND date<' . sql_quote(date('Y-m-d H:i:s', $time - 180))
-	);
-	if (is_array($res)) {
-		foreach ($res as $row) {
-			queue_close_job($row, $time);
-			spip_log('queue_close_job car _JQ_PENDING depuis +180s : ' . print_r($row, true), 'job_mort' . _LOG_ERREUR);
-		}
-	}
-
-	// chercher la date du prochain job si pas connu
-	if (is_null($next) || is_null(queue_sleep_time_to_next_job())) {
-		$date = sql_getfetsel('date', 'spip_jobs', 'status=' . intval(_JQ_SCHEDULED), '', 'date', '0,1');
-		$next = strtotime($date);
-	}
-	if (!is_null($next_time)) {
-		if (is_null($next) || $next > $next_time) {
-			$next = $next_time;
-		}
-	}
-
-	if ($next) {
-		if (is_null($nb_jobs_scheduled)) {
-			$nb_jobs_scheduled = sql_countsel(
-				'spip_jobs',
-				'status=' . intval(_JQ_SCHEDULED) . ' AND date<' . sql_quote(date('Y-m-d H:i:s', $time))
-			);
-		} elseif ($next <= $time) {
-			$nb_jobs_scheduled++;
-		}
-		// si trop de jobs en attente, on force la purge en fin de hit
-		// pour assurer le coup
-		if ($nb_jobs_scheduled > (defined('_JQ_NB_JOBS_OVERFLOW') ? _JQ_NB_JOBS_OVERFLOW : 10000)) {
-			define('_DIRECT_CRON_FORCE', true);
-		}
-	}
-
-	queue_set_next_job_time($next);
-	$deja_la = false;
+    static $nb_jobs_scheduled = null;
+    static $deja_la = false;
+    // prendre le min des $next_time que l'on voit passer ici, en cas de reentrance
+    static $next = null;
+    // queue_close_job peut etre reentrant ici
+    if ($deja_la) {
+        return;
+    }
+    $deja_la = true;
+
+    include_spip('base/abstract_sql');
+    $time = time();
+
+    // traiter les jobs morts au combat (_JQ_PENDING depuis plus de 180s)
+    // pour cause de timeout ou autre erreur fatale
+    $res = sql_allfetsel(
+        '*',
+        'spip_jobs',
+        'status=' . intval(_JQ_PENDING) . ' AND date<' . sql_quote(date('Y-m-d H:i:s', $time - 180))
+    );
+    if (is_array($res)) {
+        foreach ($res as $row) {
+            queue_close_job($row, $time);
+            spip_log('queue_close_job car _JQ_PENDING depuis +180s : ' . print_r($row, true), 'job_mort' . _LOG_ERREUR);
+        }
+    }
+
+    // chercher la date du prochain job si pas connu
+    if (is_null($next) || is_null(queue_sleep_time_to_next_job())) {
+        $date = sql_getfetsel('date', 'spip_jobs', 'status=' . intval(_JQ_SCHEDULED), '', 'date', '0,1');
+        $next = strtotime($date);
+    }
+    if (!is_null($next_time)) {
+        if (is_null($next) || $next > $next_time) {
+            $next = $next_time;
+        }
+    }
+
+    if ($next) {
+        if (is_null($nb_jobs_scheduled)) {
+            $nb_jobs_scheduled = sql_countsel(
+                'spip_jobs',
+                'status=' . intval(_JQ_SCHEDULED) . ' AND date<' . sql_quote(date('Y-m-d H:i:s', $time))
+            );
+        } elseif ($next <= $time) {
+            $nb_jobs_scheduled++;
+        }
+        // si trop de jobs en attente, on force la purge en fin de hit
+        // pour assurer le coup
+        if ($nb_jobs_scheduled > (defined('_JQ_NB_JOBS_OVERFLOW') ? _JQ_NB_JOBS_OVERFLOW : 10000)) {
+            define('_DIRECT_CRON_FORCE', true);
+        }
+    }
+
+    queue_set_next_job_time($next);
+    $deja_la = false;
 }
 
 
@@ -525,26 +525,26 @@ 
  */
 function queue_set_next_job_time($next) {
 
-	// utiliser le temps courant reel plutot que temps de la requete ici
-	$time = time();
-
-	// toujours relire la valeur pour comparer, pour tenir compte des maj concourrantes
-	// et ne mettre a jour que si il y a un interet a le faire
-	// permet ausis d'initialiser le nom de fichier a coup sur
-	$curr_next = $_SERVER['REQUEST_TIME'] + max(0, queue_sleep_time_to_next_job(true));
-	if (
-		$curr_next <= $time && $next > $time // le prochain job est dans le futur mais pas la date planifiee actuelle
-		|| $curr_next > $next // le prochain job est plus tot que la date planifiee actuelle
-	) {
-		if (function_exists('cache_set') && defined('_MEMOIZE_MEMORY') && _MEMOIZE_MEMORY) {
-			cache_set(_JQ_NEXT_JOB_TIME_FILENAME, intval($next));
-		} else {
-			ecrire_fichier(_JQ_NEXT_JOB_TIME_FILENAME, intval($next));
-		}
-		queue_sleep_time_to_next_job($next);
-	}
-
-	return queue_sleep_time_to_next_job();
+    // utiliser le temps courant reel plutot que temps de la requete ici
+    $time = time();
+
+    // toujours relire la valeur pour comparer, pour tenir compte des maj concourrantes
+    // et ne mettre a jour que si il y a un interet a le faire
+    // permet ausis d'initialiser le nom de fichier a coup sur
+    $curr_next = $_SERVER['REQUEST_TIME'] + max(0, queue_sleep_time_to_next_job(true));
+    if (
+        $curr_next <= $time && $next > $time // le prochain job est dans le futur mais pas la date planifiee actuelle
+        || $curr_next > $next // le prochain job est plus tot que la date planifiee actuelle
+    ) {
+        if (function_exists('cache_set') && defined('_MEMOIZE_MEMORY') && _MEMOIZE_MEMORY) {
+            cache_set(_JQ_NEXT_JOB_TIME_FILENAME, intval($next));
+        } else {
+            ecrire_fichier(_JQ_NEXT_JOB_TIME_FILENAME, intval($next));
+        }
+        queue_sleep_time_to_next_job($next);
+    }
+
+    return queue_sleep_time_to_next_job();
 }
 
 /**
@@ -561,60 +561,60 @@ 
  * @return string
  */
 function queue_affichage_cron() {
-	$texte = '';
-
-	$time_to_next = queue_sleep_time_to_next_job();
-	// rien a faire si le prochain job est encore dans le futur
-	if ($time_to_next > 0 || defined('_DEBUG_BLOCK_QUEUE')) {
-		return $texte;
-	}
-
-	// ne pas relancer si on vient de lancer dans la meme seconde par un hit concurent
-	if (file_exists($lock = _DIR_TMP . 'cron.lock') && !(@filemtime($lock) < $_SERVER['REQUEST_TIME'])) {
-		return $texte;
-	}
-
-	@touch($lock);
-
-	// il y a des taches en attentes
-	// si depuis plus de 5min, on essaye de lancer le cron par tous les moyens pour rattraper le coup
-	// on est sans doute sur un site qui n'autorise pas http sortant ou avec peu de trafic
-	$urgent = false;
-	if ($time_to_next < -300) {
-		$urgent = true;
-	}
-
-	$url_cron = generer_url_action('cron', '', false, true);
-
-	if (!defined('_HTML_BG_CRON_FORCE') || !_HTML_BG_CRON_FORCE) {
-		if (queue_lancer_url_http_async($url_cron) && !$urgent) {
-			return $texte;
-		}
-	}
-
-	// si deja force, on retourne sans rien
-	if (defined('_DIRECT_CRON_FORCE')) {
-		return $texte;
-	}
-
-	// si c'est un bot
-	// inutile de faire un appel par image background,
-	// on force un appel direct en fin de hit
-	if ((defined('_IS_BOT') && _IS_BOT)) {
-		define('_DIRECT_CRON_FORCE', true);
-
-		return $texte;
-	}
-
-	if (!defined('_HTML_BG_CRON_INHIB') || !_HTML_BG_CRON_INHIB) {
-		// en derniere solution, on insere un appel xhr non bloquant ou une image background dans la page si pas de JS
-		$url_cron = generer_url_action('cron');
-		$texte = '<!-- SPIP-CRON -->'
-		  . "<script>setTimeout(function(){var xo = new XMLHttpRequest();xo.open('GET', '$url_cron', true);xo.send('');},100);</script>"
-		  . "<noscript><div style=\"background-image: url('$url_cron');\"></div></noscript>";
-	}
-
-	return $texte;
+    $texte = '';
+
+    $time_to_next = queue_sleep_time_to_next_job();
+    // rien a faire si le prochain job est encore dans le futur
+    if ($time_to_next > 0 || defined('_DEBUG_BLOCK_QUEUE')) {
+        return $texte;
+    }
+
+    // ne pas relancer si on vient de lancer dans la meme seconde par un hit concurent
+    if (file_exists($lock = _DIR_TMP . 'cron.lock') && !(@filemtime($lock) < $_SERVER['REQUEST_TIME'])) {
+        return $texte;
+    }
+
+    @touch($lock);
+
+    // il y a des taches en attentes
+    // si depuis plus de 5min, on essaye de lancer le cron par tous les moyens pour rattraper le coup
+    // on est sans doute sur un site qui n'autorise pas http sortant ou avec peu de trafic
+    $urgent = false;
+    if ($time_to_next < -300) {
+        $urgent = true;
+    }
+
+    $url_cron = generer_url_action('cron', '', false, true);
+
+    if (!defined('_HTML_BG_CRON_FORCE') || !_HTML_BG_CRON_FORCE) {
+        if (queue_lancer_url_http_async($url_cron) && !$urgent) {
+            return $texte;
+        }
+    }
+
+    // si deja force, on retourne sans rien
+    if (defined('_DIRECT_CRON_FORCE')) {
+        return $texte;
+    }
+
+    // si c'est un bot
+    // inutile de faire un appel par image background,
+    // on force un appel direct en fin de hit
+    if ((defined('_IS_BOT') && _IS_BOT)) {
+        define('_DIRECT_CRON_FORCE', true);
+
+        return $texte;
+    }
+
+    if (!defined('_HTML_BG_CRON_INHIB') || !_HTML_BG_CRON_INHIB) {
+        // en derniere solution, on insere un appel xhr non bloquant ou une image background dans la page si pas de JS
+        $url_cron = generer_url_action('cron');
+        $texte = '<!-- SPIP-CRON -->'
+            . "<script>setTimeout(function(){var xo = new XMLHttpRequest();xo.open('GET', '$url_cron', true);xo.send('');},100);</script>"
+            . "<noscript><div style=\"background-image: url('$url_cron');\"></div></noscript>";
+    }
+
+    return $texte;
 }
 
 /**
@@ -623,73 +623,73 @@ 
  * @return bool : true si l'url a pu être appelée en asynchrone, false sinon
  */
 function queue_lancer_url_http_async($url_cron) {
-	// methode la plus rapide :
-	// Si fsockopen est possible, on lance le cron via un socket en asynchrone
-	// si fsockopen echoue (disponibilite serveur, firewall) on essaye pas cURL
-	// car on a toutes les chances d'echouer pareil mais sans moyen de le savoir
-	// mais on renvoie false direct
-	if (function_exists('fsockopen')) {
-		$parts = parse_url($url_cron);
-
-		switch ($parts['scheme']) {
-			case 'https':
-				$scheme = 'ssl://';
-				$port = 443;
-				break;
-			case 'http':
-			default:
-				$scheme = '';
-				$port = 80;
-		}
-		$fp = @fsockopen(
-			$scheme . $parts['host'],
-			$parts['port'] ?? $port,
-			$errno,
-			$errstr,
-			1
-		);
-
-		if ($fp) {
-			$host_sent = $parts['host'];
-			if (isset($parts['port']) && $parts['port'] !== $port) {
-				$host_sent .= ':' . $parts['port'];
-			}
-			$timeout = 200; // ms
-			stream_set_timeout($fp, 0, $timeout * 1000);
-			$query = $parts['path'] . ($parts['query'] ? '?' . $parts['query'] : '');
-			$out = 'GET ' . $query . " HTTP/1.1\r\n";
-			$out .= 'Host: ' . $host_sent . "\r\n";
-			$out .= "Connection: Close\r\n\r\n";
-			fwrite($fp, $out);
-			spip_timer('read');
-			$t = 0;
-			// on lit la reponse si possible pour fermer proprement la connexion
-			// avec un timeout total de 200ms pour ne pas se bloquer
-			while (!feof($fp) && $t < $timeout) {
-				@fgets($fp, 1024);
-				$t += spip_timer('read', true);
-				spip_timer('read');
-			}
-			fclose($fp);
-			return true;
-		}
-	}
-	// si fsockopen n'est pas dispo on essaye cURL :
-	// lancer le cron par un cURL asynchrone si cURL est present
-	elseif (function_exists('curl_init')) {
-		//setting the curl parameters.
-		$ch = curl_init($url_cron);
-		curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
-		// cf bug : http://www.php.net/manual/en/function.curl-setopt.php#104597
-		curl_setopt($ch, CURLOPT_NOSIGNAL, 1);
-		// valeur mini pour que la requete soit lancee
-		curl_setopt($ch, CURLOPT_TIMEOUT_MS, 200);
-		// lancer
-		curl_exec($ch);
-		// fermer
-		curl_close($ch);
-		return true;
-	}
-
-	return false;
+    // methode la plus rapide :
+    // Si fsockopen est possible, on lance le cron via un socket en asynchrone
+    // si fsockopen echoue (disponibilite serveur, firewall) on essaye pas cURL
+    // car on a toutes les chances d'echouer pareil mais sans moyen de le savoir
+    // mais on renvoie false direct
+    if (function_exists('fsockopen')) {
+        $parts = parse_url($url_cron);
+
+        switch ($parts['scheme']) {
+            case 'https':
+                $scheme = 'ssl://';
+                $port = 443;
+                break;
+            case 'http':
+            default:
+                $scheme = '';
+                $port = 80;
+        }
+        $fp = @fsockopen(
+            $scheme . $parts['host'],
+            $parts['port'] ?? $port,
+            $errno,
+            $errstr,
+            1
+        );
+
+        if ($fp) {
+            $host_sent = $parts['host'];
+            if (isset($parts['port']) && $parts['port'] !== $port) {
+                $host_sent .= ':' . $parts['port'];
+            }
+            $timeout = 200; // ms
+            stream_set_timeout($fp, 0, $timeout * 1000);
+            $query = $parts['path'] . ($parts['query'] ? '?' . $parts['query'] : '');
+            $out = 'GET ' . $query . " HTTP/1.1\r\n";
+            $out .= 'Host: ' . $host_sent . "\r\n";
+            $out .= "Connection: Close\r\n\r\n";
+            fwrite($fp, $out);
+            spip_timer('read');
+            $t = 0;
+            // on lit la reponse si possible pour fermer proprement la connexion
+            // avec un timeout total de 200ms pour ne pas se bloquer
+            while (!feof($fp) && $t < $timeout) {
+                @fgets($fp, 1024);
+                $t += spip_timer('read', true);
+                spip_timer('read');
+            }
+            fclose($fp);
+            return true;
+        }
+    }
+    // si fsockopen n'est pas dispo on essaye cURL :
+    // lancer le cron par un cURL asynchrone si cURL est present
+    elseif (function_exists('curl_init')) {
+        //setting the curl parameters.
+        $ch = curl_init($url_cron);
+        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+        // cf bug : http://www.php.net/manual/en/function.curl-setopt.php#104597
+        curl_setopt($ch, CURLOPT_NOSIGNAL, 1);
+        // valeur mini pour que la requete soit lancee
+        curl_setopt($ch, CURLOPT_TIMEOUT_MS, 200);
+        // lancer
+        curl_exec($ch);
+        // fermer
+        curl_close($ch);
+        return true;
+    }
+
+    return false;
 }

ecrire/inc/filtres.php

Indentation +2342 added lines, -2342 removed lines

@@ -20,7 +20,7 @@ 
  * @package SPIP\Core\Filtres
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -46,8 +46,8 @@ 
  * @return string Fonction PHP correspondante du filtre
  */
 function charger_filtre($fonc, $default = 'filtre_identite_dist') {
-	include_fichiers_fonctions(); // inclure les fichiers fonctions
-	return chercher_filtre($fonc, $default);
+    include_fichiers_fonctions(); // inclure les fichiers fonctions
+    return chercher_filtre($fonc, $default);
 }
 
 /**
@@ -57,7 +57,7 @@ 
  * @return string texte
  **/
 function filtre_identite_dist($texte) {
- return $texte;
+    return $texte;
 }
 
 /**
@@ -81,33 +81,33 @@ 
  *     Fonction PHP correspondante du filtre demandé
  */
 function chercher_filtre($fonc, $default = null) {
-	if (!$fonc) {
-		return $default;
-	}
-	// Cas des types mime, sans confondre avec les appels de fonction de classe
-	// Foo::Bar
-	// qui peuvent etre avec un namespace : space\Foo::Bar
-	if (preg_match(',^[\w]+/,', $fonc)) {
-		$nom = preg_replace(',\W,', '_', $fonc);
-		$f = chercher_filtre($nom);
-		// cas du sous-type MIME sans filtre associe, passer au type:
-		// si filtre_text_plain pas defini, passe a filtre_text
-		if (!$f && $nom !== $fonc) {
-			$f = chercher_filtre(preg_replace(',\W.*$,', '', $fonc));
-		}
-
-		return $f;
-	}
-
-	include_fichiers_fonctions();
-	foreach (['filtre_' . $fonc, 'filtre_' . $fonc . '_dist', $fonc] as $f) {
-		trouver_filtre_matrice($f); // charge des fichiers spécifiques éventuels
-		if (is_callable($f)) {
-			return $f;
-		}
-	}
-
-	return $default;
+    if (!$fonc) {
+        return $default;
+    }
+    // Cas des types mime, sans confondre avec les appels de fonction de classe
+    // Foo::Bar
+    // qui peuvent etre avec un namespace : space\Foo::Bar
+    if (preg_match(',^[\w]+/,', $fonc)) {
+        $nom = preg_replace(',\W,', '_', $fonc);
+        $f = chercher_filtre($nom);
+        // cas du sous-type MIME sans filtre associe, passer au type:
+        // si filtre_text_plain pas defini, passe a filtre_text
+        if (!$f && $nom !== $fonc) {
+            $f = chercher_filtre(preg_replace(',\W.*$,', '', $fonc));
+        }
+
+        return $f;
+    }
+
+    include_fichiers_fonctions();
+    foreach (['filtre_' . $fonc, 'filtre_' . $fonc . '_dist', $fonc] as $f) {
+        trouver_filtre_matrice($f); // charge des fichiers spécifiques éventuels
+        if (is_callable($f)) {
+            return $f;
+        }
+    }
+
+    return $default;
 }
 
 /**
@@ -151,8 +151,8 @@ 
  *     Chaîne vide sinon.
  **/
 function appliquer_filtre(mixed $arg, $filtre) {
-	$args = func_get_args();
-	return appliquer_filtre_sinon($arg, $filtre, $args, '');
+    $args = func_get_args();
+    return appliquer_filtre_sinon($arg, $filtre, $args, '');
 }
 
 /**
@@ -177,8 +177,8 @@ 
  *     texte d'origine sinon
  **/
 function appliquer_si_filtre(mixed $arg, $filtre) {
-	$args = func_get_args();
-	return appliquer_filtre_sinon($arg, $filtre, $args, $arg);
+    $args = func_get_args();
+    return appliquer_filtre_sinon($arg, $filtre, $args, $arg);
 }
 
 /**
@@ -194,12 +194,12 @@ 
  *     Version de SPIP
  **/
 function spip_version() {
-	$version = $GLOBALS['spip_version_affichee'];
-	if ($vcs_version = version_vcs_courante(_DIR_RACINE)) {
-		$version .= " $vcs_version";
-	}
+    $version = $GLOBALS['spip_version_affichee'];
+    if ($vcs_version = version_vcs_courante(_DIR_RACINE)) {
+        $version .= " $vcs_version";
+    }
 
-	return $version;
+    return $version;
 }
 
 /**
@@ -211,11 +211,11 @@ 
  * @return string
  */
 function header_silencieux($version): string {
-	if (isset($GLOBALS['spip_header_silencieux']) && (bool) $GLOBALS['spip_header_silencieux']) {
-		$version = '';
-	}
+    if (isset($GLOBALS['spip_header_silencieux']) && (bool) $GLOBALS['spip_header_silencieux']) {
+        $version = '';
+    }
 
-	return (string) $version;
+    return (string) $version;
 }
 
 /**
@@ -228,16 +228,16 @@ 
  *    - string|null si $raw = false
  */
 function version_vcs_courante($dir, $raw = false) {
-	$desc = decrire_version_git($dir);
-	if ($desc === null || $raw) {
-		return $desc;
-	}
-	// affichage "GIT [master: abcdef]"
-	$commit = $desc['commit_short'] ?? $desc['commit'];
-	if ($desc['branch']) {
-		$commit = $desc['branch'] . ': ' . $commit;
-	}
-	return "{$desc['vcs']} [$commit]";
+    $desc = decrire_version_git($dir);
+    if ($desc === null || $raw) {
+        return $desc;
+    }
+    // affichage "GIT [master: abcdef]"
+    $commit = $desc['commit_short'] ?? $desc['commit'];
+    if ($desc['branch']) {
+        $commit = $desc['branch'] . ': ' . $commit;
+    }
+    return "{$desc['vcs']} [$commit]";
 }
 
 /**
@@ -249,26 +249,26 @@ 
  *      array ['branch' => xx, 'commit' => yy] sinon.
  **/
 function decrire_version_git($dir) {
-	$c = null;
-	$hash = null;
-	if (!$dir) {
-		$dir = '.';
-	}
-
-	// version installee par GIT
-	if (lire_fichier($dir . '/.git/HEAD', $c)) {
-		$currentHead = trim(substr((string) $c, 4));
-		if (lire_fichier($dir . '/.git/' . $currentHead, $hash)) {
-			return [
-				'vcs' => 'GIT',
-				'branch' => basename($currentHead),
-				'commit' => trim((string) $hash),
-				'commit_short' => substr(trim((string) $hash), 0, 8),
-			];
-		}
-	}
-
-	return null;
+    $c = null;
+    $hash = null;
+    if (!$dir) {
+        $dir = '.';
+    }
+
+    // version installee par GIT
+    if (lire_fichier($dir . '/.git/HEAD', $c)) {
+        $currentHead = trim(substr((string) $c, 4));
+        if (lire_fichier($dir . '/.git/' . $currentHead, $hash)) {
+            return [
+                'vcs' => 'GIT',
+                'branch' => basename($currentHead),
+                'commit' => trim((string) $hash),
+                'commit_short' => substr(trim((string) $hash), 0, 8),
+            ];
+        }
+    }
+
+    return null;
 }
 
 // La matrice est necessaire pour ne filtrer _que_ des fonctions definies dans filtres_images
@@ -315,18 +315,18 @@ 
  *     Code HTML retourné par le filtre
  **/
 function filtrer($filtre) {
-	$tous = func_get_args();
-	if (trouver_filtre_matrice($filtre) && str_starts_with($filtre, 'image_')) {
-		return image_filtrer($tous);
-	} elseif ($f = chercher_filtre($filtre)) {
-		array_shift($tous);
-		return $f(...$tous);
-	} else {
-		// le filtre n'existe pas, on provoque une erreur
-		$msg = ['zbug_erreur_filtre', ['filtre' => texte_script($filtre)]];
-		erreur_squelette($msg);
-		return '';
-	}
+    $tous = func_get_args();
+    if (trouver_filtre_matrice($filtre) && str_starts_with($filtre, 'image_')) {
+        return image_filtrer($tous);
+    } elseif ($f = chercher_filtre($filtre)) {
+        array_shift($tous);
+        return $f(...$tous);
+    } else {
+        // le filtre n'existe pas, on provoque une erreur
+        $msg = ['zbug_erreur_filtre', ['filtre' => texte_script($filtre)]];
+        erreur_squelette($msg);
+        return '';
+    }
 }
 
 /**
@@ -343,11 +343,11 @@ 
  * @return bool true si on trouve le filtre dans la matrice, false sinon.
  */
 function trouver_filtre_matrice($filtre) {
-	if (isset($GLOBALS['spip_matrice'][$filtre]) && is_string($f = $GLOBALS['spip_matrice'][$filtre])) {
-		find_in_path($f, '', true);
-		$GLOBALS['spip_matrice'][$filtre] = true;
-	}
-	return !empty($GLOBALS['spip_matrice'][$filtre]);
+    if (isset($GLOBALS['spip_matrice'][$filtre]) && is_string($f = $GLOBALS['spip_matrice'][$filtre])) {
+        find_in_path($f, '', true);
+        $GLOBALS['spip_matrice'][$filtre] = true;
+    }
+    return !empty($GLOBALS['spip_matrice'][$filtre]);
 }
 
 
@@ -375,8 +375,8 @@ 
  * @return mixed
  */
 function filtre_set(&$Pile, mixed $val, $key, $continue = null) {
-	$Pile['vars'][$key] = $val;
-	return $continue ? $val : '';
+    $Pile['vars'][$key] = $val;
+    return $continue ? $val : '';
 }
 
 /**
@@ -402,8 +402,8 @@ 
  * @return string|mixed Retourne `$val` si `$continue` présent, sinon ''.
  */
 function filtre_setenv(&$Pile, mixed $val, mixed $key, $continue = null) {
-	$Pile[0][$key] = $val;
-	return $continue ? $val : '';
+    $Pile[0][$key] = $val;
+    return $continue ? $val : '';
 }
 
 /**
@@ -412,8 +412,8 @@ 
  * @return string
  */
 function filtre_sanitize_env(&$Pile, $keys) {
-	$Pile[0] = spip_sanitize_from_request($Pile[0], $keys);
-	return '';
+    $Pile[0] = spip_sanitize_from_request($Pile[0], $keys);
+    return '';
 }
 
 
@@ -436,18 +436,18 @@ 
  * @return mixed Retourne la valeur (sans la modifier).
  */
 function filtre_debug(mixed $val, $key = null) {
-	$debug = (
-		is_null($key) ? '' : (var_export($key, true) . ' = ')
-		) . var_export($val, true);
+    $debug = (
+        is_null($key) ? '' : (var_export($key, true) . ' = ')
+        ) . var_export($val, true);
 
-	include_spip('inc/autoriser');
-	if (autoriser('webmestre')) {
-		echo "<div class='spip_debug'>\n", $debug, "</div>\n";
-	}
+    include_spip('inc/autoriser');
+    if (autoriser('webmestre')) {
+        echo "<div class='spip_debug'>\n", $debug, "</div>\n";
+    }
 
-	spip_log($debug, 'debug');
+    spip_log($debug, 'debug');
 
-	return $val;
+    return $val;
 }
 
 
@@ -477,81 +477,81 @@ 
  *     texte qui a reçu les filtres
  **/
 function image_filtrer($args) {
-	$filtre = array_shift($args); # enlever $filtre
-	$texte = array_shift($args);
-	if ($texte === null || !strlen((string) $texte)) {
-		return '';
-	}
-	find_in_path('filtres_images_mini.php', 'inc/', true);
-	statut_effacer_images_temporaires(true); // activer la suppression des images temporaires car le compilo finit la chaine par un image_graver
-	// Cas du nom de fichier local
-	$is_file = trim((string) $texte);
-	if (
-		str_contains(substr($is_file, strlen(_DIR_RACINE)), '..')
-		|| strpbrk($is_file, "<>\n\r\t") !== false
-		|| str_starts_with($is_file, '/')
-	) {
-		$is_file = false;
-	}
-	if ($is_file) {
-		$is_local_file = function ($path) {
-			if (str_contains($path, '?')) {
-				$path = supprimer_timestamp($path);
-				// remove ?24px added by find_in_theme on .svg files
-				$path = preg_replace(',\?[[:digit:]]+(px)$,', '', $path);
-			}
-			return file_exists($path);
-		};
-		if ($is_local_file($is_file) || tester_url_absolue($is_file)) {
-			$res = $filtre("<img src='$is_file' />", ...$args);
-			statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
-			return $res;
-		}
-	}
-
-	// Cas general : trier toutes les images, avec eventuellement leur <span>
-	if (
-		preg_match_all(
-			',(<([a-z]+) [^<>]*spip_documents[^<>]*>)?\s*(<img\s.*>),UimsS',
-			(string) $texte,
-			$tags,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($tags as $tag) {
-			$class = extraire_attribut($tag[3], 'class');
-			if (
-				(!$class || !str_contains($class, 'filtre_inactif'))
-				&& ($reduit = $filtre($tag[3], ...$args))
-			) {
-				// En cas de span spip_documents, modifier le style=...width:
-				if ($tag[1]) {
-					$w = extraire_attribut($reduit, 'width');
-					if (!$w && preg_match(',width:\s*(\d+)px,S', extraire_attribut($reduit, 'style'), $regs)) {
-						$w = $regs[1];
-					}
-					if ($w && ($style = extraire_attribut($tag[1], 'style'))) {
-						$style = preg_replace(',width:\s*\d+px,S', "width:{$w}px", $style);
-						$replace = inserer_attribut($tag[1], 'style', $style);
-						$texte = str_replace($tag[1], $replace, (string) $texte);
-					}
-				}
-				// traiter aussi un eventuel mouseover
-				if (
-					($mouseover = extraire_attribut($reduit, 'onmouseover'))
-					&& preg_match(",this[.]src=['\"]([^'\"]+)['\"],ims", $mouseover, $match)
-				) {
-					$srcover = $match[1];
-					$srcover_filter = $filtre("<img src='" . $match[1] . "' />", ...$args);
-					$srcover_filter = extraire_attribut($srcover_filter, 'src');
-					$reduit = str_replace($srcover, $srcover_filter, (string) $reduit);
-				}
-				$texte = str_replace($tag[3], $reduit, (string) $texte);
-			}
-		}
-	}
-	statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
-	return $texte;
+    $filtre = array_shift($args); # enlever $filtre
+    $texte = array_shift($args);
+    if ($texte === null || !strlen((string) $texte)) {
+        return '';
+    }
+    find_in_path('filtres_images_mini.php', 'inc/', true);
+    statut_effacer_images_temporaires(true); // activer la suppression des images temporaires car le compilo finit la chaine par un image_graver
+    // Cas du nom de fichier local
+    $is_file = trim((string) $texte);
+    if (
+        str_contains(substr($is_file, strlen(_DIR_RACINE)), '..')
+        || strpbrk($is_file, "<>\n\r\t") !== false
+        || str_starts_with($is_file, '/')
+    ) {
+        $is_file = false;
+    }
+    if ($is_file) {
+        $is_local_file = function ($path) {
+            if (str_contains($path, '?')) {
+                $path = supprimer_timestamp($path);
+                // remove ?24px added by find_in_theme on .svg files
+                $path = preg_replace(',\?[[:digit:]]+(px)$,', '', $path);
+            }
+            return file_exists($path);
+        };
+        if ($is_local_file($is_file) || tester_url_absolue($is_file)) {
+            $res = $filtre("<img src='$is_file' />", ...$args);
+            statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
+            return $res;
+        }
+    }
+
+    // Cas general : trier toutes les images, avec eventuellement leur <span>
+    if (
+        preg_match_all(
+            ',(<([a-z]+) [^<>]*spip_documents[^<>]*>)?\s*(<img\s.*>),UimsS',
+            (string) $texte,
+            $tags,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($tags as $tag) {
+            $class = extraire_attribut($tag[3], 'class');
+            if (
+                (!$class || !str_contains($class, 'filtre_inactif'))
+                && ($reduit = $filtre($tag[3], ...$args))
+            ) {
+                // En cas de span spip_documents, modifier le style=...width:
+                if ($tag[1]) {
+                    $w = extraire_attribut($reduit, 'width');
+                    if (!$w && preg_match(',width:\s*(\d+)px,S', extraire_attribut($reduit, 'style'), $regs)) {
+                        $w = $regs[1];
+                    }
+                    if ($w && ($style = extraire_attribut($tag[1], 'style'))) {
+                        $style = preg_replace(',width:\s*\d+px,S', "width:{$w}px", $style);
+                        $replace = inserer_attribut($tag[1], 'style', $style);
+                        $texte = str_replace($tag[1], $replace, (string) $texte);
+                    }
+                }
+                // traiter aussi un eventuel mouseover
+                if (
+                    ($mouseover = extraire_attribut($reduit, 'onmouseover'))
+                    && preg_match(",this[.]src=['\"]([^'\"]+)['\"],ims", $mouseover, $match)
+                ) {
+                    $srcover = $match[1];
+                    $srcover_filter = $filtre("<img src='" . $match[1] . "' />", ...$args);
+                    $srcover_filter = extraire_attribut($srcover_filter, 'src');
+                    $reduit = str_replace($srcover, $srcover_filter, (string) $reduit);
+                }
+                $texte = str_replace($tag[3], $reduit, (string) $texte);
+            }
+        }
+    }
+    statut_effacer_images_temporaires(false); // desactiver pour les appels hors compilo
+    return $texte;
 }
 
 /**
@@ -568,94 +568,94 @@ 
  **/
 function infos_image($img, $force_refresh = false) {
 
-	static $largeur_img = [], $hauteur_img = [], $poids_img = [];
-	$srcWidth = 0;
-	$srcHeight = 0;
-	$srcSize = null;
-	$valeurs = null;
-
-	$src = extraire_attribut($img, 'src');
-
-	if (!$src) {
-		$src = $img;
-	} else {
-		$srcWidth = extraire_attribut($img, 'width');
-		$srcHeight = extraire_attribut($img, 'height');
-		if (!ctype_digit((string) $srcWidth) || !ctype_digit((string) $srcHeight)) {
-			$srcWidth = $srcHeight = 0;
-		}
-	}
-
-	// ne jamais operer directement sur une image distante pour des raisons de perfo
-	// la copie locale a toutes les chances d'etre la ou de resservir
-	if (tester_url_absolue($src)) {
-		include_spip('inc/distant');
-		$fichier = copie_locale($src);
-		$src = $fichier ? _DIR_RACINE . $fichier : $src;
-	}
-	if (($p = strpos($src, '?')) !== false) {
-		$src = substr($src, 0, $p);
-	}
-
-	$imagesize = false;
-	if (isset($largeur_img[$src]) && !$force_refresh) {
-		$srcWidth = $largeur_img[$src];
-	}
-	if (isset($hauteur_img[$src]) && !$force_refresh) {
-		$srcHeight = $hauteur_img[$src];
-	}
-	if (isset($poids_img[$src]) && !$force_refresh) {
-		$srcSize = $poids_img[$src];
-	}
-	if (!$srcWidth || !$srcHeight || is_null($srcSize)) {
-		if (
-			file_exists($src) && ($imagesize = spip_getimagesize($src))
-		) {
-			if (!$srcWidth) {
-				$largeur_img[$src] = $srcWidth = $imagesize[0];
-			}
-			if (!$srcHeight) {
-				$hauteur_img[$src] = $srcHeight = $imagesize[1];
-			}
-			if (!$srcSize) {
-				$poids_img[$src] = filesize($src);
-			}
-		}
-		elseif (str_contains($src, '<svg')) {
-			include_spip('inc/svg');
-			if ($attrs = svg_lire_attributs($src)) {
-				[$width, $height, $viewbox] = svg_getimagesize_from_attr($attrs);
-				if (!$srcWidth) {
-					$largeur_img[$src] = $srcWidth = $width;
-				}
-				if (!$srcHeight) {
-					$hauteur_img[$src] = $srcHeight = $height;
-				}
-				if (!$srcSize) {
-					$poids_img[$src] = $srcSize = strlen($src);
-				}
-			}
-		}
-		// $src peut etre une reference a une image temporaire dont a n'a que le log .src
-		// on s'y refere, l'image sera reconstruite en temps utile si necessaire
-		elseif (
-			@file_exists($f = "$src.src")
-			&& lire_fichier($f, $valeurs)
-			&& ($valeurs = unserialize($valeurs))
-		) {
-			if (!$srcWidth) {
-				$largeur_img[$src] = $srcWidth = $valeurs['largeur_dest'];
-			}
-			if (!$srcHeight) {
-				$hauteur_img[$src] = $srcHeight = $valeurs['hauteur_dest'];
-			}
-			if (!$srcSize) {
-				$poids_img[$src] = $srcSize = 0;
-			}
-		}
-	}
-
-	return ['hauteur' => $srcHeight, 'largeur' => $srcWidth, 'poids' => $srcSize];
+    static $largeur_img = [], $hauteur_img = [], $poids_img = [];
+    $srcWidth = 0;
+    $srcHeight = 0;
+    $srcSize = null;
+    $valeurs = null;
+
+    $src = extraire_attribut($img, 'src');
+
+    if (!$src) {
+        $src = $img;
+    } else {
+        $srcWidth = extraire_attribut($img, 'width');
+        $srcHeight = extraire_attribut($img, 'height');
+        if (!ctype_digit((string) $srcWidth) || !ctype_digit((string) $srcHeight)) {
+            $srcWidth = $srcHeight = 0;
+        }
+    }
+
+    // ne jamais operer directement sur une image distante pour des raisons de perfo
+    // la copie locale a toutes les chances d'etre la ou de resservir
+    if (tester_url_absolue($src)) {
+        include_spip('inc/distant');
+        $fichier = copie_locale($src);
+        $src = $fichier ? _DIR_RACINE . $fichier : $src;
+    }
+    if (($p = strpos($src, '?')) !== false) {
+        $src = substr($src, 0, $p);
+    }
+
+    $imagesize = false;
+    if (isset($largeur_img[$src]) && !$force_refresh) {
+        $srcWidth = $largeur_img[$src];
+    }
+    if (isset($hauteur_img[$src]) && !$force_refresh) {
+        $srcHeight = $hauteur_img[$src];
+    }
+    if (isset($poids_img[$src]) && !$force_refresh) {
+        $srcSize = $poids_img[$src];
+    }
+    if (!$srcWidth || !$srcHeight || is_null($srcSize)) {
+        if (
+            file_exists($src) && ($imagesize = spip_getimagesize($src))
+        ) {
+            if (!$srcWidth) {
+                $largeur_img[$src] = $srcWidth = $imagesize[0];
+            }
+            if (!$srcHeight) {
+                $hauteur_img[$src] = $srcHeight = $imagesize[1];
+            }
+            if (!$srcSize) {
+                $poids_img[$src] = filesize($src);
+            }
+        }
+        elseif (str_contains($src, '<svg')) {
+            include_spip('inc/svg');
+            if ($attrs = svg_lire_attributs($src)) {
+                [$width, $height, $viewbox] = svg_getimagesize_from_attr($attrs);
+                if (!$srcWidth) {
+                    $largeur_img[$src] = $srcWidth = $width;
+                }
+                if (!$srcHeight) {
+                    $hauteur_img[$src] = $srcHeight = $height;
+                }
+                if (!$srcSize) {
+                    $poids_img[$src] = $srcSize = strlen($src);
+                }
+            }
+        }
+        // $src peut etre une reference a une image temporaire dont a n'a que le log .src
+        // on s'y refere, l'image sera reconstruite en temps utile si necessaire
+        elseif (
+            @file_exists($f = "$src.src")
+            && lire_fichier($f, $valeurs)
+            && ($valeurs = unserialize($valeurs))
+        ) {
+            if (!$srcWidth) {
+                $largeur_img[$src] = $srcWidth = $valeurs['largeur_dest'];
+            }
+            if (!$srcHeight) {
+                $hauteur_img[$src] = $srcHeight = $valeurs['hauteur_dest'];
+            }
+            if (!$srcSize) {
+                $poids_img[$src] = $srcSize = 0;
+            }
+        }
+    }
+
+    return ['hauteur' => $srcHeight, 'largeur' => $srcWidth, 'poids' => $srcSize];
 }
 
 /**
@@ -671,13 +671,13 @@ 
  *     poids
  **/
 function poids_image($img, $force_refresh = false) {
-	$infos = infos_image($img, $force_refresh);
-	return $infos['poids'];
+    $infos = infos_image($img, $force_refresh);
+    return $infos['poids'];
 }
 
 function taille_image($img, $force_refresh = false) {
-	$infos = infos_image($img, $force_refresh);
-	return [$infos['hauteur'], $infos['largeur']];
+    $infos = infos_image($img, $force_refresh);
+    return [$infos['hauteur'], $infos['largeur']];
 }
 
 /**
@@ -694,12 +694,12 @@ 
  *     Largeur en pixels, NULL ou 0 si aucune image.
  **/
 function largeur($img) {
-	if (!$img) {
-		return;
-	}
-	[$h, $l] = taille_image($img);
+    if (!$img) {
+        return;
+    }
+    [$h, $l] = taille_image($img);
 
-	return $l;
+    return $l;
 }
 
 /**
@@ -716,12 +716,12 @@ 
  *     Hauteur en pixels, NULL ou 0 si aucune image.
  **/
 function hauteur($img) {
-	if (!$img) {
-		return;
-	}
-	[$h, $l] = taille_image($img);
+    if (!$img) {
+        return;
+    }
+    [$h, $l] = taille_image($img);
 
-	return $h;
+    return $h;
 }
 
 
@@ -741,11 +741,11 @@ 
  * @return string
  **/
 function corriger_entites_html($texte) {
-	if (!str_contains($texte, '&amp;')) {
-		return $texte;
-	}
+    if (!str_contains($texte, '&amp;')) {
+        return $texte;
+    }
 
-	return preg_replace(',&amp;(#\d\d\d+;|amp;),iS', '&\1', $texte);
+    return preg_replace(',&amp;(#\d\d\d+;|amp;),iS', '&\1', $texte);
 }
 
 /**
@@ -760,11 +760,11 @@ 
  * @return string
  **/
 function corriger_toutes_entites_html($texte) {
-	if (!str_contains($texte, '&amp;')) {
-		return $texte;
-	}
+    if (!str_contains($texte, '&amp;')) {
+        return $texte;
+    }
 
-	return preg_replace(',&amp;(#?[a-z0-9]+;),iS', '&\1', $texte);
+    return preg_replace(',&amp;(#?[a-z0-9]+;),iS', '&\1', $texte);
 }
 
 /**
@@ -774,7 +774,7 @@ 
  * @return string
  **/
 function proteger_amp($texte) {
-	return str_replace('&', '&amp;', $texte);
+    return str_replace('&', '&amp;', $texte);
 }
 
 
@@ -805,20 +805,20 @@ 
  * @return mixed|string
  */
 function entites_html($texte, $tout = false, $quote = true) {
-	if (!is_string($texte) || !$texte || strpbrk($texte, "&\"'<>") == false) {
-		return $texte;
-	}
-	include_spip('inc/texte');
-	$flags = ($quote ? ENT_QUOTES : ENT_NOQUOTES);
-	$flags |= ENT_HTML401;
-	$texte = CollecteurHtmlTag::proteger_balisesHtml($texte);
-	$texte = CollecteurHtmlTag::retablir_depuisHtmlBase64($texte, '', 'proteger_amp');
-	$texte = spip_htmlspecialchars($texte, $flags);
-	if ($tout) {
-		return corriger_toutes_entites_html($texte);
-	} else {
-		return corriger_entites_html($texte);
-	}
+    if (!is_string($texte) || !$texte || strpbrk($texte, "&\"'<>") == false) {
+        return $texte;
+    }
+    include_spip('inc/texte');
+    $flags = ($quote ? ENT_QUOTES : ENT_NOQUOTES);
+    $flags |= ENT_HTML401;
+    $texte = CollecteurHtmlTag::proteger_balisesHtml($texte);
+    $texte = CollecteurHtmlTag::retablir_depuisHtmlBase64($texte, '', 'proteger_amp');
+    $texte = spip_htmlspecialchars($texte, $flags);
+    if ($tout) {
+        return corriger_toutes_entites_html($texte);
+    } else {
+        return corriger_entites_html($texte);
+    }
 }
 
 /**
@@ -837,38 +837,38 @@ 
  *     texte converti
  **/
 function filtrer_entites(?string $texte): string {
-	$texte ??= '';
-	if (!str_contains($texte, '&')) {
-		return $texte;
-	}
-	// filtrer
-	$texte = html2unicode($texte);
-	// remettre le tout dans le charset cible
-	$texte = unicode2charset($texte);
-	// cas particulier des " et ' qu'il faut filtrer aussi
-	// (on le faisait deja avec un &quot;)
-	if (str_contains($texte, '&#')) {
-		$texte = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $texte);
-	}
+    $texte ??= '';
+    if (!str_contains($texte, '&')) {
+        return $texte;
+    }
+    // filtrer
+    $texte = html2unicode($texte);
+    // remettre le tout dans le charset cible
+    $texte = unicode2charset($texte);
+    // cas particulier des " et ' qu'il faut filtrer aussi
+    // (on le faisait deja avec un &quot;)
+    if (str_contains($texte, '&#')) {
+        $texte = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
 if (!function_exists('filtre_filtrer_entites_dist')) {
-	/**
-	 * Version sécurisée de filtrer_entites
-	 *
-	 * @uses interdire_scripts()
-	 * @uses filtrer_entites()
-	 *
-	 * @param string $t
-	 * @return string
-	 */
-	function filtre_filtrer_entites_dist($t) {
-		include_spip('inc/texte');
-		return interdire_scripts(filtrer_entites($t));
-	}
+    /**
+     * Version sécurisée de filtrer_entites
+     *
+     * @uses interdire_scripts()
+     * @uses filtrer_entites()
+     *
+     * @param string $t
+     * @return string
+     */
+    function filtre_filtrer_entites_dist($t) {
+        include_spip('inc/texte');
+        return interdire_scripts(filtrer_entites($t));
+    }
 }
 
 
@@ -883,18 +883,18 @@ 
  * @return string|array
  **/
 function supprimer_caracteres_illegaux($texte) {
-	static $from = "\x0\x1\x2\x3\x4\x5\x6\x7\x8\xB\xC\xE\xF\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1A\x1B\x1C\x1D\x1E\x1F";
-	static $to = null;
+    static $from = "\x0\x1\x2\x3\x4\x5\x6\x7\x8\xB\xC\xE\xF\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1A\x1B\x1C\x1D\x1E\x1F";
+    static $to = null;
 
-	if (is_array($texte)) {
-		return array_map('supprimer_caracteres_illegaux', $texte);
-	}
+    if (is_array($texte)) {
+        return array_map('supprimer_caracteres_illegaux', $texte);
+    }
 
-	if (!$to) {
-		$to = str_repeat('-', strlen((string) $from));
-	}
+    if (!$to) {
+        $to = str_repeat('-', strlen((string) $from));
+    }
 
-	return strtr($texte, $from, $to);
+    return strtr($texte, $from, $to);
 }
 
 /**
@@ -906,9 +906,9 @@ 
  * @return string|array
  **/
 function corriger_caracteres($texte) {
-	$texte = corriger_caracteres_windows($texte);
+    $texte = corriger_caracteres_windows($texte);
 
-	return supprimer_caracteres_illegaux($texte);
+    return supprimer_caracteres_illegaux($texte);
 }
 
 /**
@@ -925,44 +925,44 @@ 
  *     texte encodé pour XML
  */
 function texte_backend(?string $texte): string {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
+    if ($texte === null || $texte === '') {
+        return '';
+    }
 
-	static $apostrophe = ['&#8217;', "'"]; # n'allouer qu'une fois
+    static $apostrophe = ['&#8217;', "'"]; # n'allouer qu'une fois
 
-	// si on a des liens ou des images, les passer en absolu
-	$texte = liens_absolus($texte);
+    // si on a des liens ou des images, les passer en absolu
+    $texte = liens_absolus($texte);
 
-	// echapper les tags &gt; &lt;
-	$texte = preg_replace(',&(gt|lt);,S', '&amp;\1;', $texte);
+    // echapper les tags &gt; &lt;
+    $texte = preg_replace(',&(gt|lt);,S', '&amp;\1;', $texte);
 
-	// importer les &eacute;
-	$texte = filtrer_entites($texte);
+    // importer les &eacute;
+    $texte = filtrer_entites($texte);
 
-	// " -> &quot; et tout ce genre de choses
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = str_replace('&nbsp;', ' ', $texte);
-	$texte = preg_replace('/\s{2,}/S' . $u, ' ', $texte);
-	// ne pas echapper les sinqle quotes car certains outils de syndication gerent mal
-	$texte = entites_html($texte, false, false);
-	// mais bien echapper les double quotes !
-	$texte = str_replace('"', '&#034;', (string) $texte);
+    // " -> &quot; et tout ce genre de choses
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = str_replace('&nbsp;', ' ', $texte);
+    $texte = preg_replace('/\s{2,}/S' . $u, ' ', $texte);
+    // ne pas echapper les sinqle quotes car certains outils de syndication gerent mal
+    $texte = entites_html($texte, false, false);
+    // mais bien echapper les double quotes !
+    $texte = str_replace('"', '&#034;', (string) $texte);
 
-	// verifier le charset
-	$texte = charset2unicode($texte);
+    // verifier le charset
+    $texte = charset2unicode($texte);
 
-	// Caracteres problematiques en iso-latin 1
-	if (isset($GLOBALS['meta']['charset']) && $GLOBALS['meta']['charset'] == 'iso-8859-1') {
-		$texte = str_replace(chr(156), '&#156;', $texte);
-		$texte = str_replace(chr(140), '&#140;', $texte);
-		$texte = str_replace(chr(159), '&#159;', $texte);
-	}
+    // Caracteres problematiques en iso-latin 1
+    if (isset($GLOBALS['meta']['charset']) && $GLOBALS['meta']['charset'] == 'iso-8859-1') {
+        $texte = str_replace(chr(156), '&#156;', $texte);
+        $texte = str_replace(chr(140), '&#140;', $texte);
+        $texte = str_replace(chr(159), '&#159;', $texte);
+    }
 
-	// l'apostrophe curly pose probleme a certains lecteure de RSS
-	// et le caractere apostrophe alourdit les squelettes avec PHP
-	// ==> on les remplace par l'entite HTML
-	return str_replace($apostrophe, "'", $texte);
+    // l'apostrophe curly pose probleme a certains lecteure de RSS
+    // et le caractere apostrophe alourdit les squelettes avec PHP
+    // ==> on les remplace par l'entite HTML
+    return str_replace($apostrophe, "'", $texte);
 }
 
 /**
@@ -979,7 +979,7 @@ 
  *     texte encodé et quote pour XML
  */
 function texte_backendq(?string $texte): string {
-	return addslashes(texte_backend($texte));
+    return addslashes(texte_backend($texte));
 }
 
 
@@ -1001,14 +1001,14 @@ 
  *     Texte sans son numéro éventuel
  **/
 function supprimer_numero(?string $texte): string {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	return preg_replace(
-		',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
-		'',
-		$texte
-	);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    return preg_replace(
+        ',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
+        '',
+        $texte
+    );
 }
 
 /**
@@ -1031,19 +1031,19 @@ 
  *     Numéro de titre, sinon chaîne vide
  **/
 function recuperer_numero(?string $texte): string {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	if (preg_match(
-			',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
-			$texte,
-			$regs
-		)
-	) {
-		return (string) $regs[1];
-	}
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    if (preg_match(
+            ',^[[:space:]]*([0-9]+)([.)]|' . chr(194) . '?' . chr(176) . ')[[:space:]]+,S',
+            $texte,
+            $regs
+        )
+    ) {
+        return (string) $regs[1];
+    }
 
-	return '';
+    return '';
 }
 
 /**
@@ -1070,16 +1070,16 @@ 
  *     texte ou tableau de textes converti
  **/
 function supprimer_tags($texte, $rempl = '') {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	$texte = preg_replace(',<(!--|\w|/|!\[endif|!\[if)[^>]*>,US', $rempl, $texte);
-	// ne pas oublier un < final non ferme car coupe
-	$texte = preg_replace(',<(!--|\w|/).*$,US', $rempl, $texte);
-	// mais qui peut aussi etre un simple signe plus petit que
-	$texte = str_replace('<', '&lt;', $texte);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    $texte = preg_replace(',<(!--|\w|/|!\[endif|!\[if)[^>]*>,US', $rempl, $texte);
+    // ne pas oublier un < final non ferme car coupe
+    $texte = preg_replace(',<(!--|\w|/).*$,US', $rempl, $texte);
+    // mais qui peut aussi etre un simple signe plus petit que
+    $texte = str_replace('<', '&lt;', $texte);
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -1102,7 +1102,7 @@ 
  *     texte converti
  **/
 function echapper_tags($texte, $rempl = '') {
-	return preg_replace('/<([^>]*)>/', "&lt;\\1&gt;", $texte);
+    return preg_replace('/<([^>]*)>/', "&lt;\\1&gt;", $texte);
 }
 
 /**
@@ -1123,21 +1123,21 @@ 
  *     texte converti
  **/
 function textebrut($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = preg_replace('/\s+/S' . $u, ' ', $texte);
-	$texte = preg_replace('/<(p|br)( [^>]*)?>/iS', "\n\n", $texte);
-	$texte = preg_replace("/^\n+/", '', $texte);
-	$texte = preg_replace("/\n+$/", '', $texte);
-	$texte = preg_replace("/\n +/", "\n", $texte);
-	$texte = supprimer_tags($texte);
-	$texte = preg_replace('/(&nbsp;| )+/S', ' ', $texte);
-	// nettoyer l'apostrophe curly qui pose probleme a certains rss-readers, lecteurs de mail...
-	$texte = str_replace('&#8217;', "'", $texte);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = preg_replace('/\s+/S' . $u, ' ', $texte);
+    $texte = preg_replace('/<(p|br)( [^>]*)?>/iS', "\n\n", $texte);
+    $texte = preg_replace("/^\n+/", '', $texte);
+    $texte = preg_replace("/\n+$/", '', $texte);
+    $texte = preg_replace("/\n +/", "\n", $texte);
+    $texte = supprimer_tags($texte);
+    $texte = preg_replace('/(&nbsp;| )+/S', ' ', $texte);
+    // nettoyer l'apostrophe curly qui pose probleme a certains rss-readers, lecteurs de mail...
+    $texte = str_replace('&#8217;', "'", $texte);
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -1153,26 +1153,26 @@ 
  *     texte avec liens ouvrants
  **/
 function liens_ouvrants($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	if (
-		preg_match_all(
-			",(<a\s+[^>]*https?://[^>]*class=[\"']spip_(out|url)\b[^>]+>),imsS",
-			$texte,
-			$liens,
-			PREG_PATTERN_ORDER
-		)
-	) {
-		foreach ($liens[0] as $a) {
-			$rel = 'noopener noreferrer ' . extraire_attribut($a, 'rel');
-			$ablank = inserer_attribut($a, 'rel', $rel);
-			$ablank = inserer_attribut($ablank, 'target', '_blank');
-			$texte = str_replace($a, $ablank, $texte);
-		}
-	}
-
-	return $texte;
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    if (
+        preg_match_all(
+            ",(<a\s+[^>]*https?://[^>]*class=[\"']spip_(out|url)\b[^>]+>),imsS",
+            $texte,
+            $liens,
+            PREG_PATTERN_ORDER
+        )
+    ) {
+        foreach ($liens[0] as $a) {
+            $rel = 'noopener noreferrer ' . extraire_attribut($a, 'rel');
+            $ablank = inserer_attribut($a, 'rel', $rel);
+            $ablank = inserer_attribut($ablank, 'target', '_blank');
+            $texte = str_replace($a, $ablank, $texte);
+        }
+    }
+
+    return $texte;
 }
 
 /**
@@ -1182,25 +1182,25 @@ 
  * @return string
  */
 function liens_nofollow($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	if (stripos($texte, '<a') === false) {
-		return $texte;
-	}
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    if (stripos($texte, '<a') === false) {
+        return $texte;
+    }
 
-	if (preg_match_all(",<a\b[^>]*>,UimsS", $texte, $regs, PREG_PATTERN_ORDER)) {
-		foreach ($regs[0] as $a) {
-			$rel = extraire_attribut($a, 'rel') ?? '';
-			if (!str_contains($rel, 'nofollow')) {
-				$rel = 'nofollow' . ($rel ? " $rel" : '');
-				$anofollow = inserer_attribut($a, 'rel', $rel);
-				$texte = str_replace($a, $anofollow, $texte);
-			}
-		}
-	}
+    if (preg_match_all(",<a\b[^>]*>,UimsS", $texte, $regs, PREG_PATTERN_ORDER)) {
+        foreach ($regs[0] as $a) {
+            $rel = extraire_attribut($a, 'rel') ?? '';
+            if (!str_contains($rel, 'nofollow')) {
+                $rel = 'nofollow' . ($rel ? " $rel" : '');
+                $anofollow = inserer_attribut($a, 'rel', $rel);
+                $texte = str_replace($a, $anofollow, $texte);
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -1219,14 +1219,14 @@ 
  *     texte sans paraghaphes
  **/
 function PtoBR($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	$u = $GLOBALS['meta']['pcre_u'];
-	$texte = preg_replace('@</p>@iS', "\n", $texte);
-	$texte = preg_replace("@<p\b.*>@UiS", '<br />', $texte);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    $u = $GLOBALS['meta']['pcre_u'];
+    $texte = preg_replace('@</p>@iS', "\n", $texte);
+    $texte = preg_replace("@<p\b.*>@UiS", '<br />', $texte);
 
-	return preg_replace('@^\s*<br />@S' . $u, '', $texte);
+    return preg_replace('@^\s*<br />@S' . $u, '', $texte);
 }
 
 /**
@@ -1245,30 +1245,30 @@ 
  * @return string texte en majuscule
  */
 function majuscules($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
+    if ($texte === null || $texte === '') {
+        return '';
+    }
 
-	// Cas du turc
-	if ($GLOBALS['spip_lang'] == 'tr') {
-		# remplacer hors des tags et des entites
-		if (preg_match_all(',<[^<>]+>|&[^;]+;,S', $texte, $regs, PREG_SET_ORDER)) {
-			foreach ($regs as $n => $match) {
-				$texte = str_replace($match[0], "@@SPIP_TURC$n@@", $texte);
-			}
-		}
+    // Cas du turc
+    if ($GLOBALS['spip_lang'] == 'tr') {
+        # remplacer hors des tags et des entites
+        if (preg_match_all(',<[^<>]+>|&[^;]+;,S', $texte, $regs, PREG_SET_ORDER)) {
+            foreach ($regs as $n => $match) {
+                $texte = str_replace($match[0], "@@SPIP_TURC$n@@", $texte);
+            }
+        }
 
-		$texte = str_replace('i', '&#304;', $texte);
+        $texte = str_replace('i', '&#304;', $texte);
 
-		if ($regs) {
-			foreach ($regs as $n => $match) {
-				$texte = str_replace("@@SPIP_TURC$n@@", $match[0], $texte);
-			}
-		}
-	}
+        if ($regs) {
+            foreach ($regs as $n => $match) {
+                $texte = str_replace("@@SPIP_TURC$n@@", $match[0], $texte);
+            }
+        }
+    }
 
-	// Cas general
-	return "<span style='text-transform: uppercase;'>$texte</span>";
+    // Cas general
+    return "<span style='text-transform: uppercase;'>$texte</span>";
 }
 
 /**
@@ -1290,38 +1290,38 @@ 
  */
 function taille_en_octets($octets, $systeme = 'BI') {
 
-	// Texte à afficher pour la taille
-	$affichage = '';
+    // Texte à afficher pour la taille
+    $affichage = '';
 
-	static $unites = ['octets', 'ko', 'mo', 'go'];
-	static $precisions = [0, 1, 1, 2];
+    static $unites = ['octets', 'ko', 'mo', 'go'];
+    static $precisions = [0, 1, 1, 2];
 
-	if ($octets >= 1) {
-		// Déterminer le nombre d'octets représentant le kilo en fonction du système choisi
-		$systeme = strtolower($systeme);
-		if ($systeme === 'bi') {
-			$kilo = 1024;
-			$suffixe_item = "_$systeme";
-		} elseif ($systeme === 'si') {
-			$kilo = 1000;
-			$suffixe_item = '';
-		} else {
-			return $affichage;
-		}
+    if ($octets >= 1) {
+        // Déterminer le nombre d'octets représentant le kilo en fonction du système choisi
+        $systeme = strtolower($systeme);
+        if ($systeme === 'bi') {
+            $kilo = 1024;
+            $suffixe_item = "_$systeme";
+        } elseif ($systeme === 'si') {
+            $kilo = 1000;
+            $suffixe_item = '';
+        } else {
+            return $affichage;
+        }
 
-		// Identification de la puissance en "kilo" correspondant à l'unité la plus appropriée
-		$puissance = floor(log($octets, $kilo));
+        // Identification de la puissance en "kilo" correspondant à l'unité la plus appropriée
+        $puissance = floor(log($octets, $kilo));
 
-		// Calcul de la taille et choix de l'unité
-		$affichage = _T(
-			'spip:taille_' . $unites[$puissance] . $suffixe_item,
-			[
-				'taille' => round($octets / $kilo ** $puissance, $precisions[$puissance])
-			]
-		);
-	}
+        // Calcul de la taille et choix de l'unité
+        $affichage = _T(
+            'spip:taille_' . $unites[$puissance] . $suffixe_item,
+            [
+                'taille' => round($octets / $kilo ** $puissance, $precisions[$puissance])
+            ]
+        );
+    }
 
-	return $affichage;
+    return $affichage;
 }
 
 
@@ -1343,21 +1343,21 @@ 
  *     texte prêt pour être utilisé en attribut HTML
  **/
 function attribut_html(?string $texte, $textebrut = true): string {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	$u = $GLOBALS['meta']['pcre_u'];
-	if ($textebrut) {
-		$texte = preg_replace([",\n,", ',\s(?=\s),msS' . $u], [' ', ''], textebrut($texte));
-	}
-	$texte = texte_backend($texte);
-	$texte = str_replace(["'", '"'], ['&#039;', '&#034;'], $texte);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    $u = $GLOBALS['meta']['pcre_u'];
+    if ($textebrut) {
+        $texte = preg_replace([",\n,", ',\s(?=\s),msS' . $u], [' ', ''], textebrut($texte));
+    }
+    $texte = texte_backend($texte);
+    $texte = str_replace(["'", '"'], ['&#039;', '&#034;'], $texte);
 
-	return preg_replace(
-		['/&(amp;|#38;)/', '/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,5};)/'],
-		['&', '&#38;'],
-		$texte
-	);
+    return preg_replace(
+        ['/&(amp;|#38;)/', '/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,5};)/'],
+        ['&', '&#38;'],
+        $texte
+    );
 }
 
 
@@ -1377,15 +1377,15 @@ 
  *     URL ou chaîne vide
  **/
 function vider_url(?string $url, $entites = true): string {
-	if ($url === null || $url === '') {
-		return '';
-	}
-	# un message pour abs_url
-	$GLOBALS['mode_abs_url'] = 'url';
-	$url = trim($url);
-	$r = ',^(?:' . _PROTOCOLES_STD . '):?/?/?$,iS';
+    if ($url === null || $url === '') {
+        return '';
+    }
+    # un message pour abs_url
+    $GLOBALS['mode_abs_url'] = 'url';
+    $url = trim($url);
+    $r = ',^(?:' . _PROTOCOLES_STD . '):?/?/?$,iS';
 
-	return preg_match($r, $url) ? '' : ($entites ? entites_html($url) : $url);
+    return preg_match($r, $url) ? '' : ($entites ? entites_html($url) : $url);
 }
 
 
@@ -1400,10 +1400,10 @@ 
  * @return string Adresse email maquillée
  **/
 function antispam($texte) {
-	include_spip('inc/acces');
-	$masque = creer_pass_aleatoire(3);
+    include_spip('inc/acces');
+    $masque = creer_pass_aleatoire(3);
 
-	return preg_replace('/@/', " $masque ", $texte);
+    return preg_replace('/@/', " $masque ", $texte);
 }
 
 /**
@@ -1435,8 +1435,8 @@ 
  *     True si on a le droit d'accès, false sinon.
  **/
 function filtre_securiser_acces_dist($id_auteur, $cle, $dir, $op = '', $args = '') {
-	include_spip('inc/acces');
-	return securiser_acces_low_sec($id_auteur, $cle, $op ? "$dir $op $args" : $dir);
+    include_spip('inc/acces');
+    return securiser_acces_low_sec($id_auteur, $cle, $op ? "$dir $op $args" : $dir);
 }
 
 /**
@@ -1460,13 +1460,13 @@ 
  *     Retourne $texte, sinon $sinon.
  **/
 function sinon(mixed $texte, mixed $sinon = '') {
-	if ($texte) {
-		return $texte;
-	} elseif (is_scalar($texte) && strlen($texte)) {
-		return $texte;
-	}
+    if ($texte) {
+        return $texte;
+    } elseif (is_scalar($texte) && strlen($texte)) {
+        return $texte;
+    }
 
-	return $sinon;
+    return $sinon;
 }
 
 /**
@@ -1490,7 +1490,7 @@ 
  * @return mixed
  **/
 function choixsivide(mixed $a, mixed $vide, mixed $pasvide) {
-	return $a ? $pasvide : $vide;
+    return $a ? $pasvide : $vide;
 }
 
 /**
@@ -1514,7 +1514,7 @@ 
  * @return mixed
  **/
 function choixsiegal(mixed $a1, mixed $a2, mixed $v, mixed $f) {
-	return ($a1 == $a2) ? $v : $f;
+    return ($a1 == $a2) ? $v : $f;
 }
 
 //
@@ -1533,15 +1533,15 @@ 
  * @return string
  **/
 function filtrer_ical($texte) {
-	if ($texte === null || $texte === '') {
-		return '';
-	}
-	#include_spip('inc/charsets');
-	$texte = html2unicode($texte);
-	$texte = unicode2charset(charset2unicode($texte, $GLOBALS['meta']['charset']), 'utf-8');
-	$texte = preg_replace("/\n/", ' ', $texte);
+    if ($texte === null || $texte === '') {
+        return '';
+    }
+    #include_spip('inc/charsets');
+    $texte = html2unicode($texte);
+    $texte = unicode2charset(charset2unicode($texte, $GLOBALS['meta']['charset']), 'utf-8');
+    $texte = preg_replace("/\n/", ' ', $texte);
 
-	return preg_replace('/,/', '\,', $texte);
+    return preg_replace('/,/', '\,', $texte);
 }
 
 
@@ -1566,56 +1566,56 @@ 
  * @return string
  **/
 function post_autobr($texte, $delim = "\n_ ") {
-	if (!function_exists('echappe_html')) {
-		include_spip('inc/texte_mini');
-	}
-	$texte = str_replace("\r\n", "\r", $texte);
-	$texte = str_replace("\r", "\n", $texte);
-
-	if (preg_match(",\n+$,", $texte, $fin)) {
-		$texte = substr($texte, 0, -strlen($fin = $fin[0]));
-	} else {
-		$fin = '';
-	}
-
-	$texte = CollecteurHtmlTag::proteger_balisesHtml($texte);
-
-	// echapper les modeles
-	$collecteurModeles = null;
-	if (str_contains($texte, '<')) {
-		$collecteurModeles = new CollecteurModeles();
-		$texte = $collecteurModeles->echapper($texte);
-	}
-
-	$debut = '';
-	$suite = $texte;
-	while ($t = strpos((string) ('-' . $suite), "\n", 1)) {
-		$debut .= substr($suite, 0, $t - 1);
-		$suite = substr($suite, $t);
-		$car = substr($suite, 0, 1);
-		if (
-			$car != '-' && $car != '_' && $car != "\n" && $car != '|' && $car != '}'
-			&& !preg_match(',^\s*(\n|</?(quote|div|dl|dt|dd)|$),S', ($suite))
-			&& !preg_match(',</?(quote|div|dl|dt|dd)> *$,iS', $debut)
-		) {
-			$debut .= $delim;
-		} else {
-			$debut .= "\n";
-		}
-		if (preg_match(",^\n+,", $suite, $regs)) {
-			$debut .= $regs[0];
-			$suite = substr($suite, strlen($regs[0]));
-		}
-	}
-	$texte = $debut . $suite;
-
-	if ($collecteurModeles) {
-		$texte = $collecteurModeles->retablir($texte);
-	}
-
-	$texte = CollecteurHtmlTag::retablir_depuisHtmlBase64($texte);
-
-	return $texte . $fin;
+    if (!function_exists('echappe_html')) {
+        include_spip('inc/texte_mini');
+    }
+    $texte = str_replace("\r\n", "\r", $texte);
+    $texte = str_replace("\r", "\n", $texte);
+
+    if (preg_match(",\n+$,", $texte, $fin)) {
+        $texte = substr($texte, 0, -strlen($fin = $fin[0]));
+    } else {
+        $fin = '';
+    }
+
+    $texte = CollecteurHtmlTag::proteger_balisesHtml($texte);
+
+    // echapper les modeles
+    $collecteurModeles = null;
+    if (str_contains($texte, '<')) {
+        $collecteurModeles = new CollecteurModeles();
+        $texte = $collecteurModeles->echapper($texte);
+    }
+
+    $debut = '';
+    $suite = $texte;
+    while ($t = strpos((string) ('-' . $suite), "\n", 1)) {
+        $debut .= substr($suite, 0, $t - 1);
+        $suite = substr($suite, $t);
+        $car = substr($suite, 0, 1);
+        if (
+            $car != '-' && $car != '_' && $car != "\n" && $car != '|' && $car != '}'
+            && !preg_match(',^\s*(\n|</?(quote|div|dl|dt|dd)|$),S', ($suite))
+            && !preg_match(',</?(quote|div|dl|dt|dd)> *$,iS', $debut)
+        ) {
+            $debut .= $delim;
+        } else {
+            $debut .= "\n";
+        }
+        if (preg_match(",^\n+,", $suite, $regs)) {
+            $debut .= $regs[0];
+            $suite = substr($suite, strlen($regs[0]));
+        }
+    }
+    $texte = $debut . $suite;
+
+    if ($collecteurModeles) {
+        $texte = $collecteurModeles->retablir($texte);
+    }
+
+    $texte = CollecteurHtmlTag::retablir_depuisHtmlBase64($texte);
+
+    return $texte . $fin;
 }
 
 
@@ -1648,25 +1648,25 @@ 
  **/
 function extraire_idiome($letexte, $lang = null, $options = []) {
 
-	if ($letexte && str_contains($letexte, '<:')) {
-		if (!$lang) {
-			$lang = $GLOBALS['spip_lang'];
-		}
-		// Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
-		if (is_bool($options)) {
-			trigger_deprecation('spip', '5.0', 'Using boolean $options parameter in "%s()" function is deprecated. Use %s array parameter instead.', __FUNCTION__, '[\'echappe_span\' => ' . var_export($options, true) . ']');
-			$options = ['echappe_span' => $options];
-		}
-		if (!isset($options['echappe_span'])) {
-			$options = array_merge($options, ['echappe_span' => false]);
-		}
-		$options['lang'] = $lang;
+    if ($letexte && str_contains($letexte, '<:')) {
+        if (!$lang) {
+            $lang = $GLOBALS['spip_lang'];
+        }
+        // Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
+        if (is_bool($options)) {
+            trigger_deprecation('spip', '5.0', 'Using boolean $options parameter in "%s()" function is deprecated. Use %s array parameter instead.', __FUNCTION__, '[\'echappe_span\' => ' . var_export($options, true) . ']');
+            $options = ['echappe_span' => $options];
+        }
+        if (!isset($options['echappe_span'])) {
+            $options = array_merge($options, ['echappe_span' => false]);
+        }
+        $options['lang'] = $lang;
 
-		$collecteurIdiomes = new CollecteurIdiomes();
+        $collecteurIdiomes = new CollecteurIdiomes();
 
-		$letexte = $collecteurIdiomes->traiter($letexte, $options);
-	}
-	return $letexte;
+        $letexte = $collecteurIdiomes->traiter($letexte, $options);
+    }
+    return $letexte;
 }
 
 /**
@@ -1704,30 +1704,30 @@ 
  **/
 function extraire_multi($letexte, $lang = null, $options = []) {
 
-	if ($letexte && stripos($letexte, '<multi') !== false) {
-		if (!$lang) {
-			$lang = $GLOBALS['spip_lang'];
-		}
+    if ($letexte && stripos($letexte, '<multi') !== false) {
+        if (!$lang) {
+            $lang = $GLOBALS['spip_lang'];
+        }
 
-		// Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
-		if (is_bool($options)) {
-			trigger_deprecation('spip', '5.0', 'Using boolean $options parameter in "%s()" function is deprecated. Use %s array parameter instead.', __FUNCTION__, '[\'echappe_span\' => ' . var_export($options, true) . ']');
-			$options = ['echappe_span' => $options, 'lang_defaut' => _LANGUE_PAR_DEFAUT];
-		}
-		if (!isset($options['echappe_span'])) {
-			$options = array_merge($options, ['echappe_span' => false]);
-		}
-		if (!isset($options['lang_defaut'])) {
-			$options = array_merge($options, ['lang_defaut' => _LANGUE_PAR_DEFAUT]);
-		}
-		$options['lang'] = $lang;
+        // Compatibilité avec le prototype de fonction précédente qui utilisait un boolean
+        if (is_bool($options)) {
+            trigger_deprecation('spip', '5.0', 'Using boolean $options parameter in "%s()" function is deprecated. Use %s array parameter instead.', __FUNCTION__, '[\'echappe_span\' => ' . var_export($options, true) . ']');
+            $options = ['echappe_span' => $options, 'lang_defaut' => _LANGUE_PAR_DEFAUT];
+        }
+        if (!isset($options['echappe_span'])) {
+            $options = array_merge($options, ['echappe_span' => false]);
+        }
+        if (!isset($options['lang_defaut'])) {
+            $options = array_merge($options, ['lang_defaut' => _LANGUE_PAR_DEFAUT]);
+        }
+        $options['lang'] = $lang;
 
-		$collecteurMultis = new CollecteurMultis();
+        $collecteurMultis = new CollecteurMultis();
 
-		$letexte = $collecteurMultis->traiter($letexte, $options);
-	}
+        $letexte = $collecteurMultis->traiter($letexte, $options);
+    }
 
-	return $letexte;
+    return $letexte;
 }
 
 /**
@@ -1737,7 +1737,7 @@ 
  * @return string L'initiale en majuscule
  */
 function filtre_initiale($nom) {
-	return spip_substr(trim(strtoupper(extraire_multi($nom))), 0, 1);
+    return spip_substr(trim(strtoupper(extraire_multi($nom))), 0, 1);
 }
 
 
@@ -1782,33 +1782,33 @@ 
  *      - null (interne) : si on empile
  **/
 function unique($donnee, $famille = '', $cpt = false) {
-	static $mem = [];
-	// permettre de vider la pile et de la restaurer
-	// pour le calcul de introduction...
-	if ($famille == '_spip_raz_') {
-		$tmp = $mem;
-		$mem = [];
-
-		return $tmp;
-	} elseif ($famille == '_spip_set_') {
-		$mem = $donnee;
-
-		return;
-	}
-	// eviter une notice
-	if (!isset($mem[$famille])) {
-		$mem[$famille] = [];
-	}
-	if ($cpt) {
-		return is_countable($mem[$famille]) ? count($mem[$famille]) : 0;
-	}
-	// eviter une notice
-	if (!isset($mem[$famille][$donnee])) {
-		$mem[$famille][$donnee] = 0;
-	}
-	if (!($mem[$famille][$donnee]++)) {
-		return $donnee;
-	}
+    static $mem = [];
+    // permettre de vider la pile et de la restaurer
+    // pour le calcul de introduction...
+    if ($famille == '_spip_raz_') {
+        $tmp = $mem;
+        $mem = [];
+
+        return $tmp;
+    } elseif ($famille == '_spip_set_') {
+        $mem = $donnee;
+
+        return;
+    }
+    // eviter une notice
+    if (!isset($mem[$famille])) {
+        $mem[$famille] = [];
+    }
+    if ($cpt) {
+        return is_countable($mem[$famille]) ? count($mem[$famille]) : 0;
+    }
+    // eviter une notice
+    if (!isset($mem[$famille][$donnee])) {
+        $mem[$famille][$donnee] = 0;
+    }
+    if (!($mem[$famille][$donnee]++)) {
+        return $donnee;
+    }
 }
 
 
@@ -1838,20 +1838,20 @@ 
  *     Une des valeurs en fonction du compteur.
  **/
 function alterner($i, ...$args) {
-	// recuperer les arguments (attention fonctions un peu space)
-	$num = count($args);
+    // recuperer les arguments (attention fonctions un peu space)
+    $num = count($args);
 
-	if ($num === 1 && is_array($args[0])) {
-		// un tableau de valeur dont les cles sont numerotees de 0 a num
-		$args = array_values($args[0]);
-		$num = count($args);
-	}
+    if ($num === 1 && is_array($args[0])) {
+        // un tableau de valeur dont les cles sont numerotees de 0 a num
+        $args = array_values($args[0]);
+        $num = count($args);
+    }
 
-	// un index compris entre 0 et num exclus
-	$i = (((int) $i - 1) % $num); // dans ]-$num;$num[
-	$i = ($i + $num) % $num; // dans [0;$num[
-	// renvoyer le i-ieme argument, modulo le nombre d'arguments
-	return $args[$i];
+    // un index compris entre 0 et num exclus
+    $i = (((int) $i - 1) % $num); // dans ]-$num;$num[
+    $i = ($i + $num) % $num; // dans [0;$num[
+    // renvoyer le i-ieme argument, modulo le nombre d'arguments
+    return $args[$i];
 }
 
 
@@ -1877,52 +1877,52 @@ 
  *     - null lorsque l’attribut n’existe pas.
  **/
 function extraire_attribut($balise, $attribut, $complet = false) {
-	if (is_array($balise)) {
-		array_walk(
-			$balise,
-			function (&$a, $key, $t) {
-				$a = extraire_attribut($a, $t);
-			},
-			$attribut
-		);
-
-		return $balise;
-	}
-	if (
-		$balise
-		&& stripos($balise, $attribut) !== false
-		&& preg_match(
-			',(^.*?<(?:(?>\s*)(?>[\w:.-]+)(?>(?:=(?:"[^"]*"|\'[^\']*\'|[^\'"]\S*))?))*?)(\s+'
-			. $attribut
-			. '(?:=\s*("[^"]*"|\'[^\']*\'|[^\'"]\S*))?)()((?:[\s/][^>]*)?>.*),isS',
-			$balise,
-			$r
-		)
-	) {
-		if (isset($r[3][0]) && ($r[3][0] == '"' || $r[3][0] == "'")) {
-			$r[4] = substr($r[3], 1, -1);
-			$r[3] = $r[3][0];
-		} elseif ($r[3] !== '') {
-			$r[4] = $r[3];
-			$r[3] = '';
-		} else {
-			$r[4] = trim($r[2]);
-		}
-		$att = $r[4];
-		if (str_contains($att, '&#')) {
-			$att = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $att);
-		}
-		$att = filtrer_entites($att);
-	} else {
-		$att = null;
-		$r = [];
-	}
-
-	if ($complet) {
-		return [$att, $r];
-	} else {
-		return $att;
-	}
+    if (is_array($balise)) {
+        array_walk(
+            $balise,
+            function (&$a, $key, $t) {
+                $a = extraire_attribut($a, $t);
+            },
+            $attribut
+        );
+
+        return $balise;
+    }
+    if (
+        $balise
+        && stripos($balise, $attribut) !== false
+        && preg_match(
+            ',(^.*?<(?:(?>\s*)(?>[\w:.-]+)(?>(?:=(?:"[^"]*"|\'[^\']*\'|[^\'"]\S*))?))*?)(\s+'
+            . $attribut
+            . '(?:=\s*("[^"]*"|\'[^\']*\'|[^\'"]\S*))?)()((?:[\s/][^>]*)?>.*),isS',
+            $balise,
+            $r
+        )
+    ) {
+        if (isset($r[3][0]) && ($r[3][0] == '"' || $r[3][0] == "'")) {
+            $r[4] = substr($r[3], 1, -1);
+            $r[3] = $r[3][0];
+        } elseif ($r[3] !== '') {
+            $r[4] = $r[3];
+            $r[3] = '';
+        } else {
+            $r[4] = trim($r[2]);
+        }
+        $att = $r[4];
+        if (str_contains($att, '&#')) {
+            $att = str_replace(['&#039;', '&#39;', '&#034;', '&#34;'], ["'", "'", '"', '"'], $att);
+        }
+        $att = filtrer_entites($att);
+    } else {
+        $att = null;
+        $r = [];
+    }
+
+    if ($complet) {
+        return [$att, $r];
+    } else {
+        return $att;
+    }
 }
 
 /**
@@ -1955,37 +1955,37 @@ 
  **/
 function inserer_attribut(?string $balise, string $attribut, ?string $val, bool $proteger = true, bool $vider = false): string {
 
-	if ($balise === null || $balise === '') {
-		return '';
-	}
+    if ($balise === null || $balise === '') {
+        return '';
+    }
 
-	// preparer l'attribut
-	// supprimer les &nbsp; etc mais pas les balises html
-	// qui ont un sens dans un attribut value d'un input
-	if ($proteger) {
-		$val = attribut_html($val, false);
-	}
+    // preparer l'attribut
+    // supprimer les &nbsp; etc mais pas les balises html
+    // qui ont un sens dans un attribut value d'un input
+    if ($proteger) {
+        $val = attribut_html($val, false);
+    }
 
-	// echapper les ' pour eviter tout bug
-	$val = str_replace("'", '&#039;', $val ?? '');
-	$insert = $vider && (string) $val === '' ? '' : " $attribut='$val'";
+    // echapper les ' pour eviter tout bug
+    $val = str_replace("'", '&#039;', $val ?? '');
+    $insert = $vider && (string) $val === '' ? '' : " $attribut='$val'";
 
-	[$old, $r] = extraire_attribut($balise, $attribut, true);
+    [$old, $r] = extraire_attribut($balise, $attribut, true);
 
-	if ($old !== null) {
-		// Remplacer l'ancien attribut du meme nom
-		$balise = $r[1] . $insert . $r[5];
-	} else {
-		// preferer une balise " />" (comme <img />)
-		if (preg_match(',/>,', $balise)) {
-			$balise = preg_replace(',\s?/>,S', $insert . ' />', $balise, 1);
-		} // sinon une balise <a ...> ... </a>
-		else {
-			$balise = preg_replace(',\s?>,S', $insert . '>', $balise, 1);
-		}
-	}
+    if ($old !== null) {
+        // Remplacer l'ancien attribut du meme nom
+        $balise = $r[1] . $insert . $r[5];
+    } else {
+        // preferer une balise " />" (comme <img />)
+        if (preg_match(',/>,', $balise)) {
+            $balise = preg_replace(',\s?/>,S', $insert . ' />', $balise, 1);
+        } // sinon une balise <a ...> ... </a>
+        else {
+            $balise = preg_replace(',\s?>,S', $insert . '>', $balise, 1);
+        }
+    }
 
-	return $balise;
+    return $balise;
 }
 
 /**
@@ -2003,7 +2003,7 @@ 
  * @return string Code HTML sans l'attribut
  **/
 function vider_attribut(?string $balise, string $attribut): string {
-	return inserer_attribut($balise, $attribut, '', false, true);
+    return inserer_attribut($balise, $attribut, '', false, true);
 }
 
 /**
@@ -2015,50 +2015,50 @@ 
  * @return string
  */
 function modifier_class($balise, $class, $operation = 'ajouter') {
-	if (is_string($class)) {
-		$class = explode(' ', trim($class));
-	}
-	$class = array_filter($class);
-	$class = array_unique($class);
-	if (!$class) {
-		return $balise;
-	}
-
-	$class_courante = extraire_attribut($balise, 'class');
-	$class_new = $class_courante;
-	foreach ($class as $c) {
-		$is_class_presente = false;
-		if (
-			$class_courante
-			&& str_contains($class_courante, (string) $c)
-			&& in_array($c, preg_split(',\s+,', $class_courante))
-		) {
-			$is_class_presente = true;
-		}
-		if (
-			in_array($operation, ['ajouter', 'commuter'])
-			&& !$is_class_presente
-		) {
-			$class_new = ltrim(rtrim($class_new ?? '') . ' ' . $c);
-		} elseif (
-			in_array($operation, ['supprimer', 'commuter'])
-			&& $is_class_presente
-		) {
-			$class_new = preg_split(',\s+,', $class_new);
-			$class_new = array_diff($class_new, [$c]);
-			$class_new = implode(' ', $class_new);
-		}
-	}
-
-	if ($class_new !== $class_courante) {
-		if (strlen($class_new)) {
-			$balise = inserer_attribut($balise, 'class', $class_new);
-		} elseif ($class_courante) {
-			$balise = vider_attribut($balise, 'class');
-		}
-	}
-
-	return $balise;
+    if (is_string($class)) {
+        $class = explode(' ', trim($class));
+    }
+    $class = array_filter($class);
+    $class = array_unique($class);
+    if (!$class) {
+        return $balise;
+    }
+
+    $class_courante = extraire_attribut($balise, 'class');
+    $class_new = $class_courante;
+    foreach ($class as $c) {
+        $is_class_presente = false;
+        if (
+            $class_courante
+            && str_contains($class_courante, (string) $c)
+            && in_array($c, preg_split(',\s+,', $class_courante))
+        ) {
+            $is_class_presente = true;
+        }
+        if (
+            in_array($operation, ['ajouter', 'commuter'])
+            && !$is_class_presente
+        ) {
+            $class_new = ltrim(rtrim($class_new ?? '') . ' ' . $c);
+        } elseif (
+            in_array($operation, ['supprimer', 'commuter'])
+            && $is_class_presente
+        ) {
+            $class_new = preg_split(',\s+,', $class_new);
+            $class_new = array_diff($class_new, [$c]);
+            $class_new = implode(' ', $class_new);
+        }
+    }
+
+    if ($class_new !== $class_courante) {
+        if (strlen($class_new)) {
+            $balise = inserer_attribut($balise, 'class', $class_new);
+        } elseif ($class_courante) {
+            $balise = vider_attribut($balise, 'class');
+        }
+    }
+
+    return $balise;
 }
 
 /**
@@ -2068,7 +2068,7 @@ 
  * @return string
  */
 function ajouter_class($balise, $class) {
-	return modifier_class($balise, $class, 'ajouter');
+    return modifier_class($balise, $class, 'ajouter');
 }
 
 /**
@@ -2078,7 +2078,7 @@ 
  * @return string
  */
 function supprimer_class($balise, $class) {
-	return modifier_class($balise, $class, 'supprimer');
+    return modifier_class($balise, $class, 'supprimer');
 }
 
 /**
@@ -2089,7 +2089,7 @@ 
  * @return string
  */
 function commuter_class($balise, $class) {
-	return modifier_class($balise, $class, 'commuter');
+    return modifier_class($balise, $class, 'commuter');
 }
 
 /**
@@ -2100,19 +2100,19 @@ 
  * @return string
  */
 function tester_config($id, $mode = '') {
-	include_spip('action/inscrire_auteur');
+    include_spip('action/inscrire_auteur');
 
-	return tester_statut_inscription($mode, $id);
+    return tester_statut_inscription($mode, $id);
 }
 
 //
 // Quelques fonctions de calcul arithmetique
 //
 function floatstr($a) {
-	return str_replace(',', '.', (string)(float) $a);
+    return str_replace(',', '.', (string)(float) $a);
 }
 function strize($f, $a, $b) {
-	return floatstr($f(floatstr($a), floatstr($b)));
+    return floatstr($f(floatstr($a), floatstr($b)));
 }
 
 /**
@@ -2131,11 +2131,11 @@ 
  * @return int $a+$b
  **/
 function plus($a, $b) {
-	return $a + $b;
+    return $a + $b;
 }
 
 function strplus($a, $b) {
-	return strize('plus', $a, $b);
+    return strize('plus', $a, $b);
 }
 
 /**
@@ -2154,11 +2154,11 @@ 
  * @return int $a-$b
  **/
 function moins($a, $b) {
-	return $a - $b;
+    return $a - $b;
 }
 
 function strmoins($a, $b) {
-	return strize('moins', $a, $b);
+    return strize('moins', $a, $b);
 }
 
 /**
@@ -2178,11 +2178,11 @@ 
  * @return int $a*$b
  **/
 function mult($a, $b) {
-	return $a * $b;
+    return $a * $b;
 }
 
 function strmult($a, $b) {
-	return strize('mult', $a, $b);
+    return strize('mult', $a, $b);
 }
 
 /**
@@ -2202,11 +2202,11 @@ 
  * @return int $a/$b (ou 0 si $b est nul)
  **/
 function div($a, $b) {
-	return $b ? $a / $b : 0;
+    return $b ? $a / $b : 0;
 }
 
 function strdiv($a, $b) {
-	return strize('div', $a, $b);
+    return strize('div', $a, $b);
 }
 
 /**
@@ -2227,7 +2227,7 @@ 
  * @return int ($nb % $mod) + $add
  **/
 function modulo($nb, $mod, $add = 0) {
-	return ($mod ? $nb % $mod : 0) + $add;
+    return ($mod ? $nb % $mod : 0) + $add;
 }
 
 
@@ -2242,26 +2242,26 @@ 
  *      - true sinon
  **/
 function nom_acceptable($nom) {
-	$remp2 = [];
-	$remp1 = [];
-	if (!is_string($nom)) {
-		return false;
-	}
-	if (!defined('_TAGS_NOM_AUTEUR')) {
-		define('_TAGS_NOM_AUTEUR', '');
-	}
-	$tags_acceptes = array_unique(explode(',', 'multi,' . _TAGS_NOM_AUTEUR));
-	foreach ($tags_acceptes as $tag) {
-		if (strlen($tag)) {
-			$remp1[] = '<' . trim($tag) . '>';
-			$remp1[] = '</' . trim($tag) . '>';
-			$remp2[] = '\x60' . trim($tag) . '\x61';
-			$remp2[] = '\x60/' . trim($tag) . '\x61';
-		}
-	}
-	$v_nom = str_replace($remp2, $remp1, supprimer_tags(str_replace($remp1, $remp2, $nom)));
-
-	return str_replace('&lt;', '<', $v_nom) == $nom;
+    $remp2 = [];
+    $remp1 = [];
+    if (!is_string($nom)) {
+        return false;
+    }
+    if (!defined('_TAGS_NOM_AUTEUR')) {
+        define('_TAGS_NOM_AUTEUR', '');
+    }
+    $tags_acceptes = array_unique(explode(',', 'multi,' . _TAGS_NOM_AUTEUR));
+    foreach ($tags_acceptes as $tag) {
+        if (strlen($tag)) {
+            $remp1[] = '<' . trim($tag) . '>';
+            $remp1[] = '</' . trim($tag) . '>';
+            $remp2[] = '\x60' . trim($tag) . '\x61';
+            $remp2[] = '\x60/' . trim($tag) . '\x61';
+        }
+    }
+    $v_nom = str_replace($remp2, $remp1, supprimer_tags(str_replace($remp1, $remp2, $nom)));
+
+    return str_replace('&lt;', '<', $v_nom) == $nom;
 }
 
 
@@ -2277,13 +2277,13 @@ 
  *      - renvoie un tableau si l'entree est un tableau
  **/
 function email_valide($adresses) {
-	if (is_array($adresses)) {
-		$adresses = array_map('email_valide', $adresses);
-		return array_filter($adresses);
-	}
+    if (is_array($adresses)) {
+        $adresses = array_map('email_valide', $adresses);
+        return array_filter($adresses);
+    }
 
-	$email_valide = charger_fonction('email_valide', 'inc');
-	return $email_valide($adresses);
+    $email_valide = charger_fonction('email_valide', 'inc');
+    return $email_valide($adresses);
 }
 
 /**
@@ -2297,29 +2297,29 @@ 
  * @return string texte
  **/
 function afficher_enclosures($tags) {
-	$s = [];
-	foreach (extraire_balises($tags, 'a') as $tag) {
-		if (
-			extraire_attribut($tag, 'rel') == 'enclosure'
-			&& ($t = extraire_attribut($tag, 'href'))
-		) {
-			$s[] = preg_replace(
-				',>[^<]+</a>,S',
-				'>'
-				. http_img_pack(
-					'attachment-16.png',
-					$t,
-					'',
-					$t,
-					['utiliser_suffixe_size' => true]
-				)
-				. '</a>',
-				(string) $tag
-			);
-		}
-	}
-
-	return implode('&nbsp;', $s);
+    $s = [];
+    foreach (extraire_balises($tags, 'a') as $tag) {
+        if (
+            extraire_attribut($tag, 'rel') == 'enclosure'
+            && ($t = extraire_attribut($tag, 'href'))
+        ) {
+            $s[] = preg_replace(
+                ',>[^<]+</a>,S',
+                '>'
+                . http_img_pack(
+                    'attachment-16.png',
+                    $t,
+                    '',
+                    $t,
+                    ['utiliser_suffixe_size' => true]
+                )
+                . '</a>',
+                (string) $tag
+            );
+        }
+    }
+
+    return implode('&nbsp;', $s);
 }
 
 /**
@@ -2334,15 +2334,15 @@ 
  * @return string Liens trouvés
  **/
 function afficher_tags($tags, $rels = 'tag,directory') {
-	$s = [];
-	foreach (extraire_balises($tags, 'a') as $tag) {
-		$rel = extraire_attribut($tag, 'rel');
-		if (strstr(",$rels,", (string) ",$rel,")) {
-			$s[] = $tag;
-		}
-	}
+    $s = [];
+    foreach (extraire_balises($tags, 'a') as $tag) {
+        $rel = extraire_attribut($tag, 'rel');
+        if (strstr(",$rels,", (string) ",$rel,")) {
+            $s[] = $tag;
+        }
+    }
 
-	return implode(', ', $s);
+    return implode(', ', $s);
 }
 
 
@@ -2364,21 +2364,21 @@ 
  * @return string Tag HTML `<a>` avec microformat.
  **/
 function enclosure2microformat($e) {
-	if (!$url = filtrer_entites(extraire_attribut($e, 'url') ?? '')) {
-		$url = filtrer_entites(extraire_attribut($e, 'href') ?? '');
-	}
-	$type = extraire_attribut($e, 'type');
-	if (!$length = extraire_attribut($e, 'length')) {
-		# <media:content : longeur dans fileSize. On tente.
-		$length = extraire_attribut($e, 'fileSize');
-	}
-	$fichier = basename($url);
+    if (!$url = filtrer_entites(extraire_attribut($e, 'url') ?? '')) {
+        $url = filtrer_entites(extraire_attribut($e, 'href') ?? '');
+    }
+    $type = extraire_attribut($e, 'type');
+    if (!$length = extraire_attribut($e, 'length')) {
+        # <media:content : longeur dans fileSize. On tente.
+        $length = extraire_attribut($e, 'fileSize');
+    }
+    $fichier = basename($url);
 
-	return '<a rel="enclosure"'
-	. ($url ? ' href="' . spip_htmlspecialchars($url) . '"' : '')
-	. ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
-	. ($length ? ' title="' . spip_htmlspecialchars($length) . '"' : '')
-	. '>' . $fichier . '</a>';
+    return '<a rel="enclosure"'
+    . ($url ? ' href="' . spip_htmlspecialchars($url) . '"' : '')
+    . ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
+    . ($length ? ' title="' . spip_htmlspecialchars($length) . '"' : '')
+    . '>' . $fichier . '</a>';
 }
 
 /**
@@ -2396,24 +2396,24 @@ 
  * @return string Tags RSS `<enclosure>`.
  **/
 function microformat2enclosure($tags) {
-	$enclosures = [];
-	foreach (extraire_balises($tags, 'a') as $e) {
-		if (extraire_attribut($e, 'rel') == 'enclosure') {
-			$url = filtrer_entites(extraire_attribut($e, 'href'));
-			$type = extraire_attribut($e, 'type');
-			if (!$length = (int) extraire_attribut($e, 'title')) {
-				$length = (int) extraire_attribut($e, 'length');
-			} # vieux data
-			$fichier = basename($url);
-			$enclosures[] = '<enclosure'
-				. ($url ? ' url="' . spip_htmlspecialchars($url) . '"' : '')
-				. ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
-				. ($length ? ' length="' . $length . '"' : '')
-				. ' />';
-		}
-	}
+    $enclosures = [];
+    foreach (extraire_balises($tags, 'a') as $e) {
+        if (extraire_attribut($e, 'rel') == 'enclosure') {
+            $url = filtrer_entites(extraire_attribut($e, 'href'));
+            $type = extraire_attribut($e, 'type');
+            if (!$length = (int) extraire_attribut($e, 'title')) {
+                $length = (int) extraire_attribut($e, 'length');
+            } # vieux data
+            $fichier = basename($url);
+            $enclosures[] = '<enclosure'
+                . ($url ? ' url="' . spip_htmlspecialchars($url) . '"' : '')
+                . ($type ? ' type="' . spip_htmlspecialchars($type) . '"' : '')
+                . ($length ? ' length="' . $length . '"' : '')
+                . ' />';
+        }
+    }
 
-	return implode("\n", $enclosures);
+    return implode("\n", $enclosures);
 }
 
 
@@ -2429,16 +2429,16 @@ 
  * @return string Tags RSS Atom `<dc:subject>`.
  **/
 function tags2dcsubject($tags) {
-	$subjects = '';
-	foreach (extraire_balises($tags, 'a') as $e) {
-		if (extraire_attribut($e, 'rel') == 'tag') {
-			$subjects .= '<dc:subject>'
-				. texte_backend(textebrut($e))
-				. '</dc:subject>' . "\n";
-		}
-	}
+    $subjects = '';
+    foreach (extraire_balises($tags, 'a') as $e) {
+        if (extraire_attribut($e, 'rel') == 'tag') {
+            $subjects .= '<dc:subject>'
+                . texte_backend(textebrut($e))
+                . '</dc:subject>' . "\n";
+        }
+    }
 
-	return $subjects;
+    return $subjects;
 }
 
 /**
@@ -2467,12 +2467,12 @@ 
  *     - Tableau de résultats, si tableau en entrée.
  **/
 function extraire_balise($texte, $tag = 'a', $profondeur = 1) {
-	$balises = extraire_balises($texte, $tag, ['nb_max' => 1, 'profondeur' => $profondeur]);
-	if (is_array($texte)) {
-		return array_map(fn (array $a) => empty($a) ? '' : reset($a), $balises);
-	}
+    $balises = extraire_balises($texte, $tag, ['nb_max' => 1, 'profondeur' => $profondeur]);
+    if (is_array($texte)) {
+        return array_map(fn (array $a) => empty($a) ? '' : reset($a), $balises);
+    }
 
-	return (empty($balises) ? '' : reset($balises));
+    return (empty($balises) ? '' : reset($balises));
 }
 
 /**
@@ -2500,25 +2500,25 @@ 
  *     - Tableau de résultats, si tableau en entrée.
  **/
 function extraire_balises($texte, $tag = 'a', $options = []) {
-	if (is_array($texte)) {
-		array_walk(
-			$texte,
-			function (&$a, $key, $t) {
-				$a = extraire_balises($a, $t);
-			},
-			$tag
-		);
+    if (is_array($texte)) {
+        array_walk(
+            $texte,
+            function (&$a, $key, $t) {
+                $a = extraire_balises($a, $t);
+            },
+            $tag
+        );
 
-		return $texte;
-	}
+        return $texte;
+    }
 
-	$htmlTagCollecteur = new CollecteurHtmlTag($tag);
-	$collection = $htmlTagCollecteur->collecter($texte, $options);
-	if (!empty($collection)) {
-		return array_column($collection, 'raw');
-	}
+    $htmlTagCollecteur = new CollecteurHtmlTag($tag);
+    $collection = $htmlTagCollecteur->collecter($texte, $options);
+    if (!empty($collection)) {
+        return array_column($collection, 'raw');
+    }
 
-	return [];
+    return [];
 }
 
 /**
@@ -2547,11 +2547,11 @@ 
  *     - `$def` si on n'a pas transmis de tableau
  **/
 function in_any($val, $vals, $def = '') {
-	if (!is_array($vals) && $vals && ($v = unserialize($vals))) {
-		$vals = $v;
-	}
+    if (!is_array($vals) && $vals && ($v = unserialize($vals))) {
+        $vals = $v;
+    }
 
-	return (is_array($vals) ? (in_array($val, $vals) ? ' ' : '') : ($def));
+    return (is_array($vals) ? (in_array($val, $vals) ? ' ' : '') : ($def));
 }
 
 
@@ -2572,12 +2572,12 @@ 
  *     Résultat du calcul
  **/
 function valeur_numerique($expr) {
-	$a = 0;
-	if (preg_match(',^\d+(\s*[+*-]\s*\d+)*$,S', trim($expr))) {
-		eval("\$a = $expr;");
-	}
+    $a = 0;
+    if (preg_match(',^\d+(\s*[+*-]\s*\d+)*$,S', trim($expr))) {
+        eval("\$a = $expr;");
+    }
 
-	return (int) $a;
+    return (int) $a;
 }
 
 /**
@@ -2596,7 +2596,7 @@ 
  *      Retourne `$a*$b/$c`
  **/
 function regledetrois($a, $b, $c) {
-	return round($a * $b / $c);
+    return round($a * $b / $c);
 }
 
 
@@ -2619,79 +2619,79 @@ 
  * @return string Suite de champs input hidden
  **/
 function form_hidden(?string $action = ''): string {
-	$action ??= '';
-
-	$contexte = [];
-	include_spip('inc/urls');
-	if (
-		($p = urls_decoder_url($action, ''))
-		&& reset($p)
-	) {
-		$fond = array_shift($p);
-		if ($fond != '404') {
-			$contexte = array_shift($p);
-			$contexte['page'] = $fond;
-			$action = preg_replace('/([?]' . preg_quote((string) $fond, '/') . '[^&=]*[0-9]+)(&|$)/', '?&', $action);
-		}
-	}
-	// defaire ce qu'a injecte urls_decoder_url : a revoir en modifiant la signature de urls_decoder_url
-	if (defined('_DEFINIR_CONTEXTE_TYPE') && _DEFINIR_CONTEXTE_TYPE) {
-		unset($contexte['type']);
-	}
-	if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') || _DEFINIR_CONTEXTE_TYPE_PAGE) {
-		unset($contexte['type-page']);
-	}
-
-	// on va remplir un tableau de valeurs en prenant bien soin de ne pas
-	// ecraser les elements de la forme mots[]=1&mots[]=2
-	$values = [];
-
-	// d'abord avec celles de l'url
-	if (false !== ($p = strpos($action, '?'))) {
-		foreach (preg_split('/&(amp;)?/S', substr($action, $p + 1)) as $c) {
-			$c = explode('=', (string) $c, 2);
-			$var = array_shift($c);
-			$val = array_shift($c) ?? '';
-			if ($var) {
-				$val = rawurldecode($val);
-				$var = rawurldecode($var); // decoder les [] eventuels
-				if (preg_match(',\[\]$,S', $var)) {
-					$values[] = [$var, $val];
-				} else {
-					if (!isset($values[$var])) {
-						$values[$var] = [$var, $val];
-					}
-				}
-			}
-		}
-	}
-
-	// ensuite avec celles du contexte, sans doublonner !
-	foreach ($contexte as $var => $val) {
-		if (preg_match(',\[\]$,S', (string) $var)) {
-			$values[] = [$var, $val];
-		} else {
-			if (!isset($values[$var])) {
-				$values[$var] = [$var, $val];
-			}
-		}
-	}
-
-	// puis on rassemble le tout
-	$hidden = [];
-	foreach ($values as $value) {
-		[$var, $val] = $value;
-		$hidden[] = '<input name="'
-			. entites_html($var)
-			. '"'
-			. (is_null($val)
-				? ''
-				: ' value="' . entites_html($val) . '"'
-			)
-			. ' type="hidden"' . "\n/>";
-	}
-
-	return implode('', $hidden);
+    $action ??= '';
+
+    $contexte = [];
+    include_spip('inc/urls');
+    if (
+        ($p = urls_decoder_url($action, ''))
+        && reset($p)
+    ) {
+        $fond = array_shift($p);
+        if ($fond != '404') {
+            $contexte = array_shift($p);
+            $contexte['page'] = $fond;
+            $action = preg_replace('/([?]' . preg_quote((string) $fond, '/') . '[^&=]*[0-9]+)(&|$)/', '?&', $action);
+        }
+    }
+    // defaire ce qu'a injecte urls_decoder_url : a revoir en modifiant la signature de urls_decoder_url
+    if (defined('_DEFINIR_CONTEXTE_TYPE') && _DEFINIR_CONTEXTE_TYPE) {
+        unset($contexte['type']);
+    }
+    if (!defined('_DEFINIR_CONTEXTE_TYPE_PAGE') || _DEFINIR_CONTEXTE_TYPE_PAGE) {
+        unset($contexte['type-page']);
+    }
+
+    // on va remplir un tableau de valeurs en prenant bien soin de ne pas
+    // ecraser les elements de la forme mots[]=1&mots[]=2
+    $values = [];
+
+    // d'abord avec celles de l'url
+    if (false !== ($p = strpos($action, '?'))) {
+        foreach (preg_split('/&(amp;)?/S', substr($action, $p + 1)) as $c) {
+            $c = explode('=', (string) $c, 2);
+            $var = array_shift($c);
+            $val = array_shift($c) ?? '';
+            if ($var) {
+                $val = rawurldecode($val);
+                $var = rawurldecode($var); // decoder les [] eventuels
+                if (preg_match(',\[\]$,S', $var)) {
+                    $values[] = [$var, $val];
+                } else {
+                    if (!isset($values[$var])) {
+                        $values[$var] = [$var, $val];
+                    }
+                }
+            }
+        }
+    }
+
+    // ensuite avec celles du contexte, sans doublonner !
+    foreach ($contexte as $var => $val) {
+        if (preg_match(',\[\]$,S', (string) $var)) {
+            $values[] = [$var, $val];
+        } else {
+            if (!isset($values[$var])) {
+                $values[$var] = [$var, $val];
+            }
+        }
+    }
+
+    // puis on rassemble le tout
+    $hidden = [];
+    foreach ($values as $value) {
+        [$var, $val] = $value;
+        $hidden[] = '<input name="'
+            . entites_html($var)
+            . '"'
+            . (is_null($val)
+                ? ''
+                : ' value="' . entites_html($val) . '"'
+            )
+            . ' type="hidden"' . "\n/>";
+    }
+
+    return implode('', $hidden);
 }
 
 
@@ -2713,7 +2713,7 @@ 
  *    - la première valeur du tableau sinon.
  **/
 function filtre_reset($array) {
-	return is_array($array) ? reset($array) : null;
+    return is_array($array) ? reset($array) : null;
 }
 
 /**
@@ -2734,7 +2734,7 @@ 
  *    - la dernière valeur du tableau sinon.
  **/
 function filtre_end($array) {
-	return is_array($array) ? end($array) : null;
+    return is_array($array) ? end($array) : null;
 }
 
 /**
@@ -2754,11 +2754,11 @@ 
  *
  **/
 function filtre_push($array, mixed $val) {
-	if (!is_array($array) || !array_push($array, $val)) {
-		return '';
-	}
+    if (!is_array($array) || !array_push($array, $val)) {
+        return '';
+    }
 
-	return $array;
+    return $array;
 }
 
 /**
@@ -2777,7 +2777,7 @@ 
  *     - `true` si la valeur existe dans le tableau, `false` sinon.
  **/
 function filtre_find($array, mixed $val) {
-	return (is_array($array) && in_array($val, $array));
+    return (is_array($array) && in_array($val, $array));
 }
 
 
@@ -2794,13 +2794,13 @@ 
  *     Contenu avec urls en absolus
  **/
 function urls_absolues_css($contenu, $source) {
-	$path = suivre_lien(url_absolue($source), './');
+    $path = suivre_lien(url_absolue($source), './');
 
-	return preg_replace_callback(
-		",url\s*\(\s*['\"]?([^'\"/#\s][^:]*)['\"]?\s*\),Uims",
-		fn($x) => "url('" . suivre_lien($path, $x[1]) . "')",
-		$contenu
-	);
+    return preg_replace_callback(
+        ",url\s*\(\s*['\"]?([^'\"/#\s][^:]*)['\"]?\s*\),Uims",
+        fn($x) => "url('" . suivre_lien($path, $x[1]) . "')",
+        $contenu
+    );
 }
 
 
@@ -2829,123 +2829,123 @@ 
  *     Chemin du fichier CSS inversé
  **/
 function direction_css($css, $voulue = '') {
-	if (!$css) {
-		return '';
-	}
-	if (!preg_match(',(_rtl)?\.css$,i', $css, $r)) {
-		return $css;
-	}
-	include_spip('inc/lang');
-	// si on a precise le sens voulu en argument, le prendre en compte
-	if ($voulue = strtolower($voulue)) {
-		if ($voulue != 'rtl' && $voulue != 'ltr') {
-			$voulue = lang_dir($voulue);
-		}
-	} else {
-		$voulue = lang_dir();
-	}
-
-	$r = count($r) > 1;
-	$right = $r ? 'left' : 'right'; // 'right' de la css lue en entree
-	$dir = $r ? 'rtl' : 'ltr';
-	$ndir = $r ? 'ltr' : 'rtl';
-
-	if ($voulue == $dir) {
-		return $css;
-	}
-
-	if (
-		// url absolue
-		preg_match(',^https?:,i', $css)
-		// ou qui contient un ?
-		|| ($p = strpos($css, '?')) !== false
-	) {
-		$distant = true;
-		$cssf = parse_url($css);
-		$cssf = $cssf['path'] . ($cssf['query'] ? '?' . $cssf['query'] : '');
-		$cssf = preg_replace(',[?:&=],', '_', $cssf);
-	} else {
-		$distant = false;
-		$cssf = $css;
-		// 1. regarder d'abord si un fichier avec la bonne direction n'est pas aussi
-		//propose (rien a faire dans ce cas)
-		$f = preg_replace(',(_rtl)?\.css$,i', '_' . $ndir . '.css', $css);
-		if (@file_exists($f)) {
-			return $f;
-		}
-	}
-
-	// 2.
-	$dir_var = sous_repertoire(_DIR_VAR, 'cache-css');
-	$f = $dir_var
-		. preg_replace(',.*/(.*?)(_rtl)?\.css,', '\1', $cssf)
-		. '.' . substr(md5($cssf), 0, 4) . '_' . $ndir . '.css';
-
-	// la css peut etre distante (url absolue !)
-	$contenu = null;
-	if ($distant) {
-		include_spip('inc/distant');
-		$res = recuperer_url($css);
-		if (!$res || !($contenu = $res['page'])) {
-			return $css;
-		}
-	} else {
-		if (
-			@filemtime($f) > @filemtime($css)
-			&& _VAR_MODE != 'recalcul'
-		) {
-			return $f;
-		}
-		if (!lire_fichier($css, $contenu)) {
-			return $css;
-		}
-	}
-
-
-	// Inverser la direction gauche-droite en utilisant CSSTidy qui gere aussi les shorthands
-	include_spip('lib/csstidy/class.csstidy');
-	$parser = new csstidy();
-	$parser->set_cfg('optimise_shorthands', 0);
-	$parser->set_cfg('reverse_left_and_right', true);
-	$parser->parse($contenu);
-
-	$contenu = $parser->print->plain();
-
-
-	// reperer les @import auxquels il faut propager le direction_css
-	preg_match_all(",\@import\s*url\s*\(\s*['\"]?([^'\"/][^:]*)['\"]?\s*\),Uims", (string) $contenu, $regs);
-	$src = [];
-	$src_direction_css = [];
-	$src_faux_abs = [];
-	$d = dirname($css);
-	foreach ($regs[1] as $k => $import_css) {
-		$css_direction = direction_css("$d/$import_css", $voulue);
-		// si la css_direction est dans le meme path que la css d'origine, on tronque le path, elle sera passee en absolue
-		if (substr($css_direction, 0, strlen($d) + 1) == "$d/") {
-			$css_direction = substr($css_direction, strlen($d) + 1);
-		} // si la css_direction commence par $dir_var on la fait passer pour une absolue
-		elseif (str_starts_with($css_direction, $dir_var)) {
-			$css_direction = substr($css_direction, strlen($dir_var));
-			$src_faux_abs['/@@@@@@/' . $css_direction] = $css_direction;
-			$css_direction = '/@@@@@@/' . $css_direction;
-		}
-		$src[] = $regs[0][$k];
-		$src_direction_css[] = str_replace($import_css, $css_direction, (string) $regs[0][$k]);
-	}
-	$contenu = str_replace($src, $src_direction_css, (string) $contenu);
-
-	$contenu = urls_absolues_css($contenu, $css);
-
-	// virer les fausses url absolues que l'on a mis dans les import
-	if ($src_faux_abs !== []) {
-		$contenu = str_replace(array_keys($src_faux_abs), $src_faux_abs, $contenu);
-	}
-
-	if (!ecrire_fichier($f, $contenu)) {
-		return $css;
-	}
-
-	return $f;
+    if (!$css) {
+        return '';
+    }
+    if (!preg_match(',(_rtl)?\.css$,i', $css, $r)) {
+        return $css;
+    }
+    include_spip('inc/lang');
+    // si on a precise le sens voulu en argument, le prendre en compte
+    if ($voulue = strtolower($voulue)) {
+        if ($voulue != 'rtl' && $voulue != 'ltr') {
+            $voulue = lang_dir($voulue);
+        }
+    } else {
+        $voulue = lang_dir();
+    }
+
+    $r = count($r) > 1;
+    $right = $r ? 'left' : 'right'; // 'right' de la css lue en entree
+    $dir = $r ? 'rtl' : 'ltr';
+    $ndir = $r ? 'ltr' : 'rtl';
+
+    if ($voulue == $dir) {
+        return $css;
+    }
+
+    if (
+        // url absolue
+        preg_match(',^https?:,i', $css)
+        // ou qui contient un ?
+        || ($p = strpos($css, '?')) !== false
+    ) {
+        $distant = true;
+        $cssf = parse_url($css);
+        $cssf = $cssf['path'] . ($cssf['query'] ? '?' . $cssf['query'] : '');
+        $cssf = preg_replace(',[?:&=],', '_', $cssf);
+    } else {
+        $distant = false;
+        $cssf = $css;
+        // 1. regarder d'abord si un fichier avec la bonne direction n'est pas aussi
+        //propose (rien a faire dans ce cas)
+        $f = preg_replace(',(_rtl)?\.css$,i', '_' . $ndir . '.css', $css);
+        if (@file_exists($f)) {
+            return $f;
+        }
+    }
+
+    // 2.
+    $dir_var = sous_repertoire(_DIR_VAR, 'cache-css');
+    $f = $dir_var
+        . preg_replace(',.*/(.*?)(_rtl)?\.css,', '\1', $cssf)
+        . '.' . substr(md5($cssf), 0, 4) . '_' . $ndir . '.css';
+
+    // la css peut etre distante (url absolue !)
+    $contenu = null;
+    if ($distant) {
+        include_spip('inc/distant');
+        $res = recuperer_url($css);
+        if (!$res || !($contenu = $res['page'])) {
+            return $css;
+        }
+    } else {
+        if (
+            @filemtime($f) > @filemtime($css)
+            && _VAR_MODE != 'recalcul'
+        ) {
+            return $f;
+        }
+        if (!lire_fichier($css, $contenu)) {
+            return $css;
+        }
+    }
+
+
+    // Inverser la direction gauche-droite en utilisant CSSTidy qui gere aussi les shorthands
+    include_spip('lib/csstidy/class.csstidy');
+    $parser = new csstidy();
+    $parser->set_cfg('optimise_shorthands', 0);
+    $parser->set_cfg('reverse_left_and_right', true);
+    $parser->parse($contenu);
+
+    $contenu = $parser->print->plain();
+
+
+    // reperer les @import auxquels il faut propager le direction_css
+    preg_match_all(",\@import\s*url\s*\(\s*['\"]?([^'\"/][^:]*)['\"]?\s*\),Uims", (string) $contenu, $regs);
+    $src = [];
+    $src_direction_css = [];
+    $src_faux_abs = [];
+    $d = dirname($css);
+    foreach ($regs[1] as $k => $import_css) {
+        $css_direction = direction_css("$d/$import_css", $voulue);
+        // si la css_direction est dans le meme path que la css d'origine, on tronque le path, elle sera passee en absolue
+        if (substr($css_direction, 0, strlen($d) + 1) == "$d/") {
+            $css_direction = substr($css_direction, strlen($d) + 1);
+        } // si la css_direction commence par $dir_var on la fait passer pour une absolue
+        elseif (str_starts_with($css_direction, $dir_var)) {
+            $css_direction = substr($css_direction, strlen($dir_var));
+            $src_faux_abs['/@@@@@@/' . $css_direction] = $css_direction;
+            $css_direction = '/@@@@@@/' . $css_direction;
+        }
+        $src[] = $regs[0][$k];
+        $src_direction_css[] = str_replace($import_css, $css_direction, (string) $regs[0][$k]);
+    }
+    $contenu = str_replace($src, $src_direction_css, (string) $contenu);
+
+    $contenu = urls_absolues_css($contenu, $css);
+
+    // virer les fausses url absolues que l'on a mis dans les import
+    if ($src_faux_abs !== []) {
+        $contenu = str_replace(array_keys($src_faux_abs), $src_faux_abs, $contenu);
+    }
+
+    if (!ecrire_fichier($f, $contenu)) {
+        return $css;
+    }
+
+    return $f;
 }
 
 
@@ -2968,47 +2968,47 @@ 
  *     - Chemin ou URL du fichier CSS source sinon.
  **/
 function url_absolue_css($css) {
-	if (!preg_match(',\.css$,i', $css, $r)) {
-		return $css;
-	}
+    if (!preg_match(',\.css$,i', $css, $r)) {
+        return $css;
+    }
 
-	$url_absolue_css = url_absolue($css);
+    $url_absolue_css = url_absolue($css);
 
-	$f = basename($css, '.css');
-	$f = sous_repertoire(_DIR_VAR, 'cache-css')
-		. preg_replace(',(.*?)(_rtl|_ltr)?$,', "\\1-urlabs-" . substr(md5("$css-urlabs"), 0, 4) . "\\2", $f)
-		. '.css';
+    $f = basename($css, '.css');
+    $f = sous_repertoire(_DIR_VAR, 'cache-css')
+        . preg_replace(',(.*?)(_rtl|_ltr)?$,', "\\1-urlabs-" . substr(md5("$css-urlabs"), 0, 4) . "\\2", $f)
+        . '.css';
 
-	if (@filemtime($f) > @filemtime($css) && _VAR_MODE != 'recalcul') {
-		return $f;
-	}
+    if (@filemtime($f) > @filemtime($css) && _VAR_MODE != 'recalcul') {
+        return $f;
+    }
 
-	$contenu = null;
-	if ($url_absolue_css == $css) {
-		if (
-			strncmp((string) $GLOBALS['meta']['adresse_site'], $css, $l = strlen((string) $GLOBALS['meta']['adresse_site'])) != 0
-			|| !lire_fichier(_DIR_RACINE . substr($css, $l), $contenu)
-		) {
-			include_spip('inc/distant');
-			$contenu = recuperer_url($css);
-			$contenu = $contenu['page'] ?? '';
-			if (!$contenu) {
-				return $css;
-			}
-		}
-	} elseif (!lire_fichier($css, $contenu)) {
-		return $css;
-	}
+    $contenu = null;
+    if ($url_absolue_css == $css) {
+        if (
+            strncmp((string) $GLOBALS['meta']['adresse_site'], $css, $l = strlen((string) $GLOBALS['meta']['adresse_site'])) != 0
+            || !lire_fichier(_DIR_RACINE . substr($css, $l), $contenu)
+        ) {
+            include_spip('inc/distant');
+            $contenu = recuperer_url($css);
+            $contenu = $contenu['page'] ?? '';
+            if (!$contenu) {
+                return $css;
+            }
+        }
+    } elseif (!lire_fichier($css, $contenu)) {
+        return $css;
+    }
 
-	// passer les url relatives a la css d'origine en url absolues
-	$contenu = urls_absolues_css($contenu, $css);
+    // passer les url relatives a la css d'origine en url absolues
+    $contenu = urls_absolues_css($contenu, $css);
 
-	// ecrire la css
-	if (!ecrire_fichier($f, $contenu)) {
-		return $css;
-	}
+    // ecrire la css
+    if (!ecrire_fichier($f, $contenu)) {
+        return $css;
+    }
 
-	return $f;
+    return $f;
 }
 
 
@@ -3042,24 +3042,24 @@ 
  *     Valeur trouvée ou valeur par défaut.
  **/
 function table_valeur(mixed $table, $cle, mixed $defaut = '', $conserver_null = false) {
-	foreach (explode('/', $cle) as $k) {
-		$table = (is_string($table) ? @unserialize($table) : $table);
+    foreach (explode('/', $cle) as $k) {
+        $table = (is_string($table) ? @unserialize($table) : $table);
 
-		if (is_object($table)) {
-			$table = ($k !== '' && isset($table->$k)) ? $table->$k : $defaut;
-		} elseif (is_array($table)) {
-			if ($conserver_null) {
-				$table = array_key_exists($k, $table) ? $table[$k] : $defaut;
-			} else {
-				$table = ($table[$k] ?? $defaut);
-			}
-		} else {
-			$table = $defaut;
-			break;
-		}
-	}
+        if (is_object($table)) {
+            $table = ($k !== '' && isset($table->$k)) ? $table->$k : $defaut;
+        } elseif (is_array($table)) {
+            if ($conserver_null) {
+                $table = array_key_exists($k, $table) ? $table[$k] : $defaut;
+            } else {
+                $table = ($table[$k] ?? $defaut);
+            }
+        } else {
+            $table = $defaut;
+            break;
+        }
+    }
 
-	return $table;
+    return $table;
 }
 
 /**
@@ -3092,22 +3092,22 @@ 
  *     - string : expression trouvée.
  **/
 function filtre_match_dist(?string $texte, $expression, $modif = 'UuimsS', $capte = 0) {
-	if ((int) $modif && $capte == 0) {
-		$capte = $modif;
-		$modif = 'UuimsS';
-	}
-	$expression = str_replace('\/', '/', $expression);
-	$expression = str_replace('/', '\/', $expression);
+    if ((int) $modif && $capte == 0) {
+        $capte = $modif;
+        $modif = 'UuimsS';
+    }
+    $expression = str_replace('\/', '/', $expression);
+    $expression = str_replace('/', '\/', $expression);
 
-	if (preg_match('/' . $expression . '/' . $modif, $texte ?? '', $r)) {
-		if (isset($r[$capte])) {
-			return $r[$capte];
-		} else {
-			return true;
-		}
-	}
+    if (preg_match('/' . $expression . '/' . $modif, $texte ?? '', $r)) {
+        if (isset($r[$capte])) {
+            return $r[$capte];
+        } else {
+            return true;
+        }
+    }
 
-	return false;
+    return false;
 }
 
 
@@ -3134,14 +3134,14 @@ 
  *     Texte
  **/
 function replace(?string $texte, string $expression, string $replace = '', string $modif = 'UimsS'): string {
-	if (null === $texte) {
-		return '';
-	}
+    if (null === $texte) {
+        return '';
+    }
 
-	$expression = str_replace('\/', '/', $expression);
-	$expression = str_replace('/', '\/', $expression);
+    $expression = str_replace('\/', '/', $expression);
+    $expression = str_replace('/', '\/', $expression);
 
-	return (string) preg_replace('/' . $expression . '/' . $modif, $replace, $texte);
+    return (string) preg_replace('/' . $expression . '/' . $modif, $replace, $texte);
 }
 
 
@@ -3159,25 +3159,25 @@ 
  **/
 function traiter_doublons_documents(&$doublons, $letexte) {
 
-	// Verifier dans le texte & les notes (pas beau, helas)
-	$t = $letexte . $GLOBALS['les_notes'];
+    // Verifier dans le texte & les notes (pas beau, helas)
+    $t = $letexte . $GLOBALS['les_notes'];
 
-	if (
-		strstr($t, 'spip_document_')
-		&& preg_match_all(
-			',<[^>]+\sclass=["\']spip_document_(\d+)[\s"\'],imsS',
-			$t,
-			$matches,
-			PREG_PATTERN_ORDER
-		)
-	) {
-		if (!isset($doublons['documents'])) {
-			$doublons['documents'] = '';
-		}
-		$doublons['documents'] .= ',' . implode(',', $matches[1]);
-	}
+    if (
+        strstr($t, 'spip_document_')
+        && preg_match_all(
+            ',<[^>]+\sclass=["\']spip_document_(\d+)[\s"\'],imsS',
+            $t,
+            $matches,
+            PREG_PATTERN_ORDER
+        )
+    ) {
+        if (!isset($doublons['documents'])) {
+            $doublons['documents'] = '';
+        }
+        $doublons['documents'] .= ',' . implode(',', $matches[1]);
+    }
 
-	return $letexte;
+    return $letexte;
 }
 
 /**
@@ -3191,7 +3191,7 @@ 
  * @return string Chaîne vide
  **/
 function vide(mixed $texte) {
-	return '';
+    return '';
 }
 
 //
@@ -3220,23 +3220,23 @@ 
  *      Code HTML résultant
  **/
 function env_to_params($env, $ignore_params = []) {
-	$ignore_params = array_merge(
-		['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
-		$ignore_params
-	);
-	if (!is_array($env)) {
-		$env = unserialize($env);
-	}
-	$texte = '';
-	if ($env) {
-		foreach ($env as $i => $j) {
-			if (is_string($j) && !in_array($i, $ignore_params)) {
-				$texte .= "<param name='" . attribut_html($i) . "'\n\tvalue='" . attribut_html($j) . "' />";
-			}
-		}
-	}
-
-	return $texte;
+    $ignore_params = array_merge(
+        ['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
+        $ignore_params
+    );
+    if (!is_array($env)) {
+        $env = unserialize($env);
+    }
+    $texte = '';
+    if ($env) {
+        foreach ($env as $i => $j) {
+            if (is_string($j) && !in_array($i, $ignore_params)) {
+                $texte .= "<param name='" . attribut_html($i) . "'\n\tvalue='" . attribut_html($j) . "' />";
+            }
+        }
+    }
+
+    return $texte;
 }
 
 /**
@@ -3259,23 +3259,23 @@ 
  *      Code HTML résultant
  **/
 function env_to_attributs($env, $ignore_params = []) {
-	$ignore_params = array_merge(
-		['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
-		$ignore_params
-	);
-	if (!is_array($env)) {
-		$env = unserialize($env);
-	}
-	$texte = '';
-	if ($env) {
-		foreach ($env as $i => $j) {
-			if (is_string($j) && !in_array($i, $ignore_params)) {
-				$texte .= attribut_html($i) . "='" . attribut_html($j) . "' ";
-			}
-		}
-	}
+    $ignore_params = array_merge(
+        ['id', 'lang', 'id_document', 'date', 'date_redac', 'align', 'fond', '', 'recurs', 'emb', 'dir_racine'],
+        $ignore_params
+    );
+    if (!is_array($env)) {
+        $env = unserialize($env);
+    }
+    $texte = '';
+    if ($env) {
+        foreach ($env as $i => $j) {
+            if (is_string($j) && !in_array($i, $ignore_params)) {
+                $texte .= attribut_html($i) . "='" . attribut_html($j) . "' ";
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -3293,7 +3293,7 @@ 
  * @return string Chaînes concaténés
  **/
 function concat(...$args): string {
-	return implode('', $args);
+    return implode('', $args);
 }
 
 
@@ -3313,23 +3313,23 @@ 
  *     Contenu du ou des fichiers, concaténé
  **/
 function charge_scripts($files, $script = true) {
-	$flux = '';
-	foreach (is_array($files) ? $files : explode('|', $files) as $file) {
-		if (!is_string($file)) {
-			continue;
-		}
-		if ($script) {
-			$file = preg_match(',^\w+$,', $file) ? "javascript/$file.js" : '';
-		}
-		if ($file) {
-			$path = find_in_path($file);
-			if ($path) {
-				$flux .= spip_file_get_contents($path);
-			}
-		}
-	}
-
-	return $flux;
+    $flux = '';
+    foreach (is_array($files) ? $files : explode('|', $files) as $file) {
+        if (!is_string($file)) {
+            continue;
+        }
+        if ($script) {
+            $file = preg_match(',^\w+$,', $file) ? "javascript/$file.js" : '';
+        }
+        if ($file) {
+            $path = find_in_path($file);
+            if ($path) {
+                $flux .= spip_file_get_contents($path);
+            }
+        }
+    }
+
+    return $flux;
 }
 
 /**
@@ -3340,24 +3340,24 @@ 
  * @return string
  */
 function http_img_variante_svg_si_possible($img_file) {
-	// on peut fournir une icone generique -xx.svg qui fera le job dans toutes les tailles, et qui est prioritaire sur le png
-	// si il y a un .svg a la bonne taille (-16.svg) a cote, on l'utilise en remplacement du -16.png
-	if (
-		preg_match(',-(\d+)[.](png|gif|svg)$,', $img_file, $m)
-		&& ($variante_svg_generique = substr($img_file, 0, -strlen($m[0])) . '-xx.svg')
-		&& file_exists($variante_svg_generique)
-	) {
-		if (
-			($variante_svg_size = substr($variante_svg_generique, 0, -6) . $m[1] . '.svg')
-			&& file_exists($variante_svg_size)
-		) {
-			$img_file = $variante_svg_size;
-		} else {
-			$img_file = $variante_svg_generique;
-		}
-	}
-
-	return $img_file;
+    // on peut fournir une icone generique -xx.svg qui fera le job dans toutes les tailles, et qui est prioritaire sur le png
+    // si il y a un .svg a la bonne taille (-16.svg) a cote, on l'utilise en remplacement du -16.png
+    if (
+        preg_match(',-(\d+)[.](png|gif|svg)$,', $img_file, $m)
+        && ($variante_svg_generique = substr($img_file, 0, -strlen($m[0])) . '-xx.svg')
+        && file_exists($variante_svg_generique)
+    ) {
+        if (
+            ($variante_svg_size = substr($variante_svg_generique, 0, -6) . $m[1] . '.svg')
+            && file_exists($variante_svg_size)
+        ) {
+            $img_file = $variante_svg_size;
+        } else {
+            $img_file = $variante_svg_generique;
+        }
+    }
+
+    return $img_file;
 }
 
 /**
@@ -3378,51 +3378,51 @@ 
  */
 function http_img_pack($img, $alt, $atts = '', $title = '', $options = []) {
 
-	$img_file = $img;
-	if ($p = strpos($img_file, '?')) {
-		$img_file = substr($img_file, 0, $p);
-	}
-	if (!isset($options['chemin_image']) || $options['chemin_image'] == true) {
-		$img_file = chemin_image($img);
-	}
-	else {
-		if (!isset($options['variante_svg_si_possible']) || $options['variante_svg_si_possible'] == true) {
-			$img_file = http_img_variante_svg_si_possible($img_file);
-		}
-	}
-	if (stripos($atts, 'width') === false) {
-		// utiliser directement l'info de taille presente dans le nom
-		if (
-			(!isset($options['utiliser_suffixe_size']) || $options['utiliser_suffixe_size'] == true || str_contains($img_file, '-xx.svg'))
-			&& (preg_match(',-(\d+)[.](png|gif|svg)$,', $img, $regs) || preg_match(',\?(\d+)px$,', $img, $regs))
-		) {
-			$largeur = $hauteur = (int) $regs[1];
-		} else {
-			$taille = taille_image($img_file);
-			[$hauteur, $largeur] = $taille;
-			if (!$hauteur || !$largeur) {
-				return '';
-			}
-		}
-		$atts .= " width='" . $largeur . "' height='" . $hauteur . "'";
-	}
-
-	if (file_exists($img_file)) {
-		$img_file = timestamp($img_file);
-	}
-	if ($alt === false) {
-		$alt = '';
-	}
-	elseif ($alt || $alt === '') {
-		$alt = " alt='" . attribut_html($alt) . "'";
-	}
-	else {
-		$alt = " alt='" . attribut_html($title) . "'";
-	}
-	return "<img src='" . attribut_html($img_file) . "'$alt"
-	. ($title ? ' title="' . attribut_html($title) . '"' : '')
-	. ' ' . ltrim($atts)
-	. ' />';
+    $img_file = $img;
+    if ($p = strpos($img_file, '?')) {
+        $img_file = substr($img_file, 0, $p);
+    }
+    if (!isset($options['chemin_image']) || $options['chemin_image'] == true) {
+        $img_file = chemin_image($img);
+    }
+    else {
+        if (!isset($options['variante_svg_si_possible']) || $options['variante_svg_si_possible'] == true) {
+            $img_file = http_img_variante_svg_si_possible($img_file);
+        }
+    }
+    if (stripos($atts, 'width') === false) {
+        // utiliser directement l'info de taille presente dans le nom
+        if (
+            (!isset($options['utiliser_suffixe_size']) || $options['utiliser_suffixe_size'] == true || str_contains($img_file, '-xx.svg'))
+            && (preg_match(',-(\d+)[.](png|gif|svg)$,', $img, $regs) || preg_match(',\?(\d+)px$,', $img, $regs))
+        ) {
+            $largeur = $hauteur = (int) $regs[1];
+        } else {
+            $taille = taille_image($img_file);
+            [$hauteur, $largeur] = $taille;
+            if (!$hauteur || !$largeur) {
+                return '';
+            }
+        }
+        $atts .= " width='" . $largeur . "' height='" . $hauteur . "'";
+    }
+
+    if (file_exists($img_file)) {
+        $img_file = timestamp($img_file);
+    }
+    if ($alt === false) {
+        $alt = '';
+    }
+    elseif ($alt || $alt === '') {
+        $alt = " alt='" . attribut_html($alt) . "'";
+    }
+    else {
+        $alt = " alt='" . attribut_html($title) . "'";
+    }
+    return "<img src='" . attribut_html($img_file) . "'$alt"
+    . ($title ? ' title="' . attribut_html($title) . '"' : '')
+    . ' ' . ltrim($atts)
+    . ' />';
 }
 
 /**
@@ -3434,70 +3434,70 @@ 
  * @return string
  */
 function http_style_background($img, $att = '', $size = null) {
-	if ($size && is_numeric($size)) {
-		$size = trim($size) . 'px';
-	}
-	return " style='background" .
-		($att ? '' : '-image') . ': url("' . chemin_image($img) . '")' . ($att ? (' ' . $att) : '') . ';'
-		. ($size ? "background-size:{$size};" : '')
-		. "'";
+    if ($size && is_numeric($size)) {
+        $size = trim($size) . 'px';
+    }
+    return " style='background" .
+        ($att ? '' : '-image') . ': url("' . chemin_image($img) . '")' . ($att ? (' ' . $att) : '') . ';'
+        . ($size ? "background-size:{$size};" : '')
+        . "'";
 }
 
 
 function helper_filtre_balise_img_svg_arguments($alt_or_size, $class_or_size, $size) {
-	$args = [$alt_or_size, $class_or_size, $size];
-	while (is_null(end($args)) && count($args)) {
-		array_pop($args);
-	}
-	if ($args === []) {
-		return [null, null, null];
-	}
-	if (count($args) < 3) {
-		$maybe_size = array_pop($args);
-		// @2x
-		// @1.5x
-		// 512
-		// 512x*
-		// 512x300
-		if (
-			!strlen((string) $maybe_size)
-			|| !preg_match(',^(@\d+(\.\d+)?x|\d+(x\*)?|\d+x\d+)$,', trim((string) $maybe_size))
-		) {
-			$args[] = $maybe_size;
-			$maybe_size = null;
-		}
-		while (count($args) < 2) {
-			$args[] = null; // default alt or class
-		}
-		$args[] = $maybe_size;
-	}
-	return $args;
+    $args = [$alt_or_size, $class_or_size, $size];
+    while (is_null(end($args)) && count($args)) {
+        array_pop($args);
+    }
+    if ($args === []) {
+        return [null, null, null];
+    }
+    if (count($args) < 3) {
+        $maybe_size = array_pop($args);
+        // @2x
+        // @1.5x
+        // 512
+        // 512x*
+        // 512x300
+        if (
+            !strlen((string) $maybe_size)
+            || !preg_match(',^(@\d+(\.\d+)?x|\d+(x\*)?|\d+x\d+)$,', trim((string) $maybe_size))
+        ) {
+            $args[] = $maybe_size;
+            $maybe_size = null;
+        }
+        while (count($args) < 2) {
+            $args[] = null; // default alt or class
+        }
+        $args[] = $maybe_size;
+    }
+    return $args;
 }
 
 function helper_filtre_balise_img_svg_size($img, $size) {
-	// si size est de la forme '@2x' c'est un coeff multiplicateur sur la densite
-	if (str_starts_with((string) $size, '@') && str_ends_with((string) $size, 'x')) {
-		$coef = (float) substr((string) $size, 1, -1);
-		[$h, $w] = taille_image($img);
-		$height = (int) round($h / $coef);
-		$width = (int) round($w / $coef);
-	}
-	// sinon c'est une valeur seule si image caree ou largeurxhauteur
-	else {
-		$size = explode('x', (string) $size, 2);
-		$size = array_map('trim', $size);
-		$height = $width = (int) array_shift($size);
-
-		if (count($size) && reset($size)) {
-			$height = array_shift($size);
-			if ($height === '*') {
-				[$h, $w] = taille_image($img);
-				$height = (int) round($h * $width / $w);
-			}
-		}
-	}
-
-	return [$width, $height];
+    // si size est de la forme '@2x' c'est un coeff multiplicateur sur la densite
+    if (str_starts_with((string) $size, '@') && str_ends_with((string) $size, 'x')) {
+        $coef = (float) substr((string) $size, 1, -1);
+        [$h, $w] = taille_image($img);
+        $height = (int) round($h / $coef);
+        $width = (int) round($w / $coef);
+    }
+    // sinon c'est une valeur seule si image caree ou largeurxhauteur
+    else {
+        $size = explode('x', (string) $size, 2);
+        $size = array_map('trim', $size);
+        $height = $width = (int) array_shift($size);
+
+        if (count($size) && reset($size)) {
+            $height = array_shift($size);
+            if ($height === '*') {
+                [$h, $w] = taille_image($img);
+                $height = (int) round($h * $width / $w);
+            }
+        }
+    }
+
+    return [$width, $height];
 }
 
 /**
@@ -3533,38 +3533,38 @@ 
  */
 function filtre_balise_img_dist($img, $alt = '', $class = null, $size = null) {
 
-	[$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
+    [$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
 
-	$img = trim((string) $img);
-	if (str_starts_with($img, '<img')) {
-		if (!is_null($alt)) {
-			$img = inserer_attribut($img, 'alt', $alt);
-		}
-		if (!is_null($class)) {
-			$img = strlen((string) $class) ? inserer_attribut($img, 'class', $class) : vider_attribut($img, 'class');
-		}
-	}
-	else {
-		$img = http_img_pack(
-			$img,
-			$alt,
-			$class ? " class='" . attribut_html($class) . "'" : '',
-			'',
-			['chemin_image' => false, 'utiliser_suffixe_size' => false]
-		);
-		if (is_null($alt)) {
-			$img = vider_attribut($img, 'alt');
-		}
-	}
+    $img = trim((string) $img);
+    if (str_starts_with($img, '<img')) {
+        if (!is_null($alt)) {
+            $img = inserer_attribut($img, 'alt', $alt);
+        }
+        if (!is_null($class)) {
+            $img = strlen((string) $class) ? inserer_attribut($img, 'class', $class) : vider_attribut($img, 'class');
+        }
+    }
+    else {
+        $img = http_img_pack(
+            $img,
+            $alt,
+            $class ? " class='" . attribut_html($class) . "'" : '',
+            '',
+            ['chemin_image' => false, 'utiliser_suffixe_size' => false]
+        );
+        if (is_null($alt)) {
+            $img = vider_attribut($img, 'alt');
+        }
+    }
 
-	if ($img && !is_null($size) && strlen($size = trim((string) $size))) {
-		[$width, $height] = helper_filtre_balise_img_svg_size($img, $size);
+    if ($img && !is_null($size) && strlen($size = trim((string) $size))) {
+        [$width, $height] = helper_filtre_balise_img_svg_size($img, $size);
 
-		$img = inserer_attribut($img, 'width', $width);
-		$img = inserer_attribut($img, 'height', $height);
-	}
+        $img = inserer_attribut($img, 'width', $width);
+        $img = inserer_attribut($img, 'height', $height);
+    }
 
-	return $img;
+    return $img;
 }
 
 
@@ -3598,77 +3598,77 @@ 
  */
 function filtre_balise_svg_dist($img, $alt = '', $class = null, $size = null) {
 
-	$svg = null;
-	$img = trim($img);
-	$img_file = $img;
-	if (!str_contains($img, '<svg')) {
-		if ($p = strpos($img_file, '?')) {
-			$img_file = substr($img_file, 0, $p);
-		}
-
-		// ne jamais operer directement sur une image distante pour des raisons de perfo
-		// la copie locale a toutes les chances d'etre la ou de resservir
-		if (tester_url_absolue($img_file)) {
-			include_spip('inc/distant');
-			$fichier = copie_locale($img_file);
-			$img_file = ($fichier ? _DIR_RACINE . $fichier : $img_file);
-		}
-
-		if (
-			!$img_file
-			|| !file_exists($img_file)
-			|| !$svg = file_get_contents($img_file)
-		) {
-			return '';
-		}
-	}
-
-	if (!preg_match(",<svg\b[^>]*>,UimsS", $svg, $match)) {
-		return '';
-	}
-
-	[$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
-
-	$balise_svg = $match[0];
-	$balise_svg_source = $balise_svg;
-
-	// entete XML à supprimer
-	$svg = preg_replace(',^\s*<\?xml[^>]*\?>,', '', $svg);
-
-	// IE est toujours mon ami
-	$balise_svg = inserer_attribut($balise_svg, 'focusable', 'false');
-
-	// regler la classe
-	if (!is_null($class)) {
-		$balise_svg = strlen((string) $class)
-			? inserer_attribut($balise_svg, 'class', $class)
-			: vider_attribut($balise_svg, 'class');
-	}
-
-	// regler le alt
-	if ($alt) {
-		$balise_svg = inserer_attribut($balise_svg, 'role', 'img');
-		$id = 'img-svg-title-' . substr(md5("$img_file:$svg:$alt"), 0, 4);
-		$balise_svg = inserer_attribut($balise_svg, 'aria-labelledby', $id);
-		$title = "<title id=\"$id\">" . entites_html($alt) . "</title>\n";
-		$balise_svg .= $title;
-	}
-	else {
-		$balise_svg = inserer_attribut($balise_svg, 'aria-hidden', 'true');
-	}
-
-	$svg = str_replace($balise_svg_source, $balise_svg, $svg);
-
-	if (!is_null($size) && strlen($size = trim((string) $size))) {
-		[$width, $height] = helper_filtre_balise_img_svg_size($svg, $size);
-
-		if (!function_exists('svg_redimensionner')) {
-			include_spip('inc/svg');
-		}
-		$svg = svg_redimensionner($svg, $width, $height);
-	}
-
-	return $svg;
+    $svg = null;
+    $img = trim($img);
+    $img_file = $img;
+    if (!str_contains($img, '<svg')) {
+        if ($p = strpos($img_file, '?')) {
+            $img_file = substr($img_file, 0, $p);
+        }
+
+        // ne jamais operer directement sur une image distante pour des raisons de perfo
+        // la copie locale a toutes les chances d'etre la ou de resservir
+        if (tester_url_absolue($img_file)) {
+            include_spip('inc/distant');
+            $fichier = copie_locale($img_file);
+            $img_file = ($fichier ? _DIR_RACINE . $fichier : $img_file);
+        }
+
+        if (
+            !$img_file
+            || !file_exists($img_file)
+            || !$svg = file_get_contents($img_file)
+        ) {
+            return '';
+        }
+    }
+
+    if (!preg_match(",<svg\b[^>]*>,UimsS", $svg, $match)) {
+        return '';
+    }
+
+    [$alt, $class, $size] = helper_filtre_balise_img_svg_arguments($alt, $class, $size);
+
+    $balise_svg = $match[0];
+    $balise_svg_source = $balise_svg;
+
+    // entete XML à supprimer
+    $svg = preg_replace(',^\s*<\?xml[^>]*\?>,', '', $svg);
+
+    // IE est toujours mon ami
+    $balise_svg = inserer_attribut($balise_svg, 'focusable', 'false');
+
+    // regler la classe
+    if (!is_null($class)) {
+        $balise_svg = strlen((string) $class)
+            ? inserer_attribut($balise_svg, 'class', $class)
+            : vider_attribut($balise_svg, 'class');
+    }
+
+    // regler le alt
+    if ($alt) {
+        $balise_svg = inserer_attribut($balise_svg, 'role', 'img');
+        $id = 'img-svg-title-' . substr(md5("$img_file:$svg:$alt"), 0, 4);
+        $balise_svg = inserer_attribut($balise_svg, 'aria-labelledby', $id);
+        $title = "<title id=\"$id\">" . entites_html($alt) . "</title>\n";
+        $balise_svg .= $title;
+    }
+    else {
+        $balise_svg = inserer_attribut($balise_svg, 'aria-hidden', 'true');
+    }
+
+    $svg = str_replace($balise_svg_source, $balise_svg, $svg);
+
+    if (!is_null($size) && strlen($size = trim((string) $size))) {
+        [$width, $height] = helper_filtre_balise_img_svg_size($svg, $size);
+
+        if (!function_exists('svg_redimensionner')) {
+            include_spip('inc/svg');
+        }
+        $svg = svg_redimensionner($svg, $width, $height);
+    }
+
+    return $svg;
 }
 
 /**
@@ -3692,37 +3692,37 @@ 
  *         - tout : retourne toutes les informations du plugin actif
  **/
 function filtre_info_plugin_dist($plugin, $type_info, $reload = false) {
-	include_spip('inc/plugin');
-	$plugin = strtoupper($plugin);
-	$plugins_actifs = liste_plugin_actifs();
-
-	if (!$plugin) {
-		return serialize(array_keys($plugins_actifs));
-	} elseif (empty($plugins_actifs[$plugin]) && !$reload) {
-		return '';
-	} elseif ($type_info == 'est_actif' && !$reload) {
-		return $plugins_actifs[$plugin] ? 1 : 0;
-	} elseif (isset($plugins_actifs[$plugin][$type_info]) && !$reload) {
-		return $plugins_actifs[$plugin][$type_info];
-	} else {
-		$get_infos = charger_fonction('get_infos', 'plugins');
-		// On prend en compte les extensions
-		if (!is_dir($plugins_actifs[$plugin]['dir_type'])) {
-			$dir_plugins = constant($plugins_actifs[$plugin]['dir_type']);
-		} else {
-			$dir_plugins = $plugins_actifs[$plugin]['dir_type'];
-		}
-		if (!$infos = $get_infos($plugins_actifs[$plugin]['dir'], $reload, $dir_plugins)) {
-			return '';
-		}
-		if ($type_info == 'tout') {
-			return $infos;
-		} elseif ($type_info == 'est_actif') {
-			return $infos ? 1 : 0;
-		} else {
-			return (string) $infos[$type_info];
-		}
-	}
+    include_spip('inc/plugin');
+    $plugin = strtoupper($plugin);
+    $plugins_actifs = liste_plugin_actifs();
+
+    if (!$plugin) {
+        return serialize(array_keys($plugins_actifs));
+    } elseif (empty($plugins_actifs[$plugin]) && !$reload) {
+        return '';
+    } elseif ($type_info == 'est_actif' && !$reload) {
+        return $plugins_actifs[$plugin] ? 1 : 0;
+    } elseif (isset($plugins_actifs[$plugin][$type_info]) && !$reload) {
+        return $plugins_actifs[$plugin][$type_info];
+    } else {
+        $get_infos = charger_fonction('get_infos', 'plugins');
+        // On prend en compte les extensions
+        if (!is_dir($plugins_actifs[$plugin]['dir_type'])) {
+            $dir_plugins = constant($plugins_actifs[$plugin]['dir_type']);
+        } else {
+            $dir_plugins = $plugins_actifs[$plugin]['dir_type'];
+        }
+        if (!$infos = $get_infos($plugins_actifs[$plugin]['dir'], $reload, $dir_plugins)) {
+            return '';
+        }
+        if ($type_info == 'tout') {
+            return $infos;
+        } elseif ($type_info == 'est_actif') {
+            return $infos ? 1 : 0;
+        } else {
+            return (string) $infos[$type_info];
+        }
+    }
 }
 
 
@@ -3749,9 +3749,9 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function puce_changement_statut($id_objet, $statut, $id_rubrique, $type, $ajax = false) {
-	$puce_statut = charger_fonction('puce_statut', 'inc');
+    $puce_statut = charger_fonction('puce_statut', 'inc');
 
-	return $puce_statut($id_objet, $statut, $id_rubrique, $type, $ajax);
+    return $puce_statut($id_objet, $statut, $id_rubrique, $type, $ajax);
 }
 
 
@@ -3781,19 +3781,19 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function filtre_puce_statut_dist($statut, $objet, $id_objet = 0, $id_parent = 0) {
-	static $puce_statut = null;
-	if (!$puce_statut) {
-		$puce_statut = charger_fonction('puce_statut', 'inc');
-	}
+    static $puce_statut = null;
+    if (!$puce_statut) {
+        $puce_statut = charger_fonction('puce_statut', 'inc');
+    }
 
-	return $puce_statut(
-		$id_objet,
-		$statut,
-		$id_parent,
-		$objet,
-		false,
-		objet_info($objet, 'editable') ? _ACTIVER_PUCE_RAPIDE : false
-	);
+    return $puce_statut(
+        $id_objet,
+        $statut,
+        $id_parent,
+        $objet,
+        false,
+        objet_info($objet, 'editable') ? _ACTIVER_PUCE_RAPIDE : false
+    );
 }
 
 
@@ -3820,95 +3820,95 @@ 
  *   hash du contexte
  */
 function encoder_contexte_ajax($c, $form = '', $emboite = null, $ajaxid = '') {
-	$env = null;
-	if (is_string($c) && @unserialize($c) !== false) {
-		$c = unserialize($c);
-	}
-
-	// supprimer les parametres debut_x
-	// pour que la pagination ajax ne soit pas plantee
-	// si on charge la page &debut_x=1 : car alors en cliquant sur l'item 0,
-	// le debut_x=0 n'existe pas, et on resterait sur 1
-	if (is_array($c)) {
-		foreach (array_keys($c) as $k) {
-			if (str_starts_with($k, 'debut_')) {
-				unset($c[$k]);
-			}
-		}
-	}
-
-	if (!function_exists('calculer_cle_action')) {
-		include_spip('inc/securiser_action');
-	}
-
-	$c = serialize($c);
-	$cle = calculer_cle_action($form . $c);
-	$c = "$cle:$c";
-
-	// on ne stocke pas les contextes dans des fichiers en cache
-	// par defaut, sauf si cette configuration a été forcée
-	// OU que la longueur de l’argument géneré est plus long
-	// que ce qui est toléré.
-	$cache_contextes_ajax = (defined('_CACHE_CONTEXTES_AJAX') && _CACHE_CONTEXTES_AJAX);
-	if (!$cache_contextes_ajax) {
-		$env = $c;
-		if (function_exists('gzdeflate') && function_exists('gzinflate')) {
-			$env = gzdeflate($env);
-		}
-		$env = _xor($env);
-		$env = base64_encode($env);
-		$len = strlen($env);
-		// Si l’url est trop longue pour le navigateur
-		$max_len = _CACHE_CONTEXTES_AJAX_SUR_LONGUEUR;
-		if ($len > $max_len) {
-			$cache_contextes_ajax = true;
-			spip_log(
-				'Contextes AJAX forces en fichiers !'
-				. ' Cela arrive lorsque la valeur du contexte'
-				. " depasse la longueur maximale autorisee ($max_len). Ici : $len.",
-				_LOG_AVERTISSEMENT
-			);
-		}
-		// Sinon si Suhosin est actif et a une la valeur maximale des variables en GET...
-		elseif (
-			($max_len = @ini_get('suhosin.get.max_value_length'))
-			&& $max_len < $len
-		) {
-			$cache_contextes_ajax = true;
-			spip_log('Contextes AJAX forces en fichiers !'
-				. ' Cela arrive lorsque la valeur du contexte'
-				. ' depasse la longueur maximale autorisee par Suhosin'
-				. " ($max_len) dans 'suhosin.get.max_value_length'. Ici : $len."
-				. ' Vous devriez modifier les parametres de Suhosin'
-				. ' pour accepter au moins 1024 caracteres.', _LOG_AVERTISSEMENT);
-		}
-	}
-
-	if ($cache_contextes_ajax) {
-		$dir = sous_repertoire(_DIR_CACHE, 'contextes');
-		// stocker les contextes sur disque et ne passer qu'un hash dans l'url
-		$md5 = md5($c);
-		ecrire_fichier("$dir/c$md5", $c);
-		$env = $md5;
-	}
-
-	if ($emboite === null) {
-		return $env;
-	}
-	if (!trim($emboite)) {
-		return '';
-	}
-	// toujours encoder l'url source dans le bloc ajax
-	$r = self();
-	$r = ' data-origin="' . $r . '"';
-	$class = 'ajaxbloc';
-	if ($ajaxid && is_string($ajaxid)) {
-		// ajaxid est normalement conforme a un nom de classe css
-		// on ne verifie pas la conformite, mais on passe entites_html par dessus par precaution
-		$class .= ' ajax-id-' . entites_html($ajaxid);
-	}
-
-	return "<div class='$class' " . "data-ajax-env='$env'$r>\n$emboite</div><!--ajaxbloc-->\n";
+    $env = null;
+    if (is_string($c) && @unserialize($c) !== false) {
+        $c = unserialize($c);
+    }
+
+    // supprimer les parametres debut_x
+    // pour que la pagination ajax ne soit pas plantee
+    // si on charge la page &debut_x=1 : car alors en cliquant sur l'item 0,
+    // le debut_x=0 n'existe pas, et on resterait sur 1
+    if (is_array($c)) {
+        foreach (array_keys($c) as $k) {
+            if (str_starts_with($k, 'debut_')) {
+                unset($c[$k]);
+            }
+        }
+    }
+
+    if (!function_exists('calculer_cle_action')) {
+        include_spip('inc/securiser_action');
+    }
+
+    $c = serialize($c);
+    $cle = calculer_cle_action($form . $c);
+    $c = "$cle:$c";
+
+    // on ne stocke pas les contextes dans des fichiers en cache
+    // par defaut, sauf si cette configuration a été forcée
+    // OU que la longueur de l’argument géneré est plus long
+    // que ce qui est toléré.
+    $cache_contextes_ajax = (defined('_CACHE_CONTEXTES_AJAX') && _CACHE_CONTEXTES_AJAX);
+    if (!$cache_contextes_ajax) {
+        $env = $c;
+        if (function_exists('gzdeflate') && function_exists('gzinflate')) {
+            $env = gzdeflate($env);
+        }
+        $env = _xor($env);
+        $env = base64_encode($env);
+        $len = strlen($env);
+        // Si l’url est trop longue pour le navigateur
+        $max_len = _CACHE_CONTEXTES_AJAX_SUR_LONGUEUR;
+        if ($len > $max_len) {
+            $cache_contextes_ajax = true;
+            spip_log(
+                'Contextes AJAX forces en fichiers !'
+                . ' Cela arrive lorsque la valeur du contexte'
+                . " depasse la longueur maximale autorisee ($max_len). Ici : $len.",
+                _LOG_AVERTISSEMENT
+            );
+        }
+        // Sinon si Suhosin est actif et a une la valeur maximale des variables en GET...
+        elseif (
+            ($max_len = @ini_get('suhosin.get.max_value_length'))
+            && $max_len < $len
+        ) {
+            $cache_contextes_ajax = true;
+            spip_log('Contextes AJAX forces en fichiers !'
+                . ' Cela arrive lorsque la valeur du contexte'
+                . ' depasse la longueur maximale autorisee par Suhosin'
+                . " ($max_len) dans 'suhosin.get.max_value_length'. Ici : $len."
+                . ' Vous devriez modifier les parametres de Suhosin'
+                . ' pour accepter au moins 1024 caracteres.', _LOG_AVERTISSEMENT);
+        }
+    }
+
+    if ($cache_contextes_ajax) {
+        $dir = sous_repertoire(_DIR_CACHE, 'contextes');
+        // stocker les contextes sur disque et ne passer qu'un hash dans l'url
+        $md5 = md5($c);
+        ecrire_fichier("$dir/c$md5", $c);
+        $env = $md5;
+    }
+
+    if ($emboite === null) {
+        return $env;
+    }
+    if (!trim($emboite)) {
+        return '';
+    }
+    // toujours encoder l'url source dans le bloc ajax
+    $r = self();
+    $r = ' data-origin="' . $r . '"';
+    $class = 'ajaxbloc';
+    if ($ajaxid && is_string($ajaxid)) {
+        // ajaxid est normalement conforme a un nom de classe css
+        // on ne verifie pas la conformite, mais on passe entites_html par dessus par precaution
+        $class .= ' ajax-id-' . entites_html($ajaxid);
+    }
+
+    return "<div class='$class' " . "data-ajax-env='$env'$r>\n$emboite</div><!--ajaxbloc-->\n";
 }
 
 /**
@@ -3928,37 +3928,37 @@ 
  *   - false : erreur de décodage
  */
 function decoder_contexte_ajax($c, $form = '') {
-	$contexte = null;
-	if (!function_exists('calculer_cle_action')) {
-		include_spip('inc/securiser_action');
-	}
-	if (
-		(defined('_CACHE_CONTEXTES_AJAX') && _CACHE_CONTEXTES_AJAX || strlen($c) == 32)
-		&& ($dir = sous_repertoire(_DIR_CACHE, 'contextes'))
-		&& lire_fichier("$dir/c$c", $contexte)
-	) {
-		$c = $contexte;
-	} else {
-		$c = @base64_decode($c);
-		$c = _xor($c);
-		if (function_exists('gzdeflate') && function_exists('gzinflate')) {
-			$c = @gzinflate($c);
-		}
-	}
-
-	// extraire la signature en debut de contexte
-	// et la verifier avant de deserializer
-	// format : signature:donneesserializees
-	if ($p = strpos((string) $c, ':')) {
-		$cle = substr((string) $c, 0, $p);
-		$c = substr((string) $c, $p + 1);
-
-		if ($cle === calculer_cle_action($form . $c)) {
-			return @unserialize($c);
-		}
-	}
-
-	return false;
+    $contexte = null;
+    if (!function_exists('calculer_cle_action')) {
+        include_spip('inc/securiser_action');
+    }
+    if (
+        (defined('_CACHE_CONTEXTES_AJAX') && _CACHE_CONTEXTES_AJAX || strlen($c) == 32)
+        && ($dir = sous_repertoire(_DIR_CACHE, 'contextes'))
+        && lire_fichier("$dir/c$c", $contexte)
+    ) {
+        $c = $contexte;
+    } else {
+        $c = @base64_decode($c);
+        $c = _xor($c);
+        if (function_exists('gzdeflate') && function_exists('gzinflate')) {
+            $c = @gzinflate($c);
+        }
+    }
+
+    // extraire la signature en debut de contexte
+    // et la verifier avant de deserializer
+    // format : signature:donneesserializees
+    if ($p = strpos((string) $c, ':')) {
+        $cle = substr((string) $c, 0, $p);
+        $c = substr((string) $c, $p + 1);
+
+        if ($cle === calculer_cle_action($form . $c)) {
+            return @unserialize($c);
+        }
+    }
+
+    return false;
 }
 
 
@@ -3976,20 +3976,20 @@ 
  *    Message décrypté ou encrypté
  **/
 function _xor($message, $key = null) {
-	if (is_null($key)) {
-		if (!function_exists('calculer_cle_action')) {
-			include_spip('inc/securiser_action');
-		}
-		$key = pack('H*', calculer_cle_action('_xor'));
-	}
+    if (is_null($key)) {
+        if (!function_exists('calculer_cle_action')) {
+            include_spip('inc/securiser_action');
+        }
+        $key = pack('H*', calculer_cle_action('_xor'));
+    }
 
-	$keylen = strlen($key);
-	$messagelen = strlen($message);
-	for ($i = 0; $i < $messagelen; $i++) {
-		$message[$i] = ~($message[$i] ^ $key[$i % $keylen]);
-	}
+    $keylen = strlen($key);
+    $messagelen = strlen($message);
+    for ($i = 0; $i < $messagelen; $i++) {
+        $message[$i] = ~($message[$i] ^ $key[$i % $keylen]);
+    }
 
-	return $message;
+    return $message;
 }
 
 /**
@@ -4003,7 +4003,7 @@ 
  * @return string
  */
 function url_reponse_forum($texte) {
- return $texte;
+    return $texte;
 }
 
 /**
@@ -4017,7 +4017,7 @@ 
  * @return string
  */
 function url_rss_forum($texte) {
- return $texte;
+    return $texte;
 }
 
 
@@ -4056,37 +4056,37 @@ 
  *   Code HTML
  */
 function lien_ou_expose($url, $libelle = null, $on = false, $class = '', $title = '', $rel = '', $evt = '') {
-	if ($on) {
-		$bal = 'strong';
-		$class = '';
-		$att = '';
-		// si $on passe la balise et optionnelement une ou ++classe
-		// a.active span.selected.active etc....
-		if (is_string($on) && (str_starts_with($on, 'a') || str_starts_with($on, 'span') || str_starts_with($on, 'strong'))) {
-			$on = explode('.', $on);
-			// on verifie que c'est exactement une des 3 balises a, span ou strong
-			if (in_array(reset($on), ['a', 'span', 'strong'])) {
-				$bal = array_shift($on);
-				$class = implode(' ', $on);
-				if ($bal == 'a') {
-					$att = 'href="#" ';
-				}
-			}
-		}
-		$att .= 'class="' . ($class ? attribut_html($class) . ' ' : '') . (defined('_LIEN_OU_EXPOSE_CLASS_ON') ? _LIEN_OU_EXPOSE_CLASS_ON : 'on') . '"';
-	} else {
-		$bal = 'a';
-		$att = "href='$url'"
-			. ($title ? " title='" . attribut_html($title) . "'" : '')
-			. ($class ? " class='" . attribut_html($class) . "'" : '')
-			. ($rel ? " rel='" . attribut_html($rel) . "'" : '')
-			. $evt;
-	}
-	if ($libelle === null) {
-		$libelle = $url;
-	}
-
-	return "<$bal $att>$libelle</$bal>";
+    if ($on) {
+        $bal = 'strong';
+        $class = '';
+        $att = '';
+        // si $on passe la balise et optionnelement une ou ++classe
+        // a.active span.selected.active etc....
+        if (is_string($on) && (str_starts_with($on, 'a') || str_starts_with($on, 'span') || str_starts_with($on, 'strong'))) {
+            $on = explode('.', $on);
+            // on verifie que c'est exactement une des 3 balises a, span ou strong
+            if (in_array(reset($on), ['a', 'span', 'strong'])) {
+                $bal = array_shift($on);
+                $class = implode(' ', $on);
+                if ($bal == 'a') {
+                    $att = 'href="#" ';
+                }
+            }
+        }
+        $att .= 'class="' . ($class ? attribut_html($class) . ' ' : '') . (defined('_LIEN_OU_EXPOSE_CLASS_ON') ? _LIEN_OU_EXPOSE_CLASS_ON : 'on') . '"';
+    } else {
+        $bal = 'a';
+        $att = "href='$url'"
+            . ($title ? " title='" . attribut_html($title) . "'" : '')
+            . ($class ? " class='" . attribut_html($class) . "'" : '')
+            . ($rel ? " rel='" . attribut_html($rel) . "'" : '')
+            . $evt;
+    }
+    if ($libelle === null) {
+        $libelle = $url;
+    }
+
+    return "<$bal $att>$libelle</$bal>";
 }
 
 
@@ -4103,39 +4103,39 @@ 
  * @return string : la chaine de langue finale en utilisant la fonction _T()
  */
 function singulier_ou_pluriel($nb, $chaine_un, $chaine_plusieurs, $var = 'nb', $vars = []) {
-	static $local_singulier_ou_pluriel = [];
-
-	// si nb=0 ou pas de $vars valide on retourne une chaine vide, a traiter par un |sinon
-	if (!is_numeric($nb) || $nb == 0) {
-		return '';
-	}
-	if (!is_array($vars)) {
-		return '';
-	}
-
-	$langue = $GLOBALS['spip_lang'];
-	if (!isset($local_singulier_ou_pluriel[$langue])) {
-		$local_singulier_ou_pluriel[$langue] = false;
-		if (
-			($f = charger_fonction("singulier_ou_pluriel_{$langue}", 'inc', true))
-			|| ($f = charger_fonction('singulier_ou_pluriel', 'inc', true))
-		) {
-			$local_singulier_ou_pluriel[$langue] = $f;
-		}
-	}
-
-	// si on a une surcharge on l'utilise
-	if ($local_singulier_ou_pluriel[$langue]) {
-		return ($local_singulier_ou_pluriel[$langue])($nb, $chaine_un, $chaine_plusieurs, $var, $vars);
-	}
-
-	// sinon traitement par defaut
-	$vars[$var] = $nb;
-	if ($nb >= 2) {
-		return _T($chaine_plusieurs, $vars);
-	} else {
-		return _T($chaine_un, $vars);
-	}
+    static $local_singulier_ou_pluriel = [];
+
+    // si nb=0 ou pas de $vars valide on retourne une chaine vide, a traiter par un |sinon
+    if (!is_numeric($nb) || $nb == 0) {
+        return '';
+    }
+    if (!is_array($vars)) {
+        return '';
+    }
+
+    $langue = $GLOBALS['spip_lang'];
+    if (!isset($local_singulier_ou_pluriel[$langue])) {
+        $local_singulier_ou_pluriel[$langue] = false;
+        if (
+            ($f = charger_fonction("singulier_ou_pluriel_{$langue}", 'inc', true))
+            || ($f = charger_fonction('singulier_ou_pluriel', 'inc', true))
+        ) {
+            $local_singulier_ou_pluriel[$langue] = $f;
+        }
+    }
+
+    // si on a une surcharge on l'utilise
+    if ($local_singulier_ou_pluriel[$langue]) {
+        return ($local_singulier_ou_pluriel[$langue])($nb, $chaine_un, $chaine_plusieurs, $var, $vars);
+    }
+
+    // sinon traitement par defaut
+    $vars[$var] = $nb;
+    if ($nb >= 2) {
+        return _T($chaine_plusieurs, $vars);
+    } else {
+        return _T($chaine_un, $vars);
+    }
 }
 
 
@@ -4163,71 +4163,71 @@ 
  */
 function prepare_icone_base($type, $lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
 
-	$class_lien = $class_bouton = $class;
-
-	// Normaliser la fonction et compléter la classe en fonction
-	if (in_array($fonction, ['del', 'supprimer.gif'])) {
-		$class_lien .= ' danger';
-		$class_bouton .= ' btn_danger';
-	} elseif ($fonction == 'rien.gif') {
-		$fonction = '';
-	} elseif ($fonction == 'delsafe') {
-		$fonction = 'del';
-	}
-
-	$fond_origine = $fond;
-	// Remappage des icone : article-24.png+new => article-new-24.png
-	if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
-		[$fond, $fonction] = $icone_renommer($fond, $fonction);
-	}
-
-	// Ajouter le type d'objet dans la classe
-	$objet_type = substr(basename((string) $fond), 0, -4);
-	$class_lien .= " $objet_type";
-	$class_bouton .= " $objet_type";
-
-	// texte
-	$alt = attribut_html($texte);
-	$title = " title=\"$alt\""; // est-ce pertinent de doubler le alt par un title ?
-
-	// Liens : préparer les classes ajax
-	$ajax = '';
-	if ($type === 'lien' && str_contains($class_lien, 'ajax')) {
-		$ajax = 'ajax';
-		if (str_contains($class_lien, 'preload')) {
-			$ajax .= ' preload';
-		}
-		if (str_contains($class_lien, 'nocache')) {
-			$ajax .= ' nocache';
-		}
-		$ajax = " class='$ajax'";
-	}
-
-	// Repérer la taille et l'ajouter dans la classe
-	$size = 24;
-	if (
-		preg_match('/-(\d{1,3})[.](gif|png|svg)$/i', (string) $fond, $match)
-		|| preg_match('/-(\d{1,3})([.](gif|png|svg))?$/i', $fond_origine, $match)
-	) {
-		$size = $match[1];
-	}
-	$class_lien .= " s$size";
-	$class_bouton .= " s$size";
-
-	// Icône
-	$icone = http_img_pack($fond, $alt, "width='$size' height='$size'");
-	$icone = '<span class="icone-image' . ($fonction ? " icone-fonction icone-fonction-$fonction" : '') . "\">$icone</span>";
-
-	// Markup final
-	if ($type == 'lien') {
-		return "<span class='icone $class_lien'>"
-		. "<a href='$lien'$title$ajax$javascript>"
-		. $icone
-		. "<b>$texte</b>"
-		. "</a></span>\n";
-	} else {
-		return bouton_action("$icone $texte", $lien, $class_bouton, $javascript, $alt);
-	}
+    $class_lien = $class_bouton = $class;
+
+    // Normaliser la fonction et compléter la classe en fonction
+    if (in_array($fonction, ['del', 'supprimer.gif'])) {
+        $class_lien .= ' danger';
+        $class_bouton .= ' btn_danger';
+    } elseif ($fonction == 'rien.gif') {
+        $fonction = '';
+    } elseif ($fonction == 'delsafe') {
+        $fonction = 'del';
+    }
+
+    $fond_origine = $fond;
+    // Remappage des icone : article-24.png+new => article-new-24.png
+    if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
+        [$fond, $fonction] = $icone_renommer($fond, $fonction);
+    }
+
+    // Ajouter le type d'objet dans la classe
+    $objet_type = substr(basename((string) $fond), 0, -4);
+    $class_lien .= " $objet_type";
+    $class_bouton .= " $objet_type";
+
+    // texte
+    $alt = attribut_html($texte);
+    $title = " title=\"$alt\""; // est-ce pertinent de doubler le alt par un title ?
+
+    // Liens : préparer les classes ajax
+    $ajax = '';
+    if ($type === 'lien' && str_contains($class_lien, 'ajax')) {
+        $ajax = 'ajax';
+        if (str_contains($class_lien, 'preload')) {
+            $ajax .= ' preload';
+        }
+        if (str_contains($class_lien, 'nocache')) {
+            $ajax .= ' nocache';
+        }
+        $ajax = " class='$ajax'";
+    }
+
+    // Repérer la taille et l'ajouter dans la classe
+    $size = 24;
+    if (
+        preg_match('/-(\d{1,3})[.](gif|png|svg)$/i', (string) $fond, $match)
+        || preg_match('/-(\d{1,3})([.](gif|png|svg))?$/i', $fond_origine, $match)
+    ) {
+        $size = $match[1];
+    }
+    $class_lien .= " s$size";
+    $class_bouton .= " s$size";
+
+    // Icône
+    $icone = http_img_pack($fond, $alt, "width='$size' height='$size'");
+    $icone = '<span class="icone-image' . ($fonction ? " icone-fonction icone-fonction-$fonction" : '') . "\">$icone</span>";
+
+    // Markup final
+    if ($type == 'lien') {
+        return "<span class='icone $class_lien'>"
+        . "<a href='$lien'$title$ajax$javascript>"
+        . $icone
+        . "<b>$texte</b>"
+        . "</a></span>\n";
+    } else {
+        return bouton_action("$icone $texte", $lien, $class_bouton, $javascript, $alt);
+    }
 }
 
 /**
@@ -4251,7 +4251,7 @@ 
  *     Code HTML du lien
  **/
 function icone_base($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return prepare_icone_base('lien', $lien, $texte, $fond, $fonction, $class, $javascript);
+    return prepare_icone_base('lien', $lien, $texte, $fond, $fonction, $class, $javascript);
 }
 
 /**
@@ -4286,7 +4286,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_icone_verticale_dist($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $class", $javascript);
 }
 
 /**
@@ -4331,7 +4331,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_icone_horizontale_dist($lien, $texte, $fond, $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "horizontale $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "horizontale $class", $javascript);
 }
 
 /**
@@ -4362,7 +4362,7 @@ 
  *     Code HTML du lien
  **/
 function filtre_bouton_action_horizontal_dist($lien, $texte, $fond, $fonction = '', $class = '', $confirm = '') {
-	return prepare_icone_base('bouton', $lien, $texte, $fond, $fonction, $class, $confirm);
+    return prepare_icone_base('bouton', $lien, $texte, $fond, $fonction, $class, $confirm);
 }
 
 /**
@@ -4393,7 +4393,7 @@ 
  *     Code HTML du lien
  */
 function filtre_icone_dist($lien, $texte, $fond, $align = '', $fonction = '', $class = '', $javascript = '') {
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $align $class", $javascript);
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $align $class", $javascript);
 }
 
 
@@ -4415,7 +4415,7 @@ 
  * @return array Liste des éléments
  */
 function filtre_explode_dist($a, $b) {
-	return explode($b, (string) $a);
+    return explode($b, (string) $a);
 }
 
 /**
@@ -4436,7 +4436,7 @@ 
  * @return string texte
  */
 function filtre_implode_dist($a, $b) {
-	return is_array($a) ? implode($b, $a) : $a;
+    return is_array($a) ? implode($b, $a) : $a;
 }
 
 /**
@@ -4445,22 +4445,22 @@ 
  * @return string Code CSS
  */
 function bando_images_background() {
-	include_spip('inc/bandeau');
-	// recuperer tous les boutons et leurs images
-	$boutons = definir_barre_boutons(definir_barre_contexte(), true, false);
+    include_spip('inc/bandeau');
+    // recuperer tous les boutons et leurs images
+    $boutons = definir_barre_boutons(definir_barre_contexte(), true, false);
 
-	$res = '';
-	foreach ($boutons as $page => $detail) {
-		$selecteur = (in_array($page, ['outils_rapides', 'outils_collaboratifs']) ? '' : '.navigation_avec_icones ');
-		foreach ($detail->sousmenu as $souspage => $sousdetail) {
-			if ($sousdetail->icone && strlen(trim((string) $sousdetail->icone))) {
-				$img = http_img_variante_svg_si_possible($sousdetail->icone);
-				$res .= "\n$selecteur.bando2_$souspage {background-image:url($img);}";
-			}
-		}
-	}
+    $res = '';
+    foreach ($boutons as $page => $detail) {
+        $selecteur = (in_array($page, ['outils_rapides', 'outils_collaboratifs']) ? '' : '.navigation_avec_icones ');
+        foreach ($detail->sousmenu as $souspage => $sousdetail) {
+            if ($sousdetail->icone && strlen(trim((string) $sousdetail->icone))) {
+                $img = http_img_variante_svg_si_possible($sousdetail->icone);
+                $res .= "\n$selecteur.bando2_$souspage {background-image:url($img);}";
+            }
+        }
+    }
 
-	return $res;
+    return $res;
 }
 
 /**
@@ -4485,23 +4485,23 @@ 
  */
 function bouton_action($libelle, $url, $class = '', $confirm = '', $title = '', $callback = '') {
 
-	// Classes : dispatcher `ajax` sur le formulaire
-	$class_form = '';
-	if (str_contains($class, 'ajax')) {
-		$class_form = 'ajax';
-		$class = str_replace('ajax', '', $class);
-	}
-	$class_btn = 'submit ' . trim($class);
+    // Classes : dispatcher `ajax` sur le formulaire
+    $class_form = '';
+    if (str_contains($class, 'ajax')) {
+        $class_form = 'ajax';
+        $class = str_replace('ajax', '', $class);
+    }
+    $class_btn = 'submit ' . trim($class);
 
-	if ($confirm) {
-		$confirm = 'confirm("' . attribut_html($confirm) . '")';
-		$callback = $callback ? "$confirm?($callback):false" : $confirm;
-	}
-	$onclick = $callback ? " onclick='return " . addcslashes($callback, "'") . "'" : '';
-	$title = $title ? " title='$title'" : '';
+    if ($confirm) {
+        $confirm = 'confirm("' . attribut_html($confirm) . '")';
+        $callback = $callback ? "$confirm?($callback):false" : $confirm;
+    }
+    $onclick = $callback ? " onclick='return " . addcslashes($callback, "'") . "'" : '';
+    $title = $title ? " title='$title'" : '';
 
-	return "<form class='bouton_action_post $class_form' method='post' action='$url'><div>" . form_hidden($url)
-	. "<button type='submit' class='$class_btn'$title$onclick>$libelle</button></div></form>";
+    return "<form class='bouton_action_post $class_form' method='post' action='$url'><div>" . form_hidden($url)
+    . "<button type='submit' class='$class_btn'$title$onclick>$libelle</button></div></form>";
 }
 
 /**
@@ -4524,104 +4524,104 @@ 
  * @return string
  */
 function generer_objet_info($id_objet, string $type_objet, string $info, string $etoile = '', array $params = []): string {
-	static $trouver_table = null;
-	static $objets;
-
-	// On verifie qu'on a tout ce qu'il faut
-	$id_objet = (int) $id_objet;
-	if (!($id_objet && $type_objet && $info)) {
-		return '';
-	}
-
-	// si on a deja note que l'objet n'existe pas, ne pas aller plus loin
-	if (isset($objets[$type_objet]) && $objets[$type_objet] === false) {
-		return '';
-	}
-
-	// Si on demande l'url, on retourne direct la fonction
-	if ($info == 'url') {
-		return generer_objet_url($id_objet, $type_objet, ...$params);
-	}
-
-	// Sinon on va tout chercher dans la table et on garde en memoire
-	$demande_titre = ($info === 'titre');
-	$demande_introduction = ($info === 'introduction');
-
-	// On ne fait la requete que si on a pas deja l'objet ou si on demande le titre mais qu'on ne l'a pas encore
-	if (
-		!isset($objets[$type_objet][$id_objet])
-		|| $demande_titre && !isset($objets[$type_objet][$id_objet]['titre'])
-	) {
-		if (!$trouver_table) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-		}
-		$desc = $trouver_table(table_objet_sql($type_objet));
-		if (!$desc) {
-			return $objets[$type_objet] = false;
-		}
-
-		// Si on demande le titre, on le gere en interne
-		$champ_titre = '';
-		if ($demande_titre) {
-			// si pas de titre declare mais champ titre, il sera peuple par le select *
-			$champ_titre = (empty($desc['titre'])) ? '' : ', ' . $desc['titre'];
-		}
-		include_spip('base/abstract_sql');
-		include_spip('base/connect_sql');
-		$objets[$type_objet][$id_objet] = sql_fetsel(
-			'*' . $champ_titre,
-			$desc['table_sql'],
-			id_table_objet($type_objet) . ' = ' . (int) $id_objet
-		);
-
-		// Toujours noter la longueur d'introduction, même si pas demandé cette fois-ci
-		$objets[$type_objet]['introduction_longueur'] = $desc['introduction_longueur'] ?? null;
-	}
-
-	// Pour les fonction generer_xxx, si on demande l'introduction,
-	// ajouter la longueur au début des params supplémentaires
-	if ($demande_introduction) {
-		$introduction_longueur = $objets[$type_objet]['introduction_longueur'];
-		array_unshift($params, $introduction_longueur);
-	}
-
-	$row = ($objets[$type_objet][$id_objet] ?? []) ?: [];
-	// Si la fonction generer_TYPE_TRUC existe, on l'utilise pour formater $info_generee
-	if ($generer = charger_fonction("generer_{$type_objet}_{$info}", '', true)) {
-		$info_generee = $generer($id_objet, $row, ...$params);
-	}
-	// @deprecated 4.1 generer_TRUC_TYPE
-	elseif ($generer = charger_fonction("generer_{$info}_{$type_objet}", '', true)) {
-		trigger_deprecation('spip', '4.1', 'Using "%s" function naming is deprecated, rename "%s" instead', "generer_{$info}_{$type_objet}", "generer_{$type_objet}_{$info}");
-		$info_generee = $generer($id_objet, $row, ...$params);
-	}
-	// Si la fonction generer_objet_TRUC existe, on l'utilise pour formater $info_generee
-	elseif ($generer = charger_fonction("generer_objet_{$info}", '', true)) {
-		$info_generee = $generer($id_objet, $type_objet, $row, ...$params);
-	}
-	// @deprecated 4.1 generer_TRUC_entite
-	elseif ($generer = charger_fonction("generer_{$info}_entite", '', true)) {
-		trigger_deprecation('spip', '4.1', 'Using "%s" function naming is deprecated, rename "%s" instead', "generer_{$info}_entite", "generer_objet_{$info}");
-		$info_generee = $generer($id_objet, $type_objet, $row, ...$params);
-	}
-	// Sinon on prend directement le champ SQL tel quel
-	else {
-		$info_generee = ($objets[$type_objet][$id_objet][$info] ?? '');
-	}
-
-	// On va ensuite appliquer les traitements automatiques si besoin
-	if (!$etoile) {
-		// FIXME: on fournit un ENV minimum avec id et type et connect=''
-		// mais ce fonctionnement est a ameliorer !
-		$info_generee = appliquer_traitement_champ(
-			$info_generee,
-			$info,
-			table_objet($type_objet),
-			['id_objet' => $id_objet, 'objet' => $type_objet, '']
-		);
-	}
-
-	return $info_generee;
+    static $trouver_table = null;
+    static $objets;
+
+    // On verifie qu'on a tout ce qu'il faut
+    $id_objet = (int) $id_objet;
+    if (!($id_objet && $type_objet && $info)) {
+        return '';
+    }
+
+    // si on a deja note que l'objet n'existe pas, ne pas aller plus loin
+    if (isset($objets[$type_objet]) && $objets[$type_objet] === false) {
+        return '';
+    }
+
+    // Si on demande l'url, on retourne direct la fonction
+    if ($info == 'url') {
+        return generer_objet_url($id_objet, $type_objet, ...$params);
+    }
+
+    // Sinon on va tout chercher dans la table et on garde en memoire
+    $demande_titre = ($info === 'titre');
+    $demande_introduction = ($info === 'introduction');
+
+    // On ne fait la requete que si on a pas deja l'objet ou si on demande le titre mais qu'on ne l'a pas encore
+    if (
+        !isset($objets[$type_objet][$id_objet])
+        || $demande_titre && !isset($objets[$type_objet][$id_objet]['titre'])
+    ) {
+        if (!$trouver_table) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+        }
+        $desc = $trouver_table(table_objet_sql($type_objet));
+        if (!$desc) {
+            return $objets[$type_objet] = false;
+        }
+
+        // Si on demande le titre, on le gere en interne
+        $champ_titre = '';
+        if ($demande_titre) {
+            // si pas de titre declare mais champ titre, il sera peuple par le select *
+            $champ_titre = (empty($desc['titre'])) ? '' : ', ' . $desc['titre'];
+        }
+        include_spip('base/abstract_sql');
+        include_spip('base/connect_sql');
+        $objets[$type_objet][$id_objet] = sql_fetsel(
+            '*' . $champ_titre,
+            $desc['table_sql'],
+            id_table_objet($type_objet) . ' = ' . (int) $id_objet
+        );
+
+        // Toujours noter la longueur d'introduction, même si pas demandé cette fois-ci
+        $objets[$type_objet]['introduction_longueur'] = $desc['introduction_longueur'] ?? null;
+    }
+
+    // Pour les fonction generer_xxx, si on demande l'introduction,
+    // ajouter la longueur au début des params supplémentaires
+    if ($demande_introduction) {
+        $introduction_longueur = $objets[$type_objet]['introduction_longueur'];
+        array_unshift($params, $introduction_longueur);
+    }
+
+    $row = ($objets[$type_objet][$id_objet] ?? []) ?: [];
+    // Si la fonction generer_TYPE_TRUC existe, on l'utilise pour formater $info_generee
+    if ($generer = charger_fonction("generer_{$type_objet}_{$info}", '', true)) {
+        $info_generee = $generer($id_objet, $row, ...$params);
+    }
+    // @deprecated 4.1 generer_TRUC_TYPE
+    elseif ($generer = charger_fonction("generer_{$info}_{$type_objet}", '', true)) {
+        trigger_deprecation('spip', '4.1', 'Using "%s" function naming is deprecated, rename "%s" instead', "generer_{$info}_{$type_objet}", "generer_{$type_objet}_{$info}");
+        $info_generee = $generer($id_objet, $row, ...$params);
+    }
+    // Si la fonction generer_objet_TRUC existe, on l'utilise pour formater $info_generee
+    elseif ($generer = charger_fonction("generer_objet_{$info}", '', true)) {
+        $info_generee = $generer($id_objet, $type_objet, $row, ...$params);
+    }
+    // @deprecated 4.1 generer_TRUC_entite
+    elseif ($generer = charger_fonction("generer_{$info}_entite", '', true)) {
+        trigger_deprecation('spip', '4.1', 'Using "%s" function naming is deprecated, rename "%s" instead', "generer_{$info}_entite", "generer_objet_{$info}");
+        $info_generee = $generer($id_objet, $type_objet, $row, ...$params);
+    }
+    // Sinon on prend directement le champ SQL tel quel
+    else {
+        $info_generee = ($objets[$type_objet][$id_objet][$info] ?? '');
+    }
+
+    // On va ensuite appliquer les traitements automatiques si besoin
+    if (!$etoile) {
+        // FIXME: on fournit un ENV minimum avec id et type et connect=''
+        // mais ce fonctionnement est a ameliorer !
+        $info_generee = appliquer_traitement_champ(
+            $info_generee,
+            $info,
+            table_objet($type_objet),
+            ['id_objet' => $id_objet, 'objet' => $type_objet, '']
+        );
+    }
+
+    return $info_generee;
 }
 
 /**
@@ -4654,34 +4654,34 @@ 
  */
 function generer_objet_introduction(int $id_objet, string $type_objet, array $ligne_sql, ?int $introduction_longueur = null, $longueur_ou_suite = null, ?string $suite = null, string $connect = ''): string {
 
-	$descriptif = $ligne_sql['descriptif'] ?? '';
-	$texte = $ligne_sql['texte'] ?? '';
-	// En absence de descriptif, on se rabat sur chapo + texte
-	if (isset($ligne_sql['chapo'])) {
-		$chapo = $ligne_sql['chapo'];
-		$texte = strlen((string) $descriptif) ?
-			'' :
-			"$chapo \n\n $texte";
-	}
+    $descriptif = $ligne_sql['descriptif'] ?? '';
+    $texte = $ligne_sql['texte'] ?? '';
+    // En absence de descriptif, on se rabat sur chapo + texte
+    if (isset($ligne_sql['chapo'])) {
+        $chapo = $ligne_sql['chapo'];
+        $texte = strlen((string) $descriptif) ?
+            '' :
+            "$chapo \n\n $texte";
+    }
 
-	// Longueur en paramètre, sinon celle renseignée dans la description de l'objet, sinon valeur en dur
-	if (!(int) $longueur_ou_suite) {
-		$longueur = (int) ($introduction_longueur ?: 600);
-	} else {
-		$longueur = (int) $longueur_ou_suite;
-	}
+    // Longueur en paramètre, sinon celle renseignée dans la description de l'objet, sinon valeur en dur
+    if (!(int) $longueur_ou_suite) {
+        $longueur = (int) ($introduction_longueur ?: 600);
+    } else {
+        $longueur = (int) $longueur_ou_suite;
+    }
 
-	// On peut optionnellement passer la suite en 1er paramètre de la balise
-	// Ex : #INTRODUCTION{...}
-	if (
-		is_null($suite) && !(int) $longueur_ou_suite
-	) {
-		$suite = $longueur_ou_suite;
-	}
+    // On peut optionnellement passer la suite en 1er paramètre de la balise
+    // Ex : #INTRODUCTION{...}
+    if (
+        is_null($suite) && !(int) $longueur_ou_suite
+    ) {
+        $suite = $longueur_ou_suite;
+    }
 
-	$f = chercher_filtre('introduction');
+    $f = chercher_filtre('introduction');
 
-	return $f($descriptif, $texte, $longueur, $connect, $suite);
+    return $f($descriptif, $texte, $longueur, $connect, $suite);
 }
 
 /**
@@ -4694,49 +4694,49 @@ 
  * @return string
  */
 function appliquer_traitement_champ($texte, $champ, $table_objet = '', $env = [], string $connect = '') {
-	if (!$champ) {
-		return $texte;
-	}
+    if (!$champ) {
+        return $texte;
+    }
 
-	// On charge les définitions des traitements (inc/texte et fichiers de fonctions)
-	// car il ne faut pas partir du principe que c'est déjà chargé (form ajax, etc)
-	include_fichiers_fonctions();
+    // On charge les définitions des traitements (inc/texte et fichiers de fonctions)
+    // car il ne faut pas partir du principe que c'est déjà chargé (form ajax, etc)
+    include_fichiers_fonctions();
 
-	$champ = strtoupper($champ);
-	$traitements = $GLOBALS['table_des_traitements'][$champ] ?? false;
-	if (!$traitements || !is_array($traitements)) {
-		return $texte;
-	}
+    $champ = strtoupper($champ);
+    $traitements = $GLOBALS['table_des_traitements'][$champ] ?? false;
+    if (!$traitements || !is_array($traitements)) {
+        return $texte;
+    }
 
-	$traitement = '';
-	if ($table_objet && (!isset($traitements[0]) || count($traitements) > 1)) {
-		// necessaire pour prendre en charge les vieux appels avec un table_objet_sql en 3e arg
-		$table_objet = table_objet($table_objet);
-		if (isset($traitements[$table_objet])) {
-			$traitement = $traitements[$table_objet];
-		}
-	}
-	if (!$traitement && isset($traitements[0])) {
-		$traitement = $traitements[0];
-	}
-	// (sinon prendre le premier de la liste par defaut ?)
+    $traitement = '';
+    if ($table_objet && (!isset($traitements[0]) || count($traitements) > 1)) {
+        // necessaire pour prendre en charge les vieux appels avec un table_objet_sql en 3e arg
+        $table_objet = table_objet($table_objet);
+        if (isset($traitements[$table_objet])) {
+            $traitement = $traitements[$table_objet];
+        }
+    }
+    if (!$traitement && isset($traitements[0])) {
+        $traitement = $traitements[0];
+    }
+    // (sinon prendre le premier de la liste par defaut ?)
 
-	if (!$traitement) {
-		return $texte;
-	}
+    if (!$traitement) {
+        return $texte;
+    }
 
-	$traitement = str_replace('%s', "'" . texte_script($texte) . "'", (string) $traitement);
+    $traitement = str_replace('%s', "'" . texte_script($texte) . "'", (string) $traitement);
 
-	// signaler qu'on est dans l'espace prive pour les filtres qui se servent de ce flag
-	if (test_espace_prive()) {
-		$env['espace_prive'] = 1;
-	}
+    // signaler qu'on est dans l'espace prive pour les filtres qui se servent de ce flag
+    if (test_espace_prive()) {
+        $env['espace_prive'] = 1;
+    }
 
-	// Fournir $connect et $Pile[0] au traitement si besoin
-	$Pile = [0 => $env];
-	eval("\$texte = $traitement;");
+    // Fournir $connect et $Pile[0] au traitement si besoin
+    $Pile = [0 => $env];
+    eval("\$texte = $traitement;");
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -4747,21 +4747,21 @@ 
  * @return string
  */
 function generer_objet_lien(int $id_objet, string $objet, int $longueur = 80, string $connect = ''): string {
-	include_spip('inc/liens');
-	$titre = traiter_raccourci_titre($id_objet, $objet, $connect);
-	// lorsque l'objet n'est plus declare (plugin desactive par exemple)
-	// le raccourcis n'est plus valide
-	$titre = typo($titre['titre'] ?? '');
-	// on essaye avec generer_objet_info ?
-	if (!strlen($titre) && !$connect) {
-		$titre = generer_objet_info($id_objet, $objet, 'titre');
-	}
-	if (!strlen($titre)) {
-		$titre = _T('info_sans_titre');
-	}
-	$url = generer_objet_url($id_objet, $objet, '', '', null, '', $connect);
+    include_spip('inc/liens');
+    $titre = traiter_raccourci_titre($id_objet, $objet, $connect);
+    // lorsque l'objet n'est plus declare (plugin desactive par exemple)
+    // le raccourcis n'est plus valide
+    $titre = typo($titre['titre'] ?? '');
+    // on essaye avec generer_objet_info ?
+    if (!strlen($titre) && !$connect) {
+        $titre = generer_objet_info($id_objet, $objet, 'titre');
+    }
+    if (!strlen($titre)) {
+        $titre = _T('info_sans_titre');
+    }
+    $url = generer_objet_url($id_objet, $objet, '', '', null, '', $connect);
 
-	return "<a href='$url' class='$objet'>" . couper($titre, $longueur) . '</a>';
+    return "<a href='$url' class='$objet'>" . couper($titre, $longueur) . '</a>';
 }
 
 /**
@@ -4777,15 +4777,15 @@ 
  * @return string
  */
 function wrap($texte, $wrap) {
-	$balises = extraire_balises($wrap);
-	if (preg_match_all(",<([a-z]\w*)\b[^>]*>,UimsS", $wrap, $regs, PREG_PATTERN_ORDER)) {
-		$texte = $wrap . $texte;
-		$regs = array_reverse($regs[1]);
-		$wrap = '</' . implode('></', $regs) . '>';
-		$texte .= $wrap;
-	}
+    $balises = extraire_balises($wrap);
+    if (preg_match_all(",<([a-z]\w*)\b[^>]*>,UimsS", $wrap, $regs, PREG_PATTERN_ORDER)) {
+        $texte = $wrap . $texte;
+        $regs = array_reverse($regs[1]);
+        $wrap = '</' . implode('></', $regs) . '>';
+        $texte .= $wrap;
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -4805,42 +4805,42 @@ 
  * @return array|mixed|string
  */
 function filtre_print_dist($u, $join = '<br />', $indent = 0) {
-	if (is_string($u)) {
-		return typo($u);
-	}
-
-	// caster $u en array si besoin
-	if (is_object($u)) {
-		$u = (array)$u;
-	}
-
-	if (is_array($u)) {
-		$out = '';
-		// toutes les cles sont numeriques ?
-		// et aucun enfant n'est un tableau
-		// liste simple separee par des virgules
-		$numeric_keys = array_map('is_numeric', array_keys($u));
-		$array_values = array_map('is_array', $u);
-		$object_values = array_map('is_object', $u);
-		if (
-			array_sum($numeric_keys) == count($numeric_keys)
-			&& !array_sum($array_values)
-			&& !array_sum($object_values)
-		) {
-			return implode(', ', array_map('filtre_print_dist', $u));
-		}
-
-		// sinon on passe a la ligne et on indente
-		$i_str = str_pad('', $indent, ' ');
-		foreach ($u as $k => $v) {
-			$out .= $join . $i_str . "$k: " . filtre_print_dist($v, $join, $indent + 2);
-		}
-
-		return $out;
-	}
-
-	// on sait pas quoi faire...
-	return $u;
+    if (is_string($u)) {
+        return typo($u);
+    }
+
+    // caster $u en array si besoin
+    if (is_object($u)) {
+        $u = (array)$u;
+    }
+
+    if (is_array($u)) {
+        $out = '';
+        // toutes les cles sont numeriques ?
+        // et aucun enfant n'est un tableau
+        // liste simple separee par des virgules
+        $numeric_keys = array_map('is_numeric', array_keys($u));
+        $array_values = array_map('is_array', $u);
+        $object_values = array_map('is_object', $u);
+        if (
+            array_sum($numeric_keys) == count($numeric_keys)
+            && !array_sum($array_values)
+            && !array_sum($object_values)
+        ) {
+            return implode(', ', array_map('filtre_print_dist', $u));
+        }
+
+        // sinon on passe a la ligne et on indente
+        $i_str = str_pad('', $indent, ' ');
+        foreach ($u as $k => $v) {
+            $out .= $join . $i_str . "$k: " . filtre_print_dist($v, $join, $indent + 2);
+        }
+
+        return $out;
+    }
+
+    // on sait pas quoi faire...
+    return $u;
 }
 
 
@@ -4853,10 +4853,10 @@ 
  * @return string|array
  */
 function objet_info($objet, $info) {
-	$table = table_objet_sql($objet);
-	$infos = lister_tables_objets_sql($table);
+    $table = table_objet_sql($objet);
+    $infos = lister_tables_objets_sql($table);
 
-	return ($infos[$info] ?? '');
+    return ($infos[$info] ?? '');
 }
 
 /**
@@ -4871,11 +4871,11 @@ 
  *     texte traduit du comptage, tel que '3 articles'
  */
 function objet_afficher_nb($nb, $objet) {
-	if (!$nb) {
-		return _T(objet_info($objet, 'info_aucun_objet'));
-	} else {
-		return _T(objet_info($objet, $nb == 1 ? 'info_1_objet' : 'info_nb_objets'), ['nb' => $nb]);
-	}
+    if (!$nb) {
+        return _T(objet_info($objet, 'info_aucun_objet'));
+    } else {
+        return _T(objet_info($objet, $nb == 1 ? 'info_1_objet' : 'info_nb_objets'), ['nb' => $nb]);
+    }
 }
 
 /**
@@ -4887,11 +4887,11 @@ 
  * @return string
  */
 function objet_icone($objet, $taille = 24, $class = '') {
-	$icone = objet_info($objet, 'icone_objet') . '-' . $taille . '.png';
-	$icone = chemin_image($icone);
-	$balise_img = charger_filtre('balise_img');
+    $icone = objet_info($objet, 'icone_objet') . '-' . $taille . '.png';
+    $icone = chemin_image($icone);
+    $balise_img = charger_filtre('balise_img');
 
-	return $icone ? $balise_img($icone, _T(objet_info($objet, 'texte_objet')), $class, $taille) : '';
+    return $icone ? $balise_img($icone, _T(objet_info($objet, 'texte_objet')), $class, $taille) : '';
 }
 
 /**
@@ -4912,12 +4912,12 @@ 
  * @return string
  */
 function objet_T($objet, $chaine, $args = [], $options = []) {
-	$chaine = explode(':', $chaine);
-	if ($t = _T($objet . ':' . end($chaine), $args, array_merge($options, ['force' => false]))) {
-		return $t;
-	}
-	$chaine = implode(':', $chaine);
-	return _T($chaine, $args, $options);
+    $chaine = explode(':', $chaine);
+    if ($t = _T($objet . ':' . end($chaine), $args, array_merge($options, ['force' => false]))) {
+        return $t;
+    }
+    $chaine = implode(':', $chaine);
+    return _T($chaine, $args, $options);
 }
 
 /**
@@ -4931,18 +4931,18 @@ 
  * @return string      Code HTML
  */
 function insert_head_css_conditionnel($flux) {
-	if (
-		!str_contains($flux, '<!-- insert_head_css -->')
-		&& ($p = strpos($flux, '<!-- insert_head -->'))
-	) {
-		// plutot avant le premier js externe (jquery) pour etre non bloquant
-		if (($p1 = stripos($flux, '<script src=')) && $p1 < $p) {
-			$p = $p1;
-		}
-		$flux = substr_replace($flux, (string) pipeline('insert_head_css', '<!-- insert_head_css -->'), $p, 0);
-	}
+    if (
+        !str_contains($flux, '<!-- insert_head_css -->')
+        && ($p = strpos($flux, '<!-- insert_head -->'))
+    ) {
+        // plutot avant le premier js externe (jquery) pour etre non bloquant
+        if (($p1 = stripos($flux, '<script src=')) && $p1 < $p) {
+            $p = $p1;
+        }
+        $flux = substr_replace($flux, (string) pipeline('insert_head_css', '<!-- insert_head_css -->'), $p, 0);
+    }
 
-	return $flux;
+    return $flux;
 }
 
 /**
@@ -4965,75 +4965,75 @@ 
  * @return string
  */
 function produire_fond_statique($fond, $contexte = [], $options = [], string $connect = '') {
-	if (isset($contexte['format'])) {
-		$extension = $contexte['format'];
-		unset($contexte['format']);
-	} else {
-		$extension = 'html';
-		if (preg_match(',[.](css|js|json|xml|svg)$,', $fond, $m)) {
-			$extension = $m[1];
-		}
-	}
-	// recuperer le contenu produit par le squelette
-	$options['raw'] = true;
-	$cache = recuperer_fond($fond, $contexte, $options, $connect);
-
-	// calculer le nom de la css
-	$dir_var = sous_repertoire(_DIR_VAR, 'cache-' . $extension);
-	$nom_safe = preg_replace(',\W,', '_', str_replace('.', '_', $fond));
-	$contexte_implicite = calculer_contexte_implicite();
-
-	// par defaut on hash selon les contextes qui sont a priori moins variables
-	// mais on peut hasher selon le contenu a la demande, si plusieurs contextes produisent un meme contenu
-	// reduit la variabilite du nom et donc le nombre de css concatenees possibles in fine
-	if (isset($options['hash_on_content']) && $options['hash_on_content']) {
-		$hash = md5((string) ($contexte_implicite['host'] . '::' . $cache));
-	}
-	else {
-		unset($contexte_implicite['notes']); // pas pertinent pour signaler un changeemnt de contenu pour des css/js
-		ksort($contexte);
-		$hash = md5($fond . json_encode($contexte_implicite, JSON_THROW_ON_ERROR) . json_encode($contexte, JSON_THROW_ON_ERROR) . $connect);
-	}
-	$filename = $dir_var . $extension . "dyn-$nom_safe-" . substr($hash, 0, 8) . ".$extension";
-
-	// mettre a jour le fichier si il n'existe pas
-	// ou trop ancien
-	// le dernier fichier produit est toujours suffixe par .last
-	// et recopie sur le fichier cible uniquement si il change
-	if (
-		!file_exists($filename)
-		|| !file_exists($filename . '.last')
-		|| isset($cache['lastmodified']) && $cache['lastmodified'] && filemtime($filename . '.last') < $cache['lastmodified']
-		|| defined('_VAR_MODE') && _VAR_MODE == 'recalcul'
-	) {
-		$contenu = $cache['texte'];
-		// passer les urls en absolu si c'est une css
-		if ($extension == 'css') {
-			$contenu = urls_absolues_css(
-				$contenu,
-				test_espace_prive() ? generer_url_ecrire('accueil') : generer_url_public($fond)
-			);
-		}
-
-		$comment = '';
-		// ne pas insérer de commentaire sur certains formats
-		if (!in_array($extension, ['json', 'xml', 'svg'])) {
-			$comment = "/* #PRODUIRE{fond=$fond";
-			foreach ($contexte as $k => $v) {
-				if (is_array($v)) {
-					$v = var_export($v, true);
-				}
-				$comment .= ",$k=$v";
-			}
-			// pas de date dans le commentaire car sinon ca invalide le md5 et force la maj
-			// mais on peut mettre un md5 du contenu, ce qui donne un aperu rapide si la feuille a change ou non
-			$comment .= "}\n   md5:" . md5((string) $contenu) . " */\n";
-		}
-		// et ecrire le fichier si il change
-		ecrire_fichier_calcule_si_modifie($filename, $comment . $contenu, false, true);
-	}
-
-	return timestamp($filename);
+    if (isset($contexte['format'])) {
+        $extension = $contexte['format'];
+        unset($contexte['format']);
+    } else {
+        $extension = 'html';
+        if (preg_match(',[.](css|js|json|xml|svg)$,', $fond, $m)) {
+            $extension = $m[1];
+        }
+    }
+    // recuperer le contenu produit par le squelette
+    $options['raw'] = true;
+    $cache = recuperer_fond($fond, $contexte, $options, $connect);
+
+    // calculer le nom de la css
+    $dir_var = sous_repertoire(_DIR_VAR, 'cache-' . $extension);
+    $nom_safe = preg_replace(',\W,', '_', str_replace('.', '_', $fond));
+    $contexte_implicite = calculer_contexte_implicite();
+
+    // par defaut on hash selon les contextes qui sont a priori moins variables
+    // mais on peut hasher selon le contenu a la demande, si plusieurs contextes produisent un meme contenu
+    // reduit la variabilite du nom et donc le nombre de css concatenees possibles in fine
+    if (isset($options['hash_on_content']) && $options['hash_on_content']) {
+        $hash = md5((string) ($contexte_implicite['host'] . '::' . $cache));
+    }
+    else {
+        unset($contexte_implicite['notes']); // pas pertinent pour signaler un changeemnt de contenu pour des css/js
+        ksort($contexte);
+        $hash = md5($fond . json_encode($contexte_implicite, JSON_THROW_ON_ERROR) . json_encode($contexte, JSON_THROW_ON_ERROR) . $connect);
+    }
+    $filename = $dir_var . $extension . "dyn-$nom_safe-" . substr($hash, 0, 8) . ".$extension";
+
+    // mettre a jour le fichier si il n'existe pas
+    // ou trop ancien
+    // le dernier fichier produit est toujours suffixe par .last
+    // et recopie sur le fichier cible uniquement si il change
+    if (
+        !file_exists($filename)
+        || !file_exists($filename . '.last')
+        || isset($cache['lastmodified']) && $cache['lastmodified'] && filemtime($filename . '.last') < $cache['lastmodified']
+        || defined('_VAR_MODE') && _VAR_MODE == 'recalcul'
+    ) {
+        $contenu = $cache['texte'];
+        // passer les urls en absolu si c'est une css
+        if ($extension == 'css') {
+            $contenu = urls_absolues_css(
+                $contenu,
+                test_espace_prive() ? generer_url_ecrire('accueil') : generer_url_public($fond)
+            );
+        }
+
+        $comment = '';
+        // ne pas insérer de commentaire sur certains formats
+        if (!in_array($extension, ['json', 'xml', 'svg'])) {
+            $comment = "/* #PRODUIRE{fond=$fond";
+            foreach ($contexte as $k => $v) {
+                if (is_array($v)) {
+                    $v = var_export($v, true);
+                }
+                $comment .= ",$k=$v";
+            }
+            // pas de date dans le commentaire car sinon ca invalide le md5 et force la maj
+            // mais on peut mettre un md5 du contenu, ce qui donne un aperu rapide si la feuille a change ou non
+            $comment .= "}\n   md5:" . md5((string) $contenu) . " */\n";
+        }
+        // et ecrire le fichier si il change
+        ecrire_fichier_calcule_si_modifie($filename, $comment . $contenu, false, true);
+    }
+
+    return timestamp($filename);
 }
 
 /**
@@ -5046,11 +5046,11 @@ 
  *    $fichier auquel on a ajouté le timestamp
  */
 function timestamp($fichier) {
-	if (!$fichier || !file_exists($fichier) || !$m = filemtime($fichier)) {
-		return $fichier;
-	}
+    if (!$fichier || !file_exists($fichier) || !$m = filemtime($fichier)) {
+        return $fichier;
+    }
 
-	return "$fichier?$m";
+    return "$fichier?$m";
 }
 
 /**
@@ -5060,11 +5060,11 @@ 
  * @return string
  */
 function supprimer_timestamp($url) {
-	if (!str_contains($url, '?')) {
-		return $url;
-	}
+    if (!str_contains($url, '?')) {
+        return $url;
+    }
 
-	return preg_replace(',\?[[:digit:]]+$,', '', $url);
+    return preg_replace(',\?[[:digit:]]+$,', '', $url);
 }
 
 /**
@@ -5079,15 +5079,15 @@ 
  * @return string
  */
 function filtre_nettoyer_titre_email_dist($titre) {
-	include_spip('inc/envoyer_mail');
+    include_spip('inc/envoyer_mail');
 
-	$titre = nettoyer_titre_email($titre);
-	// on est dans un squelette : securiser le retour
-	if (str_contains($titre, '<')) {
-		$titre = interdire_scripts($titre);
-	}
+    $titre = nettoyer_titre_email($titre);
+    // on est dans un squelette : securiser le retour
+    if (str_contains($titre, '<')) {
+        $titre = interdire_scripts($titre);
+    }
 
-	return $titre;
+    return $titre;
 }
 
 /**
@@ -5109,27 +5109,27 @@ 
  * @return string
  */
 function filtre_chercher_rubrique_dist(
-	$titre,
-	$id_objet,
-	$id_parent,
-	$objet,
-	$id_secteur,
-	$restreint,
-	$actionable = false,
-	$retour_sans_cadre = false
+    $titre,
+    $id_objet,
+    $id_parent,
+    $objet,
+    $id_secteur,
+    $restreint,
+    $actionable = false,
+    $retour_sans_cadre = false
 ) {
-	include_spip('inc/filtres_ecrire');
+    include_spip('inc/filtres_ecrire');
 
-	return chercher_rubrique(
-		$titre,
-		$id_objet,
-		$id_parent,
-		$objet,
-		$id_secteur,
-		$restreint,
-		$actionable,
-		$retour_sans_cadre
-	);
+    return chercher_rubrique(
+        $titre,
+        $id_objet,
+        $id_parent,
+        $objet,
+        $id_secteur,
+        $restreint,
+        $actionable,
+        $retour_sans_cadre
+    );
 }
 
 /**
@@ -5158,56 +5158,56 @@ 
  *     Chaîne vide si l'accès est autorisé
  */
 function sinon_interdire_acces($ok = false, $url = '', $statut = 0, $message = null) {
-	if ($ok) {
-		return '';
-	}
-
-	// Vider tous les tampons
-	$level = @ob_get_level();
-	while ($level--) {
-		@ob_end_clean();
-	}
-
-	include_spip('inc/headers');
-
-	// S'il y a une URL, on redirige (si pas de statut, la fonction mettra 302 par défaut)
-	if ($url) {
-		redirige_par_entete($url, '', $statut);
-	}
-
-	// ecriture simplifiee avec message en 3eme argument (= statut 403)
-	if (!is_numeric($statut) && is_null($message)) {
-		$message = $statut;
-		$statut = 0;
-	}
-	if (!$message) {
-		$message = '';
-	}
-	$statut = (int) $statut;
-
-	// Si on est dans l'espace privé, on génère du 403 Forbidden par defaut ou du 404
-	if (test_espace_prive()) {
-		if (!$statut || !in_array($statut, [404, 403])) {
-			$statut = 403;
-		}
-		http_response_code(403);
-		$echec = charger_fonction('403', 'exec');
-		$echec($message);
-	} else {
-		// Sinon dans l'espace public on redirige vers une 404 par défaut, car elle toujours présente normalement
-		if (!$statut) {
-			$statut = 404;
-		}
-		// Dans tous les cas on modifie l'entité avec ce qui est demandé
-		http_response_code($statut);
-		// Si le statut est une erreur et qu'il n'y a pas de redirection on va chercher le squelette du même nom
-		if ($statut >= 400) {
-			echo recuperer_fond("$statut", ['erreur' => $message]);
-		}
-	}
-
-
-	exit;
+    if ($ok) {
+        return '';
+    }
+
+    // Vider tous les tampons
+    $level = @ob_get_level();
+    while ($level--) {
+        @ob_end_clean();
+    }
+
+    include_spip('inc/headers');
+
+    // S'il y a une URL, on redirige (si pas de statut, la fonction mettra 302 par défaut)
+    if ($url) {
+        redirige_par_entete($url, '', $statut);
+    }
+
+    // ecriture simplifiee avec message en 3eme argument (= statut 403)
+    if (!is_numeric($statut) && is_null($message)) {
+        $message = $statut;
+        $statut = 0;
+    }
+    if (!$message) {
+        $message = '';
+    }
+    $statut = (int) $statut;
+
+    // Si on est dans l'espace privé, on génère du 403 Forbidden par defaut ou du 404
+    if (test_espace_prive()) {
+        if (!$statut || !in_array($statut, [404, 403])) {
+            $statut = 403;
+        }
+        http_response_code(403);
+        $echec = charger_fonction('403', 'exec');
+        $echec($message);
+    } else {
+        // Sinon dans l'espace public on redirige vers une 404 par défaut, car elle toujours présente normalement
+        if (!$statut) {
+            $statut = 404;
+        }
+        // Dans tous les cas on modifie l'entité avec ce qui est demandé
+        http_response_code($statut);
+        // Si le statut est une erreur et qu'il n'y a pas de redirection on va chercher le squelette du même nom
+        if ($statut >= 400) {
+            echo recuperer_fond("$statut", ['erreur' => $message]);
+        }
+    }
+
+
+    exit;
 }
 
 /**
@@ -5218,11 +5218,11 @@ 
  * @return string
  */
 function filtre_compacte_dist($source, $format = null) {
-	if (function_exists('minifier')) {
-		return minifier($source, $format);
-	}
+    if (function_exists('minifier')) {
+        return minifier($source, $format);
+    }
 
-	return $source;
+    return $source;
 }
 
 
@@ -5232,32 +5232,32 @@ 
  * @return string
  */
 function spip_affiche_mot_de_passe_masque(#[\SensitiveParameter] ?string $passe, bool $afficher_partiellement = false, ?int $portion_pourcent = null): string {
-	$passe ??= '';
-	$l = strlen($passe);
-
-	if ($l <= 8 || !$afficher_partiellement) {
-		if (!$l) {
-			return ''; // montrer qu'il y a pas de mot de passe si il y en a pas
-		}
-		return str_pad('', $afficher_partiellement ? $l : 16, '*');
-	}
-
-	if (is_null($portion_pourcent)) {
-		if (!defined('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT')) {
-			define('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT', 20); // 20%
-		}
-		$portion_pourcent = _SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT;
-	}
-	if ($portion_pourcent >= 100) {
-		return $passe;
-	}
-	$e = (int) ceil($l * $portion_pourcent / 100 / 2);
-	$e = max($e, 0);
-	$mid = str_pad('', $l - 2 * $e, '*');
-	if ($e > 0 && strlen($mid) > 8) {
-		$mid = '***...***';
-	}
-	return substr($passe, 0, $e) . $mid . ($e > 0 ? substr($passe, -$e) : '');
+    $passe ??= '';
+    $l = strlen($passe);
+
+    if ($l <= 8 || !$afficher_partiellement) {
+        if (!$l) {
+            return ''; // montrer qu'il y a pas de mot de passe si il y en a pas
+        }
+        return str_pad('', $afficher_partiellement ? $l : 16, '*');
+    }
+
+    if (is_null($portion_pourcent)) {
+        if (!defined('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT')) {
+            define('_SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT', 20); // 20%
+        }
+        $portion_pourcent = _SPIP_AFFICHE_MOT_DE_PASSE_MASQUE_PERCENT;
+    }
+    if ($portion_pourcent >= 100) {
+        return $passe;
+    }
+    $e = (int) ceil($l * $portion_pourcent / 100 / 2);
+    $e = max($e, 0);
+    $mid = str_pad('', $l - 2 * $e, '*');
+    if ($e > 0 && strlen($mid) > 8) {
+        $mid = '***...***';
+    }
+    return substr($passe, 0, $e) . $mid . ($e > 0 ? substr($passe, -$e) : '');
 }
 
 
@@ -5278,64 +5278,64 @@ 
  */
 function identifiant_slug($texte, $type = '', $options = []) {
 
-	$original = $texte;
-	$separateur = ($options['separateur'] ?? '_');
-	$longueur_maxi = ($options['longueur_maxi'] ?? 60);
-	$longueur_mini = ($options['longueur_mini'] ?? 0);
+    $original = $texte;
+    $separateur = ($options['separateur'] ?? '_');
+    $longueur_maxi = ($options['longueur_maxi'] ?? 60);
+    $longueur_mini = ($options['longueur_mini'] ?? 0);
 
-	if (!function_exists('translitteration')) {
-		include_spip('inc/charsets');
-	}
+    if (!function_exists('translitteration')) {
+        include_spip('inc/charsets');
+    }
 
-	// pas de balise html
-	if (str_contains($texte, '<')) {
-		$texte = strip_tags($texte);
-	}
-	if (str_contains($texte, '&')) {
-		$texte = unicode2charset($texte);
-	}
-	// On enlève les espaces indésirables
-	$texte = trim($texte);
+    // pas de balise html
+    if (str_contains($texte, '<')) {
+        $texte = strip_tags($texte);
+    }
+    if (str_contains($texte, '&')) {
+        $texte = unicode2charset($texte);
+    }
+    // On enlève les espaces indésirables
+    $texte = trim($texte);
 
-	// On enlève les accents et cie
-	$texte = translitteration($texte);
+    // On enlève les accents et cie
+    $texte = translitteration($texte);
 
-	// On remplace tout ce qui n'est pas un mot par un séparateur
-	$texte = preg_replace(',[\W_]+,ms', (string) $separateur, $texte);
+    // On remplace tout ce qui n'est pas un mot par un séparateur
+    $texte = preg_replace(',[\W_]+,ms', (string) $separateur, $texte);
 
-	// nettoyer les doubles occurences du separateur si besoin
-	while (str_contains($texte, (string) "$separateur$separateur")) {
-		$texte = str_replace("$separateur$separateur", $separateur, $texte);
-	}
+    // nettoyer les doubles occurences du separateur si besoin
+    while (str_contains($texte, (string) "$separateur$separateur")) {
+        $texte = str_replace("$separateur$separateur", $separateur, $texte);
+    }
 
-	// pas de separateur au debut ni a la fin
-	$texte = trim($texte, $separateur);
+    // pas de separateur au debut ni a la fin
+    $texte = trim($texte, $separateur);
 
-	// en minuscules
-	$texte = strtolower($texte);
+    // en minuscules
+    $texte = strtolower($texte);
 
-	switch ($type) {
-		case 'class':
-		case 'id':
-		case 'anchor':
-			if (preg_match(',^\d,', $texte)) {
-				$texte = substr($type, 0, 1) . $texte;
-			}
-	}
+    switch ($type) {
+        case 'class':
+        case 'id':
+        case 'anchor':
+            if (preg_match(',^\d,', $texte)) {
+                $texte = substr($type, 0, 1) . $texte;
+            }
+    }
 
-	if (strlen($texte) > $longueur_maxi) {
-		$texte = substr($texte, 0, $longueur_maxi);
-	}
+    if (strlen($texte) > $longueur_maxi) {
+        $texte = substr($texte, 0, $longueur_maxi);
+    }
 
-	if (strlen($texte) < $longueur_mini && $longueur_mini < $longueur_maxi) {
-		if (preg_match(',^\d,', $texte)) {
-			$texte = ($type ? substr($type, 0, 1) : 's') . $texte;
-		}
-		$texte .= $separateur . md5($original);
-		$texte = substr($texte, 0, $longueur_mini);
-	}
+    if (strlen($texte) < $longueur_mini && $longueur_mini < $longueur_maxi) {
+        if (preg_match(',^\d,', $texte)) {
+            $texte = ($type ? substr($type, 0, 1) : 's') . $texte;
+        }
+        $texte .= $separateur . md5($original);
+        $texte = substr($texte, 0, $longueur_mini);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -5356,11 +5356,11 @@ 
  * @exemple `<:info_maximum|label_nettoyer:>`
  */
 function label_nettoyer(string $text, bool $ucfirst = true): string {
-	$label = preg_replace('#([\s:]|\&nbsp;)+$#u', '', $text);
-	if ($ucfirst) {
-		$label = spip_ucfirst($label);
-	}
-	return $label;
+    $label = preg_replace('#([\s:]|\&nbsp;)+$#u', '', $text);
+    if ($ucfirst) {
+        $label = spip_ucfirst($label);
+    }
+    return $label;
 }
 
 /**
@@ -5373,8 +5373,8 @@ 
  * @exemple `<:info_maximum|label_ponctuer:>`
  */
 function label_ponctuer(string $text, bool $ucfirst = true): string {
-	$label = label_nettoyer($text, $ucfirst);
-	return _T('label_ponctuer', ['label' => $label]);
+    $label = label_nettoyer($text, $ucfirst);
+    return _T('label_ponctuer', ['label' => $label]);
 }
 
 
@@ -5387,19 +5387,19 @@ 
  * @return array
  */
 function helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, $fonction) {
-	if (!in_array($fonction, ['objet_lister_parents', 'objet_lister_enfants', 'objet_lister_parents_par_type', 'objet_lister_enfants_par_type'])) {
-		return [];
-	}
+    if (!in_array($fonction, ['objet_lister_parents', 'objet_lister_enfants', 'objet_lister_parents_par_type', 'objet_lister_enfants_par_type'])) {
+        return [];
+    }
 
-	// compatibilite signature inversee
-	if (is_numeric($objet) && !is_numeric($id_objet)) {
-		[$objet, $id_objet] = [$id_objet, $objet];
-	}
+    // compatibilite signature inversee
+    if (is_numeric($objet) && !is_numeric($id_objet)) {
+        [$objet, $id_objet] = [$id_objet, $objet];
+    }
 
-	if (!function_exists($fonction)) {
-		include_spip('base/objets');
-	}
-	return $fonction($objet, $id_objet);
+    if (!function_exists($fonction)) {
+        include_spip('base/objets');
+    }
+    return $fonction($objet, $id_objet);
 }
 
 
@@ -5414,7 +5414,7 @@ 
  * @return array
  */
 function filtre_objet_lister_parents_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents');
 }
 
 /**
@@ -5428,7 +5428,7 @@ 
  * @return array
  */
 function filtre_objet_lister_parents_par_type_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents_par_type');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_parents_par_type');
 }
 
 /**
@@ -5442,7 +5442,7 @@ 
  * @return array
  */
 function filtre_objet_lister_enfants_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants');
 }
 
 /**
@@ -5456,5 +5456,5 @@ 
  * @return array
  */
 function filtre_objet_lister_enfants_par_type_dist($objet, $id_objet) {
-	return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants_par_type');
+    return helper_filtre_objet_lister_enfants_ou_parents($objet, $id_objet, 'objet_lister_enfants_par_type');
 }

ecrire/inc/editer.php

Indentation +414 added lines, -414 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('base/abstract_sql');
 
@@ -58,56 +58,56 @@ 
  *     Retour des traitements.
  **/
 function formulaires_editer_objet_traiter(
-	$type,
-	$id = 'new',
-	$id_parent = 0,
-	$lier_trad = 0,
-	$retour = '',
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $type,
+    $id = 'new',
+    $id_parent = 0,
+    $lier_trad = 0,
+    $retour = '',
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
 
-	$res = [];
-	// eviter la redirection forcee par l'action...
-	set_request('redirect');
-	if ($action_editer = charger_fonction("editer_$type", 'action', true)) {
-		[$id, $err] = $action_editer($id);
-	} else {
-		$action_editer = charger_fonction('editer_objet', 'action');
-		[$id, $err] = $action_editer($id, $type);
-	}
-	$id_table_objet = id_table_objet($type);
-	$res[$id_table_objet] = $id;
-	if ($err || !$id) {
-		$res['message_erreur'] = ($err ?: _T('erreur'));
-	} else {
-		// Un lien de trad a prendre en compte
-		if ($lier_trad) {
-			// referencer la traduction
-			$referencer_traduction = charger_fonction('referencer_traduction', 'action');
-			$referencer_traduction($type, $id, $lier_trad);
-			// actions de recopie de champs / liens sur le nouvel objet créé
-			$completer_traduction = charger_fonction('completer_traduction', 'inc');
-			$err = $completer_traduction($type, $id, $lier_trad);
-			if ($err) {
-				$res['message_erreur'] = $err;
-				return $res;
-			}
-		}
-
-		$res['message_ok'] = _T('info_modification_enregistree');
-		if ($retour) {
-			if (str_starts_with($retour, 'javascript:')) {
-				$res['message_ok'] .= '<script type="text/javascript">/*<![CDATA[*/' . substr($retour, 11) . '/*]]>*/</script>';
-				$res['editable'] = true;
-			} else {
-				$res['redirect'] = parametre_url($retour, $id_table_objet, $id);
-			}
-		}
-	}
-
-	return $res;
+    $res = [];
+    // eviter la redirection forcee par l'action...
+    set_request('redirect');
+    if ($action_editer = charger_fonction("editer_$type", 'action', true)) {
+        [$id, $err] = $action_editer($id);
+    } else {
+        $action_editer = charger_fonction('editer_objet', 'action');
+        [$id, $err] = $action_editer($id, $type);
+    }
+    $id_table_objet = id_table_objet($type);
+    $res[$id_table_objet] = $id;
+    if ($err || !$id) {
+        $res['message_erreur'] = ($err ?: _T('erreur'));
+    } else {
+        // Un lien de trad a prendre en compte
+        if ($lier_trad) {
+            // referencer la traduction
+            $referencer_traduction = charger_fonction('referencer_traduction', 'action');
+            $referencer_traduction($type, $id, $lier_trad);
+            // actions de recopie de champs / liens sur le nouvel objet créé
+            $completer_traduction = charger_fonction('completer_traduction', 'inc');
+            $err = $completer_traduction($type, $id, $lier_trad);
+            if ($err) {
+                $res['message_erreur'] = $err;
+                return $res;
+            }
+        }
+
+        $res['message_ok'] = _T('info_modification_enregistree');
+        if ($retour) {
+            if (str_starts_with($retour, 'javascript:')) {
+                $res['message_ok'] .= '<script type="text/javascript">/*<![CDATA[*/' . substr($retour, 11) . '/*]]>*/</script>';
+                $res['editable'] = true;
+            } else {
+                $res['redirect'] = parametre_url($retour, $id_table_objet, $id);
+            }
+        }
+    }
+
+    return $res;
 }
 
 /**
@@ -131,29 +131,29 @@ 
  *     Tableau des erreurs
  **/
 function formulaires_editer_objet_verifier($type, $id = 'new', $oblis = []) {
-	$erreurs = [];
-	if ((int) $id) {
-		$conflits = controler_contenu($type, $id);
-		if ($conflits && (is_countable($conflits) ? count($conflits) : 0)) {
-			foreach ($conflits as $champ => $conflit) {
-				if (!isset($erreurs[$champ])) {
-					$erreurs[$champ] = '';
-				}
-				$erreurs[$champ] .= _T('alerte_modif_info_concourante') . "<br /><textarea readonly='readonly' class='forml'>" . entites_html($conflit['base']) . '</textarea>';
-			}
-		}
-	}
-	foreach ($oblis as $obli) {
-		$value = _request($obli);
-		if (is_null($value) || !(is_array($value) ? count($value) : strlen((string) $value))) {
-			if (!isset($erreurs[$obli])) {
-				$erreurs[$obli] = '';
-			}
-			$erreurs[$obli] .= _T('info_obligatoire');
-		}
-	}
-
-	return $erreurs;
+    $erreurs = [];
+    if ((int) $id) {
+        $conflits = controler_contenu($type, $id);
+        if ($conflits && (is_countable($conflits) ? count($conflits) : 0)) {
+            foreach ($conflits as $champ => $conflit) {
+                if (!isset($erreurs[$champ])) {
+                    $erreurs[$champ] = '';
+                }
+                $erreurs[$champ] .= _T('alerte_modif_info_concourante') . "<br /><textarea readonly='readonly' class='forml'>" . entites_html($conflit['base']) . '</textarea>';
+            }
+        }
+    }
+    foreach ($oblis as $obli) {
+        $value = _request($obli);
+        if (is_null($value) || !(is_array($value) ? count($value) : strlen((string) $value))) {
+            if (!isset($erreurs[$obli])) {
+                $erreurs[$obli] = '';
+            }
+            $erreurs[$obli] .= _T('info_obligatoire');
+        }
+    }
+
+    return $erreurs;
 }
 
 /**
@@ -198,151 +198,151 @@ 
  *     Environnement du formulaire.
  **/
 function formulaires_editer_objet_charger(
-	$type,
-	$id = 'new',
-	$id_parent = 0,
-	$lier_trad = 0,
-	$retour = '',
-	$config_fonc = 'articles_edit_config',
-	$row = [],
-	$hidden = ''
+    $type,
+    $id = 'new',
+    $id_parent = 0,
+    $lier_trad = 0,
+    $retour = '',
+    $config_fonc = 'articles_edit_config',
+    $row = [],
+    $hidden = ''
 ) {
 
-	$table_objet = table_objet($type);
-	$table_objet_sql = table_objet_sql($type);
-	$id_table_objet = id_table_objet($type);
-	if (!is_array($row)) {
-		$row = [];
-	}
-
-	// on accepte pas une fonction de config inconnue si elle vient d'un modele
-	if (
-		$config_fonc
-		&& !in_array($config_fonc, ['articles_edit_config', 'rubriques_edit_config', 'auteurs_edit_config'])
-		&& $config_fonc !== $table_objet . '_edit_config'
-		&& ($args = test_formulaire_inclus_par_modele())
-		&& in_array($config_fonc, $args)
-	) {
-		$config_fonc = '';
-	}
-
-	$new = !is_numeric($id);
-	$lang_default = '';
-	// Appel direct dans un squelette
-	if (!$row) {
-		if (!$new || $lier_trad) {
-			if ($select = charger_fonction('precharger_' . $type, 'inc', true)) {
-				$row = $select($id, $id_parent, $lier_trad);
-				// si on a une fonction precharger, elle pu faire un reglage de langue
-				$lang_default = (empty($row['lang']) ? null : $row['lang']);
-			} else {
-				$row = sql_fetsel('*', $table_objet_sql, $id_table_objet . '=' . (int) $id);
-			}
-			if (!$new) {
-				$md5 = controles_md5($row ?: []);
-			}
-		}
-		if (!$row) {
-			$row = [];
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			if ($desc = $trouver_table($table_objet)) {
-				foreach ($desc['field'] as $k => $v) {
-					$row[$k] = '';
-				}
-			}
-		}
-	}
-
-	// Gaffe: sans ceci, on ecrase systematiquement l'article d'origine
-	// (et donc: pas de lien de traduction)
-	$id = ($new || $lier_trad)
-		? 'oui'
-		: $row[$id_table_objet];
-	$row[$id_table_objet] = $id;
-
-	$contexte = $row;
-	if (is_numeric($id_parent) && strlen($id_parent) && (!isset($contexte['id_parent']) || $new)) {
-		if (!isset($contexte['id_parent'])) {
-			unset($contexte['id_rubrique']);
-		}
-		$contexte['id_parent'] = $id_parent;
-	} elseif (!isset($contexte['id_parent'])) {
-		// id_rubrique dans id_parent si possible
-		if (isset($contexte['id_rubrique'])) {
-			$contexte['id_parent'] = $contexte['id_rubrique'];
-			unset($contexte['id_rubrique']);
-		} else {
-			$contexte['id_parent'] = '';
-		}
-		if (
-			!$contexte['id_parent']
-			&& ($preselectionner_parent_nouvel_objet = charger_fonction('preselectionner_parent_nouvel_objet', 'inc', true))
-		) {
-			$contexte['id_parent'] = $preselectionner_parent_nouvel_objet($type, $row);
-		}
-	}
-
-	$config = [];
-	if ($config_fonc) {
-		$contexte['config'] = $config = $config_fonc($contexte);
-		if (!$lang_default) {
-			include_spip('inc/session');
-			$lang_default = $config['langue'] ?? session_get('lang') ;
-		}
-	}
-	$config += [
-		'lignes' => 0,
-		'langue' => '',
-	];
-
-	$att_text = " class='textarea' "
-		. " rows='"
-		. ($config['lignes'] + 15)
-		. "' cols='40'";
-
-
-	// on veut conserver la langue de l'interface ;
-	// on passe cette donnee sous un autre nom, au cas ou le squelette
-	// voudrait l'exploiter
-	if (isset($contexte['lang'])) {
-		$contexte['langue'] = $contexte['lang'];
-		unset($contexte['lang']);
-	}
-
-	$contexte['_hidden'] = "<input type='hidden' name='editer_$type' value='oui' />\n" .
-		($lier_trad
-			 ? "\n<input type='hidden' name='lier_trad' value='" .
-				$lier_trad .
-				"' />" .
-				"\n<input type='hidden' name='changer_lang' value='" .
-				$lang_default .
-				"' />"
-			: '')
-		. $hidden
-		. ($md5 ?? '');
-
-	// preciser que le formulaire doit passer dans un pipeline
-	$contexte['_pipeline'] = ['editer_contenu_objet', ['type' => $type, 'id' => $id]];
-
-	// preciser que le formulaire doit etre securise auteur/action
-	// n'est plus utile lorsque l'action accepte l'id en argument direct
-	// on le garde pour compat
-	$contexte['_action'] = ["editer_$type", $id];
-
-	// et in fine placer l'autorisation
-	include_spip('inc/autoriser');
-	if ((int) $id) {
-		if (!autoriser('modifier', $type, (int) $id)) {
-			$contexte['editable'] = '';
-		}
-	}
-	else {
-		if (!autoriser('creer', $type, 0, null, ['id_parent' => $id_parent])) {
-			$contexte['editable'] = '';
-		}
-	}
-
-	return $contexte;
+    $table_objet = table_objet($type);
+    $table_objet_sql = table_objet_sql($type);
+    $id_table_objet = id_table_objet($type);
+    if (!is_array($row)) {
+        $row = [];
+    }
+
+    // on accepte pas une fonction de config inconnue si elle vient d'un modele
+    if (
+        $config_fonc
+        && !in_array($config_fonc, ['articles_edit_config', 'rubriques_edit_config', 'auteurs_edit_config'])
+        && $config_fonc !== $table_objet . '_edit_config'
+        && ($args = test_formulaire_inclus_par_modele())
+        && in_array($config_fonc, $args)
+    ) {
+        $config_fonc = '';
+    }
+
+    $new = !is_numeric($id);
+    $lang_default = '';
+    // Appel direct dans un squelette
+    if (!$row) {
+        if (!$new || $lier_trad) {
+            if ($select = charger_fonction('precharger_' . $type, 'inc', true)) {
+                $row = $select($id, $id_parent, $lier_trad);
+                // si on a une fonction precharger, elle pu faire un reglage de langue
+                $lang_default = (empty($row['lang']) ? null : $row['lang']);
+            } else {
+                $row = sql_fetsel('*', $table_objet_sql, $id_table_objet . '=' . (int) $id);
+            }
+            if (!$new) {
+                $md5 = controles_md5($row ?: []);
+            }
+        }
+        if (!$row) {
+            $row = [];
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            if ($desc = $trouver_table($table_objet)) {
+                foreach ($desc['field'] as $k => $v) {
+                    $row[$k] = '';
+                }
+            }
+        }
+    }
+
+    // Gaffe: sans ceci, on ecrase systematiquement l'article d'origine
+    // (et donc: pas de lien de traduction)
+    $id = ($new || $lier_trad)
+        ? 'oui'
+        : $row[$id_table_objet];
+    $row[$id_table_objet] = $id;
+
+    $contexte = $row;
+    if (is_numeric($id_parent) && strlen($id_parent) && (!isset($contexte['id_parent']) || $new)) {
+        if (!isset($contexte['id_parent'])) {
+            unset($contexte['id_rubrique']);
+        }
+        $contexte['id_parent'] = $id_parent;
+    } elseif (!isset($contexte['id_parent'])) {
+        // id_rubrique dans id_parent si possible
+        if (isset($contexte['id_rubrique'])) {
+            $contexte['id_parent'] = $contexte['id_rubrique'];
+            unset($contexte['id_rubrique']);
+        } else {
+            $contexte['id_parent'] = '';
+        }
+        if (
+            !$contexte['id_parent']
+            && ($preselectionner_parent_nouvel_objet = charger_fonction('preselectionner_parent_nouvel_objet', 'inc', true))
+        ) {
+            $contexte['id_parent'] = $preselectionner_parent_nouvel_objet($type, $row);
+        }
+    }
+
+    $config = [];
+    if ($config_fonc) {
+        $contexte['config'] = $config = $config_fonc($contexte);
+        if (!$lang_default) {
+            include_spip('inc/session');
+            $lang_default = $config['langue'] ?? session_get('lang') ;
+        }
+    }
+    $config += [
+        'lignes' => 0,
+        'langue' => '',
+    ];
+
+    $att_text = " class='textarea' "
+        . " rows='"
+        . ($config['lignes'] + 15)
+        . "' cols='40'";
+
+
+    // on veut conserver la langue de l'interface ;
+    // on passe cette donnee sous un autre nom, au cas ou le squelette
+    // voudrait l'exploiter
+    if (isset($contexte['lang'])) {
+        $contexte['langue'] = $contexte['lang'];
+        unset($contexte['lang']);
+    }
+
+    $contexte['_hidden'] = "<input type='hidden' name='editer_$type' value='oui' />\n" .
+        ($lier_trad
+             ? "\n<input type='hidden' name='lier_trad' value='" .
+                $lier_trad .
+                "' />" .
+                "\n<input type='hidden' name='changer_lang' value='" .
+                $lang_default .
+                "' />"
+            : '')
+        . $hidden
+        . ($md5 ?? '');
+
+    // preciser que le formulaire doit passer dans un pipeline
+    $contexte['_pipeline'] = ['editer_contenu_objet', ['type' => $type, 'id' => $id]];
+
+    // preciser que le formulaire doit etre securise auteur/action
+    // n'est plus utile lorsque l'action accepte l'id en argument direct
+    // on le garde pour compat
+    $contexte['_action'] = ["editer_$type", $id];
+
+    // et in fine placer l'autorisation
+    include_spip('inc/autoriser');
+    if ((int) $id) {
+        if (!autoriser('modifier', $type, (int) $id)) {
+            $contexte['editable'] = '';
+        }
+    }
+    else {
+        if (!autoriser('creer', $type, 0, null, ['id_parent' => $id_parent])) {
+            $contexte['editable'] = '';
+        }
+    }
+
+    return $contexte;
 }
 
 /**
@@ -353,29 +353,29 @@ 
  * @return array
  */
 function coupe_trop_long($texte) {
-	$aider = charger_fonction('aider', 'inc');
-	if (strlen($texte) > 28 * 1024) {
-		$texte = str_replace("\r\n", "\n", $texte);
-		$pos = strpos($texte, "\n\n", 28 * 1024);  // coupe para > 28 ko
-		if ($pos > 0 && $pos < 32 * 1024) {
-			$debut = substr($texte, 0, $pos) . "\n\n<!--SPIP-->\n";
-			$suite = substr($texte, $pos + 2);
-		} else {
-			$pos = strpos($texte, ' ', 28 * 1024);  // sinon coupe espace
-			if (!($pos > 0 && $pos < 32 * 1024)) {
-				$pos = 28 * 1024;  // au pire (pas d'espace trouv'e)
-				$decalage = 0; // si y'a pas d'espace, il ne faut pas perdre le caract`ere
-			} else {
-				$decalage = 1;
-			}
-			$debut = substr($texte, 0, $pos + $decalage); // Il faut conserver l'espace s'il y en a un
-			$suite = substr($texte, $pos + $decalage);
-		}
-
-		return ([$debut, $suite]);
-	} else {
-		return ([$texte, '']);
-	}
+    $aider = charger_fonction('aider', 'inc');
+    if (strlen($texte) > 28 * 1024) {
+        $texte = str_replace("\r\n", "\n", $texte);
+        $pos = strpos($texte, "\n\n", 28 * 1024);  // coupe para > 28 ko
+        if ($pos > 0 && $pos < 32 * 1024) {
+            $debut = substr($texte, 0, $pos) . "\n\n<!--SPIP-->\n";
+            $suite = substr($texte, $pos + 2);
+        } else {
+            $pos = strpos($texte, ' ', 28 * 1024);  // sinon coupe espace
+            if (!($pos > 0 && $pos < 32 * 1024)) {
+                $pos = 28 * 1024;  // au pire (pas d'espace trouv'e)
+                $decalage = 0; // si y'a pas d'espace, il ne faut pas perdre le caract`ere
+            } else {
+                $decalage = 1;
+            }
+            $debut = substr($texte, 0, $pos + $decalage); // Il faut conserver l'espace s'il y en a un
+            $suite = substr($texte, $pos + $decalage);
+        }
+
+        return ([$debut, $suite]);
+    } else {
+        return ([$texte, '']);
+    }
 }
 
 /**
@@ -386,13 +386,13 @@ 
  * @param int $longueur
  */
 function titre_automatique($champ_titre, $champs_contenu, $longueur = null) {
-	if (!_request($champ_titre)) {
-		$titrer_contenu = charger_fonction('titrer_contenu', 'inc');
-		$t = is_null($longueur) ? $titrer_contenu($champs_contenu) : $titrer_contenu($champs_contenu, null, $longueur);
-		if ($t) {
-			set_request($champ_titre, $t);
-		}
-	}
+    if (!_request($champ_titre)) {
+        $titrer_contenu = charger_fonction('titrer_contenu', 'inc');
+        $t = is_null($longueur) ? $titrer_contenu($champs_contenu) : $titrer_contenu($champs_contenu, null, $longueur);
+        if ($t) {
+            set_request($champ_titre, $t);
+        }
+    }
 }
 
 /**
@@ -412,20 +412,20 @@ 
  * @return string
  */
 function inc_titrer_contenu_dist($champs_contenu, $c = null, $longueur = 50) {
-	// trouver un champ texte non vide
-	$t = '';
-	foreach ($champs_contenu as $champ) {
-		if ($t = _request($champ, $c)) {
-			break;
-		}
-	}
-
-	if ($t) {
-		include_spip('inc/texte_mini');
-		$t = couper($t, $longueur, '...');
-	}
-
-	return $t;
+    // trouver un champ texte non vide
+    $t = '';
+    foreach ($champs_contenu as $champ) {
+        if ($t = _request($champ, $c)) {
+            break;
+        }
+    }
+
+    if ($t) {
+        include_spip('inc/texte_mini');
+        $t = couper($t, $longueur, '...');
+    }
+
+    return $t;
 }
 
 /**
@@ -447,22 +447,22 @@ 
  *      - array sinon couples ('$prefixe$colonne => md5)
  **/
 function controles_md5(array $data, string $prefixe = 'ctr_', string $format = 'html') {
-	$ctr = [];
-	foreach ($data as $key => $val) {
-		$m = md5($val ?? '');
-		$k = $prefixe . $key;
-
-		$ctr[$k] = match ($format) {
-			'html' => "<input type='hidden' value='$m' name='$k' />",
-			default => $m,
-		};
-	}
-
-	if ($format === 'html') {
-		return "\n\n<!-- controles md5 -->\n" . implode("\n", $ctr) . "\n\n";
-	} else {
-		return $ctr;
-	}
+    $ctr = [];
+    foreach ($data as $key => $val) {
+        $m = md5($val ?? '');
+        $k = $prefixe . $key;
+
+        $ctr[$k] = match ($format) {
+            'html' => "<input type='hidden' value='$m' name='$k' />",
+            default => $m,
+        };
+    }
+
+    if ($format === 'html') {
+        return "\n\n<!-- controles md5 -->\n" . implode("\n", $ctr) . "\n\n";
+    } else {
+        return $ctr;
+    }
 }
 
 /**
@@ -501,80 +501,80 @@ 
  *     - post : le contenu posté
  **/
 function controler_contenu($type, $id, $options = [], $c = false, $serveur = '') {
-	include_spip('inc/filtres');
-
-	$table_objet = table_objet($type);
-	$spip_table_objet = table_objet_sql($type);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($table_objet, $serveur);
-
-	// Appels incomplets (sans $c)
-	if (!is_array($c)) {
-		$c = [];
-		foreach ($desc['field'] as $champ => $ignore) {
-			if (_request($champ)) {
-				$c[$champ] = _request($champ);
-			}
-		}
-	}
-
-	// Securite : certaines variables ne sont jamais acceptees ici
-	// car elles ne relevent pas de autoriser(article, modifier) ;
-	// il faut passer par instituer_XX()
-	// TODO: faut-il passer ces variables interdites
-	// dans un fichier de description separe ?
-	unset($c['statut']);
-	unset($c['id_parent']);
-	unset($c['id_rubrique']);
-	unset($c['id_secteur']);
-
-	// Gerer les champs non vides
-	if (isset($options['nonvide']) && is_array($options['nonvide'])) {
-		foreach ($options['nonvide'] as $champ => $sinon) {
-			if ($c[$champ] === '') {
-				$c[$champ] = $sinon;
-			}
-		}
-	}
-
-	// N'accepter que les champs qui existent
-	// [TODO] ici aussi on peut valider les contenus en fonction du type
-	$champs = [];
-	foreach ($desc['field'] as $champ => $ignore) {
-		if (isset($c[$champ])) {
-			$champs[$champ] = $c[$champ];
-		}
-	}
-
-	// Nettoyer les valeurs
-	$champs = array_map('corriger_caracteres', $champs);
-
-	// Envoyer aux plugins
-	$champs = pipeline(
-		'pre_edition',
-		[
-			'args' => [
-				'table' => $spip_table_objet, // compatibilite
-				'table_objet' => $table_objet,
-				'spip_table_objet' => $spip_table_objet,
-				'type' => $type,
-				'id_objet' => $id,
-				'champs' => $options['champs'] ?? [], // [doc] c'est quoi ?
-				'action' => 'controler',
-				'serveur' => $serveur,
-			],
-			'data' => $champs
-		]
-	);
-
-	if (!$champs) {
-		return false;
-	}
-
-	// Verifier si les mises a jour sont pertinentes, datees, en conflit etc
-	$conflits = controler_md5($champs, $_POST, $type, $id, $serveur, $options['prefix'] ?? 'ctr_');
-
-	return $conflits;
+    include_spip('inc/filtres');
+
+    $table_objet = table_objet($type);
+    $spip_table_objet = table_objet_sql($type);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($table_objet, $serveur);
+
+    // Appels incomplets (sans $c)
+    if (!is_array($c)) {
+        $c = [];
+        foreach ($desc['field'] as $champ => $ignore) {
+            if (_request($champ)) {
+                $c[$champ] = _request($champ);
+            }
+        }
+    }
+
+    // Securite : certaines variables ne sont jamais acceptees ici
+    // car elles ne relevent pas de autoriser(article, modifier) ;
+    // il faut passer par instituer_XX()
+    // TODO: faut-il passer ces variables interdites
+    // dans un fichier de description separe ?
+    unset($c['statut']);
+    unset($c['id_parent']);
+    unset($c['id_rubrique']);
+    unset($c['id_secteur']);
+
+    // Gerer les champs non vides
+    if (isset($options['nonvide']) && is_array($options['nonvide'])) {
+        foreach ($options['nonvide'] as $champ => $sinon) {
+            if ($c[$champ] === '') {
+                $c[$champ] = $sinon;
+            }
+        }
+    }
+
+    // N'accepter que les champs qui existent
+    // [TODO] ici aussi on peut valider les contenus en fonction du type
+    $champs = [];
+    foreach ($desc['field'] as $champ => $ignore) {
+        if (isset($c[$champ])) {
+            $champs[$champ] = $c[$champ];
+        }
+    }
+
+    // Nettoyer les valeurs
+    $champs = array_map('corriger_caracteres', $champs);
+
+    // Envoyer aux plugins
+    $champs = pipeline(
+        'pre_edition',
+        [
+            'args' => [
+                'table' => $spip_table_objet, // compatibilite
+                'table_objet' => $table_objet,
+                'spip_table_objet' => $spip_table_objet,
+                'type' => $type,
+                'id_objet' => $id,
+                'champs' => $options['champs'] ?? [], // [doc] c'est quoi ?
+                'action' => 'controler',
+                'serveur' => $serveur,
+            ],
+            'data' => $champs
+        ]
+    );
+
+    if (!$champs) {
+        return false;
+    }
+
+    // Verifier si les mises a jour sont pertinentes, datees, en conflit etc
+    $conflits = controler_md5($champs, $_POST, $type, $id, $serveur, $options['prefix'] ?? 'ctr_');
+
+    return $conflits;
 }
 
 
@@ -604,66 +604,66 @@ 
  *     - post : le contenu posté
  **/
 function controler_md5(&$champs, $ctr, $type, $id, $serveur, $prefix = 'ctr_') {
-	$spip_table_objet = table_objet_sql($type);
-	$id_table_objet = id_table_objet($type);
-
-	// Controle des MD5 envoyes
-	// On elimine les donnees non modifiees par le formulaire (mais
-	// potentiellement modifiees entre temps par un autre utilisateur)
-	foreach ($champs as $key => $val) {
-		if (
-			isset($ctr[$prefix . $key])
-			&& ($m = $ctr[$prefix . $key])
-			&& (is_scalar($val) && $m == md5($val))
-		) {
-			unset($champs[$key]);
-		}
-	}
-	if (!$champs) {
-		return;
-	}
-
-	// On veut savoir si notre modif va avoir un impact
-	// par rapport aux donnees contenues dans la base
-	// (qui peuvent etre differentes de celles ayant servi a calculer le ctr)
-	$s = sql_fetsel(array_keys($champs), $spip_table_objet, "$id_table_objet=$id", $serveur);
-	$intact = true;
-	foreach ($champs as $ch => $val) {
-		$intact &= ($s[$ch] == $val);
-	}
-	if ($intact) {
-		return;
-	}
-
-	// Detection de conflits :
-	// On verifie si notre modif ne provient pas d'un formulaire
-	// genere a partir de donnees modifiees dans l'intervalle ; ici
-	// on compare a ce qui est dans la base, et on bloque en cas
-	// de conflit.
-	$ctrh = $ctrq = $conflits = [];
-	foreach (array_keys($champs) as $key) {
-		if (isset($ctr[$prefix . $key]) && ($m = $ctr[$prefix . $key])) {
-			$ctrh[$key] = $m;
-			$ctrq[] = $key;
-		}
-	}
-	if ($ctrq) {
-		$ctrq = sql_fetsel($ctrq, $spip_table_objet, "$id_table_objet=$id", $serveur);
-		foreach ($ctrh as $key => $m) {
-			if (
-				$m != md5((string) $ctrq[$key])
-				&& $champs[$key] !== $ctrq[$key]
-			) {
-				$conflits[$key] = [
-					'base' => $ctrq[$key],
-					'post' => $champs[$key]
-				];
-				unset($champs[$key]); # stocker quand meme les modifs ?
-			}
-		}
-	}
-
-	return $conflits;
+    $spip_table_objet = table_objet_sql($type);
+    $id_table_objet = id_table_objet($type);
+
+    // Controle des MD5 envoyes
+    // On elimine les donnees non modifiees par le formulaire (mais
+    // potentiellement modifiees entre temps par un autre utilisateur)
+    foreach ($champs as $key => $val) {
+        if (
+            isset($ctr[$prefix . $key])
+            && ($m = $ctr[$prefix . $key])
+            && (is_scalar($val) && $m == md5($val))
+        ) {
+            unset($champs[$key]);
+        }
+    }
+    if (!$champs) {
+        return;
+    }
+
+    // On veut savoir si notre modif va avoir un impact
+    // par rapport aux donnees contenues dans la base
+    // (qui peuvent etre differentes de celles ayant servi a calculer le ctr)
+    $s = sql_fetsel(array_keys($champs), $spip_table_objet, "$id_table_objet=$id", $serveur);
+    $intact = true;
+    foreach ($champs as $ch => $val) {
+        $intact &= ($s[$ch] == $val);
+    }
+    if ($intact) {
+        return;
+    }
+
+    // Detection de conflits :
+    // On verifie si notre modif ne provient pas d'un formulaire
+    // genere a partir de donnees modifiees dans l'intervalle ; ici
+    // on compare a ce qui est dans la base, et on bloque en cas
+    // de conflit.
+    $ctrh = $ctrq = $conflits = [];
+    foreach (array_keys($champs) as $key) {
+        if (isset($ctr[$prefix . $key]) && ($m = $ctr[$prefix . $key])) {
+            $ctrh[$key] = $m;
+            $ctrq[] = $key;
+        }
+    }
+    if ($ctrq) {
+        $ctrq = sql_fetsel($ctrq, $spip_table_objet, "$id_table_objet=$id", $serveur);
+        foreach ($ctrh as $key => $m) {
+            if (
+                $m != md5((string) $ctrq[$key])
+                && $champs[$key] !== $ctrq[$key]
+            ) {
+                $conflits[$key] = [
+                    'base' => $ctrq[$key],
+                    'post' => $champs[$key]
+                ];
+                unset($champs[$key]); # stocker quand meme les modifs ?
+            }
+        }
+    }
+
+    return $conflits;
 }
 
 /**
@@ -675,9 +675,9 @@ 
  * @return string
  */
 function display_conflit_champ($x) {
-	if (strstr($x, "\n") || strlen($x) > 80) {
-		return "<textarea style='width:99%; height:10em;'>" . entites_html($x) . "</textarea>\n";
-	} else {
-		return "<input type='text' size='40' style='width:99%' value=\"" . entites_html($x) . "\" />\n";
-	}
+    if (strstr($x, "\n") || strlen($x) > 80) {
+        return "<textarea style='width:99%; height:10em;'>" . entites_html($x) . "</textarea>\n";
+    } else {
+        return "<input type='text' size='40' style='width:99%' value=\"" . entites_html($x) . "\" />\n";
+    }
 }

ecrire/inc/plugin.php

Indentation +976 added lines, -976 removed lines

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

ecrire/inc/auth.php

Indentation +448 added lines, -448 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -34,33 +34,33 @@ 
  *  - une chaîne vide si autorisation à pénétrer dans l'espace privé.
  */
 function inc_auth_dist() {
-	$row = auth_mode();
+    $row = auth_mode();
 
-	if ($row) {
-		return auth_init_droits($row);
-	}
+    if ($row) {
+        return auth_init_droits($row);
+    }
 
-	if (!$GLOBALS['connect_login']) {
-		return auth_a_loger();
-	}
+    if (!$GLOBALS['connect_login']) {
+        return auth_a_loger();
+    }
 
-	// Cas ou l'auteur a ete identifie mais on n'a pas d'info sur lui
-	// C'est soit parce que la base est inutilisable,
-	// soit parce que la table des auteurs a changee (restauration etc)
-	// Pas la peine d'insister.
-	// Renvoyer le nom fautif et une URL de remise a zero
+    // Cas ou l'auteur a ete identifie mais on n'a pas d'info sur lui
+    // C'est soit parce que la base est inutilisable,
+    // soit parce que la table des auteurs a changee (restauration etc)
+    // Pas la peine d'insister.
+    // Renvoyer le nom fautif et une URL de remise a zero
 
-	if (spip_connect()) {
-		return [
-			'login' => $GLOBALS['connect_login'],
-			'site' => generer_url_public('', 'action=logout&logout=prive')
-		];
-	}
+    if (spip_connect()) {
+        return [
+            'login' => $GLOBALS['connect_login'],
+            'site' => generer_url_public('', 'action=logout&logout=prive')
+        ];
+    }
 
-	$n = (int) sql_errno();
-	spip_log("Erreur base de donnees $n " . sql_error());
+    $n = (int) sql_errno();
+    spip_log("Erreur base de donnees $n " . sql_error());
 
-	return $n ?: 1;
+    return $n ?: 1;
 }
 
 /**
@@ -69,15 +69,15 @@ 
  */
 function auth_controler_password_auteur_connecte(#[\SensitiveParameter] string $password): bool {
 
-	if (
-		empty($GLOBALS['visiteur_session']['id_auteur'])
-		|| empty($GLOBALS['visiteur_session']['login'])
-	) {
-		return false;
-	}
+    if (
+        empty($GLOBALS['visiteur_session']['id_auteur'])
+        || empty($GLOBALS['visiteur_session']['login'])
+    ) {
+        return false;
+    }
 
-	$auth = auth_identifier_login($GLOBALS['visiteur_session']['login'], $password, '', true);
-	return is_array($auth) && $auth['id_auteur'] == $GLOBALS['visiteur_session']['id_auteur'];
+    $auth = auth_identifier_login($GLOBALS['visiteur_session']['login'], $password, '', true);
+    return is_array($auth) && $auth['id_auteur'] == $GLOBALS['visiteur_session']['id_auteur'];
 }
 
 /**
@@ -89,47 +89,47 @@ 
  * @return array|string
  */
 function auth_echec($raison) {
-	include_spip('inc/minipres');
-	include_spip('inc/headers');
-	// pas authentifie. Pourquoi ?
-	if (is_string($raison)) {
-		// redirection vers une page d'authentification
-		// on ne revient pas de cette fonction
-		// sauf si pb de header
-		$raison = redirige_formulaire($raison);
-	} elseif (is_int($raison)) {
-		// erreur SQL a afficher
-		$raison = minipres(
-			_T('info_travaux_titre'),
-			_T('titre_probleme_technique') . '<p><tt>' . sql_errno() . ' ' . sql_error() . '</tt></p>'
-		);
-	} elseif (@$raison['statut']) {
-		// un simple visiteur n'a pas acces a l'espace prive
-		spip_log('connexion refusee a ' . @$raison['id_auteur']);
-		$est_connecte = (!empty($GLOBALS['visiteur_session']['login']) && !empty($GLOBALS['visiteur_session']['statut'])); // idem test balise #URL_LOGOUT
-		$raison = minipres(
-			_T('avis_erreur_connexion'),
-			_T('avis_erreur_visiteur')
-				// Lien vers le site public
-				. '<br /><a href="' . url_de_base() . '">' . _T('login_retour_public') . '</a>'
-				// Si la personne est connectée, lien de déconnexion ramenant vers la page de login
-				. ($est_connecte ? ' | <a href="' . generer_url_public('', 'action=logout&amp;logout=prive') . '">' . _T('icone_deconnecter') . '</a>' : '')
-		);
-	} else {
-		// auteur en fin de droits ...
-		$h = $raison['site'];
-		$raison = minipres(
-			_T('avis_erreur_connexion'),
-			'<br /><br /><p>'
-			. _T('texte_inc_auth_1', ['auth_login' => $raison['login']])
-			. " <a href='$h'>"
-			. _T('texte_inc_auth_2')
-			. '</a>'
-			. _T('texte_inc_auth_3')
-		);
-	}
-
-	return $raison;
+    include_spip('inc/minipres');
+    include_spip('inc/headers');
+    // pas authentifie. Pourquoi ?
+    if (is_string($raison)) {
+        // redirection vers une page d'authentification
+        // on ne revient pas de cette fonction
+        // sauf si pb de header
+        $raison = redirige_formulaire($raison);
+    } elseif (is_int($raison)) {
+        // erreur SQL a afficher
+        $raison = minipres(
+            _T('info_travaux_titre'),
+            _T('titre_probleme_technique') . '<p><tt>' . sql_errno() . ' ' . sql_error() . '</tt></p>'
+        );
+    } elseif (@$raison['statut']) {
+        // un simple visiteur n'a pas acces a l'espace prive
+        spip_log('connexion refusee a ' . @$raison['id_auteur']);
+        $est_connecte = (!empty($GLOBALS['visiteur_session']['login']) && !empty($GLOBALS['visiteur_session']['statut'])); // idem test balise #URL_LOGOUT
+        $raison = minipres(
+            _T('avis_erreur_connexion'),
+            _T('avis_erreur_visiteur')
+                // Lien vers le site public
+                . '<br /><a href="' . url_de_base() . '">' . _T('login_retour_public') . '</a>'
+                // Si la personne est connectée, lien de déconnexion ramenant vers la page de login
+                . ($est_connecte ? ' | <a href="' . generer_url_public('', 'action=logout&amp;logout=prive') . '">' . _T('icone_deconnecter') . '</a>' : '')
+        );
+    } else {
+        // auteur en fin de droits ...
+        $h = $raison['site'];
+        $raison = minipres(
+            _T('avis_erreur_connexion'),
+            '<br /><br /><p>'
+            . _T('texte_inc_auth_1', ['auth_login' => $raison['login']])
+            . " <a href='$h'>"
+            . _T('texte_inc_auth_2')
+            . '</a>'
+            . _T('texte_inc_auth_3')
+        );
+    }
+
+    return $raison;
 }
 
 /**
@@ -139,79 +139,79 @@ 
  * @return array|bool|string
  */
 function auth_mode() {
-	//
-	// Initialiser variables (eviter hacks par URL)
-	//
-	$GLOBALS['connect_login'] = '';
-	$id_auteur = null;
-	$GLOBALS['auth_can_disconnect'] = false;
-
-	//
-	// Recuperer les donnees d'identification
-	//
-	include_spip('inc/session');
-	// Session valide en cours ?
-	if ($cookie = lire_cookie_session()) {
-		$session = charger_fonction('session', 'inc');
-		if (
-			($id_auteur = $session()) || $id_auteur === 0 // reprise sur restauration
-		) {
-			$GLOBALS['auth_can_disconnect'] = true;
-			$GLOBALS['connect_login'] = session_get('login');
-		} else {
-			unset($_COOKIE['spip_session']);
-		}
-	}
-
-	// Essayer auth http si significatif
-	// (ignorer les login d'intranet independants de spip)
-	if (!$GLOBALS['ignore_auth_http']) {
-		if (
-			isset($_SERVER['PHP_AUTH_USER']) && isset($_SERVER['PHP_AUTH_PW'])
-				&& ($r = lire_php_auth($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']))
-			// Si auth http differtente de basic, PHP_AUTH_PW
-			// est indisponible mais tentons quand meme pour
-			// autocreation via LDAP
-			|| isset($_SERVER['REMOTE_USER'])
-				&& ($r = lire_php_auth($_SERVER['PHP_AUTH_USER'] = $_SERVER['REMOTE_USER'], ''))
-		) {
-			if (!$id_auteur) {
-				$_SERVER['PHP_AUTH_PW'] = '';
-				$GLOBALS['auth_can_disconnect'] = true;
-				$GLOBALS['visiteur_session'] = $r;
-				$GLOBALS['connect_login'] = session_get('login');
-				$id_auteur = $r['id_auteur'];
-			} else {
-				// cas de la session en plus de PHP_AUTH
-				/*				  if ($id_auteur != $r['id_auteur']){
+    //
+    // Initialiser variables (eviter hacks par URL)
+    //
+    $GLOBALS['connect_login'] = '';
+    $id_auteur = null;
+    $GLOBALS['auth_can_disconnect'] = false;
+
+    //
+    // Recuperer les donnees d'identification
+    //
+    include_spip('inc/session');
+    // Session valide en cours ?
+    if ($cookie = lire_cookie_session()) {
+        $session = charger_fonction('session', 'inc');
+        if (
+            ($id_auteur = $session()) || $id_auteur === 0 // reprise sur restauration
+        ) {
+            $GLOBALS['auth_can_disconnect'] = true;
+            $GLOBALS['connect_login'] = session_get('login');
+        } else {
+            unset($_COOKIE['spip_session']);
+        }
+    }
+
+    // Essayer auth http si significatif
+    // (ignorer les login d'intranet independants de spip)
+    if (!$GLOBALS['ignore_auth_http']) {
+        if (
+            isset($_SERVER['PHP_AUTH_USER']) && isset($_SERVER['PHP_AUTH_PW'])
+                && ($r = lire_php_auth($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']))
+            // Si auth http differtente de basic, PHP_AUTH_PW
+            // est indisponible mais tentons quand meme pour
+            // autocreation via LDAP
+            || isset($_SERVER['REMOTE_USER'])
+                && ($r = lire_php_auth($_SERVER['PHP_AUTH_USER'] = $_SERVER['REMOTE_USER'], ''))
+        ) {
+            if (!$id_auteur) {
+                $_SERVER['PHP_AUTH_PW'] = '';
+                $GLOBALS['auth_can_disconnect'] = true;
+                $GLOBALS['visiteur_session'] = $r;
+                $GLOBALS['connect_login'] = session_get('login');
+                $id_auteur = $r['id_auteur'];
+            } else {
+                // cas de la session en plus de PHP_AUTH
+                /*				  if ($id_auteur != $r['id_auteur']){
 					spip_log("vol de session $id_auteur" . join(', ', $r));
 				unset($_COOKIE['spip_session']);
 				$id_auteur = '';
 				} */
-			}
-		} else {
-			// Authentification .htaccess old style, car .htaccess semble
-			// souvent definir *aussi* PHP_AUTH_USER et PHP_AUTH_PW
-			if (isset($_SERVER['REMOTE_USER'])) {
-				$GLOBALS['connect_login'] = $_SERVER['REMOTE_USER'];
-			}
-		}
-	}
-
-	$where = (is_numeric($id_auteur)
-		/*AND $id_auteur>0*/ // reprise lors des restaurations
-	) ?
-		"id_auteur=$id_auteur" :
-		(strlen((string) $GLOBALS['connect_login']) ? 'login=' . sql_quote($GLOBALS['connect_login'], '', 'text') : '');
-
-	if (!$where) {
-		return '';
-	}
-
-	// Trouver les autres infos dans la table auteurs.
-	// le champ 'quand' est utilise par l'agenda
-
-	return sql_fetsel('*, en_ligne AS quand', 'spip_auteurs', "$where AND statut!='5poubelle'");
+            }
+        } else {
+            // Authentification .htaccess old style, car .htaccess semble
+            // souvent definir *aussi* PHP_AUTH_USER et PHP_AUTH_PW
+            if (isset($_SERVER['REMOTE_USER'])) {
+                $GLOBALS['connect_login'] = $_SERVER['REMOTE_USER'];
+            }
+        }
+    }
+
+    $where = (is_numeric($id_auteur)
+        /*AND $id_auteur>0*/ // reprise lors des restaurations
+    ) ?
+        "id_auteur=$id_auteur" :
+        (strlen((string) $GLOBALS['connect_login']) ? 'login=' . sql_quote($GLOBALS['connect_login'], '', 'text') : '');
+
+    if (!$where) {
+        return '';
+    }
+
+    // Trouver les autres infos dans la table auteurs.
+    // le champ 'quand' est utilise par l'agenda
+
+    return sql_fetsel('*, en_ligne AS quand', 'spip_auteurs', "$where AND statut!='5poubelle'");
 }
 
 /**
@@ -229,96 +229,96 @@ 
  */
 function auth_init_droits($row) {
 
-	include_spip('inc/autoriser');
-	if (!autoriser('loger', '', 0, $row)) {
-		return false;
-	}
-
-
-	if ($row['statut'] == 'nouveau') {
-		include_spip('action/inscrire_auteur');
-		$row = confirmer_statut_inscription($row);
-	}
-
-	$GLOBALS['connect_id_auteur'] = $row['id_auteur'];
-	$GLOBALS['connect_login'] = $row['login'];
-	$GLOBALS['connect_statut'] = $row['statut'];
-
-	$GLOBALS['visiteur_session'] = array_merge((array) $GLOBALS['visiteur_session'], $row);
-
-	// au cas ou : ne pas memoriser les champs sensibles
-	$GLOBALS['visiteur_session'] = auth_desensibiliser_session($GLOBALS['visiteur_session']);
-
-	// creer la session au besoin
-	include_spip('inc/session');
-	if (!lire_cookie_session()) {
-		$session = charger_fonction('session', 'inc');
-		$spip_session = $session($row);
-	}
-
-	// reinjecter les preferences_auteur apres le reset de spip_session
-	// car utilisees au retour par auth_loger()
-	$r = @unserialize($row['prefs']);
-	$GLOBALS['visiteur_session']['prefs'] = ($r ?: []);
-	// si prefs pas definies, les definir par defaut
-	if (!isset($GLOBALS['visiteur_session']['prefs']['couleur'])) {
-		$GLOBALS['visiteur_session']['prefs']['couleur'] = 2;
-		$GLOBALS['visiteur_session']['prefs']['display'] = 2;
-		$GLOBALS['visiteur_session']['prefs']['display_navigation'] = 'navigation_avec_icones';
-	}
-
-	$GLOBALS['visiteur_session'] = pipeline(
-		'preparer_visiteur_session',
-		['args' => ['row' => $row],
-		'data' => $GLOBALS['visiteur_session']]
-	);
-
-	// Etablir les droits selon le codage attendu
-	// dans ecrire/index.php ecrire/prive.php
-
-	// Pas autorise a acceder a ecrire ? renvoyer le tableau
-	// A noter : le premier appel a autoriser() a le bon gout
-	// d'initialiser $GLOBALS['visiteur_session']['restreint'],
-	// qui ne figure pas dans le fichier de session
-
-	if (!autoriser('ecrire')) {
-		return $row;
-	}
-
-	// autoriser('ecrire') ne laisse passer que les Admin et les Redac
-
-	auth_trace($row);
-
-	// Administrateurs
-	if (in_array($GLOBALS['connect_statut'], explode(',', _STATUT_AUTEUR_RUBRIQUE))) {
-		if (
-			isset($GLOBALS['visiteur_session']['restreint'])
-			&& is_array($GLOBALS['visiteur_session']['restreint'])
-		) {
-			$GLOBALS['connect_id_rubrique'] = $GLOBALS['visiteur_session']['restreint'];
-		}
-		if ($GLOBALS['connect_statut'] == '0minirezo') {
-			$GLOBALS['connect_toutes_rubriques'] = !$GLOBALS['connect_id_rubrique'];
-		}
-	}
-
-	// Pour les redacteurs, inc_version a fait l'initialisation minimale
-
-	return ''; // i.e. pas de pb.
+    include_spip('inc/autoriser');
+    if (!autoriser('loger', '', 0, $row)) {
+        return false;
+    }
+
+
+    if ($row['statut'] == 'nouveau') {
+        include_spip('action/inscrire_auteur');
+        $row = confirmer_statut_inscription($row);
+    }
+
+    $GLOBALS['connect_id_auteur'] = $row['id_auteur'];
+    $GLOBALS['connect_login'] = $row['login'];
+    $GLOBALS['connect_statut'] = $row['statut'];
+
+    $GLOBALS['visiteur_session'] = array_merge((array) $GLOBALS['visiteur_session'], $row);
+
+    // au cas ou : ne pas memoriser les champs sensibles
+    $GLOBALS['visiteur_session'] = auth_desensibiliser_session($GLOBALS['visiteur_session']);
+
+    // creer la session au besoin
+    include_spip('inc/session');
+    if (!lire_cookie_session()) {
+        $session = charger_fonction('session', 'inc');
+        $spip_session = $session($row);
+    }
+
+    // reinjecter les preferences_auteur apres le reset de spip_session
+    // car utilisees au retour par auth_loger()
+    $r = @unserialize($row['prefs']);
+    $GLOBALS['visiteur_session']['prefs'] = ($r ?: []);
+    // si prefs pas definies, les definir par defaut
+    if (!isset($GLOBALS['visiteur_session']['prefs']['couleur'])) {
+        $GLOBALS['visiteur_session']['prefs']['couleur'] = 2;
+        $GLOBALS['visiteur_session']['prefs']['display'] = 2;
+        $GLOBALS['visiteur_session']['prefs']['display_navigation'] = 'navigation_avec_icones';
+    }
+
+    $GLOBALS['visiteur_session'] = pipeline(
+        'preparer_visiteur_session',
+        ['args' => ['row' => $row],
+        'data' => $GLOBALS['visiteur_session']]
+    );
+
+    // Etablir les droits selon le codage attendu
+    // dans ecrire/index.php ecrire/prive.php
+
+    // Pas autorise a acceder a ecrire ? renvoyer le tableau
+    // A noter : le premier appel a autoriser() a le bon gout
+    // d'initialiser $GLOBALS['visiteur_session']['restreint'],
+    // qui ne figure pas dans le fichier de session
+
+    if (!autoriser('ecrire')) {
+        return $row;
+    }
+
+    // autoriser('ecrire') ne laisse passer que les Admin et les Redac
+
+    auth_trace($row);
+
+    // Administrateurs
+    if (in_array($GLOBALS['connect_statut'], explode(',', _STATUT_AUTEUR_RUBRIQUE))) {
+        if (
+            isset($GLOBALS['visiteur_session']['restreint'])
+            && is_array($GLOBALS['visiteur_session']['restreint'])
+        ) {
+            $GLOBALS['connect_id_rubrique'] = $GLOBALS['visiteur_session']['restreint'];
+        }
+        if ($GLOBALS['connect_statut'] == '0minirezo') {
+            $GLOBALS['connect_toutes_rubriques'] = !$GLOBALS['connect_id_rubrique'];
+        }
+    }
+
+    // Pour les redacteurs, inc_version a fait l'initialisation minimale
+
+    return ''; // i.e. pas de pb.
 }
 
 /**
  * Enlever les clés sensibles d'une ligne auteur
  */
 function auth_desensibiliser_session(array $auteur): array {
-	$cles_sensibles = ['pass', 'htpass', 'low_sec', 'alea_actuel', 'alea_futur', 'ldap_password', 'backup_cles'];
-	foreach ($cles_sensibles as $cle) {
-		if (array_key_exists($cle, $auteur)) {
-			unset($auteur[$cle]);
-		}
-	}
-
-	return $auteur;
+    $cles_sensibles = ['pass', 'htpass', 'low_sec', 'alea_actuel', 'alea_futur', 'ldap_password', 'backup_cles'];
+    foreach ($cles_sensibles as $cle) {
+        if (array_key_exists($cle, $auteur)) {
+            unset($auteur[$cle]);
+        }
+    }
+
+    return $auteur;
 }
 
 /**
@@ -327,23 +327,23 @@ 
  * @return string
  */
 function auth_a_loger() {
-	$redirect = generer_url_public('login', 'url=' . rawurlencode((string) self('&', true)), true);
-
-	// un echec au "bonjour" (login initial) quand le statut est
-	// inconnu signale sans doute un probleme de cookies
-	if (isset($_GET['bonjour'])) {
-		$redirect = parametre_url(
-			$redirect,
-			'var_erreur',
-			(isset($GLOBALS['visiteur_session']['statut'])
-				? 'statut'
-				: 'cookie'
-			),
-			'&'
-		);
-	}
-
-	return $redirect;
+    $redirect = generer_url_public('login', 'url=' . rawurlencode((string) self('&', true)), true);
+
+    // un echec au "bonjour" (login initial) quand le statut est
+    // inconnu signale sans doute un probleme de cookies
+    if (isset($_GET['bonjour'])) {
+        $redirect = parametre_url(
+            $redirect,
+            'var_erreur',
+            (isset($GLOBALS['visiteur_session']['statut'])
+                ? 'statut'
+                : 'cookie'
+            ),
+            '&'
+        );
+    }
+
+    return $redirect;
 }
 
 /**
@@ -355,19 +355,19 @@ 
  * @param null|string $date
  */
 function auth_trace($row, $date = null) {
-	// Indiquer la connexion. A la minute pres ca suffit.
-	if (!is_numeric($connect_quand = $row['quand'] ?? '')) {
-		$connect_quand = strtotime((string) $connect_quand);
-	}
+    // Indiquer la connexion. A la minute pres ca suffit.
+    if (!is_numeric($connect_quand = $row['quand'] ?? '')) {
+        $connect_quand = strtotime((string) $connect_quand);
+    }
 
-	$date ??= date('Y-m-d H:i:s');
+    $date ??= date('Y-m-d H:i:s');
 
-	if (abs(strtotime($date) - $connect_quand) >= 60) {
-		sql_updateq('spip_auteurs', ['en_ligne' => $date], 'id_auteur=' . (int) $row['id_auteur']);
-		$row['en_ligne'] = $date;
-	}
+    if (abs(strtotime($date) - $connect_quand) >= 60) {
+        sql_updateq('spip_auteurs', ['en_ligne' => $date], 'id_auteur=' . (int) $row['id_auteur']);
+        $row['en_ligne'] = $date;
+    }
 
-	pipeline('trig_auth_trace', ['args' => ['row' => $row, 'date' => $date]]);
+    pipeline('trig_auth_trace', ['args' => ['row' => $row, 'date' => $date]]);
 }
 
 
@@ -393,27 +393,27 @@ 
  * @return mixed
  */
 function auth_administrer($fonction, $args, mixed $defaut = false) {
-	$auth_methode = array_shift($args);
-	$auth_methode = $auth_methode ?: 'spip'; // valeur par defaut au cas ou
-	if (
-		($auth = charger_fonction($auth_methode, 'auth', true))
-		&& function_exists($f = "auth_{$auth_methode}_$fonction")
-	) {
-		$res = $f(...$args);
-	} else {
-		$res = $defaut;
-	}
-	return pipeline(
-		'auth_administrer',
-		[
-			'args' => [
-				'fonction' => $fonction,
-				'methode' => $auth_methode,
-				'args' => $args
-			],
-			'data' => $res
-		]
-	);
+    $auth_methode = array_shift($args);
+    $auth_methode = $auth_methode ?: 'spip'; // valeur par defaut au cas ou
+    if (
+        ($auth = charger_fonction($auth_methode, 'auth', true))
+        && function_exists($f = "auth_{$auth_methode}_$fonction")
+    ) {
+        $res = $f(...$args);
+    } else {
+        $res = $defaut;
+    }
+    return pipeline(
+        'auth_administrer',
+        [
+            'args' => [
+                'fonction' => $fonction,
+                'methode' => $auth_methode,
+                'args' => $args
+            ],
+            'data' => $res
+        ]
+    );
 }
 
 /**
@@ -423,11 +423,11 @@ 
  * @return array
  */
 function auth_formulaire_login($flux) {
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		$flux = auth_administrer('formulaire_login', [$methode, $flux], $flux);
-	}
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        $flux = auth_administrer('formulaire_login', [$methode, $flux], $flux);
+    }
 
-	return $flux;
+    return $flux;
 }
 
 
@@ -441,19 +441,19 @@ 
  * @return string/bool
  */
 function auth_retrouver_login($login, $serveur = '') {
-	if (!spip_connect($serveur)) {
-		include_spip('inc/minipres');
-		echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'));
-		exit;
-	}
-
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		if ($auteur = auth_administrer('retrouver_login', [$methode, $login, $serveur])) {
-			return $auteur;
-		}
-	}
-
-	return false;
+    if (!spip_connect($serveur)) {
+        include_spip('inc/minipres');
+        echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'));
+        exit;
+    }
+
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        if ($auteur = auth_administrer('retrouver_login', [$methode, $login, $serveur])) {
+            return $auteur;
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -468,35 +468,35 @@ 
  * @return array
  */
 function auth_informer_login($login, $serveur = '') {
-	if (
-		!$login
-		|| !($login_base = auth_retrouver_login($login, $serveur))
-		|| !($row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur))
-	) {
-		// generer de fausses infos, mais credibles, pour eviter une attaque
-		// https://core.spip.net/issues/1758 + https://core.spip.net/issues/3691
-
-		$row = [
-			'login' => $login,
-			'cnx' => '0',
-			'logo' => '',
-		];
-
-		return $row;
-	}
-
-	$prefs = @unserialize($row['prefs']);
-	$row = auth_desensibiliser_session($row);
-	$infos = [
-		'id_auteur' => $row['id_auteur'],
-		'login' => $row['login'],
-		'cnx' => (isset($prefs['cnx']) && $prefs['cnx'] === 'perma') ? '1' : '0',
-		'logo' => recuperer_fond('formulaires/inc-logo_auteur', $row),
-	];
-
-	verifier_visiteur();
-
-	return auth_administrer('informer_login', [$row['source'], $infos, $row, $serveur], $infos);
+    if (
+        !$login
+        || !($login_base = auth_retrouver_login($login, $serveur))
+        || !($row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur))
+    ) {
+        // generer de fausses infos, mais credibles, pour eviter une attaque
+        // https://core.spip.net/issues/1758 + https://core.spip.net/issues/3691
+
+        $row = [
+            'login' => $login,
+            'cnx' => '0',
+            'logo' => '',
+        ];
+
+        return $row;
+    }
+
+    $prefs = @unserialize($row['prefs']);
+    $row = auth_desensibiliser_session($row);
+    $infos = [
+        'id_auteur' => $row['id_auteur'],
+        'login' => $row['login'],
+        'cnx' => (isset($prefs['cnx']) && $prefs['cnx'] === 'perma') ? '1' : '0',
+        'logo' => recuperer_fond('formulaires/inc-logo_auteur', $row),
+    ];
+
+    verifier_visiteur();
+
+    return auth_administrer('informer_login', [$row['source'], $infos, $row, $serveur], $infos);
 }
 
 
@@ -510,21 +510,21 @@ 
  * @return mixed
  */
 function auth_identifier_login($login, #[\SensitiveParameter] $password, $serveur = '', bool $phpauth = false) {
-	$erreur = '';
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		if ($auth = charger_fonction($methode, 'auth', true)) {
-			$auteur = $auth($login, $password, $serveur, $phpauth);
-			if (is_array($auteur) && count($auteur)) {
-				spip_log("connexion de $login par methode $methode");
-				$auteur['auth'] = $methode;
-				return $auteur;
-			} elseif (is_string($auteur)) {
-				$erreur .= "$auteur ";
-			}
-		}
-	}
-
-	return $erreur;
+    $erreur = '';
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        if ($auth = charger_fonction($methode, 'auth', true)) {
+            $auteur = $auth($login, $password, $serveur, $phpauth);
+            if (is_array($auteur) && count($auteur)) {
+                spip_log("connexion de $login par methode $methode");
+                $auteur['auth'] = $methode;
+                return $auteur;
+            } elseif (is_string($auteur)) {
+                $erreur .= "$auteur ";
+            }
+        }
+    }
+
+    return $erreur;
 }
 
 /**
@@ -538,8 +538,8 @@ 
  * @return string
  */
 function auth_url_retour_login($auth_methode, $login, $redirect = '', $serveur = '') {
-	$securiser_action = charger_fonction('securiser_action', 'inc');
-	return $securiser_action('auth', "$auth_methode/$login", $redirect, true);
+    $securiser_action = charger_fonction('securiser_action', 'inc');
+    return $securiser_action('auth', "$auth_methode/$login", $redirect, true);
 }
 
 /**
@@ -553,8 +553,8 @@ 
  * @return mixed
  */
 function auth_terminer_identifier_login($auth_methode, $login, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('terminer_identifier_login', $args);
+    $args = func_get_args();
+    return auth_administrer('terminer_identifier_login', $args);
 }
 
 /**
@@ -564,29 +564,29 @@ 
  * @return bool
  */
 function auth_loger($auteur) {
-	if (!is_array($auteur) || $auteur === []) {
-		return false;
-	}
-
-	// initialiser et poser le cookie de session
-	unset($_COOKIE['spip_session']);
-	if (auth_init_droits($auteur) === false) {
-		return false;
-	}
-
-	// initialiser les prefs
-	$p = $GLOBALS['visiteur_session']['prefs'];
-	$p['cnx'] = (isset($auteur['cookie']) && $auteur['cookie'] == 'oui') ? 'perma' : '';
-
-	sql_updateq(
-		'spip_auteurs',
-		['prefs' => serialize($p)],
-		'id_auteur=' . (int) $auteur['id_auteur']
-	);
-
-	//  bloquer ici le visiteur qui tente d'abuser de ses droits
-	verifier_visiteur();
-	return true;
+    if (!is_array($auteur) || $auteur === []) {
+        return false;
+    }
+
+    // initialiser et poser le cookie de session
+    unset($_COOKIE['spip_session']);
+    if (auth_init_droits($auteur) === false) {
+        return false;
+    }
+
+    // initialiser les prefs
+    $p = $GLOBALS['visiteur_session']['prefs'];
+    $p['cnx'] = (isset($auteur['cookie']) && $auteur['cookie'] == 'oui') ? 'perma' : '';
+
+    sql_updateq(
+        'spip_auteurs',
+        ['prefs' => serialize($p)],
+        'id_auteur=' . (int) $auteur['id_auteur']
+    );
+
+    //  bloquer ici le visiteur qui tente d'abuser de ses droits
+    verifier_visiteur();
+    return true;
 }
 
 /**
@@ -596,8 +596,8 @@ 
  * return void
  **/
 function auth_deloger() {
-	$logout = charger_fonction('logout', 'action');
-	$logout();
+    $logout = charger_fonction('logout', 'action');
+    $logout();
 }
 
 /**
@@ -611,8 +611,8 @@ 
  * @return bool
  */
 function auth_autoriser_modifier_login($auth_methode, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('autoriser_modifier_login', $args);
+    $args = func_get_args();
+    return auth_administrer('autoriser_modifier_login', $args);
 }
 
 /**
@@ -627,8 +627,8 @@ 
  *  message d'erreur ou chaine vide si pas d'erreur
  */
 function auth_verifier_login($auth_methode, $new_login, $id_auteur = 0, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('verifier_login', $args, '');
+    $args = func_get_args();
+    return auth_administrer('verifier_login', $args, '');
 }
 
 /**
@@ -641,8 +641,8 @@ 
  * @return bool
  */
 function auth_modifier_login($auth_methode, $new_login, $id_auteur, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('modifier_login', $args);
+    $args = func_get_args();
+    return auth_administrer('modifier_login', $args);
 }
 
 /**
@@ -657,8 +657,8 @@ 
  *  succès ou échec
  */
 function auth_autoriser_modifier_pass($auth_methode, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('autoriser_modifier_pass', $args);
+    $args = func_get_args();
+    return auth_administrer('autoriser_modifier_pass', $args);
 }
 
 /**
@@ -674,8 +674,8 @@ 
  *  message d'erreur ou chaine vide si pas d'erreur
  */
 function auth_verifier_pass($auth_methode, $login, #[\SensitiveParameter] $new_pass, $id_auteur = 0, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('verifier_pass', $args, '');
+    $args = func_get_args();
+    return auth_administrer('verifier_pass', $args, '');
 }
 
 /**
@@ -691,8 +691,8 @@ 
  *  succes ou echec
  */
 function auth_modifier_pass($auth_methode, $login, #[\SensitiveParameter] $new_pass, $id_auteur, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('modifier_pass', $args);
+    $args = func_get_args();
+    return auth_administrer('modifier_pass', $args);
 }
 
 /**
@@ -708,24 +708,24 @@ 
  * @return void
  */
 function auth_synchroniser_distant(
-	$auth_methode = true,
-	$id_auteur = 0,
-	$champs = [],
-	$options = [],
-	$serveur = ''
+    $auth_methode = true,
+    $id_auteur = 0,
+    $champs = [],
+    $options = [],
+    $serveur = ''
 ) {
-	$args = func_get_args();
-	if ($auth_methode === true || isset($options['all']) && $options['all'] == true) {
-		$options['all'] = true; // ajouter une option all=>true pour chaque auth
-		$args = [true, $id_auteur, $champs, $options, $serveur];
-		foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-			array_shift($args);
-			array_unshift($args, $methode);
-			auth_administrer('synchroniser_distant', $args);
-		}
-	} else {
-		auth_administrer('synchroniser_distant', $args);
-	}
+    $args = func_get_args();
+    if ($auth_methode === true || isset($options['all']) && $options['all'] == true) {
+        $options['all'] = true; // ajouter une option all=>true pour chaque auth
+        $args = [true, $id_auteur, $champs, $options, $serveur];
+        foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+            array_shift($args);
+            array_unshift($args, $methode);
+            auth_administrer('synchroniser_distant', $args);
+        }
+    } else {
+        auth_administrer('synchroniser_distant', $args);
+    }
 }
 
 
@@ -738,46 +738,46 @@ 
  * @return array|bool
  */
 function lire_php_auth($login, #[\SensitiveParameter] $pw, $serveur = '') {
-	if (
-		!$login
-		|| !$login_base = auth_retrouver_login($login, $serveur)
-	) {
-		return false;
-	}
-
-	$row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur);
-
-	if (!$row) {
-		if (
-			include_spip('inc/auth')
-			&& auth_ldap_connect($serveur)
-			&& ($auth_ldap = charger_fonction('ldap', 'auth', true))
-		) {
-			return $auth_ldap($login_base, $pw, $serveur, true);
-		}
-
-		return false;
-	}
-
-	// si pas de source definie
-	// ou auth/xxx introuvable, utiliser 'spip' ou autre et avec le login passé par PHP_AUTH_USER
-	if (
-		!($auth_methode = $row['source'])
-		|| !($auth = charger_fonction($auth_methode, 'auth', true))
-	) {
-		$auth = charger_fonction('spip', 'auth', true);
-	}
-
-	$auteur = '';
-	if ($auth) {
-		$auteur = $auth($login, $pw, $serveur, true);
-	}
-	// verifier que ce n'est pas un message d'erreur
-	if (is_array($auteur) && count($auteur)) {
-		return $auteur;
-	}
-
-	return false;
+    if (
+        !$login
+        || !$login_base = auth_retrouver_login($login, $serveur)
+    ) {
+        return false;
+    }
+
+    $row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur);
+
+    if (!$row) {
+        if (
+            include_spip('inc/auth')
+            && auth_ldap_connect($serveur)
+            && ($auth_ldap = charger_fonction('ldap', 'auth', true))
+        ) {
+            return $auth_ldap($login_base, $pw, $serveur, true);
+        }
+
+        return false;
+    }
+
+    // si pas de source definie
+    // ou auth/xxx introuvable, utiliser 'spip' ou autre et avec le login passé par PHP_AUTH_USER
+    if (
+        !($auth_methode = $row['source'])
+        || !($auth = charger_fonction($auth_methode, 'auth', true))
+    ) {
+        $auth = charger_fonction('spip', 'auth', true);
+    }
+
+    $auteur = '';
+    if ($auth) {
+        $auteur = $auth($login, $pw, $serveur, true);
+    }
+    // verifier que ce n'est pas un message d'erreur
+    if (is_array($auteur) && count($auteur)) {
+        return $auteur;
+    }
+
+    return false;
 }
 
 /**
@@ -793,21 +793,21 @@ 
  * @param string $lien
  */
 function ask_php_auth($pb, $raison, $retour = '', $url = '', $re = '', $lien = '') {
-	@Header('WWW-Authenticate: Basic realm="espace prive"');
-	@Header('HTTP/1.0 401 Unauthorized');
-	$corps = '';
-	$public = generer_url_public();
-	$ecrire = generer_url_ecrire();
-	$retour = $retour ?: _T('icone_retour');
-	$corps .= "<p>$raison</p>[<a href='$public'>$retour</a>] ";
-	if ($url) {
-		$corps .= "[<a href='" . generer_url_action('cookie', "essai_auth_http=oui&$url") . "'>$re</a>]";
-	}
-
-	if ($lien) {
-		$corps .= " [<a href='$ecrire'>" . _T('login_espace_prive') . '</a>]';
-	}
-	include_spip('inc/minipres');
-	echo minipres($pb, $corps);
-	exit;
+    @Header('WWW-Authenticate: Basic realm="espace prive"');
+    @Header('HTTP/1.0 401 Unauthorized');
+    $corps = '';
+    $public = generer_url_public();
+    $ecrire = generer_url_ecrire();
+    $retour = $retour ?: _T('icone_retour');
+    $corps .= "<p>$raison</p>[<a href='$public'>$retour</a>] ";
+    if ($url) {
+        $corps .= "[<a href='" . generer_url_action('cookie', "essai_auth_http=oui&$url") . "'>$re</a>]";
+    }
+
+    if ($lien) {
+        $corps .= " [<a href='$ecrire'>" . _T('login_espace_prive') . '</a>]';
+    }
+    include_spip('inc/minipres');
+    echo minipres($pb, $corps);
+    exit;
 }

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_log("$fread $fichier ".spip_timer('lire_fichier'));
-		if (!$ok) {
-			spip_log("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_log("$fread $fichier ".spip_timer('lire_fichier'));
+        if (!$ok) {
+            spip_log("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_log("Ecriture fichier $fichier impossible", _LOG_INFO_IMPORTANTE);
-
-	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_log("Ecriture fichier $fichier impossible", _LOG_INFO_IMPORTANTE);
+
+    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_log('Erreur de programmation: ' . $fichier . ' doit finir par .php');
-	}
-	$contenu = '<' . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
+    if (!str_ends_with($fichier, '.php')) {
+        spip_log('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,12 +375,12 @@ 
  *     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\'); ?>
+    if ($res = lire_fichier($fichier, $contenu, $options)) {
+        $contenu = substr((string) $contenu, strlen('<?php die (\'Acces interdit\'); ?>
 '));
-	}
+    }
 
-	return $res;
+    return $res;
 }
 
 /**
@@ -392,25 +392,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;
 }
 
 
@@ -425,14 +425,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);
 }
 
 /**
@@ -447,22 +447,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);
 }
 
 /**
@@ -472,12 +472,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);
+    }
 }
 
 /**
@@ -491,26 +491,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);
+    }
 }
 
 /**
@@ -533,25 +533,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_log('Probleme de configuration opcache.revalidate_freq ' . $duree . 's : on attend ' . $wait . 's', _LOG_INFO_IMPORTANTE);
-		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_log('Probleme de configuration opcache.revalidate_freq ' . $duree . 's : on attend ' . $wait . 's', _LOG_INFO_IMPORTANTE);
+        if ($wait) {
+            sleep($duree + 1);
+        }
+    }
 }
 
 
@@ -564,26 +564,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);
 }
 
 
@@ -612,58 +612,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_log("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_log("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_log("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_log("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');
 }
 
 
@@ -696,55 +696,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/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_log("$notification($quoi,$id"
-			. ($options ? ',' . serialize($options) : '')
-			. ')', 'notifications');
-		$notification($quoi, $id, $options);
-	}
+    if ($notification = charger_fonction($quoi, 'notifications', true)) {
+        spip_log("$notification($quoi,$id"
+            . ($options ? ',' . serialize($options) : '')
+            . ')', 'notifications');
+        $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/autoriser.php

Indentation +628 added lines, -628 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Autorisations
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -37,89 +37,89 @@ 
 
 
 if (!function_exists('autoriser')) {
-	/**
-	 * Autoriser une action
-	 *
-	 * Teste si une personne (par défaut le visiteur en cours) peut effectuer
-	 * une certaine action. Cette fonction est le point d'entrée de toutes
-	 * les autorisations.
-	 *
-	 * La fonction se charge d'appeler des fonctions d'autorisations spécifiques
-	 * aux actions demandées si elles existent. Elle cherche donc les fonctions
-	 * dans cet ordre :
-	 *
-	 * - autoriser_{type}_{faire}, sinon avec _dist
-	 * - autoriser_{type}, sinon avec _dist
-	 * - autoriser_{faire}, sinon avec _dist
-	 * - autoriser_{defaut}, sinon avec _dist
-	 *
-	 * Seul le premier argument est obligatoire.
-	 *
-	 * @note
-	 *     Le paramètre `$type` attend par défaut un type d'objet éditorial, et à ce titre,
-	 *     la valeur transmise se verra appliquer la fonction 'objet_type' pour uniformiser
-	 *     cette valeur.
-	 *
-	 *     Si ce paramètre n'a rien n'a voir avec un objet éditorial, par exemple
-	 *     'statistiques', un souligné avant le terme est ajouté afin d'indiquer
-	 *     explicitement à la fonction autoriser de ne pas transformer la chaîne en type
-	 *     d'objet. Cela donne pour cet exemple : `autoriser('detruire', '_statistiques')`
-	 *
-	 * @note
-	 *     Le paramètre `$type`, en plus de l'uniformisation en type d'objet, se voit retirer
-	 *     tous les soulignés du terme. Ainsi le type d'objet `livre_art` deviendra `livreart`
-	 *     et SPIP cherchera une fonction `autoriser_livreart_{faire}`. Ceci permet
-	 *     d'éviter une possible confusion si une fonction `autoriser_livre_art` existait :
-	 *     quel serait le type, quel serait l'action ?
-	 *
-	 *     Pour résumer, si le type d'objet éditorial a un souligné, tel que 'livre_art',
-	 *     la fonction d'autorisation correspondante ne l'aura pas.
-	 *     Exemple : `function autoriser_livreart_modifier_dist(...){...}`
-	 *
-	 * @api
-	 * @see autoriser_dist()
-	 * @see objet_type()
-	 *
-	 * @param string $faire
-	 *   une action ('modifier', 'publier'...)
-	 * @param string|null $type
-	 *   Type d’objet ou élément sur lequel appliquer l’action.
-	 *   - null: indifférent à tout type d’élément ou objet éditorial
-	 *   - string: objet éditorial (objet_type() est appliqué pour homogénéiser l’entrée)
-	 *   - _string: autre élément (avec un souligné en premier caractère, désactive objet_type()).
-	 *   Les soulignés seront retirés (cf. la note).
-	 * @param string|int|null $id
-	 *   id de l'objet ou élément sur lequel on veut agir, si pertinent.
-	 *   - null: non utile pour l’autorisation
-	 *   - int: identifiant numérique (cas de tous les objets éditoriaux de SPIP)
-	 *   - string: identifiant textuel
-	 * @param null|int|array $qui
-	 *   - si null on prend alors visiteur_session
-	 *   - un id_auteur (on regarde dans la base)
-	 *   - un tableau auteur complet, y compris [restreint]
-	 * @param array $opt
-	 *   options sous forme de tableau associatif
-	 * @return bool
-	 *   true si la personne peut effectuer l'action
-	 */
-	function autoriser(string $faire, ?string $type = '', $id = null, $qui = null, array $opt = []): bool {
-		// Charger les fonctions d'autorisation supplementaires
-		static $pipe;
-		if (!isset($pipe)) {
-			$pipe = 1;
-			pipeline('autoriser');
-		}
-
-		return autoriser_dist($faire, $type, $id, $qui, $opt);
-	}
+    /**
+     * Autoriser une action
+     *
+     * Teste si une personne (par défaut le visiteur en cours) peut effectuer
+     * une certaine action. Cette fonction est le point d'entrée de toutes
+     * les autorisations.
+     *
+     * La fonction se charge d'appeler des fonctions d'autorisations spécifiques
+     * aux actions demandées si elles existent. Elle cherche donc les fonctions
+     * dans cet ordre :
+     *
+     * - autoriser_{type}_{faire}, sinon avec _dist
+     * - autoriser_{type}, sinon avec _dist
+     * - autoriser_{faire}, sinon avec _dist
+     * - autoriser_{defaut}, sinon avec _dist
+     *
+     * Seul le premier argument est obligatoire.
+     *
+     * @note
+     *     Le paramètre `$type` attend par défaut un type d'objet éditorial, et à ce titre,
+     *     la valeur transmise se verra appliquer la fonction 'objet_type' pour uniformiser
+     *     cette valeur.
+     *
+     *     Si ce paramètre n'a rien n'a voir avec un objet éditorial, par exemple
+     *     'statistiques', un souligné avant le terme est ajouté afin d'indiquer
+     *     explicitement à la fonction autoriser de ne pas transformer la chaîne en type
+     *     d'objet. Cela donne pour cet exemple : `autoriser('detruire', '_statistiques')`
+     *
+     * @note
+     *     Le paramètre `$type`, en plus de l'uniformisation en type d'objet, se voit retirer
+     *     tous les soulignés du terme. Ainsi le type d'objet `livre_art` deviendra `livreart`
+     *     et SPIP cherchera une fonction `autoriser_livreart_{faire}`. Ceci permet
+     *     d'éviter une possible confusion si une fonction `autoriser_livre_art` existait :
+     *     quel serait le type, quel serait l'action ?
+     *
+     *     Pour résumer, si le type d'objet éditorial a un souligné, tel que 'livre_art',
+     *     la fonction d'autorisation correspondante ne l'aura pas.
+     *     Exemple : `function autoriser_livreart_modifier_dist(...){...}`
+     *
+     * @api
+     * @see autoriser_dist()
+     * @see objet_type()
+     *
+     * @param string $faire
+     *   une action ('modifier', 'publier'...)
+     * @param string|null $type
+     *   Type d’objet ou élément sur lequel appliquer l’action.
+     *   - null: indifférent à tout type d’élément ou objet éditorial
+     *   - string: objet éditorial (objet_type() est appliqué pour homogénéiser l’entrée)
+     *   - _string: autre élément (avec un souligné en premier caractère, désactive objet_type()).
+     *   Les soulignés seront retirés (cf. la note).
+     * @param string|int|null $id
+     *   id de l'objet ou élément sur lequel on veut agir, si pertinent.
+     *   - null: non utile pour l’autorisation
+     *   - int: identifiant numérique (cas de tous les objets éditoriaux de SPIP)
+     *   - string: identifiant textuel
+     * @param null|int|array $qui
+     *   - si null on prend alors visiteur_session
+     *   - un id_auteur (on regarde dans la base)
+     *   - un tableau auteur complet, y compris [restreint]
+     * @param array $opt
+     *   options sous forme de tableau associatif
+     * @return bool
+     *   true si la personne peut effectuer l'action
+     */
+    function autoriser(string $faire, ?string $type = '', $id = null, $qui = null, array $opt = []): bool {
+        // Charger les fonctions d'autorisation supplementaires
+        static $pipe;
+        if (!isset($pipe)) {
+            $pipe = 1;
+            pipeline('autoriser');
+        }
+
+        return autoriser_dist($faire, $type, $id, $qui, $opt);
+    }
 }
 
 
 // mes_fonctions peut aussi declarer des autorisations, il faut donc le charger
 // mais apres la fonction autoriser()
 if ($f = find_in_path('mes_fonctions.php')) {
-	global $dossier_squelettes;
-	include_once(_ROOT_CWD . $f);
+    global $dossier_squelettes;
+    include_once(_ROOT_CWD . $f);
 }
 
 
@@ -150,90 +150,90 @@ 
  */
 function autoriser_dist(string $faire, ?string $type = '', $id = null, $qui = null, array $opt = []): bool {
 
-	if ($type === null) {
-		$type = '';
-	}
-
-	// Qui ? visiteur_session ?
-	// si null ou '' (appel depuis #AUTORISER) on prend l'auteur loge
-	if ($qui === null || $qui === '') {
-		$qui = $GLOBALS['visiteur_session'] ?: [];
-		$qui = array_merge(['statut' => '', 'id_auteur' => 0, 'webmestre' => 'non'], $qui);
-	} elseif (is_numeric($qui)) {
-		$qui = sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . $qui);
-		if (!$qui) {
-			return false;
-		}
-	}
-
-	// Admins restreints, on construit ici (pas generique mais...)
-	// le tableau de toutes leurs rubriques (y compris les sous-rubriques)
-	if (_ADMINS_RESTREINTS && is_array($qui)) {
-		$qui['restreint'] = isset($qui['id_auteur']) ? liste_rubriques_auteur($qui['id_auteur']) : [];
-	}
-
-	spip_log(
-		"autoriser $faire $type $id (" . ($qui['nom'] ?? '') . ') ?',
-		'autoriser' . _LOG_DEBUG
-	);
-
-	// passer par objet_type pour avoir les alias
-	// sauf si _ est le premier caractère.
-	if ($type && $type[0] !== '_') {
-		$type = objet_type($type, false);
-	}
-	// et supprimer les _
-	$type = str_replace('_', '', (string) $type);
-
-	// Si une exception a ete decretee plus haut dans le code, l'appliquer
-	if (
-		isset($GLOBALS['autoriser_exception'][$faire][$type][$id])
-		&& autoriser_exception($faire, $type, $id, 'verifier') || isset($GLOBALS['autoriser_exception'][$faire][$type]['*']) && autoriser_exception($faire, $type, '*', 'verifier')
-	) {
-		spip_log("autoriser ($faire, $type, $id, " . ($qui['nom'] ?? '') . ') : OK Exception', 'autoriser' . _LOG_DEBUG);
-		return true;
-	}
-
-	// Chercher une fonction d'autorisation
-	// Dans l'ordre on va chercher autoriser_type_faire[_dist], autoriser_type[_dist],
-	// autoriser_faire[_dist], autoriser_defaut[_dist]
-	$fonctions = $type
-		? [
-			'autoriser_' . $type . '_' . $faire,
-			'autoriser_' . $type . '_' . $faire . '_dist',
-			'autoriser_' . $type,
-			'autoriser_' . $type . '_dist',
-			'autoriser_' . $faire,
-			'autoriser_' . $faire . '_dist',
-			'autoriser_defaut',
-			'autoriser_defaut_dist'
-		]
-		: [
-			'autoriser_' . $faire,
-			'autoriser_' . $faire . '_dist',
-			'autoriser_defaut',
-			'autoriser_defaut_dist'
-		];
-
-	$a = false;
-	foreach ($fonctions as $f) {
-		if (function_exists($f)) {
-			$a = $f($faire, $type, $id, $qui, $opt);
-			break;
-		}
-	}
-
-	spip_log(
-		"$f($faire, $type, $id, " . ($qui['nom'] ?? '') . ') : ' . ($a ? 'OK' : 'niet'),
-		'autoriser' . _LOG_DEBUG
-	);
-
-	if (!is_bool($a)) {
-		 trigger_error(sprintf('Function %s should returns a boolean instead of %s (casts as boolean). This will trigger fatal error in future versions.', $f, gettype($a)), \E_USER_DEPRECATED);
-		 $a = (bool) $a;
-	}
-
-	return $a;
+    if ($type === null) {
+        $type = '';
+    }
+
+    // Qui ? visiteur_session ?
+    // si null ou '' (appel depuis #AUTORISER) on prend l'auteur loge
+    if ($qui === null || $qui === '') {
+        $qui = $GLOBALS['visiteur_session'] ?: [];
+        $qui = array_merge(['statut' => '', 'id_auteur' => 0, 'webmestre' => 'non'], $qui);
+    } elseif (is_numeric($qui)) {
+        $qui = sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . $qui);
+        if (!$qui) {
+            return false;
+        }
+    }
+
+    // Admins restreints, on construit ici (pas generique mais...)
+    // le tableau de toutes leurs rubriques (y compris les sous-rubriques)
+    if (_ADMINS_RESTREINTS && is_array($qui)) {
+        $qui['restreint'] = isset($qui['id_auteur']) ? liste_rubriques_auteur($qui['id_auteur']) : [];
+    }
+
+    spip_log(
+        "autoriser $faire $type $id (" . ($qui['nom'] ?? '') . ') ?',
+        'autoriser' . _LOG_DEBUG
+    );
+
+    // passer par objet_type pour avoir les alias
+    // sauf si _ est le premier caractère.
+    if ($type && $type[0] !== '_') {
+        $type = objet_type($type, false);
+    }
+    // et supprimer les _
+    $type = str_replace('_', '', (string) $type);
+
+    // Si une exception a ete decretee plus haut dans le code, l'appliquer
+    if (
+        isset($GLOBALS['autoriser_exception'][$faire][$type][$id])
+        && autoriser_exception($faire, $type, $id, 'verifier') || isset($GLOBALS['autoriser_exception'][$faire][$type]['*']) && autoriser_exception($faire, $type, '*', 'verifier')
+    ) {
+        spip_log("autoriser ($faire, $type, $id, " . ($qui['nom'] ?? '') . ') : OK Exception', 'autoriser' . _LOG_DEBUG);
+        return true;
+    }
+
+    // Chercher une fonction d'autorisation
+    // Dans l'ordre on va chercher autoriser_type_faire[_dist], autoriser_type[_dist],
+    // autoriser_faire[_dist], autoriser_defaut[_dist]
+    $fonctions = $type
+        ? [
+            'autoriser_' . $type . '_' . $faire,
+            'autoriser_' . $type . '_' . $faire . '_dist',
+            'autoriser_' . $type,
+            'autoriser_' . $type . '_dist',
+            'autoriser_' . $faire,
+            'autoriser_' . $faire . '_dist',
+            'autoriser_defaut',
+            'autoriser_defaut_dist'
+        ]
+        : [
+            'autoriser_' . $faire,
+            'autoriser_' . $faire . '_dist',
+            'autoriser_defaut',
+            'autoriser_defaut_dist'
+        ];
+
+    $a = false;
+    foreach ($fonctions as $f) {
+        if (function_exists($f)) {
+            $a = $f($faire, $type, $id, $qui, $opt);
+            break;
+        }
+    }
+
+    spip_log(
+        "$f($faire, $type, $id, " . ($qui['nom'] ?? '') . ') : ' . ($a ? 'OK' : 'niet'),
+        'autoriser' . _LOG_DEBUG
+    );
+
+    if (!is_bool($a)) {
+            trigger_error(sprintf('Function %s should returns a boolean instead of %s (casts as boolean). This will trigger fatal error in future versions.', $f, gettype($a)), \E_USER_DEPRECATED);
+            $a = (bool) $a;
+    }
+
+    return $a;
 }
 
 // une globale pour aller au plus vite dans la fonction generique ci dessus
@@ -253,33 +253,33 @@ 
  * @return bool
  */
 function autoriser_exception(string $faire, ?string $type = '', $id = null, $autoriser = true): bool {
-	// une static innaccessible par url pour verifier que la globale est positionnee a bon escient
-	static $autorisation;
-	// Tolérance avec certains appels
-	if ($type === null) {
-		$type = '';
-	}
-	if ($id === null) {
-		$id = 0;
-	}
-	if ($autoriser === 'verifier') {
-		return isset($autorisation[$faire][$type][$id]);
-	}
-	if ($autoriser === true) {
-		$GLOBALS['autoriser_exception'][$faire][$type][$id] = $autorisation[$faire][$type][$id] = true;
-	}
-	if ($autoriser === false) {
-		if ($id === '*') {
-			unset($GLOBALS['autoriser_exception'][$faire][$type]);
-			unset($autorisation[$faire][$type]);
-		}
-		else {
-			unset($GLOBALS['autoriser_exception'][$faire][$type][$id]);
-			unset($autorisation[$faire][$type][$id]);
-		}
-	}
-
-	return false;
+    // une static innaccessible par url pour verifier que la globale est positionnee a bon escient
+    static $autorisation;
+    // Tolérance avec certains appels
+    if ($type === null) {
+        $type = '';
+    }
+    if ($id === null) {
+        $id = 0;
+    }
+    if ($autoriser === 'verifier') {
+        return isset($autorisation[$faire][$type][$id]);
+    }
+    if ($autoriser === true) {
+        $GLOBALS['autoriser_exception'][$faire][$type][$id] = $autorisation[$faire][$type][$id] = true;
+    }
+    if ($autoriser === false) {
+        if ($id === '*') {
+            unset($GLOBALS['autoriser_exception'][$faire][$type]);
+            unset($autorisation[$faire][$type]);
+        }
+        else {
+            unset($GLOBALS['autoriser_exception'][$faire][$type][$id]);
+            unset($autorisation[$faire][$type][$id]);
+        }
+    }
+
+    return false;
 }
 
 
@@ -298,7 +298,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_defaut_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo' && !$qui['restreint'];
+    return $qui['statut'] === '0minirezo' && !$qui['restreint'];
 }
 
 /**
@@ -318,7 +318,7 @@ 
  * @return bool true s'il a le droit, false sinon
  */
 function autoriser_loger_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] !== '5poubelle';
+    return $qui['statut'] !== '5poubelle';
 }
 
 /**
@@ -334,7 +334,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_ecrire_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return isset($qui['statut']) && in_array($qui['statut'], ['0minirezo', '1comite']);
+    return isset($qui['statut']) && in_array($qui['statut'], ['0minirezo', '1comite']);
 }
 
 /**
@@ -353,7 +353,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_creer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return in_array($qui['statut'], ['0minirezo', '1comite']);
+    return in_array($qui['statut'], ['0minirezo', '1comite']);
 }
 
 /**
@@ -373,14 +373,14 @@ 
  **/
 function autoriser_previsualiser_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
 
-	// Le visiteur a-t-il un statut prevu par la config ?
-	if (str_contains((string) $GLOBALS['meta']['preview'], ',' . $qui['statut'] . ',')) {
-		return test_previsualiser_objet_champ($type, $id, $qui, $opt);
-	}
+    // Le visiteur a-t-il un statut prevu par la config ?
+    if (str_contains((string) $GLOBALS['meta']['preview'], ',' . $qui['statut'] . ',')) {
+        return test_previsualiser_objet_champ($type, $id, $qui, $opt);
+    }
 
-	// A-t-on un token de prévisualisation valable ?
-	include_spip('inc/securiser_action');
-	return (bool) decrire_token_previsu();
+    // A-t-on un token de prévisualisation valable ?
+    include_spip('inc/securiser_action');
+    return (bool) decrire_token_previsu();
 }
 
 /**
@@ -409,58 +409,58 @@ 
  */
 function test_previsualiser_objet_champ(string $type = '', $id = null, array $qui = [], array $opt = []): bool {
 
-	// si pas de type et statut fourni, c'est une autorisation generale => OK
-	if (!$type) {
-		return true;
-	}
-
-	include_spip('base/objets');
-	$infos = lister_tables_objets_sql(table_objet_sql($type));
-	if (isset($infos['statut'])) {
-		foreach ($infos['statut'] as $c) {
-			if (isset($c['publie'])) {
-				if (!isset($c['previsu'])) {
-					return false;
-				} // pas de previsu definie => NIET
-				$champ = $c['champ'];
-				if (!isset($opt[$champ])) {
-					return false;
-				} // pas de champ passe a la demande => NIET
-				$previsu = explode(',', (string) $c['previsu']);
-				// regarder si ce statut est autorise pour l'auteur
-				if (in_array($opt[$champ] . '/auteur', $previsu)) {
-					// retrouver l’id_auteur qui a filé un lien de prévisu éventuellement,
-					// sinon l’auteur en session
-					include_spip('inc/securiser_action');
-					if ($desc = decrire_token_previsu()) {
-						$id_auteur = $desc['id_auteur'];
-					} elseif (isset($GLOBALS['visiteur_session']['id_auteur'])) {
-						$id_auteur = (int) $GLOBALS['visiteur_session']['id_auteur'];
-					} else {
-						$id_auteur = null;
-					}
-
-					if (!$id_auteur) {
-						return false;
-					} elseif (autoriser('previsualiser' . $opt[$champ], $type, 0, $id_auteur)) {
-						// dans ce cas (admin en general), pas de filtrage sur ce statut
-					} elseif (
-						!sql_countsel(
-							'spip_auteurs_liens',
-							'id_auteur=' . (int) $id_auteur . ' AND objet=' . sql_quote($type) . ' AND id_objet=' . (int) $id
-						)
-					) {
-						return false;
-					} // pas auteur de cet objet => NIET
-				} elseif (!in_array($opt[$champ], $previsu)) {
-					// le statut n'est pas dans ceux definis par la previsu => NIET
-					return false;
-				}
-			}
-		}
-	}
-
-	return true;
+    // si pas de type et statut fourni, c'est une autorisation generale => OK
+    if (!$type) {
+        return true;
+    }
+
+    include_spip('base/objets');
+    $infos = lister_tables_objets_sql(table_objet_sql($type));
+    if (isset($infos['statut'])) {
+        foreach ($infos['statut'] as $c) {
+            if (isset($c['publie'])) {
+                if (!isset($c['previsu'])) {
+                    return false;
+                } // pas de previsu definie => NIET
+                $champ = $c['champ'];
+                if (!isset($opt[$champ])) {
+                    return false;
+                } // pas de champ passe a la demande => NIET
+                $previsu = explode(',', (string) $c['previsu']);
+                // regarder si ce statut est autorise pour l'auteur
+                if (in_array($opt[$champ] . '/auteur', $previsu)) {
+                    // retrouver l’id_auteur qui a filé un lien de prévisu éventuellement,
+                    // sinon l’auteur en session
+                    include_spip('inc/securiser_action');
+                    if ($desc = decrire_token_previsu()) {
+                        $id_auteur = $desc['id_auteur'];
+                    } elseif (isset($GLOBALS['visiteur_session']['id_auteur'])) {
+                        $id_auteur = (int) $GLOBALS['visiteur_session']['id_auteur'];
+                    } else {
+                        $id_auteur = null;
+                    }
+
+                    if (!$id_auteur) {
+                        return false;
+                    } elseif (autoriser('previsualiser' . $opt[$champ], $type, 0, $id_auteur)) {
+                        // dans ce cas (admin en general), pas de filtrage sur ce statut
+                    } elseif (
+                        !sql_countsel(
+                            'spip_auteurs_liens',
+                            'id_auteur=' . (int) $id_auteur . ' AND objet=' . sql_quote($type) . ' AND id_objet=' . (int) $id
+                        )
+                    ) {
+                        return false;
+                    } // pas auteur de cet objet => NIET
+                } elseif (!in_array($opt[$champ], $previsu)) {
+                    // le statut n'est pas dans ceux definis par la previsu => NIET
+                    return false;
+                }
+            }
+        }
+    }
+
+    return true;
 }
 
 /**
@@ -476,49 +476,49 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_changerlangue_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	$multi_objets = explode(',', (string) lire_config('multi_objets'));
-	$gerer_trad_objets = explode(',', (string) lire_config('gerer_trad_objets'));
-	$table = table_objet_sql($type);
-	if (
-		in_array($table, $multi_objets)
-		|| in_array($table, $gerer_trad_objets)
-	) { // affichage du formulaire si la configuration l'accepte
-		$multi_secteurs = lire_config('multi_secteurs');
-		$champs = objet_info($type, 'field');
-		if (
-			$multi_secteurs === 'oui'
-			&& array_key_exists('id_rubrique', $champs)
-		) {
-			// multilinguisme par secteur et objet rattaché à une rubrique
-			$primary = id_table_objet($type);
-			$id_rubrique = $table != 'spip_rubriques'
-				? sql_getfetsel('id_rubrique', "$table", "$primary=" . (int) $id)
-				: $id;
-			$id_secteur = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique=' . (int) $id_rubrique);
-			if (!$id_secteur > 0) {
-				$id_secteur = $id_rubrique;
-			}
-			$langue_secteur = sql_getfetsel('lang', 'spip_rubriques', 'id_rubrique=' . (int) $id_secteur);
-			$langue_objet = sql_getfetsel('lang', "$table", "$primary=" . (int) $id);
-			if ($langue_secteur != $langue_objet) {
-				// configuration incohérente, on laisse l'utilisateur corriger la situation
-				return true;
-			}
-			if ($table != 'spip_rubriques') { // le choix de la langue se fait seulement sur les rubriques
-				return false;
-			} else {
-				$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . (int) $id);
-				if ($id_parent != 0) {
-					// sous-rubriques : pas de choix de langue
-					return false;
-				}
-			}
-		}
-	} else {
-		return false;
-	}
-
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    $multi_objets = explode(',', (string) lire_config('multi_objets'));
+    $gerer_trad_objets = explode(',', (string) lire_config('gerer_trad_objets'));
+    $table = table_objet_sql($type);
+    if (
+        in_array($table, $multi_objets)
+        || in_array($table, $gerer_trad_objets)
+    ) { // affichage du formulaire si la configuration l'accepte
+        $multi_secteurs = lire_config('multi_secteurs');
+        $champs = objet_info($type, 'field');
+        if (
+            $multi_secteurs === 'oui'
+            && array_key_exists('id_rubrique', $champs)
+        ) {
+            // multilinguisme par secteur et objet rattaché à une rubrique
+            $primary = id_table_objet($type);
+            $id_rubrique = $table != 'spip_rubriques'
+                ? sql_getfetsel('id_rubrique', "$table", "$primary=" . (int) $id)
+                : $id;
+            $id_secteur = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique=' . (int) $id_rubrique);
+            if (!$id_secteur > 0) {
+                $id_secteur = $id_rubrique;
+            }
+            $langue_secteur = sql_getfetsel('lang', 'spip_rubriques', 'id_rubrique=' . (int) $id_secteur);
+            $langue_objet = sql_getfetsel('lang', "$table", "$primary=" . (int) $id);
+            if ($langue_secteur != $langue_objet) {
+                // configuration incohérente, on laisse l'utilisateur corriger la situation
+                return true;
+            }
+            if ($table != 'spip_rubriques') { // le choix de la langue se fait seulement sur les rubriques
+                return false;
+            } else {
+                $id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . (int) $id);
+                if ($id_parent != 0) {
+                    // sous-rubriques : pas de choix de langue
+                    return false;
+                }
+            }
+        }
+    } else {
+        return false;
+    }
+
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 /**
@@ -534,7 +534,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_changertraduction_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 /**
@@ -550,38 +550,38 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_dater_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	$table = table_objet($type);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($table);
-	if (!$desc) {
-		return false;
-	}
-
-	if (!isset($opt['statut'])) {
-		if (isset($desc['field']['statut'])) {
-			$statut = sql_getfetsel('statut', $desc['table'], id_table_objet($type) . '=' . (int) $id);
-		} else {
-			$statut = 'publie';
-		} // pas de statut => publie
-	} else {
-		$statut = $opt['statut'];
-	}
-
-	// Liste des statuts publiés pour cet objet
-	// Sinon en dur le statut "publie"
-	$statuts_publies = isset($desc['statut'][0]['publie'])
-		? explode(',', (string) $desc['statut'][0]['publie'])
-		: ['publie'];
-
-	if (
-		in_array($statut, $statuts_publies)
-		// Ou cas particulier géré en dur ici pour les articles
-		|| $statut === 'prop' && $type === 'article' && $GLOBALS['meta']['post_dates'] === 'non'
-	) {
-		return autoriser('modifier', $type, $id);
-	}
-
-	return false;
+    $table = table_objet($type);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($table);
+    if (!$desc) {
+        return false;
+    }
+
+    if (!isset($opt['statut'])) {
+        if (isset($desc['field']['statut'])) {
+            $statut = sql_getfetsel('statut', $desc['table'], id_table_objet($type) . '=' . (int) $id);
+        } else {
+            $statut = 'publie';
+        } // pas de statut => publie
+    } else {
+        $statut = $opt['statut'];
+    }
+
+    // Liste des statuts publiés pour cet objet
+    // Sinon en dur le statut "publie"
+    $statuts_publies = isset($desc['statut'][0]['publie'])
+        ? explode(',', (string) $desc['statut'][0]['publie'])
+        : ['publie'];
+
+    if (
+        in_array($statut, $statuts_publies)
+        // Ou cas particulier géré en dur ici pour les articles
+        || $statut === 'prop' && $type === 'article' && $GLOBALS['meta']['post_dates'] === 'non'
+    ) {
+        return autoriser('modifier', $type, $id);
+    }
+
+    return false;
 }
 
 /**
@@ -600,7 +600,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_instituer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 /**
@@ -618,9 +618,9 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_publierdans_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return
-		$qui['statut'] === '0minirezo'
-		&& (!$qui['restreint'] || !$id || in_array($id, $qui['restreint']));
+    return
+        $qui['statut'] === '0minirezo'
+        && (!$qui['restreint'] || !$id || in_array($id, $qui['restreint']));
 }
 
 /**
@@ -638,12 +638,12 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_creer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if (!empty($opt['id_parent'])) {
-		return autoriser('creerrubriquedans', 'rubrique', $opt['id_parent'], $qui);
-	}
-	else {
-		return autoriser('defaut', null, 0, $qui, $opt);
-	}
+    if (!empty($opt['id_parent'])) {
+        return autoriser('creerrubriquedans', 'rubrique', $opt['id_parent'], $qui);
+    }
+    else {
+        return autoriser('defaut', null, 0, $qui, $opt);
+    }
 }
 
 /**
@@ -661,8 +661,8 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_creerrubriquedans_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return
-		($id || $qui['statut'] === '0minirezo' && !$qui['restreint']) && autoriser('voir', 'rubrique', $id) && autoriser('publierdans', 'rubrique', $id);
+    return
+        ($id || $qui['statut'] === '0minirezo' && !$qui['restreint']) && autoriser('voir', 'rubrique', $id) && autoriser('publierdans', 'rubrique', $id);
 }
 
 /**
@@ -680,10 +680,10 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_creerarticledans_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return
-		$id
-		&& autoriser('voir', 'rubrique', $id)
-		&& autoriser('creer', 'article');
+    return
+        $id
+        && autoriser('voir', 'rubrique', $id)
+        && autoriser('creer', 'article');
 }
 
 
@@ -702,7 +702,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_modifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
+    return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
 }
 
 /**
@@ -720,29 +720,29 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_supprimer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if (!$id = (int) $id) {
-		return false;
-	}
+    if (!$id = (int) $id) {
+        return false;
+    }
 
-	if (sql_countsel('spip_rubriques', 'id_parent=' . (int) $id)) {
-		return false;
-	}
+    if (sql_countsel('spip_rubriques', 'id_parent=' . (int) $id)) {
+        return false;
+    }
 
-	if (sql_countsel('spip_articles', 'id_rubrique=' . (int) $id . " AND (statut<>'poubelle')")) {
-		return false;
-	}
+    if (sql_countsel('spip_articles', 'id_rubrique=' . (int) $id . " AND (statut<>'poubelle')")) {
+        return false;
+    }
 
-	$compte = pipeline(
-		'objet_compte_enfants',
-		['args' => ['objet' => 'rubrique', 'id_objet' => $id], 'data' => []]
-	);
-	foreach ($compte as $objet => $n) {
-		if ($n) {
-			return false;
-		}
-	}
+    $compte = pipeline(
+        'objet_compte_enfants',
+        ['args' => ['objet' => 'rubrique', 'id_objet' => $id], 'data' => []]
+    );
+    foreach ($compte as $objet => $n) {
+        if ($n) {
+            return false;
+        }
+    }
 
-	return autoriser('modifier', 'rubrique', $id);
+    return autoriser('modifier', 'rubrique', $id);
 }
 
 
@@ -762,20 +762,20 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_article_modifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if (!$id) {
-		return false;
-	}
-	$r = sql_fetsel('id_rubrique,statut', 'spip_articles', 'id_article=' . sql_quote($id));
+    if (!$id) {
+        return false;
+    }
+    $r = sql_fetsel('id_rubrique,statut', 'spip_articles', 'id_article=' . sql_quote($id));
 
-	return $r && (
-		autoriser('publierdans', 'rubrique', $r['id_rubrique'], $qui, $opt)
-		|| (
-			(!isset($opt['statut']) || !in_array($opt['statut'], ['publie', 'refuse'], true))
-			&& in_array($qui['statut'], ['0minirezo', '1comite'])
-			&& in_array($r['statut'], ['prop', 'prepa', 'poubelle'])
-			&& auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur'])
-		)
-	);
+    return $r && (
+        autoriser('publierdans', 'rubrique', $r['id_rubrique'], $qui, $opt)
+        || (
+            (!isset($opt['statut']) || !in_array($opt['statut'], ['publie', 'refuse'], true))
+            && in_array($qui['statut'], ['0minirezo', '1comite'])
+            && in_array($r['statut'], ['prop', 'prepa', 'poubelle'])
+            && auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur'])
+        )
+    );
 }
 
 /**
@@ -793,13 +793,13 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_article_creer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if (!empty($opt['id_parent'])) {
-		// creerarticledans rappelle autoriser(creer,article) sans id, donc on verifiera condition du else aussi
-		return autoriser('creerarticledans', 'rubrique', $opt['id_parent'], $qui);
-	}
-	else {
-		return (sql_countsel('spip_rubriques') > 0 && in_array($qui['statut'], ['0minirezo', '1comite']));
-	}
+    if (!empty($opt['id_parent'])) {
+        // creerarticledans rappelle autoriser(creer,article) sans id, donc on verifiera condition du else aussi
+        return autoriser('creerarticledans', 'rubrique', $opt['id_parent'], $qui);
+    }
+    else {
+        return (sql_countsel('spip_rubriques') > 0 && in_array($qui['statut'], ['0minirezo', '1comite']));
+    }
 }
 
 /**
@@ -821,26 +821,26 @@ 
  * @return bool true s'il a le droit, false sinon
  */
 function autoriser_article_voir_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if ($qui['statut'] === '0minirezo') {
-		return true;
-	}
-	// cas des articles : depend du statut de l'article et de l'auteur
-	if (isset($opt['statut'])) {
-		$statut = $opt['statut'];
-	} else {
-		if (!$id) {
-			return false;
-		}
-		$statut = sql_getfetsel('statut', 'spip_articles', 'id_article=' . (int) $id);
-	}
+    if ($qui['statut'] === '0minirezo') {
+        return true;
+    }
+    // cas des articles : depend du statut de l'article et de l'auteur
+    if (isset($opt['statut'])) {
+        $statut = $opt['statut'];
+    } else {
+        if (!$id) {
+            return false;
+        }
+        $statut = sql_getfetsel('statut', 'spip_articles', 'id_article=' . (int) $id);
+    }
 
-	return
-		// si on est pas auteur de l'article,
-		// seuls les propose et publies sont visibles
-		in_array($statut, ['prop', 'publie'])
-		// sinon si on est auteur, on a le droit de le voir, evidemment !
+    return
+        // si on est pas auteur de l'article,
+        // seuls les propose et publies sont visibles
+        in_array($statut, ['prop', 'publie'])
+        // sinon si on est auteur, on a le droit de le voir, evidemment !
 
-		|| $id && $qui['id_auteur'] && auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur']);
+        || $id && $qui['id_auteur'] && auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur']);
 }
 
 
@@ -859,24 +859,24 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_voir_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	# securite, mais on aurait pas du arriver ici !
-	if (
-		function_exists($f = 'autoriser_' . $type . '_voir')
-		|| function_exists($f = 'autoriser_' . $type . '_voir_dist')
-	) {
-		return $f($faire, $type, $id, $qui, $opt);
-	}
+    # securite, mais on aurait pas du arriver ici !
+    if (
+        function_exists($f = 'autoriser_' . $type . '_voir')
+        || function_exists($f = 'autoriser_' . $type . '_voir_dist')
+    ) {
+        return $f($faire, $type, $id, $qui, $opt);
+    }
 
-	if ($qui['statut'] === '0minirezo') {
-		return true;
-	}
-	// admins et redacteurs peuvent voir un auteur
-	if ($type === 'auteur') {
-		return in_array($qui['statut'], ['0minirezo', '1comite']);
-	}
-	// sinon par defaut tout est visible
-	// sauf cas particuliers traites separemment (ie article)
-	return true;
+    if ($qui['statut'] === '0minirezo') {
+        return true;
+    }
+    // admins et redacteurs peuvent voir un auteur
+    if ($type === 'auteur') {
+        return in_array($qui['statut'], ['0minirezo', '1comite']);
+    }
+    // sinon par defaut tout est visible
+    // sauf cas particuliers traites separemment (ie article)
+    return true;
 }
 
 
@@ -898,10 +898,10 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_webmestre_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return
-		$qui['webmestre'] === 'oui'
-		&& $qui['statut'] === '0minirezo'
-		&& !$qui['restreint'];
+    return
+        $qui['webmestre'] === 'oui'
+        && $qui['statut'] === '0minirezo'
+        && !$qui['restreint'];
 }
 
 /**
@@ -919,7 +919,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo' && !$qui['restreint'];
+    return $qui['statut'] === '0minirezo' && !$qui['restreint'];
 }
 
 /**
@@ -937,7 +937,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_sauvegarder_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo';
+    return $qui['statut'] === '0minirezo';
 }
 
 /**
@@ -955,7 +955,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_detruire_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('webmestre', null, 0, $qui, $opt);
+    return autoriser('webmestre', null, 0, $qui, $opt);
 }
 
 /**
@@ -974,23 +974,23 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteur_previsualiser_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	// les admins peuvent "previsualiser" une page auteur
-	if (
-		$qui['statut'] === '0minirezo'
-		&& !$qui['restreint']
-	) {
-		return true;
-	} elseif ($id === 0) {
-		return false;
-	}
-	// "Voir en ligne" si l'auteur a un article publie
-	$n = sql_fetsel(
-		'A.id_article',
-		'spip_auteurs_liens AS L LEFT JOIN spip_articles AS A ON (L.objet=\'article\' AND L.id_objet=A.id_article)',
-		"A.statut='publie' AND L.id_auteur=" . sql_quote($id)
-	);
+    // les admins peuvent "previsualiser" une page auteur
+    if (
+        $qui['statut'] === '0minirezo'
+        && !$qui['restreint']
+    ) {
+        return true;
+    } elseif ($id === 0) {
+        return false;
+    }
+    // "Voir en ligne" si l'auteur a un article publie
+    $n = sql_fetsel(
+        'A.id_article',
+        'spip_auteurs_liens AS L LEFT JOIN spip_articles AS A ON (L.objet=\'article\' AND L.id_objet=A.id_article)',
+        "A.statut='publie' AND L.id_auteur=" . sql_quote($id)
+    );
 
-	return (bool) $n;
+    return (bool) $n;
 }
 
 
@@ -1019,7 +1019,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteur_creer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return ($qui['statut'] === '0minirezo');
+    return ($qui['statut'] === '0minirezo');
 }
 
 
@@ -1040,62 +1040,62 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteur_modifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	$id = (int) $id;
-
-	// Si pas admin : seulement le droit de modifier ses donnees perso, mais pas statut ni login
-	// la modif de l'email doit etre verifiee ou notifiee si possible, mais c'est a l'interface de gerer ca
-	if ($qui['statut'] != '0minirezo') {
-		return $id == $qui['id_auteur']
-			&& empty($opt['statut'])
-			&& empty($opt['webmestre'])
-			&& empty($opt['restreintes'])
-			&& empty($opt['login']);
-	}
-
-	// Un admin restreint peut modifier/creer un auteur non-admin mais il
-	// n'a le droit ni de le promouvoir admin, ni de changer les rubriques
-	if ($qui['restreint']) {
-		if (isset($opt['webmestre']) && $opt['webmestre']) {
-			return false;
-		} elseif (
-			isset($opt['statut']) && $opt['statut'] === '0minirezo' || isset($opt['restreintes']) && $opt['restreintes']
-		) {
-			return false;
-		} else {
-			if ($id == $qui['id_auteur']) {
-				if (isset($opt['statut']) && $opt['statut']) {
-					return false;
-				} else {
-					return true;
-				}
-			} else {
-				if ($id_auteur = (int) $id) {
-					$t = sql_fetsel('statut', 'spip_auteurs', "id_auteur=$id_auteur");
-					if ($t && $t['statut'] != '0minirezo') {
-						return true;
-					} else {
-						return false;
-					}
-				} else {
-					// id = 0 => creation
-					return true;
-				}
-			}
-		}
-	}
-
-	// Un admin complet fait ce qu'il veut, sauf se degrader
-	if ($id == $qui['id_auteur'] && (isset($opt['statut']) && $opt['statut'])) {
-		return false;
-	} elseif (isset($opt['webmestre']) && $opt['webmestre'] && !autoriser('webmestre')) {
-		// et toucher au statut webmestre si il ne l'est pas lui même
-		return false;
-	} elseif ((int) $id && !autoriser('webmestre') && autoriser('webmestre', '', 0, $id)) {
-		// et modifier un webmestre si il ne l'est pas lui meme
-		return false;
-	}
-
-	return true;
+    $id = (int) $id;
+
+    // Si pas admin : seulement le droit de modifier ses donnees perso, mais pas statut ni login
+    // la modif de l'email doit etre verifiee ou notifiee si possible, mais c'est a l'interface de gerer ca
+    if ($qui['statut'] != '0minirezo') {
+        return $id == $qui['id_auteur']
+            && empty($opt['statut'])
+            && empty($opt['webmestre'])
+            && empty($opt['restreintes'])
+            && empty($opt['login']);
+    }
+
+    // Un admin restreint peut modifier/creer un auteur non-admin mais il
+    // n'a le droit ni de le promouvoir admin, ni de changer les rubriques
+    if ($qui['restreint']) {
+        if (isset($opt['webmestre']) && $opt['webmestre']) {
+            return false;
+        } elseif (
+            isset($opt['statut']) && $opt['statut'] === '0minirezo' || isset($opt['restreintes']) && $opt['restreintes']
+        ) {
+            return false;
+        } else {
+            if ($id == $qui['id_auteur']) {
+                if (isset($opt['statut']) && $opt['statut']) {
+                    return false;
+                } else {
+                    return true;
+                }
+            } else {
+                if ($id_auteur = (int) $id) {
+                    $t = sql_fetsel('statut', 'spip_auteurs', "id_auteur=$id_auteur");
+                    if ($t && $t['statut'] != '0minirezo') {
+                        return true;
+                    } else {
+                        return false;
+                    }
+                } else {
+                    // id = 0 => creation
+                    return true;
+                }
+            }
+        }
+    }
+
+    // Un admin complet fait ce qu'il veut, sauf se degrader
+    if ($id == $qui['id_auteur'] && (isset($opt['statut']) && $opt['statut'])) {
+        return false;
+    } elseif (isset($opt['webmestre']) && $opt['webmestre'] && !autoriser('webmestre')) {
+        // et toucher au statut webmestre si il ne l'est pas lui même
+        return false;
+    } elseif ((int) $id && !autoriser('webmestre') && autoriser('webmestre', '', 0, $id)) {
+        // et modifier un webmestre si il ne l'est pas lui meme
+        return false;
+    }
+
+    return true;
 }
 
 
@@ -1114,7 +1114,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_associerauteurs_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 
@@ -1133,7 +1133,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_chargerftp_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo';
+    return $qui['statut'] === '0minirezo';
 }
 
 /**
@@ -1151,7 +1151,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_debug_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo';
+    return $qui['statut'] === '0minirezo';
 }
 
 /**
@@ -1168,53 +1168,53 @@ 
  * @return array          Liste des rubriques
  **/
 function liste_rubriques_auteur($id_auteur, $raz = false) {
-	static $restreint = [];
-
-	if (!$id_auteur = (int) $id_auteur) {
-		return [];
-	}
-	if ($raz) {
-		unset($restreint[$id_auteur]);
-	} elseif (isset($restreint[$id_auteur])) {
-		return $restreint[$id_auteur];
-	}
-
-	$rubriques = [];
-	if (
-		(!isset($GLOBALS['meta']['version_installee']) || $GLOBALS['meta']['version_installee'] > 16428)
-		&& ($r = sql_allfetsel(
-			'id_objet',
-			'spip_auteurs_liens',
-			'id_auteur=' . (int) $id_auteur . " AND objet='rubrique' AND id_objet!=0"
-		))
-		&& (is_countable($r) ? count($r) : 0)
-	) {
-		$r = array_column($r, 'id_objet');
-
-		// recuperer toute la branche, au format chaine enumeration
-		include_spip('inc/rubriques');
-		$r = calcul_branche_in($r);
-		$r = explode(',', (string) $r);
-
-		// passer les rubriques en index, elimine les doublons
-		$r = array_flip($r);
-		// recuperer les index seuls
-		$r = array_keys($r);
-		// combiner pour avoir un tableau id_rubrique=>id_rubrique
-		// est-ce vraiment utile ? (on preserve la forme donnee par le code precedent)
-		$rubriques = array_combine($r, $r);
-	}
-
-	// Affecter l'auteur session le cas echeant
-	if (
-		isset($GLOBALS['visiteur_session']['id_auteur'])
-		&& $GLOBALS['visiteur_session']['id_auteur'] == $id_auteur
-	) {
-		$GLOBALS['visiteur_session']['restreint'] = $rubriques;
-	}
-
-
-	return $restreint[$id_auteur] = $rubriques;
+    static $restreint = [];
+
+    if (!$id_auteur = (int) $id_auteur) {
+        return [];
+    }
+    if ($raz) {
+        unset($restreint[$id_auteur]);
+    } elseif (isset($restreint[$id_auteur])) {
+        return $restreint[$id_auteur];
+    }
+
+    $rubriques = [];
+    if (
+        (!isset($GLOBALS['meta']['version_installee']) || $GLOBALS['meta']['version_installee'] > 16428)
+        && ($r = sql_allfetsel(
+            'id_objet',
+            'spip_auteurs_liens',
+            'id_auteur=' . (int) $id_auteur . " AND objet='rubrique' AND id_objet!=0"
+        ))
+        && (is_countable($r) ? count($r) : 0)
+    ) {
+        $r = array_column($r, 'id_objet');
+
+        // recuperer toute la branche, au format chaine enumeration
+        include_spip('inc/rubriques');
+        $r = calcul_branche_in($r);
+        $r = explode(',', (string) $r);
+
+        // passer les rubriques en index, elimine les doublons
+        $r = array_flip($r);
+        // recuperer les index seuls
+        $r = array_keys($r);
+        // combiner pour avoir un tableau id_rubrique=>id_rubrique
+        // est-ce vraiment utile ? (on preserve la forme donnee par le code precedent)
+        $rubriques = array_combine($r, $r);
+    }
+
+    // Affecter l'auteur session le cas echeant
+    if (
+        isset($GLOBALS['visiteur_session']['id_auteur'])
+        && $GLOBALS['visiteur_session']['id_auteur'] == $id_auteur
+    ) {
+        $GLOBALS['visiteur_session']['restreint'] = $rubriques;
+    }
+
+
+    return $restreint[$id_auteur] = $rubriques;
 }
 
 /**
@@ -1232,7 +1232,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_previsualiser_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('previsualiser');
+    return autoriser('previsualiser');
 }
 
 /**
@@ -1250,7 +1250,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubrique_iconifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
+    return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
 }
 
 /**
@@ -1268,8 +1268,8 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteur_iconifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	$id = (int) $id;
-	return ($id == $qui['id_auteur'] || $qui['statut'] === '0minirezo' && !$qui['restreint']);
+    $id = (int) $id;
+    return ($id == $qui['id_auteur'] || $qui['statut'] === '0minirezo' && !$qui['restreint']);
 }
 
 /**
@@ -1287,8 +1287,8 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_iconifier_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	// par defaut, on a le droit d'iconifier si on a le droit de modifier
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    // par defaut, on a le droit d'iconifier si on a le droit de modifier
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 
@@ -1308,7 +1308,7 @@ 
  * @return true
  **/
 function autoriser_ok_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1327,7 +1327,7 @@ 
  * @return false
  **/
 function autoriser_niet_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return false;
+    return false;
 }
 
 /**
@@ -1345,7 +1345,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_base_reparer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('detruire') && !_request('reinstall');
+    return autoriser('detruire') && !_request('reinstall');
 }
 
 /**
@@ -1363,7 +1363,7 @@ 
  * @return true
  **/
 function autoriser_infosperso_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1381,7 +1381,7 @@ 
  * @return true
  **/
 function autoriser_langage_configurer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1399,7 +1399,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurerlangage_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_langage', $id, $qui, $opt);
+    return autoriser('configurer', '_langage', $id, $qui, $opt);
 }
 
 /**
@@ -1417,7 +1417,7 @@ 
  * @return true
  **/
 function autoriser_preferences_configurer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1435,7 +1435,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurerpreferences_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_preferences', $id, $qui, $opt);
+    return autoriser('configurer', '_preferences', $id, $qui, $opt);
 }
 
 /**
@@ -1453,7 +1453,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_menudeveloppement_menugrandeentree_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return (isset($GLOBALS['visiteur_session']['prefs']['activer_menudev']) && $GLOBALS['visiteur_session']['prefs']['activer_menudev'] === 'oui');
+    return (isset($GLOBALS['visiteur_session']['prefs']['activer_menudev']) && $GLOBALS['visiteur_session']['prefs']['activer_menudev'] === 'oui');
 }
 
 /**
@@ -1472,7 +1472,7 @@ 
  * @return true
  **/
 function autoriser_menugrandeentree_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1490,7 +1490,7 @@ 
  * @return true
  **/
 function autoriser_auteurs_voir_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1508,7 +1508,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteurs_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('voir', '_auteurs', $id, $qui, $opt);
+    return autoriser('voir', '_auteurs', $id, $qui, $opt);
 }
 
 /**
@@ -1526,7 +1526,7 @@ 
  * @return true
  **/
 function autoriser_articles_voir_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1544,7 +1544,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_articles_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('voir', '_articles', $id, $qui, $opt);
+    return autoriser('voir', '_articles', $id, $qui, $opt);
 }
 
 /**
@@ -1562,7 +1562,7 @@ 
  * @return true
  **/
 function autoriser_rubriques_voir_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return true;
+    return true;
 }
 
 /**
@@ -1580,7 +1580,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_rubriques_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('voir', '_rubriques', $id, $qui, $opt);
+    return autoriser('voir', '_rubriques', $id, $qui, $opt);
 }
 
 /**
@@ -1598,7 +1598,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_articlecreer_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return verifier_table_non_vide();
+    return verifier_table_non_vide();
 }
 
 
@@ -1619,7 +1619,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_auteurcreer_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('creer', 'auteur', $id, $qui, $opt);
+    return autoriser('creer', 'auteur', $id, $qui, $opt);
 }
 
 /**
@@ -1637,11 +1637,11 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_visiteurs_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	include_spip('base/abstract_sql');
-	return
-		$qui['statut'] === '0minirezo'
-		&& !$qui['restreint']
-		&& ($GLOBALS['meta']['accepter_visiteurs'] != 'non' || sql_countsel('spip_auteurs', 'statut in ("6forum", "nouveau")') > 0);
+    include_spip('base/abstract_sql');
+    return
+        $qui['statut'] === '0minirezo'
+        && !$qui['restreint']
+        && ($GLOBALS['meta']['accepter_visiteurs'] != 'non' || sql_countsel('spip_auteurs', 'statut in ("6forum", "nouveau")') > 0);
 }
 
 /**
@@ -1659,7 +1659,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_suiviedito_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo';
+    return $qui['statut'] === '0minirezo';
 }
 
 /**
@@ -1677,7 +1677,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_synchro_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo';
+    return $qui['statut'] === '0minirezo';
 }
 
 /**
@@ -1695,7 +1695,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurerinteractions_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_interactions', $id, $qui, $opt);
+    return autoriser('configurer', '_interactions', $id, $qui, $opt);
 }
 
 /**
@@ -1713,7 +1713,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurerlangue_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_langue', $id, $qui, $opt);
+    return autoriser('configurer', '_langue', $id, $qui, $opt);
 }
 
 /**
@@ -1731,7 +1731,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurermultilinguisme_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_multilinguisme', $id, $qui, $opt);
+    return autoriser('configurer', '_multilinguisme', $id, $qui, $opt);
 }
 
 /**
@@ -1749,7 +1749,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configurercontenu_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_contenu', $id, $qui, $opt);
+    return autoriser('configurer', '_contenu', $id, $qui, $opt);
 }
 
 /**
@@ -1767,7 +1767,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_configureravancees_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_avancees', $id, $qui, $opt);
+    return autoriser('configurer', '_avancees', $id, $qui, $opt);
 }
 
 /**
@@ -1785,7 +1785,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_adminplugin_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('configurer', '_plugins', $id, $qui, $opt);
+    return autoriser('configurer', '_plugins', $id, $qui, $opt);
 }
 
 /**
@@ -1803,7 +1803,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_admintech_menu_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('detruire', $type, $id, $qui, $opt);
+    return autoriser('detruire', $type, $id, $qui, $opt);
 }
 
 /**
@@ -1821,7 +1821,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_queue_purger_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('webmestre');
+    return autoriser('webmestre');
 }
 
 
@@ -1841,11 +1841,11 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_echafauder_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	if (test_espace_prive()) {
-		return (bool) (int) $qui['id_auteur'];
-	} else {
-		return autoriser('webmestre', '', $id, $qui, $opt);
-	}
+    if (test_espace_prive()) {
+        return (bool) (int) $qui['id_auteur'];
+    } else {
+        return autoriser('webmestre', '', $id, $qui, $opt);
+    }
 }
 
 
@@ -1860,27 +1860,27 @@ 
  *     Identifiants d'auteurs
  */
 function auteurs_objet($objet, $id_objet, $cond = '') {
-	$objet = objet_type($objet);
-	$where = [
-		'objet=' . sql_quote($objet),
-		'id_objet=' . (int) $id_objet
-	];
-	if (!empty($cond)) {
-		if (is_array($cond)) {
-			$where = array_merge($where, $cond);
-		} else {
-			$where[] = $cond;
-		}
-	}
-	$auteurs = sql_allfetsel(
-		'id_auteur',
-		'spip_auteurs_liens',
-		$where
-	);
-	if (is_array($auteurs)) {
-		return array_column($auteurs, 'id_auteur');
-	}
-	return [];
+    $objet = objet_type($objet);
+    $where = [
+        'objet=' . sql_quote($objet),
+        'id_objet=' . (int) $id_objet
+    ];
+    if (!empty($cond)) {
+        if (is_array($cond)) {
+            $where = array_merge($where, $cond);
+        } else {
+            $where[] = $cond;
+        }
+    }
+    $auteurs = sql_allfetsel(
+        'id_auteur',
+        'spip_auteurs_liens',
+        $where
+    );
+    if (is_array($auteurs)) {
+        return array_column($auteurs, 'id_auteur');
+    }
+    return [];
 }
 
 /**
@@ -1893,7 +1893,7 @@ 
  */
 function acces_restreint_rubrique($id_rubrique) {
 
-	return (isset($GLOBALS['connect_id_rubrique'][$id_rubrique]));
+    return (isset($GLOBALS['connect_id_rubrique'][$id_rubrique]));
 }
 
 
@@ -1906,12 +1906,12 @@ 
  * @return bool             true si un parent existe
  */
 function verifier_table_non_vide($table = 'spip_rubriques') {
-	static $done = [];
-	if (!isset($done[$table])) {
-		$done[$table] = sql_countsel($table) > 0;
-	}
+    static $done = [];
+    if (!isset($done[$table])) {
+        $done[$table] = sql_countsel($table) > 0;
+    }
 
-	return $done[$table];
+    return $done[$table];
 }
 
 /**
@@ -1938,12 +1938,12 @@ 
  */
 function autoriser_inscrireauteur_dist($faire, $quoi, $id, $qui, $opt) {
 
-	$s = array_search($quoi, $GLOBALS['liste_des_statuts']);
-	return match ($s) {
-		'info_redacteurs' => $GLOBALS['meta']['accepter_inscriptions'] === 'oui',
-		'info_visiteurs' => $GLOBALS['meta']['accepter_visiteurs'] === 'oui' || $GLOBALS['meta']['forums_publics'] === 'abo',
-		default => false,
-	};
+    $s = array_search($quoi, $GLOBALS['liste_des_statuts']);
+    return match ($s) {
+        'info_redacteurs' => $GLOBALS['meta']['accepter_inscriptions'] === 'oui',
+        'info_visiteurs' => $GLOBALS['meta']['accepter_visiteurs'] === 'oui' || $GLOBALS['meta']['forums_publics'] === 'abo',
+        default => false,
+    };
 }
 
 /**
@@ -1961,7 +1961,7 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_inscription_relancer_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return $qui['statut'] === '0minirezo' && !$qui['restreint'];
+    return $qui['statut'] === '0minirezo' && !$qui['restreint'];
 }
 
 /**
@@ -1979,5 +1979,5 @@ 
  * @return bool true s'il a le droit, false sinon
  **/
 function autoriser_phpinfos_dist(string $faire, string $type, $id, array $qui, array $opt): bool {
-	return autoriser('webmestre');
+    return autoriser('webmestre');
 }

ecrire/inc/minipres.php

Indentation +30 added lines, -30 removed lines

@@ -17,7 +17,7 @@ 
  * @package SPIP\Core\Minipres
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -37,19 +37,19 @@ 
  */
 function install_debut_html($titre = 'AUTO', $onLoad = '', $all_inline = false) {
 
-	if ($onLoad) {
-		include_spip('inc/filtres');
-		$onLoad = extraire_attribut("<body $onLoad>", 'onload');
-	}
+    if ($onLoad) {
+        include_spip('inc/filtres');
+        $onLoad = extraire_attribut("<body $onLoad>", 'onload');
+    }
 
-	$options = [
-		'all_inline' => $all_inline,
-		'onload' => $onLoad,
-		'titre' => $titre,
-	];
+    $options = [
+        'all_inline' => $all_inline,
+        'onload' => $onLoad,
+        'titre' => $titre,
+    ];
 
-	$minipage = new Admin();
-	return $minipage->installDebutPage($options);
+    $minipage = new Admin();
+    return $minipage->installDebutPage($options);
 }
 
 /**
@@ -61,8 +61,8 @@ 
  * @return string Code HTML
  */
 function install_fin_html() {
-	$minipage = new Admin();
-	return $minipage->installFinPage();
+    $minipage = new Admin();
+    return $minipage->installFinPage();
 }
 
 
@@ -101,23 +101,23 @@ 
  */
 function minipres($titre = '', $corps = '', $options = []) {
 
-	// compat signature old
-	// minipres($titre='', $corps="", $onload='', $all_inline = false)
-	$args = func_get_args();
-	if (isset($args[2]) && is_string($args[2])) {
-		$options = ['onload' => $args[2]];
-	}
-	if (isset($args[3])) {
-		$options['all_inline'] = $args[3];
-	}
+    // compat signature old
+    // minipres($titre='', $corps="", $onload='', $all_inline = false)
+    $args = func_get_args();
+    if (isset($args[2]) && is_string($args[2])) {
+        $options = ['onload' => $args[2]];
+    }
+    if (isset($args[3])) {
+        $options['all_inline'] = $args[3];
+    }
 
-	$options = array_merge([
-		'onload' => '',
-		'all_inline' => false,
-	], $options);
+    $options = array_merge([
+        'onload' => '',
+        'all_inline' => false,
+    ], $options);
 
-	$options['titre'] = $titre;
+    $options['titre'] = $titre;
 
-	$minipage = new Admin();
-	return $minipage->page($corps, $options);
+    $minipage = new Admin();
+    return $minipage->page($corps, $options);
 }