spip / SPIP

ecrire/inc/definir_menus_favoris.php

Indentation +11 added lines, -11 removed lines

@@ -19,19 +19,19 @@
  * Retourne la liste des menus favoris par défaut ainsi que leur rang
  */
 function inc_definir_menus_favoris_dist() {
-	return [
+    return [
 
-		// Menu Édition,
-		'auteurs' => 1,
-		'rubriques' => 2,
-		'articles' => 3,
+        // Menu Édition,
+        'auteurs' => 1,
+        'rubriques' => 2,
+        'articles' => 3,
 
-		// Menu Maintenance
-		'admin_vider' => 1,
+        // Menu Maintenance
+        'admin_vider' => 1,
 
-		// Menu Configurations
-		'configurer_identite' => 1,
-		'admin_plugin' => 2,
+        // Menu Configurations
+        'configurer_identite' => 1,
+        'admin_plugin' => 2,
 
-	];
+    ];
 }

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_log("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_log("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_log("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_log("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_log("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'), $journal);
+    spip_log("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'), $journal);
 
-	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_log("Action admin: $action");
+        return minipres();
+    } else {
+        $dir = dir_admin();
+        $signal = fichier_admin($script);
+        if (@file_exists($dir . $signal)) {
+            spip_log("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_log("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_log("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_log("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_log("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_log("meta: $script " . print_r($_POST, true));
+		spip_log("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_log("admin $pref" . ($valeur ? ' (reprise)' : ' (init)'), $journal);
+	spip_log("admin $pref".($valeur ? ' (reprise)' : ' (init)'), $journal);
 
 	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_log("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/editer.php

Braces +1 added lines, -2 removed lines

@@ -336,8 +336,7 @@
 		if (!autoriser('modifier', $type, (int) $id)) {
 			$contexte['editable'] = '';
 		}
-	}
-	else {
+	} else {
 		if (!autoriser('creer', $type, 0, null, ['id_parent' => $id_parent])) {
 			$contexte['editable'] = '';
 		}

Indentation +413 added lines, -413 removed lines

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

Spacing +23 added lines, -23 removed lines

@@ -99,7 +99,7 @@ 
 		$res['message_ok'] = _T('info_modification_enregistree');
 		if ($retour) {
 			if (str_starts_with($retour, 'javascript:')) {
-				$res['message_ok'] .= '<script type="text/javascript">/*<![CDATA[*/' . substr($retour, 11) . '/*]]>*/</script>';
+				$res['message_ok'] .= '<script type="text/javascript">/*<![CDATA[*/'.substr($retour, 11).'/*]]>*/</script>';
 				$res['editable'] = true;
 			} else {
 				$res['redirect'] = parametre_url($retour, $id_table_objet, $id);
@@ -139,7 +139,7 @@ 
 				if (!isset($erreurs[$champ])) {
 					$erreurs[$champ] = '';
 				}
-				$erreurs[$champ] .= _T('alerte_modif_info_concourante') . "<br /><textarea readonly='readonly' class='forml'>" . entites_html($conflit['base']) . '</textarea>';
+				$erreurs[$champ] .= _T('alerte_modif_info_concourante')."<br /><textarea readonly='readonly' class='forml'>".entites_html($conflit['base']).'</textarea>';
 			}
 		}
 	}
@@ -219,7 +219,7 @@ 
 	if (
 		$config_fonc
 		&& !in_array($config_fonc, ['articles_edit_config', 'rubriques_edit_config', 'auteurs_edit_config'])
-		&& $config_fonc !== $table_objet . '_edit_config'
+		&& $config_fonc !== $table_objet.'_edit_config'
 		&& ($args = test_formulaire_inclus_par_modele())
 		&& in_array($config_fonc, $args)
 	) {
@@ -231,12 +231,12 @@ 
 	// Appel direct dans un squelette
 	if (!$row) {
 		if (!$new || $lier_trad) {
-			if ($select = charger_fonction('precharger_' . $type, 'inc', true)) {
+			if ($select = charger_fonction('precharger_'.$type, 'inc', true)) {
 				$row = $select($id, $id_parent, $lier_trad);
 				// si on a une fonction precharger, elle pu faire un reglage de langue
 				$lang_default = (empty($row['lang']) ? null : $row['lang']);
 			} else {
-				$row = sql_fetsel('*', $table_objet_sql, $id_table_objet . '=' . (int) $id);
+				$row = sql_fetsel('*', $table_objet_sql, $id_table_objet.'='.(int) $id);
 			}
 			if (!$new) {
 				$md5 = controles_md5($row ?: []);
@@ -286,7 +286,7 @@ 
 	if ($config_fonc) {
 		$contexte['config'] = $config = $config_fonc($contexte);
 		if (!$lang_default) {
-			$lang_default = $config['langue'] ?? session_get('lang') ;
+			$lang_default = $config['langue'] ?? session_get('lang');
 		}
 	}
 	$config += [
@@ -308,13 +308,13 @@ 
 		unset($contexte['lang']);
 	}
 
-	$contexte['_hidden'] = "<input type='hidden' name='editer_$type' value='oui' />\n" .
+	$contexte['_hidden'] = "<input type='hidden' name='editer_$type' value='oui' />\n".
 		($lier_trad
-			 ? "\n<input type='hidden' name='lier_trad' value='" .
-				$lier_trad .
-				"' />" .
-				"\n<input type='hidden' name='changer_lang' value='" .
-				$lang_default .
+			 ? "\n<input type='hidden' name='lier_trad' value='".
+				$lier_trad.
+				"' />".
+				"\n<input type='hidden' name='changer_lang' value='".
+				$lang_default.
 				"' />"
 			: '')
 		. $hidden
@@ -355,14 +355,14 @@ 
 	$aider = charger_fonction('aider', 'inc');
 	if (strlen($texte) > 28 * 1024) {
 		$texte = str_replace("\r\n", "\n", $texte);
-		$pos = strpos($texte, "\n\n", 28 * 1024);  // coupe para > 28 ko
+		$pos = strpos($texte, "\n\n", 28 * 1024); // coupe para > 28 ko
 		if ($pos > 0 && $pos < 32 * 1024) {
-			$debut = substr($texte, 0, $pos) . "\n\n<!--SPIP-->\n";
+			$debut = substr($texte, 0, $pos)."\n\n<!--SPIP-->\n";
 			$suite = substr($texte, $pos + 2);
 		} else {
-			$pos = strpos($texte, ' ', 28 * 1024);  // sinon coupe espace
+			$pos = strpos($texte, ' ', 28 * 1024); // sinon coupe espace
 			if (!($pos > 0 && $pos < 32 * 1024)) {
-				$pos = 28 * 1024;  // au pire (pas d'espace trouv'e)
+				$pos = 28 * 1024; // au pire (pas d'espace trouv'e)
 				$decalage = 0; // si y'a pas d'espace, il ne faut pas perdre le caract`ere
 			} else {
 				$decalage = 1;
@@ -449,7 +449,7 @@ 
 	$ctr = [];
 	foreach ($data as $key => $val) {
 		$m = md5($val ?? '');
-		$k = $prefixe . $key;
+		$k = $prefixe.$key;
 
 		$ctr[$k] = match ($format) {
 			'html' => "<input type='hidden' value='$m' name='$k' />",
@@ -458,7 +458,7 @@ 
 	}
 
 	if ($format === 'html') {
-		return "\n\n<!-- controles md5 -->\n" . implode("\n", $ctr) . "\n\n";
+		return "\n\n<!-- controles md5 -->\n".implode("\n", $ctr)."\n\n";
 	} else {
 		return $ctr;
 	}
@@ -611,8 +611,8 @@ 
 	// potentiellement modifiees entre temps par un autre utilisateur)
 	foreach ($champs as $key => $val) {
 		if (
-			isset($ctr[$prefix . $key])
-			&& ($m = $ctr[$prefix . $key])
+			isset($ctr[$prefix.$key])
+			&& ($m = $ctr[$prefix.$key])
 			&& (is_scalar($val) && $m == md5($val))
 		) {
 			unset($champs[$key]);
@@ -641,7 +641,7 @@ 
 	// de conflit.
 	$ctrh = $ctrq = $conflits = [];
 	foreach (array_keys($champs) as $key) {
-		if (isset($ctr[$prefix . $key]) && ($m = $ctr[$prefix . $key])) {
+		if (isset($ctr[$prefix.$key]) && ($m = $ctr[$prefix.$key])) {
 			$ctrh[$key] = $m;
 			$ctrq[] = $key;
 		}
@@ -675,8 +675,8 @@ 
  */
 function display_conflit_champ($x) {
 	if (strstr($x, "\n") || strlen($x) > 80) {
-		return "<textarea style='width:99%; height:10em;'>" . entites_html($x) . "</textarea>\n";
+		return "<textarea style='width:99%; height:10em;'>".entites_html($x)."</textarea>\n";
 	} else {
-		return "<input type='text' size='40' style='width:99%' value=\"" . entites_html($x) . "\" />\n";
+		return "<input type='text' size='40' style='width:99%' value=\"".entites_html($x)."\" />\n";
 	}
 }

ecrire/inc/filtres_mini.php

Indentation +97 added lines, -97 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -34,20 +34,20 @@ 
  * @return string URL nettoyée
  **/
 function resolve_path($url) {
-	[$url, $query] = array_pad(explode('?', $url, 2), 2, null);
-	while (
-		preg_match(',/\.?/,', (string) $url, $regs) # supprime // et /./
-		|| preg_match(',/[^/]*/\.\./,S', (string) $url, $regs)  # supprime /toto/../
-		|| preg_match(',^/\.\./,S', (string) $url, $regs) # supprime les /../ du haut
-	) {
-		$url = str_replace($regs[0], '/', (string) $url);
-	}
+    [$url, $query] = array_pad(explode('?', $url, 2), 2, null);
+    while (
+        preg_match(',/\.?/,', (string) $url, $regs) # supprime // et /./
+        || preg_match(',/[^/]*/\.\./,S', (string) $url, $regs)  # supprime /toto/../
+        || preg_match(',^/\.\./,S', (string) $url, $regs) # supprime les /../ du haut
+    ) {
+        $url = str_replace($regs[0], '/', (string) $url);
+    }
 
-	if ($query) {
-		$url .= '?' . $query;
-	}
+    if ($query) {
+        $url .= '?' . $query;
+    }
 
-	return '/' . preg_replace(',^/,S', '', (string) $url);
+    return '/' . preg_replace(',^/,S', '', (string) $url);
 }
 
 
@@ -68,40 +68,40 @@ 
  **/
 function suivre_lien($url, $lien) {
 
-	$mot = null;
-	$get = null;
-	$hash = null;
-	if (preg_match(',^(mailto|javascript|data|tel|callto|file|ftp):,iS', $lien)) {
-		return $lien;
-	}
-	if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
-		$r = array_pad($r, 3, '');
+    $mot = null;
+    $get = null;
+    $hash = null;
+    if (preg_match(',^(mailto|javascript|data|tel|callto|file|ftp):,iS', $lien)) {
+        return $lien;
+    }
+    if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
+        $r = array_pad($r, 3, '');
 
-		return $r[1] . resolve_path($r[2]);
-	}
+        return $r[1] . resolve_path($r[2]);
+    }
 
-	# L'url site spip est un lien absolu aussi
-	if (isset($GLOBALS['meta']['adresse_site']) && $lien == $GLOBALS['meta']['adresse_site']) {
-		return $lien;
-	}
+    # L'url site spip est un lien absolu aussi
+    if (isset($GLOBALS['meta']['adresse_site']) && $lien == $GLOBALS['meta']['adresse_site']) {
+        return $lien;
+    }
 
-	# lien relatif, il faut verifier l'url de base
-	# commencer par virer la chaine de get de l'url de base
-	$dir = '/';
-	$debut = '';
-	if (preg_match(';^((?:[a-z]{3,7}:)?//[^/]+)(/.*?/?)?([^/#?]*)([?][^#]*)?(#.*)?$;S', $url, $regs)) {
-		$debut = $regs[1];
-		$dir = strlen($regs[2]) ? $regs[2] : '/';
-		$mot = $regs[3];
-		$get = $regs[4] ?? '';
-		$hash = $regs[5] ?? '';
-	}
-	return match (substr($lien, 0, 1)) {
-		'/' => $debut . resolve_path($lien),
-		'#' => $debut . resolve_path($dir . $mot . $get . $lien),
-		'' => $debut . resolve_path($dir . $mot . $get . $hash),
-		default => $debut . resolve_path($dir . $lien),
-	};
+    # lien relatif, il faut verifier l'url de base
+    # commencer par virer la chaine de get de l'url de base
+    $dir = '/';
+    $debut = '';
+    if (preg_match(';^((?:[a-z]{3,7}:)?//[^/]+)(/.*?/?)?([^/#?]*)([?][^#]*)?(#.*)?$;S', $url, $regs)) {
+        $debut = $regs[1];
+        $dir = strlen($regs[2]) ? $regs[2] : '/';
+        $mot = $regs[3];
+        $get = $regs[4] ?? '';
+        $hash = $regs[5] ?? '';
+    }
+    return match (substr($lien, 0, 1)) {
+        '/' => $debut . resolve_path($lien),
+        '#' => $debut . resolve_path($dir . $mot . $get . $lien),
+        '' => $debut . resolve_path($dir . $mot . $get . $hash),
+        default => $debut . resolve_path($dir . $lien),
+    };
 }
 
 
@@ -124,15 +124,15 @@ 
  * @return string texte ou URL (en absolus)
  **/
 function url_absolue($url, $base = '') {
-	$url = trim((string) $url);
-	if (strlen($url = trim($url)) == 0) {
-		return '';
-	}
-	if (!$base) {
-		$base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
-	}
+    $url = trim((string) $url);
+    if (strlen($url = trim($url)) == 0) {
+        return '';
+    }
+    if (!$base) {
+        $base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
+    }
 
-	return suivre_lien($base, $url);
+    return suivre_lien($base, $url);
 }
 
 /**
@@ -143,7 +143,7 @@ 
  * @return string
  */
 function protocole_implicite($url_absolue) {
-	return preg_replace(';^[a-z]{3,7}://;i', '//', $url_absolue);
+    return preg_replace(';^[a-z]{3,7}://;i', '//', $url_absolue);
 }
 
 /**
@@ -154,16 +154,16 @@ 
  */
 function protocole_verifier($url_absolue, $protocoles_autorises = ['http','https']) {
 
-	if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
-		$protocole = $m[1];
-		if (
-			in_array($protocole, $protocoles_autorises)
-			|| in_array(strtolower($protocole), array_map('strtolower', $protocoles_autorises))
-		) {
-			return true;
-		}
-	}
-	return false;
+    if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
+        $protocole = $m[1];
+        if (
+            in_array($protocole, $protocoles_autorises)
+            || in_array(strtolower($protocole), array_map('strtolower', $protocoles_autorises))
+        ) {
+            return true;
+        }
+    }
+    return false;
 }
 
 /**
@@ -180,28 +180,28 @@ 
  * @return string texte avec des URLs absolues
  **/
 function liens_absolus($texte, $base = '') {
-	if (preg_match_all(',(<(a|link|image|img|script)\s[^<>]*(href|src)=[^<>]*>),imsS', $texte, $liens, PREG_SET_ORDER)) {
-		if (!function_exists('extraire_attribut')) {
-			include_spip('inc/filtres');
-		}
-		foreach ($liens as $lien) {
-			foreach (['href', 'src'] as $attr) {
-				$href = extraire_attribut($lien[0], $attr) ?? '';
-				if (
-					strlen((string) $href) > 0
-					&& !preg_match(';^((?:[a-z]{3,7}:)?//);iS', (string) $href)
-				) {
-					$abs = url_absolue($href, $base);
-					if (rtrim((string) $href, '/') !== rtrim($abs, '/') && !preg_match('/^#/', (string) $href)) {
-						$texte_lien = inserer_attribut($lien[0], $attr, $abs);
-						$texte = str_replace($lien[0], $texte_lien, $texte);
-					}
-				}
-			}
-		}
-	}
+    if (preg_match_all(',(<(a|link|image|img|script)\s[^<>]*(href|src)=[^<>]*>),imsS', $texte, $liens, PREG_SET_ORDER)) {
+        if (!function_exists('extraire_attribut')) {
+            include_spip('inc/filtres');
+        }
+        foreach ($liens as $lien) {
+            foreach (['href', 'src'] as $attr) {
+                $href = extraire_attribut($lien[0], $attr) ?? '';
+                if (
+                    strlen((string) $href) > 0
+                    && !preg_match(';^((?:[a-z]{3,7}:)?//);iS', (string) $href)
+                ) {
+                    $abs = url_absolue($href, $base);
+                    if (rtrim((string) $href, '/') !== rtrim($abs, '/') && !preg_match('/^#/', (string) $href)) {
+                        $texte_lien = inserer_attribut($lien[0], $attr, $abs);
+                        $texte = str_replace($lien[0], $texte_lien, $texte);
+                    }
+                }
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -217,11 +217,11 @@ 
  * @return string texte ou URL (en absolus)
  **/
 function abs_url($texte, $base = '') {
-	if ($GLOBALS['mode_abs_url'] == 'url') {
-		return url_absolue($texte, $base);
-	} else {
-		return liens_absolus($texte, $base);
-	}
+    if ($GLOBALS['mode_abs_url'] == 'url') {
+        return url_absolue($texte, $base);
+    } else {
+        return liens_absolus($texte, $base);
+    }
 }
 
 /**
@@ -234,11 +234,11 @@ 
  * @return string
  */
 function spip_htmlspecialchars($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
-	if (is_null($flags)) {
-		$flags = ENT_COMPAT | ENT_HTML401;
-	}
+    if (is_null($flags)) {
+        $flags = ENT_COMPAT | ENT_HTML401;
+    }
 
-	return htmlspecialchars($string, $flags, $encoding, $double_encode);
+    return htmlspecialchars($string, $flags, $encoding, $double_encode);
 }
 
 /**
@@ -251,9 +251,9 @@ 
  * @return string
  */
 function spip_htmlentities($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
-	if (is_null($flags)) {
-		$flags = ENT_COMPAT | ENT_HTML401;
-	}
+    if (is_null($flags)) {
+        $flags = ENT_COMPAT | ENT_HTML401;
+    }
 
-	return htmlentities($string, $flags, $encoding, $double_encode);
+    return htmlentities($string, $flags, $encoding, $double_encode);
 }

Spacing +9 added lines, -9 removed lines

@@ -44,10 +44,10 @@ 
 	}
 
 	if ($query) {
-		$url .= '?' . $query;
+		$url .= '?'.$query;
 	}
 
-	return '/' . preg_replace(',^/,S', '', (string) $url);
+	return '/'.preg_replace(',^/,S', '', (string) $url);
 }
 
 
@@ -77,7 +77,7 @@ 
 	if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
 		$r = array_pad($r, 3, '');
 
-		return $r[1] . resolve_path($r[2]);
+		return $r[1].resolve_path($r[2]);
 	}
 
 	# L'url site spip est un lien absolu aussi
@@ -97,10 +97,10 @@ 
 		$hash = $regs[5] ?? '';
 	}
 	return match (substr($lien, 0, 1)) {
-		'/' => $debut . resolve_path($lien),
-		'#' => $debut . resolve_path($dir . $mot . $get . $lien),
-		'' => $debut . resolve_path($dir . $mot . $get . $hash),
-		default => $debut . resolve_path($dir . $lien),
+		'/' => $debut.resolve_path($lien),
+		'#' => $debut.resolve_path($dir.$mot.$get.$lien),
+		'' => $debut.resolve_path($dir.$mot.$get.$hash),
+		default => $debut.resolve_path($dir.$lien),
 	};
 }
 
@@ -129,7 +129,7 @@ 
 		return '';
 	}
 	if (!$base) {
-		$base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
+		$base = url_de_base().(_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
 	}
 
 	return suivre_lien($base, $url);
@@ -152,7 +152,7 @@ 
  * @param array $protocoles_autorises
  * @return bool
  */
-function protocole_verifier($url_absolue, $protocoles_autorises = ['http','https']) {
+function protocole_verifier($url_absolue, $protocoles_autorises = ['http', 'https']) {
 
 	if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
 		$protocole = $m[1];

ecrire/inc/surligne.php

Indentation +46 added lines, -46 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Surligne
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -34,43 +34,43 @@ 
  *     Page HTML
  **/
 function surligner_mots($page, $surcharge_surligne = '') {
-	$surlignejs_engines = [
-		[
-			',' . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']) . ',i',
-			',recherche=([^&]+),i'
-		], //SPIP
-		[',^http://(www\.)?google\.,i', ',q=([^&]+),i'], // Google
-		[',^http://(www\.)?search\.yahoo\.,i', ',p=([^&]+),i'], // Yahoo
-		[',^http://(www\.)?search\.msn\.,i', ',q=([^&]+),i'], // MSN
-		[',^http://(www\.)?search\.live\.,i', ',query=([^&]+),i'], // MSN Live
-		[',^http://(www\.)?search\.aol\.,i', ',userQuery=([^&]+),i'], // AOL
-		[',^http://(www\.)?ask\.com,i', ',q=([^&]+),i'], // Ask.com
-		[',^http://(www\.)?altavista\.,i', ',q=([^&]+),i'], // AltaVista
-		[',^http://(www\.)?feedster\.,i', ',q=([^&]+),i'], // Feedster
-		[',^http://(www\.)?search\.lycos\.,i', ',q=([^&]+),i'], // Lycos
-		[',^http://(www\.)?alltheweb\.,i', ',q=([^&]+),i'], // AllTheWeb
-		[',^http://(www\.)?technorati\.com,i', ',([^\?\/]+)(?:\?.*)$,i'], // Technorati
-	];
+    $surlignejs_engines = [
+        [
+            ',' . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']) . ',i',
+            ',recherche=([^&]+),i'
+        ], //SPIP
+        [',^http://(www\.)?google\.,i', ',q=([^&]+),i'], // Google
+        [',^http://(www\.)?search\.yahoo\.,i', ',p=([^&]+),i'], // Yahoo
+        [',^http://(www\.)?search\.msn\.,i', ',q=([^&]+),i'], // MSN
+        [',^http://(www\.)?search\.live\.,i', ',query=([^&]+),i'], // MSN Live
+        [',^http://(www\.)?search\.aol\.,i', ',userQuery=([^&]+),i'], // AOL
+        [',^http://(www\.)?ask\.com,i', ',q=([^&]+),i'], // Ask.com
+        [',^http://(www\.)?altavista\.,i', ',q=([^&]+),i'], // AltaVista
+        [',^http://(www\.)?feedster\.,i', ',q=([^&]+),i'], // Feedster
+        [',^http://(www\.)?search\.lycos\.,i', ',q=([^&]+),i'], // Lycos
+        [',^http://(www\.)?alltheweb\.,i', ',q=([^&]+),i'], // AllTheWeb
+        [',^http://(www\.)?technorati\.com,i', ',([^\?\/]+)(?:\?.*)$,i'], // Technorati
+    ];
 
 
-	$ref = $_SERVER['HTTP_REFERER'] ?? null;
-	//avoid a js injection
-	if ($surcharge_surligne) {
-		$surcharge_surligne = preg_replace(",(?<!\\\\)((?:(?>\\\\){2})*)('),", '$1\\\$2', $surcharge_surligne);
-		$surcharge_surligne = str_replace('\\', '\\\\', $surcharge_surligne);
-		if ($GLOBALS['meta']['charset'] == 'utf-8') {
-			include_spip('inc/charsets');
-			if (!is_utf8($surcharge_surligne)) {
-				$surcharge_surligne = mb_convert_encoding($surcharge_surligne, 'UTF-8', 'ISO-8859-1');
-			}
-		}
-		$surcharge_surligne = preg_replace(',\*$,', '', trim($surcharge_surligne)); # supprimer un * final
-	}
-	foreach ($surlignejs_engines as $engine) {
-		if ($surcharge_surligne || (preg_match($engine[0], (string) $ref) && preg_match($engine[1], (string) $ref))) {
-			//good referrer found or var_recherche is not null
-			include_spip('inc/filtres');
-			$script = "
+    $ref = $_SERVER['HTTP_REFERER'] ?? null;
+    //avoid a js injection
+    if ($surcharge_surligne) {
+        $surcharge_surligne = preg_replace(",(?<!\\\\)((?:(?>\\\\){2})*)('),", '$1\\\$2', $surcharge_surligne);
+        $surcharge_surligne = str_replace('\\', '\\\\', $surcharge_surligne);
+        if ($GLOBALS['meta']['charset'] == 'utf-8') {
+            include_spip('inc/charsets');
+            if (!is_utf8($surcharge_surligne)) {
+                $surcharge_surligne = mb_convert_encoding($surcharge_surligne, 'UTF-8', 'ISO-8859-1');
+            }
+        }
+        $surcharge_surligne = preg_replace(',\*$,', '', trim($surcharge_surligne)); # supprimer un * final
+    }
+    foreach ($surlignejs_engines as $engine) {
+        if ($surcharge_surligne || (preg_match($engine[0], (string) $ref) && preg_match($engine[1], (string) $ref))) {
+            //good referrer found or var_recherche is not null
+            include_spip('inc/filtres');
+            $script = "
       <script type='text/javascript' src='" . url_absolue(find_in_path('javascript/SearchHighlight.js')) . "'></script>
       <script type='text/javascript'>
        var highlighter = function() {
@@ -82,7 +82,7 @@ 
             engines:[/^" . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']) . "/i,/recherche=([^&]+)/i],
             highlight:'.surlignable',
             nohighlight:'.pas_surlignable'" .
-				($surcharge_surligne ? ",
+                ($surcharge_surligne ? ",
             keys:'$surcharge_surligne'" : '') . ',
             min_length: 3
           });
@@ -93,14 +93,14 @@ 
       };
       </script>
       ';
-			// on l'insere juste avant </head>, sinon tout en bas
-			if (is_null($l = strpos($page, '</head>'))) {
-				$l = strlen($page);
-			}
-			$page = substr_replace($page, $script, $l, 0);
-			break;
-		}
-	}
+            // on l'insere juste avant </head>, sinon tout en bas
+            if (is_null($l = strpos($page, '</head>'))) {
+                $l = strlen($page);
+            }
+            $page = substr_replace($page, $script, $l, 0);
+            break;
+        }
+    }
 
-	return $page;
+    return $page;
 }

Spacing +5 added lines, -5 removed lines

@@ -36,7 +36,7 @@ 
 function surligner_mots($page, $surcharge_surligne = '') {
 	$surlignejs_engines = [
 		[
-			',' . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']) . ',i',
+			','.str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']).',i',
 			',recherche=([^&]+),i'
 		], //SPIP
 		[',^http://(www\.)?google\.,i', ',q=([^&]+),i'], // Google
@@ -71,19 +71,19 @@ 
 			//good referrer found or var_recherche is not null
 			include_spip('inc/filtres');
 			$script = "
-      <script type='text/javascript' src='" . url_absolue(find_in_path('javascript/SearchHighlight.js')) . "'></script>
+      <script type='text/javascript' src='" . url_absolue(find_in_path('javascript/SearchHighlight.js'))."'></script>
       <script type='text/javascript'>
        var highlighter = function() {
 		  jQuery(this).SearchHighlight({
-            tag_name:'" . (html5_permis() ? 'mark' : 'span') . "',
+            tag_name:'" . (html5_permis() ? 'mark' : 'span')."',
             style_name:'spip_surligne',
             exact:'whole',
             style_name_suffix:false,
-            engines:[/^" . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site']) . "/i,/recherche=([^&]+)/i],
+            engines:[/^" . str_replace(['/', '.'], ['\/', '\.'], (string) $GLOBALS['meta']['adresse_site'])."/i,/recherche=([^&]+)/i],
             highlight:'.surlignable',
             nohighlight:'.pas_surlignable'" .
 				($surcharge_surligne ? ",
-            keys:'$surcharge_surligne'" : '') . ',
+            keys:'$surcharge_surligne'" : '').',
             min_length: 3
           });
 	  }

ecrire/inc/xml.php

Indentation +157 added lines, -157 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -46,24 +46,24 @@ 
  *     - false si l'arbre xml ne peut être créé ou est vide
  **/
 function spip_xml_load($fichier, $strict = true, $clean = true, $taille_max = 1_048_576, $datas = '', $profondeur = -1) {
-	$contenu = '';
-	if (tester_url_absolue($fichier)) {
-		include_spip('inc/distant');
-		$contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]);
-		$contenu = $contenu['page'] ?? '';
-	} else {
-		lire_fichier($fichier, $contenu);
-	}
-	$arbre = [];
-	if ($contenu) {
-		$arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur);
-	}
+    $contenu = '';
+    if (tester_url_absolue($fichier)) {
+        include_spip('inc/distant');
+        $contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]);
+        $contenu = $contenu['page'] ?? '';
+    } else {
+        lire_fichier($fichier, $contenu);
+    }
+    $arbre = [];
+    if ($contenu) {
+        $arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur);
+    }
 
-	return count($arbre) ? $arbre : false;
+    return count($arbre) ? $arbre : false;
 }
 
 if (!defined('_SPIP_XML_TAG_SPLIT')) {
-	define('_SPIP_XML_TAG_SPLIT', '{<([^:>][^>]*?)>}sS');
+    define('_SPIP_XML_TAG_SPLIT', '{<([^:>][^>]*?)>}sS');
 }
 
 /**
@@ -82,150 +82,150 @@ 
  *     - false si l'arbre xml ne peut être créé ou est vide
  **/
 function spip_xml_parse(&$texte, $strict = true, $clean = true, $profondeur = -1) {
-	$out = [];
-	// enlever les commentaires
-	$charset = 'AUTO';
-	if ($clean) {
-		if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) {
-			$charset = $regs[2];
-		}
-		$texte = preg_replace(',<!--(.*?)-->,is', '', $texte);
-		$texte = preg_replace(',<\?(.*?)\?>,is', '', $texte);
-		include_spip('inc/charsets');
-		$clean = $charset;
-		//$texte = importer_charset($texte,$charset);
-	}
-	if (is_string($clean)) {
-		$charset = $clean;
-	}
-	$txt = $texte;
+    $out = [];
+    // enlever les commentaires
+    $charset = 'AUTO';
+    if ($clean) {
+        if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) {
+            $charset = $regs[2];
+        }
+        $texte = preg_replace(',<!--(.*?)-->,is', '', $texte);
+        $texte = preg_replace(',<\?(.*?)\?>,is', '', $texte);
+        include_spip('inc/charsets');
+        $clean = $charset;
+        //$texte = importer_charset($texte,$charset);
+    }
+    if (is_string($clean)) {
+        $charset = $clean;
+    }
+    $txt = $texte;
 
-	// tant qu'il y a des tags
-	$chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
-	while ((is_countable($chars) ? count($chars) : 0) >= 2) {
-		// tag ouvrant
-		//$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE);
+    // tant qu'il y a des tags
+    $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
+    while ((is_countable($chars) ? count($chars) : 0) >= 2) {
+        // tag ouvrant
+        //$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE);
 
-		// $before doit etre vide ou des espaces uniquements!
-		$before = trim($chars[0]);
+        // $before doit etre vide ou des espaces uniquements!
+        $before = trim($chars[0]);
 
-		if (strlen($before) > 0) {
-			return importer_charset($texte, $charset);
-		}//$texte; // before non vide, donc on est dans du texte
+        if (strlen($before) > 0) {
+            return importer_charset($texte, $charset);
+        }//$texte; // before non vide, donc on est dans du texte
 
-		$tag = rtrim($chars[1]);
-		$txt = $chars[2];
+        $tag = rtrim($chars[1]);
+        $txt = $chars[2];
 
-		if (str_starts_with($tag, '![CDATA[')) {
-			return importer_charset($texte, $charset);
-		}//$texte;
-		if (str_ends_with($tag, '/')) { // self closing tag
-			$tag = rtrim(substr($tag, 0, strlen($tag) - 1));
-			$out[$tag][] = '';
-		} else {
-			$closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag));
-			$closing_tag = reset($closing_tag);
-			// tag fermant
-			$ncclos = strlen("</$closing_tag>");
-			$p = strpos($txt, (string) "</$closing_tag>");
-			if ($p !== false && strpos($txt, '<') < $p) {
-				$nclose = 0;
-				$nopen = 0;
-				$d = 0;
-				while (
-					$p !== false
-					&& ($morceau = substr($txt, $d, $p - $d))
-					&& ($nopen += preg_match_all(
-						'{<' . preg_quote((string) $closing_tag) . '(\s*>|\s[^>]*[^/>]>)}is',
-						$morceau,
-						$matches,
-						PREG_SET_ORDER
-					)) > $nclose
-				) {
-					$nclose++;
-					$d = $p + $ncclos;
-					$p = strpos($txt, (string) "</$closing_tag>", $d);
-				}
-			}
-			if ($p === false) {
-				if ($strict) {
-					$out[$tag][] = "erreur : tag fermant $tag manquant::$txt";
+        if (str_starts_with($tag, '![CDATA[')) {
+            return importer_charset($texte, $charset);
+        }//$texte;
+        if (str_ends_with($tag, '/')) { // self closing tag
+            $tag = rtrim(substr($tag, 0, strlen($tag) - 1));
+            $out[$tag][] = '';
+        } else {
+            $closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag));
+            $closing_tag = reset($closing_tag);
+            // tag fermant
+            $ncclos = strlen("</$closing_tag>");
+            $p = strpos($txt, (string) "</$closing_tag>");
+            if ($p !== false && strpos($txt, '<') < $p) {
+                $nclose = 0;
+                $nopen = 0;
+                $d = 0;
+                while (
+                    $p !== false
+                    && ($morceau = substr($txt, $d, $p - $d))
+                    && ($nopen += preg_match_all(
+                        '{<' . preg_quote((string) $closing_tag) . '(\s*>|\s[^>]*[^/>]>)}is',
+                        $morceau,
+                        $matches,
+                        PREG_SET_ORDER
+                    )) > $nclose
+                ) {
+                    $nclose++;
+                    $d = $p + $ncclos;
+                    $p = strpos($txt, (string) "</$closing_tag>", $d);
+                }
+            }
+            if ($p === false) {
+                if ($strict) {
+                    $out[$tag][] = "erreur : tag fermant $tag manquant::$txt";
 
-					return $out;
-				} else {
-					return importer_charset($texte, $charset);
-				}//$texte // un tag qui constitue du texte a reporter dans $before
-			}
-			$content = substr($txt, 0, $p);
-			$txt = substr($txt, $p + $ncclos);
-			if ($profondeur == 0 || !str_contains($content, '<')) { // eviter une recursion si pas utile
-			$out[$tag][] = importer_charset($content, $charset);
-			}//$content;
-			else {
-				$out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1);
-			}
-		}
-		$chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
-	}
-	if (count($out) && (strlen(trim($txt)) == 0)) {
-		return $out;
-	} else {
-		return importer_charset($texte, $charset);
-	}//$texte;
+                    return $out;
+                } else {
+                    return importer_charset($texte, $charset);
+                }//$texte // un tag qui constitue du texte a reporter dans $before
+            }
+            $content = substr($txt, 0, $p);
+            $txt = substr($txt, $p + $ncclos);
+            if ($profondeur == 0 || !str_contains($content, '<')) { // eviter une recursion si pas utile
+            $out[$tag][] = importer_charset($content, $charset);
+            }//$content;
+            else {
+                $out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1);
+            }
+        }
+        $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
+    }
+    if (count($out) && (strlen(trim($txt)) == 0)) {
+        return $out;
+    } else {
+        return importer_charset($texte, $charset);
+    }//$texte;
 }
 
 function spip_xml_aplatit($arbre, $separateur = ' ') {
-	$s = '';
-	if (is_array($arbre)) {
-		foreach ($arbre as $tag => $feuille) {
-			if (is_array($feuille)) {
-				if ($tag !== (int) $tag) {
-					$f = spip_xml_aplatit($feuille, $separateur);
-					if (strlen((string) $f)) {
-						$tagf = explode(' ', $tag);
-						$tagf = $tagf[0];
-						$s .= "<$tag>$f</$tagf>";
-					} else {
-						$s .= "<$tag />";
-					}
-				} else {
-					$s .= spip_xml_aplatit($feuille);
-				}
-				$s .= $separateur;
-			} else {
-				$s .= "$feuille$separateur";
-			}
-		}
-	}
+    $s = '';
+    if (is_array($arbre)) {
+        foreach ($arbre as $tag => $feuille) {
+            if (is_array($feuille)) {
+                if ($tag !== (int) $tag) {
+                    $f = spip_xml_aplatit($feuille, $separateur);
+                    if (strlen((string) $f)) {
+                        $tagf = explode(' ', $tag);
+                        $tagf = $tagf[0];
+                        $s .= "<$tag>$f</$tagf>";
+                    } else {
+                        $s .= "<$tag />";
+                    }
+                } else {
+                    $s .= spip_xml_aplatit($feuille);
+                }
+                $s .= $separateur;
+            } else {
+                $s .= "$feuille$separateur";
+            }
+        }
+    }
 
-	return strlen((string) $separateur) ? substr($s, 0, -strlen((string) $separateur)) : $s;
+    return strlen((string) $separateur) ? substr($s, 0, -strlen((string) $separateur)) : $s;
 }
 
 function spip_xml_tagname($tag) {
-	if (preg_match(',^([a-z][\w:]*),i', (string) $tag, $reg)) {
-		return $reg[1];
-	}
+    if (preg_match(',^([a-z][\w:]*),i', (string) $tag, $reg)) {
+        return $reg[1];
+    }
 
-	return '';
+    return '';
 }
 
 function spip_xml_decompose_tag($tag) {
-	$tagname = spip_xml_tagname($tag);
-	$liste = [];
-	$tag = ltrim(strpbrk((string) $tag, " \n\t"));
-	$p = strpos($tag, '=');
-	while ($p !== false) {
-		$attr = trim(substr($tag, 0, $p));
-		$tag = ltrim(substr($tag, $p + 1));
-		$quote = $tag[0];
-		$p = strpos($tag, $quote, 1);
-		$cont = substr($tag, 1, $p - 1);
-		$liste[$attr] = $cont;
-		$tag = substr($tag, $p + 1);
-		$p = strpos($tag, '=');
-	}
+    $tagname = spip_xml_tagname($tag);
+    $liste = [];
+    $tag = ltrim(strpbrk((string) $tag, " \n\t"));
+    $p = strpos($tag, '=');
+    while ($p !== false) {
+        $attr = trim(substr($tag, 0, $p));
+        $tag = ltrim(substr($tag, $p + 1));
+        $quote = $tag[0];
+        $p = strpos($tag, $quote, 1);
+        $cont = substr($tag, 1, $p - 1);
+        $liste[$attr] = $cont;
+        $tag = substr($tag, $p + 1);
+        $p = strpos($tag, '=');
+    }
 
-	return [$tagname, $liste];
+    return [$tagname, $liste];
 }
 
 /**
@@ -248,21 +248,21 @@ 
  *     false si aucun élément ne valide l'expression régulière, true sinon.
  **/
 function spip_xml_match_nodes($regexp, &$arbre, &$matches, $init = true) {
-	if ($init) {
-		$matches = [];
-	}
-	if (is_array($arbre) && count($arbre)) {
-		foreach (array_keys($arbre) as $tag) {
-			if (preg_match($regexp, $tag)) {
-				$matches[$tag] = &$arbre[$tag];
-			}
-			if (is_array($arbre[$tag])) {
-				foreach (array_keys($arbre[$tag]) as $occurences) {
-					spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false);
-				}
-			}
-		}
-	}
+    if ($init) {
+        $matches = [];
+    }
+    if (is_array($arbre) && count($arbre)) {
+        foreach (array_keys($arbre) as $tag) {
+            if (preg_match($regexp, $tag)) {
+                $matches[$tag] = &$arbre[$tag];
+            }
+            if (is_array($arbre[$tag])) {
+                foreach (array_keys($arbre[$tag]) as $occurences) {
+                    spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false);
+                }
+            }
+        }
+    }
 
-	return (is_countable($matches) ? count($matches) : 0);
+    return (is_countable($matches) ? count($matches) : 0);
 }

Spacing +1 added lines, -1 removed lines

@@ -136,7 +136,7 @@
 					$p !== false
 					&& ($morceau = substr($txt, $d, $p - $d))
 					&& ($nopen += preg_match_all(
-						'{<' . preg_quote((string) $closing_tag) . '(\s*>|\s[^>]*[^/>]>)}is',
+						'{<'.preg_quote((string) $closing_tag).'(\s*>|\s[^>]*[^/>]>)}is',
 						$morceau,
 						$matches,
 						PREG_SET_ORDER

ecrire/inc/distant.php

Indentation +1079 added lines, -1079 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) : '']
-		);
-
-		if (!$res || !$res['length'] && $res['status'] != 304) {
-			spip_log("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'), 'distant' . _LOG_INFO_IMPORTANTE);
-			@unlink($localrac_tmp);
-		}
-		else {
-			spip_log("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status'], 'distant');
-		}
-		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'])
-		) {
-			spip_log('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp", 'distant' . _LOG_INFO_IMPORTANTE);
-			@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) : '']
+        );
+
+        if (!$res || !$res['length'] && $res['status'] != 304) {
+            spip_log("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'), 'distant' . _LOG_INFO_IMPORTANTE);
+            @unlink($localrac_tmp);
+        }
+        else {
+            spip_log("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status'], 'distant');
+        }
+        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'])
+        ) {
+            spip_log('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp", 'distant' . _LOG_INFO_IMPORTANTE);
+            @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,86 +295,86 @@ 
  */
 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)) {
-				$chaine = [];
-				foreach ($donnees as $cle => $valeur) {
-					if (is_array($valeur)) {
-						foreach ($valeur as $val2) {
-							$chaine[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
-						}
-					} else {
-						$chaine[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
-					}
-				}
-				$chaine = implode('&', $chaine);
-			} 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)) {
+                $chaine = [];
+                foreach ($donnees as $cle => $valeur) {
+                    if (is_array($valeur)) {
+                        foreach ($valeur as $val2) {
+                            $chaine[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
+                        }
+                    } else {
+                        $chaine[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
+                    }
+                }
+                $chaine = implode('&', $chaine);
+            } else {
+                $chaine = $donnees;
+            }
+        }
+    }
+
+    return [$entete, $chaine];
 }
 
 /**
@@ -385,19 +385,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;
 }
 
 /**
@@ -438,209 +438,209 @@ 
  *     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;
-	}
-
-	spip_log('recuperer_url ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
-
-	// 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) {
-		spip_log("ECHEC init_http $url", 'distant' . _LOG_ERREUR);
-
-		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 {
-				spip_log("ECHEC chinoiserie $url", 'distant' . _LOG_ERREUR);
-				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'] = '';
-			}
-			spip_log('recuperer_url recommence ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
-
-			return recuperer_url($url, $options);
-		} elseif ($res['status'] !== 200) {
-			spip_log('HTTP status ' . $res['status'] . " pour $url", 'distant');
-		}
-		$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'];
-		}
-	}
-
-	// on ne veut que les entetes
-	if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
-		spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
-		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 a pas deja recuperer le contenu par une methode detournee
-	if (!$result['length']) {
-		$res = recuperer_body($handle, $options['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));
-		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']);
-	}
-
-	$trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
-	$trace['page'] = '...';
-	spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
-
-	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;
+    }
+
+    spip_log('recuperer_url ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
+
+    // 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) {
+        spip_log("ECHEC init_http $url", 'distant' . _LOG_ERREUR);
+
+        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 {
+                spip_log("ECHEC chinoiserie $url", 'distant' . _LOG_ERREUR);
+                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'] = '';
+            }
+            spip_log('recuperer_url recommence ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
+
+            return recuperer_url($url, $options);
+        } elseif ($res['status'] !== 200) {
+            spip_log('HTTP status ' . $res['status'] . " pour $url", 'distant');
+        }
+        $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'];
+        }
+    }
+
+    // on ne veut que les entetes
+    if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
+        spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
+        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 a pas deja recuperer le contenu par une methode detournee
+    if (!$result['length']) {
+        $res = recuperer_body($handle, $options['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));
+        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']);
+    }
+
+    $trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
+    $trace['page'] = '...';
+    spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
+
+    return $result;
 }
 
 /**
@@ -656,73 +656,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;
 }
 
 /**
@@ -740,42 +740,42 @@ 
  *   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
-	}
-	while (!feof($handle) && $taille < $taille_max) {
-		$res = fread($handle, 16384);
-		$taille += strlen($res);
-		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
+    }
+    while (!feof($handle) && $taille < $taille_max) {
+        $res = fread($handle, 16384);
+        $taille += strlen($res);
+        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;
 }
 
 /**
@@ -797,35 +797,35 @@ 
  *   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;
-		if (strtolower(trim($d)) == 'location' && $result['status'] >= 300 && $result['status'] < 400) {
-			$result['location'] = $v;
-		} elseif ($d == 'Last-Modified') {
-			$result['last_modified'] = strtotime($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;
+        if (strtolower(trim($d)) == 'location' && $result['status'] >= 300 && $result['status'] < 400) {
+            $result['location'] = $v;
+        } elseif ($d == 'Last-Modified') {
+            $result['last_modified'] = strtotime($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;
 }
 
 /**
@@ -847,22 +847,22 @@ 
  *     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 etait 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 etait a la racine
+    if (_DIR_RACINE) {
+        $d = preg_replace(',^' . preg_quote((string) _DIR_RACINE, ',') . ',', '', (string) $d);
+    }
 
-	$m = md5($source);
+    $m = md5($source);
 
-	return $d
-	. substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
-	. substr($m, 0, 4)
-	. ".$extension";
+    return $d
+    . substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
+    . substr($m, 0, 4)
+    . ".$extension";
 }
 
 /**
@@ -881,72 +881,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_log("pas de copie locale pour $source", 'distant' . _LOG_ERREUR);
-	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_log("pas de copie locale pour $source", 'distant' . _LOG_ERREUR);
+    return null;
 }
 
 
@@ -975,112 +975,112 @@ 
  **/
 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) {
-		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_log("tenter GET $source", 'distant');
-		$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');
-	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'] = $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) {
+        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_log("tenter GET $source", 'distant');
+        $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');
+    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'] = $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;
 }
 
 /**
@@ -1089,63 +1089,63 @@ 
  * @return false|mixed
  */
 function distant_trouver_extension_selon_headers($source, $headers) {
-	$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];
-	}
-
-	// 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_log("mime-type $mime_type ok, extension " . $t['extension'], 'distant');
-		return $t['extension'];
-	} else {
-		# par defaut on retombe sur '.bin' si c'est autorise
-		spip_log("mime-type $mime_type inconnu", 'distant');
-		$t = sql_fetsel('extension', 'spip_types_documents', "extension='bin'");
-		if (!$t) {
-			return false;
-		}
-		return $t['extension'];
-	}
+    $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];
+    }
+
+    // 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_log("mime-type $mime_type ok, extension " . $t['extension'], 'distant');
+        return $t['extension'];
+    } else {
+        # par defaut on retombe sur '.bin' si c'est autorise
+        spip_log("mime-type $mime_type inconnu", 'distant');
+        $t = sql_fetsel('extension', 'spip_types_documents', "extension='bin'");
+        if (!$t) {
+            return false;
+        }
+        return $t['extension'];
+    }
 }
 
 /**
@@ -1161,45 +1161,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;
 }
 
 
@@ -1222,59 +1222,59 @@ 
  * @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 = [$t['user'], $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_log("connexion vers $url par simple fopen", 'distant');
-			$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 = [$t['user'], $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_log("connexion vers $url par simple fopen", 'distant');
+            $fopen = true;
+        } else {
+            // echec total
+            $f = false;
+        }
+    }
+
+    return [$f, $fopen];
 }
 
 /**
@@ -1309,124 +1309,124 @@ 
  *   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;
-	}
-
-	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
-		);
-		spip_log("Recuperer $path sur $first_host:$first_port par $f (via CONNECT)", 'connect');
-		if (!$f) {
-			spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
-			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'
-		) {
-			spip_log("Echec CONNECT sur $first_host:$first_port", 'connect' . _LOG_INFO_IMPORTANTE);
-			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);
-		spip_log("OK CONNECT sur $first_host:$first_port", 'connect');
-	} else {
-		$ntry = 3;
-		do {
-			$f = @fsockopen($first_host, $first_port, $errno, $errstr, _INC_DISTANT_CONNECT_TIMEOUT);
-		} while (!$f && $ntry-- && $errno !== 110 && sleep(1));
-		spip_log("Recuperer $path sur $first_host:$first_port par $f");
-		if (!$f) {
-			spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
-
-			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($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;
+    }
+
+    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
+        );
+        spip_log("Recuperer $path sur $first_host:$first_port par $f (via CONNECT)", 'connect');
+        if (!$f) {
+            spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
+            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'
+        ) {
+            spip_log("Echec CONNECT sur $first_host:$first_port", 'connect' . _LOG_INFO_IMPORTANTE);
+            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);
+        spip_log("OK CONNECT sur $first_host:$first_port", 'connect');
+    } else {
+        $ntry = 3;
+        do {
+            $f = @fsockopen($first_host, $first_port, $errno, $errstr, _INC_DISTANT_CONNECT_TIMEOUT);
+        } while (!$f && $ntry-- && $errno !== 110 && sleep(1));
+        spip_log("Recuperer $path sur $first_host:$first_port par $f");
+        if (!$f) {
+            spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
+
+            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($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" : '');
 
 #	spip_log("Requete\n$req", 'distant');
-	fwrite($f, $req);
-	fwrite($f, $datas ?: "\r\n");
+    fwrite($f, $req);
+    fwrite($f, $datas ?: "\r\n");
 
-	return $f;
+    return $f;
 }

Spacing +63 added lines, -63 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,18 +113,18 @@ 
 		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) : '']
 		);
 
 		if (!$res || !$res['length'] && $res['status'] != 304) {
-			spip_log("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'), 'distant' . _LOG_INFO_IMPORTANTE);
+			spip_log("copie_locale : Echec recuperation $source sur $localrac_tmp status : ".($res ? $res['status'] : '-'), 'distant'._LOG_INFO_IMPORTANTE);
 			@unlink($localrac_tmp);
 		}
 		else {
-			spip_log("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status'], 'distant');
+			spip_log("copie_locale : recuperation $source sur $localrac_tmp OK | taille ".$res['length'].' status '.$res['status'], 'distant');
 		}
 		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'])
 		) {
-			spip_log('copie_locale : url finale ' . $res['url'] . " non valide, on refuse le fichier $localrac_tmp", 'distant' . _LOG_INFO_IMPORTANTE);
+			spip_log('copie_locale : url finale '.$res['url']." non valide, on refuse le fichier $localrac_tmp", 'distant'._LOG_INFO_IMPORTANTE);
 			@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) {
-							$chaine[] = rawurlencode($cle) . '[]=' . rawurlencode((string) $val2);
+							$chaine[] = rawurlencode($cle).'[]='.rawurlencode((string) $val2);
 						}
 					} else {
-						$chaine[] = rawurlencode($cle) . '=' . rawurlencode((string) $valeur);
+						$chaine[] = rawurlencode($cle).'='.rawurlencode((string) $valeur);
 					}
 				}
 				$chaine = implode('&', $chaine);
@@ -465,13 +465,13 @@ 
 		$options['taille_max'] = $copy ? _COPIE_LOCALE_MAX_SIZE : _INC_DISTANT_MAX_SIZE;
 	}
 
-	spip_log('recuperer_url ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
+	spip_log('recuperer_url '.$options['methode']." sur $url", 'distant'._LOG_DEBUG);
 
 	// 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";
 		}
 	}
 
@@ -479,9 +479,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
 		) {
@@ -494,9 +494,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);
@@ -525,7 +525,7 @@ 
 		$options['if_modified_since']
 	);
 	if (!$handle) {
-		spip_log("ECHEC init_http $url", 'distant' . _LOG_ERREUR);
+		spip_log("ECHEC init_http $url", 'distant'._LOG_ERREUR);
 
 		return false;
 	}
@@ -555,7 +555,7 @@ 
 					'status' => 200,
 				];
 			} else {
-				spip_log("ECHEC chinoiserie $url", 'distant' . _LOG_ERREUR);
+				spip_log("ECHEC chinoiserie $url", 'distant'._LOG_ERREUR);
 				return false;
 			}
 		} elseif ($res['location'] && $options['follow_location']) {
@@ -572,11 +572,11 @@ 
 				$options['methode'] = 'GET';
 				$options['datas'] = '';
 			}
-			spip_log('recuperer_url recommence ' . $options['methode'] . " sur $url", 'distant' . _LOG_DEBUG);
+			spip_log('recuperer_url recommence '.$options['methode']." sur $url", 'distant'._LOG_DEBUG);
 
 			return recuperer_url($url, $options);
 		} elseif ($res['status'] !== 200) {
-			spip_log('HTTP status ' . $res['status'] . " pour $url", 'distant');
+			spip_log('HTTP status '.$res['status']." pour $url", 'distant');
 		}
 		$result['status'] = $res['status'];
 		if (isset($res['headers'])) {
@@ -592,7 +592,7 @@ 
 
 	// on ne veut que les entetes
 	if (!$options['taille_max'] || $options['methode'] == 'HEAD' || $result['status'] == '304') {
-		spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($result, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
+		spip_log('RESULTAT recuperer_url '.$options['methode']." sur $url : ".json_encode($result, JSON_THROW_ON_ERROR), 'distant'._LOG_DEBUG);
 		return $result;
 	}
 
@@ -602,7 +602,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 a pas deja recuperer le contenu par une methode detournee
@@ -638,7 +638,7 @@ 
 
 	$trace = json_decode(json_encode($result, JSON_THROW_ON_ERROR), true, 512, JSON_THROW_ON_ERROR);
 	$trace['page'] = '...';
-	spip_log('RESULTAT recuperer_url ' . $options['methode'] . " sur $url : " . json_encode($trace, JSON_THROW_ON_ERROR), 'distant' . _LOG_DEBUG);
+	spip_log('RESULTAT recuperer_url '.$options['methode']." sur $url : ".json_encode($trace, JSON_THROW_ON_ERROR), 'distant'._LOG_DEBUG);
 
 	return $result;
 }
@@ -692,7 +692,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";
 
@@ -746,7 +746,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);
@@ -805,7 +805,7 @@ 
 	}
 	$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;
 		if (strtolower(trim($d)) == 'location' && $result['status'] >= 300 && $result['status'] < 400) {
@@ -854,13 +854,13 @@ 
 
 	// on se place tout le temps comme si on etait 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);
 
 	return $d
-	. substr(preg_replace(',[^\w-],', '', basename($source)) . '-' . $m, 0, 12)
+	. substr(preg_replace(',[^\w-],', '', basename($source)).'-'.$m, 0, 12)
 	. substr($m, 0, 4)
 	. ".$extension";
 }
@@ -884,7 +884,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;
@@ -902,7 +902,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;
 	}
@@ -910,7 +910,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);
@@ -921,9 +921,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;
 		}
 	}
@@ -931,7 +931,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)))
@@ -941,11 +941,11 @@ 
 		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);
 	}
 
-	spip_log("pas de copie locale pour $source", 'distant' . _LOG_ERREUR);
+	spip_log("pas de copie locale pour $source", 'distant'._LOG_ERREUR);
 	return null;
 }
 
@@ -1044,7 +1044,7 @@ 
 		} else {
 			if ($a['body']) {
 				$a['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];
@@ -1107,20 +1107,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)
@@ -1131,11 +1131,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_log("mime-type $mime_type ok, extension " . $t['extension'], 'distant');
+		spip_log("mime-type $mime_type ok, extension ".$t['extension'], 'distant');
 		return $t['extension'];
 	} else {
 		# par defaut on retombe sur '.bin' si c'est autorise
@@ -1238,7 +1238,7 @@ 
 		}
 	} else {
 		$scheme = $t['scheme'];
-		$noproxy = $scheme . '://';
+		$noproxy = $scheme.'://';
 	}
 	if (isset($t['user'])) {
 		$user = [$t['user'], $t['pass']];
@@ -1252,7 +1252,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);
@@ -1326,29 +1326,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;
 	}
 
@@ -1371,7 +1371,7 @@ 
 		);
 		spip_log("Recuperer $path sur $first_host:$first_port par $f (via CONNECT)", 'connect');
 		if (!$f) {
-			spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
+			spip_log("Erreur connexion $errno $errstr", 'distant'._LOG_ERREUR);
 			return $errno;
 		}
 		stream_set_timeout($f, _INC_DISTANT_CONNECT_TIMEOUT);
@@ -1384,7 +1384,7 @@ 
 			|| ($res = explode(' ', $res)) === []
 			|| $res[1] !== '200'
 		) {
-			spip_log("Echec CONNECT sur $first_host:$first_port", 'connect' . _LOG_INFO_IMPORTANTE);
+			spip_log("Echec CONNECT sur $first_host:$first_port", 'connect'._LOG_INFO_IMPORTANTE);
 			fclose($f);
 
 			return false;
@@ -1401,7 +1401,7 @@ 
 		} while (!$f && $ntry-- && $errno !== 110 && sleep(1));
 		spip_log("Recuperer $path sur $first_host:$first_port par $f");
 		if (!$f) {
-			spip_log("Erreur connexion $errno $errstr", 'distant' . _LOG_ERREUR);
+			spip_log("Erreur connexion $errno $errstr", 'distant'._LOG_ERREUR);
 
 			return $errno;
 		}
@@ -1411,16 +1411,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($user) . "\r\n" : '')
+		. ($date ? 'If-Modified-Since: '.(gmdate('D, d M Y H:i:s', $date)." GMT\r\n") : '')
+		. ($user ? 'Authorization: Basic '.base64_encode($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" : '');
 

Braces +2 added lines, -4 removed lines

@@ -122,8 +122,7 @@ 
 		if (!$res || !$res['length'] && $res['status'] != 304) {
 			spip_log("copie_locale : Echec recuperation $source sur $localrac_tmp status : " . ($res ? $res['status'] : '-'), 'distant' . _LOG_INFO_IMPORTANTE);
 			@unlink($localrac_tmp);
-		}
-		else {
+		} else {
 			spip_log("copie_locale : recuperation $source sur $localrac_tmp OK | taille " . $res['length'] . ' status ' . $res['status'], 'distant');
 		}
 		if (!$res || !$res['length']) {
@@ -242,8 +241,7 @@ 
 						break;
 					}
 				}
-			}
-			else {
+			} else {
 				$ip = false;
 			}
 		}

ecrire/inc/modeles.php

Indentation +12 added lines, -12 removed lines

@@ -13,7 +13,7 @@ 
 use Spip\Texte\Collecteur\Modeles;
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -26,16 +26,16 @@ 
  */
 function traiter_modeles($texte, $doublons = false, $echap = '', string $connect = '', ?Liens $collecteurLiens = null, $env = []) {
 
-	include_spip('src/Texte/Collecteur/AbstractCollecteur');
-	include_spip('src/Texte/Collecteur/Modeles');
-	$collecteurModeles = new Modeles();
+    include_spip('src/Texte/Collecteur/AbstractCollecteur');
+    include_spip('src/Texte/Collecteur/Modeles');
+    $collecteurModeles = new Modeles();
 
-	$options = [
-		'doublons' => $doublons,
-		'echap' => $echap,
-		'connect' => $connect,
-		'collecteurLiens' => $collecteurLiens,
-		'env' => $env
-	];
-	return $collecteurModeles->traiter($texte ?? '', $options);
+    $options = [
+        'doublons' => $doublons,
+        'echap' => $echap,
+        'connect' => $connect,
+        'collecteurLiens' => $collecteurLiens,
+        'env' => $env
+    ];
+    return $collecteurModeles->traiter($texte ?? '', $options);
 }

