spip / SPIP

ecrire/inc/documents.php

Indentation +209 added lines, -209 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -29,12 +29,12 @@ 
  * @return string
  */
 function set_spip_doc(?string $fichier): string {
-	if ($fichier && str_starts_with($fichier, (string) _DIR_IMG)) {
-		return substr($fichier, strlen((string) _DIR_IMG));
-	} else {
-		// ex: fichier distant
-		return $fichier ?? '';
-	}
+    if ($fichier && str_starts_with($fichier, (string) _DIR_IMG)) {
+        return substr($fichier, strlen((string) _DIR_IMG));
+    } else {
+        // ex: fichier distant
+        return $fichier ?? '';
+    }
 }
 
 /**
@@ -46,26 +46,26 @@ 
  * @return bool|string
  */
 function get_spip_doc(?string $fichier) {
-	if ($fichier === null) {
-		return false;
-	}
-
-	// fichier distant
-	if (tester_url_absolue($fichier)) {
-		return $fichier;
-	}
-
-	// gestion d'erreurs, fichier=''
-	if (!strlen($fichier)) {
-		return false;
-	}
-
-	if (!str_starts_with($fichier, (string) _DIR_IMG)) {
-		$fichier = _DIR_IMG . $fichier;
-	}
-
-	// fichier normal
-	return $fichier;
+    if ($fichier === null) {
+        return false;
+    }
+
+    // fichier distant
+    if (tester_url_absolue($fichier)) {
+        return $fichier;
+    }
+
+    // gestion d'erreurs, fichier=''
+    if (!strlen($fichier)) {
+        return false;
+    }
+
+    if (!str_starts_with($fichier, (string) _DIR_IMG)) {
+        $fichier = _DIR_IMG . $fichier;
+    }
+
+    // fichier normal
+    return $fichier;
 }
 
 /**
@@ -79,26 +79,26 @@ 
  * @return string
  */
 function creer_repertoire_documents($ext) {
-	$rep = sous_repertoire(_DIR_IMG, $ext);
-
-	if (!$ext || !$rep) {
-		spip_logger()->info("creer_repertoire_documents '$rep' interdit");
-		exit;
-	}
-
-	// Cette variable de configuration peut etre posee par un plugin
-	// par exemple acces_restreint
-	// sauf pour logo/ utilise pour stocker les logoon et logooff
-	if (
-		isset($GLOBALS['meta']['creer_htaccess'])
-		&& $GLOBALS['meta']['creer_htaccess'] == 'oui'
-		&& $ext !== 'logo'
-	) {
-		include_spip('inc/acces');
-		verifier_htaccess($rep);
-	}
-
-	return $rep;
+    $rep = sous_repertoire(_DIR_IMG, $ext);
+
+    if (!$ext || !$rep) {
+        spip_logger()->info("creer_repertoire_documents '$rep' interdit");
+        exit;
+    }
+
+    // Cette variable de configuration peut etre posee par un plugin
+    // par exemple acces_restreint
+    // sauf pour logo/ utilise pour stocker les logoon et logooff
+    if (
+        isset($GLOBALS['meta']['creer_htaccess'])
+        && $GLOBALS['meta']['creer_htaccess'] == 'oui'
+        && $ext !== 'logo'
+    ) {
+        include_spip('inc/acces');
+        verifier_htaccess($rep);
+    }
+
+    return $rep;
 }
 
 /**
@@ -107,19 +107,19 @@ 
  * @param string $nom
  */
 function effacer_repertoire_temporaire($nom) {
-	if ($d = opendir($nom)) {
-		while (($f = readdir($d)) !== false) {
-			if (is_file("$nom/$f")) {
-				spip_unlink("$nom/$f");
-			} else {
-				if ($f != '.' && $f != '..' && is_dir("$nom/$f")) {
-					effacer_repertoire_temporaire("$nom/$f");
-				}
-			}
-		}
-	}
-	closedir($d);
-	@rmdir($nom);
+    if ($d = opendir($nom)) {
+        while (($f = readdir($d)) !== false) {
+            if (is_file("$nom/$f")) {
+                spip_unlink("$nom/$f");
+            } else {
+                if ($f != '.' && $f != '..' && is_dir("$nom/$f")) {
+                    effacer_repertoire_temporaire("$nom/$f");
+                }
+            }
+        }
+    }
+    closedir($d);
+    @rmdir($nom);
 }
 
 //
@@ -136,44 +136,44 @@ 
  */
 function copier_document($ext, $orig, $source, $subdir = null) {
 
-	$orig = preg_replace(',\.\.+,', '.', $orig); // pas de .. dans le nom du doc
-	$dir = creer_repertoire_documents($subdir ?: $ext);
-
-	$dest = preg_replace('/<[^>]*>/', '', basename($orig));
-	$dest = preg_replace('/\.([^.]+)$/', '', $dest);
-	$dest = translitteration($dest);
-	$dest = preg_replace('/[^.=\w-]+/', '_', (string) $dest);
-
-	// ne pas accepter de noms de la forme -r90.jpg qui sont reserves
-	// pour les images transformees par rotation (action/documenter)
-	$dest = preg_replace(',-r(90|180|270)$,', '', $dest);
-
-	while (preg_match(',\.(\w+)$,', $dest, $m)) {
-		if (
-			!function_exists('verifier_upload_autorise')
-			|| !($r = verifier_upload_autorise($dest))
-			|| !empty($r['autozip'])
-		) {
-			$dest = substr($dest, 0, -strlen($m[0])) . '_' . $m[1];
-			break;
-		} else {
-			$dest = substr($dest, 0, -strlen($m[0]));
-			$ext = $m[1] . '.' . $ext;
-		}
-	}
-
-	// Si le document "source" est deja au bon endroit, ne rien faire
-	if ($source == ($dir . $dest . '.' . $ext)) {
-		return $source;
-	}
-
-	// sinon tourner jusqu'a trouver un numero correct
-	$n = 0;
-	while (@file_exists($newFile = $dir . $dest . ($n++ ? ('-' . $n) : '') . '.' . $ext)) {
-		;
-	}
-
-	return deplacer_fichier_upload($source, $newFile);
+    $orig = preg_replace(',\.\.+,', '.', $orig); // pas de .. dans le nom du doc
+    $dir = creer_repertoire_documents($subdir ?: $ext);
+
+    $dest = preg_replace('/<[^>]*>/', '', basename($orig));
+    $dest = preg_replace('/\.([^.]+)$/', '', $dest);
+    $dest = translitteration($dest);
+    $dest = preg_replace('/[^.=\w-]+/', '_', (string) $dest);
+
+    // ne pas accepter de noms de la forme -r90.jpg qui sont reserves
+    // pour les images transformees par rotation (action/documenter)
+    $dest = preg_replace(',-r(90|180|270)$,', '', $dest);
+
+    while (preg_match(',\.(\w+)$,', $dest, $m)) {
+        if (
+            !function_exists('verifier_upload_autorise')
+            || !($r = verifier_upload_autorise($dest))
+            || !empty($r['autozip'])
+        ) {
+            $dest = substr($dest, 0, -strlen($m[0])) . '_' . $m[1];
+            break;
+        } else {
+            $dest = substr($dest, 0, -strlen($m[0]));
+            $ext = $m[1] . '.' . $ext;
+        }
+    }
+
+    // Si le document "source" est deja au bon endroit, ne rien faire
+    if ($source == ($dir . $dest . '.' . $ext)) {
+        return $source;
+    }
+
+    // sinon tourner jusqu'a trouver un numero correct
+    $n = 0;
+    while (@file_exists($newFile = $dir . $dest . ($n++ ? ('-' . $n) : '') . '.' . $ext)) {
+        ;
+    }
+
+    return deplacer_fichier_upload($source, $newFile);
 }
 
 /**
@@ -188,28 +188,28 @@ 
  * @return bool|string
  */
 function determine_upload($type = '') {
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-
-	if (
-		!autoriser('chargerftp')
-		|| $type == 'logos'
-	) { # on ne le permet pas pour les logos
-	return false;
-	}
-
-	$repertoire = _DIR_TRANSFERT;
-	if (!@is_dir($repertoire)) {
-		$repertoire = str_replace(_DIR_TMP, '', (string) $repertoire);
-		$repertoire = sous_repertoire(_DIR_TMP, $repertoire);
-	}
-
-	if (!$GLOBALS['visiteur_session']['restreint']) {
-		return $repertoire;
-	} else {
-		return sous_repertoire($repertoire, $GLOBALS['visiteur_session']['login']);
-	}
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+
+    if (
+        !autoriser('chargerftp')
+        || $type == 'logos'
+    ) { # on ne le permet pas pour les logos
+    return false;
+    }
+
+    $repertoire = _DIR_TRANSFERT;
+    if (!@is_dir($repertoire)) {
+        $repertoire = str_replace(_DIR_TMP, '', (string) $repertoire);
+        $repertoire = sous_repertoire(_DIR_TMP, $repertoire);
+    }
+
+    if (!$GLOBALS['visiteur_session']['restreint']) {
+        return $repertoire;
+    } else {
+        return sous_repertoire($repertoire, $GLOBALS['visiteur_session']['login']);
+    }
 }
 
 /**
@@ -228,31 +228,31 @@ 
  * @return bool|mixed|string
  */
 function deplacer_fichier_upload($source, $dest, $move = false) {
-	// Securite
-	if (str_starts_with($dest, (string) _DIR_RACINE)) {
-		$dest = _DIR_RACINE . preg_replace(',\.\.+,', '.', substr($dest, strlen((string) _DIR_RACINE)));
-	} else {
-		$dest = preg_replace(',\.\.+,', '.', $dest);
-	}
-
-	$ok = $move ? @rename($source, $dest) : @copy($source, $dest);
-	if (!$ok) {
-		$ok = @move_uploaded_file($source, $dest);
-	}
-	if ($ok) {
-		@chmod($dest, _SPIP_CHMOD & ~0111);
-	} else {
-		$f = @fopen($dest, 'w');
-		if ($f) {
-			fclose($f);
-		} else {
-			include_spip('inc/flock');
-			raler_fichier($dest);
-		}
-		spip_unlink($dest);
-	}
-
-	return $ok ? $dest : false;
+    // Securite
+    if (str_starts_with($dest, (string) _DIR_RACINE)) {
+        $dest = _DIR_RACINE . preg_replace(',\.\.+,', '.', substr($dest, strlen((string) _DIR_RACINE)));
+    } else {
+        $dest = preg_replace(',\.\.+,', '.', $dest);
+    }
+
+    $ok = $move ? @rename($source, $dest) : @copy($source, $dest);
+    if (!$ok) {
+        $ok = @move_uploaded_file($source, $dest);
+    }
+    if ($ok) {
+        @chmod($dest, _SPIP_CHMOD & ~0111);
+    } else {
+        $f = @fopen($dest, 'w');
+        if ($f) {
+            fclose($f);
+        } else {
+            include_spip('inc/flock');
+            raler_fichier($dest);
+        }
+        spip_unlink($dest);
+    }
+
+    return $ok ? $dest : false;
 }
 
 
@@ -276,60 +276,60 @@ 
  */
 function check_upload_error($error, $msg = '', $return = false) {
 
-	if (!$error) {
-		return false;
-	}
-
-	spip_logger()->info("Erreur upload $error -- cf. http://php.net/manual/fr/features.file-upload.errors.php");
-
-	switch ($error) {
-		case 4: /* UPLOAD_ERR_NO_FILE */
-			return true;
-
-		# on peut affiner les differents messages d'erreur
-		case 1: /* UPLOAD_ERR_INI_SIZE */
-			$msg = _T(
-				'upload_limit',
-				['max' => ini_get('upload_max_filesize')]
-			);
-			break;
-		case 2: /* UPLOAD_ERR_FORM_SIZE */
-			$msg = _T(
-				'upload_limit',
-				['max' => ini_get('upload_max_filesize')]
-			);
-			break;
-		case 3: /* UPLOAD_ERR_PARTIAL  */
-			$msg = _T(
-				'upload_limit',
-				['max' => ini_get('upload_max_filesize')]
-			);
-			break;
-
-		default: /* autre */
-			if (!$msg) {
-				$msg = _T('pass_erreur') . ' ' . $error
-					. '<br />' . propre('[->http://php.net/manual/fr/features.file-upload.errors.php]');
-			}
-			break;
-	}
-
-	spip_logger()->info("erreur upload $error");
-	if ($return) {
-		return $msg;
-	}
-
-	if (_request('iframe') == 'iframe') {
-		echo "<div class='upload_answer upload_error'>$msg</div>";
-		exit;
-	}
-
-	include_spip('inc/minipres');
-	echo minipres(
-		$msg,
-		"<div style='text-align: " . $GLOBALS['spip_lang_right'] . "'><a href='" . rawurldecode((string) $GLOBALS['redirect']) . "'><button type='button'>" . _T('ecrire:bouton_suivant') . '</button></a></div>'
-	);
-	exit;
+    if (!$error) {
+        return false;
+    }
+
+    spip_logger()->info("Erreur upload $error -- cf. http://php.net/manual/fr/features.file-upload.errors.php");
+
+    switch ($error) {
+        case 4: /* UPLOAD_ERR_NO_FILE */
+            return true;
+
+        # on peut affiner les differents messages d'erreur
+        case 1: /* UPLOAD_ERR_INI_SIZE */
+            $msg = _T(
+                'upload_limit',
+                ['max' => ini_get('upload_max_filesize')]
+            );
+            break;
+        case 2: /* UPLOAD_ERR_FORM_SIZE */
+            $msg = _T(
+                'upload_limit',
+                ['max' => ini_get('upload_max_filesize')]
+            );
+            break;
+        case 3: /* UPLOAD_ERR_PARTIAL  */
+            $msg = _T(
+                'upload_limit',
+                ['max' => ini_get('upload_max_filesize')]
+            );
+            break;
+
+        default: /* autre */
+            if (!$msg) {
+                $msg = _T('pass_erreur') . ' ' . $error
+                    . '<br />' . propre('[->http://php.net/manual/fr/features.file-upload.errors.php]');
+            }
+            break;
+    }
+
+    spip_logger()->info("erreur upload $error");
+    if ($return) {
+        return $msg;
+    }
+
+    if (_request('iframe') == 'iframe') {
+        echo "<div class='upload_answer upload_error'>$msg</div>";
+        exit;
+    }
+
+    include_spip('inc/minipres');
+    echo minipres(
+        $msg,
+        "<div style='text-align: " . $GLOBALS['spip_lang_right'] . "'><a href='" . rawurldecode((string) $GLOBALS['redirect']) . "'><button type='button'>" . _T('ecrire:bouton_suivant') . '</button></a></div>'
+    );
+    exit;
 }
 
 /**
@@ -346,14 +346,14 @@ 
  * @return string
  */
 function corriger_extension($ext) {
-	$ext = preg_replace(',[^a-z0-9],i', '', $ext);
-
-	return match ($ext) {
-		'htm' => 'html',
-		'jpeg' => 'jpg',
-		'tiff' => 'tif',
-		'aif' => 'aiff',
-		'mpeg' => 'mpg',
-		default => $ext,
-	};
+    $ext = preg_replace(',[^a-z0-9],i', '', $ext);
+
+    return match ($ext) {
+        'htm' => 'html',
+        'jpeg' => 'jpg',
+        'tiff' => 'tif',
+        'aif' => 'aiff',
+        'mpeg' => 'mpg',
+        default => $ext,
+    };
 }

ecrire/inc/meta.php

Indentation +195 added lines, -195 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les parametres generaux du site sont dans une table SQL;
@@ -26,51 +26,51 @@ 
 define('_META_CACHE_TIME', 1 << 24);
 
 function inc_meta_dist($table = 'meta') {
-	$new = null;
-	// Lire les meta, en cache si present, valide et lisible
-	// en cas d'install ne pas faire confiance au meta_cache eventuel
-	$cache = cache_meta($table);
+    $new = null;
+    // Lire les meta, en cache si present, valide et lisible
+    // en cas d'install ne pas faire confiance au meta_cache eventuel
+    $cache = cache_meta($table);
 
-	if (
-		(!($exec = _request('exec')) || !autoriser_sans_cookie($exec))
-		 && ($new = jeune_fichier($cache, _META_CACHE_TIME))
-		 && lire_fichier_securise($cache, $meta)
-		 && ($meta = @unserialize($meta))
-	) {
-		$GLOBALS[$table] = $meta;
-	}
+    if (
+        (!($exec = _request('exec')) || !autoriser_sans_cookie($exec))
+         && ($new = jeune_fichier($cache, _META_CACHE_TIME))
+         && lire_fichier_securise($cache, $meta)
+         && ($meta = @unserialize($meta))
+    ) {
+        $GLOBALS[$table] = $meta;
+    }
 
-	if (
-		isset($GLOBALS[$table]['touch'])
-		&& $GLOBALS[$table]['touch'] < time() - _META_CACHE_TIME
-	) {
-		$GLOBALS[$table] = [];
-	}
-	// sinon lire en base
-	if (!$GLOBALS[$table]) {
-		$new = !lire_metas($table);
-	}
+    if (
+        isset($GLOBALS[$table]['touch'])
+        && $GLOBALS[$table]['touch'] < time() - _META_CACHE_TIME
+    ) {
+        $GLOBALS[$table] = [];
+    }
+    // sinon lire en base
+    if (!$GLOBALS[$table]) {
+        $new = !lire_metas($table);
+    }
 
-	// renouveller l'alea general si trop vieux ou sur demande explicite
-	if (
-		(test_espace_prive() || isset($_GET['renouvelle_alea']))
-		&& $GLOBALS[$table]
-		&& time() > _RENOUVELLE_ALEA + ($GLOBALS['meta']['alea_ephemere_date'] ?? 0)
-	) {
-		// si on n'a pas l'acces en ecriture sur le cache,
-		// ne pas renouveller l'alea sinon le cache devient faux
-		if (supprimer_fichier($cache)) {
-			include_spip('inc/acces');
-			renouvelle_alea();
-			$new = false;
-		} else {
-			spip_logger()->info("impossible d'ecrire dans " . $cache);
-		}
-	}
-	// et refaire le cache si on a du lire en base
-	if (!$new) {
-		touch_meta(false, $table);
-	}
+    // renouveller l'alea general si trop vieux ou sur demande explicite
+    if (
+        (test_espace_prive() || isset($_GET['renouvelle_alea']))
+        && $GLOBALS[$table]
+        && time() > _RENOUVELLE_ALEA + ($GLOBALS['meta']['alea_ephemere_date'] ?? 0)
+    ) {
+        // si on n'a pas l'acces en ecriture sur le cache,
+        // ne pas renouveller l'alea sinon le cache devient faux
+        if (supprimer_fichier($cache)) {
+            include_spip('inc/acces');
+            renouvelle_alea();
+            $new = false;
+        } else {
+            spip_logger()->info("impossible d'ecrire dans " . $cache);
+        }
+    }
+    // et refaire le cache si on a du lire en base
+    if (!$new) {
+        touch_meta(false, $table);
+    }
 }
 
 // fonctions aussi appelees a l'install ==> spip_query en premiere requete
@@ -78,39 +78,39 @@ 
 
 function lire_metas($table = 'meta') {
 
-	if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
-		include_spip('base/abstract_sql');
-		$GLOBALS[$table] = [];
-		while ($row = sql_fetch($result)) {
-			$GLOBALS[$table][$row['nom']] = $row['valeur'];
-		}
-		sql_free($result);
+    if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
+        include_spip('base/abstract_sql');
+        $GLOBALS[$table] = [];
+        while ($row = sql_fetch($result)) {
+            $GLOBALS[$table][$row['nom']] = $row['valeur'];
+        }
+        sql_free($result);
 
-		if (
-			!isset($GLOBALS[$table]['charset'])
-			|| !$GLOBALS[$table]['charset']
-			|| $GLOBALS[$table]['charset'] == '_DEFAULT_CHARSET' // hum, correction d'un bug ayant abime quelques install
-		) {
-			ecrire_meta('charset', _DEFAULT_CHARSET, null, $table);
-		}
+        if (
+            !isset($GLOBALS[$table]['charset'])
+            || !$GLOBALS[$table]['charset']
+            || $GLOBALS[$table]['charset'] == '_DEFAULT_CHARSET' // hum, correction d'un bug ayant abime quelques install
+        ) {
+            ecrire_meta('charset', _DEFAULT_CHARSET, null, $table);
+        }
 
-		// noter cette table de configuration dans les meta de SPIP
-		if ($table !== 'meta') {
-			$liste = [];
-			if (isset($GLOBALS['meta']['tables_config'])) {
-				$liste = unserialize($GLOBALS['meta']['tables_config']);
-			}
-			if (!$liste) {
-				$liste = [];
-			}
-			if (!in_array($table, $liste)) {
-				$liste[] = $table;
-				ecrire_meta('tables_config', serialize($liste));
-			}
-		}
-	}
+        // noter cette table de configuration dans les meta de SPIP
+        if ($table !== 'meta') {
+            $liste = [];
+            if (isset($GLOBALS['meta']['tables_config'])) {
+                $liste = unserialize($GLOBALS['meta']['tables_config']);
+            }
+            if (!$liste) {
+                $liste = [];
+            }
+            if (!in_array($table, $liste)) {
+                $liste[] = $table;
+                ecrire_meta('tables_config', serialize($liste));
+            }
+        }
+    }
 
-	return $GLOBALS[$table] ?? null;
+    return $GLOBALS[$table] ?? null;
 }
 
 
@@ -124,22 +124,22 @@ 
  *      Table SQL d'enregistrement des meta.
  **/
 function touch_meta($antidate = false, $table = 'meta') {
-	$file = cache_meta($table);
-	if (!$antidate || !@touch($file, $antidate)) {
-		$r = $GLOBALS[$table] ?? [];
-		if ($table == 'meta') {
-			unset($r['alea_ephemere']);
-			unset($r['alea_ephemere_ancien']);
-			// le secret du site est utilise pour encoder les contextes ajax que l'on considere fiables
-			// mais le sortir deu cache meta implique une requete sql des qu'on a un form dynamique
-			// meme si son squelette est en cache
-			//unset($r['secret_du_site']);
-			if ($antidate) {
-				$r['touch'] = $antidate;
-			}
-		}
-		ecrire_fichier_securise($file, serialize($r));
-	}
+    $file = cache_meta($table);
+    if (!$antidate || !@touch($file, $antidate)) {
+        $r = $GLOBALS[$table] ?? [];
+        if ($table == 'meta') {
+            unset($r['alea_ephemere']);
+            unset($r['alea_ephemere_ancien']);
+            // le secret du site est utilise pour encoder les contextes ajax que l'on considere fiables
+            // mais le sortir deu cache meta implique une requete sql des qu'on a un form dynamique
+            // meme si son squelette est en cache
+            //unset($r['secret_du_site']);
+            if ($antidate) {
+                $r['touch'] = $antidate;
+            }
+        }
+        ecrire_fichier_securise($file, serialize($r));
+    }
 }
 
 /**
@@ -155,21 +155,21 @@ 
  *     Table SQL d'enregistrement de la meta.
  **/
 function effacer_meta($nom, $table = 'meta') {
-	// section critique sur le cache:
-	// l'invalider avant et apres la MAJ de la BD
-	// c'est un peu moins bien qu'un vrai verrou mais ca suffira
-	// et utiliser une statique pour eviter des acces disques a repetition
-	static $touch = [];
-	$antidate = time() - (_META_CACHE_TIME << 4);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-	}
-	sql_delete('spip_' . $table, "nom='$nom'", '', 'continue');
-	unset($GLOBALS[$table][$nom]);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-		$touch[$table] = false;
-	}
+    // section critique sur le cache:
+    // l'invalider avant et apres la MAJ de la BD
+    // c'est un peu moins bien qu'un vrai verrou mais ca suffira
+    // et utiliser une statique pour eviter des acces disques a repetition
+    static $touch = [];
+    $antidate = time() - (_META_CACHE_TIME << 4);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+    }
+    sql_delete('spip_' . $table, "nom='$nom'", '', 'continue');
+    unset($GLOBALS[$table][$nom]);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+        $touch[$table] = false;
+    }
 }
 
 /**
@@ -191,54 +191,54 @@ 
  **/
 function ecrire_meta($nom, $valeur, $importable = null, $table = 'meta') {
 
-	static $touch = [];
-	if (!$nom) {
-		return;
-	}
-	include_spip('base/abstract_sql');
-	$res = sql_select('*', 'spip_' . $table, 'nom=' . sql_quote($nom), '', '', '', '', '', 'continue');
-	// table pas encore installee, travailler en php seulement
-	if (!$res) {
-		$GLOBALS[$table][$nom] = $valeur;
+    static $touch = [];
+    if (!$nom) {
+        return;
+    }
+    include_spip('base/abstract_sql');
+    $res = sql_select('*', 'spip_' . $table, 'nom=' . sql_quote($nom), '', '', '', '', '', 'continue');
+    // table pas encore installee, travailler en php seulement
+    if (!$res) {
+        $GLOBALS[$table][$nom] = $valeur;
 
-		return;
-	}
-	$row = sql_fetch($res);
-	sql_free($res);
+        return;
+    }
+    $row = sql_fetch($res);
+    sql_free($res);
 
-	// ne pas invalider le cache si affectation a l'identique
-	// (tant pis si impt aurait du changer)
-	if (
-		$row
-		&& $valeur == $row['valeur']
-		&& isset($GLOBALS[$table][$nom])
-		&& $GLOBALS[$table][$nom] == $valeur
-	) {
-		return;
-	}
+    // ne pas invalider le cache si affectation a l'identique
+    // (tant pis si impt aurait du changer)
+    if (
+        $row
+        && $valeur == $row['valeur']
+        && isset($GLOBALS[$table][$nom])
+        && $GLOBALS[$table][$nom] == $valeur
+    ) {
+        return;
+    }
 
-	$GLOBALS[$table][$nom] = $valeur;
-	// cf effacer pour comprendre le double touch
-	$antidate = time() - (_META_CACHE_TIME << 1);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-	}
-	$r = ['nom' => sql_quote($nom, '', 'text'), 'valeur' => sql_quote($valeur, '', 'text')];
-	// Gaffe aux tables sans impt (vieilles versions de SPIP notamment)
-	// ici on utilise pas sql_updateq et sql_insertq pour ne pas provoquer trop tot
-	// de lecture des descriptions des tables
-	if ($importable && isset($row['impt'])) {
-		$r['impt'] = sql_quote($importable, '', 'text');
-	}
-	if ($row) {
-		sql_update('spip_' . $table, $r, 'nom=' . sql_quote($nom));
-	} else {
-		sql_insert('spip_' . $table, '(' . implode(',', array_keys($r)) . ')', '(' . implode(',', array_values($r)) . ')');
-	}
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-		$touch[$table] = false;
-	}
+    $GLOBALS[$table][$nom] = $valeur;
+    // cf effacer pour comprendre le double touch
+    $antidate = time() - (_META_CACHE_TIME << 1);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+    }
+    $r = ['nom' => sql_quote($nom, '', 'text'), 'valeur' => sql_quote($valeur, '', 'text')];
+    // Gaffe aux tables sans impt (vieilles versions de SPIP notamment)
+    // ici on utilise pas sql_updateq et sql_insertq pour ne pas provoquer trop tot
+    // de lecture des descriptions des tables
+    if ($importable && isset($row['impt'])) {
+        $r['impt'] = sql_quote($importable, '', 'text');
+    }
+    if ($row) {
+        sql_update('spip_' . $table, $r, 'nom=' . sql_quote($nom));
+    } else {
+        sql_insert('spip_' . $table, '(' . implode(',', array_keys($r)) . ')', '(' . implode(',', array_values($r)) . ')');
+    }
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+        $touch[$table] = false;
+    }
 }
 
 /**
@@ -250,7 +250,7 @@ 
  *     Nom du fichier cache
  **/
 function cache_meta($table = 'meta') {
-	return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
+    return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
 }
 
 /**
@@ -259,14 +259,14 @@ 
  * @param string $table
  */
 function installer_table_meta($table) {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	if (!$trouver_table("spip_$table")) {
-		include_spip('base/auxiliaires');
-		include_spip('base/create');
-		creer_ou_upgrader_table("spip_$table", $GLOBALS['tables_auxiliaires']['spip_meta'], false, false);
-		$trouver_table('');
-	}
-	lire_metas($table);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    if (!$trouver_table("spip_$table")) {
+        include_spip('base/auxiliaires');
+        include_spip('base/create');
+        creer_ou_upgrader_table("spip_$table", $GLOBALS['tables_auxiliaires']['spip_meta'], false, false);
+        $trouver_table('');
+    }
+    lire_metas($table);
 }
 
 /**
@@ -278,44 +278,44 @@ 
  * @param bool $force
  */
 function supprimer_table_meta($table, $force = false) {
-	if ($table !== 'meta') {
-		// Vérifier le contenu restant de la table
-		$nb_variables = sql_countsel("spip_$table");
+    if ($table !== 'meta') {
+        // Vérifier le contenu restant de la table
+        $nb_variables = sql_countsel("spip_$table");
 
-		// Supprimer si :
-		// - la table est vide
-		// - ou limitée à la variable charset
-		// - ou qu'on force la suppression
-		if (
-			$force
-			|| !$nb_variables
-			|| $nb_variables == 1 && isset($GLOBALS[$table]['charset'])
-		) {
-			// Supprimer la table des globaleset de la base
-			unset($GLOBALS[$table]);
-			sql_drop_table("spip_$table");
-			// Supprimer le fichier cache
-			include_spip('inc/flock');
-			$cache = cache_meta($table);
-			supprimer_fichier($cache);
+        // Supprimer si :
+        // - la table est vide
+        // - ou limitée à la variable charset
+        // - ou qu'on force la suppression
+        if (
+            $force
+            || !$nb_variables
+            || $nb_variables == 1 && isset($GLOBALS[$table]['charset'])
+        ) {
+            // Supprimer la table des globaleset de la base
+            unset($GLOBALS[$table]);
+            sql_drop_table("spip_$table");
+            // Supprimer le fichier cache
+            include_spip('inc/flock');
+            $cache = cache_meta($table);
+            supprimer_fichier($cache);
 
-			// vider le cache des tables
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$trouver_table('');
+            // vider le cache des tables
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $trouver_table('');
 
-			// Supprimer la table de la liste des tables de configuration autres que spip_meta
-			if (isset($GLOBALS['meta']['tables_config'])) {
-				$liste = unserialize($GLOBALS['meta']['tables_config']);
-				$cle = array_search($table, $liste);
-				if ($cle !== false) {
-					unset($liste[$cle]);
-					if ($liste) {
-						ecrire_meta('tables_config', serialize($liste));
-					} else {
-						effacer_meta('tables_config');
-					}
-				}
-			}
-		}
-	}
+            // Supprimer la table de la liste des tables de configuration autres que spip_meta
+            if (isset($GLOBALS['meta']['tables_config'])) {
+                $liste = unserialize($GLOBALS['meta']['tables_config']);
+                $cle = array_search($table, $liste);
+                if ($cle !== false) {
+                    unset($liste[$cle]);
+                    if ($liste) {
+                        ecrire_meta('tables_config', serialize($liste));
+                    } else {
+                        effacer_meta('tables_config');
+                    }
+                }
+            }
+        }
+    }
 }

Spacing +6 added lines, -6 removed lines

@@ -64,7 +64,7 @@ 
 			renouvelle_alea();
 			$new = false;
 		} else {
-			spip_logger()->info("impossible d'ecrire dans " . $cache);
+			spip_logger()->info("impossible d'ecrire dans ".$cache);
 		}
 	}
 	// et refaire le cache si on a du lire en base
@@ -164,7 +164,7 @@ 
 	if (!isset($touch[$table])) {
 		touch_meta($antidate, $table);
 	}
-	sql_delete('spip_' . $table, "nom='$nom'", '', 'continue');
+	sql_delete('spip_'.$table, "nom='$nom'", '', 'continue');
 	unset($GLOBALS[$table][$nom]);
 	if (!isset($touch[$table])) {
 		touch_meta($antidate, $table);
@@ -196,7 +196,7 @@ 
 		return;
 	}
 	include_spip('base/abstract_sql');
-	$res = sql_select('*', 'spip_' . $table, 'nom=' . sql_quote($nom), '', '', '', '', '', 'continue');
+	$res = sql_select('*', 'spip_'.$table, 'nom='.sql_quote($nom), '', '', '', '', '', 'continue');
 	// table pas encore installee, travailler en php seulement
 	if (!$res) {
 		$GLOBALS[$table][$nom] = $valeur;
@@ -231,9 +231,9 @@ 
 		$r['impt'] = sql_quote($importable, '', 'text');
 	}
 	if ($row) {
-		sql_update('spip_' . $table, $r, 'nom=' . sql_quote($nom));
+		sql_update('spip_'.$table, $r, 'nom='.sql_quote($nom));
 	} else {
-		sql_insert('spip_' . $table, '(' . implode(',', array_keys($r)) . ')', '(' . implode(',', array_values($r)) . ')');
+		sql_insert('spip_'.$table, '('.implode(',', array_keys($r)).')', '('.implode(',', array_values($r)).')');
 	}
 	if (!isset($touch[$table])) {
 		touch_meta($antidate, $table);
@@ -250,7 +250,7 @@ 
  *     Nom du fichier cache
  **/
 function cache_meta($table = 'meta') {
-	return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
+	return ($table == 'meta') ? _FILE_META : (_DIR_CACHE.$table.'.php');
 }
 
 /**

ecrire/inc/filtres_images_lib_mini.php

Indentation +1286 added lines, -1286 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/filtres'); // par precaution
 include_spip('inc/filtres_images_mini'); // par precaution
@@ -37,21 +37,21 @@ 
  *     Le code de la couleur en hexadécimal.
  */
 function _couleur_dec_to_hex($red, $green, $blue) {
-	$red = dechex($red);
-	$green = dechex($green);
-	$blue = dechex($blue);
-
-	if (strlen($red) == 1) {
-		$red = '0' . $red;
-	}
-	if (strlen($green) == 1) {
-		$green = '0' . $green;
-	}
-	if (strlen($blue) == 1) {
-		$blue = '0' . $blue;
-	}
-
-	return "$red$green$blue";
+    $red = dechex($red);
+    $green = dechex($green);
+    $blue = dechex($blue);
+
+    if (strlen($red) == 1) {
+        $red = '0' . $red;
+    }
+    if (strlen($green) == 1) {
+        $green = '0' . $green;
+    }
+    if (strlen($blue) == 1) {
+        $blue = '0' . $blue;
+    }
+
+    return "$red$green$blue";
 }
 
 /**
@@ -63,18 +63,18 @@ 
  *     Un tableau des 3 éléments : rouge, vert, bleu.
  */
 function _couleur_hex_to_dec($couleur) {
-	$couleur ??= '';
-	$couleur = couleur_html_to_hex($couleur);
-	$couleur = ltrim($couleur, '#');
-	if (strlen($couleur) === 3) {
-		$couleur = $couleur[0] . $couleur[0] . $couleur[1] . $couleur[1] . $couleur[2] . $couleur[2];
-	}
-	$retour = [];
-	$retour['red'] = hexdec(substr($couleur, 0, 2));
-	$retour['green'] = hexdec(substr($couleur, 2, 2));
-	$retour['blue'] = hexdec(substr($couleur, 4, 2));
-
-	return $retour;
+    $couleur ??= '';
+    $couleur = couleur_html_to_hex($couleur);
+    $couleur = ltrim($couleur, '#');
+    if (strlen($couleur) === 3) {
+        $couleur = $couleur[0] . $couleur[0] . $couleur[1] . $couleur[1] . $couleur[2] . $couleur[2];
+    }
+    $retour = [];
+    $retour['red'] = hexdec(substr($couleur, 0, 2));
+    $retour['green'] = hexdec(substr($couleur, 2, 2));
+    $retour['blue'] = hexdec(substr($couleur, 4, 2));
+
+    return $retour;
 }
 
 
@@ -91,8 +91,8 @@ 
  *     Le code de la couleur en hexadécimal.
  */
 function _couleur_hsl_to_hex($hue, $saturation, $lightness) {
-	$rgb = _couleur_hsl_to_rgb($hue, $saturation, $lightness);
-	return _couleur_dec_to_hex($rgb['r'], $rgb['g'], $rgb['b']);
+    $rgb = _couleur_hsl_to_rgb($hue, $saturation, $lightness);
+    return _couleur_dec_to_hex($rgb['r'], $rgb['g'], $rgb['b']);
 }
 
 /**
@@ -104,8 +104,8 @@ 
  *     Un tableau des 3 éléments : teinte, saturation, luminosité.
  */
 function _couleur_hex_to_hsl($couleur) {
-	$rgb = _couleur_hex_to_dec($couleur);
-	return _couleur_rgb_to_hsl($rgb['red'], $rgb['green'], $rgb['blue']);
+    $rgb = _couleur_hex_to_dec($couleur);
+    return _couleur_rgb_to_hsl($rgb['red'], $rgb['green'], $rgb['blue']);
 }
 
 /**
@@ -120,55 +120,55 @@ 
  * @return array
  */
 function _couleur_rgb_to_hsl($R, $G, $B) {
-	$H = null;
-	$var_R = ($R / 255); // Where RGB values = 0 ÷ 255
-	$var_G = ($G / 255);
-	$var_B = ($B / 255);
-
-	$var_Min = min($var_R, $var_G, $var_B);   //Min. value of RGB
-	$var_Max = max($var_R, $var_G, $var_B);   //Max. value of RGB
-	$del_Max = $var_Max - $var_Min;           //Delta RGB value
-
-	$L = ($var_Max + $var_Min) / 2;
-
-	if ($del_Max == 0) {
-		//This is a gray, no chroma...
-		$H = 0; //HSL results = 0 ÷ 1
-		$S = 0;
-	} else {
-		// Chromatic data...
-		$S = $L < 0.5 ? $del_Max / ($var_Max + $var_Min) : $del_Max / (2 - $var_Max - $var_Min);
-
-		$del_R = ((($var_Max - $var_R) / 6) + ($del_Max / 2)) / $del_Max;
-		$del_G = ((($var_Max - $var_G) / 6) + ($del_Max / 2)) / $del_Max;
-		$del_B = ((($var_Max - $var_B) / 6) + ($del_Max / 2)) / $del_Max;
-
-		if ($var_R === $var_Max) {
-			$H = $del_B - $del_G;
-		} else {
-			if ($var_G === $var_Max) {
-				$H = (1 / 3) + $del_R - $del_B;
-			} else {
-				if ($var_B === $var_Max) {
-					$H = (2 / 3) + $del_G - $del_R;
-				}
-			}
-		}
-
-		if ($H < 0) {
-			$H += 1;
-		}
-		if ($H > 1) {
-			$H -= 1;
-		}
-	}
-
-	$ret = [];
-	$ret['h'] = $H;
-	$ret['s'] = $S;
-	$ret['l'] = $L;
-
-	return $ret;
+    $H = null;
+    $var_R = ($R / 255); // Where RGB values = 0 ÷ 255
+    $var_G = ($G / 255);
+    $var_B = ($B / 255);
+
+    $var_Min = min($var_R, $var_G, $var_B);   //Min. value of RGB
+    $var_Max = max($var_R, $var_G, $var_B);   //Max. value of RGB
+    $del_Max = $var_Max - $var_Min;           //Delta RGB value
+
+    $L = ($var_Max + $var_Min) / 2;
+
+    if ($del_Max == 0) {
+        //This is a gray, no chroma...
+        $H = 0; //HSL results = 0 ÷ 1
+        $S = 0;
+    } else {
+        // Chromatic data...
+        $S = $L < 0.5 ? $del_Max / ($var_Max + $var_Min) : $del_Max / (2 - $var_Max - $var_Min);
+
+        $del_R = ((($var_Max - $var_R) / 6) + ($del_Max / 2)) / $del_Max;
+        $del_G = ((($var_Max - $var_G) / 6) + ($del_Max / 2)) / $del_Max;
+        $del_B = ((($var_Max - $var_B) / 6) + ($del_Max / 2)) / $del_Max;
+
+        if ($var_R === $var_Max) {
+            $H = $del_B - $del_G;
+        } else {
+            if ($var_G === $var_Max) {
+                $H = (1 / 3) + $del_R - $del_B;
+            } else {
+                if ($var_B === $var_Max) {
+                    $H = (2 / 3) + $del_G - $del_R;
+                }
+            }
+        }
+
+        if ($H < 0) {
+            $H += 1;
+        }
+        if ($H > 1) {
+            $H -= 1;
+        }
+    }
+
+    $ret = [];
+    $ret['h'] = $H;
+    $ret['s'] = $S;
+    $ret['l'] = $L;
+
+    return $ret;
 }
 
 
@@ -184,48 +184,48 @@ 
  * @return array
  */
 function _couleur_hsl_to_rgb($H, $S, $L) {
-	// helper
-	$hue_2_rgb = function ($v1, $v2, $vH) {
-		if ($vH < 0) {
-			$vH += 1;
-		}
-		if ($vH > 1) {
-			$vH -= 1;
-		}
-		if ((6 * $vH) < 1) {
-			return ($v1 + ($v2 - $v1) * 6 * $vH);
-		}
-		if ((2 * $vH) < 1) {
-			return ($v2);
-		}
-		if ((3 * $vH) < 2) {
-			return ($v1 + ($v2 - $v1) * ((2 / 3) - $vH) * 6);
-		}
-
-		return ($v1);
-	};
-
-	if ($S == 0) {
-		// HSV values = 0 -> 1
-		$R = $L * 255;
-		$G = $L * 255;
-		$B = $L * 255;
-	} else {
-		$var_2 = $L < 0.5 ? $L * (1 + $S) : ($L + $S) - ($S * $L);
-
-		$var_1 = 2 * $L - $var_2;
-
-		$R = 255 * $hue_2_rgb($var_1, $var_2, $H + (1 / 3));
-		$G = 255 * $hue_2_rgb($var_1, $var_2, $H);
-		$B = 255 * $hue_2_rgb($var_1, $var_2, $H - (1 / 3));
-	}
-
-	$ret = [];
-	$ret['r'] = floor($R);
-	$ret['g'] = floor($G);
-	$ret['b'] = floor($B);
-
-	return $ret;
+    // helper
+    $hue_2_rgb = function ($v1, $v2, $vH) {
+        if ($vH < 0) {
+            $vH += 1;
+        }
+        if ($vH > 1) {
+            $vH -= 1;
+        }
+        if ((6 * $vH) < 1) {
+            return ($v1 + ($v2 - $v1) * 6 * $vH);
+        }
+        if ((2 * $vH) < 1) {
+            return ($v2);
+        }
+        if ((3 * $vH) < 2) {
+            return ($v1 + ($v2 - $v1) * ((2 / 3) - $vH) * 6);
+        }
+
+        return ($v1);
+    };
+
+    if ($S == 0) {
+        // HSV values = 0 -> 1
+        $R = $L * 255;
+        $G = $L * 255;
+        $B = $L * 255;
+    } else {
+        $var_2 = $L < 0.5 ? $L * (1 + $S) : ($L + $S) - ($S * $L);
+
+        $var_1 = 2 * $L - $var_2;
+
+        $R = 255 * $hue_2_rgb($var_1, $var_2, $H + (1 / 3));
+        $G = 255 * $hue_2_rgb($var_1, $var_2, $H);
+        $B = 255 * $hue_2_rgb($var_1, $var_2, $H - (1 / 3));
+    }
+
+    $ret = [];
+    $ret['r'] = floor($R);
+    $ret['g'] = floor($G);
+    $ret['b'] = floor($B);
+
+    return $ret;
 }
 
 /**
@@ -243,11 +243,11 @@ 
  *     true si il faut supprimer le fichier temporaire ; false sinon.
  */
 function statut_effacer_images_temporaires($stat) {
-	static $statut = false; // par defaut on grave toute les images
-	if ($stat === 'get') {
-		return $statut;
-	}
-	$statut = (bool) $stat;
+    static $statut = false; // par defaut on grave toute les images
+    if ($stat === 'get') {
+        return $statut;
+    }
+    $statut = (bool) $stat;
 }
 
 
@@ -300,250 +300,250 @@ 
  *     - array : tableau décrivant de l'image
  */
 function _image_valeurs_trans($img, $effet, $forcer_format = false, $fonction_creation = null, $find_in_path = false, $support_svg = false) {
-	$valeurs = [];
-	$ret = [];
-	$f = null;
-	static $images_recalcul = [];
-	if (strlen($img) == 0) {
-		return false;
-	}
-
-	$source = trim(extraire_attribut($img, 'src') ?? '');
-	if (strlen($source) < 1) {
-		if (!str_starts_with($img, '<img ')) {
-			$source = $img;
-			$img = "<img src='$source' />";
-		} else {
-			// pas d'attribut src sur cette balise <img../>
-			return false;
-		}
-	} elseif (
-		preg_match('@^data:image/([^;]*);base64,(.*)$@isS', $source, $regs)
-		&& ($extension = _image_trouver_extension_depuis_mime('image/' . $regs[1]))
-		&& in_array($extension, _image_extensions_acceptees_en_entree())
-	) {
-		# gerer img src="data:....base64"
-		$local = sous_repertoire(_DIR_VAR, 'image-data') . md5($regs[2]) . '.' . _image_extension_normalisee($extension);
-		if (!file_exists($local)) {
-			ecrire_fichier($local, base64_decode($regs[2]));
-		}
-		if ($sanitizer = charger_fonction($extension, 'sanitizer', true)) {
-			$sanitizer($local);
-		}
-		$source = $local;
-		$img = inserer_attribut($img, 'src', $source);
-		# eviter les mauvaises surprises lors de conversions de format
-		$img = inserer_attribut($img, 'width', '');
-		$img = inserer_attribut($img, 'height', '');
-	}
-
-	// les protocoles web prennent au moins 3 lettres
-	if (tester_url_absolue($source)) {
-		include_spip('inc/distant');
-		$fichier = _DIR_RACINE . copie_locale($source);
-		if (!$fichier) {
-			return '';
-		}
-		if (
-			($extension = _image_trouver_extension($fichier))
-			&& ($sanitizer = charger_fonction($extension, 'sanitizer', true))
-		) {
-			$sanitizer($fichier);
-		}
-	} else {
-		// enlever le timestamp eventuel
-		if (str_contains($source, '?')) {
-			$source = preg_replace(',[?]\d+$,', '', $source);
-		}
-		if (
-			str_contains($source, '?')
-			&& str_starts_with($source, (string) _DIR_IMG)
-			&& file_exists($f = preg_replace(',[?].*$,', '', $source))
-		) {
-			$source = $f;
-		}
-		$fichier = $source;
-	}
-
-	$terminaison_dest = '';
-	if ($terminaison = _image_trouver_extension($fichier)) {
-		$terminaison_dest = ($terminaison == 'gif') ? 'png' : $terminaison;
-	}
-
-	if (
-		$forcer_format !== false
-		&& ($terminaison_dest !== 'svg' || $support_svg || !in_array($forcer_format, _image_extensions_acceptees_en_sortie()))
-	) {
-		$terminaison_dest = $forcer_format;
-	}
-
-	if (!$terminaison_dest) {
-		return false;
-	}
-
-	$nom_fichier = substr($fichier, 0, strlen($fichier) - (strlen($terminaison) + 1));
-	$fichier_dest = $nom_fichier;
-	if (
-		$find_in_path && ($f = find_in_path($fichier)) && ($fichier = $f)
-		|| @file_exists($f = $fichier)
-	) {
-		// on ne passe jamais la balise img qui est peut-être en x2 et à laquelle on ne peut pas faire confiance
-		// on lit directement les infos du fichier
-		[$ret['hauteur'], $ret['largeur']] = taille_image($f);
-		$date_src = @filemtime($f);
-	} elseif (
-		@file_exists($f = "$fichier.src")
-		&& lire_fichier($f, $valeurs)
-		&& ($valeurs = unserialize($valeurs))
-		&& isset($valeurs['hauteur_dest'])
-		&& isset($valeurs['largeur_dest'])
-	) {
-		$ret['hauteur'] = $valeurs['hauteur_dest'];
-		$ret['largeur'] = $valeurs['largeur_dest'];
-		$date_src = $valeurs['date'];
-	} // pas de fichier source par la
-	else {
-		return false;
-	}
-
-	// pas de taille mesurable ?
-	if (
-		!$ret['hauteur']
-		|| !($ret['hauteur'] = (int) round($ret['hauteur']))
-		|| !$ret['largeur']
-		|| !($ret['largeur'] = (int) round($ret['largeur']))
-	) {
-		return false;
-	}
-
-	// les images calculees dependent du chemin du fichier source
-	// pour une meme image source et un meme filtre on aboutira a 2 fichiers selon si l'appel est dans le public ou dans le prive
-	// ce n'est pas totalement optimal en terme de stockage, mais chaque image est associee a un fichier .src
-	// qui contient la methode de reconstrucion (le filtre + les arguments d'appel) et les arguments different entre prive et public
-	// la mise en commun du fichier image cree donc un bug et des problemes qui necessiteraient beaucoup de complexite de code
-	// alors que ca concerne peu de site au final
-	// la release de r23632+r23633+r23634 a provoque peu de remontee de bug attestant du peu de sites impactes
-	$identifiant = $fichier;
-
-	// cas general :
-	// on a un dossier cache commun et un nom de fichier qui varie avec l'effet
-	// cas particulier de reduire :
-	// un cache par dimension, et le nom de fichier est conserve, suffixe par la dimension aussi
-	$cache = 'cache-gd2';
-	if (str_starts_with($effet, 'reduire')) {
-		[, $maxWidth, $maxHeight] = explode('-', $effet);
-		[$destWidth, $destHeight] = _image_ratio($ret['largeur'], $ret['hauteur'], $maxWidth, $maxHeight);
-		$ret['largeur_dest'] = $destWidth;
-		$ret['hauteur_dest'] = $destHeight;
-		$effet = "L{$destWidth}xH$destHeight";
-		$cache = 'cache-vignettes';
-		$fichier_dest = basename($fichier_dest);
-		if (($ret['largeur'] <= $maxWidth) && ($ret['hauteur'] <= $maxHeight)) {
-			// on garde la terminaison initiale car image simplement copiee
-			// et on postfixe son nom avec un md5 du path
-			$terminaison_dest = $terminaison;
-			$fichier_dest .= '-' . substr(md5("$identifiant"), 0, 5);
-		} else {
-			$fichier_dest .= '-' . substr(md5("$identifiant-$effet"), 0, 5);
-		}
-		$cache = sous_repertoire(_DIR_VAR, $cache);
-		$cache = sous_repertoire($cache, $effet);
-	} else {
-		$fichier_dest = md5("$identifiant-$effet");
-		$cache = sous_repertoire(_DIR_VAR, $cache);
-		$cache = sous_repertoire($cache, substr($fichier_dest, 0, 2));
-		$fichier_dest = substr($fichier_dest, 2);
-	}
-
-	$fichier_dest = $cache . $fichier_dest . '.' . $terminaison_dest;
-
-	$GLOBALS['images_calculees'][] = $fichier_dest;
-
-	$creer = true;
-	// si recalcul des images demande, recalculer chaque image une fois
-	if (defined('_VAR_IMAGES') && _VAR_IMAGES && !isset($images_recalcul[$fichier_dest])) {
-		$images_recalcul[$fichier_dest] = true;
-	} else {
-		if (@file_exists($f = $fichier_dest)) {
-			if (filemtime($f) >= $date_src) {
-				$creer = false;
-			}
-		} else {
-			if (
-				@file_exists($f = "$fichier_dest.src")
-				&& lire_fichier($f, $valeurs)
-				&& ($valeurs = unserialize($valeurs))
-				&& $valeurs['date'] >= $date_src
-			) {
-				$creer = false;
-			}
-		}
-	}
-	if ($creer && !@file_exists($fichier)) {
-		if (!@file_exists("$fichier.src")) {
-			spip_logger('images')->error("Image absente : $fichier");
-
-			return false;
-		}
-		# on reconstruit l'image source absente a partir de la chaine des .src
-		reconstruire_image_intermediaire($fichier);
-	}
-
-	if ($creer) {
-		spip_logger('images')->error(
-			'filtre image ' . ($fonction_creation ? reset($fonction_creation) : '') . "[$effet] sur $fichier",
-		);
-	}
-
-	$term_fonction = _image_trouver_extension_pertinente($fichier);
-	$ret['fonction_imagecreatefrom'] = '_imagecreatefrom' . $term_fonction;
-	$ret['fichier'] = $fichier;
-	$ret['fonction_image'] = '_image_image' . $terminaison_dest;
-	$ret['fichier_dest'] = $fichier_dest;
-	$ret['format_source'] = _image_extension_normalisee($terminaison);
-	$ret['format_dest'] = $terminaison_dest;
-	$ret['date_src'] = $date_src;
-	$ret['creer'] = $creer;
-	$ret['class'] = extraire_attribut($img, 'class');
-	$ret['alt'] = extraire_attribut($img, 'alt');
-	$ret['style'] = extraire_attribut($img, 'style');
-	$ret['tag'] = $img;
-	if ($fonction_creation) {
-		$ret['reconstruction'] = $fonction_creation;
-		# ecrire ici comment creer le fichier, car il est pas sur qu'on l'ecrira reelement
-		# cas de image_reduire qui finalement ne reduit pas l'image source
-		# ca evite d'essayer de le creer au prochain hit si il n'est pas la
-		#ecrire_fichier($ret['fichier_dest'].'.src',serialize($ret),true);
-	}
-
-	$ret = pipeline('image_preparer_filtre', [
-			'args' => [
-				'img' => $img,
-				'effet' => $effet,
-				'forcer_format' => $forcer_format,
-				'fonction_creation' => $fonction_creation,
-				'find_in_path' => $find_in_path,
-			],
-			'data' => $ret
-		]);
-
-	// une globale pour le debug en cas de crash memoire
-	$GLOBALS['derniere_image_calculee'] = $ret;
-
-	// traiter le cas particulier des SVG : si le filtre n'a pas annonce explicitement qu'il savait faire, on delegue
-	if ($term_fonction === 'svg') {
-		if ($creer && !$support_svg) {
-			process_image_svg_identite($ret);
-			$ret['creer'] = false;
-		}
-	}
-	else {
-		if (!function_exists($ret['fonction_imagecreatefrom'])) {
-			return false;
-		}
-	}
-
-	return $ret;
+    $valeurs = [];
+    $ret = [];
+    $f = null;
+    static $images_recalcul = [];
+    if (strlen($img) == 0) {
+        return false;
+    }
+
+    $source = trim(extraire_attribut($img, 'src') ?? '');
+    if (strlen($source) < 1) {
+        if (!str_starts_with($img, '<img ')) {
+            $source = $img;
+            $img = "<img src='$source' />";
+        } else {
+            // pas d'attribut src sur cette balise <img../>
+            return false;
+        }
+    } elseif (
+        preg_match('@^data:image/([^;]*);base64,(.*)$@isS', $source, $regs)
+        && ($extension = _image_trouver_extension_depuis_mime('image/' . $regs[1]))
+        && in_array($extension, _image_extensions_acceptees_en_entree())
+    ) {
+        # gerer img src="data:....base64"
+        $local = sous_repertoire(_DIR_VAR, 'image-data') . md5($regs[2]) . '.' . _image_extension_normalisee($extension);
+        if (!file_exists($local)) {
+            ecrire_fichier($local, base64_decode($regs[2]));
+        }
+        if ($sanitizer = charger_fonction($extension, 'sanitizer', true)) {
+            $sanitizer($local);
+        }
+        $source = $local;
+        $img = inserer_attribut($img, 'src', $source);
+        # eviter les mauvaises surprises lors de conversions de format
+        $img = inserer_attribut($img, 'width', '');
+        $img = inserer_attribut($img, 'height', '');
+    }
+
+    // les protocoles web prennent au moins 3 lettres
+    if (tester_url_absolue($source)) {
+        include_spip('inc/distant');
+        $fichier = _DIR_RACINE . copie_locale($source);
+        if (!$fichier) {
+            return '';
+        }
+        if (
+            ($extension = _image_trouver_extension($fichier))
+            && ($sanitizer = charger_fonction($extension, 'sanitizer', true))
+        ) {
+            $sanitizer($fichier);
+        }
+    } else {
+        // enlever le timestamp eventuel
+        if (str_contains($source, '?')) {
+            $source = preg_replace(',[?]\d+$,', '', $source);
+        }
+        if (
+            str_contains($source, '?')
+            && str_starts_with($source, (string) _DIR_IMG)
+            && file_exists($f = preg_replace(',[?].*$,', '', $source))
+        ) {
+            $source = $f;
+        }
+        $fichier = $source;
+    }
+
+    $terminaison_dest = '';
+    if ($terminaison = _image_trouver_extension($fichier)) {
+        $terminaison_dest = ($terminaison == 'gif') ? 'png' : $terminaison;
+    }
+
+    if (
+        $forcer_format !== false
+        && ($terminaison_dest !== 'svg' || $support_svg || !in_array($forcer_format, _image_extensions_acceptees_en_sortie()))
+    ) {
+        $terminaison_dest = $forcer_format;
+    }
+
+    if (!$terminaison_dest) {
+        return false;
+    }
+
+    $nom_fichier = substr($fichier, 0, strlen($fichier) - (strlen($terminaison) + 1));
+    $fichier_dest = $nom_fichier;
+    if (
+        $find_in_path && ($f = find_in_path($fichier)) && ($fichier = $f)
+        || @file_exists($f = $fichier)
+    ) {
+        // on ne passe jamais la balise img qui est peut-être en x2 et à laquelle on ne peut pas faire confiance
+        // on lit directement les infos du fichier
+        [$ret['hauteur'], $ret['largeur']] = taille_image($f);
+        $date_src = @filemtime($f);
+    } elseif (
+        @file_exists($f = "$fichier.src")
+        && lire_fichier($f, $valeurs)
+        && ($valeurs = unserialize($valeurs))
+        && isset($valeurs['hauteur_dest'])
+        && isset($valeurs['largeur_dest'])
+    ) {
+        $ret['hauteur'] = $valeurs['hauteur_dest'];
+        $ret['largeur'] = $valeurs['largeur_dest'];
+        $date_src = $valeurs['date'];
+    } // pas de fichier source par la
+    else {
+        return false;
+    }
+
+    // pas de taille mesurable ?
+    if (
+        !$ret['hauteur']
+        || !($ret['hauteur'] = (int) round($ret['hauteur']))
+        || !$ret['largeur']
+        || !($ret['largeur'] = (int) round($ret['largeur']))
+    ) {
+        return false;
+    }
+
+    // les images calculees dependent du chemin du fichier source
+    // pour une meme image source et un meme filtre on aboutira a 2 fichiers selon si l'appel est dans le public ou dans le prive
+    // ce n'est pas totalement optimal en terme de stockage, mais chaque image est associee a un fichier .src
+    // qui contient la methode de reconstrucion (le filtre + les arguments d'appel) et les arguments different entre prive et public
+    // la mise en commun du fichier image cree donc un bug et des problemes qui necessiteraient beaucoup de complexite de code
+    // alors que ca concerne peu de site au final
+    // la release de r23632+r23633+r23634 a provoque peu de remontee de bug attestant du peu de sites impactes
+    $identifiant = $fichier;
+
+    // cas general :
+    // on a un dossier cache commun et un nom de fichier qui varie avec l'effet
+    // cas particulier de reduire :
+    // un cache par dimension, et le nom de fichier est conserve, suffixe par la dimension aussi
+    $cache = 'cache-gd2';
+    if (str_starts_with($effet, 'reduire')) {
+        [, $maxWidth, $maxHeight] = explode('-', $effet);
+        [$destWidth, $destHeight] = _image_ratio($ret['largeur'], $ret['hauteur'], $maxWidth, $maxHeight);
+        $ret['largeur_dest'] = $destWidth;
+        $ret['hauteur_dest'] = $destHeight;
+        $effet = "L{$destWidth}xH$destHeight";
+        $cache = 'cache-vignettes';
+        $fichier_dest = basename($fichier_dest);
+        if (($ret['largeur'] <= $maxWidth) && ($ret['hauteur'] <= $maxHeight)) {
+            // on garde la terminaison initiale car image simplement copiee
+            // et on postfixe son nom avec un md5 du path
+            $terminaison_dest = $terminaison;
+            $fichier_dest .= '-' . substr(md5("$identifiant"), 0, 5);
+        } else {
+            $fichier_dest .= '-' . substr(md5("$identifiant-$effet"), 0, 5);
+        }
+        $cache = sous_repertoire(_DIR_VAR, $cache);
+        $cache = sous_repertoire($cache, $effet);
+    } else {
+        $fichier_dest = md5("$identifiant-$effet");
+        $cache = sous_repertoire(_DIR_VAR, $cache);
+        $cache = sous_repertoire($cache, substr($fichier_dest, 0, 2));
+        $fichier_dest = substr($fichier_dest, 2);
+    }
+
+    $fichier_dest = $cache . $fichier_dest . '.' . $terminaison_dest;
+
+    $GLOBALS['images_calculees'][] = $fichier_dest;
+
+    $creer = true;
+    // si recalcul des images demande, recalculer chaque image une fois
+    if (defined('_VAR_IMAGES') && _VAR_IMAGES && !isset($images_recalcul[$fichier_dest])) {
+        $images_recalcul[$fichier_dest] = true;
+    } else {
+        if (@file_exists($f = $fichier_dest)) {
+            if (filemtime($f) >= $date_src) {
+                $creer = false;
+            }
+        } else {
+            if (
+                @file_exists($f = "$fichier_dest.src")
+                && lire_fichier($f, $valeurs)
+                && ($valeurs = unserialize($valeurs))
+                && $valeurs['date'] >= $date_src
+            ) {
+                $creer = false;
+            }
+        }
+    }
+    if ($creer && !@file_exists($fichier)) {
+        if (!@file_exists("$fichier.src")) {
+            spip_logger('images')->error("Image absente : $fichier");
+
+            return false;
+        }
+        # on reconstruit l'image source absente a partir de la chaine des .src
+        reconstruire_image_intermediaire($fichier);
+    }
+
+    if ($creer) {
+        spip_logger('images')->error(
+            'filtre image ' . ($fonction_creation ? reset($fonction_creation) : '') . "[$effet] sur $fichier",
+        );
+    }
+
+    $term_fonction = _image_trouver_extension_pertinente($fichier);
+    $ret['fonction_imagecreatefrom'] = '_imagecreatefrom' . $term_fonction;
+    $ret['fichier'] = $fichier;
+    $ret['fonction_image'] = '_image_image' . $terminaison_dest;
+    $ret['fichier_dest'] = $fichier_dest;
+    $ret['format_source'] = _image_extension_normalisee($terminaison);
+    $ret['format_dest'] = $terminaison_dest;
+    $ret['date_src'] = $date_src;
+    $ret['creer'] = $creer;
+    $ret['class'] = extraire_attribut($img, 'class');
+    $ret['alt'] = extraire_attribut($img, 'alt');
+    $ret['style'] = extraire_attribut($img, 'style');
+    $ret['tag'] = $img;
+    if ($fonction_creation) {
+        $ret['reconstruction'] = $fonction_creation;
+        # ecrire ici comment creer le fichier, car il est pas sur qu'on l'ecrira reelement
+        # cas de image_reduire qui finalement ne reduit pas l'image source
+        # ca evite d'essayer de le creer au prochain hit si il n'est pas la
+        #ecrire_fichier($ret['fichier_dest'].'.src',serialize($ret),true);
+    }
+
+    $ret = pipeline('image_preparer_filtre', [
+            'args' => [
+                'img' => $img,
+                'effet' => $effet,
+                'forcer_format' => $forcer_format,
+                'fonction_creation' => $fonction_creation,
+                'find_in_path' => $find_in_path,
+            ],
+            'data' => $ret
+        ]);
+
+    // une globale pour le debug en cas de crash memoire
+    $GLOBALS['derniere_image_calculee'] = $ret;
+
+    // traiter le cas particulier des SVG : si le filtre n'a pas annonce explicitement qu'il savait faire, on delegue
+    if ($term_fonction === 'svg') {
+        if ($creer && !$support_svg) {
+            process_image_svg_identite($ret);
+            $ret['creer'] = false;
+        }
+    }
+    else {
+        if (!function_exists($ret['fonction_imagecreatefrom'])) {
+            return false;
+        }
+    }
+
+    return $ret;
 }
 
 
@@ -551,54 +551,54 @@ 
  * Extensions d’images acceptées en entrée
  */
 function _image_extensions_acceptees_en_entree(): array {
-	static $extensions = null;
-	if (empty($extensions)) {
-		$extensions = ['png', 'gif', 'jpg', 'jpeg'];
-		if (!empty($GLOBALS['meta']['gd_formats'])) {
-			// action=tester renseigne gd_formats et detecte le support de webp
-			$extensions = array_merge(explode(',', (string) $GLOBALS['meta']['gd_formats']));
-			$extensions = array_map('trim', $extensions);
-			$extensions = array_filter($extensions);
-			if (in_array('jpg', $extensions)) {
-				$extensions[] = 'jpeg';
-			}
-			$extensions = array_unique($extensions);
-		}
-		$extensions[] = 'svg'; // on le supporte toujours avec des fonctions specifiques
-	}
-
-	return $extensions;
+    static $extensions = null;
+    if (empty($extensions)) {
+        $extensions = ['png', 'gif', 'jpg', 'jpeg'];
+        if (!empty($GLOBALS['meta']['gd_formats'])) {
+            // action=tester renseigne gd_formats et detecte le support de webp
+            $extensions = array_merge(explode(',', (string) $GLOBALS['meta']['gd_formats']));
+            $extensions = array_map('trim', $extensions);
+            $extensions = array_filter($extensions);
+            if (in_array('jpg', $extensions)) {
+                $extensions[] = 'jpeg';
+            }
+            $extensions = array_unique($extensions);
+        }
+        $extensions[] = 'svg'; // on le supporte toujours avec des fonctions specifiques
+    }
+
+    return $extensions;
 }
 
 /**
  * Extensions d’images acceptées en sortie
  */
 function _image_extensions_acceptees_en_sortie(): array {
-	static $extensions = null;
-	if (empty($extensions)) {
-		$extensions = _image_extensions_acceptees_en_entree();
-		$extensions = array_diff($extensions, ['jpeg']);
-		if (in_array('gif', $extensions) && !function_exists('imagegif')) {
-			$extensions = array_diff($extensions, ['gif']);
-		}
-		if (in_array('webp', $extensions) && !function_exists('imagewebp')) {
-			$extensions = array_diff($extensions, ['webp']);
-		}
-	}
-
-	return $extensions;
+    static $extensions = null;
+    if (empty($extensions)) {
+        $extensions = _image_extensions_acceptees_en_entree();
+        $extensions = array_diff($extensions, ['jpeg']);
+        if (in_array('gif', $extensions) && !function_exists('imagegif')) {
+            $extensions = array_diff($extensions, ['gif']);
+        }
+        if (in_array('webp', $extensions) && !function_exists('imagewebp')) {
+            $extensions = array_diff($extensions, ['webp']);
+        }
+    }
+
+    return $extensions;
 }
 
 function _image_extension_normalisee($extension) {
-	$extension = strtolower((string) $extension);
-	if ($extension === 'jpeg') {
-		$extension = 'jpg';
-	}
-	return $extension;
+    $extension = strtolower((string) $extension);
+    if ($extension === 'jpeg') {
+        $extension = 'jpg';
+    }
+    return $extension;
 }
 
 function _image_extensions_conservent_transparence() {
-	return ['png', 'webp'];
+    return ['png', 'webp'];
 }
 
 
@@ -608,11 +608,11 @@ 
  * @return string
  */
 function _image_trouver_extension($path) {
-	$preg_extensions = implode('|', _image_extensions_acceptees_en_entree());
-	if (preg_match(",\.($preg_extensions)($|[?]),i", $path, $regs)) {
-		return strtolower($regs[1]);
-	}
-	return '';
+    $preg_extensions = implode('|', _image_extensions_acceptees_en_entree());
+    if (preg_match(",\.($preg_extensions)($|[?]),i", $path, $regs)) {
+        return strtolower($regs[1]);
+    }
+    return '';
 }
 
 /**
@@ -623,42 +623,42 @@ 
  * @return string Extension, dans le format attendu par les fonctions 'gd' ('jpeg' pour les .jpg par exemple)
  */
 function _image_trouver_extension_pertinente($path) {
-	$path = supprimer_timestamp($path);
-	$terminaison = _image_trouver_extension($path);
-	if ($terminaison == 'jpg') {
-		$terminaison = 'jpeg';
-	}
-
-	if (!file_exists($path)) {
-		return $terminaison;
-	}
-
-	if (!$info = @spip_getimagesize($path)) {
-		return $terminaison;
-	}
-
-	$mime = $info['mime'] ?? image_type_to_mime_type($info[2]);
-
-	$_terminaison = _image_trouver_extension_depuis_mime($mime);
-	if ($_terminaison && $_terminaison !== $terminaison) {
-		spip_logger('images')->notice("Mauvaise extension du fichier : $path . Son type mime est : $mime");
-		$terminaison = $_terminaison;
-	}
-	return $terminaison;
+    $path = supprimer_timestamp($path);
+    $terminaison = _image_trouver_extension($path);
+    if ($terminaison == 'jpg') {
+        $terminaison = 'jpeg';
+    }
+
+    if (!file_exists($path)) {
+        return $terminaison;
+    }
+
+    if (!$info = @spip_getimagesize($path)) {
+        return $terminaison;
+    }
+
+    $mime = $info['mime'] ?? image_type_to_mime_type($info[2]);
+
+    $_terminaison = _image_trouver_extension_depuis_mime($mime);
+    if ($_terminaison && $_terminaison !== $terminaison) {
+        spip_logger('images')->notice("Mauvaise extension du fichier : $path . Son type mime est : $mime");
+        $terminaison = $_terminaison;
+    }
+    return $terminaison;
 }
 
 /**
  * Retourne une extension d’image depuis un mime-type
  */
 function _image_trouver_extension_depuis_mime(string $mime): string {
-	return match (strtolower($mime)) {
-		'image/png', 'image/x-png' => 'png',
-		'image/jpg', 'image/jpeg', 'image/pjpeg' => 'jpeg',
-		'image/gif' => 'gif',
-		'image/webp', 'image/x-webp' => 'webp',
-		'image/svg+xml' => 'svg',
-		default => '',
-	};
+    return match (strtolower($mime)) {
+        'image/png', 'image/x-png' => 'png',
+        'image/jpg', 'image/jpeg', 'image/pjpeg' => 'jpeg',
+        'image/gif' => 'gif',
+        'image/webp', 'image/x-webp' => 'webp',
+        'image/svg+xml' => 'svg',
+        default => '',
+    };
 }
 
 
@@ -678,18 +678,18 @@ 
  *     Une ressource de type Image GD.
  */
 function _imagecreatefrom_func(string $func, string $filename) {
-	if (!function_exists($func)) {
-		spip_logger('images')->critical("GD indisponible : $func inexistante. Traitement $filename impossible.");
-		erreur_squelette("GD indisponible : $func inexistante. Traitement $filename impossible.");
-		return null;
-	}
-	$img = @$func($filename);
-	if (!$img) {
-		spip_logger('images')->critical("Erreur lecture $func $filename");
-		erreur_squelette("Erreur lecture $func $filename");
-		$img = imagecreate(10, 10);
-	}
-	return $img;
+    if (!function_exists($func)) {
+        spip_logger('images')->critical("GD indisponible : $func inexistante. Traitement $filename impossible.");
+        erreur_squelette("GD indisponible : $func inexistante. Traitement $filename impossible.");
+        return null;
+    }
+    $img = @$func($filename);
+    if (!$img) {
+        spip_logger('images')->critical("Erreur lecture $func $filename");
+        erreur_squelette("Erreur lecture $func $filename");
+        $img = imagecreate(10, 10);
+    }
+    return $img;
 }
 
 /**
@@ -705,7 +705,7 @@ 
  *     Une ressource de type Image GD.
  */
 function _imagecreatefromjpeg($filename) {
-	return _imagecreatefrom_func('imagecreatefromjpeg', $filename);
+    return _imagecreatefrom_func('imagecreatefromjpeg', $filename);
 }
 
 /**
@@ -721,7 +721,7 @@ 
  *     Une ressource de type Image GD.
  */
 function _imagecreatefrompng($filename) {
-	return _imagecreatefrom_func('imagecreatefrompng', $filename);
+    return _imagecreatefrom_func('imagecreatefrompng', $filename);
 }
 
 /**
@@ -737,7 +737,7 @@ 
  *     Une ressource de type Image GD.
  */
 function _imagecreatefromgif($filename) {
-	return _imagecreatefrom_func('imagecreatefromgif', $filename);
+    return _imagecreatefrom_func('imagecreatefromgif', $filename);
 }
 
 
@@ -754,7 +754,7 @@ 
  *     Une ressource de type Image GD.
  */
 function _imagecreatefromwebp($filename) {
-	return _imagecreatefrom_func('imagecreatefromwebp', $filename);
+    return _imagecreatefrom_func('imagecreatefromwebp', $filename);
 }
 
 /**
@@ -772,24 +772,24 @@ 
  *     - true si une image est bien retournée.
  */
 function _image_imagepng($img, $fichier) {
-	if (!function_exists('imagepng')) {
-		return false;
-	}
-	$tmp = $fichier . '.tmp';
-	$ret = imagepng($img, $tmp);
-	if (file_exists($tmp)) {
-		$taille_test = @getimagesize($tmp);
-		if (empty($taille_test[0])) {
-			return false;
-		}
-
-		spip_unlink($fichier); // le fichier peut deja exister
-		@rename($tmp, $fichier);
-
-		return $ret;
-	}
-
-	return false;
+    if (!function_exists('imagepng')) {
+        return false;
+    }
+    $tmp = $fichier . '.tmp';
+    $ret = imagepng($img, $tmp);
+    if (file_exists($tmp)) {
+        $taille_test = @getimagesize($tmp);
+        if (empty($taille_test[0])) {
+            return false;
+        }
+
+        spip_unlink($fichier); // le fichier peut deja exister
+        @rename($tmp, $fichier);
+
+        return $ret;
+    }
+
+    return false;
 }
 
 /**
@@ -807,24 +807,24 @@ 
  *     - true si une image est bien retournée.
  */
 function _image_imagegif($img, $fichier) {
-	if (!function_exists('imagegif')) {
-		return false;
-	}
-	$tmp = $fichier . '.tmp';
-	$ret = imagegif($img, $tmp);
-	if (file_exists($tmp)) {
-		$taille_test = @getimagesize($tmp);
-		if (empty($taille_test[0])) {
-			return false;
-		}
-
-		spip_unlink($fichier); // le fichier peut deja exister
-		@rename($tmp, $fichier);
-
-		return $ret;
-	}
-
-	return false;
+    if (!function_exists('imagegif')) {
+        return false;
+    }
+    $tmp = $fichier . '.tmp';
+    $ret = imagegif($img, $tmp);
+    if (file_exists($tmp)) {
+        $taille_test = @getimagesize($tmp);
+        if (empty($taille_test[0])) {
+            return false;
+        }
+
+        spip_unlink($fichier); // le fichier peut deja exister
+        @rename($tmp, $fichier);
+
+        return $ret;
+    }
+
+    return false;
 }
 
 /**
@@ -847,29 +847,29 @@ 
  *     - true si une image est bien retournée.
  */
 function _image_imagejpg($img, $fichier, $qualite = _IMG_GD_QUALITE) {
-	if (!function_exists('imagejpeg')) {
-		return false;
-	}
-	$tmp = $fichier . '.tmp';
+    if (!function_exists('imagejpeg')) {
+        return false;
+    }
+    $tmp = $fichier . '.tmp';
 
-	// Enable interlancing
-	imageinterlace($img, true);
+    // Enable interlancing
+    imageinterlace($img, true);
 
-	$ret = imagejpeg($img, $tmp, $qualite);
+    $ret = imagejpeg($img, $tmp, $qualite);
 
-	if (file_exists($tmp)) {
-		$taille_test = @getimagesize($tmp);
-		if (empty($taille_test[0])) {
-			return false;
-		}
+    if (file_exists($tmp)) {
+        $taille_test = @getimagesize($tmp);
+        if (empty($taille_test[0])) {
+            return false;
+        }
 
-		spip_unlink($fichier); // le fichier peut deja exister
-		@rename($tmp, $fichier);
+        spip_unlink($fichier); // le fichier peut deja exister
+        @rename($tmp, $fichier);
 
-		return $ret;
-	}
+        return $ret;
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -887,9 +887,9 @@ 
  *     true si le fichier a bien été créé ; false sinon.
  */
 function _image_imageico($img, $fichier) {
-	$gd_image_array = [$img];
+    $gd_image_array = [$img];
 
-	return ecrire_fichier($fichier, phpthumb_functions::GD2ICOstring($gd_image_array));
+    return ecrire_fichier($fichier, phpthumb_functions::GD2ICOstring($gd_image_array));
 }
 
 
@@ -908,24 +908,24 @@ 
  *     - true si une image est bien retournée.
  */
 function _image_imagewebp($img, $fichier, $qualite = _IMG_GD_QUALITE) {
-	if (!function_exists('imagewebp')) {
-		return false;
-	}
-	$tmp = $fichier . '.tmp';
-	$ret = imagewebp($img, $tmp, $qualite);
-	if (file_exists($tmp)) {
-		$taille_test = @getimagesize($tmp);
-		if (empty($taille_test[0])) {
-			return false;
-		}
-
-		spip_unlink($fichier); // le fichier peut deja exister
-		@rename($tmp, $fichier);
-
-		return $ret;
-	}
-
-	return false;
+    if (!function_exists('imagewebp')) {
+        return false;
+    }
+    $tmp = $fichier . '.tmp';
+    $ret = imagewebp($img, $tmp, $qualite);
+    if (file_exists($tmp)) {
+        $taille_test = @getimagesize($tmp);
+        if (empty($taille_test[0])) {
+            return false;
+        }
+
+        spip_unlink($fichier); // le fichier peut deja exister
+        @rename($tmp, $fichier);
+
+        return $ret;
+    }
+
+    return false;
 }
 
 /**
@@ -945,35 +945,35 @@ 
  */
 function _image_imagesvg($img, $fichier) {
 
-	$tmp = $fichier . '.tmp';
-	if (!str_contains($img, '<')) {
-		$img = supprimer_timestamp($img);
-		if (!file_exists($img)) {
-			return false;
-		}
-		@copy($img, $tmp);
-		if (filesize($tmp) === filesize($img)) {
-			spip_unlink($fichier); // le fichier peut deja exister
-			@rename($tmp, $fichier);
-			return true;
-		}
-		return false;
-	}
-
-	file_put_contents($tmp, $img);
-	if (file_exists($tmp)) {
-		$taille_test = spip_getimagesize($tmp);
-		if (empty($taille_test[0])) {
-			return false;
-		}
-
-		spip_unlink($fichier); // le fichier peut deja exister
-		@rename($tmp, $fichier);
-
-		return true;
-	}
-
-	return false;
+    $tmp = $fichier . '.tmp';
+    if (!str_contains($img, '<')) {
+        $img = supprimer_timestamp($img);
+        if (!file_exists($img)) {
+            return false;
+        }
+        @copy($img, $tmp);
+        if (filesize($tmp) === filesize($img)) {
+            spip_unlink($fichier); // le fichier peut deja exister
+            @rename($tmp, $fichier);
+            return true;
+        }
+        return false;
+    }
+
+    file_put_contents($tmp, $img);
+    if (file_exists($tmp)) {
+        $taille_test = spip_getimagesize($tmp);
+        if (empty($taille_test[0])) {
+            return false;
+        }
+
+        spip_unlink($fichier); // le fichier peut deja exister
+        @rename($tmp, $fichier);
+
+        return true;
+    }
+
+    return false;
 }
 
 
@@ -1001,30 +1001,30 @@ 
  *     - false sinon.
  */
 function _image_gd_output($img, $valeurs, $qualite = _IMG_GD_QUALITE, $fonction = null) {
-	if (is_null($fonction)) {
-		$fonction = '_image_image' . $valeurs['format_dest'];
-	}
-	$ret = false;
-	#un flag pour reperer les images gravees
-	$lock = (
-		!statut_effacer_images_temporaires('get')
-		|| @file_exists($valeurs['fichier_dest'])
-		&& !@file_exists($valeurs['fichier_dest'] . '.src')
-	);
-	if (
-		function_exists($fonction)
-		&& ($ret = $fonction($img, $valeurs['fichier_dest'], $qualite)) # on a reussi a creer l'image
-		&& isset($valeurs['reconstruction']) # et on sait comment la resonctruire le cas echeant
-		&& !$lock && @file_exists($valeurs['fichier_dest'])
-	) {
-		// dans tous les cas mettre a jour la taille de l'image finale
-		[$valeurs['hauteur_dest'], $valeurs['largeur_dest']] = taille_image($valeurs['fichier_dest']);
-		$valeurs['date'] = @filemtime($valeurs['fichier_dest']);
-		// pour la retrouver apres disparition
-		ecrire_fichier($valeurs['fichier_dest'] . '.src', serialize($valeurs), true);
-	}
-
-	return $ret;
+    if (is_null($fonction)) {
+        $fonction = '_image_image' . $valeurs['format_dest'];
+    }
+    $ret = false;
+    #un flag pour reperer les images gravees
+    $lock = (
+        !statut_effacer_images_temporaires('get')
+        || @file_exists($valeurs['fichier_dest'])
+        && !@file_exists($valeurs['fichier_dest'] . '.src')
+    );
+    if (
+        function_exists($fonction)
+        && ($ret = $fonction($img, $valeurs['fichier_dest'], $qualite)) # on a reussi a creer l'image
+        && isset($valeurs['reconstruction']) # et on sait comment la resonctruire le cas echeant
+        && !$lock && @file_exists($valeurs['fichier_dest'])
+    ) {
+        // dans tous les cas mettre a jour la taille de l'image finale
+        [$valeurs['hauteur_dest'], $valeurs['largeur_dest']] = taille_image($valeurs['fichier_dest']);
+        $valeurs['date'] = @filemtime($valeurs['fichier_dest']);
+        // pour la retrouver apres disparition
+        ecrire_fichier($valeurs['fichier_dest'] . '.src', serialize($valeurs), true);
+    }
+
+    return $ret;
 }
 
 /**
@@ -1037,28 +1037,28 @@ 
  *     Chemin vers le fichier manquant
  **/
 function reconstruire_image_intermediaire($fichier_manquant) {
-	$source = null;
-	$reconstruire = [];
-	$fichier = $fichier_manquant;
-	while (
-		!str_contains((string) $fichier, '://')
-		&& !@file_exists($fichier)
-		&& lire_fichier($src = "$fichier.src", $source)
-		&& ($valeurs = unserialize($source))
-		&& ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
-	) {
-		spip_unlink($src); // si jamais on a un timeout pendant la reconstruction, elle se fera naturellement au hit suivant
-		$reconstruire[] = $valeurs['reconstruction'];
-	}
-	while (count($reconstruire)) {
-		$r = array_pop($reconstruire);
-		$fonction = $r[0];
-		$args = $r[1];
-		$fonction(...$args);
-	}
-	// cette image intermediaire est commune a plusieurs series de filtre, il faut la conserver
-	// mais l'on peut nettoyer les miettes de sa creation
-	ramasse_miettes($fichier_manquant);
+    $source = null;
+    $reconstruire = [];
+    $fichier = $fichier_manquant;
+    while (
+        !str_contains((string) $fichier, '://')
+        && !@file_exists($fichier)
+        && lire_fichier($src = "$fichier.src", $source)
+        && ($valeurs = unserialize($source))
+        && ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
+    ) {
+        spip_unlink($src); // si jamais on a un timeout pendant la reconstruction, elle se fera naturellement au hit suivant
+        $reconstruire[] = $valeurs['reconstruction'];
+    }
+    while (count($reconstruire)) {
+        $r = array_pop($reconstruire);
+        $fonction = $r[0];
+        $args = $r[1];
+        $fonction(...$args);
+    }
+    // cette image intermediaire est commune a plusieurs series de filtre, il faut la conserver
+    // mais l'on peut nettoyer les miettes de sa creation
+    ramasse_miettes($fichier_manquant);
 }
 
 /**
@@ -1078,26 +1078,26 @@ 
  *     Chemin du fichier d'image calculé
  **/
 function ramasse_miettes($fichier) {
-	$source = null;
-	if (
-		str_contains($fichier, '://')
-		|| !lire_fichier($src = "$fichier.src", $source)
-		|| !$valeurs = unserialize($source)
-	) {
-		return;
-	}
-	spip_unlink($src); # on supprime la reference a sa source pour marquer cette image comme non intermediaire
-	while (
-		($fichier = $valeurs['fichier'])
-		&& str_starts_with((string) $fichier, (string) _DIR_VAR)
-		&& lire_fichier($src = "$fichier.src", $source)
-		&& ($valeurs = unserialize($source))  # et valide
-	) {
-		# on efface le fichier
-		spip_unlink($fichier);
-		# mais laisse le .src qui permet de savoir comment reconstruire l'image si besoin
-		#spip_unlink($src);
-	}
+    $source = null;
+    if (
+        str_contains($fichier, '://')
+        || !lire_fichier($src = "$fichier.src", $source)
+        || !$valeurs = unserialize($source)
+    ) {
+        return;
+    }
+    spip_unlink($src); # on supprime la reference a sa source pour marquer cette image comme non intermediaire
+    while (
+        ($fichier = $valeurs['fichier'])
+        && str_starts_with((string) $fichier, (string) _DIR_VAR)
+        && lire_fichier($src = "$fichier.src", $source)
+        && ($valeurs = unserialize($source))  # et valide
+    ) {
+        # on efface le fichier
+        spip_unlink($fichier);
+        # mais laisse le .src qui permet de savoir comment reconstruire l'image si besoin
+        #spip_unlink($src);
+    }
 }
 
 
@@ -1122,33 +1122,33 @@ 
  *     Code HTML de l'image
  **/
 function image_graver($img) {
-	// appeler le filtre post_image_filtrer qui permet de faire
-	// des traitements auto a la fin d'une serie de filtres
-	$img = pipeline('post_image_filtrer', $img);
-
-	$fichier_ori = $fichier = (extraire_attribut($img, 'src') ?? '');
-	if (($p = strpos($fichier, '?')) !== false) {
-		$fichier = substr($fichier, 0, $p);
-	}
-	if (strlen($fichier) < 1 && !str_starts_with((string) $img, '<img ')) {
-		$fichier = $img;
-	}
-	if (strlen((string) $fichier)) {
-		# si jamais le fichier final n'a pas ete calcule car suppose temporaire
-		# et qu'il ne s'agit pas d'une URL
-		if (!str_contains((string) $fichier, '://') && !@file_exists($fichier)) {
-			reconstruire_image_intermediaire($fichier);
-		}
-		ramasse_miettes($fichier);
-
-		// ajouter le timestamp si besoin
-		if (!str_contains($fichier_ori, '?')) {
-			// on utilise str_replace pour attraper le onmouseover des logo si besoin
-			$img = str_replace($fichier_ori, timestamp($fichier_ori), (string) $img);
-		}
-	}
-
-	return $img;
+    // appeler le filtre post_image_filtrer qui permet de faire
+    // des traitements auto a la fin d'une serie de filtres
+    $img = pipeline('post_image_filtrer', $img);
+
+    $fichier_ori = $fichier = (extraire_attribut($img, 'src') ?? '');
+    if (($p = strpos($fichier, '?')) !== false) {
+        $fichier = substr($fichier, 0, $p);
+    }
+    if (strlen($fichier) < 1 && !str_starts_with((string) $img, '<img ')) {
+        $fichier = $img;
+    }
+    if (strlen((string) $fichier)) {
+        # si jamais le fichier final n'a pas ete calcule car suppose temporaire
+        # et qu'il ne s'agit pas d'une URL
+        if (!str_contains((string) $fichier, '://') && !@file_exists($fichier)) {
+            reconstruire_image_intermediaire($fichier);
+        }
+        ramasse_miettes($fichier);
+
+        // ajouter le timestamp si besoin
+        if (!str_contains($fichier_ori, '?')) {
+            // on utilise str_replace pour attraper le onmouseover des logo si besoin
+            $img = str_replace($fichier_ori, timestamp($fichier_ori), (string) $img);
+        }
+    }
+
+    return $img;
 }
 
 /**
@@ -1175,32 +1175,32 @@ 
  *     Code html modifié de la balise.
  **/
 function _image_tag_changer_taille($tag, $width, $height, $style = false) {
-	if ($style === false) {
-		$style = extraire_attribut($tag, 'style');
-	}
-
-	// enlever le width et height du style
-	if ($style) {
-		$style = preg_replace(',(^|;)\s*(width|height)\s*:\s*[^;]+,ims', '', $style);
-	}
-	if ($style && $style[0] === ';') {
-		$style = substr($style, 1);
-	}
-
-	// mettre des attributs de width et height sur les images,
-	// ca accelere le rendu du navigateur
-	// ca permet aux navigateurs de reserver la bonne taille
-	// quand on a desactive l'affichage des images.
-	$tag = inserer_attribut($tag, 'width', round($width));
-	$tag = inserer_attribut($tag, 'height', round($height));
-
-	// attributs deprecies. Transformer en CSS
-	if ($espace = extraire_attribut($tag, 'hspace')) {
-		$style = "margin:{$espace}px;" . $style;
-		$tag = inserer_attribut($tag, 'hspace', '');
-	}
-
-	return inserer_attribut($tag, 'style', (string) $style, true, !(bool) $style);
+    if ($style === false) {
+        $style = extraire_attribut($tag, 'style');
+    }
+
+    // enlever le width et height du style
+    if ($style) {
+        $style = preg_replace(',(^|;)\s*(width|height)\s*:\s*[^;]+,ims', '', $style);
+    }
+    if ($style && $style[0] === ';') {
+        $style = substr($style, 1);
+    }
+
+    // mettre des attributs de width et height sur les images,
+    // ca accelere le rendu du navigateur
+    // ca permet aux navigateurs de reserver la bonne taille
+    // quand on a desactive l'affichage des images.
+    $tag = inserer_attribut($tag, 'width', round($width));
+    $tag = inserer_attribut($tag, 'height', round($height));
+
+    // attributs deprecies. Transformer en CSS
+    if ($espace = extraire_attribut($tag, 'hspace')) {
+        $style = "margin:{$espace}px;" . $style;
+        $tag = inserer_attribut($tag, 'hspace', '');
+    }
+
+    return inserer_attribut($tag, 'style', (string) $style, true, !(bool) $style);
 }
 
 
@@ -1226,70 +1226,70 @@ 
  *     Retourne le code HTML de l'image
  **/
 function _image_ecrire_tag($valeurs, $surcharge = []) {
-	$valeurs = pipeline('image_ecrire_tag_preparer', $valeurs);
-
-	// fermer les tags img pas bien fermes;
-	$tag = str_replace('>', '/>', str_replace('/>', '>', (string) $valeurs['tag']));
-
-	// le style
-	$style = $valeurs['style'];
-	if (isset($surcharge['style'])) {
-		$style = $surcharge['style'];
-		unset($surcharge['style']);
-	}
-
-	// traiter specifiquement la largeur et la hauteur
-	$width = $valeurs['largeur'];
-	if (isset($surcharge['width'])) {
-		$width = $surcharge['width'];
-		unset($surcharge['width']);
-	}
-	$height = $valeurs['hauteur'];
-	if (isset($surcharge['height'])) {
-		$height = $surcharge['height'];
-		unset($surcharge['height']);
-	}
-
-	$tag = _image_tag_changer_taille($tag, $width, $height, $style);
-	// traiter specifiquement le src qui peut etre repris dans un onmouseout
-	// on remplace toute les ref a src dans le tag
-	$src = extraire_attribut($tag, 'src');
-	if (isset($surcharge['src'])) {
-		$tag = str_replace($src, $surcharge['src'], $tag);
-		// si il y a des & dans src, alors ils peuvent provenir d'un &amp
-		// pas garanti comme methode, mais mieux que rien
-		if (str_contains($src, '&')) {
-			$tag = str_replace(str_replace('&', '&amp;', $src), $surcharge['src'], $tag);
-		}
-		$src = $surcharge['src'];
-		unset($surcharge['src']);
-	}
-
-	$class = $valeurs['class'];
-	if (isset($surcharge['class'])) {
-		$class = $surcharge['class'];
-		unset($surcharge['class']);
-	}
-	if (is_scalar($class) && strlen($class)) {
-		$tag = inserer_attribut($tag, 'class', $class);
-	}
-
-	if ($surcharge !== []) {
-		foreach ($surcharge as $attribut => $valeur) {
-			$tag = inserer_attribut($tag, $attribut, $valeur);
-		}
-	}
-
-	return pipeline(
-		'image_ecrire_tag_finir',
-		[
-			'args' => [
-				'valeurs' => $valeurs,
-				'surcharge' => $surcharge,
-			],
-			'data' => $tag
-		]
-	);
+    $valeurs = pipeline('image_ecrire_tag_preparer', $valeurs);
+
+    // fermer les tags img pas bien fermes;
+    $tag = str_replace('>', '/>', str_replace('/>', '>', (string) $valeurs['tag']));
+
+    // le style
+    $style = $valeurs['style'];
+    if (isset($surcharge['style'])) {
+        $style = $surcharge['style'];
+        unset($surcharge['style']);
+    }
+
+    // traiter specifiquement la largeur et la hauteur
+    $width = $valeurs['largeur'];
+    if (isset($surcharge['width'])) {
+        $width = $surcharge['width'];
+        unset($surcharge['width']);
+    }
+    $height = $valeurs['hauteur'];
+    if (isset($surcharge['height'])) {
+        $height = $surcharge['height'];
+        unset($surcharge['height']);
+    }
+
+    $tag = _image_tag_changer_taille($tag, $width, $height, $style);
+    // traiter specifiquement le src qui peut etre repris dans un onmouseout
+    // on remplace toute les ref a src dans le tag
+    $src = extraire_attribut($tag, 'src');
+    if (isset($surcharge['src'])) {
+        $tag = str_replace($src, $surcharge['src'], $tag);
+        // si il y a des & dans src, alors ils peuvent provenir d'un &amp
+        // pas garanti comme methode, mais mieux que rien
+        if (str_contains($src, '&')) {
+            $tag = str_replace(str_replace('&', '&amp;', $src), $surcharge['src'], $tag);
+        }
+        $src = $surcharge['src'];
+        unset($surcharge['src']);
+    }
+
+    $class = $valeurs['class'];
+    if (isset($surcharge['class'])) {
+        $class = $surcharge['class'];
+        unset($surcharge['class']);
+    }
+    if (is_scalar($class) && strlen($class)) {
+        $tag = inserer_attribut($tag, 'class', $class);
+    }
+
+    if ($surcharge !== []) {
+        foreach ($surcharge as $attribut => $valeur) {
+            $tag = inserer_attribut($tag, $attribut, $valeur);
+        }
+    }
+
+    return pipeline(
+        'image_ecrire_tag_finir',
+        [
+            'args' => [
+                'valeurs' => $valeurs,
+                'surcharge' => $surcharge,
+            ],
+            'data' => $tag
+        ]
+    );
 }
 
 /**
@@ -1312,268 +1312,268 @@ 
  *     Description de l'image, sinon null.
  **/
 function _image_creer_vignette($valeurs, $maxWidth, $maxHeight, $process = 'AUTO', $force = false) {
-	$srcHeight = null;
-	$retour = [];
-	// ordre de preference des formats graphiques pour creer les vignettes
-	// le premier format disponible, selon la methode demandee, est utilise
-	$image = $valeurs['fichier'];
-	$format = $valeurs['format_source'];
-	$destdir = dirname((string) $valeurs['fichier_dest']);
-	$destfile = basename((string) $valeurs['fichier_dest'], '.' . $valeurs['format_dest']);
-
-	$format_sortie = $valeurs['format_dest'];
-
-	if ($process == 'AUTO' && isset($GLOBALS['meta']['image_process'])) {
-		$process = $GLOBALS['meta']['image_process'];
-	}
-
-	// si le doc n'est pas une image dans un format accetpable, refuser
-	if (!$force && !in_array($format, formats_image_acceptables($process === 'gd2'))) {
-		return;
-	}
-	$destination = "$destdir/$destfile";
-
-	// calculer la taille
-	if (($srcWidth = $valeurs['largeur']) && ($srcHeight = $valeurs['hauteur'])) {
-		if (!($destWidth = $valeurs['largeur_dest']) || !($destHeight = $valeurs['hauteur_dest'])) {
-			[$destWidth, $destHeight] = _image_ratio($srcWidth, $srcHeight, $maxWidth, $maxHeight);
-		}
-	} elseif ($process == 'convert' || $process == 'imagick') {
-		$destWidth = $maxWidth;
-		$destHeight = $maxHeight;
-	} else {
-		spip_logger('images')->info("echec $process sur $image");
-
-		return;
-	}
-
-	$vignette = '';
-
-	// Si l'image est de la taille demandee (ou plus petite), simplement la retourner
-	if ($srcWidth && $srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
-		$vignette = $destination . '.' . $format;
-		@copy($image, $vignette);
-	}
-
-	elseif ($valeurs['format_source'] === 'svg') {
-		include_spip('inc/svg');
-		if ($svg = svg_redimensionner($valeurs['fichier'], $destWidth, $destHeight)) {
-			$format_sortie = 'svg';
-			$vignette = $destination . '.' . $format_sortie;
-			$valeurs['fichier_dest'] = $vignette;
-			_image_gd_output($svg, $valeurs);
-		}
-	}
-
-	// imagemagick en ligne de commande
-	elseif ($process == 'convert') {
-		if (!defined('_CONVERT_COMMAND')) {
-			define('_CONVERT_COMMAND', 'convert');
-		} // Securite : mes_options.php peut preciser le chemin absolu
-		if (!defined('_RESIZE_COMMAND')) {
-			define('_RESIZE_COMMAND', _CONVERT_COMMAND . ' -quality ' . _IMG_CONVERT_QUALITE . ' -orient Undefined -resize %xx%y! %src %dest');
-		}
-		$vignette = $destination . '.' . $format_sortie;
-		$commande = str_replace(
-			['%x', '%y', '%src', '%dest'],
-			[
-				$destWidth,
-				$destHeight,
-				escapeshellcmd($image),
-				escapeshellcmd($vignette)
-			],
-			(string) _RESIZE_COMMAND
-		);
-		spip_logger('images')->info($commande);
-		exec($commande);
-		if (!@file_exists($vignette)) {
-			spip_logger('images')->info("echec convert sur $vignette");
-
-			return;  // echec commande
-		}
-	}
-
-	// php5 imagemagick
-	elseif ($process == 'imagick') {
-		if (!class_exists(\Imagick::class)) {
-			spip_logger('images')->error('Classe Imagick absente !');
-
-			return;
-		}
-
-		// chemin compatible Windows
-		$output = realpath(dirname($destination));
-		if (!$output) {
-			return;
-		}
-		$vignette = $output . DIRECTORY_SEPARATOR . basename($destination) . '.' . $format_sortie;
-
-		$imagick = new Imagick();
-		$imagick->readImage(realpath($image));
-		$imagick->resizeImage(
-			$destWidth,
-			$destHeight,
-			Imagick::FILTER_LANCZOS,
-			1
-		);//, IMAGICK_FILTER_LANCZOS, _IMG_IMAGICK_QUALITE / 100);
-		$imagick->writeImage($vignette);
-
-		if (!@file_exists($vignette)) {
-			spip_logger('images')->info("echec imagick sur $vignette");
-
-			return;
-		}
-		// remettre le chemin relatif car c'est ce qu'attend SPIP pour la suite (en particlier action/tester)
-		$vignette = $destination . '.' . $format_sortie;
-	}
-
-	// netpbm
-	elseif ($process == 'netpbm') {
-		if (!defined('_PNMSCALE_COMMAND')) {
-			define('_PNMSCALE_COMMAND', 'pnmscale');
-		} // Securite : mes_options.php peut preciser le chemin absolu
-		if (_PNMSCALE_COMMAND == '') {
-			return;
-		}
-		$vignette = $destination . '.' . $format_sortie;
-		$pnmtojpeg_command = str_replace('pnmscale', 'pnmtojpeg', (string) _PNMSCALE_COMMAND);
-		if ($format == 'jpg') {
-			$jpegtopnm_command = str_replace('pnmscale', 'jpegtopnm', (string) _PNMSCALE_COMMAND);
-			exec("$jpegtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
-			if (!($s = @filesize($vignette))) {
-				spip_unlink($vignette);
-			}
-			if (!@file_exists($vignette)) {
-				spip_logger('images')->info("echec netpbm-jpg sur $vignette");
-
-				return;
-			}
-		} else {
-			if ($format == 'gif') {
-				$giftopnm_command = str_replace('pnmscale', 'giftopnm', (string) _PNMSCALE_COMMAND);
-				exec("$giftopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
-				if (!($s = @filesize($vignette))) {
-					spip_unlink($vignette);
-				}
-				if (!@file_exists($vignette)) {
-					spip_logger('images')->info("echec netpbm-gif sur $vignette");
-
-					return;
-				}
-			} else {
-				if ($format == 'png') {
-					$pngtopnm_command = str_replace('pnmscale', 'pngtopnm', (string) _PNMSCALE_COMMAND);
-					exec("$pngtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
-					if (!($s = @filesize($vignette))) {
-						spip_unlink($vignette);
-					}
-					if (!@file_exists($vignette)) {
-						spip_logger('images')->info("echec netpbm-png sur $vignette");
-
-						return;
-					}
-				}
-			}
-		}
-	}
-
-	// gd ou gd2
-	elseif ($process === 'gd2') {
-		if (!function_exists('gd_info')) {
-			spip_logger('images')->error('Librairie GD absente !');
-
-			return;
-		}
-		if (_IMG_GD_MAX_PIXELS && $srcWidth * $srcHeight > _IMG_GD_MAX_PIXELS) {
-			spip_logger('images')->info('vignette gd2 impossible : ' . $srcWidth * $srcHeight . 'pixels');
-
-			return;
-		}
-		$destFormat = $format_sortie;
-		if (!$destFormat) {
-			spip_logger('images')->info("pas de format pour $image");
-
-			return;
-		}
-
-		$fonction_imagecreatefrom = $valeurs['fonction_imagecreatefrom'];
-		if (!function_exists($fonction_imagecreatefrom)) {
-			return;
-		}
-		$srcImage = @$fonction_imagecreatefrom($image);
-		if (!$srcImage) {
-			spip_logger('images')->info('echec gd2');
-
-			return;
-		}
-
-		// Initialisation de l'image destination
-		$destImage = null;
-		if ($process == 'gd2' && $destFormat != 'gif') {
-			$destImage = ImageCreateTrueColor($destWidth, $destHeight);
-		}
-		if (!$destImage) {
-			$destImage = ImageCreate($destWidth, $destHeight);
-		}
-
-		// Recopie de l'image d'origine avec adaptation de la taille
-		$ok = false;
-		if ($process == 'gd2' && function_exists('ImageCopyResampled')) {
-			if ($format == 'gif') {
-				// Si un GIF est transparent,
-				// fabriquer un PNG transparent
-				$transp = imagecolortransparent($srcImage);
-				if ($transp > 0) {
-					$destFormat = 'png';
-				}
-			}
-			if (in_array($destFormat, _image_extensions_conservent_transparence())) {
-				// Conserver la transparence
-				if (function_exists('imageAntiAlias')) {
-					imageAntiAlias($destImage, true);
-				}
-				@imagealphablending($destImage, false);
-				@imagesavealpha($destImage, true);
-			}
-			$ok = @ImageCopyResampled($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
-		}
-		if (!$ok) {
-			$ok = ImageCopyResized($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
-		}
-
-		// Sauvegarde de l'image destination
-		$valeurs['fichier_dest'] = $vignette = "$destination.$destFormat";
-		$valeurs['format_dest'] = $format = $destFormat;
-		_image_gd_output($destImage, $valeurs);
-
-		if ($srcImage) {
-			ImageDestroy($srcImage);
-		}
-		ImageDestroy($destImage);
-	}
-
-	if (!$vignette || !$size = @spip_getimagesize($vignette)) {
-		$size = [$destWidth, $destHeight];
-	}
-
-	// Gaffe: en safe mode, pas d'acces a la vignette,
-	// donc risque de balancer "width='0'", ce qui masque l'image sous MSIE
-	if ($size[0] < 1) {
-		$size[0] = $destWidth;
-	}
-	if ($size[1] < 1) {
-		$size[1] = $destHeight;
-	}
-
-	$retour['width'] = $largeur = $size[0];
-	$retour['height'] = $hauteur = $size[1];
-
-	$retour['fichier'] = $vignette;
-	$retour['format'] = $format;
-	$retour['date'] = @filemtime($vignette);
-
-	// renvoyer l'image
-	return $retour;
+    $srcHeight = null;
+    $retour = [];
+    // ordre de preference des formats graphiques pour creer les vignettes
+    // le premier format disponible, selon la methode demandee, est utilise
+    $image = $valeurs['fichier'];
+    $format = $valeurs['format_source'];
+    $destdir = dirname((string) $valeurs['fichier_dest']);
+    $destfile = basename((string) $valeurs['fichier_dest'], '.' . $valeurs['format_dest']);
+
+    $format_sortie = $valeurs['format_dest'];
+
+    if ($process == 'AUTO' && isset($GLOBALS['meta']['image_process'])) {
+        $process = $GLOBALS['meta']['image_process'];
+    }
+
+    // si le doc n'est pas une image dans un format accetpable, refuser
+    if (!$force && !in_array($format, formats_image_acceptables($process === 'gd2'))) {
+        return;
+    }
+    $destination = "$destdir/$destfile";
+
+    // calculer la taille
+    if (($srcWidth = $valeurs['largeur']) && ($srcHeight = $valeurs['hauteur'])) {
+        if (!($destWidth = $valeurs['largeur_dest']) || !($destHeight = $valeurs['hauteur_dest'])) {
+            [$destWidth, $destHeight] = _image_ratio($srcWidth, $srcHeight, $maxWidth, $maxHeight);
+        }
+    } elseif ($process == 'convert' || $process == 'imagick') {
+        $destWidth = $maxWidth;
+        $destHeight = $maxHeight;
+    } else {
+        spip_logger('images')->info("echec $process sur $image");
+
+        return;
+    }
+
+    $vignette = '';
+
+    // Si l'image est de la taille demandee (ou plus petite), simplement la retourner
+    if ($srcWidth && $srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
+        $vignette = $destination . '.' . $format;
+        @copy($image, $vignette);
+    }
+
+    elseif ($valeurs['format_source'] === 'svg') {
+        include_spip('inc/svg');
+        if ($svg = svg_redimensionner($valeurs['fichier'], $destWidth, $destHeight)) {
+            $format_sortie = 'svg';
+            $vignette = $destination . '.' . $format_sortie;
+            $valeurs['fichier_dest'] = $vignette;
+            _image_gd_output($svg, $valeurs);
+        }
+    }
+
+    // imagemagick en ligne de commande
+    elseif ($process == 'convert') {
+        if (!defined('_CONVERT_COMMAND')) {
+            define('_CONVERT_COMMAND', 'convert');
+        } // Securite : mes_options.php peut preciser le chemin absolu
+        if (!defined('_RESIZE_COMMAND')) {
+            define('_RESIZE_COMMAND', _CONVERT_COMMAND . ' -quality ' . _IMG_CONVERT_QUALITE . ' -orient Undefined -resize %xx%y! %src %dest');
+        }
+        $vignette = $destination . '.' . $format_sortie;
+        $commande = str_replace(
+            ['%x', '%y', '%src', '%dest'],
+            [
+                $destWidth,
+                $destHeight,
+                escapeshellcmd($image),
+                escapeshellcmd($vignette)
+            ],
+            (string) _RESIZE_COMMAND
+        );
+        spip_logger('images')->info($commande);
+        exec($commande);
+        if (!@file_exists($vignette)) {
+            spip_logger('images')->info("echec convert sur $vignette");
+
+            return;  // echec commande
+        }
+    }
+
+    // php5 imagemagick
+    elseif ($process == 'imagick') {
+        if (!class_exists(\Imagick::class)) {
+            spip_logger('images')->error('Classe Imagick absente !');
+
+            return;
+        }
+
+        // chemin compatible Windows
+        $output = realpath(dirname($destination));
+        if (!$output) {
+            return;
+        }
+        $vignette = $output . DIRECTORY_SEPARATOR . basename($destination) . '.' . $format_sortie;
+
+        $imagick = new Imagick();
+        $imagick->readImage(realpath($image));
+        $imagick->resizeImage(
+            $destWidth,
+            $destHeight,
+            Imagick::FILTER_LANCZOS,
+            1
+        );//, IMAGICK_FILTER_LANCZOS, _IMG_IMAGICK_QUALITE / 100);
+        $imagick->writeImage($vignette);
+
+        if (!@file_exists($vignette)) {
+            spip_logger('images')->info("echec imagick sur $vignette");
+
+            return;
+        }
+        // remettre le chemin relatif car c'est ce qu'attend SPIP pour la suite (en particlier action/tester)
+        $vignette = $destination . '.' . $format_sortie;
+    }
+
+    // netpbm
+    elseif ($process == 'netpbm') {
+        if (!defined('_PNMSCALE_COMMAND')) {
+            define('_PNMSCALE_COMMAND', 'pnmscale');
+        } // Securite : mes_options.php peut preciser le chemin absolu
+        if (_PNMSCALE_COMMAND == '') {
+            return;
+        }
+        $vignette = $destination . '.' . $format_sortie;
+        $pnmtojpeg_command = str_replace('pnmscale', 'pnmtojpeg', (string) _PNMSCALE_COMMAND);
+        if ($format == 'jpg') {
+            $jpegtopnm_command = str_replace('pnmscale', 'jpegtopnm', (string) _PNMSCALE_COMMAND);
+            exec("$jpegtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+            if (!($s = @filesize($vignette))) {
+                spip_unlink($vignette);
+            }
+            if (!@file_exists($vignette)) {
+                spip_logger('images')->info("echec netpbm-jpg sur $vignette");
+
+                return;
+            }
+        } else {
+            if ($format == 'gif') {
+                $giftopnm_command = str_replace('pnmscale', 'giftopnm', (string) _PNMSCALE_COMMAND);
+                exec("$giftopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+                if (!($s = @filesize($vignette))) {
+                    spip_unlink($vignette);
+                }
+                if (!@file_exists($vignette)) {
+                    spip_logger('images')->info("echec netpbm-gif sur $vignette");
+
+                    return;
+                }
+            } else {
+                if ($format == 'png') {
+                    $pngtopnm_command = str_replace('pnmscale', 'pngtopnm', (string) _PNMSCALE_COMMAND);
+                    exec("$pngtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+                    if (!($s = @filesize($vignette))) {
+                        spip_unlink($vignette);
+                    }
+                    if (!@file_exists($vignette)) {
+                        spip_logger('images')->info("echec netpbm-png sur $vignette");
+
+                        return;
+                    }
+                }
+            }
+        }
+    }
+
+    // gd ou gd2
+    elseif ($process === 'gd2') {
+        if (!function_exists('gd_info')) {
+            spip_logger('images')->error('Librairie GD absente !');
+
+            return;
+        }
+        if (_IMG_GD_MAX_PIXELS && $srcWidth * $srcHeight > _IMG_GD_MAX_PIXELS) {
+            spip_logger('images')->info('vignette gd2 impossible : ' . $srcWidth * $srcHeight . 'pixels');
+
+            return;
+        }
+        $destFormat = $format_sortie;
+        if (!$destFormat) {
+            spip_logger('images')->info("pas de format pour $image");
+
+            return;
+        }
+
+        $fonction_imagecreatefrom = $valeurs['fonction_imagecreatefrom'];
+        if (!function_exists($fonction_imagecreatefrom)) {
+            return;
+        }
+        $srcImage = @$fonction_imagecreatefrom($image);
+        if (!$srcImage) {
+            spip_logger('images')->info('echec gd2');
+
+            return;
+        }
+
+        // Initialisation de l'image destination
+        $destImage = null;
+        if ($process == 'gd2' && $destFormat != 'gif') {
+            $destImage = ImageCreateTrueColor($destWidth, $destHeight);
+        }
+        if (!$destImage) {
+            $destImage = ImageCreate($destWidth, $destHeight);
+        }
+
+        // Recopie de l'image d'origine avec adaptation de la taille
+        $ok = false;
+        if ($process == 'gd2' && function_exists('ImageCopyResampled')) {
+            if ($format == 'gif') {
+                // Si un GIF est transparent,
+                // fabriquer un PNG transparent
+                $transp = imagecolortransparent($srcImage);
+                if ($transp > 0) {
+                    $destFormat = 'png';
+                }
+            }
+            if (in_array($destFormat, _image_extensions_conservent_transparence())) {
+                // Conserver la transparence
+                if (function_exists('imageAntiAlias')) {
+                    imageAntiAlias($destImage, true);
+                }
+                @imagealphablending($destImage, false);
+                @imagesavealpha($destImage, true);
+            }
+            $ok = @ImageCopyResampled($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
+        }
+        if (!$ok) {
+            $ok = ImageCopyResized($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
+        }
+
+        // Sauvegarde de l'image destination
+        $valeurs['fichier_dest'] = $vignette = "$destination.$destFormat";
+        $valeurs['format_dest'] = $format = $destFormat;
+        _image_gd_output($destImage, $valeurs);
+
+        if ($srcImage) {
+            ImageDestroy($srcImage);
+        }
+        ImageDestroy($destImage);
+    }
+
+    if (!$vignette || !$size = @spip_getimagesize($vignette)) {
+        $size = [$destWidth, $destHeight];
+    }
+
+    // Gaffe: en safe mode, pas d'acces a la vignette,
+    // donc risque de balancer "width='0'", ce qui masque l'image sous MSIE
+    if ($size[0] < 1) {
+        $size[0] = $destWidth;
+    }
+    if ($size[1] < 1) {
+        $size[1] = $destHeight;
+    }
+
+    $retour['width'] = $largeur = $size[0];
+    $retour['height'] = $hauteur = $size[1];
+
+    $retour['fichier'] = $vignette;
+    $retour['format'] = $format;
+    $retour['date'] = @filemtime($vignette);
+
+    // renvoyer l'image
+    return $retour;
 }
 
 /**
@@ -1593,25 +1593,25 @@ 
  * @return array Liste [ largeur, hauteur, ratio de réduction ]
  **/
 function _image_ratio(int $srcWidth, int $srcHeight, int $maxWidth, int $maxHeight): array {
-	$ratioWidth = $srcWidth / $maxWidth;
-	$ratioHeight = $srcHeight / $maxHeight;
-
-	if ($srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
-		$destWidth = $srcWidth;
-		$destHeight = $srcHeight;
-	} elseif ($ratioWidth < $ratioHeight) {
-		$destWidth = $srcWidth / $ratioHeight;
-		$destHeight = $maxHeight;
-	} else {
-		$destWidth = $maxWidth;
-		$destHeight = $srcHeight / $ratioWidth;
-	}
-
-	return [
-		(int) round($destWidth),
-		(int) round($destHeight),
-		max($ratioWidth, $ratioHeight)
-	];
+    $ratioWidth = $srcWidth / $maxWidth;
+    $ratioHeight = $srcHeight / $maxHeight;
+
+    if ($srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
+        $destWidth = $srcWidth;
+        $destHeight = $srcHeight;
+    } elseif ($ratioWidth < $ratioHeight) {
+        $destWidth = $srcWidth / $ratioHeight;
+        $destHeight = $maxHeight;
+    } else {
+        $destWidth = $maxWidth;
+        $destHeight = $srcHeight / $ratioWidth;
+    }
+
+    return [
+        (int) round($destWidth),
+        (int) round($destHeight),
+        max($ratioWidth, $ratioHeight)
+    ];
 }
 
 /**
@@ -1631,25 +1631,25 @@ 
  * @return array Liste [ largeur, hauteur, ratio de réduction ]
  **/
 function ratio_passe_partout(int $srcWidth, int $srcHeight, int $maxWidth, int $maxHeight): array {
-	$ratioWidth = $srcWidth / $maxWidth;
-	$ratioHeight = $srcHeight / $maxHeight;
-
-	if ($srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
-		$destWidth = $srcWidth;
-		$destHeight = $srcHeight;
-	} elseif ($ratioWidth > $ratioHeight) {
-		$destWidth = $srcWidth / $ratioHeight;
-		$destHeight = $maxHeight;
-	} else {
-		$destWidth = $maxWidth;
-		$destHeight = $srcHeight / $ratioWidth;
-	}
-
-	return [
-		(int) round($destWidth),
-		(int) round($destHeight),
-		min($ratioWidth, $ratioHeight)
-	];
+    $ratioWidth = $srcWidth / $maxWidth;
+    $ratioHeight = $srcHeight / $maxHeight;
+
+    if ($srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
+        $destWidth = $srcWidth;
+        $destHeight = $srcHeight;
+    } elseif ($ratioWidth > $ratioHeight) {
+        $destWidth = $srcWidth / $ratioHeight;
+        $destHeight = $maxHeight;
+    } else {
+        $destWidth = $maxWidth;
+        $destHeight = $srcHeight / $ratioWidth;
+    }
+
+    return [
+        (int) round($destWidth),
+        (int) round($destHeight),
+        min($ratioWidth, $ratioHeight)
+    ];
 }
 
 
@@ -1662,12 +1662,12 @@ 
  * @return string
  */
 function process_image_svg_identite($image) {
-	if ($image['creer']) {
-		$source = $image['fichier'];
-		_image_gd_output($source, $image);
-	}
+    if ($image['creer']) {
+        $source = $image['fichier'];
+        _image_gd_output($source, $image);
+    }
 
-	return _image_ecrire_tag($image, ['src' => $image['fichier_dest']]);
+    return _image_ecrire_tag($image, ['src' => $image['fichier_dest']]);
 }
 
 
@@ -1700,102 +1700,102 @@ 
  *     Code HTML de la balise img produite
  **/
 function process_image_reduire($fonction, $img, $taille, $taille_y, $force, $process = 'AUTO') {
-	$image = false;
-	if ($process == 'AUTO' && isset($GLOBALS['meta']['image_process'])) {
-		$process = $GLOBALS['meta']['image_process'];
-	}
-	# determiner le format de sortie
-	$format_sortie = false; // le choix par defaut sera bon
-	if ($process === 'netpbm') {
-		$format_sortie = 'jpg';
-	} elseif ($process === 'gd2') {
-		$image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}", $format_sortie, $fonction, false, _SVG_SUPPORTED);
-		// on verifie que l'extension choisie est bonne (en principe oui)
-		$gd_formats = formats_image_acceptables(true);
-		if (
-			is_array($image)
-			&& (!in_array($image['format_dest'], $gd_formats) || !in_array($image['format_dest'], _image_extensions_acceptees_en_sortie()))
-		) {
-			$formats_sortie = $image['format_source'] == 'jpg' ? ['jpg', 'png', 'gif'] : ['png', 'jpg', 'gif'];
-			// Choisir le format destination
-			// - on sauve de preference en JPEG (meilleure compression)
-			// - pour le GIF : les GD recentes peuvent le lire mais pas l'ecrire
-			# bug : gd_formats contient la liste des fichiers qu'on sait *lire*,
-			# pas *ecrire*
-			$format_sortie = '';
-			foreach ($formats_sortie as $fmt) {
-				if (in_array($fmt, $gd_formats) && in_array($fmt, _image_extensions_acceptees_en_sortie())) {
-					$format_sortie = $fmt;
-					break;
-				}
-			}
-			$image = false;
-		}
-	}
-
-	if (!is_array($image)) {
-		$image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}", $format_sortie, $fonction, false, _SVG_SUPPORTED);
-	}
-
-	if (!is_array($image) || !$image['largeur'] || !$image['hauteur']) {
-		spip_logger('images')->info("image_reduire_src:pas de version locale de $img ou extension non prise en charge");
-		// on peut resizer en mode html si on dispose des elements
-		[$srcw, $srch] = taille_image($img);
-		if ($srcw && $srch) {
-			[$w, $h] = _image_ratio($srcw, $srch, $taille, $taille_y);
-
-			return _image_tag_changer_taille($img, $w, $h);
-		}
-		// la on n'a pas d'infos sur l'image source... on refile le truc a css
-		// sous la forme style='max-width: NNpx;'
-		return inserer_attribut(
-			$img,
-			'style',
-			"max-width: {$taille}px;max-width: min(100%,{$taille}px); max-height: {$taille_y}px"
-		);
-	}
-
-	// si l'image est plus petite que la cible retourner une copie cachee de l'image
-	if (($image['largeur'] <= $taille) && ($image['hauteur'] <= $taille_y)) {
-		if ($image['creer']) {
-			@copy($image['fichier'], $image['fichier_dest']);
-		}
-
-		return _image_ecrire_tag($image, ['src' => $image['fichier_dest']]);
-	}
-
-	if ($image['creer'] == false && !$force) {
-		return _image_ecrire_tag(
-			$image,
-			['src' => $image['fichier_dest'], 'width' => $image['largeur_dest'], 'height' => $image['hauteur_dest']]
-		);
-	}
-
-	if (in_array($image['format_source'], _image_extensions_acceptees_en_entree())) {
-		$destWidth = $image['largeur_dest'];
-		$destHeight = $image['hauteur_dest'];
-		$logo = $image['fichier'];
-		$date = $image['date_src'];
-		$preview = _image_creer_vignette($image, $taille, $taille_y, $process, $force);
-
-		if ($preview && $preview['fichier']) {
-			$logo = $preview['fichier'];
-			$destWidth = $preview['width'];
-			$destHeight = $preview['height'];
-			$date = $preview['date'];
-		}
-		// dans l'espace prive mettre un timestamp sur l'adresse
-		// de l'image, de facon a tromper le cache du navigateur
-		// quand on fait supprimer/reuploader un logo
-		// (pas de filemtime si SAFE MODE)
-		$date = test_espace_prive() ? ('?' . $date) : '';
-
-		return _image_ecrire_tag($image, ['src' => "$logo$date", 'width' => $destWidth, 'height' => $destHeight]);
-	}
-	else {
-		# BMP, tiff ... les redacteurs osent tout!
-		return $img;
-	}
+    $image = false;
+    if ($process == 'AUTO' && isset($GLOBALS['meta']['image_process'])) {
+        $process = $GLOBALS['meta']['image_process'];
+    }
+    # determiner le format de sortie
+    $format_sortie = false; // le choix par defaut sera bon
+    if ($process === 'netpbm') {
+        $format_sortie = 'jpg';
+    } elseif ($process === 'gd2') {
+        $image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}", $format_sortie, $fonction, false, _SVG_SUPPORTED);
+        // on verifie que l'extension choisie est bonne (en principe oui)
+        $gd_formats = formats_image_acceptables(true);
+        if (
+            is_array($image)
+            && (!in_array($image['format_dest'], $gd_formats) || !in_array($image['format_dest'], _image_extensions_acceptees_en_sortie()))
+        ) {
+            $formats_sortie = $image['format_source'] == 'jpg' ? ['jpg', 'png', 'gif'] : ['png', 'jpg', 'gif'];
+            // Choisir le format destination
+            // - on sauve de preference en JPEG (meilleure compression)
+            // - pour le GIF : les GD recentes peuvent le lire mais pas l'ecrire
+            # bug : gd_formats contient la liste des fichiers qu'on sait *lire*,
+            # pas *ecrire*
+            $format_sortie = '';
+            foreach ($formats_sortie as $fmt) {
+                if (in_array($fmt, $gd_formats) && in_array($fmt, _image_extensions_acceptees_en_sortie())) {
+                    $format_sortie = $fmt;
+                    break;
+                }
+            }
+            $image = false;
+        }
+    }
+
+    if (!is_array($image)) {
+        $image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}", $format_sortie, $fonction, false, _SVG_SUPPORTED);
+    }
+
+    if (!is_array($image) || !$image['largeur'] || !$image['hauteur']) {
+        spip_logger('images')->info("image_reduire_src:pas de version locale de $img ou extension non prise en charge");
+        // on peut resizer en mode html si on dispose des elements
+        [$srcw, $srch] = taille_image($img);
+        if ($srcw && $srch) {
+            [$w, $h] = _image_ratio($srcw, $srch, $taille, $taille_y);
+
+            return _image_tag_changer_taille($img, $w, $h);
+        }
+        // la on n'a pas d'infos sur l'image source... on refile le truc a css
+        // sous la forme style='max-width: NNpx;'
+        return inserer_attribut(
+            $img,
+            'style',
+            "max-width: {$taille}px;max-width: min(100%,{$taille}px); max-height: {$taille_y}px"
+        );
+    }
+
+    // si l'image est plus petite que la cible retourner une copie cachee de l'image
+    if (($image['largeur'] <= $taille) && ($image['hauteur'] <= $taille_y)) {
+        if ($image['creer']) {
+            @copy($image['fichier'], $image['fichier_dest']);
+        }
+
+        return _image_ecrire_tag($image, ['src' => $image['fichier_dest']]);
+    }
+
+    if ($image['creer'] == false && !$force) {
+        return _image_ecrire_tag(
+            $image,
+            ['src' => $image['fichier_dest'], 'width' => $image['largeur_dest'], 'height' => $image['hauteur_dest']]
+        );
+    }
+
+    if (in_array($image['format_source'], _image_extensions_acceptees_en_entree())) {
+        $destWidth = $image['largeur_dest'];
+        $destHeight = $image['hauteur_dest'];
+        $logo = $image['fichier'];
+        $date = $image['date_src'];
+        $preview = _image_creer_vignette($image, $taille, $taille_y, $process, $force);
+
+        if ($preview && $preview['fichier']) {
+            $logo = $preview['fichier'];
+            $destWidth = $preview['width'];
+            $destHeight = $preview['height'];
+            $date = $preview['date'];
+        }
+        // dans l'espace prive mettre un timestamp sur l'adresse
+        // de l'image, de facon a tromper le cache du navigateur
+        // quand on fait supprimer/reuploader un logo
+        // (pas de filemtime si SAFE MODE)
+        $date = test_espace_prive() ? ('?' . $date) : '';
+
+        return _image_ecrire_tag($image, ['src' => "$logo$date", 'width' => $destWidth, 'height' => $destHeight]);
+    }
+    else {
+        # BMP, tiff ... les redacteurs osent tout!
+        return $img;
+    }
 }
 
 /**
@@ -1809,145 +1809,145 @@ 
  * Class phpthumb_functions
  */
 class phpthumb_functions {
-	/**
-	 * Retourne la couleur d'un pixel dans une image
-	 *
-	 * @param GdImage $img
-	 * @param int $x
-	 * @param int $y
-	 * @return array|bool
-	 */
-	public static function GetPixelColor(&$img, $x, $y) {
-		if ($img instanceof \GdImage) {
-			return @ImageColorsForIndex($img, @ImageColorAt($img, $x, $y));
-		}
-		return false;
-	}
-
-	/**
-	 * Retourne un nombre dans une représentation en Little Endian
-	 *
-	 * @param int $number
-	 * @param int $minbytes
-	 * @return string
-	 */
-	public static function LittleEndian2String($number, $minbytes = 1) {
-		$intstring = '';
-		while ($number > 0) {
-			$intstring .= chr($number & 255);
-			$number >>= 8;
-		}
-
-		return str_pad($intstring, $minbytes, "\x00", STR_PAD_RIGHT);
-	}
-
-	/**
-	 * Transforme une ressource GD en image au format ICO
-	 *
-	 * @param array $gd_image_array
-	 *     Tableau de ressources d'images GD
-	 * @return string
-	 *     Image au format ICO
-	 */
-	public static function GD2ICOstring(&$gd_image_array) {
-		foreach ($gd_image_array as $key => $gd_image) {
-			$ImageWidths[$key] = ImageSX($gd_image);
-			$ImageHeights[$key] = ImageSY($gd_image);
-			$bpp[$key] = ImageIsTrueColor($gd_image) ? 32 : 24;
-			$totalcolors[$key] = ImageColorsTotal($gd_image);
-
-			$icXOR[$key] = '';
-			for ($y = $ImageHeights[$key] - 1; $y >= 0; $y--) {
-				for ($x = 0; $x < $ImageWidths[$key]; $x++) {
-					$argb = phpthumb_functions::GetPixelColor($gd_image, $x, $y);
-					$a = round(255 * ((127 - $argb['alpha']) / 127));
-					$r = $argb['red'];
-					$g = $argb['green'];
-					$b = $argb['blue'];
-
-					if ($bpp[$key] == 32) {
-						$icXOR[$key] .= chr($b) . chr($g) . chr($r) . chr($a);
-					} elseif ($bpp[$key] === 24) {
-						$icXOR[$key] .= chr($b) . chr($g) . chr($r);
-					}
-
-					if ($a < 128) {
-						@$icANDmask[$key][$y] .= '1';
-					} else {
-						@$icANDmask[$key][$y] .= '0';
-					}
-				}
-				// mask bits are 32-bit aligned per scanline
-				while (strlen($icANDmask[$key][$y]) % 32) {
-					$icANDmask[$key][$y] .= '0';
-				}
-			}
-			$icAND[$key] = '';
-			foreach ($icANDmask[$key] as $y => $scanlinemaskbits) {
-				for ($i = 0; $i < strlen($scanlinemaskbits); $i += 8) {
-					$icAND[$key] .= chr(bindec(str_pad(substr($scanlinemaskbits, $i, 8), 8, '0', STR_PAD_LEFT)));
-				}
-			}
-		}
-
-		foreach (array_keys($gd_image_array) as $key) {
-			$biSizeImage = $ImageWidths[$key] * $ImageHeights[$key] * ($bpp[$key] / 8);
-
-			// BITMAPINFOHEADER - 40 bytes
-			$BitmapInfoHeader[$key] = '';
-			$BitmapInfoHeader[$key] .= "\x28\x00\x00\x00";                // DWORD  biSize;
-			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4);    // LONG   biWidth;
-			// The biHeight member specifies the combined
-			// height of the XOR and AND masks.
-			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageHeights[$key] * 2, 4); // LONG   biHeight;
-			$BitmapInfoHeader[$key] .= "\x01\x00";                    // WORD   biPlanes;
-			$BitmapInfoHeader[$key] .= chr($bpp[$key]) . "\x00";              // wBitCount;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biCompression;
-			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4);      // DWORD  biSizeImage;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biXPelsPerMeter;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biYPelsPerMeter;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrUsed;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrImportant;
-		}
-
-
-		$icondata = "\x00\x00";                    // idReserved;   // Reserved (must be 0)
-		$icondata .= "\x01\x00";                    // idType;	   // Resource Type (1 for icons)
-		$icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2);  // idCount;	  // How many images?
-
-		$dwImageOffset = 6 + (count($gd_image_array) * 16);
-		foreach (array_keys($gd_image_array) as $key) {
-			// ICONDIRENTRY   idEntries[1]; // An entry for each image (idCount of 'em)
-
-			$icondata .= chr($ImageWidths[$key]);           // bWidth;		  // Width, in pixels, of the image
-			$icondata .= chr($ImageHeights[$key]);          // bHeight;		 // Height, in pixels, of the image
-			$icondata .= chr($totalcolors[$key]);           // bColorCount;	 // Number of colors in image (0 if >=8bpp)
-			$icondata .= "\x00";                    // bReserved;	   // Reserved ( must be 0)
-
-			$icondata .= "\x01\x00";                  // wPlanes;		 // Color Planes
-			$icondata .= chr($bpp[$key]) . "\x00";            // wBitCount;	   // Bits per pixel
-
-			$dwBytesInRes = 40 + strlen($icXOR[$key]) + strlen($icAND[$key]);
-			$icondata .= phpthumb_functions::LittleEndian2String(
-				$dwBytesInRes,
-				4
-			);     // dwBytesInRes;	// How many bytes in this resource?
-
-			$icondata .= phpthumb_functions::LittleEndian2String(
-				$dwImageOffset,
-				4
-			);    // dwImageOffset;   // Where in the file is this image?
-			$dwImageOffset += strlen($BitmapInfoHeader[$key]);
-			$dwImageOffset += strlen($icXOR[$key]);
-			$dwImageOffset += strlen($icAND[$key]);
-		}
-
-		foreach (array_keys($gd_image_array) as $key) {
-			$icondata .= $BitmapInfoHeader[$key];
-			$icondata .= $icXOR[$key];
-			$icondata .= $icAND[$key];
-		}
-
-		return $icondata;
-	}
+    /**
+     * Retourne la couleur d'un pixel dans une image
+     *
+     * @param GdImage $img
+     * @param int $x
+     * @param int $y
+     * @return array|bool
+     */
+    public static function GetPixelColor(&$img, $x, $y) {
+        if ($img instanceof \GdImage) {
+            return @ImageColorsForIndex($img, @ImageColorAt($img, $x, $y));
+        }
+        return false;
+    }
+
+    /**
+     * Retourne un nombre dans une représentation en Little Endian
+     *
+     * @param int $number
+     * @param int $minbytes
+     * @return string
+     */
+    public static function LittleEndian2String($number, $minbytes = 1) {
+        $intstring = '';
+        while ($number > 0) {
+            $intstring .= chr($number & 255);
+            $number >>= 8;
+        }
+
+        return str_pad($intstring, $minbytes, "\x00", STR_PAD_RIGHT);
+    }
+
+    /**
+     * Transforme une ressource GD en image au format ICO
+     *
+     * @param array $gd_image_array
+     *     Tableau de ressources d'images GD
+     * @return string
+     *     Image au format ICO
+     */
+    public static function GD2ICOstring(&$gd_image_array) {
+        foreach ($gd_image_array as $key => $gd_image) {
+            $ImageWidths[$key] = ImageSX($gd_image);
+            $ImageHeights[$key] = ImageSY($gd_image);
+            $bpp[$key] = ImageIsTrueColor($gd_image) ? 32 : 24;
+            $totalcolors[$key] = ImageColorsTotal($gd_image);
+
+            $icXOR[$key] = '';
+            for ($y = $ImageHeights[$key] - 1; $y >= 0; $y--) {
+                for ($x = 0; $x < $ImageWidths[$key]; $x++) {
+                    $argb = phpthumb_functions::GetPixelColor($gd_image, $x, $y);
+                    $a = round(255 * ((127 - $argb['alpha']) / 127));
+                    $r = $argb['red'];
+                    $g = $argb['green'];
+                    $b = $argb['blue'];
+
+                    if ($bpp[$key] == 32) {
+                        $icXOR[$key] .= chr($b) . chr($g) . chr($r) . chr($a);
+                    } elseif ($bpp[$key] === 24) {
+                        $icXOR[$key] .= chr($b) . chr($g) . chr($r);
+                    }
+
+                    if ($a < 128) {
+                        @$icANDmask[$key][$y] .= '1';
+                    } else {
+                        @$icANDmask[$key][$y] .= '0';
+                    }
+                }
+                // mask bits are 32-bit aligned per scanline
+                while (strlen($icANDmask[$key][$y]) % 32) {
+                    $icANDmask[$key][$y] .= '0';
+                }
+            }
+            $icAND[$key] = '';
+            foreach ($icANDmask[$key] as $y => $scanlinemaskbits) {
+                for ($i = 0; $i < strlen($scanlinemaskbits); $i += 8) {
+                    $icAND[$key] .= chr(bindec(str_pad(substr($scanlinemaskbits, $i, 8), 8, '0', STR_PAD_LEFT)));
+                }
+            }
+        }
+
+        foreach (array_keys($gd_image_array) as $key) {
+            $biSizeImage = $ImageWidths[$key] * $ImageHeights[$key] * ($bpp[$key] / 8);
+
+            // BITMAPINFOHEADER - 40 bytes
+            $BitmapInfoHeader[$key] = '';
+            $BitmapInfoHeader[$key] .= "\x28\x00\x00\x00";                // DWORD  biSize;
+            $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4);    // LONG   biWidth;
+            // The biHeight member specifies the combined
+            // height of the XOR and AND masks.
+            $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageHeights[$key] * 2, 4); // LONG   biHeight;
+            $BitmapInfoHeader[$key] .= "\x01\x00";                    // WORD   biPlanes;
+            $BitmapInfoHeader[$key] .= chr($bpp[$key]) . "\x00";              // wBitCount;
+            $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biCompression;
+            $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4);      // DWORD  biSizeImage;
+            $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biXPelsPerMeter;
+            $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biYPelsPerMeter;
+            $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrUsed;
+            $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrImportant;
+        }
+
+
+        $icondata = "\x00\x00";                    // idReserved;   // Reserved (must be 0)
+        $icondata .= "\x01\x00";                    // idType;	   // Resource Type (1 for icons)
+        $icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2);  // idCount;	  // How many images?
+
+        $dwImageOffset = 6 + (count($gd_image_array) * 16);
+        foreach (array_keys($gd_image_array) as $key) {
+            // ICONDIRENTRY   idEntries[1]; // An entry for each image (idCount of 'em)
+
+            $icondata .= chr($ImageWidths[$key]);           // bWidth;		  // Width, in pixels, of the image
+            $icondata .= chr($ImageHeights[$key]);          // bHeight;		 // Height, in pixels, of the image
+            $icondata .= chr($totalcolors[$key]);           // bColorCount;	 // Number of colors in image (0 if >=8bpp)
+            $icondata .= "\x00";                    // bReserved;	   // Reserved ( must be 0)
+
+            $icondata .= "\x01\x00";                  // wPlanes;		 // Color Planes
+            $icondata .= chr($bpp[$key]) . "\x00";            // wBitCount;	   // Bits per pixel
+
+            $dwBytesInRes = 40 + strlen($icXOR[$key]) + strlen($icAND[$key]);
+            $icondata .= phpthumb_functions::LittleEndian2String(
+                $dwBytesInRes,
+                4
+            );     // dwBytesInRes;	// How many bytes in this resource?
+
+            $icondata .= phpthumb_functions::LittleEndian2String(
+                $dwImageOffset,
+                4
+            );    // dwImageOffset;   // Where in the file is this image?
+            $dwImageOffset += strlen($BitmapInfoHeader[$key]);
+            $dwImageOffset += strlen($icXOR[$key]);
+            $dwImageOffset += strlen($icAND[$key]);
+        }
+
+        foreach (array_keys($gd_image_array) as $key) {
+            $icondata .= $BitmapInfoHeader[$key];
+            $icondata .= $icXOR[$key];
+            $icondata .= $icAND[$key];
+        }
+
+        return $icondata;
+    }
 }

Spacing +64 added lines, -64 removed lines

@@ -42,13 +42,13 @@ 
 	$blue = dechex($blue);
 
 	if (strlen($red) == 1) {
-		$red = '0' . $red;
+		$red = '0'.$red;
 	}
 	if (strlen($green) == 1) {
-		$green = '0' . $green;
+		$green = '0'.$green;
 	}
 	if (strlen($blue) == 1) {
-		$blue = '0' . $blue;
+		$blue = '0'.$blue;
 	}
 
 	return "$red$green$blue";
@@ -67,7 +67,7 @@ 
 	$couleur = couleur_html_to_hex($couleur);
 	$couleur = ltrim($couleur, '#');
 	if (strlen($couleur) === 3) {
-		$couleur = $couleur[0] . $couleur[0] . $couleur[1] . $couleur[1] . $couleur[2] . $couleur[2];
+		$couleur = $couleur[0].$couleur[0].$couleur[1].$couleur[1].$couleur[2].$couleur[2];
 	}
 	$retour = [];
 	$retour['red'] = hexdec(substr($couleur, 0, 2));
@@ -125,9 +125,9 @@ 
 	$var_G = ($G / 255);
 	$var_B = ($B / 255);
 
-	$var_Min = min($var_R, $var_G, $var_B);   //Min. value of RGB
-	$var_Max = max($var_R, $var_G, $var_B);   //Max. value of RGB
-	$del_Max = $var_Max - $var_Min;           //Delta RGB value
+	$var_Min = min($var_R, $var_G, $var_B); //Min. value of RGB
+	$var_Max = max($var_R, $var_G, $var_B); //Max. value of RGB
+	$del_Max = $var_Max - $var_Min; //Delta RGB value
 
 	$L = ($var_Max + $var_Min) / 2;
 
@@ -185,7 +185,7 @@ 
  */
 function _couleur_hsl_to_rgb($H, $S, $L) {
 	// helper
-	$hue_2_rgb = function ($v1, $v2, $vH) {
+	$hue_2_rgb = function($v1, $v2, $vH) {
 		if ($vH < 0) {
 			$vH += 1;
 		}
@@ -319,11 +319,11 @@ 
 		}
 	} elseif (
 		preg_match('@^data:image/([^;]*);base64,(.*)$@isS', $source, $regs)
-		&& ($extension = _image_trouver_extension_depuis_mime('image/' . $regs[1]))
+		&& ($extension = _image_trouver_extension_depuis_mime('image/'.$regs[1]))
 		&& in_array($extension, _image_extensions_acceptees_en_entree())
 	) {
 		# gerer img src="data:....base64"
-		$local = sous_repertoire(_DIR_VAR, 'image-data') . md5($regs[2]) . '.' . _image_extension_normalisee($extension);
+		$local = sous_repertoire(_DIR_VAR, 'image-data').md5($regs[2]).'.'._image_extension_normalisee($extension);
 		if (!file_exists($local)) {
 			ecrire_fichier($local, base64_decode($regs[2]));
 		}
@@ -340,7 +340,7 @@ 
 	// les protocoles web prennent au moins 3 lettres
 	if (tester_url_absolue($source)) {
 		include_spip('inc/distant');
-		$fichier = _DIR_RACINE . copie_locale($source);
+		$fichier = _DIR_RACINE.copie_locale($source);
 		if (!$fichier) {
 			return '';
 		}
@@ -442,9 +442,9 @@ 
 			// on garde la terminaison initiale car image simplement copiee
 			// et on postfixe son nom avec un md5 du path
 			$terminaison_dest = $terminaison;
-			$fichier_dest .= '-' . substr(md5("$identifiant"), 0, 5);
+			$fichier_dest .= '-'.substr(md5("$identifiant"), 0, 5);
 		} else {
-			$fichier_dest .= '-' . substr(md5("$identifiant-$effet"), 0, 5);
+			$fichier_dest .= '-'.substr(md5("$identifiant-$effet"), 0, 5);
 		}
 		$cache = sous_repertoire(_DIR_VAR, $cache);
 		$cache = sous_repertoire($cache, $effet);
@@ -455,7 +455,7 @@ 
 		$fichier_dest = substr($fichier_dest, 2);
 	}
 
-	$fichier_dest = $cache . $fichier_dest . '.' . $terminaison_dest;
+	$fichier_dest = $cache.$fichier_dest.'.'.$terminaison_dest;
 
 	$GLOBALS['images_calculees'][] = $fichier_dest;
 
@@ -491,14 +491,14 @@ 
 
 	if ($creer) {
 		spip_logger('images')->error(
-			'filtre image ' . ($fonction_creation ? reset($fonction_creation) : '') . "[$effet] sur $fichier",
+			'filtre image '.($fonction_creation ? reset($fonction_creation) : '')."[$effet] sur $fichier",
 		);
 	}
 
 	$term_fonction = _image_trouver_extension_pertinente($fichier);
-	$ret['fonction_imagecreatefrom'] = '_imagecreatefrom' . $term_fonction;
+	$ret['fonction_imagecreatefrom'] = '_imagecreatefrom'.$term_fonction;
 	$ret['fichier'] = $fichier;
-	$ret['fonction_image'] = '_image_image' . $terminaison_dest;
+	$ret['fonction_image'] = '_image_image'.$terminaison_dest;
 	$ret['fichier_dest'] = $fichier_dest;
 	$ret['format_source'] = _image_extension_normalisee($terminaison);
 	$ret['format_dest'] = $terminaison_dest;
@@ -775,7 +775,7 @@ 
 	if (!function_exists('imagepng')) {
 		return false;
 	}
-	$tmp = $fichier . '.tmp';
+	$tmp = $fichier.'.tmp';
 	$ret = imagepng($img, $tmp);
 	if (file_exists($tmp)) {
 		$taille_test = @getimagesize($tmp);
@@ -810,7 +810,7 @@ 
 	if (!function_exists('imagegif')) {
 		return false;
 	}
-	$tmp = $fichier . '.tmp';
+	$tmp = $fichier.'.tmp';
 	$ret = imagegif($img, $tmp);
 	if (file_exists($tmp)) {
 		$taille_test = @getimagesize($tmp);
@@ -850,7 +850,7 @@ 
 	if (!function_exists('imagejpeg')) {
 		return false;
 	}
-	$tmp = $fichier . '.tmp';
+	$tmp = $fichier.'.tmp';
 
 	// Enable interlancing
 	imageinterlace($img, true);
@@ -911,7 +911,7 @@ 
 	if (!function_exists('imagewebp')) {
 		return false;
 	}
-	$tmp = $fichier . '.tmp';
+	$tmp = $fichier.'.tmp';
 	$ret = imagewebp($img, $tmp, $qualite);
 	if (file_exists($tmp)) {
 		$taille_test = @getimagesize($tmp);
@@ -945,7 +945,7 @@ 
  */
 function _image_imagesvg($img, $fichier) {
 
-	$tmp = $fichier . '.tmp';
+	$tmp = $fichier.'.tmp';
 	if (!str_contains($img, '<')) {
 		$img = supprimer_timestamp($img);
 		if (!file_exists($img)) {
@@ -1002,14 +1002,14 @@ 
  */
 function _image_gd_output($img, $valeurs, $qualite = _IMG_GD_QUALITE, $fonction = null) {
 	if (is_null($fonction)) {
-		$fonction = '_image_image' . $valeurs['format_dest'];
+		$fonction = '_image_image'.$valeurs['format_dest'];
 	}
 	$ret = false;
 	#un flag pour reperer les images gravees
 	$lock = (
 		!statut_effacer_images_temporaires('get')
 		|| @file_exists($valeurs['fichier_dest'])
-		&& !@file_exists($valeurs['fichier_dest'] . '.src')
+		&& !@file_exists($valeurs['fichier_dest'].'.src')
 	);
 	if (
 		function_exists($fonction)
@@ -1021,7 +1021,7 @@ 
 		[$valeurs['hauteur_dest'], $valeurs['largeur_dest']] = taille_image($valeurs['fichier_dest']);
 		$valeurs['date'] = @filemtime($valeurs['fichier_dest']);
 		// pour la retrouver apres disparition
-		ecrire_fichier($valeurs['fichier_dest'] . '.src', serialize($valeurs), true);
+		ecrire_fichier($valeurs['fichier_dest'].'.src', serialize($valeurs), true);
 	}
 
 	return $ret;
@@ -1196,7 +1196,7 @@ 
 
 	// attributs deprecies. Transformer en CSS
 	if ($espace = extraire_attribut($tag, 'hspace')) {
-		$style = "margin:{$espace}px;" . $style;
+		$style = "margin:{$espace}px;".$style;
 		$tag = inserer_attribut($tag, 'hspace', '');
 	}
 
@@ -1319,7 +1319,7 @@ 
 	$image = $valeurs['fichier'];
 	$format = $valeurs['format_source'];
 	$destdir = dirname((string) $valeurs['fichier_dest']);
-	$destfile = basename((string) $valeurs['fichier_dest'], '.' . $valeurs['format_dest']);
+	$destfile = basename((string) $valeurs['fichier_dest'], '.'.$valeurs['format_dest']);
 
 	$format_sortie = $valeurs['format_dest'];
 
@@ -1351,7 +1351,7 @@ 
 
 	// Si l'image est de la taille demandee (ou plus petite), simplement la retourner
 	if ($srcWidth && $srcWidth <= $maxWidth && $srcHeight <= $maxHeight) {
-		$vignette = $destination . '.' . $format;
+		$vignette = $destination.'.'.$format;
 		@copy($image, $vignette);
 	}
 
@@ -1359,7 +1359,7 @@ 
 		include_spip('inc/svg');
 		if ($svg = svg_redimensionner($valeurs['fichier'], $destWidth, $destHeight)) {
 			$format_sortie = 'svg';
-			$vignette = $destination . '.' . $format_sortie;
+			$vignette = $destination.'.'.$format_sortie;
 			$valeurs['fichier_dest'] = $vignette;
 			_image_gd_output($svg, $valeurs);
 		}
@@ -1371,9 +1371,9 @@ 
 			define('_CONVERT_COMMAND', 'convert');
 		} // Securite : mes_options.php peut preciser le chemin absolu
 		if (!defined('_RESIZE_COMMAND')) {
-			define('_RESIZE_COMMAND', _CONVERT_COMMAND . ' -quality ' . _IMG_CONVERT_QUALITE . ' -orient Undefined -resize %xx%y! %src %dest');
+			define('_RESIZE_COMMAND', _CONVERT_COMMAND.' -quality '._IMG_CONVERT_QUALITE.' -orient Undefined -resize %xx%y! %src %dest');
 		}
-		$vignette = $destination . '.' . $format_sortie;
+		$vignette = $destination.'.'.$format_sortie;
 		$commande = str_replace(
 			['%x', '%y', '%src', '%dest'],
 			[
@@ -1389,7 +1389,7 @@ 
 		if (!@file_exists($vignette)) {
 			spip_logger('images')->info("echec convert sur $vignette");
 
-			return;  // echec commande
+			return; // echec commande
 		}
 	}
 
@@ -1406,7 +1406,7 @@ 
 		if (!$output) {
 			return;
 		}
-		$vignette = $output . DIRECTORY_SEPARATOR . basename($destination) . '.' . $format_sortie;
+		$vignette = $output.DIRECTORY_SEPARATOR.basename($destination).'.'.$format_sortie;
 
 		$imagick = new Imagick();
 		$imagick->readImage(realpath($image));
@@ -1415,7 +1415,7 @@ 
 			$destHeight,
 			Imagick::FILTER_LANCZOS,
 			1
-		);//, IMAGICK_FILTER_LANCZOS, _IMG_IMAGICK_QUALITE / 100);
+		); //, IMAGICK_FILTER_LANCZOS, _IMG_IMAGICK_QUALITE / 100);
 		$imagick->writeImage($vignette);
 
 		if (!@file_exists($vignette)) {
@@ -1424,7 +1424,7 @@ 
 			return;
 		}
 		// remettre le chemin relatif car c'est ce qu'attend SPIP pour la suite (en particlier action/tester)
-		$vignette = $destination . '.' . $format_sortie;
+		$vignette = $destination.'.'.$format_sortie;
 	}
 
 	// netpbm
@@ -1435,11 +1435,11 @@ 
 		if (_PNMSCALE_COMMAND == '') {
 			return;
 		}
-		$vignette = $destination . '.' . $format_sortie;
+		$vignette = $destination.'.'.$format_sortie;
 		$pnmtojpeg_command = str_replace('pnmscale', 'pnmtojpeg', (string) _PNMSCALE_COMMAND);
 		if ($format == 'jpg') {
 			$jpegtopnm_command = str_replace('pnmscale', 'jpegtopnm', (string) _PNMSCALE_COMMAND);
-			exec("$jpegtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+			exec("$jpegtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
 			if (!($s = @filesize($vignette))) {
 				spip_unlink($vignette);
 			}
@@ -1451,7 +1451,7 @@ 
 		} else {
 			if ($format == 'gif') {
 				$giftopnm_command = str_replace('pnmscale', 'giftopnm', (string) _PNMSCALE_COMMAND);
-				exec("$giftopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+				exec("$giftopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
 				if (!($s = @filesize($vignette))) {
 					spip_unlink($vignette);
 				}
@@ -1463,7 +1463,7 @@ 
 			} else {
 				if ($format == 'png') {
 					$pngtopnm_command = str_replace('pnmscale', 'pngtopnm', (string) _PNMSCALE_COMMAND);
-					exec("$pngtopnm_command $image | " . _PNMSCALE_COMMAND . " -width $destWidth | $pnmtojpeg_command > $vignette");
+					exec("$pngtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
 					if (!($s = @filesize($vignette))) {
 						spip_unlink($vignette);
 					}
@@ -1485,7 +1485,7 @@ 
 			return;
 		}
 		if (_IMG_GD_MAX_PIXELS && $srcWidth * $srcHeight > _IMG_GD_MAX_PIXELS) {
-			spip_logger('images')->info('vignette gd2 impossible : ' . $srcWidth * $srcHeight . 'pixels');
+			spip_logger('images')->info('vignette gd2 impossible : '.$srcWidth * $srcHeight.'pixels');
 
 			return;
 		}
@@ -1788,7 +1788,7 @@ 
 		// de l'image, de facon a tromper le cache du navigateur
 		// quand on fait supprimer/reuploader un logo
 		// (pas de filemtime si SAFE MODE)
-		$date = test_espace_prive() ? ('?' . $date) : '';
+		$date = test_espace_prive() ? ('?'.$date) : '';
 
 		return _image_ecrire_tag($image, ['src' => "$logo$date", 'width' => $destWidth, 'height' => $destHeight]);
 	}
@@ -1866,9 +1866,9 @@ 
 					$b = $argb['blue'];
 
 					if ($bpp[$key] == 32) {
-						$icXOR[$key] .= chr($b) . chr($g) . chr($r) . chr($a);
+						$icXOR[$key] .= chr($b).chr($g).chr($r).chr($a);
 					} elseif ($bpp[$key] === 24) {
-						$icXOR[$key] .= chr($b) . chr($g) . chr($r);
+						$icXOR[$key] .= chr($b).chr($g).chr($r);
 					}
 
 					if ($a < 128) {
@@ -1895,48 +1895,48 @@ 
 
 			// BITMAPINFOHEADER - 40 bytes
 			$BitmapInfoHeader[$key] = '';
-			$BitmapInfoHeader[$key] .= "\x28\x00\x00\x00";                // DWORD  biSize;
-			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4);    // LONG   biWidth;
+			$BitmapInfoHeader[$key] .= "\x28\x00\x00\x00"; // DWORD  biSize;
+			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4); // LONG   biWidth;
 			// The biHeight member specifies the combined
 			// height of the XOR and AND masks.
 			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageHeights[$key] * 2, 4); // LONG   biHeight;
-			$BitmapInfoHeader[$key] .= "\x01\x00";                    // WORD   biPlanes;
-			$BitmapInfoHeader[$key] .= chr($bpp[$key]) . "\x00";              // wBitCount;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biCompression;
-			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4);      // DWORD  biSizeImage;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biXPelsPerMeter;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // LONG   biYPelsPerMeter;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrUsed;
-			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00";                // DWORD  biClrImportant;
+			$BitmapInfoHeader[$key] .= "\x01\x00"; // WORD   biPlanes;
+			$BitmapInfoHeader[$key] .= chr($bpp[$key])."\x00"; // wBitCount;
+			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD  biCompression;
+			$BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4); // DWORD  biSizeImage;
+			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG   biXPelsPerMeter;
+			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG   biYPelsPerMeter;
+			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD  biClrUsed;
+			$BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD  biClrImportant;
 		}
 
 
-		$icondata = "\x00\x00";                    // idReserved;   // Reserved (must be 0)
-		$icondata .= "\x01\x00";                    // idType;	   // Resource Type (1 for icons)
-		$icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2);  // idCount;	  // How many images?
+		$icondata = "\x00\x00"; // idReserved;   // Reserved (must be 0)
+		$icondata .= "\x01\x00"; // idType;	   // Resource Type (1 for icons)
+		$icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2); // idCount;	  // How many images?
 
 		$dwImageOffset = 6 + (count($gd_image_array) * 16);
 		foreach (array_keys($gd_image_array) as $key) {
 			// ICONDIRENTRY   idEntries[1]; // An entry for each image (idCount of 'em)
 
-			$icondata .= chr($ImageWidths[$key]);           // bWidth;		  // Width, in pixels, of the image
-			$icondata .= chr($ImageHeights[$key]);          // bHeight;		 // Height, in pixels, of the image
-			$icondata .= chr($totalcolors[$key]);           // bColorCount;	 // Number of colors in image (0 if >=8bpp)
-			$icondata .= "\x00";                    // bReserved;	   // Reserved ( must be 0)
+			$icondata .= chr($ImageWidths[$key]); // bWidth;		  // Width, in pixels, of the image
+			$icondata .= chr($ImageHeights[$key]); // bHeight;		 // Height, in pixels, of the image
+			$icondata .= chr($totalcolors[$key]); // bColorCount;	 // Number of colors in image (0 if >=8bpp)
+			$icondata .= "\x00"; // bReserved;	   // Reserved ( must be 0)
 
-			$icondata .= "\x01\x00";                  // wPlanes;		 // Color Planes
-			$icondata .= chr($bpp[$key]) . "\x00";            // wBitCount;	   // Bits per pixel
+			$icondata .= "\x01\x00"; // wPlanes;		 // Color Planes
+			$icondata .= chr($bpp[$key])."\x00"; // wBitCount;	   // Bits per pixel
 
 			$dwBytesInRes = 40 + strlen($icXOR[$key]) + strlen($icAND[$key]);
 			$icondata .= phpthumb_functions::LittleEndian2String(
 				$dwBytesInRes,
 				4
-			);     // dwBytesInRes;	// How many bytes in this resource?
+			); // dwBytesInRes;	// How many bytes in this resource?
 
 			$icondata .= phpthumb_functions::LittleEndian2String(
 				$dwImageOffset,
 				4
-			);    // dwImageOffset;   // Where in the file is this image?
+			); // dwImageOffset;   // Where in the file is this image?
 			$dwImageOffset += strlen($BitmapInfoHeader[$key]);
 			$dwImageOffset += strlen($icXOR[$key]);
 			$dwImageOffset += strlen($icAND[$key]);

ecrire/inc/admin.php

Indentation +134 added lines, -134 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -44,29 +44,29 @@ 
  *     sinon code HTML de la page après le traitement effectué.
  **/
 function inc_admin_dist($script, $titre, $comment = '', $anonymous = false) {
-	$reprise = true;
-	if (
-		!isset($GLOBALS['meta'][$script])
-		|| !isset($GLOBALS['meta']['admin'])
-	) {
-		$reprise = false;
-		$res = debut_admin($script, $titre, $comment);
-		if ($res) {
-			return $res;
-		}
-		spip_logger()->info("meta: $script " . print_r($_POST, true));
-		ecrire_meta($script, serialize($_POST));
-	}
+    $reprise = true;
+    if (
+        !isset($GLOBALS['meta'][$script])
+        || !isset($GLOBALS['meta']['admin'])
+    ) {
+        $reprise = false;
+        $res = debut_admin($script, $titre, $comment);
+        if ($res) {
+            return $res;
+        }
+        spip_logger()->info("meta: $script " . print_r($_POST, true));
+        ecrire_meta($script, serialize($_POST));
+    }
 
-	$res = admin_verifie_session($script, $anonymous);
-	if ($res) {
-		return $res;
-	}
-	$base = charger_fonction($script, 'base');
-	$base($titre, $reprise);
-	fin_admin($script);
+    $res = admin_verifie_session($script, $anonymous);
+    if ($res) {
+        return $res;
+    }
+    $base = charger_fonction($script, 'base');
+    $base($titre, $reprise);
+    fin_admin($script);
 
-	return '';
+    return '';
 }
 
 /**
@@ -97,36 +97,36 @@ 
  *     Code HTML si message d'erreur, '' sinon;
  */
 function admin_verifie_session($script, $anonymous = false) {
-	include_spip('base/abstract_sql');
-	$pref = sprintf('_%d_', $GLOBALS['visiteur_session']['id_auteur']);
-	$signal = fichier_admin($script, "$script$pref");
-	$valeur = sql_getfetsel('valeur', 'spip_meta', "nom='admin'");
-	if ($valeur === null) {
-		ecrire_meta('admin', $signal, 'non');
-	} else {
-		if (
-			!$anonymous
-			&& $valeur != $signal
-			&& (
-				!preg_match('/^(.*)_(\d+)_/', (string) $GLOBALS['meta']['admin'], $l)
-				|| (int) $l[2] != $GLOBALS['visiteur_session']['id_auteur']
-			)
-		) {
-			include_spip('inc/minipres');
-			spip_logger()->info("refus de lancer $script, priorite a $valeur");
-			return minipres(_T('info_travaux_texte'), '', ['status' => 503]);
-		}
-	}
-	$journal = 'spip';
-	if (autoriser('configurer')) {
-		// c'est une action webmestre, soit par ftp soit par statut webmestre
-		$journal = 'webmestre';
-	}
-	// on pourrait statuer automatiquement les webmestres a l'init d'une action auth par ftp ... ?
+    include_spip('base/abstract_sql');
+    $pref = sprintf('_%d_', $GLOBALS['visiteur_session']['id_auteur']);
+    $signal = fichier_admin($script, "$script$pref");
+    $valeur = sql_getfetsel('valeur', 'spip_meta', "nom='admin'");
+    if ($valeur === null) {
+        ecrire_meta('admin', $signal, 'non');
+    } else {
+        if (
+            !$anonymous
+            && $valeur != $signal
+            && (
+                !preg_match('/^(.*)_(\d+)_/', (string) $GLOBALS['meta']['admin'], $l)
+                || (int) $l[2] != $GLOBALS['visiteur_session']['id_auteur']
+            )
+        ) {
+            include_spip('inc/minipres');
+            spip_logger()->info("refus de lancer $script, priorite a $valeur");
+            return minipres(_T('info_travaux_texte'), '', ['status' => 503]);
+        }
+    }
+    $journal = 'spip';
+    if (autoriser('configurer')) {
+        // c'est une action webmestre, soit par ftp soit par statut webmestre
+        $journal = 'webmestre';
+    }
+    // on pourrait statuer automatiquement les webmestres a l'init d'une action auth par ftp ... ?
 
-	spip_logger($journal)->info("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'));
+    spip_logger($journal)->info("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'));
 
-	return '';
+    return '';
 }
 
 /**
@@ -139,11 +139,11 @@ 
  *     Chemin du répertoire.
  **/
 function dir_admin() {
-	if (autoriser('configurer')) {
-		return _DIR_TMP;
-	} else {
-		return _DIR_TRANSFERT . $GLOBALS['visiteur_session']['login'] . '/';
-	}
+    if (autoriser('configurer')) {
+        return _DIR_TMP;
+    } else {
+        return _DIR_TRANSFERT . $GLOBALS['visiteur_session']['login'] . '/';
+    }
 }
 
 /**
@@ -160,8 +160,8 @@ 
  *     Nom du fichier
  **/
 function fichier_admin($action, $pref = 'admin_') {
-	return $pref .
-	substr(md5($action . (time() & ~2047) . $GLOBALS['visiteur_session']['login']), 0, 10);
+    return $pref .
+    substr(md5($action . (time() & ~2047) . $GLOBALS['visiteur_session']['login']), 0, 10);
 }
 
 /**
@@ -187,76 +187,76 @@ 
  *     sinon chaîne vide si déjà fait.
  **/
 function debut_admin($script, $action = '', $corps = '') {
-	if (
-		!$action
-		|| !autoriser('webmestre') && !autoriser('chargerftp')
-	) {
-		include_spip('inc/minipres');
+    if (
+        !$action
+        || !autoriser('webmestre') && !autoriser('chargerftp')
+    ) {
+        include_spip('inc/minipres');
 
-		return minipres();
-	} else {
-		$dir = dir_admin();
-		$signal = fichier_admin($script);
-		if (@file_exists($dir . $signal)) {
-			spip_logger()->info("Action admin: $action");
+        return minipres();
+    } else {
+        $dir = dir_admin();
+        $signal = fichier_admin($script);
+        if (@file_exists($dir . $signal)) {
+            spip_logger()->info("Action admin: $action");
 
-			return '';
-		}
-		include_spip('inc/minipres');
+            return '';
+        }
+        include_spip('inc/minipres');
 
-		// Si on est un super-admin, un bouton de validation suffit
-		// sauf dans les cas destroy
-		if (
-			(autoriser('webmestre') || $script === 'repair')
-			&& $script != 'delete_all'
-		) {
-			if (_request('validation_admin') == $signal) {
-				spip_logger()->info("Action super-admin: $action");
+        // Si on est un super-admin, un bouton de validation suffit
+        // sauf dans les cas destroy
+        if (
+            (autoriser('webmestre') || $script === 'repair')
+            && $script != 'delete_all'
+        ) {
+            if (_request('validation_admin') == $signal) {
+                spip_logger()->info("Action super-admin: $action");
 
-				return '';
-			}
-			$corps .= '<input type="hidden" name="validation_admin" value="' . $signal . '" />';
-			$suivant = _T('bouton_valider');
-			$js = '';
-		} else {
-			// cet appel permet d'assurer un copier-coller du nom du repertoire a creer dans tmp (esj)
-			// l'insertion du script a cet endroit n'est pas xhtml licite
-			// mais evite de l'embarquer dans toutes les pages minipres
-			$corps .= http_script('', 'spip_barre.js');
+                return '';
+            }
+            $corps .= '<input type="hidden" name="validation_admin" value="' . $signal . '" />';
+            $suivant = _T('bouton_valider');
+            $js = '';
+        } else {
+            // cet appel permet d'assurer un copier-coller du nom du repertoire a creer dans tmp (esj)
+            // l'insertion du script a cet endroit n'est pas xhtml licite
+            // mais evite de l'embarquer dans toutes les pages minipres
+            $corps .= http_script('', 'spip_barre.js');
 
-			$corps .= '<fieldset><legend>'
-				. _T('info_authentification_ftp')
-				. aider('ftp_auth')
-				. "</legend>\n<label for='fichier'>"
-				. _T('info_creer_repertoire')
-				. "</label>\n"
-				. "<span id='signal' class='formo'>" . $signal . '</span>'
-				. "<input type='hidden' id='fichier' name='fichier' value='"
-				. $signal
-				. "' />"
-				. _T('info_creer_repertoire_2', ['repertoire' => joli_repertoire($dir)])
-				. '</fieldset>';
+            $corps .= '<fieldset><legend>'
+                . _T('info_authentification_ftp')
+                . aider('ftp_auth')
+                . "</legend>\n<label for='fichier'>"
+                . _T('info_creer_repertoire')
+                . "</label>\n"
+                . "<span id='signal' class='formo'>" . $signal . '</span>'
+                . "<input type='hidden' id='fichier' name='fichier' value='"
+                . $signal
+                . "' />"
+                . _T('info_creer_repertoire_2', ['repertoire' => joli_repertoire($dir)])
+                . '</fieldset>';
 
-			$suivant = _T('bouton_recharger_page');
+            $suivant = _T('bouton_recharger_page');
 
-			// code volontairement tordu:
-			// provoquer la copie dans le presse papier du nom du repertoire
-			// en remettant a vide le champ pour que ca marche aussi en cas
-			// de JavaScript inactif.
-			$js = " onload='var range=document.createRange(); var signal = document.getElementById(\"signal\"); var userSelection = window.getSelection(); range.setStart(signal,0); range.setEnd(signal,1); userSelection.addRange(range);'";
-		}
+            // code volontairement tordu:
+            // provoquer la copie dans le presse papier du nom du repertoire
+            // en remettant a vide le champ pour que ca marche aussi en cas
+            // de JavaScript inactif.
+            $js = " onload='var range=document.createRange(); var signal = document.getElementById(\"signal\"); var userSelection = window.getSelection(); range.setStart(signal,0); range.setEnd(signal,1); userSelection.addRange(range);'";
+        }
 
-		// admin/xxx correspond
-		// a exec/base_xxx de preference
-		// et exec/xxx sinon (compat)
-		if (tester_url_ecrire("base_$script")) {
-			$script = "base_$script";
-		}
-		$form = copy_request($script, $corps, $suivant);
-		$info_action = _T('info_action', ['action' => "$action"]);
+        // admin/xxx correspond
+        // a exec/base_xxx de preference
+        // et exec/xxx sinon (compat)
+        if (tester_url_ecrire("base_$script")) {
+            $script = "base_$script";
+        }
+        $form = copy_request($script, $corps, $suivant);
+        $info_action = _T('info_action', ['action' => "$action"]);
 
-		return minipres($info_action, $form, ['onload' => $js]);
-	}
+        return minipres($info_action, $form, ['onload' => $js]);
+    }
 }
 
 /**
@@ -267,13 +267,13 @@ 
  *     Nom de l'action (en base) qui a été exécutée
  **/
 function fin_admin($action) {
-	$signal = dir_admin() . fichier_admin($action);
-	spip_unlink($signal);
-	if ($action != 'delete_all') {
-		effacer_meta($action);
-		effacer_meta('admin');
-		spip_logger()->info("efface les meta admin et $action");
-	}
+    $signal = dir_admin() . fichier_admin($action);
+    spip_unlink($signal);
+    if ($action != 'delete_all') {
+        effacer_meta($action);
+        effacer_meta('admin');
+        spip_logger()->info("efface les meta admin et $action");
+    }
 }
 
 /**
@@ -292,14 +292,14 @@ 
  *     Code HTML du formulaire
  **/
 function copy_request($script, $suite, $submit = '') {
-	include_spip('inc/filtres');
-	foreach ([...$_POST, ...$_GET] as $n => $c) {
-		if (!in_array($n, ['fichier', 'exec', 'validation_admin']) && !is_array($c)) {
-			$suite .= "\n<input type='hidden' name='" . spip_htmlspecialchars($n) . "' value='" .
-				entites_html($c) .
-				"'  />";
-		}
-	}
+    include_spip('inc/filtres');
+    foreach ([...$_POST, ...$_GET] as $n => $c) {
+        if (!in_array($n, ['fichier', 'exec', 'validation_admin']) && !is_array($c)) {
+            $suite .= "\n<input type='hidden' name='" . spip_htmlspecialchars($n) . "' value='" .
+                entites_html($c) .
+                "'  />";
+        }
+    }
 
-	return generer_form_ecrire($script, $suite, '', $submit);
+    return generer_form_ecrire($script, $suite, '', $submit);
 }

Spacing +11 added lines, -11 removed lines

@@ -54,7 +54,7 @@ 
 		if ($res) {
 			return $res;
 		}
-		spip_logger()->info("meta: $script " . print_r($_POST, true));
+		spip_logger()->info("meta: $script ".print_r($_POST, true));
 		ecrire_meta($script, serialize($_POST));
 	}
 
@@ -124,7 +124,7 @@ 
 	}
 	// on pourrait statuer automatiquement les webmestres a l'init d'une action auth par ftp ... ?
 
-	spip_logger($journal)->info("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'));
+	spip_logger($journal)->info("admin $pref".($valeur ? ' (reprise)' : ' (init)'));
 
 	return '';
 }
@@ -142,7 +142,7 @@ 
 	if (autoriser('configurer')) {
 		return _DIR_TMP;
 	} else {
-		return _DIR_TRANSFERT . $GLOBALS['visiteur_session']['login'] . '/';
+		return _DIR_TRANSFERT.$GLOBALS['visiteur_session']['login'].'/';
 	}
 }
 
@@ -160,8 +160,8 @@ 
  *     Nom du fichier
  **/
 function fichier_admin($action, $pref = 'admin_') {
-	return $pref .
-	substr(md5($action . (time() & ~2047) . $GLOBALS['visiteur_session']['login']), 0, 10);
+	return $pref.
+	substr(md5($action.(time() & ~2047).$GLOBALS['visiteur_session']['login']), 0, 10);
 }
 
 /**
@@ -197,7 +197,7 @@ 
 	} else {
 		$dir = dir_admin();
 		$signal = fichier_admin($script);
-		if (@file_exists($dir . $signal)) {
+		if (@file_exists($dir.$signal)) {
 			spip_logger()->info("Action admin: $action");
 
 			return '';
@@ -215,7 +215,7 @@ 
 
 				return '';
 			}
-			$corps .= '<input type="hidden" name="validation_admin" value="' . $signal . '" />';
+			$corps .= '<input type="hidden" name="validation_admin" value="'.$signal.'" />';
 			$suivant = _T('bouton_valider');
 			$js = '';
 		} else {
@@ -230,7 +230,7 @@ 
 				. "</legend>\n<label for='fichier'>"
 				. _T('info_creer_repertoire')
 				. "</label>\n"
-				. "<span id='signal' class='formo'>" . $signal . '</span>'
+				. "<span id='signal' class='formo'>".$signal.'</span>'
 				. "<input type='hidden' id='fichier' name='fichier' value='"
 				. $signal
 				. "' />"
@@ -267,7 +267,7 @@ 
  *     Nom de l'action (en base) qui a été exécutée
  **/
 function fin_admin($action) {
-	$signal = dir_admin() . fichier_admin($action);
+	$signal = dir_admin().fichier_admin($action);
 	spip_unlink($signal);
 	if ($action != 'delete_all') {
 		effacer_meta($action);
@@ -295,8 +295,8 @@ 
 	include_spip('inc/filtres');
 	foreach ([...$_POST, ...$_GET] as $n => $c) {
 		if (!in_array($n, ['fichier', 'exec', 'validation_admin']) && !is_array($c)) {
-			$suite .= "\n<input type='hidden' name='" . spip_htmlspecialchars($n) . "' value='" .
-				entites_html($c) .
+			$suite .= "\n<input type='hidden' name='".spip_htmlspecialchars($n)."' value='".
+				entites_html($c).
 				"'  />";
 		}
 	}

ecrire/inc/queue.php

Indentation +477 added lines, -477 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_logger('queue')->info(
-				'arguments job errones / longueur ' . strlen($args) . ' vs ' . strlen($arguments) . ' / valeur : '
-				. var_export($arguments, true)
-			);
-		}
-	}
-
-	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_logger('queue')->info(
+                'arguments job errones / longueur ' . strlen($args) . ' vs ' . strlen($arguments) . ' / valeur : '
+                . var_export($arguments, true)
+            );
+        }
+    }
+
+    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,38 +234,38 @@ 
  */
 function queue_start_job($row) {
 
-	$logger = spip_logger('queue');
-
-	// deserialiser les arguments
-	$args = unserialize($row['args']);
-	if (!is_array($args)) {
-		$logger->info('arguments job errones ' . var_export($row, true));
-		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)) {
-		$logger->info("fonction $fonction ($inclure) inexistante " . var_export($row, true));
-
-		return false;
-	}
-
-	$logger->info('queue [' . $row['id_job'] . "]: $fonction() start");
-	$res = $fonction(...$args);
-	$logger->info('queue [' . $row['id_job'] . "]: $fonction() end");
-
-	return $res;
+    $logger = spip_logger('queue');
+
+    // deserialiser les arguments
+    $args = unserialize($row['args']);
+    if (!is_array($args)) {
+        $logger->info('arguments job errones ' . var_export($row, true));
+        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)) {
+        $logger->info("fonction $fonction ($inclure) inexistante " . var_export($row, true));
+
+        return false;
+    }
+
+    $logger->info('queue [' . $row['id_job'] . "]: $fonction() start");
+    $res = $fonction(...$args);
+    $logger->info('queue [' . $row['id_job'] . "]: $fonction() end");
+
+    return $res;
 }
 
 /**
@@ -292,90 +292,90 @@ 
  *     - true : une planification a été faite.
  */
 function queue_schedule($force_jobs = null) {
-	$time = time();
-	$logger = spip_logger('jq');
-	if (defined('_DEBUG_BLOCK_QUEUE')) {
-		$logger->debug('_DEBUG_BLOCK_QUEUE : schedule stop');
-
-		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))) {
-		$logger->debug('queue_sleep_time_to_next_job');
-
-		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;
-
-	$logger->debug("JQ schedule $time / $end_time");
-
-	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))) {
-				#$logger->info("JQ schedule job ".$nbj." OK");
-				// 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);
-			}
-		}
-		$logger->debug('JQ schedule job end time ' . $time);
-	} while ($nbj < _JQ_MAX_JOBS_EXECUTE && $row && $time < $end_time);
-	$logger->debug('JQ schedule end time ' . time());
-
-	if ($row = array_shift($res)) {
-		queue_update_next_job_time(0); // on sait qu'il y a encore des jobs a lancer ASAP
-		$logger->debug('JQ encore !');
-	} else {
-		queue_update_next_job_time();
-	}
-
-	return true;
+    $time = time();
+    $logger = spip_logger('jq');
+    if (defined('_DEBUG_BLOCK_QUEUE')) {
+        $logger->debug('_DEBUG_BLOCK_QUEUE : schedule stop');
+
+        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))) {
+        $logger->debug('queue_sleep_time_to_next_job');
+
+        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;
+
+    $logger->debug("JQ schedule $time / $end_time");
+
+    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))) {
+                #$logger->info("JQ schedule job ".$nbj." OK");
+                // 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);
+            }
+        }
+        $logger->debug('JQ schedule job end time ' . $time);
+    } while ($nbj < _JQ_MAX_JOBS_EXECUTE && $row && $time < $end_time);
+    $logger->debug('JQ schedule end time ' . time());
+
+    if ($row = array_shift($res)) {
+        queue_update_next_job_time(0); // on sait qu'il y a encore des jobs a lancer ASAP
+        $logger->debug('JQ encore !');
+    } else {
+        queue_update_next_job_time();
+    }
+
+    return true;
 }
 
 /**
@@ -393,21 +393,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']));
 }
 
 /**
@@ -417,10 +417,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();
 }
 
 
@@ -437,18 +437,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;
 }
 
 /**
@@ -462,62 +462,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_logger('job_mort')->error('queue_close_job car _JQ_PENDING depuis +180s : ' . print_r($row, true));
-		}
-	}
-
-	// 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_logger('job_mort')->error('queue_close_job car _JQ_PENDING depuis +180s : ' . print_r($row, true));
+        }
+    }
+
+    // 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;
 }
 
 
@@ -528,26 +528,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();
 }
 
 /**
@@ -564,60 +564,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;
 }
 
 /**
@@ -626,73 +626,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;
 }

Spacing +33 added lines, -34 removed lines

@@ -69,7 +69,7 @@ 
 	$md5args = md5($arguments);
 
 	// si pas de date programee, des que possible
-	$duplicate_where = 'status=' . intval(_JQ_SCHEDULED) . ' AND ';
+	$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
@@ -94,9 +94,8 @@ 
 			'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))
+				$duplicate_where.'fonction='.sql_quote($function)
+				. (($no_duplicate === 'function_only') ? '' : ' AND md5args='.sql_quote($md5args).' AND inclure='.sql_quote($file))
 		))
 	) {
 		return $id_job;
@@ -108,9 +107,9 @@ 
 	// doit s'effacer
 	if (
 		$no_duplicate
-		&& ($id_prev = sql_getfetsel('id_job', 'spip_jobs', 'id_job<' . intval($id_job) . " AND $duplicate_where"))
+		&& ($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));
+		sql_delete('spip_jobs', 'id_job='.intval($id_job));
 
 		return $id_prev;
 	}
@@ -122,10 +121,10 @@ 
 	// 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));
+		$args = sql_getfetsel('args', 'spip_jobs', 'id_job='.intval($id_job));
 		if ($args !== $arguments) {
 			spip_logger('queue')->info(
-				'arguments job errones / longueur ' . strlen($args) . ' vs ' . strlen($arguments) . ' / valeur : '
+				'arguments job errones / longueur '.strlen($args).' vs '.strlen($arguments).' / valeur : '
 				. var_export($arguments, true)
 			);
 		}
@@ -154,7 +153,7 @@ 
 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') . ')');
+	sql_delete('spip_jobs_liens', 'id_job NOT IN ('.sql_get_select('id_job', 'spip_jobs').')');
 	include_spip('inc/genie');
 	genie_queue_watch_dist();
 }
@@ -170,8 +169,8 @@ 
 	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)))
+		($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 ?
@@ -221,7 +220,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));
 }
 
 /**
@@ -239,7 +238,7 @@ 
 	// deserialiser les arguments
 	$args = unserialize($row['args']);
 	if (!is_array($args)) {
-		$logger->info('arguments job errones ' . var_export($row, true));
+		$logger->info('arguments job errones '.var_export($row, true));
 		return false;
 	}
 
@@ -256,14 +255,14 @@ 
 	}
 
 	if (!function_exists($fonction)) {
-		$logger->info("fonction $fonction ($inclure) inexistante " . var_export($row, true));
+		$logger->info("fonction $fonction ($inclure) inexistante ".var_export($row, true));
 
 		return false;
 	}
 
-	$logger->info('queue [' . $row['id_job'] . "]: $fonction() start");
+	$logger->info('queue ['.$row['id_job']."]: $fonction() start");
 	$res = $fonction(...$args);
-	$logger->info('queue [' . $row['id_job'] . "]: $fonction() end");
+	$logger->info('queue ['.$row['id_job']."]: $fonction() end");
 
 	return $res;
 }
@@ -337,19 +336,19 @@ 
 	// 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);
+		$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);
+		$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));
+	$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))) {
+			if (sql_delete('spip_jobs', 'id_job='.intval($row['id_job']).' AND status='.intval(_JQ_SCHEDULED))) {
 				#$logger->info("JQ schedule job ".$nbj." OK");
 				// on reinsert dans la base aussitot avec un status=_JQ_PENDING
 				$row['status'] = _JQ_PENDING;
@@ -364,9 +363,9 @@ 
 				queue_close_job($row, $time, $result);
 			}
 		}
-		$logger->debug('JQ schedule job end time ' . $time);
+		$logger->debug('JQ schedule job end time '.$time);
 	} while ($nbj < _JQ_MAX_JOBS_EXECUTE && $row && $time < $end_time);
-	$logger->debug('JQ schedule end time ' . time());
+	$logger->debug('JQ schedule end time '.time());
 
 	if ($row = array_shift($res)) {
 		queue_update_next_job_time(0); // on sait qu'il y a encore des jobs a lancer ASAP
@@ -405,9 +404,9 @@ 
 		}
 	}
 	// purger ses liens eventuels avec des objets
-	sql_delete('spip_jobs_liens', 'id_job=' . intval($row['id_job']));
+	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']));
+	sql_delete('spip_jobs', 'id_job='.intval($row['id_job']));
 }
 
 /**
@@ -480,18 +479,18 @@ 
 	$res = sql_allfetsel(
 		'*',
 		'spip_jobs',
-		'status=' . intval(_JQ_PENDING) . ' AND date<' . sql_quote(date('Y-m-d H:i:s', $time - 180))
+		'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_logger('job_mort')->error('queue_close_job car _JQ_PENDING depuis +180s : ' . print_r($row, true));
+			spip_logger('job_mort')->error('queue_close_job car _JQ_PENDING depuis +180s : '.print_r($row, true));
 		}
 	}
 
 	// 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');
+		$date = sql_getfetsel('date', 'spip_jobs', 'status='.intval(_JQ_SCHEDULED), '', 'date', '0,1');
 		$next = strtotime($date);
 	}
 	if (!is_null($next_time)) {
@@ -504,7 +503,7 @@ 
 		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))
+				'status='.intval(_JQ_SCHEDULED).' AND date<'.sql_quote(date('Y-m-d H:i:s', $time))
 			);
 		} elseif ($next <= $time) {
 			$nb_jobs_scheduled++;
@@ -573,7 +572,7 @@ 
 	}
 
 	// 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'])) {
+	if (file_exists($lock = _DIR_TMP.'cron.lock') && !(@filemtime($lock) < $_SERVER['REQUEST_TIME'])) {
 		return $texte;
 	}
 
@@ -645,7 +644,7 @@ 
 				$port = 80;
 		}
 		$fp = @fsockopen(
-			$scheme . $parts['host'],
+			$scheme.$parts['host'],
 			$parts['port'] ?? $port,
 			$errno,
 			$errstr,
@@ -655,13 +654,13 @@ 
 		if ($fp) {
 			$host_sent = $parts['host'];
 			if (isset($parts['port']) && $parts['port'] !== $port) {
-				$host_sent .= ':' . $parts['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";
+			$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');

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_logger()->info('pipelines desactives: impossible de produire ' . _CACHE_PLUGINS_OPT);
-	}
+    if (@is_readable(_CACHE_PLUGINS_OPT)) {
+        include_once(_CACHE_PLUGINS_OPT);
+    } else {
+        spip_logger()->info('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_logger()->error("Fonction genie_$nom introuvable");
-					}
-				}
-			}
-			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_logger()->error("Fonction genie_$nom introuvable");
+                    }
+                }
+            }
+            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));
 }

Spacing +48 added lines, -48 removed lines

@@ -21,7 +21,7 @@ 
 
 /** 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.
@@ -378,7 +378,7 @@ 
 				if ($dir) {
 					$dir .= '/';
 				}
-				$dir .= 'procure:' . $procure['nom'];
+				$dir .= 'procure:'.$procure['nom'];
 
 				$procure['etat'] = '?';
 				$procure['dir_type'] = $resume['dir_type'];
@@ -558,7 +558,7 @@ 
 		$plug = $resume['dir'];
 		$k = $infos[$dir_type][$plug];
 
-		$plug = constant($dir_type) . $plug;
+		$plug = constant($dir_type).$plug;
 		if (!isset($msg[$p])) {
 			if (isset($resume['erreur']) && $resume['erreur']) {
 				$msg[$p] = [$resume['erreur']];
@@ -601,10 +601,10 @@ 
 		$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[$plug] = '<li>'._T('plugin_impossible_activer', ['plugin' => $plug])
+				. '<ul><li>'.implode('</li><li>', $msg).'</li></ul></li>';
 		}
-		$list = '<ul>' . join("\n", $list) . '</ul>';
+		$list = '<ul>'.join("\n", $list).'</ul>';
 	}
 	if ($raz) {
 		effacer_meta('plugin_erreur_activation');
@@ -718,13 +718,13 @@ 
 			if ($minimum_inclus && spip_version_compare($version, $minimum, '<')) {
 				return _T("plugin_{$balise}_{$type}", [
 					'plugin' => $nom,
-					'version' => ' &ge; ' . $minimum
+					'version' => ' &ge; '.$minimum
 				]);
 			}
 			if (!$minimum_inclus && spip_version_compare($version, $minimum, '<=')) {
 				return _T("plugin_{$balise}_{$type}", [
 					'plugin' => $nom,
-					'version' => ' &gt; ' . $minimum
+					'version' => ' &gt; '.$minimum
 				]);
 			}
 		}
@@ -733,13 +733,13 @@ 
 			if ($maximum_inclus && spip_version_compare($version, $maximum, '>')) {
 				return _T("plugin_{$balise}_{$type}", [
 					'plugin' => $nom,
-					'version' => ' &le; ' . $maximum
+					'version' => ' &le; '.$maximum
 				]);
 			}
 			if (!$maximum_inclus && spip_version_compare($version, $maximum, '>=')) {
 				return _T("plugin_{$balise}_plugin", [
 					'plugin' => $nom,
-					'version' => ' &lt; ' . $maximum
+					'version' => ' &lt; '.$maximum
 				]);
 			}
 		}
@@ -758,7 +758,7 @@ 
 		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>";
 }
 
 
@@ -857,7 +857,7 @@ 
 	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'] . ')' : '');
+			$header[] = $p.($resume['version'] ? '('.$resume['version'].')' : '');
 		}
 		if ($resume['dir']) {
 			foreach ($infos[$resume['dir_type']][$resume['dir']]['lib'] as $l) {
@@ -882,11 +882,11 @@ 
 	$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
+			_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');
+		@unlink(_DIR_VAR.'config.txt');
 	}
 	// generer charger_plugins_chemin.php
 	plugins_precompile_chemin($plugin_valides, $ordre);
@@ -940,7 +940,7 @@ 
 			// 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 . "/'";
+			$dir = $dir_type.".'".$plug."/'";
 
 			$prefix = strtoupper(preg_replace(',\W,', '_', $info['prefix']));
 			if (
@@ -951,7 +951,7 @@ 
 				if (!$info['chemin']) {
 					$chemins['public'][] = "_DIR_PLUGIN_$prefix";
 					$chemins['prive'][] = "_DIR_PLUGIN_$prefix";
-					if (is_dir(constant($dir_type) . $plug . '/squelettes/')) {
+					if (is_dir(constant($dir_type).$plug.'/squelettes/')) {
 						$chemins['public'][] = "_DIR_PLUGIN_{$prefix}.'squelettes/'";
 					}
 				}
@@ -973,13 +973,13 @@ 
 								$dir = '';
 							}
 							if (strlen($dir)) {
-								$dir = rtrim($dir, '/') . '/';
+								$dir = rtrim($dir, '/').'/';
 							}
 							if (!isset($chemin['type']) || $chemin['type'] == 'public') {
-								$chemins['public'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
+								$chemins['public'][] = "_DIR_PLUGIN_$prefix".(strlen($dir) ? ".'$dir'" : '');
 							}
 							if (!isset($chemin['type']) || $chemin['type'] == 'prive') {
-								$chemins['prive'][] = "_DIR_PLUGIN_$prefix" . (strlen($dir) ? ".'$dir'" : '');
+								$chemins['prive'][] = "_DIR_PLUGIN_$prefix".(strlen($dir) ? ".'$dir'" : '');
 							}
 						}
 					}
@@ -988,11 +988,11 @@ 
 		}
 	}
 	if (count($chemins['public']) || count($chemins['prive'])) {
-		$contenu .= 'if (_DIR_RESTREINT) _chemin([' . implode(
+		$contenu .= 'if (_DIR_RESTREINT) _chemin(['.implode(
 			',',
 			array_reverse($chemins['public'])
-		) . "]);\n"
-			. 'else _chemin([' . implode(',', array_reverse($chemins['prive'])) . "]);\n";
+		)."]);\n"
+			. 'else _chemin(['.implode(',', array_reverse($chemins['prive']))."]);\n";
 	}
 
 	ecrire_fichier_php(_CACHE_PLUGINS_PATH, $contenu);
@@ -1041,7 +1041,7 @@ 
 					&& !str_contains($dir, ':')
 					&& file_exists("$dir$plug/paquet.xml") // uniquement pour les paquet.xml
 				) {
-					if (is_readable("$dir$plug/" . ($file = $info['prefix'] . '_' . $charge . '.php'))) {
+					if (is_readable("$dir$plug/".($file = $info['prefix'].'_'.$charge.'.php'))) {
 						$info[$charge] = [$file];
 					}
 				}
@@ -1056,7 +1056,7 @@ 
 						) {
 							unset($info[$charge][$k]);
 						} else {
-							$_file = $root_dir_type . ".'$plug/$file'";
+							$_file = $root_dir_type.".'$plug/$file'";
 							$contenu[$charge] .= "include_once_check($_file);\n";
 						}
 					}
@@ -1066,7 +1066,7 @@ 
 		}
 	}
 
-	$contenu['options'] = "define('_PLUGINS_HASH','" . md5($sign) . "');\n" . $contenu['options'];
+	$contenu['options'] = "define('_PLUGINS_HASH','".md5($sign)."');\n".$contenu['options'];
 	$contenu['fonctions'] .= plugin_ongletbouton('boutons_plugins', $boutons)
 		. plugin_ongletbouton('onglets_plugins', $onglets);
 
@@ -1101,12 +1101,12 @@ 
 		define("_UPDATED_$nom", $val);
 		define("_UPDATED_md5_$nom", $md5);
 	}
-	$val = "unserialize('" . str_replace("'", "\'", $val) . "')";
+	$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"
+		. "function md5_$nom(){return defined('_UPDATED_md5_$nom')?_UPDATED_md5_$nom:'".$md5."';}\n"
 		. "}\n";
 }
 
@@ -1129,7 +1129,7 @@ 
 	if (@is_readable(_CACHE_PLUGINS_OPT)) {
 		include_once(_CACHE_PLUGINS_OPT);
 	} else {
-		spip_logger()->info('pipelines desactives: impossible de produire ' . _CACHE_PLUGINS_OPT);
+		spip_logger()->info('pipelines desactives: impossible de produire '._CACHE_PLUGINS_OPT);
 	}
 }
 
@@ -1166,7 +1166,7 @@ 
 			$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'] . '_');
+			$prefix = (($info['prefix'] == 'spip') ? '' : $info['prefix'].'_');
 			if (isset($info['pipeline']) && is_array($info['pipeline'])) {
 				foreach ($info['pipeline'] as $pipe) {
 					$nom = $pipe['nom'];
@@ -1200,7 +1200,7 @@ 
 						}
 						if (isset($pipe['inclure'])) {
 							$GLOBALS['spip_matrice']["$prefix$action"] =
-								"$root_dir_type:$plug/" . $pipe['inclure'];
+								"$root_dir_type:$plug/".$pipe['inclure'];
 						}
 					}
 				}
@@ -1210,7 +1210,7 @@ 
 					$prepend_code['taches_generales_cron'] = '';
 				}
 				foreach ($info['genie'] as $genie) {
-					$nom = $prefix . $genie['nom'];
+					$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";
@@ -1228,13 +1228,13 @@ 
 				}
 				foreach ($info['style'] as $style) {
 					if (isset($style['path']) && $style['path']) {
-						$code = "if (\$f=timestamp(direction_css(find_in_path('" . addslashes($style['path']) . "')))) ";
+						$code = "if (\$f=timestamp(direction_css(find_in_path('".addslashes($style['path'])."')))) ";
 					} else {
-						$code = "if (\$f='" . addslashes($style['url']) . "') ";
+						$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 .= ' media="'.addslashes($style['media']).'"';
 					}
 					$code .= "/>';\n";
 					if ($style['type'] != 'prive') {
@@ -1254,9 +1254,9 @@ 
 			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']) . "'))) ";
+						$code = "if (\$f=timestamp(find_in_path('".addslashes($script['path'])."'))) ";
 					} else {
-						$code = "if (\$f='" . addslashes($script['url']) . "') ";
+						$code = "if (\$f='".addslashes($script['url'])."') ";
 					}
 					$code .= "\$val .= '<script src=\"'.\$f.'\" type=\"text/javascript\"></script>';\n";
 					if ($script['type'] != 'prive') {
@@ -1319,10 +1319,10 @@ 
 		unset($GLOBALS['spip_pipeline']['all']);
 		$all_pipes = trim(array_shift($a));
 		if ($all_pipes) {
-			$all_pipes = '|' . ltrim($all_pipes, '|');
+			$all_pipes = '|'.ltrim($all_pipes, '|');
 		}
 		if (count($a)) {
-			$all_pipes_end = '||' . array_shift($a);
+			$all_pipes_end = '||'.array_shift($a);
 		}
 	}
 	$content = '';
@@ -1339,7 +1339,7 @@ 
 		// Eclater le pipeline en filtres et appliquer chaque filtre
 		foreach ($pipe as $fonc) {
 			$fonc = trim($fonc);
-			$s_call .= '$val = minipipe(\'' . $fonc . '\', $val);' . "\n";
+			$s_call .= '$val = minipipe(\''.$fonc.'\', $val);'."\n";
 			if (isset($GLOBALS['spip_matrice'][$fonc])) {
 				$file = $GLOBALS['spip_matrice'][$fonc];
 				$file = "'$file'";
@@ -1350,7 +1350,7 @@ 
 					if (defined($root_dir)) {
 						$dir = $root_dir;
 					}
-					$file = str_replace($regs[0], "'." . $dir . ".'", $file);
+					$file = str_replace($regs[0], "'.".$dir.".'", $file);
 					$file = str_replace("''.", '', $file);
 					$file = str_replace(constant($dir), '', $file);
 				}
@@ -1363,7 +1363,7 @@ 
 		$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" : '')
+			. ((isset($prepend_code[$action]) && strlen($prepend_code[$action])) ? trim($prepend_code[$action])."\n" : '')
 			. $s_call
 			. "return \$val;\n}\n";
 	}
@@ -1419,9 +1419,9 @@ 
 					$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 = ltrim(textebrut($trace)."\n".$result);
+						$trace = '    '.str_replace("\n", "\n    ", $trace);
+						echo "\n".($ok ? 'OK  ' : '/!\ ').textebrut($titre)."\n",
 						  $trace,
 						  "\n";
 					}
@@ -1456,15 +1456,15 @@ 
 		$GLOBALS['fichier_php_compile_recent'] = 0;
 	}
 
-	$contenu = '<' . '?php' . "\n" . $comment . "\nif (defined('_ECRIRE_INC_VERSION')) {\n" . $contenu . "}\n?" . '>';
+	$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';
+			$fichier_tmp = substr($nom, 0, -4).'.tmp.php';
 		}
 		else {
-			$fichier_tmp = $nom . '.tmp';
+			$fichier_tmp = $nom.'.tmp';
 		}
 		file_put_contents($fichier_tmp, $contenu);
 		if (md5_file($nom) == md5_file($fichier_tmp)) {

ecrire/inc/distant.php

Indentation +1135 added lines, -1135 removed lines

@@ -17,32 +17,32 @@ 
  * @package SPIP\Core\Distant
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_INC_DISTANT_VERSION_HTTP')) {
-	define('_INC_DISTANT_VERSION_HTTP', 'HTTP/1.0');
+    define('_INC_DISTANT_VERSION_HTTP', 'HTTP/1.0');
 }
 if (!defined('_INC_DISTANT_CONTENT_ENCODING')) {
-	define('_INC_DISTANT_CONTENT_ENCODING', 'gzip');
+    define('_INC_DISTANT_CONTENT_ENCODING', 'gzip');
 }
 if (!defined('_INC_DISTANT_USER_AGENT')) {
-	define('_INC_DISTANT_USER_AGENT', 'SPIP-' . $GLOBALS['spip_version_affichee'] . ' (' . $GLOBALS['home_server'] . ')');
+    define('_INC_DISTANT_USER_AGENT', 'SPIP-' . $GLOBALS['spip_version_affichee'] . ' (' . $GLOBALS['home_server'] . ')');
 }
 if (!defined('_INC_DISTANT_MAX_SIZE')) {
-	define('_INC_DISTANT_MAX_SIZE', 2_097_152);
+    define('_INC_DISTANT_MAX_SIZE', 2_097_152);
 }
 if (!defined('_INC_DISTANT_CONNECT_TIMEOUT')) {
-	define('_INC_DISTANT_CONNECT_TIMEOUT', 10);
+    define('_INC_DISTANT_CONNECT_TIMEOUT', 10);
 }
 
 define('_REGEXP_COPIE_LOCALE', ',' 	.
-	preg_replace(
-		'@^https?:@',
-		'https?:',
-		($GLOBALS['meta']['adresse_site'] ?? '')
-	)
-	. '/?spip.php[?]action=acceder_document.*file=(.*)$,');
+    preg_replace(
+        '@^https?:@',
+        'https?:',
+        ($GLOBALS['meta']['adresse_site'] ?? '')
+    )
+    . '/?spip.php[?]action=acceder_document.*file=(.*)$,');
 
 //@define('_COPIE_LOCALE_MAX_SIZE',2097152); // poids (inc/utils l'a fait)
 
@@ -71,106 +71,106 @@ 
  */
 function copie_locale($source, $mode = 'auto', $local = null, $taille_max = null, $callback_valider_url = null) {
 
-	// si c'est la protection de soi-meme, retourner le path
-	if ($mode !== 'force' && preg_match(_REGEXP_COPIE_LOCALE, $source, $match)) {
-		$source = substr((string) _DIR_IMG, strlen((string) _DIR_RACINE)) . urldecode($match[1]);
-
-		return @file_exists($source) ? $source : false;
-	}
-
-	if (is_null($local)) {
-		$local = fichier_copie_locale($source);
-	} else {
-		if (_DIR_RACINE && strncmp((string) _DIR_RACINE, $local, strlen((string) _DIR_RACINE)) == 0) {
-			$local = substr($local, strlen((string) _DIR_RACINE));
-		}
-	}
-
-	// si $local = '' c'est un fichier refuse par fichier_copie_locale(),
-	// par exemple un fichier qui ne figure pas dans nos documents ;
-	// dans ce cas on n'essaie pas de le telecharger pour ensuite echouer
-	if (!$local) {
-		return false;
-	}
-
-	$localrac = _DIR_RACINE . $local;
-	$t = ($mode === 'force') ? false : @file_exists($localrac);
-
-	// test d'existence du fichier
-	if ($mode === 'test') {
-		return $t ? $local : '';
-	}
-
-	// sinon voir si on doit/peut le telecharger
-	if ($local === $source || !tester_url_absolue($source)) {
-		return $t ? $local : '';
-	}
-
-	if ($mode === 'modif' || !$t) {
-		// passer par un fichier temporaire unique pour gerer les echecs en cours de recuperation
-		// et des eventuelles recuperations concurantes
-		include_spip('inc/acces');
-		if (!$taille_max) {
-			$taille_max = _COPIE_LOCALE_MAX_SIZE;
-		}
-		$localrac_tmp = $localrac . '.tmp';
-		$res = recuperer_url(
-			$source,
-			['file' => $localrac_tmp, 'taille_max' => $taille_max, 'if_modified_since' => $t ? filemtime($localrac) : '']
-		);
-
-		$logger = spip_logger('distant');
-		if (!$res || !$res['length'] && $res['status'] != 304) {
-			$logger->notice("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'));
-			@unlink($localrac_tmp);
-		} else {
-			$logger->info("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status']);
-		}
-		if (!$res || !$res['length']) {
-			// si $t c'est sans doute juste un not-modified-since
-			return $t ? $local : false;
-		}
-
-		// si option valider url, verifions que l'URL finale est acceptable
-		if (
-			$callback_valider_url
-			&& is_callable($callback_valider_url)
-			&& !$callback_valider_url($res['url'])
-		) {
-			$logger->notice('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp");
-			@unlink($localrac_tmp);
-			return $t ? $local : false;
-		}
-
-		// on peut renommer le fichier tmp
-		@rename($localrac_tmp, $localrac);
-
-		// si on retrouve l'extension
-		if (
-			!empty($res['headers'])
-			&& ($extension = distant_trouver_extension_selon_headers($source, $res['headers']))
-			&& ($sanitizer = charger_fonction($extension, 'sanitizer', true))
-		) {
-			$sanitizer($localrac);
-		}
-
-		// pour une eventuelle indexation
-		pipeline(
-			'post_edition',
-			[
-				'args' => [
-					'operation' => 'copie_locale',
-					'source' => $source,
-					'fichier' => $local,
-					'http_res' => $res['length'],
-					'url' => $res['url'],
-				],
-				'data' => null
-			]
-		);
-	}
-
-	return $local;
+    // si c'est la protection de soi-meme, retourner le path
+    if ($mode !== 'force' && preg_match(_REGEXP_COPIE_LOCALE, $source, $match)) {
+        $source = substr((string) _DIR_IMG, strlen((string) _DIR_RACINE)) . urldecode($match[1]);
+
+        return @file_exists($source) ? $source : false;
+    }
+
+    if (is_null($local)) {
+        $local = fichier_copie_locale($source);
+    } else {
+        if (_DIR_RACINE && strncmp((string) _DIR_RACINE, $local, strlen((string) _DIR_RACINE)) == 0) {
+            $local = substr($local, strlen((string) _DIR_RACINE));
+        }
+    }
+
+    // si $local = '' c'est un fichier refuse par fichier_copie_locale(),
+    // par exemple un fichier qui ne figure pas dans nos documents ;
+    // dans ce cas on n'essaie pas de le telecharger pour ensuite echouer
+    if (!$local) {
+        return false;
+    }
+
+    $localrac = _DIR_RACINE . $local;
+    $t = ($mode === 'force') ? false : @file_exists($localrac);
+
+    // test d'existence du fichier
+    if ($mode === 'test') {
+        return $t ? $local : '';
+    }
+
+    // sinon voir si on doit/peut le telecharger
+    if ($local === $source || !tester_url_absolue($source)) {
+        return $t ? $local : '';
+    }
+
+    if ($mode === 'modif' || !$t) {
+        // passer par un fichier temporaire unique pour gerer les echecs en cours de recuperation
+        // et des eventuelles recuperations concurantes
+        include_spip('inc/acces');
+        if (!$taille_max) {
+            $taille_max = _COPIE_LOCALE_MAX_SIZE;
+        }
+        $localrac_tmp = $localrac . '.tmp';
+        $res = recuperer_url(
+            $source,
+            ['file' => $localrac_tmp, 'taille_max' => $taille_max, 'if_modified_since' => $t ? filemtime($localrac) : '']
+        );
+
+        $logger = spip_logger('distant');
+        if (!$res || !$res['length'] && $res['status'] != 304) {
+            $logger->notice("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'));
+            @unlink($localrac_tmp);
+        } else {
+            $logger->info("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status']);
+        }
+        if (!$res || !$res['length']) {
+            // si $t c'est sans doute juste un not-modified-since
+            return $t ? $local : false;
+        }
+
+        // si option valider url, verifions que l'URL finale est acceptable
+        if (
+            $callback_valider_url
+            && is_callable($callback_valider_url)
+            && !$callback_valider_url($res['url'])
+        ) {
+            $logger->notice('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp");
+            @unlink($localrac_tmp);
+            return $t ? $local : false;
+        }
+
+        // on peut renommer le fichier tmp
+        @rename($localrac_tmp, $localrac);
+
+        // si on retrouve l'extension
+        if (
+            !empty($res['headers'])
+            && ($extension = distant_trouver_extension_selon_headers($source, $res['headers']))
+            && ($sanitizer = charger_fonction($extension, 'sanitizer', true))
+        ) {
+            $sanitizer($localrac);
+        }
+
+        // pour une eventuelle indexation
+        pipeline(
+            'post_edition',
+            [
+                'args' => [
+                    'operation' => 'copie_locale',
+                    'source' => $source,
+                    'fichier' => $local,
+                    'http_res' => $res['length'],
+                    'url' => $res['url'],
+                ],
+                'data' => null
+            ]
+        );
+    }
+
+    return $local;
 }
 
 /**
@@ -185,97 +185,97 @@ 
  *   url ou false en cas d'echec
  */
 function valider_url_distante($url, $known_hosts = []) {
-	if (!function_exists('protocole_verifier')) {
-		include_spip('inc/filtres_mini');
-	}
-
-	if (!protocole_verifier($url, ['http', 'https'])) {
-		return false;
-	}
-
-	$parsed_url = parse_url($url);
-	if (!$parsed_url || empty($parsed_url['host'])) {
-		return false;
-	}
-
-	if (isset($parsed_url['user']) || isset($parsed_url['pass'])) {
-		return false;
-	}
-
-	if (false !== strpbrk($parsed_url['host'], ':#?[]')) {
-		return false;
-	}
-
-	if (!is_array($known_hosts)) {
-		$known_hosts = [$known_hosts];
-	}
-	$known_hosts[] = $GLOBALS['meta']['adresse_site'];
-	$known_hosts[] = url_de_base();
-	$known_hosts = pipeline('declarer_hosts_distants', $known_hosts);
-
-	$is_known_host = false;
-	foreach ($known_hosts as $known_host) {
-		$parse_known = parse_url((string) $known_host);
-		if (
-			$parse_known
-			&& strtolower($parse_known['host']) === strtolower($parsed_url['host'])
-		) {
-			$is_known_host = true;
-			break;
-		}
-	}
-
-	if (!$is_known_host) {
-		$host = trim($parsed_url['host'], '.');
-		if (! $ip = filter_var($host, FILTER_VALIDATE_IP)) {
-			$ip = gethostbyname($host);
-			if ($ip === $host) {
-				// Error condition for gethostbyname()
-				$ip = false;
-			}
-			if ($records = dns_get_record($host)) {
-				foreach ($records as $record) {
-					// il faut que le TTL soit suffisant afin d'etre certain que le copie_locale eventuel qui suit
-					// se fasse sur la meme IP
-					if ($record['ttl'] < 10) {
-						$ip = false;
-						break;
-					}
-				}
-			}
-			else {
-				$ip = false;
-			}
-		}
-		if ($ip && ! filter_var($ip, FILTER_VALIDATE_IP, FILTER_FLAG_NO_PRIV_RANGE | FILTER_FLAG_NO_RES_RANGE)) {
-			return false;
-		}
-	}
-
-	if (empty($parsed_url['port'])) {
-		return $url;
-	}
-
-	$port = $parsed_url['port'];
-	if ($port === 80 || $port === 443 || $port === 8080) {
-		return $url;
-	}
-
-	if ($is_known_host) {
-		foreach ($known_hosts as $known_host) {
-			$parse_known = parse_url((string) $known_host);
-			if (
-				$parse_known
-				&& !empty($parse_known['port'])
-				&& strtolower($parse_known['host']) === strtolower($parsed_url['host'])
-				&& $parse_known['port'] == $port
-			) {
-				return $url;
-			}
-		}
-	}
-
-	return false;
+    if (!function_exists('protocole_verifier')) {
+        include_spip('inc/filtres_mini');
+    }
+
+    if (!protocole_verifier($url, ['http', 'https'])) {
+        return false;
+    }
+
+    $parsed_url = parse_url($url);
+    if (!$parsed_url || empty($parsed_url['host'])) {
+        return false;
+    }
+
+    if (isset($parsed_url['user']) || isset($parsed_url['pass'])) {
+        return false;
+    }
+
+    if (false !== strpbrk($parsed_url['host'], ':#?[]')) {
+        return false;
+    }
+
+    if (!is_array($known_hosts)) {
+        $known_hosts = [$known_hosts];
+    }
+    $known_hosts[] = $GLOBALS['meta']['adresse_site'];
+    $known_hosts[] = url_de_base();
+    $known_hosts = pipeline('declarer_hosts_distants', $known_hosts);
+
+    $is_known_host = false;
+    foreach ($known_hosts as $known_host) {
+        $parse_known = parse_url((string) $known_host);
+        if (
+            $parse_known
+            && strtolower($parse_known['host']) === strtolower($parsed_url['host'])
+        ) {
+            $is_known_host = true;
+            break;
+        }
+    }
+
+    if (!$is_known_host) {
+        $host = trim($parsed_url['host'], '.');
+        if (! $ip = filter_var($host, FILTER_VALIDATE_IP)) {
+            $ip = gethostbyname($host);
+            if ($ip === $host) {
+                // Error condition for gethostbyname()
+                $ip = false;
+            }
+            if ($records = dns_get_record($host)) {
+                foreach ($records as $record) {
+                    // il faut que le TTL soit suffisant afin d'etre certain que le copie_locale eventuel qui suit
+                    // se fasse sur la meme IP
+                    if ($record['ttl'] < 10) {
+                        $ip = false;
+                        break;
+                    }
+                }
+            }
+            else {
+                $ip = false;
+            }
+        }
+        if ($ip && ! filter_var($ip, FILTER_VALIDATE_IP, FILTER_FLAG_NO_PRIV_RANGE | FILTER_FLAG_NO_RES_RANGE)) {
+            return false;
+        }
+    }
+
+    if (empty($parsed_url['port'])) {
+        return $url;
+    }
+
+    $port = $parsed_url['port'];
+    if ($port === 80 || $port === 443 || $port === 8080) {
+        return $url;
+    }
+
+    if ($is_known_host) {
+        foreach ($known_hosts as $known_host) {
+            $parse_known = parse_url((string) $known_host);
+            if (
+                $parse_known
+                && !empty($parse_known['port'])
+                && strtolower($parse_known['host']) === strtolower($parsed_url['host'])
+                && $parse_known['port'] == $port
+            ) {
+                return $url;
+            }
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -295,87 +295,87 @@ 
  */
 function prepare_donnees_post($donnees, $boundary = '') {
 
-	// permettre a la fonction qui a demande le post de formater elle meme ses donnees
-	// pour un appel soap par exemple
-	// l'entete est separe des donnees par un double retour a la ligne
-	// on s'occupe ici de passer tous les retours lignes (\r\n, \r ou \n) en \r\n
-	$chaine = '';
-	if (is_string($donnees) && strlen($donnees)) {
-		$entete = '';
-		// on repasse tous les \r\n et \r en simples \n
-		$donnees = str_replace("\r\n", "\n", $donnees);
-		$donnees = str_replace("\r", "\n", $donnees);
-		// un double retour a la ligne signifie la fin de l'entete et le debut des donnees
-		$p = strpos($donnees, "\n\n");
-		if ($p !== false) {
-			$entete = str_replace("\n", "\r\n", substr($donnees, 0, $p + 1));
-			$donnees = substr($donnees, $p + 2);
-		}
-		$chaine = str_replace("\n", "\r\n", $donnees);
-	} else {
-		/* boundary automatique */
-		// Si on a plus de 500 octects de donnees, on "boundarise"
-		if ($boundary === '') {
-			$taille = 0;
-			foreach ($donnees as $cle => $valeur) {
-				if (is_array($valeur)) {
-					foreach ($valeur as $val2) {
-						$taille += strlen((string) $val2);
-					}
-				} else {
-					// faut-il utiliser spip_strlen() dans inc/charsets ?
-					$taille += strlen((string) $valeur);
-				}
-			}
-			if ($taille > 500) {
-				$boundary = substr(md5(random_int(0, mt_getrandmax()) . 'spip'), 0, 8);
-			}
-		}
-
-		if (is_string($boundary) && strlen($boundary)) {
-			// fabrique une chaine HTTP pour un POST avec boundary
-			$entete = "Content-Type: multipart/form-data; boundary=$boundary\r\n";
-			if (is_array($donnees)) {
-				foreach ($donnees as $cle => $valeur) {
-					if (is_array($valeur)) {
-						foreach ($valeur as $val2) {
-							$chaine .= "\r\n--$boundary\r\n";
-							$chaine .= "Content-Disposition: form-data; name=\"{$cle}[]\"\r\n";
-							$chaine .= "\r\n";
-							$chaine .= $val2;
-						}
-					} else {
-						$chaine .= "\r\n--$boundary\r\n";
-						$chaine .= "Content-Disposition: form-data; name=\"$cle\"\r\n";
-						$chaine .= "\r\n";
-						$chaine .= $valeur;
-					}
-				}
-				$chaine .= "\r\n--$boundary\r\n";
-			}
-		} else {
-			// fabrique une chaine HTTP simple pour un POST
-			$entete = "Content-Type: application/x-www-form-urlencoded\r\n";
-			if (is_array($donnees)) {
-				$chaines = [];
-				foreach ($donnees as $cle => $valeur) {
-					if (is_array($valeur)) {
-						foreach ($valeur as $val2) {
-							$chaines[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
-						}
-					} else {
-						$chaines[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
-					}
-				}
-				$chaine = implode('&', $chaines);
-				unset($chaines);
-			} else {
-				$chaine = $donnees;
-			}
-		}
-	}
-
-	return [$entete, $chaine];
+    // permettre a la fonction qui a demande le post de formater elle meme ses donnees
+    // pour un appel soap par exemple
+    // l'entete est separe des donnees par un double retour a la ligne
+    // on s'occupe ici de passer tous les retours lignes (\r\n, \r ou \n) en \r\n
+    $chaine = '';
+    if (is_string($donnees) && strlen($donnees)) {
+        $entete = '';
+        // on repasse tous les \r\n et \r en simples \n
+        $donnees = str_replace("\r\n", "\n", $donnees);
+        $donnees = str_replace("\r", "\n", $donnees);
+        // un double retour a la ligne signifie la fin de l'entete et le debut des donnees
+        $p = strpos($donnees, "\n\n");
+        if ($p !== false) {
+            $entete = str_replace("\n", "\r\n", substr($donnees, 0, $p + 1));
+            $donnees = substr($donnees, $p + 2);
+        }
+        $chaine = str_replace("\n", "\r\n", $donnees);
+    } else {
+        /* boundary automatique */
+        // Si on a plus de 500 octects de donnees, on "boundarise"
+        if ($boundary === '') {
+            $taille = 0;
+            foreach ($donnees as $cle => $valeur) {
+                if (is_array($valeur)) {
+                    foreach ($valeur as $val2) {
+                        $taille += strlen((string) $val2);
+                    }
+                } else {
+                    // faut-il utiliser spip_strlen() dans inc/charsets ?
+                    $taille += strlen((string) $valeur);
+                }
+            }
+            if ($taille > 500) {
+                $boundary = substr(md5(random_int(0, mt_getrandmax()) . 'spip'), 0, 8);
+            }
+        }
+
+        if (is_string($boundary) && strlen($boundary)) {
+            // fabrique une chaine HTTP pour un POST avec boundary
+            $entete = "Content-Type: multipart/form-data; boundary=$boundary\r\n";
+            if (is_array($donnees)) {
+                foreach ($donnees as $cle => $valeur) {
+                    if (is_array($valeur)) {
+                        foreach ($valeur as $val2) {
+                            $chaine .= "\r\n--$boundary\r\n";
+                            $chaine .= "Content-Disposition: form-data; name=\"{$cle}[]\"\r\n";
+                            $chaine .= "\r\n";
+                            $chaine .= $val2;
+                        }
+                    } else {
+                        $chaine .= "\r\n--$boundary\r\n";
+                        $chaine .= "Content-Disposition: form-data; name=\"$cle\"\r\n";
+                        $chaine .= "\r\n";
+                        $chaine .= $valeur;
+                    }
+                }
+                $chaine .= "\r\n--$boundary\r\n";
+            }
+        } else {
+            // fabrique une chaine HTTP simple pour un POST
+            $entete = "Content-Type: application/x-www-form-urlencoded\r\n";
+            if (is_array($donnees)) {
+                $chaines = [];
+                foreach ($donnees as $cle => $valeur) {
+                    if (is_array($valeur)) {
+                        foreach ($valeur as $val2) {
+                            $chaines[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
+                        }
+                    } else {
+                        $chaines[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
+                    }
+                }
+                $chaine = implode('&', $chaines);
+                unset($chaines);
+            } else {
+                $chaine = $donnees;
+            }
+        }
+    }
+
+    return [$entete, $chaine];
 }
 
 /**
@@ -386,19 +386,19 @@ 
  */
 function url_to_ascii($url_idn) {
 
-	if ($parts = parse_url($url_idn)) {
-		$host = $parts['host'];
-		if (!preg_match(',^[a-z0-9_\.\-]+$,i', $host)) {
-			$converter = new ToIdn();
-			$host_ascii = $converter->convert($host);
-			$url_idn = explode($host, $url_idn, 2);
-			$url_idn = implode($host_ascii, $url_idn);
-		}
-		// et on urlencode les char utf si besoin dans le path
-		$url_idn = preg_replace_callback('/[^\x20-\x7f]/', fn($match) => urlencode((string) $match[0]), $url_idn);
-	}
-
-	return $url_idn;
+    if ($parts = parse_url($url_idn)) {
+        $host = $parts['host'];
+        if (!preg_match(',^[a-z0-9_\.\-]+$,i', $host)) {
+            $converter = new ToIdn();
+            $host_ascii = $converter->convert($host);
+            $url_idn = explode($host, $url_idn, 2);
+            $url_idn = implode($host_ascii, $url_idn);
+        }
+        // et on urlencode les char utf si besoin dans le path
+        $url_idn = preg_replace_callback('/[^\x20-\x7f]/', fn($match) => urlencode((string) $match[0]), $url_idn);
+    }
+
+    return $url_idn;
 }
 
 /**
@@ -440,229 +440,229 @@ 
  *     string file : nom du fichier si enregistre dans un fichier
  */
 function recuperer_url($url, $options = []) {
-	// Conserve la mémoire de la méthode fournit éventuellement
-	$methode_demandee = $options['methode'] ?? '';
-	$default = [
-		'transcoder' => false,
-		'methode' => 'GET',
-		'taille_max' => null,
-		'headers' => [],
-		'datas' => '',
-		'boundary' => '',
-		'refuser_gz' => false,
-		'if_modified_since' => '',
-		'uri_referer' => '',
-		'file' => '',
-		'follow_location' => 10,
-		'version_http' => _INC_DISTANT_VERSION_HTTP,
-	];
-	$options = array_merge($default, $options);
-	// copier directement dans un fichier ?
-	$copy = $options['file'];
-
-	if ($options['methode'] == 'HEAD') {
-		$options['taille_max'] = 0;
-	}
-	if (is_null($options['taille_max'])) {
-		$options['taille_max'] = $copy ? _COPIE_LOCALE_MAX_SIZE : _INC_DISTANT_MAX_SIZE;
-	}
-
-	$logger = spip_logger('distant');
-	$logger->debug('recuperer_url ' . $options['methode'] . " sur $url");
-
-	// Ajout des en-têtes spécifiques si besoin
-	$formatted_data = '';
-	if (!empty($options['headers'])) {
-		foreach ($options['headers'] as $champ => $valeur) {
-			$formatted_data .= $champ . ': ' . $valeur . "\r\n";
-		}
-	}
-
-	if (!empty($options['datas'])) {
-		[$head, $postdata] = prepare_donnees_post($options['datas'], $options['boundary']);
-		$head .= $formatted_data;
-		if (stripos($head, 'Content-Length:') === false) {
-			$head .= 'Content-Length: ' . strlen((string) $postdata) . "\r\n";
-		}
-		$formatted_data = $head . "\r\n" . $postdata;
-		if (
-			strlen((string) $postdata) && !$methode_demandee
-		) {
-			$options['methode'] = 'POST';
-		}
-	} elseif ($formatted_data) {
-		$formatted_data .= "\r\n";
-	}
-
-	// Accepter les URLs au format feed:// ou qui ont oublie le http:// ou les urls relatives au protocole
-	$url = preg_replace(',^feed://,i', 'http://', $url);
-	if (!tester_url_absolue($url)) {
-		$url = 'http://' . $url;
-	} elseif (str_starts_with($url, '//')) {
-		$url = 'http:' . $url;
-	}
-
-	$url = url_to_ascii($url);
-
-	$result = [
-		'status' => 0,
-		'headers' => '',
-		'page' => '',
-		'length' => 0,
-		'last_modified' => '',
-		'location' => '',
-		'url' => $url
-	];
-
-	// si on ecrit directement dans un fichier, pour ne pas manipuler en memoire refuser gz
-	$refuser_gz = ($options['refuser_gz'] || $copy);
-
-	// ouvrir la connexion et envoyer la requete et ses en-tetes
-	[$handle, $fopen] = init_http(
-		$options['methode'],
-		$url,
-		$refuser_gz,
-		$options['uri_referer'],
-		$formatted_data,
-		$options['version_http'],
-		$options['if_modified_since']
-	);
-	if (!$handle) {
-		$logger->error("ECHEC init_http $url");
-
-		return false;
-	}
-
-	// Sauf en fopen, envoyer le flux d'entree
-	// et recuperer les en-tetes de reponses
-	if (!$fopen) {
-		$res = recuperer_entetes_complets($handle, $options['if_modified_since']);
-		if (!$res) {
-			fclose($handle);
-			$t = @parse_url($url);
-			$host = $t['host'];
-			// Chinoisierie inexplicable pour contrer
-			// les actions liberticides de l'empire du milieu
-			if (
-				!need_proxy($host)
-				&& ($res = @file_get_contents($url))
-			) {
-				$result['length'] = strlen($res);
-				if ($copy) {
-					ecrire_fichier($copy, $res);
-					$result['file'] = $copy;
-				} else {
-					$result['page'] = $res;
-				}
-				$res = [
-					'status' => 200,
-				];
-			} else {
-				$logger->error("ECHEC chinoiserie $url");
-				return false;
-			}
-		} elseif ($res['location'] && $options['follow_location']) {
-			$options['follow_location']--;
-			fclose($handle);
-			include_spip('inc/filtres');
-			$url = suivre_lien($url, $res['location']);
-
-			// une redirection doit se faire en GET, sauf status explicite 307 ou 308 qui indique de garder la meme methode
-			if (
-				$options['methode'] !== 'GET'
-				&& (empty($res['status']) || !in_array($res['status'], [307, 308]))
-			) {
-				$options['methode'] = 'GET';
-				$options['datas'] = '';
-			}
-			$logger->debug('recuperer_url recommence ' . $options['methode'] . " sur $url");
-
-			return recuperer_url($url, $options);
-		} elseif ($res['status'] !== 200) {
-			$logger->info('HTTP status ' . $res['status'] . " pour $url");
-		}
-		$result['status'] = $res['status'];
-		if (isset($res['headers'])) {
-			$result['headers'] = $res['headers'];
-		}
-		if (isset($res['last_modified'])) {
-			$result['last_modified'] = $res['last_modified'];
-		}
-		if (isset($res['location'])) {
-			$result['location'] = $res['location'];
-		}
-		if (isset($res['content_length'])) {
-			$result['content_length'] = $res['content_length'];
-		}
-	}
-
-	// on ne veut que les entetes
-	if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
-		$logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR));
-		return $result;
-	}
-
-
-	// s'il faut deballer, le faire via un fichier temporaire
-	// sinon la memoire explose pour les gros flux
-
-	$gz = false;
-	if (preg_match(",\bContent-Encoding: .*gzip,is", (string) $result['headers'])) {
-		$gz = (_DIR_TMP . md5(uniqid(random_int(0, mt_getrandmax()))) . '.tmp.gz');
-	}
-
-	// si on n'a pas deja récupéré le contenu par une methode detournée
-	if (!$result['length']) {
-		$taille_max = $options['taille_max'];
-		if (isset($result['content_length'])
-		  && !empty($result['content_length'])
-		  && ($result['content_length'] < $taille_max)) {
-			$taille_max = $result['content_length'];
-		}
-		$res = recuperer_body($handle, $taille_max, $gz ?: $copy);
-		fclose($handle);
-		if ($copy) {
-			$result['length'] = $res;
-			$result['file'] = $copy;
-		} elseif ($res) {
-			$result['page'] = &$res;
-			$result['length'] = strlen($result['page']);
-		}
-		if (!$result['status']) {
-			$result['status'] = 200; // on a reussi, donc !
-		}
-	}
-	if (!$result['page']) {
-		return $result;
-	}
-
-	// Decompresser au besoin
-	if ($gz) {
-		$result['page'] = implode('', gzfile($gz));
-		$result['length'] = strlen($result['page']);
-		// et annuler le content-length qui correspond à la version gzip
-		if (isset($result['content_length'])) {
-			unset($result['content_length']);
-		}
-		supprimer_fichier($gz);
-	}
-
-	// Faut-il l'importer dans notre charset local ?
-	if ($options['transcoder']) {
-		include_spip('inc/charsets');
-		$result['page'] = transcoder_page($result['page'], $result['headers']);
-	}
-
-	try {
-		$trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
-	} catch (JsonException $e) {
-		$trace = [];
-		$logger->error('Failed to parse Json data : ' . $e->getMessage());
-	}
-	$trace['page'] = '...';
-	$logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR));
-
-	return $result;
+    // Conserve la mémoire de la méthode fournit éventuellement
+    $methode_demandee = $options['methode'] ?? '';
+    $default = [
+        'transcoder' => false,
+        'methode' => 'GET',
+        'taille_max' => null,
+        'headers' => [],
+        'datas' => '',
+        'boundary' => '',
+        'refuser_gz' => false,
+        'if_modified_since' => '',
+        'uri_referer' => '',
+        'file' => '',
+        'follow_location' => 10,
+        'version_http' => _INC_DISTANT_VERSION_HTTP,
+    ];
+    $options = array_merge($default, $options);
+    // copier directement dans un fichier ?
+    $copy = $options['file'];
+
+    if ($options['methode'] == 'HEAD') {
+        $options['taille_max'] = 0;
+    }
+    if (is_null($options['taille_max'])) {
+        $options['taille_max'] = $copy ? _COPIE_LOCALE_MAX_SIZE : _INC_DISTANT_MAX_SIZE;
+    }
+
+    $logger = spip_logger('distant');
+    $logger->debug('recuperer_url ' . $options['methode'] . " sur $url");
+
+    // Ajout des en-têtes spécifiques si besoin
+    $formatted_data = '';
+    if (!empty($options['headers'])) {
+        foreach ($options['headers'] as $champ => $valeur) {
+            $formatted_data .= $champ . ': ' . $valeur . "\r\n";
+        }
+    }
+
+    if (!empty($options['datas'])) {
+        [$head, $postdata] = prepare_donnees_post($options['datas'], $options['boundary']);
+        $head .= $formatted_data;
+        if (stripos($head, 'Content-Length:') === false) {
+            $head .= 'Content-Length: ' . strlen((string) $postdata) . "\r\n";
+        }
+        $formatted_data = $head . "\r\n" . $postdata;
+        if (
+            strlen((string) $postdata) && !$methode_demandee
+        ) {
+            $options['methode'] = 'POST';
+        }
+    } elseif ($formatted_data) {
+        $formatted_data .= "\r\n";
+    }
+
+    // Accepter les URLs au format feed:// ou qui ont oublie le http:// ou les urls relatives au protocole
+    $url = preg_replace(',^feed://,i', 'http://', $url);
+    if (!tester_url_absolue($url)) {
+        $url = 'http://' . $url;
+    } elseif (str_starts_with($url, '//')) {
+        $url = 'http:' . $url;
+    }
+
+    $url = url_to_ascii($url);
+
+    $result = [
+        'status' => 0,
+        'headers' => '',
+        'page' => '',
+        'length' => 0,
+        'last_modified' => '',
+        'location' => '',
+        'url' => $url
+    ];
+
+    // si on ecrit directement dans un fichier, pour ne pas manipuler en memoire refuser gz
+    $refuser_gz = ($options['refuser_gz'] || $copy);
+
+    // ouvrir la connexion et envoyer la requete et ses en-tetes
+    [$handle, $fopen] = init_http(
+        $options['methode'],
+        $url,
+        $refuser_gz,
+        $options['uri_referer'],
+        $formatted_data,
+        $options['version_http'],
+        $options['if_modified_since']
+    );
+    if (!$handle) {
+        $logger->error("ECHEC init_http $url");
+
+        return false;
+    }
+
+    // Sauf en fopen, envoyer le flux d'entree
+    // et recuperer les en-tetes de reponses
+    if (!$fopen) {
+        $res = recuperer_entetes_complets($handle, $options['if_modified_since']);
+        if (!$res) {
+            fclose($handle);
+            $t = @parse_url($url);
+            $host = $t['host'];
+            // Chinoisierie inexplicable pour contrer
+            // les actions liberticides de l'empire du milieu
+            if (
+                !need_proxy($host)
+                && ($res = @file_get_contents($url))
+            ) {
+                $result['length'] = strlen($res);
+                if ($copy) {
+                    ecrire_fichier($copy, $res);
+                    $result['file'] = $copy;
+                } else {
+                    $result['page'] = $res;
+                }
+                $res = [
+                    'status' => 200,
+                ];
+            } else {
+                $logger->error("ECHEC chinoiserie $url");
+                return false;
+            }
+        } elseif ($res['location'] && $options['follow_location']) {
+            $options['follow_location']--;
+            fclose($handle);
+            include_spip('inc/filtres');
+            $url = suivre_lien($url, $res['location']);
+
+            // une redirection doit se faire en GET, sauf status explicite 307 ou 308 qui indique de garder la meme methode
+            if (
+                $options['methode'] !== 'GET'
+                && (empty($res['status']) || !in_array($res['status'], [307, 308]))
+            ) {
+                $options['methode'] = 'GET';
+                $options['datas'] = '';
+            }
+            $logger->debug('recuperer_url recommence ' . $options['methode'] . " sur $url");
+
+            return recuperer_url($url, $options);
+        } elseif ($res['status'] !== 200) {
+            $logger->info('HTTP status ' . $res['status'] . " pour $url");
+        }
+        $result['status'] = $res['status'];
+        if (isset($res['headers'])) {
+            $result['headers'] = $res['headers'];
+        }
+        if (isset($res['last_modified'])) {
+            $result['last_modified'] = $res['last_modified'];
+        }
+        if (isset($res['location'])) {
+            $result['location'] = $res['location'];
+        }
+        if (isset($res['content_length'])) {
+            $result['content_length'] = $res['content_length'];
+        }
+    }
+
+    // on ne veut que les entetes
+    if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
+        $logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR));
+        return $result;
+    }
+
+
+    // s'il faut deballer, le faire via un fichier temporaire
+    // sinon la memoire explose pour les gros flux
+
+    $gz = false;
+    if (preg_match(",\bContent-Encoding: .*gzip,is", (string) $result['headers'])) {
+        $gz = (_DIR_TMP . md5(uniqid(random_int(0, mt_getrandmax()))) . '.tmp.gz');
+    }
+
+    // si on n'a pas deja récupéré le contenu par une methode detournée
+    if (!$result['length']) {
+        $taille_max = $options['taille_max'];
+        if (isset($result['content_length'])
+          && !empty($result['content_length'])
+          && ($result['content_length'] < $taille_max)) {
+            $taille_max = $result['content_length'];
+        }
+        $res = recuperer_body($handle, $taille_max, $gz ?: $copy);
+        fclose($handle);
+        if ($copy) {
+            $result['length'] = $res;
+            $result['file'] = $copy;
+        } elseif ($res) {
+            $result['page'] = &$res;
+            $result['length'] = strlen($result['page']);
+        }
+        if (!$result['status']) {
+            $result['status'] = 200; // on a reussi, donc !
+        }
+    }
+    if (!$result['page']) {
+        return $result;
+    }
+
+    // Decompresser au besoin
+    if ($gz) {
+        $result['page'] = implode('', gzfile($gz));
+        $result['length'] = strlen($result['page']);
+        // et annuler le content-length qui correspond à la version gzip
+        if (isset($result['content_length'])) {
+            unset($result['content_length']);
+        }
+        supprimer_fichier($gz);
+    }
+
+    // Faut-il l'importer dans notre charset local ?
+    if ($options['transcoder']) {
+        include_spip('inc/charsets');
+        $result['page'] = transcoder_page($result['page'], $result['headers']);
+    }
+
+    try {
+        $trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
+    } catch (JsonException $e) {
+        $trace = [];
+        $logger->error('Failed to parse Json data : ' . $e->getMessage());
+    }
+    $trace['page'] = '...';
+    $logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR));
+
+    return $result;
 }
 
 /**
@@ -678,73 +678,73 @@ 
  * @return array|bool|mixed
  */
 function recuperer_url_cache($url, $options = []) {
-	if (!defined('_DELAI_RECUPERER_URL_CACHE')) {
-		define('_DELAI_RECUPERER_URL_CACHE', 3600);
-	}
-	$default = [
-		'transcoder' => false,
-		'methode' => 'GET',
-		'taille_max' => null,
-		'datas' => '',
-		'boundary' => '',
-		'refuser_gz' => false,
-		'if_modified_since' => '',
-		'uri_referer' => '',
-		'file' => '',
-		'follow_location' => 10,
-		'version_http' => _INC_DISTANT_VERSION_HTTP,
-		'delai_cache' => in_array(_VAR_MODE, ['preview', 'recalcul']) ? 0 : _DELAI_RECUPERER_URL_CACHE,
-	];
-	$options = array_merge($default, $options);
-
-	// cas ou il n'est pas possible de cacher
-	if (!empty($options['data']) || $options['methode'] == 'POST') {
-		return recuperer_url($url, $options);
-	}
-
-	// ne pas tenter plusieurs fois la meme url en erreur (non cachee donc)
-	static $errors = [];
-	if (isset($errors[$url])) {
-		return $errors[$url];
-	}
-
-	$sig = $options;
-	unset($sig['if_modified_since']);
-	unset($sig['delai_cache']);
-	$sig['url'] = $url;
-
-	$dir = sous_repertoire(_DIR_CACHE, 'curl');
-	$cache = md5(serialize($sig)) . '-' . substr(preg_replace(',\W+,', '_', $url), 0, 80);
-	$sub = sous_repertoire($dir, substr($cache, 0, 2));
-	$cache = "$sub$cache";
-
-	$res = false;
-	$is_cached = file_exists($cache);
-	if (
-		$is_cached
-		&& filemtime($cache) > $_SERVER['REQUEST_TIME'] - $options['delai_cache']
-	) {
-		lire_fichier($cache, $res);
-		if ($res = unserialize($res)) {
-			// mettre le last_modified et le status=304 ?
-		}
-	}
-	if (!$res) {
-		$res = recuperer_url($url, $options);
-		// ne pas recharger cette url non cachee dans le meme hit puisque non disponible
-		if (!$res) {
-			if ($is_cached) {
-				// on a pas reussi a recuperer mais on avait un cache : l'utiliser
-				lire_fichier($cache, $res);
-				$res = unserialize($res);
-			}
-
-			return $errors[$url] = $res;
-		}
-		ecrire_fichier($cache, serialize($res));
-	}
-
-	return $res;
+    if (!defined('_DELAI_RECUPERER_URL_CACHE')) {
+        define('_DELAI_RECUPERER_URL_CACHE', 3600);
+    }
+    $default = [
+        'transcoder' => false,
+        'methode' => 'GET',
+        'taille_max' => null,
+        'datas' => '',
+        'boundary' => '',
+        'refuser_gz' => false,
+        'if_modified_since' => '',
+        'uri_referer' => '',
+        'file' => '',
+        'follow_location' => 10,
+        'version_http' => _INC_DISTANT_VERSION_HTTP,
+        'delai_cache' => in_array(_VAR_MODE, ['preview', 'recalcul']) ? 0 : _DELAI_RECUPERER_URL_CACHE,
+    ];
+    $options = array_merge($default, $options);
+
+    // cas ou il n'est pas possible de cacher
+    if (!empty($options['data']) || $options['methode'] == 'POST') {
+        return recuperer_url($url, $options);
+    }
+
+    // ne pas tenter plusieurs fois la meme url en erreur (non cachee donc)
+    static $errors = [];
+    if (isset($errors[$url])) {
+        return $errors[$url];
+    }
+
+    $sig = $options;
+    unset($sig['if_modified_since']);
+    unset($sig['delai_cache']);
+    $sig['url'] = $url;
+
+    $dir = sous_repertoire(_DIR_CACHE, 'curl');
+    $cache = md5(serialize($sig)) . '-' . substr(preg_replace(',\W+,', '_', $url), 0, 80);
+    $sub = sous_repertoire($dir, substr($cache, 0, 2));
+    $cache = "$sub$cache";
+
+    $res = false;
+    $is_cached = file_exists($cache);
+    if (
+        $is_cached
+        && filemtime($cache) > $_SERVER['REQUEST_TIME'] - $options['delai_cache']
+    ) {
+        lire_fichier($cache, $res);
+        if ($res = unserialize($res)) {
+            // mettre le last_modified et le status=304 ?
+        }
+    }
+    if (!$res) {
+        $res = recuperer_url($url, $options);
+        // ne pas recharger cette url non cachee dans le meme hit puisque non disponible
+        if (!$res) {
+            if ($is_cached) {
+                // on a pas reussi a recuperer mais on avait un cache : l'utiliser
+                lire_fichier($cache, $res);
+                $res = unserialize($res);
+            }
+
+            return $errors[$url] = $res;
+        }
+        ecrire_fichier($cache, serialize($res));
+    }
+
+    return $res;
 }
 
 /**
@@ -762,56 +762,56 @@ 
  *   string contenu de la resource
  */
 function recuperer_body($handle, $taille_max = _INC_DISTANT_MAX_SIZE, $fichier = '') {
-	$tmpfile = null;
-	$taille = 0;
-	$result = '';
-	$fp = false;
-	if ($fichier) {
-		include_spip('inc/acces');
-		$tmpfile = "$fichier." . creer_uniqid() . '.tmp';
-		$fp = spip_fopen_lock($tmpfile, 'w', LOCK_EX);
-		if (!$fp && file_exists($fichier)) {
-			return filesize($fichier);
-		}
-		if (!$fp) {
-			return false;
-		}
-		$result = 0; // on renvoie la taille du fichier
-	}
-
-	$max_longueur_morceaux = 8192;
-	while (!feof($handle) && $taille < $taille_max) {
-		// ne pas lire plus que ce qu'on a besoin (ou que la longueur annoncée du document)
-		$max_longueur_morceaux = min($max_longueur_morceaux, $taille_max - $taille);
-		$res = fread($handle, $max_longueur_morceaux);
-
-		// si feof ne trig pas mais on est à la fin, fread retourne false
-		if ($res === false) {
-			break;
-		}
-
-		$taille_morceau = strlen($res);
-		$taille += $taille_morceau;
-
-		if ($fp) {
-			fwrite($fp, $res);
-			$result = $taille;
-		} else {
-			$result .= $res;
-		}
-
-	}
-
-	if ($fp) {
-		spip_fclose_unlock($fp);
-		spip_unlink($fichier);
-		@rename($tmpfile, $fichier);
-		if (!file_exists($fichier)) {
-			return false;
-		}
-	}
-
-	return $result;
+    $tmpfile = null;
+    $taille = 0;
+    $result = '';
+    $fp = false;
+    if ($fichier) {
+        include_spip('inc/acces');
+        $tmpfile = "$fichier." . creer_uniqid() . '.tmp';
+        $fp = spip_fopen_lock($tmpfile, 'w', LOCK_EX);
+        if (!$fp && file_exists($fichier)) {
+            return filesize($fichier);
+        }
+        if (!$fp) {
+            return false;
+        }
+        $result = 0; // on renvoie la taille du fichier
+    }
+
+    $max_longueur_morceaux = 8192;
+    while (!feof($handle) && $taille < $taille_max) {
+        // ne pas lire plus que ce qu'on a besoin (ou que la longueur annoncée du document)
+        $max_longueur_morceaux = min($max_longueur_morceaux, $taille_max - $taille);
+        $res = fread($handle, $max_longueur_morceaux);
+
+        // si feof ne trig pas mais on est à la fin, fread retourne false
+        if ($res === false) {
+            break;
+        }
+
+        $taille_morceau = strlen($res);
+        $taille += $taille_morceau;
+
+        if ($fp) {
+            fwrite($fp, $res);
+            $result = $taille;
+        } else {
+            $result .= $res;
+        }
+
+    }
+
+    if ($fp) {
+        spip_fclose_unlock($fp);
+        spip_unlink($fichier);
+        @rename($tmpfile, $fichier);
+        if (!file_exists($fichier)) {
+            return false;
+        }
+    }
+
+    return $result;
 }
 
 /**
@@ -833,38 +833,38 @@ 
  *   string location
  */
 function recuperer_entetes_complets($handle, $if_modified_since = false) {
-	$result = ['status' => 0, 'headers' => [], 'last_modified' => 0, 'location' => ''];
-
-	$s = @trim(fgets($handle, 16384));
-	if (!preg_match(',^HTTP/\d+\.\d+ (\d+),', $s, $r)) {
-		return false;
-	}
-	$result['status'] = (int) $r[1];
-	while ($s = trim(fgets($handle, 16384))) {
-		$result['headers'][] = $s . "\n";
-		preg_match(',^([^:]*): *(.*)$,i', $s, $r);
-		[, $d, $v] = $r;
-		$d = strtolower(trim($d));
-		if ( $d === 'location' && $result['status'] >= 300 && $result['status'] < 400) {
-			$result['location'] = $v;
-		} elseif ($d === 'last-modified') {
-			$result['last_modified'] = strtotime($v);
-		} elseif ($d === 'content-length' and strlen(trim($v))) {
-			$result['content_length'] = intval($v);
-		}
-	}
-	if (
-		$if_modified_since
-		&& $result['last_modified']
-		&& $if_modified_since > $result['last_modified']
-		&& $result['status'] == 200
-	) {
-		$result['status'] = 304;
-	}
-
-	$result['headers'] = implode('', $result['headers']);
-
-	return $result;
+    $result = ['status' => 0, 'headers' => [], 'last_modified' => 0, 'location' => ''];
+
+    $s = @trim(fgets($handle, 16384));
+    if (!preg_match(',^HTTP/\d+\.\d+ (\d+),', $s, $r)) {
+        return false;
+    }
+    $result['status'] = (int) $r[1];
+    while ($s = trim(fgets($handle, 16384))) {
+        $result['headers'][] = $s . "\n";
+        preg_match(',^([^:]*): *(.*)$,i', $s, $r);
+        [, $d, $v] = $r;
+        $d = strtolower(trim($d));
+        if ( $d === 'location' && $result['status'] >= 300 && $result['status'] < 400) {
+            $result['location'] = $v;
+        } elseif ($d === 'last-modified') {
+            $result['last_modified'] = strtotime($v);
+        } elseif ($d === 'content-length' and strlen(trim($v))) {
+            $result['content_length'] = intval($v);
+        }
+    }
+    if (
+        $if_modified_since
+        && $result['last_modified']
+        && $if_modified_since > $result['last_modified']
+        && $result['status'] == 200
+    ) {
+        $result['status'] = 304;
+    }
+
+    $result['headers'] = implode('', $result['headers']);
+
+    return $result;
 }
 
 /**
@@ -886,36 +886,36 @@ 
  *     Nom du fichier pour copie locale
  **/
 function nom_fichier_copie_locale($source, $extension) {
-	include_spip('inc/documents');
+    include_spip('inc/documents');
 
-	$d = creer_repertoire_documents('distant'); # IMG/distant/
-	$d = sous_repertoire($d, $extension); # IMG/distant/pdf/
+    $d = creer_repertoire_documents('distant'); # IMG/distant/
+    $d = sous_repertoire($d, $extension); # IMG/distant/pdf/
 
-	// on se place tout le temps comme si on était a la racine
-	if (_DIR_RACINE) {
-		$d = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', (string) $d);
-	}
+    // on se place tout le temps comme si on était a la racine
+    if (_DIR_RACINE) {
+        $d = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', (string) $d);
+    }
 
-	$m = md5($source);
+    $m = md5($source);
 
-	$filename =
-		$d
-		. substr(preg_replace(',[^\w-],', '', basename($source, $extension)), 0, 16)
-		. '-' . substr($m, 0, 8)
-		. ".$extension";
+    $filename =
+        $d
+        . substr(preg_replace(',[^\w-],', '', basename($source, $extension)), 0, 16)
+        . '-' . substr($m, 0, 8)
+        . ".$extension";
 
-	// ancien nommage des fichiers distants : renommer le fichier a la volee si besoin pour eviter de dupliquer les caches
-	$legacy_filename =
-		$d
-		. substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
-		. substr($m, 0, 4)
-		. ".$extension";
+    // ancien nommage des fichiers distants : renommer le fichier a la volee si besoin pour eviter de dupliquer les caches
+    $legacy_filename =
+        $d
+        . substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
+        . substr($m, 0, 4)
+        . ".$extension";
 
-	if (file_exists(_DIR_RACINE . $legacy_filename)) {
-		@rename(_DIR_RACINE . $legacy_filename, $filename);
-	}
+    if (file_exists(_DIR_RACINE . $legacy_filename)) {
+        @rename(_DIR_RACINE . $legacy_filename, $filename);
+    }
 
-	return $filename;
+    return $filename;
 }
 
 /**
@@ -934,72 +934,72 @@ 
  *      - null: Copie locale impossible
  **/
 function fichier_copie_locale($source) {
-	// Si c'est deja local pas de souci
-	if (!tester_url_absolue($source)) {
-		if (_DIR_RACINE) {
-			$source = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', $source);
-		}
-
-		return $source;
-	}
-
-	// optimisation : on regarde si on peut deviner l'extension dans l'url et si le fichier
-	// a deja ete copie en local avec cette extension
-	// dans ce cas elle est fiable, pas la peine de requeter en base
-	$path_parts = pathinfo($source);
-	if (!isset($path_parts['extension'])) {
-		$path_parts['extension'] = '';
-	}
-	$ext = $path_parts ? $path_parts['extension'] : '';
-	if (
-		$ext
-		&& preg_match(',^\w+$,', $ext)
-		&& ($f = nom_fichier_copie_locale($source, $ext))
-		&& file_exists(_DIR_RACINE . $f)
-	) {
-		return $f;
-	}
-
-
-	// Si c'est deja dans la table des documents,
-	// ramener le nom de sa copie potentielle
-	$ext = sql_getfetsel('extension', 'spip_documents', 'fichier=' . sql_quote($source) . " AND distant='oui' AND extension <> ''");
-
-	if ($ext) {
-		return nom_fichier_copie_locale($source, $ext);
-	}
-
-	// voir si l'extension indiquee dans le nom du fichier est ok
-	// et si il n'aurait pas deja ete rapatrie
-
-	$ext = $path_parts ? $path_parts['extension'] : '';
-
-	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
-		$f = nom_fichier_copie_locale($source, $ext);
-		if (file_exists(_DIR_RACINE . $f)) {
-			return $f;
-		}
-	}
-
-	// Ping  pour voir si son extension est connue et autorisee
-	// avec mise en cache du resultat du ping
-
-	$cache = sous_repertoire(_DIR_CACHE, 'rid') . md5($source);
-	if (
-		!@file_exists($cache)
-		|| !($path_parts = @unserialize(spip_file_get_contents($cache)))
-		|| _request('var_mode') === 'recalcul'
-	) {
-		$path_parts = recuperer_infos_distantes($source, ['charger_si_petite_image' => false]);
-		ecrire_fichier($cache, serialize($path_parts));
-	}
-	$ext = empty($path_parts['extension']) ? '' : $path_parts['extension'];
-	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
-		return nom_fichier_copie_locale($source, $ext);
-	}
-
-	spip_logger('distant')->error("pas de copie locale pour $source");
-	return null;
+    // Si c'est deja local pas de souci
+    if (!tester_url_absolue($source)) {
+        if (_DIR_RACINE) {
+            $source = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', $source);
+        }
+
+        return $source;
+    }
+
+    // optimisation : on regarde si on peut deviner l'extension dans l'url et si le fichier
+    // a deja ete copie en local avec cette extension
+    // dans ce cas elle est fiable, pas la peine de requeter en base
+    $path_parts = pathinfo($source);
+    if (!isset($path_parts['extension'])) {
+        $path_parts['extension'] = '';
+    }
+    $ext = $path_parts ? $path_parts['extension'] : '';
+    if (
+        $ext
+        && preg_match(',^\w+$,', $ext)
+        && ($f = nom_fichier_copie_locale($source, $ext))
+        && file_exists(_DIR_RACINE . $f)
+    ) {
+        return $f;
+    }
+
+
+    // Si c'est deja dans la table des documents,
+    // ramener le nom de sa copie potentielle
+    $ext = sql_getfetsel('extension', 'spip_documents', 'fichier=' . sql_quote($source) . " AND distant='oui' AND extension <> ''");
+
+    if ($ext) {
+        return nom_fichier_copie_locale($source, $ext);
+    }
+
+    // voir si l'extension indiquee dans le nom du fichier est ok
+    // et si il n'aurait pas deja ete rapatrie
+
+    $ext = $path_parts ? $path_parts['extension'] : '';
+
+    if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
+        $f = nom_fichier_copie_locale($source, $ext);
+        if (file_exists(_DIR_RACINE . $f)) {
+            return $f;
+        }
+    }
+
+    // Ping  pour voir si son extension est connue et autorisee
+    // avec mise en cache du resultat du ping
+
+    $cache = sous_repertoire(_DIR_CACHE, 'rid') . md5($source);
+    if (
+        !@file_exists($cache)
+        || !($path_parts = @unserialize(spip_file_get_contents($cache)))
+        || _request('var_mode') === 'recalcul'
+    ) {
+        $path_parts = recuperer_infos_distantes($source, ['charger_si_petite_image' => false]);
+        ecrire_fichier($cache, serialize($path_parts));
+    }
+    $ext = empty($path_parts['extension']) ? '' : $path_parts['extension'];
+    if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
+        return nom_fichier_copie_locale($source, $ext);
+    }
+
+    spip_logger('distant')->error("pas de copie locale pour $source");
+    return null;
 }
 
 
@@ -1028,129 +1028,129 @@ 
  **/
 function recuperer_infos_distantes($source, $options = []) {
 
-	// pas la peine de perdre son temps
-	if (!tester_url_absolue($source)) {
-		return false;
-	}
-
-	$taille_max = $options['taille_max'] ?? 0;
-	$charger_si_petite_image = (bool) ($options['charger_si_petite_image'] ?? true);
-	$callback_valider_url = $options['callback_valider_url'] ?? null;
-
-	# charger les alias des types mime
-	include_spip('base/typedoc');
-
-	$a = [];
-	$mime_type = '';
-	// On va directement charger le debut des images et des fichiers html,
-	// de maniere a attrapper le maximum d'infos (titre, taille, etc). Si
-	// ca echoue l'utilisateur devra les entrer...
-	$reponse = recuperer_url($source, ['taille_max' => $taille_max, 'refuser_gz' => true]);
-	if (
-		$callback_valider_url
-		&& is_callable($callback_valider_url)
-		&& !$callback_valider_url($reponse['url'])
-	) {
-		return false;
-	}
-	$headers = $reponse['headers'] ?? '';
-	$a['body'] = $reponse['page'] ?? '';
-	if ($headers) {
-		$mime_type = distant_trouver_mime_type_selon_headers($source, $headers);
-
-		if (!$extension = distant_trouver_extension_selon_headers($source, $headers)) {
-			return false;
-		}
-
-		$a['extension'] = $extension;
-
-		if (preg_match(",\nContent-Length: *([^[:space:]]*),i", "\n$headers", $regs)) {
-			$a['taille'] = (int) $regs[1];
-		}
-	}
-
-	// Echec avec HEAD, on tente avec GET
-	if (!$a && !$taille_max) {
-		spip_logger('distant')->info("tenter GET $source");
-		$options['taille_max'] = _INC_DISTANT_MAX_SIZE;
-		$a = recuperer_infos_distantes($source, $options);
-	}
-
-	// si on a rien trouve pas la peine d'insister
-	if (!$a) {
-		return false;
-	}
-
-	// S'il s'agit d'une image pas trop grosse ou d'un fichier html, on va aller
-	// recharger le document en GET et recuperer des donnees supplementaires...
-	include_spip('inc/filtres_images_lib_mini');
-	include_spip('inc/documents');
-	if (
-		str_starts_with($mime_type, 'image/')
-		&& ($extension = _image_trouver_extension_depuis_mime($mime_type))
-	) {
-		if (
-			$taille_max == 0
-			&& (empty($a['taille']) || $a['taille'] < _INC_DISTANT_MAX_SIZE)
-			&& in_array($extension, formats_image_acceptables())
-			&& $charger_si_petite_image
-		) {
-			$options['taille_max'] = _INC_DISTANT_MAX_SIZE;
-			$a = recuperer_infos_distantes($source, $options);
-		} else {
-			if ($a['body']) {
-				$a['extension'] = corriger_extension($extension);
-				$a['fichier'] = _DIR_RACINE . nom_fichier_copie_locale($source, $extension);
-				ecrire_fichier($a['fichier'], $a['body']);
-				$size_image = @spip_getimagesize($a['fichier']);
-				$a['largeur'] = (int) $size_image[0];
-				$a['hauteur'] = (int) $size_image[1];
-				$a['type_image'] = true;
-			}
-		}
-	}
-
-	// Fichier swf, si on n'a pas la taille, on va mettre 425x350 par defaut
-	// ce sera mieux que 0x0
-	// Flash is dead!
-	if (
-		$a
-		&& isset($a['extension'])
-		&& $a['extension'] == 'swf'
-		&& empty($a['largeur'])
-	) {
-		$a['largeur'] = 425;
-		$a['hauteur'] = 350;
-	}
-
-	if ($mime_type == 'text/html') {
-		include_spip('inc/filtres');
-		$page = recuperer_url($source, ['transcoder' => true, 'taille_max' => _INC_DISTANT_MAX_SIZE]);
-		$page = $page['page'] ?? '';
-		if (preg_match(',<title>(.*?)</title>,ims', (string) $page, $regs)) {
-			$a['titre'] = corriger_caracteres(trim($regs[1]));
-		}
-		if (!isset($a['taille']) || !$a['taille']) {
-			$a['taille'] = strlen((string) $page); # a peu pres
-		}
-	}
-	$a['mime_type'] = $mime_type;
-
-	return $a;
+    // pas la peine de perdre son temps
+    if (!tester_url_absolue($source)) {
+        return false;
+    }
+
+    $taille_max = $options['taille_max'] ?? 0;
+    $charger_si_petite_image = (bool) ($options['charger_si_petite_image'] ?? true);
+    $callback_valider_url = $options['callback_valider_url'] ?? null;
+
+    # charger les alias des types mime
+    include_spip('base/typedoc');
+
+    $a = [];
+    $mime_type = '';
+    // On va directement charger le debut des images et des fichiers html,
+    // de maniere a attrapper le maximum d'infos (titre, taille, etc). Si
+    // ca echoue l'utilisateur devra les entrer...
+    $reponse = recuperer_url($source, ['taille_max' => $taille_max, 'refuser_gz' => true]);
+    if (
+        $callback_valider_url
+        && is_callable($callback_valider_url)
+        && !$callback_valider_url($reponse['url'])
+    ) {
+        return false;
+    }
+    $headers = $reponse['headers'] ?? '';
+    $a['body'] = $reponse['page'] ?? '';
+    if ($headers) {
+        $mime_type = distant_trouver_mime_type_selon_headers($source, $headers);
+
+        if (!$extension = distant_trouver_extension_selon_headers($source, $headers)) {
+            return false;
+        }
+
+        $a['extension'] = $extension;
+
+        if (preg_match(",\nContent-Length: *([^[:space:]]*),i", "\n$headers", $regs)) {
+            $a['taille'] = (int) $regs[1];
+        }
+    }
+
+    // Echec avec HEAD, on tente avec GET
+    if (!$a && !$taille_max) {
+        spip_logger('distant')->info("tenter GET $source");
+        $options['taille_max'] = _INC_DISTANT_MAX_SIZE;
+        $a = recuperer_infos_distantes($source, $options);
+    }
+
+    // si on a rien trouve pas la peine d'insister
+    if (!$a) {
+        return false;
+    }
+
+    // S'il s'agit d'une image pas trop grosse ou d'un fichier html, on va aller
+    // recharger le document en GET et recuperer des donnees supplementaires...
+    include_spip('inc/filtres_images_lib_mini');
+    include_spip('inc/documents');
+    if (
+        str_starts_with($mime_type, 'image/')
+        && ($extension = _image_trouver_extension_depuis_mime($mime_type))
+    ) {
+        if (
+            $taille_max == 0
+            && (empty($a['taille']) || $a['taille'] < _INC_DISTANT_MAX_SIZE)
+            && in_array($extension, formats_image_acceptables())
+            && $charger_si_petite_image
+        ) {
+            $options['taille_max'] = _INC_DISTANT_MAX_SIZE;
+            $a = recuperer_infos_distantes($source, $options);
+        } else {
+            if ($a['body']) {
+                $a['extension'] = corriger_extension($extension);
+                $a['fichier'] = _DIR_RACINE . nom_fichier_copie_locale($source, $extension);
+                ecrire_fichier($a['fichier'], $a['body']);
+                $size_image = @spip_getimagesize($a['fichier']);
+                $a['largeur'] = (int) $size_image[0];
+                $a['hauteur'] = (int) $size_image[1];
+                $a['type_image'] = true;
+            }
+        }
+    }
+
+    // Fichier swf, si on n'a pas la taille, on va mettre 425x350 par defaut
+    // ce sera mieux que 0x0
+    // Flash is dead!
+    if (
+        $a
+        && isset($a['extension'])
+        && $a['extension'] == 'swf'
+        && empty($a['largeur'])
+    ) {
+        $a['largeur'] = 425;
+        $a['hauteur'] = 350;
+    }
+
+    if ($mime_type == 'text/html') {
+        include_spip('inc/filtres');
+        $page = recuperer_url($source, ['transcoder' => true, 'taille_max' => _INC_DISTANT_MAX_SIZE]);
+        $page = $page['page'] ?? '';
+        if (preg_match(',<title>(.*?)</title>,ims', (string) $page, $regs)) {
+            $a['titre'] = corriger_caracteres(trim($regs[1]));
+        }
+        if (!isset($a['taille']) || !$a['taille']) {
+            $a['taille'] = strlen((string) $page); # a peu pres
+        }
+    }
+    $a['mime_type'] = $mime_type;
+
+    return $a;
 }
 
 /**
  * Retrouver un mime type depuis les headers
  */
 function distant_trouver_mime_type_selon_headers(string $source, string $headers): string {
-	$mime_type = preg_match(",\nContent-Type: *([^[:space:];]*),i", "\n$headers", $regs) ? trim($regs[1]) : ''; // inconnu
+    $mime_type = preg_match(",\nContent-Type: *([^[:space:];]*),i", "\n$headers", $regs) ? trim($regs[1]) : ''; // inconnu
 
-	// Appliquer les alias
-	while (isset($GLOBALS['mime_alias'][$mime_type])) {
-		$mime_type = $GLOBALS['mime_alias'][$mime_type];
-	}
+    // Appliquer les alias
+    while (isset($GLOBALS['mime_alias'][$mime_type])) {
+        $mime_type = $GLOBALS['mime_alias'][$mime_type];
+    }
 
-	return $mime_type;
+    return $mime_type;
 }
 
 /**
@@ -1159,58 +1159,58 @@ 
  * @return false|string
  */
 function distant_trouver_extension_selon_headers(string $source, string $headers) {
-	$mime_type = distant_trouver_mime_type_selon_headers($source, $headers);
-
-	// pour corriger_extension()
-	include_spip('inc/documents');
-
-	// Si on a un mime-type insignifiant
-	// text/plain,application/octet-stream ou vide
-	// c'est peut-etre que le serveur ne sait pas
-	// ce qu'il sert ; on va tenter de detecter via l'extension de l'url
-	// ou le Content-Disposition: attachment; filename=...
-	$t = null;
-	if (in_array($mime_type, ['text/plain', '', 'application/octet-stream'])) {
-		if (!$t && preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)) {
-			$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
-		}
-		if (
-			!$t
-			&& preg_match(',^Content-Disposition:\s*attachment;\s*filename=(.*)$,Uims', $headers, $m)
-			&& preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $m[1], $rext)
-		) {
-			$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
-		}
-	}
-
-	// Autre mime/type (ou text/plain avec fichier d'extension inconnue)
-	if (!$t) {
-		$t = sql_fetsel('extension', 'spip_types_documents', 'mime_type=' . sql_quote($mime_type));
-	}
-
-	// Toujours rien ? (ex: audio/x-ogg au lieu de application/ogg)
-	// On essaie de nouveau avec l'extension
-	if (
-		!$t
-		&& $mime_type != 'text/plain'
-		&& preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)
-	) {
-		# eviter xxx.3 => 3gp (> SPIP 3)
-		$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
-	}
-
-	if ($t) {
-		spip_logger('distant')->info("mime-type $mime_type ok, extension " . $t['extension']);
-		return $t['extension'];
-	} else {
-		# par defaut on retombe sur '.bin' si c'est autorise
-		spip_logger('distant')->info("mime-type $mime_type inconnu");
-		$t = sql_fetsel('extension', 'spip_types_documents', "extension='bin'");
-		if (!$t) {
-			return false;
-		}
-		return $t['extension'];
-	}
+    $mime_type = distant_trouver_mime_type_selon_headers($source, $headers);
+
+    // pour corriger_extension()
+    include_spip('inc/documents');
+
+    // Si on a un mime-type insignifiant
+    // text/plain,application/octet-stream ou vide
+    // c'est peut-etre que le serveur ne sait pas
+    // ce qu'il sert ; on va tenter de detecter via l'extension de l'url
+    // ou le Content-Disposition: attachment; filename=...
+    $t = null;
+    if (in_array($mime_type, ['text/plain', '', 'application/octet-stream'])) {
+        if (!$t && preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)) {
+            $t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+        }
+        if (
+            !$t
+            && preg_match(',^Content-Disposition:\s*attachment;\s*filename=(.*)$,Uims', $headers, $m)
+            && preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $m[1], $rext)
+        ) {
+            $t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+        }
+    }
+
+    // Autre mime/type (ou text/plain avec fichier d'extension inconnue)
+    if (!$t) {
+        $t = sql_fetsel('extension', 'spip_types_documents', 'mime_type=' . sql_quote($mime_type));
+    }
+
+    // Toujours rien ? (ex: audio/x-ogg au lieu de application/ogg)
+    // On essaie de nouveau avec l'extension
+    if (
+        !$t
+        && $mime_type != 'text/plain'
+        && preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)
+    ) {
+        # eviter xxx.3 => 3gp (> SPIP 3)
+        $t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+    }
+
+    if ($t) {
+        spip_logger('distant')->info("mime-type $mime_type ok, extension " . $t['extension']);
+        return $t['extension'];
+    } else {
+        # par defaut on retombe sur '.bin' si c'est autorise
+        spip_logger('distant')->info("mime-type $mime_type inconnu");
+        $t = sql_fetsel('extension', 'spip_types_documents', "extension='bin'");
+        if (!$t) {
+            return false;
+        }
+        return $t['extension'];
+    }
 }
 
 /**
@@ -1226,45 +1226,45 @@ 
  */
 function need_proxy($host, $http_proxy = null, $http_noproxy = null) {
 
-	$http_proxy ??= $GLOBALS['meta']['http_proxy'] ?? null;
-
-	// rien a faire si pas de proxy :)
-	if (is_null($http_proxy) || !$http_proxy = trim((string) $http_proxy)) {
-		return '';
-	}
-
-	if (is_null($http_noproxy)) {
-		$http_noproxy = $GLOBALS['meta']['http_noproxy'] ?? null;
-	}
-	// si pas d'exception, on retourne le proxy
-	if (is_null($http_noproxy) || !$http_noproxy = trim((string) $http_noproxy)) {
-		return $http_proxy;
-	}
-
-	// si le host ou l'un des domaines parents est dans $http_noproxy on fait exception
-	// $http_noproxy peut contenir plusieurs domaines separes par des espaces ou retour ligne
-	$http_noproxy = str_replace("\n", ' ', $http_noproxy);
-	$http_noproxy = str_replace("\r", ' ', $http_noproxy);
-	$http_noproxy = " $http_noproxy ";
-	$domain = $host;
-	// si le domaine exact www.example.org est dans les exceptions
-	if (str_contains($http_noproxy, (string) " $domain ")) {
-		return '';
-	}
-
-	while (str_contains($domain, '.')) {
-		$domain = explode('.', $domain);
-		array_shift($domain);
-		$domain = implode('.', $domain);
-
-		// ou si un domaine parent commencant par un . est dans les exceptions (indiquant qu'il couvre tous les sous-domaines)
-		if (str_contains($http_noproxy, (string) " .$domain ")) {
-			return '';
-		}
-	}
-
-	// ok c'est pas une exception
-	return $http_proxy;
+    $http_proxy ??= $GLOBALS['meta']['http_proxy'] ?? null;
+
+    // rien a faire si pas de proxy :)
+    if (is_null($http_proxy) || !$http_proxy = trim((string) $http_proxy)) {
+        return '';
+    }
+
+    if (is_null($http_noproxy)) {
+        $http_noproxy = $GLOBALS['meta']['http_noproxy'] ?? null;
+    }
+    // si pas d'exception, on retourne le proxy
+    if (is_null($http_noproxy) || !$http_noproxy = trim((string) $http_noproxy)) {
+        return $http_proxy;
+    }
+
+    // si le host ou l'un des domaines parents est dans $http_noproxy on fait exception
+    // $http_noproxy peut contenir plusieurs domaines separes par des espaces ou retour ligne
+    $http_noproxy = str_replace("\n", ' ', $http_noproxy);
+    $http_noproxy = str_replace("\r", ' ', $http_noproxy);
+    $http_noproxy = " $http_noproxy ";
+    $domain = $host;
+    // si le domaine exact www.example.org est dans les exceptions
+    if (str_contains($http_noproxy, (string) " $domain ")) {
+        return '';
+    }
+
+    while (str_contains($domain, '.')) {
+        $domain = explode('.', $domain);
+        array_shift($domain);
+        $domain = implode('.', $domain);
+
+        // ou si un domaine parent commencant par un . est dans les exceptions (indiquant qu'il couvre tous les sous-domaines)
+        if (str_contains($http_noproxy, (string) " .$domain ")) {
+            return '';
+        }
+    }
+
+    // ok c'est pas une exception
+    return $http_proxy;
 }
 
 
@@ -1287,60 +1287,60 @@ 
  * @return array
  */
 function init_http($method, $url, $refuse_gz = false, $referer = '', $datas = '', $vers = 'HTTP/1.0', $date = '') {
-	$user = $via_proxy = $proxy_user = '';
-	$fopen = false;
-
-	$t = @parse_url($url);
-	$host = $t['host'];
-	if ($t['scheme'] == 'http') {
-		$scheme = 'http';
-		$noproxy = '';
-	} elseif ($t['scheme'] == 'https') {
-		$scheme = 'ssl';
-		$noproxy = 'ssl://';
-		if (!isset($t['port']) || !($port = $t['port'])) {
-			$t['port'] = 443;
-		}
-	} else {
-		$scheme = $t['scheme'];
-		$noproxy = $scheme . '://';
-	}
-	if (isset($t['user'])) {
-		// user et pass doivent être passés en urlencodé dans l'URL, on redecode ici
-		$user = [urldecode($t['user']), urldecode($t['pass'])];
-	}
-
-	if (!isset($t['port']) || !($port = $t['port'])) {
-		$port = 80;
-	}
-	if (!isset($t['path']) || !($path = $t['path'])) {
-		$path = '/';
-	}
-
-	if (!empty($t['query'])) {
-		$path .= '?' . $t['query'];
-	}
-
-	$f = lance_requete($method, $scheme, $user, $host, $path, $port, $noproxy, $refuse_gz, $referer, $datas, $vers, $date);
-	if (!$f || !is_resource($f)) {
-		// fallback : fopen si on a pas fait timeout dans lance_requete
-		// ce qui correspond a $f===110
-		if (
-			$f !== 110
-			&& !need_proxy($host)
-			&& !_request('tester_proxy')
-			&& (!isset($GLOBALS['inc_distant_allow_fopen']) || $GLOBALS['inc_distant_allow_fopen'])
-		) {
-			$f = @fopen($url, 'rb');
-			spip_logger('distant')->info("connexion vers $url par simple fopen");
-			$fopen = true;
-		} else {
-			// echec total
-			$f = false;
-		}
-	}
-
-	return [$f, $fopen];
+    $user = $via_proxy = $proxy_user = '';
+    $fopen = false;
+
+    $t = @parse_url($url);
+    $host = $t['host'];
+    if ($t['scheme'] == 'http') {
+        $scheme = 'http';
+        $noproxy = '';
+    } elseif ($t['scheme'] == 'https') {
+        $scheme = 'ssl';
+        $noproxy = 'ssl://';
+        if (!isset($t['port']) || !($port = $t['port'])) {
+            $t['port'] = 443;
+        }
+    } else {
+        $scheme = $t['scheme'];
+        $noproxy = $scheme . '://';
+    }
+    if (isset($t['user'])) {
+        // user et pass doivent être passés en urlencodé dans l'URL, on redecode ici
+        $user = [urldecode($t['user']), urldecode($t['pass'])];
+    }
+
+    if (!isset($t['port']) || !($port = $t['port'])) {
+        $port = 80;
+    }
+    if (!isset($t['path']) || !($path = $t['path'])) {
+        $path = '/';
+    }
+
+    if (!empty($t['query'])) {
+        $path .= '?' . $t['query'];
+    }
+
+    $f = lance_requete($method, $scheme, $user, $host, $path, $port, $noproxy, $refuse_gz, $referer, $datas, $vers, $date);
+    if (!$f || !is_resource($f)) {
+        // fallback : fopen si on a pas fait timeout dans lance_requete
+        // ce qui correspond a $f===110
+        if (
+            $f !== 110
+            && !need_proxy($host)
+            && !_request('tester_proxy')
+            && (!isset($GLOBALS['inc_distant_allow_fopen']) || $GLOBALS['inc_distant_allow_fopen'])
+        ) {
+            $f = @fopen($url, 'rb');
+            spip_logger('distant')->info("connexion vers $url par simple fopen");
+            $fopen = true;
+        } else {
+            // echec total
+            $f = false;
+        }
+    }
+
+    return [$f, $fopen];
 }
 
 /**
@@ -1375,126 +1375,126 @@ 
  *   resource socket vers l'url demandee
  */
 function lance_requete(
-	$method,
-	$scheme,
-	$user,
-	$host,
-	$path,
-	$port,
-	$noproxy,
-	$refuse_gz = false,
-	$referer = '',
-	$datas = '',
-	$vers = 'HTTP/1.0',
-	$date = ''
+    $method,
+    $scheme,
+    $user,
+    $host,
+    $path,
+    $port,
+    $noproxy,
+    $refuse_gz = false,
+    $referer = '',
+    $datas = '',
+    $vers = 'HTTP/1.0',
+    $date = ''
 ) {
 
-	$proxy_user = '';
-	$http_proxy = need_proxy($host);
-	if ($user) {
-		$user = urlencode((string) $user[0]) . ':' . urlencode((string) $user[1]);
-	}
-
-	$connect = '';
-	if ($http_proxy) {
-		if (!defined('_PROXY_HTTPS_NOT_VIA_CONNECT') && in_array($scheme, ['tls','ssl'])) {
-			$path_host = ($user ? "$user@" : '') . $host . (($port != 80) ? ":$port" : '');
-			$connect = 'CONNECT ' . $path_host . " $vers\r\n"
-				. "Host: $path_host\r\n"
-				. "Proxy-Connection: Keep-Alive\r\n";
-		} else {
-			$path = (in_array($scheme, ['tls','ssl']) ? 'https://' : "$scheme://")
-				. ($user ? "$user@" : '')
-				. "$host" . (($port != 80) ? ":$port" : '') . $path;
-		}
-		$t2 = @parse_url($http_proxy);
-		$first_host = $t2['host'];
-		$first_port = ($t2['port'] ?? null) ?: 80;
-		if ($t2['user'] ?? null) {
-			$proxy_user = base64_encode($t2['user'] . ':' . $t2['pass']);
-		}
-	} else {
-		$first_host = $noproxy . $host;
-		$first_port = $port;
-	}
-
-	$logger = spip_logger('distant');
-	$logger_connect = spip_logger('connect');
-	if ($connect) {
-		$streamContext = stream_context_create([
-			'ssl' => [
-				'verify_peer' => false,
-				'allow_self_signed' => true,
-				'SNI_enabled' => true,
-				'peer_name' => $host,
-			]
-		]);
-		$f = @stream_socket_client(
-			"tcp://$first_host:$first_port",
-			$errno,
-			$errstr,
-			_INC_DISTANT_CONNECT_TIMEOUT,
-			STREAM_CLIENT_CONNECT,
-			$streamContext
-		);
-		$logger_connect->info("Recuperer $path sur $first_host:$first_port par $f (via CONNECT)");
-		if (!$f) {
-			$logger->error("Erreur connexion $errno $errstr");
-			return $errno;
-		}
-		stream_set_timeout($f, _INC_DISTANT_CONNECT_TIMEOUT);
-
-		fwrite($f, $connect);
-		fwrite($f, "\r\n");
-		$res = fread($f, 1024);
-		if (
-			!$res
-			|| ($res = explode(' ', $res)) === []
-			|| $res[1] !== '200'
-		) {
-			$logger_connect->notice("Echec CONNECT sur $first_host:$first_port");
-			fclose($f);
-
-			return false;
-		}
-		// important, car sinon on lit trop vite et les donnees ne sont pas encore dispo
-		stream_set_blocking($f, true);
-		// envoyer le handshake
-		stream_socket_enable_crypto($f, true, STREAM_CRYPTO_METHOD_SSLv23_CLIENT);
-		$logger_connect->info("OK CONNECT sur $first_host:$first_port");
-	} else {
-		$ntry = 3;
-		do {
-			$f = @fsockopen($first_host, $first_port, $errno, $errstr, _INC_DISTANT_CONNECT_TIMEOUT);
-		} while (!$f && $ntry-- && $errno !== 110 && sleep(1));
-		$logger->info("Recuperer $path sur $first_host:$first_port par $f");
-		if (!$f) {
-			$logger->error("Erreur connexion $errno $errstr");
-
-			return $errno;
-		}
-		stream_set_timeout($f, _INC_DISTANT_CONNECT_TIMEOUT);
-	}
-
-	$site = $GLOBALS['meta']['adresse_site'] ?? '';
-
-	$host_port = $host;
-	if ($port != (in_array($scheme, ['tls','ssl']) ? 443 : 80)) {
-		$host_port .= ":$port";
-	}
-	$req = "$method $path $vers\r\n"
-		. "Host: $host_port\r\n"
-		. 'User-Agent: ' . _INC_DISTANT_USER_AGENT . "\r\n"
-		. ($refuse_gz ? '' : ('Accept-Encoding: ' . _INC_DISTANT_CONTENT_ENCODING . "\r\n"))
-		. ($site ? "Referer: $site/$referer\r\n" : '')
-		. ($date ? 'If-Modified-Since: ' . (gmdate('D, d M Y H:i:s', $date) . " GMT\r\n") : '')
-		. ($user ? 'Authorization: Basic ' . base64_encode(urldecode($user)) . "\r\n" : '')
-		. ($proxy_user ? "Proxy-Authorization: Basic $proxy_user\r\n" : '')
-		. (strpos($vers, '1.1') ? "Keep-Alive: 300\r\nConnection: keep-alive\r\n" : '');
+    $proxy_user = '';
+    $http_proxy = need_proxy($host);
+    if ($user) {
+        $user = urlencode((string) $user[0]) . ':' . urlencode((string) $user[1]);
+    }
+
+    $connect = '';
+    if ($http_proxy) {
+        if (!defined('_PROXY_HTTPS_NOT_VIA_CONNECT') && in_array($scheme, ['tls','ssl'])) {
+            $path_host = ($user ? "$user@" : '') . $host . (($port != 80) ? ":$port" : '');
+            $connect = 'CONNECT ' . $path_host . " $vers\r\n"
+                . "Host: $path_host\r\n"
+                . "Proxy-Connection: Keep-Alive\r\n";
+        } else {
+            $path = (in_array($scheme, ['tls','ssl']) ? 'https://' : "$scheme://")
+                . ($user ? "$user@" : '')
+                . "$host" . (($port != 80) ? ":$port" : '') . $path;
+        }
+        $t2 = @parse_url($http_proxy);
+        $first_host = $t2['host'];
+        $first_port = ($t2['port'] ?? null) ?: 80;
+        if ($t2['user'] ?? null) {
+            $proxy_user = base64_encode($t2['user'] . ':' . $t2['pass']);
+        }
+    } else {
+        $first_host = $noproxy . $host;
+        $first_port = $port;
+    }
+
+    $logger = spip_logger('distant');
+    $logger_connect = spip_logger('connect');
+    if ($connect) {
+        $streamContext = stream_context_create([
+            'ssl' => [
+                'verify_peer' => false,
+                'allow_self_signed' => true,
+                'SNI_enabled' => true,
+                'peer_name' => $host,
+            ]
+        ]);
+        $f = @stream_socket_client(
+            "tcp://$first_host:$first_port",
+            $errno,
+            $errstr,
+            _INC_DISTANT_CONNECT_TIMEOUT,
+            STREAM_CLIENT_CONNECT,
+            $streamContext
+        );
+        $logger_connect->info("Recuperer $path sur $first_host:$first_port par $f (via CONNECT)");
+        if (!$f) {
+            $logger->error("Erreur connexion $errno $errstr");
+            return $errno;
+        }
+        stream_set_timeout($f, _INC_DISTANT_CONNECT_TIMEOUT);
+
+        fwrite($f, $connect);
+        fwrite($f, "\r\n");
+        $res = fread($f, 1024);
+        if (
+            !$res
+            || ($res = explode(' ', $res)) === []
+            || $res[1] !== '200'
+        ) {
+            $logger_connect->notice("Echec CONNECT sur $first_host:$first_port");
+            fclose($f);
+
+            return false;
+        }
+        // important, car sinon on lit trop vite et les donnees ne sont pas encore dispo
+        stream_set_blocking($f, true);
+        // envoyer le handshake
+        stream_socket_enable_crypto($f, true, STREAM_CRYPTO_METHOD_SSLv23_CLIENT);
+        $logger_connect->info("OK CONNECT sur $first_host:$first_port");
+    } else {
+        $ntry = 3;
+        do {
+            $f = @fsockopen($first_host, $first_port, $errno, $errstr, _INC_DISTANT_CONNECT_TIMEOUT);
+        } while (!$f && $ntry-- && $errno !== 110 && sleep(1));
+        $logger->info("Recuperer $path sur $first_host:$first_port par $f");
+        if (!$f) {
+            $logger->error("Erreur connexion $errno $errstr");
+
+            return $errno;
+        }
+        stream_set_timeout($f, _INC_DISTANT_CONNECT_TIMEOUT);
+    }
+
+    $site = $GLOBALS['meta']['adresse_site'] ?? '';
+
+    $host_port = $host;
+    if ($port != (in_array($scheme, ['tls','ssl']) ? 443 : 80)) {
+        $host_port .= ":$port";
+    }
+    $req = "$method $path $vers\r\n"
+        . "Host: $host_port\r\n"
+        . 'User-Agent: ' . _INC_DISTANT_USER_AGENT . "\r\n"
+        . ($refuse_gz ? '' : ('Accept-Encoding: ' . _INC_DISTANT_CONTENT_ENCODING . "\r\n"))
+        . ($site ? "Referer: $site/$referer\r\n" : '')
+        . ($date ? 'If-Modified-Since: ' . (gmdate('D, d M Y H:i:s', $date) . " GMT\r\n") : '')
+        . ($user ? 'Authorization: Basic ' . base64_encode(urldecode($user)) . "\r\n" : '')
+        . ($proxy_user ? "Proxy-Authorization: Basic $proxy_user\r\n" : '')
+        . (strpos($vers, '1.1') ? "Keep-Alive: 300\r\nConnection: keep-alive\r\n" : '');
 
 #	$logger->info("Requete\n$req");
-	fwrite($f, $req);
-	fwrite($f, $datas ?: "\r\n");
+    fwrite($f, $req);
+    fwrite($f, $datas ?: "\r\n");
 
-	return $f;
+    return $f;
 }

Spacing +62 added lines, -62 removed lines

@@ -27,7 +27,7 @@ 
 	define('_INC_DISTANT_CONTENT_ENCODING', 'gzip');
 }
 if (!defined('_INC_DISTANT_USER_AGENT')) {
-	define('_INC_DISTANT_USER_AGENT', 'SPIP-' . $GLOBALS['spip_version_affichee'] . ' (' . $GLOBALS['home_server'] . ')');
+	define('_INC_DISTANT_USER_AGENT', 'SPIP-'.$GLOBALS['spip_version_affichee'].' ('.$GLOBALS['home_server'].')');
 }
 if (!defined('_INC_DISTANT_MAX_SIZE')) {
 	define('_INC_DISTANT_MAX_SIZE', 2_097_152);
@@ -36,7 +36,7 @@ 
 	define('_INC_DISTANT_CONNECT_TIMEOUT', 10);
 }
 
-define('_REGEXP_COPIE_LOCALE', ',' 	.
+define('_REGEXP_COPIE_LOCALE', ','.
 	preg_replace(
 		'@^https?:@',
 		'https?:',
@@ -73,7 +73,7 @@ 
 
 	// si c'est la protection de soi-meme, retourner le path
 	if ($mode !== 'force' && preg_match(_REGEXP_COPIE_LOCALE, $source, $match)) {
-		$source = substr((string) _DIR_IMG, strlen((string) _DIR_RACINE)) . urldecode($match[1]);
+		$source = substr((string) _DIR_IMG, strlen((string) _DIR_RACINE)).urldecode($match[1]);
 
 		return @file_exists($source) ? $source : false;
 	}
@@ -93,7 +93,7 @@ 
 		return false;
 	}
 
-	$localrac = _DIR_RACINE . $local;
+	$localrac = _DIR_RACINE.$local;
 	$t = ($mode === 'force') ? false : @file_exists($localrac);
 
 	// test d'existence du fichier
@@ -113,7 +113,7 @@ 
 		if (!$taille_max) {
 			$taille_max = _COPIE_LOCALE_MAX_SIZE;
 		}
-		$localrac_tmp = $localrac . '.tmp';
+		$localrac_tmp = $localrac.'.tmp';
 		$res = recuperer_url(
 			$source,
 			['file' => $localrac_tmp, 'taille_max' => $taille_max, 'if_modified_since' => $t ? filemtime($localrac) : '']
@@ -121,10 +121,10 @@ 
 
 		$logger = spip_logger('distant');
 		if (!$res || !$res['length'] && $res['status'] != 304) {
-			$logger->notice("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'));
+			$logger->notice("copie_locale : Echec recuperation $source sur $localrac_tmp status : ".($res ? $res['status'] : '-'));
 			@unlink($localrac_tmp);
 		} else {
-			$logger->info("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status']);
+			$logger->info("copie_locale : recuperation $source sur $localrac_tmp OK | taille ".$res['length'].' status '.$res['status']);
 		}
 		if (!$res || !$res['length']) {
 			// si $t c'est sans doute juste un not-modified-since
@@ -137,7 +137,7 @@ 
 			&& is_callable($callback_valider_url)
 			&& !$callback_valider_url($res['url'])
 		) {
-			$logger->notice('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp");
+			$logger->notice('copie_locale : url finale '.$res['url']." non valide, on refuse le fichier $localrac_tmp");
 			@unlink($localrac_tmp);
 			return $t ? $local : false;
 		}
@@ -227,7 +227,7 @@ 
 
 	if (!$is_known_host) {
 		$host = trim($parsed_url['host'], '.');
-		if (! $ip = filter_var($host, FILTER_VALIDATE_IP)) {
+		if (!$ip = filter_var($host, FILTER_VALIDATE_IP)) {
 			$ip = gethostbyname($host);
 			if ($ip === $host) {
 				// Error condition for gethostbyname()
@@ -247,7 +247,7 @@ 
 				$ip = false;
 			}
 		}
-		if ($ip && ! filter_var($ip, FILTER_VALIDATE_IP, FILTER_FLAG_NO_PRIV_RANGE | FILTER_FLAG_NO_RES_RANGE)) {
+		if ($ip && !filter_var($ip, FILTER_VALIDATE_IP, FILTER_FLAG_NO_PRIV_RANGE | FILTER_FLAG_NO_RES_RANGE)) {
 			return false;
 		}
 	}
@@ -328,7 +328,7 @@ 
 				}
 			}
 			if ($taille > 500) {
-				$boundary = substr(md5(random_int(0, mt_getrandmax()) . 'spip'), 0, 8);
+				$boundary = substr(md5(random_int(0, mt_getrandmax()).'spip'), 0, 8);
 			}
 		}
 
@@ -361,10 +361,10 @@ 
 				foreach ($donnees as $cle => $valeur) {
 					if (is_array($valeur)) {
 						foreach ($valeur as $val2) {
-							$chaines[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
+							$chaines[] = rawurlencode($cle).'[]='.rawurlencode((string) $val2);
 						}
 					} else {
-						$chaines[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
+						$chaines[] = rawurlencode($cle).'='.rawurlencode((string) $valeur);
 					}
 				}
 				$chaine = implode('&', $chaines);
@@ -468,13 +468,13 @@ 
 	}
 
 	$logger = spip_logger('distant');
-	$logger->debug('recuperer_url ' . $options['methode'] . " sur $url");
+	$logger->debug('recuperer_url '.$options['methode']." sur $url");
 
 	// Ajout des en-têtes spécifiques si besoin
 	$formatted_data = '';
 	if (!empty($options['headers'])) {
 		foreach ($options['headers'] as $champ => $valeur) {
-			$formatted_data .= $champ . ': ' . $valeur . "\r\n";
+			$formatted_data .= $champ.': '.$valeur."\r\n";
 		}
 	}
 
@@ -482,9 +482,9 @@ 
 		[$head, $postdata] = prepare_donnees_post($options['datas'], $options['boundary']);
 		$head .= $formatted_data;
 		if (stripos($head, 'Content-Length:') === false) {
-			$head .= 'Content-Length: ' . strlen((string) $postdata) . "\r\n";
+			$head .= 'Content-Length: '.strlen((string) $postdata)."\r\n";
 		}
-		$formatted_data = $head . "\r\n" . $postdata;
+		$formatted_data = $head."\r\n".$postdata;
 		if (
 			strlen((string) $postdata) && !$methode_demandee
 		) {
@@ -497,9 +497,9 @@ 
 	// Accepter les URLs au format feed:// ou qui ont oublie le http:// ou les urls relatives au protocole
 	$url = preg_replace(',^feed://,i', 'http://', $url);
 	if (!tester_url_absolue($url)) {
-		$url = 'http://' . $url;
+		$url = 'http://'.$url;
 	} elseif (str_starts_with($url, '//')) {
-		$url = 'http:' . $url;
+		$url = 'http:'.$url;
 	}
 
 	$url = url_to_ascii($url);
@@ -575,11 +575,11 @@ 
 				$options['methode'] = 'GET';
 				$options['datas'] = '';
 			}
-			$logger->debug('recuperer_url recommence ' . $options['methode'] . " sur $url");
+			$logger->debug('recuperer_url recommence '.$options['methode']." sur $url");
 
 			return recuperer_url($url, $options);
 		} elseif ($res['status'] !== 200) {
-			$logger->info('HTTP status ' . $res['status'] . " pour $url");
+			$logger->info('HTTP status '.$res['status']." pour $url");
 		}
 		$result['status'] = $res['status'];
 		if (isset($res['headers'])) {
@@ -598,7 +598,7 @@ 
 
 	// on ne veut que les entetes
 	if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
-		$logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR));
+		$logger->debug('RESULTAT recuperer_url '.$options['methode']." sur $url : ".json_encode($result, JSON_THROW_ON_ERROR));
 		return $result;
 	}
 
@@ -608,7 +608,7 @@ 
 
 	$gz = false;
 	if (preg_match(",\bContent-Encoding: .*gzip,is", (string) $result['headers'])) {
-		$gz = (_DIR_TMP . md5(uniqid(random_int(0, mt_getrandmax()))) . '.tmp.gz');
+		$gz = (_DIR_TMP.md5(uniqid(random_int(0, mt_getrandmax()))).'.tmp.gz');
 	}
 
 	// si on n'a pas deja récupéré le contenu par une methode detournée
@@ -657,10 +657,10 @@ 
 		$trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
 	} catch (JsonException $e) {
 		$trace = [];
-		$logger->error('Failed to parse Json data : ' . $e->getMessage());
+		$logger->error('Failed to parse Json data : '.$e->getMessage());
 	}
 	$trace['page'] = '...';
-	$logger->debug('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR));
+	$logger->debug('RESULTAT recuperer_url '.$options['methode']." sur $url : ".json_encode($trace, JSON_THROW_ON_ERROR));
 
 	return $result;
 }
@@ -714,7 +714,7 @@ 
 	$sig['url'] = $url;
 
 	$dir = sous_repertoire(_DIR_CACHE, 'curl');
-	$cache = md5(serialize($sig)) . '-' . substr(preg_replace(',\W+,', '_', $url), 0, 80);
+	$cache = md5(serialize($sig)).'-'.substr(preg_replace(',\W+,', '_', $url), 0, 80);
 	$sub = sous_repertoire($dir, substr($cache, 0, 2));
 	$cache = "$sub$cache";
 
@@ -768,7 +768,7 @@ 
 	$fp = false;
 	if ($fichier) {
 		include_spip('inc/acces');
-		$tmpfile = "$fichier." . creer_uniqid() . '.tmp';
+		$tmpfile = "$fichier.".creer_uniqid().'.tmp';
 		$fp = spip_fopen_lock($tmpfile, 'w', LOCK_EX);
 		if (!$fp && file_exists($fichier)) {
 			return filesize($fichier);
@@ -841,11 +841,11 @@ 
 	}
 	$result['status'] = (int) $r[1];
 	while ($s = trim(fgets($handle, 16384))) {
-		$result['headers'][] = $s . "\n";
+		$result['headers'][] = $s."\n";
 		preg_match(',^([^:]*): *(.*)$,i', $s, $r);
 		[, $d, $v] = $r;
 		$d = strtolower(trim($d));
-		if ( $d === 'location' && $result['status'] >= 300 && $result['status'] < 400) {
+		if ($d === 'location' && $result['status'] >= 300 && $result['status'] < 400) {
 			$result['location'] = $v;
 		} elseif ($d === 'last-modified') {
 			$result['last_modified'] = strtotime($v);
@@ -893,7 +893,7 @@ 
 
 	// on se place tout le temps comme si on était a la racine
 	if (_DIR_RACINE) {
-		$d = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', (string) $d);
+		$d = preg_replace(',^'.preg_quote((string) _DIR_RACINE, ',').',', '', (string) $d);
 	}
 
 	$m = md5($source);
@@ -901,18 +901,18 @@ 
 	$filename =
 		$d
 		. substr(preg_replace(',[^\w-],', '', basename($source, $extension)), 0, 16)
-		. '-' . substr($m, 0, 8)
+		. '-'.substr($m, 0, 8)
 		. ".$extension";
 
 	// ancien nommage des fichiers distants : renommer le fichier a la volee si besoin pour eviter de dupliquer les caches
 	$legacy_filename =
 		$d
-		. substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
+		. substr(preg_replace(',[^\w-],', '', basename($source)).'-'.$m, 0, 12)
 		. substr($m, 0, 4)
 		. ".$extension";
 
-	if (file_exists(_DIR_RACINE . $legacy_filename)) {
-		@rename(_DIR_RACINE . $legacy_filename, $filename);
+	if (file_exists(_DIR_RACINE.$legacy_filename)) {
+		@rename(_DIR_RACINE.$legacy_filename, $filename);
 	}
 
 	return $filename;
@@ -937,7 +937,7 @@ 
 	// Si c'est deja local pas de souci
 	if (!tester_url_absolue($source)) {
 		if (_DIR_RACINE) {
-			$source = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', $source);
+			$source = preg_replace(',^'.preg_quote((string) _DIR_RACINE, ',').',', '', $source);
 		}
 
 		return $source;
@@ -955,7 +955,7 @@ 
 		$ext
 		&& preg_match(',^\w+$,', $ext)
 		&& ($f = nom_fichier_copie_locale($source, $ext))
-		&& file_exists(_DIR_RACINE . $f)
+		&& file_exists(_DIR_RACINE.$f)
 	) {
 		return $f;
 	}
@@ -963,7 +963,7 @@ 
 
 	// Si c'est deja dans la table des documents,
 	// ramener le nom de sa copie potentielle
-	$ext = sql_getfetsel('extension', 'spip_documents', 'fichier=' . sql_quote($source) . " AND distant='oui' AND extension <> ''");
+	$ext = sql_getfetsel('extension', 'spip_documents', 'fichier='.sql_quote($source)." AND distant='oui' AND extension <> ''");
 
 	if ($ext) {
 		return nom_fichier_copie_locale($source, $ext);
@@ -974,9 +974,9 @@ 
 
 	$ext = $path_parts ? $path_parts['extension'] : '';
 
-	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
+	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension='.sql_quote($ext))) {
 		$f = nom_fichier_copie_locale($source, $ext);
-		if (file_exists(_DIR_RACINE . $f)) {
+		if (file_exists(_DIR_RACINE.$f)) {
 			return $f;
 		}
 	}
@@ -984,7 +984,7 @@ 
 	// Ping  pour voir si son extension est connue et autorisee
 	// avec mise en cache du resultat du ping
 
-	$cache = sous_repertoire(_DIR_CACHE, 'rid') . md5($source);
+	$cache = sous_repertoire(_DIR_CACHE, 'rid').md5($source);
 	if (
 		!@file_exists($cache)
 		|| !($path_parts = @unserialize(spip_file_get_contents($cache)))
@@ -994,7 +994,7 @@ 
 		ecrire_fichier($cache, serialize($path_parts));
 	}
 	$ext = empty($path_parts['extension']) ? '' : $path_parts['extension'];
-	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension=' . sql_quote($ext))) {
+	if ($ext && sql_getfetsel('extension', 'spip_types_documents', 'extension='.sql_quote($ext))) {
 		return nom_fichier_copie_locale($source, $ext);
 	}
 
@@ -1100,7 +1100,7 @@ 
 		} else {
 			if ($a['body']) {
 				$a['extension'] = corriger_extension($extension);
-				$a['fichier'] = _DIR_RACINE . nom_fichier_copie_locale($source, $extension);
+				$a['fichier'] = _DIR_RACINE.nom_fichier_copie_locale($source, $extension);
 				ecrire_fichier($a['fichier'], $a['body']);
 				$size_image = @spip_getimagesize($a['fichier']);
 				$a['largeur'] = (int) $size_image[0];
@@ -1172,20 +1172,20 @@ 
 	$t = null;
 	if (in_array($mime_type, ['text/plain', '', 'application/octet-stream'])) {
 		if (!$t && preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)) {
-			$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+			$t = sql_fetsel('extension', 'spip_types_documents', 'extension='.sql_quote(corriger_extension($rext[1]), '', 'text'));
 		}
 		if (
 			!$t
 			&& preg_match(',^Content-Disposition:\s*attachment;\s*filename=(.*)$,Uims', $headers, $m)
 			&& preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $m[1], $rext)
 		) {
-			$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+			$t = sql_fetsel('extension', 'spip_types_documents', 'extension='.sql_quote(corriger_extension($rext[1]), '', 'text'));
 		}
 	}
 
 	// Autre mime/type (ou text/plain avec fichier d'extension inconnue)
 	if (!$t) {
-		$t = sql_fetsel('extension', 'spip_types_documents', 'mime_type=' . sql_quote($mime_type));
+		$t = sql_fetsel('extension', 'spip_types_documents', 'mime_type='.sql_quote($mime_type));
 	}
 
 	// Toujours rien ? (ex: audio/x-ogg au lieu de application/ogg)
@@ -1196,11 +1196,11 @@ 
 		&& preg_match(',\.([a-z0-9]+)(\?.*)?$,i', $source, $rext)
 	) {
 		# eviter xxx.3 => 3gp (> SPIP 3)
-		$t = sql_fetsel('extension', 'spip_types_documents', 'extension=' . sql_quote(corriger_extension($rext[1]), '', 'text'));
+		$t = sql_fetsel('extension', 'spip_types_documents', 'extension='.sql_quote(corriger_extension($rext[1]), '', 'text'));
 	}
 
 	if ($t) {
-		spip_logger('distant')->info("mime-type $mime_type ok, extension " . $t['extension']);
+		spip_logger('distant')->info("mime-type $mime_type ok, extension ".$t['extension']);
 		return $t['extension'];
 	} else {
 		# par defaut on retombe sur '.bin' si c'est autorise
@@ -1303,7 +1303,7 @@ 
 		}
 	} else {
 		$scheme = $t['scheme'];
-		$noproxy = $scheme . '://';
+		$noproxy = $scheme.'://';
 	}
 	if (isset($t['user'])) {
 		// user et pass doivent être passés en urlencodé dans l'URL, on redecode ici
@@ -1318,7 +1318,7 @@ 
 	}
 
 	if (!empty($t['query'])) {
-		$path .= '?' . $t['query'];
+		$path .= '?'.$t['query'];
 	}
 
 	$f = lance_requete($method, $scheme, $user, $host, $path, $port, $noproxy, $refuse_gz, $referer, $datas, $vers, $date);
@@ -1392,29 +1392,29 @@ 
 	$proxy_user = '';
 	$http_proxy = need_proxy($host);
 	if ($user) {
-		$user = urlencode((string) $user[0]) . ':' . urlencode((string) $user[1]);
+		$user = urlencode((string) $user[0]).':'.urlencode((string) $user[1]);
 	}
 
 	$connect = '';
 	if ($http_proxy) {
-		if (!defined('_PROXY_HTTPS_NOT_VIA_CONNECT') && in_array($scheme, ['tls','ssl'])) {
-			$path_host = ($user ? "$user@" : '') . $host . (($port != 80) ? ":$port" : '');
-			$connect = 'CONNECT ' . $path_host . " $vers\r\n"
+		if (!defined('_PROXY_HTTPS_NOT_VIA_CONNECT') && in_array($scheme, ['tls', 'ssl'])) {
+			$path_host = ($user ? "$user@" : '').$host.(($port != 80) ? ":$port" : '');
+			$connect = 'CONNECT '.$path_host." $vers\r\n"
 				. "Host: $path_host\r\n"
 				. "Proxy-Connection: Keep-Alive\r\n";
 		} else {
-			$path = (in_array($scheme, ['tls','ssl']) ? 'https://' : "$scheme://")
+			$path = (in_array($scheme, ['tls', 'ssl']) ? 'https://' : "$scheme://")
 				. ($user ? "$user@" : '')
-				. "$host" . (($port != 80) ? ":$port" : '') . $path;
+				. "$host".(($port != 80) ? ":$port" : '').$path;
 		}
 		$t2 = @parse_url($http_proxy);
 		$first_host = $t2['host'];
 		$first_port = ($t2['port'] ?? null) ?: 80;
 		if ($t2['user'] ?? null) {
-			$proxy_user = base64_encode($t2['user'] . ':' . $t2['pass']);
+			$proxy_user = base64_encode($t2['user'].':'.$t2['pass']);
 		}
 	} else {
-		$first_host = $noproxy . $host;
+		$first_host = $noproxy.$host;
 		$first_port = $port;
 	}
 
@@ -1479,16 +1479,16 @@ 
 	$site = $GLOBALS['meta']['adresse_site'] ?? '';
 
 	$host_port = $host;
-	if ($port != (in_array($scheme, ['tls','ssl']) ? 443 : 80)) {
+	if ($port != (in_array($scheme, ['tls', 'ssl']) ? 443 : 80)) {
 		$host_port .= ":$port";
 	}
 	$req = "$method $path $vers\r\n"
 		. "Host: $host_port\r\n"
-		. 'User-Agent: ' . _INC_DISTANT_USER_AGENT . "\r\n"
-		. ($refuse_gz ? '' : ('Accept-Encoding: ' . _INC_DISTANT_CONTENT_ENCODING . "\r\n"))
+		. 'User-Agent: '._INC_DISTANT_USER_AGENT."\r\n"
+		. ($refuse_gz ? '' : ('Accept-Encoding: '._INC_DISTANT_CONTENT_ENCODING."\r\n"))
 		. ($site ? "Referer: $site/$referer\r\n" : '')
-		. ($date ? 'If-Modified-Since: ' . (gmdate('D, d M Y H:i:s', $date) . " GMT\r\n") : '')
-		. ($user ? 'Authorization: Basic ' . base64_encode(urldecode($user)) . "\r\n" : '')
+		. ($date ? 'If-Modified-Since: '.(gmdate('D, d M Y H:i:s', $date)." GMT\r\n") : '')
+		. ($user ? 'Authorization: Basic '.base64_encode(urldecode($user))."\r\n" : '')
 		. ($proxy_user ? "Proxy-Authorization: Basic $proxy_user\r\n" : '')
 		. (strpos($vers, '1.1') ? "Keep-Alive: 300\r\nConnection: keep-alive\r\n" : '');
 

ecrire/inc/log.php

Indentation +25 added lines, -25 removed lines

@@ -11,35 +11,35 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
  * @deprecated 5.0 Utiliser spip_logger()
  */
 function inc_log_dist($message, $logname = null, $logdir = null, $logsuf = null) {
-	trigger_deprecation(
-		'spip',
-		'5.0',
-		'La fonction inc_log_dist() est déprécée.' .
-			' Utilisez spip_logger() à la place.'
-	);
-	static $pre = [
-		'HS:' => LogLevel::EMERGENCY,
-		'ALERTE:' => LogLevel::ALERT,
-		'CRITIQUE:' => LogLevel::CRITICAL,
-		'ERREUR:' => LogLevel::ERROR,
-		'WARNING:' => LogLevel::WARNING,
-		'!INFO:' => LogLevel::NOTICE,
-		'info:' => LogLevel::INFO,
-		'debug:' => LogLevel::DEBUG,
-	];
-	foreach ($pre as $start => $level) {
-		if (str_starts_with($message, $start)) {
-			spip_logger($logname)->log($level, ltrim(substr($message, strlen($start))));
-			return;
-		}
-	}
-	spip_logger($logname)->info($message);
-	return;
+    trigger_deprecation(
+        'spip',
+        '5.0',
+        'La fonction inc_log_dist() est déprécée.' .
+            ' Utilisez spip_logger() à la place.'
+    );
+    static $pre = [
+        'HS:' => LogLevel::EMERGENCY,
+        'ALERTE:' => LogLevel::ALERT,
+        'CRITIQUE:' => LogLevel::CRITICAL,
+        'ERREUR:' => LogLevel::ERROR,
+        'WARNING:' => LogLevel::WARNING,
+        '!INFO:' => LogLevel::NOTICE,
+        'info:' => LogLevel::INFO,
+        'debug:' => LogLevel::DEBUG,
+    ];
+    foreach ($pre as $start => $level) {
+        if (str_starts_with($message, $start)) {
+            spip_logger($logname)->log($level, ltrim(substr($message, strlen($start))));
+            return;
+        }
+    }
+    spip_logger($logname)->info($message);
+    return;
 }

Spacing +1 added lines, -1 removed lines

@@ -21,7 +21,7 @@
 	trigger_deprecation(
 		'spip',
 		'5.0',
-		'La fonction inc_log_dist() est déprécée.' .
+		'La fonction inc_log_dist() est déprécée.'.
 			' Utilisez spip_logger() à la place.'
 	);
 	static $pre = [

ecrire/inc/session.php

Indentation +497 added lines, -497 removed lines

@@ -18,7 +18,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -39,15 +39,15 @@ 
  * @return bool|null|void
  */
 function inc_session_dist($auteur = false) {
-	if (is_numeric($auteur)) {
-		return supprimer_sessions($auteur, $auteur > 0);
-	} else {
-		if (is_array($auteur)) {
-			return ajouter_session($auteur);
-		} else {
-			return verifier_session($auteur);
-		}
-	}
+    if (is_numeric($auteur)) {
+        return supprimer_sessions($auteur, $auteur > 0);
+    } else {
+        if (is_array($auteur)) {
+            return ajouter_session($auteur);
+        } else {
+            return verifier_session($auteur);
+        }
+    }
 }
 
 
@@ -76,37 +76,37 @@ 
  */
 function supprimer_sessions($id_auteur, $toutes = true, $actives = true) {
 
-	$nb_files = 0;
-	$nb_max_files = (defined('_MAX_NB_SESSIONS_OUVERTES') ? _MAX_NB_SESSIONS_OUVERTES : 1000);
-	spip_logger('session')->info("supprimer sessions auteur $id_auteur");
-	if ($toutes || $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
-		if ($dir = opendir(_DIR_SESSIONS)) {
-			$t = $_SERVER['REQUEST_TIME']  - (4 * _RENOUVELLE_ALEA); // 48h par defaut
-			$t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA / 4, 3 * 3600); // 3h par defaut
-			while (($f = readdir($dir)) !== false) {
-				$nb_files++;
-				if (preg_match(',^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,', $f, $regs)) {
-					$f = _DIR_SESSIONS . $f;
-					if ($actives && $regs[1] == $id_auteur || $t > filemtime($f)) {
-						spip_unlink($f);
-					}
-					// si il y a trop de sessions ouvertes, on purge les sessions anonymes de plus de 3H
-					// cf http://core.spip.org/issues/3276
-					elseif ($nb_files > $nb_max_files && !intval($regs[1]) && $t_short > filemtime($f)) {
-						spip_unlink($f);
-					}
-				}
-			}
-		}
-	} else {
-		verifier_session();
-		if ($cookie = lire_cookie_session()) {
-			spip_unlink(chemin_fichier_session('alea_ephemere', $cookie, true));
-		}
-	}
-
-	// forcer le recalcul de la session courante
-	spip_session(true);
+    $nb_files = 0;
+    $nb_max_files = (defined('_MAX_NB_SESSIONS_OUVERTES') ? _MAX_NB_SESSIONS_OUVERTES : 1000);
+    spip_logger('session')->info("supprimer sessions auteur $id_auteur");
+    if ($toutes || $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
+        if ($dir = opendir(_DIR_SESSIONS)) {
+            $t = $_SERVER['REQUEST_TIME']  - (4 * _RENOUVELLE_ALEA); // 48h par defaut
+            $t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA / 4, 3 * 3600); // 3h par defaut
+            while (($f = readdir($dir)) !== false) {
+                $nb_files++;
+                if (preg_match(',^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,', $f, $regs)) {
+                    $f = _DIR_SESSIONS . $f;
+                    if ($actives && $regs[1] == $id_auteur || $t > filemtime($f)) {
+                        spip_unlink($f);
+                    }
+                    // si il y a trop de sessions ouvertes, on purge les sessions anonymes de plus de 3H
+                    // cf http://core.spip.org/issues/3276
+                    elseif ($nb_files > $nb_max_files && !intval($regs[1]) && $t_short > filemtime($f)) {
+                        spip_unlink($f);
+                    }
+                }
+            }
+        }
+    } else {
+        verifier_session();
+        if ($cookie = lire_cookie_session()) {
+            spip_unlink(chemin_fichier_session('alea_ephemere', $cookie, true));
+        }
+    }
+
+    // forcer le recalcul de la session courante
+    spip_session(true);
 }
 
 /**
@@ -124,124 +124,124 @@ 
  * @return bool|string
  */
 function ajouter_session($auteur) {
-	// Si le client a deja une session valide pour son id_auteur
-	// on conserve le meme fichier
-
-	// Attention un visiteur peut avoir une session et un id=0,
-	// => ne pas melanger les sessions des differents visiteurs
-	$id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
-
-	// Si ce n'est pas un inscrit (les inscrits ont toujours des choses en session)
-	// on va vérifier s'il y a vraiment des choses à écrire
-	if (!$id_auteur) {
-		// On supprime les données de base pour voir le contenu réel de la session
-		$auteur_verif = $auteur;
-		if (isset($auteur_verif['id_auteur'])) {
-			unset($auteur_verif['id_auteur']);
-		}
-		if (isset($auteur_verif['hash_env'])) {
-			unset($auteur_verif['hash_env']);
-		}
-		if (isset($auteur_verif['ip_change'])) {
-			unset($auteur_verif['ip_change']);
-		}
-		if (isset($auteur_verif['date_session'])) {
-			unset($auteur_verif['date_session']);
-		}
-
-		// Les variables vraiment nulle ne sont pas à prendre en compte non plus
-		foreach ($auteur_verif as $variable => $valeur) {
-			if ($valeur === null) {
-				unset($auteur_verif[$variable]);
-			}
-		}
-
-		// Si après ça la session est vide alors on supprime l'éventuel fichier et on arrête là
-		if (!$auteur_verif) {
-			if ($cookie = lire_cookie_session()) {
-				if (isset($_SESSION[$cookie])) {
-					unset($_SESSION[$cookie]);
-				}
-				unset($_COOKIE['spip_session']);
-			}
-
-			return false;
-		}
-	}
-
-	if (
-		(!$cookie = lire_cookie_session())
-		|| intval($cookie) !== $id_auteur
-	) {
-		$cookie = $id_auteur . '_' . md5(uniqid(random_int(0, mt_getrandmax()), true));
-	}
-
-	// Maintenant on sait qu'on a des choses à écrire
-	// On s'assure d'avoir au moins ces valeurs
-	$auteur['id_auteur'] = $id_auteur;
-	if (!isset($auteur['hash_env'])) {
-		$auteur['hash_env'] = hash_env();
-	}
-	if (!isset($auteur['ip_change'])) {
-		$auteur['ip_change'] = false;
-	}
-
-	if (!isset($auteur['date_session'])) {
-		$auteur['date_session'] = time();
-	}
-	if (
-		isset($auteur['prefs'])
-		&& is_string($auteur['prefs'])
-		&& ($prefs = @unserialize($auteur['prefs']))
-	) {
-		$auteur['prefs'] = $prefs;
-	}
-
-	$fichier_session = '';
-
-	// les sessions anonymes sont stockees dans $_SESSION
-	if (!$id_auteur) {
-		spip_php_session_start();
-		$_SESSION[$cookie] = preparer_ecriture_session($auteur);
-	} else {
-		$fichier_session = chemin_fichier_session('alea_ephemere', $cookie);
-		if (!ecrire_fichier_session($fichier_session, $auteur)) {
-			spip_logger('session')->emergency('Echec ecriture fichier session ' . $fichier_session);
-			include_spip('inc/minipres');
-			echo minipres();
-			exit;
-		}
-		// verifier et limiter le nombre maxi de sessions
-		// https://core.spip.net/issues/3807
-		lister_sessions_auteur($id_auteur);
-	}
-
-	// poser le cookie de session SPIP
-	include_spip('inc/cookie');
-	$duree = definir_duree_cookie_session($auteur);
-	$cookie = set_cookie_session($cookie, time() + $duree);
-	spip_logger('session')->info("ajoute session $fichier_session cookie $duree");
-
-	// Si on est admin, poser le cookie de correspondance
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-	if (autoriser('ecrire', '', '', $auteur) && _DUREE_COOKIE_ADMIN) {
-		spip_setcookie(
-			'spip_admin',
-			'@' . ($auteur['email'] ?: $auteur['login']),
-			time() + max(_DUREE_COOKIE_ADMIN, $duree),
-			httponly: true
-		);
-	} else {
-		// sinon le supprimer ...
-		spip_setcookie('spip_admin', '', 1, httponly: true);
-	}
-
-	# on en profite pour purger les vieilles sessions anonymes abandonnees
-	# supprimer_sessions(0, true, false);
-
-	return $cookie;
+    // Si le client a deja une session valide pour son id_auteur
+    // on conserve le meme fichier
+
+    // Attention un visiteur peut avoir une session et un id=0,
+    // => ne pas melanger les sessions des differents visiteurs
+    $id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
+
+    // Si ce n'est pas un inscrit (les inscrits ont toujours des choses en session)
+    // on va vérifier s'il y a vraiment des choses à écrire
+    if (!$id_auteur) {
+        // On supprime les données de base pour voir le contenu réel de la session
+        $auteur_verif = $auteur;
+        if (isset($auteur_verif['id_auteur'])) {
+            unset($auteur_verif['id_auteur']);
+        }
+        if (isset($auteur_verif['hash_env'])) {
+            unset($auteur_verif['hash_env']);
+        }
+        if (isset($auteur_verif['ip_change'])) {
+            unset($auteur_verif['ip_change']);
+        }
+        if (isset($auteur_verif['date_session'])) {
+            unset($auteur_verif['date_session']);
+        }
+
+        // Les variables vraiment nulle ne sont pas à prendre en compte non plus
+        foreach ($auteur_verif as $variable => $valeur) {
+            if ($valeur === null) {
+                unset($auteur_verif[$variable]);
+            }
+        }
+
+        // Si après ça la session est vide alors on supprime l'éventuel fichier et on arrête là
+        if (!$auteur_verif) {
+            if ($cookie = lire_cookie_session()) {
+                if (isset($_SESSION[$cookie])) {
+                    unset($_SESSION[$cookie]);
+                }
+                unset($_COOKIE['spip_session']);
+            }
+
+            return false;
+        }
+    }
+
+    if (
+        (!$cookie = lire_cookie_session())
+        || intval($cookie) !== $id_auteur
+    ) {
+        $cookie = $id_auteur . '_' . md5(uniqid(random_int(0, mt_getrandmax()), true));
+    }
+
+    // Maintenant on sait qu'on a des choses à écrire
+    // On s'assure d'avoir au moins ces valeurs
+    $auteur['id_auteur'] = $id_auteur;
+    if (!isset($auteur['hash_env'])) {
+        $auteur['hash_env'] = hash_env();
+    }
+    if (!isset($auteur['ip_change'])) {
+        $auteur['ip_change'] = false;
+    }
+
+    if (!isset($auteur['date_session'])) {
+        $auteur['date_session'] = time();
+    }
+    if (
+        isset($auteur['prefs'])
+        && is_string($auteur['prefs'])
+        && ($prefs = @unserialize($auteur['prefs']))
+    ) {
+        $auteur['prefs'] = $prefs;
+    }
+
+    $fichier_session = '';
+
+    // les sessions anonymes sont stockees dans $_SESSION
+    if (!$id_auteur) {
+        spip_php_session_start();
+        $_SESSION[$cookie] = preparer_ecriture_session($auteur);
+    } else {
+        $fichier_session = chemin_fichier_session('alea_ephemere', $cookie);
+        if (!ecrire_fichier_session($fichier_session, $auteur)) {
+            spip_logger('session')->emergency('Echec ecriture fichier session ' . $fichier_session);
+            include_spip('inc/minipres');
+            echo minipres();
+            exit;
+        }
+        // verifier et limiter le nombre maxi de sessions
+        // https://core.spip.net/issues/3807
+        lister_sessions_auteur($id_auteur);
+    }
+
+    // poser le cookie de session SPIP
+    include_spip('inc/cookie');
+    $duree = definir_duree_cookie_session($auteur);
+    $cookie = set_cookie_session($cookie, time() + $duree);
+    spip_logger('session')->info("ajoute session $fichier_session cookie $duree");
+
+    // Si on est admin, poser le cookie de correspondance
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+    if (autoriser('ecrire', '', '', $auteur) && _DUREE_COOKIE_ADMIN) {
+        spip_setcookie(
+            'spip_admin',
+            '@' . ($auteur['email'] ?: $auteur['login']),
+            time() + max(_DUREE_COOKIE_ADMIN, $duree),
+            httponly: true
+        );
+    } else {
+        // sinon le supprimer ...
+        spip_setcookie('spip_admin', '', 1, httponly: true);
+    }
+
+    # on en profite pour purger les vieilles sessions anonymes abandonnees
+    # supprimer_sessions(0, true, false);
+
+    return $cookie;
 }
 
 /**
@@ -261,54 +261,54 @@ 
  *     Durée en secondes
 **/
 function definir_duree_cookie_session($auteur) {
-	$coef = 2;
-	if (isset($auteur['cookie'])) {
-		if (is_numeric($auteur['cookie'])) {
-			$coef = $auteur['cookie'];
-		} else {
-			$coef = 20;
-		}
-	}
-	return (int)(_RENOUVELLE_ALEA * $coef);
+    $coef = 2;
+    if (isset($auteur['cookie'])) {
+        if (is_numeric($auteur['cookie'])) {
+            $coef = $auteur['cookie'];
+        } else {
+            $coef = 20;
+        }
+    }
+    return (int)(_RENOUVELLE_ALEA * $coef);
 }
 
 /**
  * Lire le cookie de session et le valider de façon centralisée
  */
 function lire_cookie_session(bool $accepter_test = false): ?string {
-	static $cookie_valide = [];
-	// pas de cookie ?
-	if (!isset($_COOKIE['spip_session'])) {
-		return null;
-	}
-
-	if (array_key_exists($_COOKIE['spip_session'], $cookie_valide)) {
-		return $cookie_valide[$_COOKIE['spip_session']];
-	}
-
-	if ($accepter_test && $_COOKIE['spip_session'] === 'test_echec_cookie') {
-		return 'test_echec_cookie';
-	}
-
-	if (!preg_match(",^\d+_[0-9a-f]{32}$,", $_COOKIE['spip_session'])) {
-		// cookie invalide ?
-		effacer_cookie_session();
-		return null;
-	}
-
-	// ok
-	$cookie_valide[$_COOKIE['spip_session']] = $_COOKIE['spip_session'];
-
-	return $_COOKIE['spip_session'];
+    static $cookie_valide = [];
+    // pas de cookie ?
+    if (!isset($_COOKIE['spip_session'])) {
+        return null;
+    }
+
+    if (array_key_exists($_COOKIE['spip_session'], $cookie_valide)) {
+        return $cookie_valide[$_COOKIE['spip_session']];
+    }
+
+    if ($accepter_test && $_COOKIE['spip_session'] === 'test_echec_cookie') {
+        return 'test_echec_cookie';
+    }
+
+    if (!preg_match(",^\d+_[0-9a-f]{32}$,", $_COOKIE['spip_session'])) {
+        // cookie invalide ?
+        effacer_cookie_session();
+        return null;
+    }
+
+    // ok
+    $cookie_valide[$_COOKIE['spip_session']] = $_COOKIE['spip_session'];
+
+    return $_COOKIE['spip_session'];
 }
 
 /** Annuler le cookie de session */
 function effacer_cookie_session(): void {
-	// supprimer le cookie
-	if (isset($_COOKIE['spip_session'])) {
-		spip_setcookie('spip_session', '', time() - 24 * 3600, httponly: true);
-		unset($_COOKIE['spip_session']);
-	}
+    // supprimer le cookie
+    if (isset($_COOKIE['spip_session'])) {
+        spip_setcookie('spip_session', '', time() - 24 * 3600, httponly: true);
+        unset($_COOKIE['spip_session']);
+    }
 }
 
 /**
@@ -320,20 +320,20 @@ 
  *   timestamp d'expiration
  */
 function set_cookie_session(?string $valeur_cookie = null, int $expires = 0): ?string {
-	if ($valeur_cookie !== null) {
-		// vérifié par lire_cookie_session()
-		$_COOKIE['spip_session'] = $valeur_cookie;
-	}
+    if ($valeur_cookie !== null) {
+        // vérifié par lire_cookie_session()
+        $_COOKIE['spip_session'] = $valeur_cookie;
+    }
 
-	$valeur_cookie = lire_cookie_session();
+    $valeur_cookie = lire_cookie_session();
 
-	if ($valeur_cookie === null) {
-		effacer_cookie_session();
-	} else {
-		spip_setcookie('spip_session', $valeur_cookie, $expires, httponly: true);
-	}
+    if ($valeur_cookie === null) {
+        effacer_cookie_session();
+    } else {
+        spip_setcookie('spip_session', $valeur_cookie, $expires, httponly: true);
+    }
 
-	return $valeur_cookie;
+    return $valeur_cookie;
 }
 
 /**
@@ -353,91 +353,91 @@ 
  * @return bool|int|null
  */
 function verifier_session($change = false) {
-	// si pas de cookie, c'est fichu
-	if (!$cookie = lire_cookie_session()) {
-		return false;
-	}
-
-	$fichier_session = '';
-
-	// est-ce une session anonyme ?
-	if (!intval($cookie)) {
-		spip_php_session_start();
-		if (!isset($_SESSION[$cookie]) || !is_array($_SESSION[$cookie])) {
-			return false;
-		}
-		$GLOBALS['visiteur_session'] = $_SESSION[$cookie];
-	} else {
-		// Tester avec alea courant
-		$fichier_session = chemin_fichier_session('alea_ephemere', $cookie, true);
-		if ($fichier_session && @file_exists($fichier_session)) {
-			include($fichier_session);
-		} else {
-			// Sinon, tester avec alea precedent
-			$fichier_session = chemin_fichier_session('alea_ephemere_ancien', $cookie, true);
-			if (!$fichier_session || !@file_exists($fichier_session)) {
-				return false;
-			}
-
-			// Renouveler la session avec l'alea courant
-			include($fichier_session);
-			spip_logger('session')->info('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur']);
-			spip_unlink($fichier_session);
-			ajouter_session($GLOBALS['visiteur_session']);
-		}
-	}
-
-	// Compatibilite ascendante : auteur_session est visiteur_session si
-	// c'est un auteur SPIP authentifie (tandis qu'un visiteur_session peut
-	// n'etre qu'identifie, sans aucune authentification).
-
-	if (isset($GLOBALS['visiteur_session']['id_auteur']) && $GLOBALS['visiteur_session']['id_auteur']) {
-		$GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
-	}
-
-
-	// Si l'adresse IP change, inc/presentation mettra une balise image
-	// avec un URL de rappel demandant a changer le nom de la session.
-	// Seul celui qui a l'IP d'origine est rejoue
-	// ainsi un eventuel voleur de cookie ne pourrait pas deconnecter
-	// sa victime, mais se ferait deconnecter par elle.
-	if (hash_env() != $GLOBALS['visiteur_session']['hash_env']) {
-		if (!$GLOBALS['visiteur_session']['ip_change']) {
-			define('_SESSION_REJOUER', true);
-			$GLOBALS['visiteur_session']['ip_change'] = true;
-			ajouter_session($GLOBALS['visiteur_session']);
-		} else {
-			if ($change) {
-				spip_logger('session')->info('session non rejouee, vol de cookie ?');
-			}
-		}
-	} else {
-		if ($change) {
-			spip_logger('session')->info("rejoue session $fichier_session $cookie");
-			if ($fichier_session) {
-				spip_unlink($fichier_session);
-			}
-			$GLOBALS['visiteur_session']['ip_change'] = false;
-			unset($_COOKIE['spip_session']);
-			ajouter_session($GLOBALS['visiteur_session']);
-		}
-	}
-
-	// Si la session a ete initiee il y a trop longtemps, elle est annulee
-	if (
-		isset($GLOBALS['visiteur_session'])
-		&& defined('_AGE_SESSION_MAX')
-		&& _AGE_SESSION_MAX > 0
-		&& time() - @$GLOBALS['visiteur_session']['date_session'] > _AGE_SESSION_MAX
-	) {
-		unset($GLOBALS['visiteur_session']);
-
-		return false;
-	}
-
-	return is_numeric($GLOBALS['visiteur_session']['id_auteur'])
-		? $GLOBALS['visiteur_session']['id_auteur']
-		: null;
+    // si pas de cookie, c'est fichu
+    if (!$cookie = lire_cookie_session()) {
+        return false;
+    }
+
+    $fichier_session = '';
+
+    // est-ce une session anonyme ?
+    if (!intval($cookie)) {
+        spip_php_session_start();
+        if (!isset($_SESSION[$cookie]) || !is_array($_SESSION[$cookie])) {
+            return false;
+        }
+        $GLOBALS['visiteur_session'] = $_SESSION[$cookie];
+    } else {
+        // Tester avec alea courant
+        $fichier_session = chemin_fichier_session('alea_ephemere', $cookie, true);
+        if ($fichier_session && @file_exists($fichier_session)) {
+            include($fichier_session);
+        } else {
+            // Sinon, tester avec alea precedent
+            $fichier_session = chemin_fichier_session('alea_ephemere_ancien', $cookie, true);
+            if (!$fichier_session || !@file_exists($fichier_session)) {
+                return false;
+            }
+
+            // Renouveler la session avec l'alea courant
+            include($fichier_session);
+            spip_logger('session')->info('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur']);
+            spip_unlink($fichier_session);
+            ajouter_session($GLOBALS['visiteur_session']);
+        }
+    }
+
+    // Compatibilite ascendante : auteur_session est visiteur_session si
+    // c'est un auteur SPIP authentifie (tandis qu'un visiteur_session peut
+    // n'etre qu'identifie, sans aucune authentification).
+
+    if (isset($GLOBALS['visiteur_session']['id_auteur']) && $GLOBALS['visiteur_session']['id_auteur']) {
+        $GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
+    }
+
+
+    // Si l'adresse IP change, inc/presentation mettra une balise image
+    // avec un URL de rappel demandant a changer le nom de la session.
+    // Seul celui qui a l'IP d'origine est rejoue
+    // ainsi un eventuel voleur de cookie ne pourrait pas deconnecter
+    // sa victime, mais se ferait deconnecter par elle.
+    if (hash_env() != $GLOBALS['visiteur_session']['hash_env']) {
+        if (!$GLOBALS['visiteur_session']['ip_change']) {
+            define('_SESSION_REJOUER', true);
+            $GLOBALS['visiteur_session']['ip_change'] = true;
+            ajouter_session($GLOBALS['visiteur_session']);
+        } else {
+            if ($change) {
+                spip_logger('session')->info('session non rejouee, vol de cookie ?');
+            }
+        }
+    } else {
+        if ($change) {
+            spip_logger('session')->info("rejoue session $fichier_session $cookie");
+            if ($fichier_session) {
+                spip_unlink($fichier_session);
+            }
+            $GLOBALS['visiteur_session']['ip_change'] = false;
+            unset($_COOKIE['spip_session']);
+            ajouter_session($GLOBALS['visiteur_session']);
+        }
+    }
+
+    // Si la session a ete initiee il y a trop longtemps, elle est annulee
+    if (
+        isset($GLOBALS['visiteur_session'])
+        && defined('_AGE_SESSION_MAX')
+        && _AGE_SESSION_MAX > 0
+        && time() - @$GLOBALS['visiteur_session']['date_session'] > _AGE_SESSION_MAX
+    ) {
+        unset($GLOBALS['visiteur_session']);
+
+        return false;
+    }
+
+    return is_numeric($GLOBALS['visiteur_session']['id_auteur'])
+        ? $GLOBALS['visiteur_session']['id_auteur']
+        : null;
 }
 
 /**
@@ -452,7 +452,7 @@ 
  *     Valeur, si trouvée, `null` sinon.
  */
 function session_get($nom) {
-	return $GLOBALS['visiteur_session'][$nom] ?? null;
+    return $GLOBALS['visiteur_session'][$nom] ?? null;
 }
 
 
@@ -468,32 +468,32 @@ 
  * @return void|array
  */
 function session_set($nom, $val = null) {
-	static $remove = [];
-	static $actualiser_sessions = false;
-	if ($nom === false) {
-		return $remove;
-	}
-	if (is_null($val)) {
-		// rien a faire
-		if (!isset($GLOBALS['visiteur_session'][$nom])) {
-			return;
-		}
-		unset($GLOBALS['visiteur_session'][$nom]);
-		$remove[] = $nom;
-	} else {
-		// On ajoute la valeur dans la globale
-		$GLOBALS['visiteur_session'][$nom] = $val;
-		if ($remove) {
-			$remove = array_diff($remove, [$nom]);
-		}
-	}
-	if (!$actualiser_sessions) {
-		// il faut creer la session si on en a pas, la premiere fois
-		ajouter_session($GLOBALS['visiteur_session']);
-		// in register la fonction qui mettra a jour toutes les sessions en fin de hit
-		register_shutdown_function('terminer_actualiser_sessions');
-		$actualiser_sessions = true;
-	}
+    static $remove = [];
+    static $actualiser_sessions = false;
+    if ($nom === false) {
+        return $remove;
+    }
+    if (is_null($val)) {
+        // rien a faire
+        if (!isset($GLOBALS['visiteur_session'][$nom])) {
+            return;
+        }
+        unset($GLOBALS['visiteur_session'][$nom]);
+        $remove[] = $nom;
+    } else {
+        // On ajoute la valeur dans la globale
+        $GLOBALS['visiteur_session'][$nom] = $val;
+        if ($remove) {
+            $remove = array_diff($remove, [$nom]);
+        }
+    }
+    if (!$actualiser_sessions) {
+        // il faut creer la session si on en a pas, la premiere fois
+        ajouter_session($GLOBALS['visiteur_session']);
+        // in register la fonction qui mettra a jour toutes les sessions en fin de hit
+        register_shutdown_function('terminer_actualiser_sessions');
+        $actualiser_sessions = true;
+    }
 }
 
 /**
@@ -502,12 +502,12 @@ 
  * @uses actualiser_sessions()
  */
 function terminer_actualiser_sessions() {
-	// se remettre dans le dossier de travail au cas ou Apache a change
-	chdir(_ROOT_CWD);
-	// recuperer les variables a effacer
-	$remove = session_set(false);
-	// mettre a jour toutes les sessions
-	actualiser_sessions($GLOBALS['visiteur_session'], $remove);
+    // se remettre dans le dossier de travail au cas ou Apache a change
+    chdir(_ROOT_CWD);
+    // recuperer les variables a effacer
+    $remove = session_set(false);
+    // mettre a jour toutes les sessions
+    actualiser_sessions($GLOBALS['visiteur_session'], $remove);
 }
 
 
@@ -532,83 +532,83 @@ 
  */
 function actualiser_sessions($auteur, $supprimer_cles = []) {
 
-	$id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
-	$id_auteur_courant = isset($GLOBALS['visiteur_session']['id_auteur']) ? intval($GLOBALS['visiteur_session']['id_auteur']) : 0;
-
-	// si l'auteur est celui de la session courante, verifier/creer la session si besoin
-	$fichier_session_courante = '';
-	if ($id_auteur == $id_auteur_courant) {
-		$auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
-		ajouter_session($auteur);
-		if ($id_auteur && ($cookie = lire_cookie_session())) {
-			$fichier_session_courante = chemin_fichier_session('alea_ephemere', $cookie);
-		}
-	}
-
-	// si session anonyme on ne fait rien d'autre ici : les sessions anonymes sont non partagees
-	if (!$id_auteur) {
-		return;
-	}
-
-	// les préférences sont désérialisées, toujours.
-	// [fixme] Le champ 'prefs' sert aussi à l’inscription
-	if (isset($auteur['prefs']) && is_string($auteur['prefs'])) {
-		$auteur['prefs'] = @unserialize($auteur['prefs']);
-		if (!is_array($auteur['prefs'])) {
-			$auteur['prefs'] = [];
-		}
-	}
-
-	// memoriser l'auteur courant (celui qui modifie la fiche)
-	$sauve = $GLOBALS['visiteur_session'];
-
-	// .. mettre a jour les sessions de l'auteur cible
-	// attention au $ final pour ne pas risquer d'embarquer un .php.jeton temporaire
-	// cree par une ecriture concurente d'une session (fichier atomique temporaire)
-	$sessions = lister_sessions_auteur($id_auteur);
-
-	// 1ere passe : lire et fusionner les sessions
-	foreach ($sessions as $session) {
-		$GLOBALS['visiteur_session'] = [];
-		// a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
-		if (
-			$session !== $fichier_session_courante
-			&& @file_exists($session)
-		) {
-			include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
-
-			$auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
-		}
-	}
-
-	// supprimer les eventuelles cles dont on ne veut plus
-	foreach ($supprimer_cles as $cle) {
-		unset($auteur[$cle]);
-	}
-
-	$auteur_session = preparer_ecriture_session($auteur);
-
-	// seconde passe : ecrire les sessions qui ne sont pas a jour
-	foreach ($sessions as $session) {
-		$GLOBALS['visiteur_session'] = [];
-		// a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
-		if (@file_exists($session)) {
-			include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
-
-			// est-ce que cette session est a mettre a jour ?
-			if ($auteur_session != $GLOBALS['visiteur_session']) {
-				ecrire_fichier_session($session, $auteur);
-			}
-		}
-	}
-
-	if ($id_auteur == $id_auteur_courant) {
-		$GLOBALS['visiteur_session'] = $auteur;
-		$GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
-	} else {
-		// restaurer l'auteur courant
-		$GLOBALS['visiteur_session'] = $sauve;
-	}
+    $id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
+    $id_auteur_courant = isset($GLOBALS['visiteur_session']['id_auteur']) ? intval($GLOBALS['visiteur_session']['id_auteur']) : 0;
+
+    // si l'auteur est celui de la session courante, verifier/creer la session si besoin
+    $fichier_session_courante = '';
+    if ($id_auteur == $id_auteur_courant) {
+        $auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
+        ajouter_session($auteur);
+        if ($id_auteur && ($cookie = lire_cookie_session())) {
+            $fichier_session_courante = chemin_fichier_session('alea_ephemere', $cookie);
+        }
+    }
+
+    // si session anonyme on ne fait rien d'autre ici : les sessions anonymes sont non partagees
+    if (!$id_auteur) {
+        return;
+    }
+
+    // les préférences sont désérialisées, toujours.
+    // [fixme] Le champ 'prefs' sert aussi à l’inscription
+    if (isset($auteur['prefs']) && is_string($auteur['prefs'])) {
+        $auteur['prefs'] = @unserialize($auteur['prefs']);
+        if (!is_array($auteur['prefs'])) {
+            $auteur['prefs'] = [];
+        }
+    }
+
+    // memoriser l'auteur courant (celui qui modifie la fiche)
+    $sauve = $GLOBALS['visiteur_session'];
+
+    // .. mettre a jour les sessions de l'auteur cible
+    // attention au $ final pour ne pas risquer d'embarquer un .php.jeton temporaire
+    // cree par une ecriture concurente d'une session (fichier atomique temporaire)
+    $sessions = lister_sessions_auteur($id_auteur);
+
+    // 1ere passe : lire et fusionner les sessions
+    foreach ($sessions as $session) {
+        $GLOBALS['visiteur_session'] = [];
+        // a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
+        if (
+            $session !== $fichier_session_courante
+            && @file_exists($session)
+        ) {
+            include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
+
+            $auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
+        }
+    }
+
+    // supprimer les eventuelles cles dont on ne veut plus
+    foreach ($supprimer_cles as $cle) {
+        unset($auteur[$cle]);
+    }
+
+    $auteur_session = preparer_ecriture_session($auteur);
+
+    // seconde passe : ecrire les sessions qui ne sont pas a jour
+    foreach ($sessions as $session) {
+        $GLOBALS['visiteur_session'] = [];
+        // a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
+        if (@file_exists($session)) {
+            include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
+
+            // est-ce que cette session est a mettre a jour ?
+            if ($auteur_session != $GLOBALS['visiteur_session']) {
+                ecrire_fichier_session($session, $auteur);
+            }
+        }
+    }
+
+    if ($id_auteur == $id_auteur_courant) {
+        $GLOBALS['visiteur_session'] = $auteur;
+        $GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
+    } else {
+        // restaurer l'auteur courant
+        $GLOBALS['visiteur_session'] = $sauve;
+    }
 }
 
 /**
@@ -622,48 +622,48 @@ 
  */
 function lister_sessions_auteur($id_auteur, $nb_max = null) {
 
-	if (is_null($nb_max)) {
-		if (!defined('_NB_SESSIONS_MAX')) {
-			define('_NB_SESSIONS_MAX', 100);
-		}
-		$nb_max = _NB_SESSIONS_MAX;
-	}
-
-	// liste des sessions
-	$sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
-
-	// si on en a plus que la limite, supprimer les plus vieilles
-	// si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
-	if (
-		$id_auteur
-		&& count($sessions) > $nb_max
-	) {
-		// limiter le nombre de sessions ouvertes par un auteur
-		// filemtime sur les sessions
-		$sessions = array_flip($sessions);
-
-		// 1ere passe : lire les filemtime
-		foreach ($sessions as $session => $z) {
-			if (
-				$d = @filemtime($session)
-			) {
-				$sessions[$session] = $d;
-			} else {
-				$sessions[$session] = 0;
-			}
-		}
-
-		// les plus anciennes en premier
-		asort($sessions);
-
-		$sessions = array_keys($sessions);
-		while (count($sessions) > $nb_max) {
-			$session = array_shift($sessions);
-			@unlink($session);
-		}
-	}
-
-	return $sessions;
+    if (is_null($nb_max)) {
+        if (!defined('_NB_SESSIONS_MAX')) {
+            define('_NB_SESSIONS_MAX', 100);
+        }
+        $nb_max = _NB_SESSIONS_MAX;
+    }
+
+    // liste des sessions
+    $sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
+
+    // si on en a plus que la limite, supprimer les plus vieilles
+    // si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
+    if (
+        $id_auteur
+        && count($sessions) > $nb_max
+    ) {
+        // limiter le nombre de sessions ouvertes par un auteur
+        // filemtime sur les sessions
+        $sessions = array_flip($sessions);
+
+        // 1ere passe : lire les filemtime
+        foreach ($sessions as $session => $z) {
+            if (
+                $d = @filemtime($session)
+            ) {
+                $sessions[$session] = $d;
+            } else {
+                $sessions[$session] = 0;
+            }
+        }
+
+        // les plus anciennes en premier
+        asort($sessions);
+
+        $sessions = array_keys($sessions);
+        while (count($sessions) > $nb_max) {
+            $session = array_shift($sessions);
+            @unlink($session);
+        }
+    }
+
+    return $sessions;
 }
 
 
@@ -678,22 +678,22 @@ 
  */
 function preparer_ecriture_session(array $auteur): array {
 
-	$row = $auteur;
+    $row = $auteur;
 
-	// ne pas enregistrer ces elements de securite dans le fichier de session
-	include_spip('inc/auth');
-	$auteur = auth_desensibiliser_session($auteur);
+    // ne pas enregistrer ces elements de securite dans le fichier de session
+    include_spip('inc/auth');
+    $auteur = auth_desensibiliser_session($auteur);
 
-	$auteur = pipeline('preparer_fichier_session', ['args' => ['row' => $row], 'data' => $auteur]);
+    $auteur = pipeline('preparer_fichier_session', ['args' => ['row' => $row], 'data' => $auteur]);
 
-	// ne pas enregistrer les valeurs vraiment nulle dans le fichier
-	foreach ($auteur as $variable => $valeur) {
-		if ($valeur === null) {
-			unset($auteur[$variable]);
-		}
-	}
+    // ne pas enregistrer les valeurs vraiment nulle dans le fichier
+    foreach ($auteur as $variable => $valeur) {
+        if ($valeur === null) {
+            unset($auteur[$variable]);
+        }
+    }
 
-	return $auteur;
+    return $auteur;
 }
 
 /**
@@ -705,39 +705,39 @@ 
  */
 function ecrire_fichier_session($fichier, $auteur) {
 
-	$auteur = preparer_ecriture_session($auteur);
+    $auteur = preparer_ecriture_session($auteur);
 
-	// enregistrer les autres donnees du visiteur
-	$texte = '<' . "?php\n";
-	foreach ($auteur as $var => $val) {
-		$texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
-			. var_export($val, true) . ";\n";
-	}
-	$texte .= '?' . ">\n";
+    // enregistrer les autres donnees du visiteur
+    $texte = '<' . "?php\n";
+    foreach ($auteur as $var => $val) {
+        $texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
+            . var_export($val, true) . ";\n";
+    }
+    $texte .= '?' . ">\n";
 
-	return ecrire_fichier($fichier, $texte);
+    return ecrire_fichier($fichier, $texte);
 }
 
 /**
  * Calculer le chemin vers le fichier de session
  */
 function chemin_fichier_session(string $alea, string $cookie_session, bool $tantpis = false): string {
-	include_spip('inc/acces');
-	charger_aleas();
-
-	if (empty($GLOBALS['meta'][$alea])) {
-		if (!$tantpis) {
-			spip_logger('session')->info("fichier session ($tantpis): $alea indisponible");
-			include_spip('inc/minipres');
-			echo minipres();
-		}
-
-		return ''; // echec mais $tanpis
-	}
-
-	$repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
-	$id_auteur = intval($cookie_session);
-	return $repertoire . $id_auteur . '_' . md5($cookie_session . ' ' . $GLOBALS['meta'][$alea]) . '.php';
+    include_spip('inc/acces');
+    charger_aleas();
+
+    if (empty($GLOBALS['meta'][$alea])) {
+        if (!$tantpis) {
+            spip_logger('session')->info("fichier session ($tantpis): $alea indisponible");
+            include_spip('inc/minipres');
+            echo minipres();
+        }
+
+        return ''; // echec mais $tanpis
+    }
+
+    $repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
+    $id_auteur = intval($cookie_session);
+    return $repertoire . $id_auteur . '_' . md5($cookie_session . ' ' . $GLOBALS['meta'][$alea]) . '.php';
 }
 
 /**
@@ -748,7 +748,7 @@ 
  * @param bool $tantpis
  */
 function fichier_session($alea, $tantpis = false): string {
-	return chemin_fichier_session((string) $alea, lire_cookie_session(), (bool) $tantpis);
+    return chemin_fichier_session((string) $alea, lire_cookie_session(), (bool) $tantpis);
 }
 
 
@@ -765,7 +765,7 @@ 
  * @return string
  */
 function rejouer_session() {
-	return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
+    return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
 }
 
 
@@ -775,12 +775,12 @@ 
  * @return string
  */
 function hash_env() {
-	static $res = '';
-	if ($res) {
-		return $res;
-	}
+    static $res = '';
+    if ($res) {
+        return $res;
+    }
 
-	return $res = md5($GLOBALS['ip'] . ($_SERVER['HTTP_USER_AGENT'] ?? ''));
+    return $res = md5($GLOBALS['ip'] . ($_SERVER['HTTP_USER_AGENT'] ?? ''));
 }
 
 
@@ -792,11 +792,11 @@ 
  * @return bool True si une session PHP est ouverte.
  **/
 function spip_php_session_start() {
-	if (!is_php_session_started()) {
-		return session_start();
-	}
+    if (!is_php_session_started()) {
+        return session_start();
+    }
 
-	return true;
+    return true;
 }
 
 /**
@@ -806,9 +806,9 @@ 
  * @return bool true si une session PHP est active
  **/
 function is_php_session_started() {
-	if (php_sapi_name() !== 'cli') {
-		return session_status() === PHP_SESSION_ACTIVE ? true : false;
-	}
+    if (php_sapi_name() !== 'cli') {
+        return session_status() === PHP_SESSION_ACTIVE ? true : false;
+    }
 
-	return false;
+    return false;
 }

Spacing +17 added lines, -17 removed lines

@@ -81,12 +81,12 @@ 
 	spip_logger('session')->info("supprimer sessions auteur $id_auteur");
 	if ($toutes || $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
 		if ($dir = opendir(_DIR_SESSIONS)) {
-			$t = $_SERVER['REQUEST_TIME']  - (4 * _RENOUVELLE_ALEA); // 48h par defaut
-			$t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA / 4, 3 * 3600); // 3h par defaut
+			$t = $_SERVER['REQUEST_TIME'] - (4 * _RENOUVELLE_ALEA); // 48h par defaut
+			$t_short = $_SERVER['REQUEST_TIME'] - max(_RENOUVELLE_ALEA / 4, 3 * 3600); // 3h par defaut
 			while (($f = readdir($dir)) !== false) {
 				$nb_files++;
 				if (preg_match(',^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,', $f, $regs)) {
-					$f = _DIR_SESSIONS . $f;
+					$f = _DIR_SESSIONS.$f;
 					if ($actives && $regs[1] == $id_auteur || $t > filemtime($f)) {
 						spip_unlink($f);
 					}
@@ -173,7 +173,7 @@ 
 		(!$cookie = lire_cookie_session())
 		|| intval($cookie) !== $id_auteur
 	) {
-		$cookie = $id_auteur . '_' . md5(uniqid(random_int(0, mt_getrandmax()), true));
+		$cookie = $id_auteur.'_'.md5(uniqid(random_int(0, mt_getrandmax()), true));
 	}
 
 	// Maintenant on sait qu'on a des choses à écrire
@@ -206,7 +206,7 @@ 
 	} else {
 		$fichier_session = chemin_fichier_session('alea_ephemere', $cookie);
 		if (!ecrire_fichier_session($fichier_session, $auteur)) {
-			spip_logger('session')->emergency('Echec ecriture fichier session ' . $fichier_session);
+			spip_logger('session')->emergency('Echec ecriture fichier session '.$fichier_session);
 			include_spip('inc/minipres');
 			echo minipres();
 			exit;
@@ -229,9 +229,9 @@ 
 	if (autoriser('ecrire', '', '', $auteur) && _DUREE_COOKIE_ADMIN) {
 		spip_setcookie(
 			'spip_admin',
-			'@' . ($auteur['email'] ?: $auteur['login']),
+			'@'.($auteur['email'] ?: $auteur['login']),
 			time() + max(_DUREE_COOKIE_ADMIN, $duree),
-			httponly: true
+			httponly : true
 		);
 	} else {
 		// sinon le supprimer ...
@@ -269,7 +269,7 @@ 
 			$coef = 20;
 		}
 	}
-	return (int)(_RENOUVELLE_ALEA * $coef);
+	return (int) (_RENOUVELLE_ALEA * $coef);
 }
 
 /**
@@ -381,7 +381,7 @@ 
 
 			// Renouveler la session avec l'alea courant
 			include($fichier_session);
-			spip_logger('session')->info('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur']);
+			spip_logger('session')->info('renouvelle session '.$GLOBALS['visiteur_session']['id_auteur']);
 			spip_unlink($fichier_session);
 			ajouter_session($GLOBALS['visiteur_session']);
 		}
@@ -630,7 +630,7 @@ 
 	}
 
 	// liste des sessions
-	$sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
+	$sessions = preg_files(_DIR_SESSIONS, '/'.$id_auteur.'_.*\.php$');
 
 	// si on en a plus que la limite, supprimer les plus vieilles
 	// si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
@@ -708,12 +708,12 @@ 
 	$auteur = preparer_ecriture_session($auteur);
 
 	// enregistrer les autres donnees du visiteur
-	$texte = '<' . "?php\n";
+	$texte = '<'."?php\n";
 	foreach ($auteur as $var => $val) {
-		$texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
-			. var_export($val, true) . ";\n";
+		$texte .= '$GLOBALS[\'visiteur_session\']['.var_export($var, true).'] = '
+			. var_export($val, true).";\n";
 	}
-	$texte .= '?' . ">\n";
+	$texte .= '?'.">\n";
 
 	return ecrire_fichier($fichier, $texte);
 }
@@ -737,7 +737,7 @@ 
 
 	$repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
 	$id_auteur = intval($cookie_session);
-	return $repertoire . $id_auteur . '_' . md5($cookie_session . ' ' . $GLOBALS['meta'][$alea]) . '.php';
+	return $repertoire.$id_auteur.'_'.md5($cookie_session.' '.$GLOBALS['meta'][$alea]).'.php';
 }
 
 /**
@@ -765,7 +765,7 @@ 
  * @return string
  */
 function rejouer_session() {
-	return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
+	return '<img src="'.generer_url_action('cookie', 'change_session=oui', true).'" width="0" height="0" alt="" />';
 }
 
 
@@ -780,7 +780,7 @@ 
 		return $res;
 	}
 
-	return $res = md5($GLOBALS['ip'] . ($_SERVER['HTTP_USER_AGENT'] ?? ''));
+	return $res = md5($GLOBALS['ip'].($_SERVER['HTTP_USER_AGENT'] ?? ''));
 }