ecrire/inc/informer.php

Indentation +60 added lines, -60 removed lines

@@ -10,76 +10,76 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 # Les information d'une rubrique selectionnee dans le mini navigateur
 
 function inc_informer_dist($id, $col, $exclus, $rac, $type, $do = 'aff') {
-	include_spip('inc/texte');
-	$titre = $descriptif = '';
-	if ($type === 'rubrique') {
-		$row = sql_fetsel('titre, descriptif', 'spip_rubriques', 'id_rubrique = ' . (int) $id);
-		if ($row) {
-			$titre = typo($row['titre']);
-			$descriptif = propre($row['descriptif']);
-		} else {
-			$titre = _T('info_racine_site');
-		}
-	}
+    include_spip('inc/texte');
+    $titre = $descriptif = '';
+    if ($type === 'rubrique') {
+        $row = sql_fetsel('titre, descriptif', 'spip_rubriques', 'id_rubrique = ' . (int) $id);
+        if ($row) {
+            $titre = typo($row['titre']);
+            $descriptif = propre($row['descriptif']);
+        } else {
+            $titre = _T('info_racine_site');
+        }
+    }
 
-	$res = '';
-	if (
-		$type === 'rubrique'
-		&& (int) ($GLOBALS['visiteur_session']['prefs']['display'] ?? 0) !== 1
-		&& isset($GLOBALS['meta']['image_process'])
-		&& $GLOBALS['meta']['image_process'] !== 'non'
-	) {
-		$chercher_logo = charger_fonction('chercher_logo', 'inc');
-		if ($res = $chercher_logo($id, 'id_rubrique', 'on')) {
-			[$fid, $dir, $nom, $format] = $res;
-			include_spip('inc/filtres_images_mini');
-			$res = image_reduire("<img src='$fid' alt='' />", 100, 48);
-			if ($res) {
-				$res = "<div class='informer__media' style='float: " . $GLOBALS['spip_lang_right'] . '; margin-' . $GLOBALS['spip_lang_right'] . ": -5px; margin-top: -5px;'>$res</div>";
-			}
-		}
-	}
+    $res = '';
+    if (
+        $type === 'rubrique'
+        && (int) ($GLOBALS['visiteur_session']['prefs']['display'] ?? 0) !== 1
+        && isset($GLOBALS['meta']['image_process'])
+        && $GLOBALS['meta']['image_process'] !== 'non'
+    ) {
+        $chercher_logo = charger_fonction('chercher_logo', 'inc');
+        if ($res = $chercher_logo($id, 'id_rubrique', 'on')) {
+            [$fid, $dir, $nom, $format] = $res;
+            include_spip('inc/filtres_images_mini');
+            $res = image_reduire("<img src='$fid' alt='' />", 100, 48);
+            if ($res) {
+                $res = "<div class='informer__media' style='float: " . $GLOBALS['spip_lang_right'] . '; margin-' . $GLOBALS['spip_lang_right'] . ": -5px; margin-top: -5px;'>$res</div>";
+            }
+        }
+    }
 
-	$rac = spip_htmlentities($rac, ENT_QUOTES);
-	$do = spip_htmlentities($do, ENT_QUOTES);
-	$id = (int) $id;
+    $rac = spip_htmlentities($rac, ENT_QUOTES);
+    $do = spip_htmlentities($do, ENT_QUOTES);
+    $id = (int) $id;
 
 # ce lien provoque la selection (directe) de la rubrique cliquee
 # et l'affichage de son titre dans le bandeau
-	$titre = strtr(
-		str_replace(
-			"'",
-			'&#8217;',
-			str_replace('"', '&#34;', (string) textebrut($titre))
-		),
-		"\n\r",
-		'  '
-	);
+    $titre = strtr(
+        str_replace(
+            "'",
+            '&#8217;',
+            str_replace('"', '&#34;', (string) textebrut($titre))
+        ),
+        "\n\r",
+        '  '
+    );
 
-	$js_func = $do . '_selection_titre';
+    $js_func = $do . '_selection_titre';
 
-	return "<div style='display: none;'>"
-	. "<input type='text' id='" . $rac . "_sel' value='$id' />"
-	. "<input type='text' id='" . $rac . "_sel2' value=\""
-	. entites_html($titre)
-	. '" />'
-	. '</div>'
-	. "<div class='informer' style='padding: 5px; border-top: 0px;'>"
-	. '<div class="informer__item">'
-	. ($res ?: '')
-	. "<p class='informer__titre'><b>" . safehtml($titre) . '</b></p>'
-	. ($descriptif ? "<div class='informer__descriptif'>" . safehtml($descriptif) . '</div>' : '')
-	. '</div>'
-	. "<div class='informer__action' style='clear:both; text-align: " . $GLOBALS['spip_lang_right'] . ";'>"
-	. "<input type='submit' class='fondo btn submit' value='"
-	. _T('bouton_choisir')
-	. "'\nonclick=\"$js_func('$titre',$id,'selection_rubrique','id_parent'); return false;\" />"
-	. '</div>'
-	. '</div>';
+    return "<div style='display: none;'>"
+    . "<input type='text' id='" . $rac . "_sel' value='$id' />"
+    . "<input type='text' id='" . $rac . "_sel2' value=\""
+    . entites_html($titre)
+    . '" />'
+    . '</div>'
+    . "<div class='informer' style='padding: 5px; border-top: 0px;'>"
+    . '<div class="informer__item">'
+    . ($res ?: '')
+    . "<p class='informer__titre'><b>" . safehtml($titre) . '</b></p>'
+    . ($descriptif ? "<div class='informer__descriptif'>" . safehtml($descriptif) . '</div>' : '')
+    . '</div>'
+    . "<div class='informer__action' style='clear:both; text-align: " . $GLOBALS['spip_lang_right'] . ";'>"
+    . "<input type='submit' class='fondo btn submit' value='"
+    . _T('bouton_choisir')
+    . "'\nonclick=\"$js_func('$titre',$id,'selection_rubrique','id_parent'); return false;\" />"
+    . '</div>'
+    . '</div>';
 }

Spacing +8 added lines, -8 removed lines

@@ -19,7 +19,7 @@ 
 	include_spip('inc/texte');
 	$titre = $descriptif = '';
 	if ($type === 'rubrique') {
-		$row = sql_fetsel('titre, descriptif', 'spip_rubriques', 'id_rubrique = ' . (int) $id);
+		$row = sql_fetsel('titre, descriptif', 'spip_rubriques', 'id_rubrique = '.(int) $id);
 		if ($row) {
 			$titre = typo($row['titre']);
 			$descriptif = propre($row['descriptif']);
@@ -41,7 +41,7 @@ 
 			include_spip('inc/filtres_images_mini');
 			$res = image_reduire("<img src='$fid' alt='' />", 100, 48);
 			if ($res) {
-				$res = "<div class='informer__media' style='float: " . $GLOBALS['spip_lang_right'] . '; margin-' . $GLOBALS['spip_lang_right'] . ": -5px; margin-top: -5px;'>$res</div>";
+				$res = "<div class='informer__media' style='float: ".$GLOBALS['spip_lang_right'].'; margin-'.$GLOBALS['spip_lang_right'].": -5px; margin-top: -5px;'>$res</div>";
 			}
 		}
 	}
@@ -62,21 +62,21 @@ 
 		'  '
 	);
 
-	$js_func = $do . '_selection_titre';
+	$js_func = $do.'_selection_titre';
 
 	return "<div style='display: none;'>"
-	. "<input type='text' id='" . $rac . "_sel' value='$id' />"
-	. "<input type='text' id='" . $rac . "_sel2' value=\""
+	. "<input type='text' id='".$rac."_sel' value='$id' />"
+	. "<input type='text' id='".$rac."_sel2' value=\""
 	. entites_html($titre)
 	. '" />'
 	. '</div>'
 	. "<div class='informer' style='padding: 5px; border-top: 0px;'>"
 	. '<div class="informer__item">'
 	. ($res ?: '')
-	. "<p class='informer__titre'><b>" . safehtml($titre) . '</b></p>'
-	. ($descriptif ? "<div class='informer__descriptif'>" . safehtml($descriptif) . '</div>' : '')
+	. "<p class='informer__titre'><b>".safehtml($titre).'</b></p>'
+	. ($descriptif ? "<div class='informer__descriptif'>".safehtml($descriptif).'</div>' : '')
 	. '</div>'
-	. "<div class='informer__action' style='clear:both; text-align: " . $GLOBALS['spip_lang_right'] . ";'>"
+	. "<div class='informer__action' style='clear:both; text-align: ".$GLOBALS['spip_lang_right'].";'>"
 	. "<input type='submit' class='fondo btn submit' value='"
 	. _T('bouton_choisir')
 	. "'\nonclick=\"$js_func('$titre',$id,'selection_rubrique','id_parent'); return false;\" />"