spip / SPIP

ecrire/inc/puce_statut.php

Indentation +236 added lines, -236 removed lines

@@ -18,18 +18,18 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_ACTIVER_PUCE_RAPIDE')) {
-	/**
-	 * Activer le changement rapide de statut sur les listes d'objets ?
-	 *
-	 * Peut ralentir un site sur des listes très longues.
-	 *
-	 * @var bool
-	 **/
-	define('_ACTIVER_PUCE_RAPIDE', true);
+    /**
+     * Activer le changement rapide de statut sur les listes d'objets ?
+     *
+     * Peut ralentir un site sur des listes très longues.
+     *
+     * @var bool
+     **/
+    define('_ACTIVER_PUCE_RAPIDE', true);
 }
 
 /**
@@ -57,31 +57,31 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function inc_puce_statut_dist(
-	$id_objet,
-	$statut,
-	$id_parent,
-	$type,
-	$ajax = false,
-	$menu_rapide = _ACTIVER_PUCE_RAPIDE
+    $id_objet,
+    $statut,
+    $id_parent,
+    $type,
+    $ajax = false,
+    $menu_rapide = _ACTIVER_PUCE_RAPIDE
 ) {
-	static $f_puce_statut = [];
-	$type = objet_type($type);
-	// cas prioritaire : fonction perso, qui permet aussi de gerer les cas historiques
-	if (!isset($f_puce_statut[$type]) or is_null($f_puce_statut[$type])) {
-		$f_puce_statut[$type] = charger_fonction($type, 'puce_statut', true);
-	}
-	if ($f_puce_statut[$type]) {
-		return $f_puce_statut[$type]($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide);
-	}
-
-	// si statut_image trouve quelque chose (et '' est quelque chose)
-	// composer une puce, avec si possible changement rapide
-	elseif (!is_null($puce = puce_statut_changement_rapide($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide))) {
-		return $puce;
-	} // sinon fausse puce avec le type de l'image
-	else {
-		return http_img_pack("$type-16.png", '');
-	}
+    static $f_puce_statut = [];
+    $type = objet_type($type);
+    // cas prioritaire : fonction perso, qui permet aussi de gerer les cas historiques
+    if (!isset($f_puce_statut[$type]) or is_null($f_puce_statut[$type])) {
+        $f_puce_statut[$type] = charger_fonction($type, 'puce_statut', true);
+    }
+    if ($f_puce_statut[$type]) {
+        return $f_puce_statut[$type]($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide);
+    }
+
+    // si statut_image trouve quelque chose (et '' est quelque chose)
+    // composer une puce, avec si possible changement rapide
+    elseif (!is_null($puce = puce_statut_changement_rapide($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide))) {
+        return $puce;
+    } // sinon fausse puce avec le type de l'image
+    else {
+        return http_img_pack("$type-16.png", '');
+    }
 }
 
 /**
@@ -110,41 +110,41 @@ 
  *   null si pas capable de déterminer l'image
  */
 function statut_image($objet, $statut) {
-	$src = null;
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_images'])) {
-		// si une declaration statut_images
-		// mais rien pour le statut demande, ne rien afficher
-		$src = '';
-		if (isset($desc['statut_images'][$statut])) {
-			$src = $desc['statut_images'][$statut];
-		} // sinon image par defaut ?
-		elseif (isset($desc['statut_images'][0])) {
-			$src = $desc['statut_images'][0];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$src = 'puce-preparer-xx.svg?12px';
-				break;
-			case 'prop':
-				$src = 'puce-proposer-xx.svg?12px';
-				break;
-			case 'publie':
-				$src = 'puce-publier-xx.svg?12px';
-				break;
-			case 'refuse':
-				$src = 'puce-refuser-xx.svg?12px';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$src = 'puce-supprimer-xx.svg?12px';
-				break;
-		}
-	}
-
-	return $src;
+    $src = null;
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_images'])) {
+        // si une declaration statut_images
+        // mais rien pour le statut demande, ne rien afficher
+        $src = '';
+        if (isset($desc['statut_images'][$statut])) {
+            $src = $desc['statut_images'][$statut];
+        } // sinon image par defaut ?
+        elseif (isset($desc['statut_images'][0])) {
+            $src = $desc['statut_images'][0];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $src = 'puce-preparer-xx.svg?12px';
+                break;
+            case 'prop':
+                $src = 'puce-proposer-xx.svg?12px';
+                break;
+            case 'publie':
+                $src = 'puce-publier-xx.svg?12px';
+                break;
+            case 'refuse':
+                $src = 'puce-refuser-xx.svg?12px';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $src = 'puce-supprimer-xx.svg?12px';
+                break;
+        }
+    }
+
+    return $src;
 }
 
 /**
@@ -172,40 +172,40 @@ 
  * @return string
  */
 function statut_titre($objet, $statut) {
-	$titre = '';
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_titres'])) {
-		// si une declaration statut_titres
-		// mais rien pour le statut demande, ne rien afficher
-		if (isset($desc['statut_titres'][$statut])) {
-			$titre = $desc['statut_titres'][$statut];
-		} // sinon image par defaut ?
-		elseif (isset($desc['statut_titres'][0])) {
-			$titre = $desc['statut_titres'][0];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$titre = 'texte_statut_en_cours_redaction';
-				break;
-			case 'prop':
-				$titre = 'texte_statut_propose_evaluation';
-				break;
-			case 'publie':
-				$titre = 'texte_statut_publie';
-				break;
-			case 'refuse':
-				$titre = 'texte_statut_refuse';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$titre = 'texte_statut_poubelle';
-				break;
-		}
-	}
-
-	return $titre ? _T($titre) : '';
+    $titre = '';
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_titres'])) {
+        // si une declaration statut_titres
+        // mais rien pour le statut demande, ne rien afficher
+        if (isset($desc['statut_titres'][$statut])) {
+            $titre = $desc['statut_titres'][$statut];
+        } // sinon image par defaut ?
+        elseif (isset($desc['statut_titres'][0])) {
+            $titre = $desc['statut_titres'][0];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $titre = 'texte_statut_en_cours_redaction';
+                break;
+            case 'prop':
+                $titre = 'texte_statut_propose_evaluation';
+                break;
+            case 'publie':
+                $titre = 'texte_statut_publie';
+                break;
+            case 'refuse':
+                $titre = 'texte_statut_refuse';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $titre = 'texte_statut_poubelle';
+                break;
+        }
+    }
+
+    return $titre ? _T($titre) : '';
 }
 
 
@@ -225,37 +225,37 @@ 
  * @return string
  */
 function statut_texte_instituer($objet, $statut) {
-	$texte = '';
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_textes_instituer'])) {
-		// si une declaration statut_titres
-		// mais rien pour le statut demande, ne rien afficher
-		if (isset($desc['statut_textes_instituer'][$statut])) {
-			$texte = $desc['statut_textes_instituer'][$statut];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$texte = 'texte_statut_en_cours_redaction';
-				break;
-			case 'prop':
-				$texte = 'texte_statut_propose_evaluation';
-				break;
-			case 'publie':
-				$texte = 'texte_statut_publie';
-				break;
-			case 'refuse':
-				$texte = 'texte_statut_refuse';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$texte = 'texte_statut_poubelle';
-				break;
-		}
-	}
-
-	return $texte ? _T($texte) : '';
+    $texte = '';
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_textes_instituer'])) {
+        // si une declaration statut_titres
+        // mais rien pour le statut demande, ne rien afficher
+        if (isset($desc['statut_textes_instituer'][$statut])) {
+            $texte = $desc['statut_textes_instituer'][$statut];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $texte = 'texte_statut_en_cours_redaction';
+                break;
+            case 'prop':
+                $texte = 'texte_statut_propose_evaluation';
+                break;
+            case 'publie':
+                $texte = 'texte_statut_publie';
+                break;
+            case 'refuse':
+                $texte = 'texte_statut_refuse';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $texte = 'texte_statut_poubelle';
+                break;
+        }
+    }
+
+    return $texte ? _T($texte) : '';
 }
 
 
@@ -275,16 +275,16 @@ 
  * @return string
  */
 function puce_statut_auteur_dist($id, $statut, $id_parent, $type, $ajax = '', $menu_rapide = _ACTIVER_PUCE_RAPIDE) {
-	$img = statut_image('auteur', $statut);
-	if (!$img) {
-		return '';
-	}
-	$alt = statut_titre('auteur', $statut);
+    $img = statut_image('auteur', $statut);
+    if (!$img) {
+        return '';
+    }
+    $alt = statut_titre('auteur', $statut);
 
-	$fond = '';
-	$titre = '';
+    $fond = '';
+    $titre = '';
 
-	/*
+    /*
 	if ($type != 'auteur') {
 	  $img2 = chemin_image('del-16.png');
 	  $titre = _T('titre_image_redacteur');
@@ -294,12 +294,12 @@ 
 	}
 	*/
 
-	return http_img_pack($img, $alt, $fond, $alt);
+    return http_img_pack($img, $alt, $fond, $alt);
 }
 
 
 function puce_statut_rubrique_dist($id, $statut, $id_rubrique, $type, $ajax = '', $menu_rapide = _ACTIVER_PUCE_RAPIDE) {
-	return http_img_pack('rubrique-16.png', '');
+    return http_img_pack('rubrique-16.png', '');
 }
 
 /**
@@ -323,110 +323,110 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  **/
 function puce_statut_changement_rapide(
-	$id,
-	$statut,
-	$id_rubrique,
-	$type = 'article',
-	$ajax = false,
-	$menu_rapide = _ACTIVER_PUCE_RAPIDE
+    $id,
+    $statut,
+    $id_rubrique,
+    $type = 'article',
+    $ajax = false,
+    $menu_rapide = _ACTIVER_PUCE_RAPIDE
 ) {
-	$src = statut_image($type, $statut);
-	if (!$src) {
-		return $src;
-	}
-
-	if (
-		!$id
-		or !_SPIP_AJAX
-		or !$menu_rapide
-	) {
-		$ajax_node = '';
-	} else {
-		$ajax_node = " class='imgstatut$type$id'";
-	}
-
-
-	$t = statut_titre($type, $statut);
-	$inser_puce = http_img_pack($src, $t, $ajax_node, $t);
-
-	if (!$ajax_node) {
-		return $inser_puce;
-	}
-
-	$table = table_objet_sql($type);
-	$desc = lister_tables_objets_sql($table);
-	if (!isset($desc['statut_textes_instituer'])) {
-		return $inser_puce;
-	}
-
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-
-	// cas ou l'on a un parent connu (devrait disparaitre au profit du second cas plus generique)
-	if ($id_rubrique) {
-		if (!autoriser('publierdans', 'rubrique', $id_rubrique)) {
-			return $inser_puce;
-		}
-	} // si pas d'id_rubrique fourni, tester directement instituer type avec le statut publie
-	else {
-		if (!autoriser('instituer', $type, $id, null, ['statut' => 'publie'])) {
-			return $inser_puce;
-		}
-	}
-
-	$coord = array_flip(array_keys($desc['statut_textes_instituer']));
-	if (!isset($coord[$statut])) {
-		return $inser_puce;
-	}
-
-	$unit = 18/*widh de img*/ + 0/*padding*/
-	;
-	$margin = 0; /* marge a gauche + droite */
-	$zero = 0 /*border*/ + $margin / 2 + 0 /*padding*/
-	;
-	$clip = $zero + ($unit * $coord[$statut]);
-
-	if ($ajax) {
-		$width = $unit * (is_countable($desc['statut_textes_instituer']) ? count($desc['statut_textes_instituer']) : 0) + $margin;
-		$out = "<span class='puce_objet_fixe $type'>"
-			. $inser_puce
-			. '</span>'
-			. "<span class='puce_objet_popup $type statutdecal$type$id' style='width:{$width}px;margin-left:-{$clip}px;'>";
-		$i = 0;
-		foreach ($desc['statut_textes_instituer'] as $s => $t) {
-			$out .= afficher_script_statut($id, $type, -$zero - $i++ * $unit, statut_image($type, $s), $s, _T($t));
-		}
-		$out .= '</span>';
-
-		return $out;
-	} else {
-		$nom = 'puce_statut_';
-		$action = generer_url_ecrire('puce_statut', '', true);
-		$lang_dir = lang_dir(lang_typo());
-
-		return "<span class='puce_objet $type' id='$nom$type$id' dir='$lang_dir' data-puce-nom='$nom' data-puce-type='$type' data-puce-id='$id' data-puce-action='$action'>"
-		. $inser_puce
-		. '</span>';
-	}
+    $src = statut_image($type, $statut);
+    if (!$src) {
+        return $src;
+    }
+
+    if (
+        !$id
+        or !_SPIP_AJAX
+        or !$menu_rapide
+    ) {
+        $ajax_node = '';
+    } else {
+        $ajax_node = " class='imgstatut$type$id'";
+    }
+
+
+    $t = statut_titre($type, $statut);
+    $inser_puce = http_img_pack($src, $t, $ajax_node, $t);
+
+    if (!$ajax_node) {
+        return $inser_puce;
+    }
+
+    $table = table_objet_sql($type);
+    $desc = lister_tables_objets_sql($table);
+    if (!isset($desc['statut_textes_instituer'])) {
+        return $inser_puce;
+    }
+
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+
+    // cas ou l'on a un parent connu (devrait disparaitre au profit du second cas plus generique)
+    if ($id_rubrique) {
+        if (!autoriser('publierdans', 'rubrique', $id_rubrique)) {
+            return $inser_puce;
+        }
+    } // si pas d'id_rubrique fourni, tester directement instituer type avec le statut publie
+    else {
+        if (!autoriser('instituer', $type, $id, null, ['statut' => 'publie'])) {
+            return $inser_puce;
+        }
+    }
+
+    $coord = array_flip(array_keys($desc['statut_textes_instituer']));
+    if (!isset($coord[$statut])) {
+        return $inser_puce;
+    }
+
+    $unit = 18/*widh de img*/ + 0/*padding*/
+    ;
+    $margin = 0; /* marge a gauche + droite */
+    $zero = 0 /*border*/ + $margin / 2 + 0 /*padding*/
+    ;
+    $clip = $zero + ($unit * $coord[$statut]);
+
+    if ($ajax) {
+        $width = $unit * (is_countable($desc['statut_textes_instituer']) ? count($desc['statut_textes_instituer']) : 0) + $margin;
+        $out = "<span class='puce_objet_fixe $type'>"
+            . $inser_puce
+            . '</span>'
+            . "<span class='puce_objet_popup $type statutdecal$type$id' style='width:{$width}px;margin-left:-{$clip}px;'>";
+        $i = 0;
+        foreach ($desc['statut_textes_instituer'] as $s => $t) {
+            $out .= afficher_script_statut($id, $type, -$zero - $i++ * $unit, statut_image($type, $s), $s, _T($t));
+        }
+        $out .= '</span>';
+
+        return $out;
+    } else {
+        $nom = 'puce_statut_';
+        $action = generer_url_ecrire('puce_statut', '', true);
+        $lang_dir = lang_dir(lang_typo());
+
+        return "<span class='puce_objet $type' id='$nom$type$id' dir='$lang_dir' data-puce-nom='$nom' data-puce-type='$type' data-puce-id='$id' data-puce-action='$action'>"
+        . $inser_puce
+        . '</span>';
+    }
 }
 
 
 function afficher_script_statut($id, $type, $n, $img, $statut, $titre, $act = '') {
-	$h = generer_action_auteur('instituer_objet', "$type-$id-$statut");
-	$t = supprimer_tags($titre);
+    $h = generer_action_auteur('instituer_objet', "$type-$id-$statut");
+    $t = supprimer_tags($titre);
 
-	return "<a href=\"#\" data-puce-id=\"$id\" data-puce-type=\"$type\" data-puce-decal=\"$n\" data-puce-action=\"$h\" title=\"$t\"$act>" . http_img_pack($img, $t) . '</a>';
+    return "<a href=\"#\" data-puce-id=\"$id\" data-puce-type=\"$type\" data-puce-decal=\"$n\" data-puce-action=\"$h\" title=\"$t\"$act>" . http_img_pack($img, $t) . '</a>';
 }
 
 // compat
 // La couleur du statut
 
 function puce_statut($statut, $atts = '') {
-	$src = statut_image('article', $statut);
-	if (!$src) {
-		return '';
-	}
+    $src = statut_image('article', $statut);
+    if (!$src) {
+        return '';
+    }
 
-	return http_img_pack($src, statut_titre('article', $statut), $atts);
+    return http_img_pack($src, statut_titre('article', $statut), $atts);
 }

ecrire/inc/texte_mini.php

Indentation +401 added lines, -401 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/filtres');
 include_spip('inc/lang');
@@ -39,21 +39,21 @@ 
  **/
 function definir_puce() {
 
-	// Attention au sens, qui n'est pas defini de la meme facon dans
-	// l'espace prive (spip_lang est la langue de l'interface, lang_dir
-	// celle du texte) et public (spip_lang est la langue du texte)
-	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
+    // Attention au sens, qui n'est pas defini de la meme facon dans
+    // l'espace prive (spip_lang est la langue de l'interface, lang_dir
+    // celle du texte) et public (spip_lang est la langue du texte)
+    $dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
-	if ($dir == 'rtl') {
-		$p .= '_rtl';
-	}
+    $p = 'puce' . (test_espace_prive() ? '_prive' : '');
+    if ($dir == 'rtl') {
+        $p .= '_rtl';
+    }
 
-	if (!isset($GLOBALS[$p])) {
-		$GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
-	}
+    if (!isset($GLOBALS[$p])) {
+        $GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
+    }
 
-	return $GLOBALS[$p];
+    return $GLOBALS[$p];
 }
 
 
@@ -61,14 +61,14 @@ 
 // dont on souhaite qu'ils provoquent un saut de paragraphe
 
 if (!defined('_BALISES_BLOCS')) {
-	define(
-		'_BALISES_BLOCS',
-		'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
-	);
+    define(
+        '_BALISES_BLOCS',
+        'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
+    );
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+    define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
 }
 
 //
@@ -80,111 +80,111 @@ 
 // echappe est un div ou un span
 // https://code.spip.net/@code_echappement
 function code_echappement($rempl, $source = '', $no_transform = false, $mode = null) {
-	if (!strlen($rempl)) {
-		return '';
-	}
-
-	// Tester si on echappe en span ou en div
-	if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
-	}
-
-	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
-	$taille = 30000;
-	$return = '';
-	for ($i = 0; $i < strlen($rempl); $i += $taille) {
-		// Convertir en base64 et cacher dans un attribut
-		// utiliser les " pour eviter le re-encodage de ' et &#8217
-		$base64 = base64_encode(substr($rempl, $i, $taille));
-		$return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
-	}
-
-	return $return;
+    if (!strlen($rempl)) {
+        return '';
+    }
+
+    // Tester si on echappe en span ou en div
+    if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
+        $mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+    }
+
+    // Decouper en morceaux, base64 a des probleme selon la taille de la pile
+    $taille = 30000;
+    $return = '';
+    for ($i = 0; $i < strlen($rempl); $i += $taille) {
+        // Convertir en base64 et cacher dans un attribut
+        // utiliser les " pour eviter le re-encodage de ' et &#8217
+        $base64 = base64_encode(substr($rempl, $i, $taille));
+        $return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
+    }
+
+    return $return;
 }
 
 
 // Echapper les <html>...</ html>
 // https://code.spip.net/@traiter_echap_html_dist
 function traiter_echap_html_dist($regs) {
-	return $regs[3];
+    return $regs[3];
 }
 
 // Echapper les <pre>...</ pre>
 function traiter_echap_pre_dist($regs) {
-	// echapper les <code> dans <pre>
-	$pre = $regs[3];
-
-	// echapper les < dans <code>
-	// on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
-	if (
-		strpos($pre, '<') !== false
-		and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $m) {
-			if ($m[1] === 'code') {
-				$code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
-				$pre = str_replace($m[0], $code, $pre);
-			}
-		}
-	}
-	return "<pre>$pre</pre>";
+    // echapper les <code> dans <pre>
+    $pre = $regs[3];
+
+    // echapper les < dans <code>
+    // on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
+    if (
+        strpos($pre, '<') !== false
+        and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $m) {
+            if ($m[1] === 'code') {
+                $code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
+                $pre = str_replace($m[0], $code, $pre);
+            }
+        }
+    }
+    return "<pre>$pre</pre>";
 }
 
 // Echapper les <code>...</ code>
 // https://code.spip.net/@traiter_echap_code_dist
 function traiter_echap_code_dist($regs) {
-	[, , $att, $corps] = $regs;
-	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
-
-	// ne pas mettre le <div...> s'il n'y a qu'une ligne
-	if (is_int(strpos($echap, "\n"))) {
-		// supprimer les sauts de ligne debut/fin
-		// (mais pas les espaces => ascii art).
-		$echap = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $echap);
-		$echap = nl2br($echap);
-		$echap = "<div style='text-align: left;' "
-			. "class='spip_code' dir='ltr'><code$att>"
-			. $echap . '</code></div>';
-	} else {
-		$echap = "<code$att class='spip_code' dir='ltr'>" . $echap . '</code>';
-	}
-
-	$echap = str_replace("\t", '&nbsp; &nbsp; &nbsp; &nbsp; ', $echap);
-	$echap = str_replace('  ', ' &nbsp;', $echap);
-
-	return $echap;
+    [, , $att, $corps] = $regs;
+    $echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
+
+    // ne pas mettre le <div...> s'il n'y a qu'une ligne
+    if (is_int(strpos($echap, "\n"))) {
+        // supprimer les sauts de ligne debut/fin
+        // (mais pas les espaces => ascii art).
+        $echap = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $echap);
+        $echap = nl2br($echap);
+        $echap = "<div style='text-align: left;' "
+            . "class='spip_code' dir='ltr'><code$att>"
+            . $echap . '</code></div>';
+    } else {
+        $echap = "<code$att class='spip_code' dir='ltr'>" . $echap . '</code>';
+    }
+
+    $echap = str_replace("\t", '&nbsp; &nbsp; &nbsp; &nbsp; ', $echap);
+    $echap = str_replace('  ', ' &nbsp;', $echap);
+
+    return $echap;
 }
 
 // Echapper les <cadre>...</ cadre> aka <frame>...</ frame>
 // https://code.spip.net/@traiter_echap_cadre_dist
 function traiter_echap_cadre_dist($regs) {
-	$echap = trim(entites_html($regs[3]));
-	// compter les lignes un peu plus finement qu'avec les \n
-	$lignes = explode("\n", trim($echap));
-	$n = 0;
-	foreach ($lignes as $l) {
-		$n += floor(strlen($l) / 60) + 1;
-	}
-	$n = max($n, 2);
-	$echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre' dir='ltr'>$echap</textarea>";
-
-	return $echap;
+    $echap = trim(entites_html($regs[3]));
+    // compter les lignes un peu plus finement qu'avec les \n
+    $lignes = explode("\n", trim($echap));
+    $n = 0;
+    foreach ($lignes as $l) {
+        $n += floor(strlen($l) / 60) + 1;
+    }
+    $n = max($n, 2);
+    $echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre' dir='ltr'>$echap</textarea>";
+
+    return $echap;
 }
 
 // https://code.spip.net/@traiter_echap_frame_dist
 function traiter_echap_frame_dist($regs) {
-	return traiter_echap_cadre_dist($regs);
+    return traiter_echap_cadre_dist($regs);
 }
 
 // https://code.spip.net/@traiter_echap_script_dist
 function traiter_echap_script_dist($regs) {
-	// rendre joli (et inactif) si c'est un script language=php
-	if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
-		return highlight_string($regs[0], true);
-	}
+    // rendre joli (et inactif) si c'est un script language=php
+    if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
+        return highlight_string($regs[0], true);
+    }
 
-	// Cas normal : le script passe tel quel
-	return $regs[0];
+    // Cas normal : le script passe tel quel
+    return $regs[0];
 }
 
 define('_PROTEGE_BLOCS', ',<(html|pre|code|cadre|frame|script|style)(\s[^>]*)?>(.*)</\1>,UimsS');
@@ -204,79 +204,79 @@ 
  * @return string|string[]
  */
 function echappe_html(
-	$letexte,
-	$source = '',
-	$no_transform = false,
-	$preg = '',
-	$callback_prefix = ''
+    $letexte,
+    $source = '',
+    $no_transform = false,
+    $preg = '',
+    $callback_prefix = ''
 ) {
-	if (!is_string($letexte) or !strlen($letexte)) {
-		return $letexte;
-	}
-
-	// si le texte recu est long PCRE risque d'exploser, on
-	// fait donc un mic-mac pour augmenter pcre.backtrack_limit
-	if (($len = strlen($letexte)) > 100000) {
-		if (!$old = @ini_get('pcre.backtrack_limit')) {
-			$old = 100000;
-		}
-		if ($len > $old) {
-			$a = @ini_set('pcre.backtrack_limit', $len);
-			spip_log("ini_set pcre.backtrack_limit=$len ($old)");
-		}
-	}
-
-	if (
-		($preg or strpos($letexte, '<') !== false)
-		and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $regs) {
-			// echappements tels quels ?
-			if ($no_transform) {
-				$echap = $regs[0];
-			} // sinon les traiter selon le cas
-			else {
-				if (
-					function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
-					or function_exists($f = $f . '_dist')
-				) {
-					$echap = $f($regs);
-				}
-			}
-
-			$p = strpos($letexte, (string) $regs[0]);
-			$letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
-		}
-	}
-
-	if ($no_transform) {
-		return $letexte;
-	}
-
-	// Echapper le php pour faire joli (ici, c'est pas pour la securite)
-	// seulement si on a echappe les <script>
-	// (derogatoire car on ne peut pas faire passer < ? ... ? >
-	// dans une callback autonommee
-	if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
-		if (
-			strpos($letexte, '<' . '?') !== false and preg_match_all(
-				',<[?].*($|[?]>),UisS',
-				$letexte,
-				$matches,
-				PREG_SET_ORDER
-			)
-		) {
-			foreach ($matches as $regs) {
-				$letexte = str_replace(
-					$regs[0],
-					code_echappement(highlight_string($regs[0], true), $source),
-					$letexte
-				);
-			}
-		}
-	}
-
-	return $letexte;
+    if (!is_string($letexte) or !strlen($letexte)) {
+        return $letexte;
+    }
+
+    // si le texte recu est long PCRE risque d'exploser, on
+    // fait donc un mic-mac pour augmenter pcre.backtrack_limit
+    if (($len = strlen($letexte)) > 100000) {
+        if (!$old = @ini_get('pcre.backtrack_limit')) {
+            $old = 100000;
+        }
+        if ($len > $old) {
+            $a = @ini_set('pcre.backtrack_limit', $len);
+            spip_log("ini_set pcre.backtrack_limit=$len ($old)");
+        }
+    }
+
+    if (
+        ($preg or strpos($letexte, '<') !== false)
+        and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $regs) {
+            // echappements tels quels ?
+            if ($no_transform) {
+                $echap = $regs[0];
+            } // sinon les traiter selon le cas
+            else {
+                if (
+                    function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
+                    or function_exists($f = $f . '_dist')
+                ) {
+                    $echap = $f($regs);
+                }
+            }
+
+            $p = strpos($letexte, (string) $regs[0]);
+            $letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
+        }
+    }
+
+    if ($no_transform) {
+        return $letexte;
+    }
+
+    // Echapper le php pour faire joli (ici, c'est pas pour la securite)
+    // seulement si on a echappe les <script>
+    // (derogatoire car on ne peut pas faire passer < ? ... ? >
+    // dans une callback autonommee
+    if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
+        if (
+            strpos($letexte, '<' . '?') !== false and preg_match_all(
+                ',<[?].*($|[?]>),UisS',
+                $letexte,
+                $matches,
+                PREG_SET_ORDER
+            )
+        ) {
+            foreach ($matches as $regs) {
+                $letexte = str_replace(
+                    $regs[0],
+                    code_echappement(highlight_string($regs[0], true), $source),
+                    $letexte
+                );
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 //
@@ -285,58 +285,58 @@ 
 // par propre() : exemple dans multi et dans typo()
 // https://code.spip.net/@echappe_retour
 function echappe_retour($letexte, $source = '', $filtre = '') {
-	if (strpos($letexte, (string) "base64$source")) {
-		# spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
-		$max_prof = 5;
-		while (
-			strpos($letexte, '<') !== false
-			and
-			preg_match_all(
-				',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
-				$letexte,
-				$regs,
-				PREG_SET_ORDER
-			)
-			and $max_prof--
-		) {
-			foreach ($regs as $reg) {
-				$rempl = base64_decode(extraire_attribut($reg[0], 'title'));
-				// recherche d'attributs supplementaires
-				$at = [];
-				foreach (['lang', 'dir'] as $attr) {
-					if ($a = extraire_attribut($reg[0], $attr)) {
-						$at[$attr] = $a;
-					}
-				}
-				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
-					foreach ($at as $attr => $a) {
-						$rempl = inserer_attribut($rempl, $attr, $a);
-					}
-				}
-				if ($filtre) {
-					$rempl = $filtre($rempl);
-				}
-				$letexte = str_replace($reg[0], $rempl, $letexte);
-			}
-		}
-	}
-
-	return $letexte;
+    if (strpos($letexte, (string) "base64$source")) {
+        # spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
+        $max_prof = 5;
+        while (
+            strpos($letexte, '<') !== false
+            and
+            preg_match_all(
+                ',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+                $letexte,
+                $regs,
+                PREG_SET_ORDER
+            )
+            and $max_prof--
+        ) {
+            foreach ($regs as $reg) {
+                $rempl = base64_decode(extraire_attribut($reg[0], 'title'));
+                // recherche d'attributs supplementaires
+                $at = [];
+                foreach (['lang', 'dir'] as $attr) {
+                    if ($a = extraire_attribut($reg[0], $attr)) {
+                        $at[$attr] = $a;
+                    }
+                }
+                if ($at) {
+                    $rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+                    foreach ($at as $attr => $a) {
+                        $rempl = inserer_attribut($rempl, $attr, $a);
+                    }
+                }
+                if ($filtre) {
+                    $rempl = $filtre($rempl);
+                }
+                $letexte = str_replace($reg[0], $rempl, $letexte);
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 // Reinserer le javascript de confiance (venant des modeles)
 
 // https://code.spip.net/@echappe_retour_modeles
 function echappe_retour_modeles($letexte, $interdire_scripts = false) {
-	$letexte = echappe_retour($letexte);
+    $letexte = echappe_retour($letexte);
 
-	// Dans les appels directs hors squelette, securiser aussi ici
-	if ($interdire_scripts) {
-		$letexte = interdire_scripts($letexte);
-	}
+    // Dans les appels directs hors squelette, securiser aussi ici
+    if ($interdire_scripts) {
+        $letexte = interdire_scripts($letexte);
+    }
 
-	return trim($letexte);
+    return trim($letexte);
 }
 
 
@@ -364,132 +364,132 @@ 
  *     Texte coupé
  **/
 function couper($texte, $taille = 50, $suite = null) {
-	if (!($length = strlen($texte)) or $taille <= 0) {
-		return '';
-	}
-	$offset = 400 + 2 * $taille;
-	while (
-		$offset < $length
-		and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
-	) {
-		$offset = 2 * $offset;
-	}
-	if (
-		$offset < $length
-		&& ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
-	) {
-		$p_tag_fermant = strpos($texte, '>', $offset);
-		if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
-			$offset = $p_tag_fermant + 1;
-		} // prolonger la coupe jusqu'au tag fermant suivant eventuel
-	}
-	$texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
-
-	if (!function_exists('nettoyer_raccourcis_typo')) {
-		include_spip('inc/lien');
-	}
-	$texte = nettoyer_raccourcis_typo($texte);
-
-	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace('/<p( [^>]*)?' . '>/', "\r", $texte);
-	$texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
-
-	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
-	$texte = str_replace("\n\n", "\r", $texte);
-
-	// supprimer les tags
-	$texte = supprimer_tags($texte);
-	$texte = trim(str_replace("\n", ' ', $texte));
-	$texte .= "\n";  // marquer la fin
-
-	// corriger la longueur de coupe
-	// en fonction de la presence de caracteres utf
-	if ($GLOBALS['meta']['charset'] == 'utf-8') {
-		$long = charset2unicode($texte);
-		$long = spip_substr($long, 0, max($taille, 1));
-		$nbcharutf = preg_match_all('/(&#[0-9]{3,6};)/S', $long, $matches);
-		$taille += $nbcharutf;
-	}
-
-
-	// couper au mot precedent
-	$long = spip_substr($texte, 0, max($taille - 4, 1));
-	$u = $GLOBALS['meta']['pcre_u'];
-	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
-	if (is_null($suite)) {
-		$suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
-	}
-	$points = $suite;
-
-	// trop court ? ne pas faire de (...)
-	if (spip_strlen($court) < max(0.75 * $taille, 2)) {
-		$points = '';
-		$long = spip_substr($texte, 0, $taille);
-		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
-		// encore trop court ? couper au caractere
-		if (spip_strlen($texte) < 0.75 * $taille) {
-			$texte = $long;
-		}
-	} else {
-		$texte = $court;
-	}
-
-	if (strpos($texte, "\n")) {  // la fin est encore la : c'est qu'on n'a pas de texte de suite
-	$points = '';
-	}
-
-	// remettre les paragraphes
-	$texte = preg_replace("/\r+/", "\n\n", $texte);
-
-	// supprimer l'eventuelle entite finale mal coupee
-	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
-
-	return quote_amp(trim($texte)) . $points;
+    if (!($length = strlen($texte)) or $taille <= 0) {
+        return '';
+    }
+    $offset = 400 + 2 * $taille;
+    while (
+        $offset < $length
+        and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
+    ) {
+        $offset = 2 * $offset;
+    }
+    if (
+        $offset < $length
+        && ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
+    ) {
+        $p_tag_fermant = strpos($texte, '>', $offset);
+        if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
+            $offset = $p_tag_fermant + 1;
+        } // prolonger la coupe jusqu'au tag fermant suivant eventuel
+    }
+    $texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
+
+    if (!function_exists('nettoyer_raccourcis_typo')) {
+        include_spip('inc/lien');
+    }
+    $texte = nettoyer_raccourcis_typo($texte);
+
+    // balises de sauts de ligne et paragraphe
+    $texte = preg_replace('/<p( [^>]*)?' . '>/', "\r", $texte);
+    $texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
+
+    // on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
+    $texte = str_replace("\n\n", "\r", $texte);
+
+    // supprimer les tags
+    $texte = supprimer_tags($texte);
+    $texte = trim(str_replace("\n", ' ', $texte));
+    $texte .= "\n";  // marquer la fin
+
+    // corriger la longueur de coupe
+    // en fonction de la presence de caracteres utf
+    if ($GLOBALS['meta']['charset'] == 'utf-8') {
+        $long = charset2unicode($texte);
+        $long = spip_substr($long, 0, max($taille, 1));
+        $nbcharutf = preg_match_all('/(&#[0-9]{3,6};)/S', $long, $matches);
+        $taille += $nbcharutf;
+    }
+
+
+    // couper au mot precedent
+    $long = spip_substr($texte, 0, max($taille - 4, 1));
+    $u = $GLOBALS['meta']['pcre_u'];
+    $court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+    if (is_null($suite)) {
+        $suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
+    }
+    $points = $suite;
+
+    // trop court ? ne pas faire de (...)
+    if (spip_strlen($court) < max(0.75 * $taille, 2)) {
+        $points = '';
+        $long = spip_substr($texte, 0, $taille);
+        $texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+        // encore trop court ? couper au caractere
+        if (spip_strlen($texte) < 0.75 * $taille) {
+            $texte = $long;
+        }
+    } else {
+        $texte = $court;
+    }
+
+    if (strpos($texte, "\n")) {  // la fin est encore la : c'est qu'on n'a pas de texte de suite
+    $points = '';
+    }
+
+    // remettre les paragraphes
+    $texte = preg_replace("/\r+/", "\n\n", $texte);
+
+    // supprimer l'eventuelle entite finale mal coupee
+    $texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
+
+    return quote_amp(trim($texte)) . $points;
 }
 
 
 // https://code.spip.net/@protege_js_modeles
 function protege_js_modeles($t) {
-	if (isset($GLOBALS['visiteur_session'])) {
-		if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_JS_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_JS_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
-			}
-		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_PHP_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_PHP_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
-			}
-		}
-	}
-
-	return $t;
+    if (isset($GLOBALS['visiteur_session'])) {
+        if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_JS_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_JS_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+            }
+        }
+        if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_PHP_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_PHP_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+            }
+        }
+    }
+
+    return $t;
 }
 
 
 function echapper_faux_tags($letexte) {
-	if (strpos($letexte, '<') === false) {
-		return $letexte;
-	}
-	$textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
-
-	$letexte = '';
-	while (is_countable($textMatches) ? count($textMatches) : 0) {
-		// un texte a echapper
-		$letexte .= str_replace('<', '&lt;', array_shift($textMatches));
-		// un tag html qui a servit a faite le split
-		$letexte .= array_shift($textMatches);
-	}
-
-	return $letexte;
+    if (strpos($letexte, '<') === false) {
+        return $letexte;
+    }
+    $textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
+
+    $letexte = '';
+    while (is_countable($textMatches) ? count($textMatches) : 0) {
+        // un texte a echapper
+        $letexte .= str_replace('<', '&lt;', array_shift($textMatches));
+        // un tag html qui a servit a faite le split
+        $letexte .= array_shift($textMatches);
+    }
+
+    return $letexte;
 }
 
 /**
@@ -502,47 +502,47 @@ 
  * @return string
  */
 function echapper_html_suspect($texte, $strict = true) {
-	static $echapper_html_suspect;
-	if (!$texte or !is_string($texte)) {
-		return $texte;
-	}
-
-	if (!isset($echapper_html_suspect)) {
-		$echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
-	}
-	// si fonction personalisee, on delegue
-	if ($echapper_html_suspect) {
-		return $echapper_html_suspect($texte, $strict);
-	}
-
-	if (
-		strpos($texte, '<') === false
-		or strpos($texte, '=') === false
-	) {
-		return $texte;
-	}
-
-	// quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
-	// car sinon on declenche sur les modeles ou ressources
-	if (
-		!$strict and
-		(strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
-	) {
-		return $texte;
-	}
-
-	// on teste sur strlen car safehtml supprime le contenu dangereux
-	// mais il peut aussi changer des ' en " sur les attributs html,
-	// donc un test d'egalite est trop strict
-	if (strlen(safehtml($texte)) !== strlen($texte)) {
-		$texte = str_replace('<', '&lt;', $texte);
-		if (!function_exists('attribut_html')) {
-			include_spip('inc/filtres');
-		}
-		$texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
-	}
-
-	return $texte;
+    static $echapper_html_suspect;
+    if (!$texte or !is_string($texte)) {
+        return $texte;
+    }
+
+    if (!isset($echapper_html_suspect)) {
+        $echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
+    }
+    // si fonction personalisee, on delegue
+    if ($echapper_html_suspect) {
+        return $echapper_html_suspect($texte, $strict);
+    }
+
+    if (
+        strpos($texte, '<') === false
+        or strpos($texte, '=') === false
+    ) {
+        return $texte;
+    }
+
+    // quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
+    // car sinon on declenche sur les modeles ou ressources
+    if (
+        !$strict and
+        (strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
+    ) {
+        return $texte;
+    }
+
+    // on teste sur strlen car safehtml supprime le contenu dangereux
+    // mais il peut aussi changer des ' en " sur les attributs html,
+    // donc un test d'egalite est trop strict
+    if (strlen(safehtml($texte)) !== strlen($texte)) {
+        $texte = str_replace('<', '&lt;', $texte);
+        if (!function_exists('attribut_html')) {
+            include_spip('inc/filtres');
+        }
+        $texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
+    }
+
+    return $texte;
 }
 
 
@@ -563,30 +563,30 @@ 
  *      Texte sécurisé
  **/
 function safehtml($t) {
-	static $safehtml;
-
-	if (!$t or !is_string($t)) {
-		return $t;
-	}
-	# attention safehtml nettoie deux ou trois caracteres de plus. A voir
-	if (strpos($t, '<') === false) {
-		return str_replace("\x00", '', $t);
-	}
-
-	if (!function_exists('interdire_scripts')) {
-		include_spip('inc/texte');
-	}
-	$t = interdire_scripts($t); // jolifier le php
-	$t = echappe_js($t);
-
-	if (!isset($safehtml)) {
-		$safehtml = charger_fonction('safehtml', 'inc', true);
-	}
-	if ($safehtml) {
-		$t = $safehtml($t);
-	}
-
-	return interdire_scripts($t); // interdire le php (2 precautions)
+    static $safehtml;
+
+    if (!$t or !is_string($t)) {
+        return $t;
+    }
+    # attention safehtml nettoie deux ou trois caracteres de plus. A voir
+    if (strpos($t, '<') === false) {
+        return str_replace("\x00", '', $t);
+    }
+
+    if (!function_exists('interdire_scripts')) {
+        include_spip('inc/texte');
+    }
+    $t = interdire_scripts($t); // jolifier le php
+    $t = echappe_js($t);
+
+    if (!isset($safehtml)) {
+        $safehtml = charger_fonction('safehtml', 'inc', true);
+    }
+    if ($safehtml) {
+        $t = $safehtml($t);
+    }
+
+    return interdire_scripts($t); // interdire le php (2 precautions)
 }
 
 
@@ -608,13 +608,13 @@ 
  *     Texte sans les modèles d'image
  **/
 function supprime_img($letexte, $message = null) {
-	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
-	}
-
-	return preg_replace(
-		',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
-		$message,
-		$letexte
-	);
+    if ($message === null) {
+        $message = '(' . _T('img_indisponible') . ')';
+    }
+
+    return preg_replace(
+        ',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+        $message,
+        $letexte
+    );
 }

ecrire/inc/math.php

Indentation +97 added lines, -97 removed lines

@@ -12,7 +12,7 @@ 
 
 //
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 //
@@ -22,54 +22,54 @@ 
 // https://code.spip.net/@image_math
 function produire_image_math($tex) {
 
-	switch ($GLOBALS['traiter_math']) {
-		// Attention: mathml desactiv'e pour l'instant
-		case 'mathml':
-			$ext = '.xhtml';
-			$server = $GLOBALS['mathml_server'];
-			break;
-		case 'tex':
-			$ext = '.png';
-			$server = $GLOBALS['tex_server'];
-			break;
-		default:
-			return $tex;
-	}
-
-	// Regarder dans le repertoire local des images TeX et blocs MathML
-	if (!@is_dir($dir_tex = _DIR_VAR . 'cache-TeX/')) {
-		@mkdir($dir_tex, _SPIP_CHMOD);
-	}
-	$fichier = $dir_tex . md5(trim($tex)) . $ext;
-
-
-	if (!@file_exists($fichier)) {
-		// Aller chercher l'image sur le serveur
-		if ($server) {
-			spip_log($url = $server . '?' . rawurlencode($tex));
-			include_spip('inc/distant');
-			recuperer_url($url, ['file' => $fichier]);
-		}
-	}
-
-
-	// Composer la reponse selon presence ou non de l'image
-	$tex = entites_html($tex);
-	if (@file_exists($fichier)) {
-		// MathML
-		if ($GLOBALS['traiter_math'] == 'mathml') {
-			return implode('', file($fichier));
-		} // TeX
-		else {
-			[, , , $size] = @spip_getimagesize($fichier);
-			$alt = "alt=\"$tex\" title=\"$tex\"";
-
-			return "<img src=\"$fichier\" style=\"vertical-align:middle;\" $size $alt />";
-		}
-	} else // pas de fichier
-	{
-		return "<tt><span class='spip_code' dir='ltr'>$tex</span></tt>";
-	}
+    switch ($GLOBALS['traiter_math']) {
+        // Attention: mathml desactiv'e pour l'instant
+        case 'mathml':
+            $ext = '.xhtml';
+            $server = $GLOBALS['mathml_server'];
+            break;
+        case 'tex':
+            $ext = '.png';
+            $server = $GLOBALS['tex_server'];
+            break;
+        default:
+            return $tex;
+    }
+
+    // Regarder dans le repertoire local des images TeX et blocs MathML
+    if (!@is_dir($dir_tex = _DIR_VAR . 'cache-TeX/')) {
+        @mkdir($dir_tex, _SPIP_CHMOD);
+    }
+    $fichier = $dir_tex . md5(trim($tex)) . $ext;
+
+
+    if (!@file_exists($fichier)) {
+        // Aller chercher l'image sur le serveur
+        if ($server) {
+            spip_log($url = $server . '?' . rawurlencode($tex));
+            include_spip('inc/distant');
+            recuperer_url($url, ['file' => $fichier]);
+        }
+    }
+
+
+    // Composer la reponse selon presence ou non de l'image
+    $tex = entites_html($tex);
+    if (@file_exists($fichier)) {
+        // MathML
+        if ($GLOBALS['traiter_math'] == 'mathml') {
+            return implode('', file($fichier));
+        } // TeX
+        else {
+            [, , , $size] = @spip_getimagesize($fichier);
+            $alt = "alt=\"$tex\" title=\"$tex\"";
+
+            return "<img src=\"$fichier\" style=\"vertical-align:middle;\" $size $alt />";
+        }
+    } else // pas de fichier
+    {
+        return "<tt><span class='spip_code' dir='ltr'>$tex</span></tt>";
+    }
 }
 
 
@@ -104,52 +104,52 @@ 
  */
 function traiter_math($letexte, $source = '', $defaire_amp = false) {
 
-	$texte_a_voir = $letexte;
-	while (($debut = strpos($texte_a_voir, '<math>')) !== false) {
-		if (!$fin = strpos($texte_a_voir, '</math>')) {
-			$fin = strlen($texte_a_voir);
-		}
-
-		$texte_debut = substr($texte_a_voir, 0, $debut);
-		$texte_milieu = substr(
-			$texte_a_voir,
-			$debut + strlen('<math>'),
-			$fin - $debut - strlen('<math>')
-		);
-		$texte_fin = substr(
-			$texte_a_voir,
-			$fin + strlen('</math>'),
-			strlen($texte_a_voir)
-		);
-
-		// Les doubles $$x^2$$ en mode 'div'
-		while ((preg_match(',[$][$]([^$]+)[$][$],', $texte_milieu, $regs))) {
-			$expression = $regs[1];
-			if ($defaire_amp) {
-				$expression = str_replace('&amp;', '&', $expression);
-			}
-			$echap = "\n<p class=\"spip\" style=\"text-align: center;\">" . produire_image_math($expression) . "</p>\n";
-			$pos = strpos($texte_milieu, (string) $regs[0]);
-			$texte_milieu = substr($texte_milieu, 0, $pos)
-				. code_echappement($echap, $source)
-				. substr($texte_milieu, $pos + strlen($regs[0]));
-		}
-
-		// Les simples $x^2$ en mode 'span'
-		while ((preg_match(',[$]([^$]+)[$],', $texte_milieu, $regs))) {
-			$expression = $regs[1];
-			if ($defaire_amp) {
-				$expression = str_replace('&amp;', '&', $expression);
-			}
-			$echap = produire_image_math($expression);
-			$pos = strpos($texte_milieu, (string) $regs[0]);
-			$texte_milieu = substr($texte_milieu, 0, $pos)
-				. code_echappement($echap, $source)
-				. substr($texte_milieu, $pos + strlen($regs[0]));
-		}
-
-		$texte_a_voir = $texte_debut . $texte_milieu . $texte_fin;
-	}
-
-	return $texte_a_voir;
+    $texte_a_voir = $letexte;
+    while (($debut = strpos($texte_a_voir, '<math>')) !== false) {
+        if (!$fin = strpos($texte_a_voir, '</math>')) {
+            $fin = strlen($texte_a_voir);
+        }
+
+        $texte_debut = substr($texte_a_voir, 0, $debut);
+        $texte_milieu = substr(
+            $texte_a_voir,
+            $debut + strlen('<math>'),
+            $fin - $debut - strlen('<math>')
+        );
+        $texte_fin = substr(
+            $texte_a_voir,
+            $fin + strlen('</math>'),
+            strlen($texte_a_voir)
+        );
+
+        // Les doubles $$x^2$$ en mode 'div'
+        while ((preg_match(',[$][$]([^$]+)[$][$],', $texte_milieu, $regs))) {
+            $expression = $regs[1];
+            if ($defaire_amp) {
+                $expression = str_replace('&amp;', '&', $expression);
+            }
+            $echap = "\n<p class=\"spip\" style=\"text-align: center;\">" . produire_image_math($expression) . "</p>\n";
+            $pos = strpos($texte_milieu, (string) $regs[0]);
+            $texte_milieu = substr($texte_milieu, 0, $pos)
+                . code_echappement($echap, $source)
+                . substr($texte_milieu, $pos + strlen($regs[0]));
+        }
+
+        // Les simples $x^2$ en mode 'span'
+        while ((preg_match(',[$]([^$]+)[$],', $texte_milieu, $regs))) {
+            $expression = $regs[1];
+            if ($defaire_amp) {
+                $expression = str_replace('&amp;', '&', $expression);
+            }
+            $echap = produire_image_math($expression);
+            $pos = strpos($texte_milieu, (string) $regs[0]);
+            $texte_milieu = substr($texte_milieu, 0, $pos)
+                . code_echappement($echap, $source)
+                . substr($texte_milieu, $pos + strlen($regs[0]));
+        }
+
+        $texte_a_voir = $texte_debut . $texte_milieu . $texte_fin;
+    }
+
+    return $texte_a_voir;
 }

ecrire/inc/securiser_action.php

Indentation +213 added lines, -213 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -50,19 +50,19 @@ 
  * @return array|string
  */
 function inc_securiser_action_dist($action = '', $arg = '', $redirect = '', $mode = false, $att = '', $public = false) {
-	if ($action) {
-		return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
-	} else {
-		$arg = _request('arg');
-		$hash = _request('hash');
-		$action = _request('action') ?: _request('formulaire_action');
-		if ($a = verifier_action_auteur("$action-$arg", $hash)) {
-			return $arg;
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	}
+    if ($action) {
+        return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
+    } else {
+        $arg = _request('arg');
+        $hash = _request('hash');
+        $action = _request('action') ?: _request('formulaire_action');
+        if ($a = verifier_action_auteur("$action-$arg", $hash)) {
+            return $arg;
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    }
 }
 
 /**
@@ -81,29 +81,29 @@ 
  */
 function demander_confirmation_avant_action($titre, $titre_bouton, $url_action = null) {
 
-	if (!$url_action) {
-		$url_action = self();
-		$action = _request('action');
-		$url_action = parametre_url($url_action, 'action', $action, '&');
-	}
-	else {
-		$action = parametre_url($url_action, 'action');
-	}
-
-	$arg = parametre_url($url_action, 'arg');
-	$confirm = md5("$action:$arg:" . realpath(__FILE__));
-	if (_request('confirm_action') === $confirm) {
-		return true;
-	}
-
-	$url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
-	include_spip('inc/filtres');
-	$bouton_action = bouton_action($titre_bouton, $url_confirm);
-	$corps = "<div style='text-align:center;'>$bouton_action</div>";
-
-	include_spip('inc/minipres');
-	echo minipres($titre, $corps);
-	exit;
+    if (!$url_action) {
+        $url_action = self();
+        $action = _request('action');
+        $url_action = parametre_url($url_action, 'action', $action, '&');
+    }
+    else {
+        $action = parametre_url($url_action, 'action');
+    }
+
+    $arg = parametre_url($url_action, 'arg');
+    $confirm = md5("$action:$arg:" . realpath(__FILE__));
+    if (_request('confirm_action') === $confirm) {
+        return true;
+    }
+
+    $url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
+    include_spip('inc/filtres');
+    $bouton_action = bouton_action($titre_bouton, $url_confirm);
+    $corps = "<div style='text-align:center;'>$bouton_action</div>";
+
+    include_spip('inc/minipres');
+    echo minipres($titre, $corps);
+    exit;
 }
 
 /**
@@ -135,34 +135,34 @@ 
  */
 function securiser_action_auteur($action, $arg, $redirect = '', $mode = false, $att = '', $public = false) {
 
-	// mode URL ou array
-	if (!is_string($mode)) {
-		$hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
-
-		$r = rawurlencode($redirect);
-		if ($mode === -1) {
-			return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
-		} else {
-			return generer_url_action(
-				$action,
-				'arg=' . rawurlencode($arg) . "&hash=$hash" . (!$r ? '' : "&redirect=$r"),
-				$mode,
-				$public
-			);
-		}
-	}
-
-	// mode formulaire
-	$hash = calculer_action_auteur("$action-$arg");
-	$att .= " style='margin: 0px; border: 0px'";
-	if ($redirect) {
-		$redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
-	}
-	$mode .= $redirect . "
+    // mode URL ou array
+    if (!is_string($mode)) {
+        $hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
+
+        $r = rawurlencode($redirect);
+        if ($mode === -1) {
+            return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
+        } else {
+            return generer_url_action(
+                $action,
+                'arg=' . rawurlencode($arg) . "&hash=$hash" . (!$r ? '' : "&redirect=$r"),
+                $mode,
+                $public
+            );
+        }
+    }
+
+    // mode formulaire
+    $hash = calculer_action_auteur("$action-$arg");
+    $att .= " style='margin: 0px; border: 0px'";
+    if ($redirect) {
+        $redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
+    }
+    $mode .= $redirect . "
 <input name='hash' type='hidden' value='$hash' />
 <input name='arg' type='hidden' value='$arg' />";
 
-	return generer_form_action($action, $mode, $att, $public);
+    return generer_form_action($action, $mode, $att, $public);
 }
 
 /**
@@ -172,48 +172,48 @@ 
  * @return array
  */
 function caracteriser_auteur($id_auteur = null) {
-	static $caracterisation = [];
-
-	if (is_null($id_auteur) and !isset($GLOBALS['visiteur_session']['id_auteur'])) {
-		// si l'auteur courant n'est pas connu alors qu'il peut demander une action
-		// c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
-		// S'il n'avait pas le droit de realiser cette action, le hash sera faux.
-		if (
-			isset($_COOKIE['spip_session'])
-			and (preg_match('/^(\d+)/', $_COOKIE['spip_session'], $r))
-		) {
-			return [$r[1], ''];
-			// Necessaire aux forums anonymes.
-			// Pour le reste, ca echouera.
-		} else {
-			return ['0', ''];
-		}
-	}
-	// Eviter l'acces SQL si le pass est connu de PHP
-	if (is_null($id_auteur)) {
-		$id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
-		if (isset($GLOBALS['visiteur_session']['pass']) and $GLOBALS['visiteur_session']['pass']) {
-			return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
-		}
-	}
-
-	if (isset($caracterisation[$id_auteur])) {
-		return $caracterisation[$id_auteur];
-	}
-
-	if ($id_auteur) {
-		include_spip('base/abstract_sql');
-		$t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
-		if ($t) {
-			return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	} // Visiteur anonyme, pour ls forums par exemple
-	else {
-		return ['0', ''];
-	}
+    static $caracterisation = [];
+
+    if (is_null($id_auteur) and !isset($GLOBALS['visiteur_session']['id_auteur'])) {
+        // si l'auteur courant n'est pas connu alors qu'il peut demander une action
+        // c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
+        // S'il n'avait pas le droit de realiser cette action, le hash sera faux.
+        if (
+            isset($_COOKIE['spip_session'])
+            and (preg_match('/^(\d+)/', $_COOKIE['spip_session'], $r))
+        ) {
+            return [$r[1], ''];
+            // Necessaire aux forums anonymes.
+            // Pour le reste, ca echouera.
+        } else {
+            return ['0', ''];
+        }
+    }
+    // Eviter l'acces SQL si le pass est connu de PHP
+    if (is_null($id_auteur)) {
+        $id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
+        if (isset($GLOBALS['visiteur_session']['pass']) and $GLOBALS['visiteur_session']['pass']) {
+            return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
+        }
+    }
+
+    if (isset($caracterisation[$id_auteur])) {
+        return $caracterisation[$id_auteur];
+    }
+
+    if ($id_auteur) {
+        include_spip('base/abstract_sql');
+        $t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
+        if ($t) {
+            return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    } // Visiteur anonyme, pour ls forums par exemple
+    else {
+        return ['0', ''];
+    }
 }
 
 /**
@@ -228,28 +228,28 @@ 
  * @return string
  */
 function _action_auteur($action, $id_auteur, $pass, $alea) {
-	static $sha = [];
-	if (!isset($sha[$id_auteur . $pass . $alea])) {
-		if (!isset($GLOBALS['meta'][$alea])) {
-			if (!$exec = _request('exec') or !autoriser_sans_cookie($exec)) {
-				include_spip('inc/acces');
-				charger_aleas();
-				if (empty($GLOBALS['meta'][$alea])) {
-					include_spip('inc/minipres');
-					echo minipres();
-					spip_log("$alea indisponible");
-					exit;
-				}
-			}
-		}
-		include_spip('auth/sha256.inc');
-		$sha[$id_auteur . $pass . $alea] = spip_sha256($id_auteur . $pass . @$GLOBALS['meta'][$alea]);
-	}
-	if (function_exists('sha1')) {
-		return sha1($action . $sha[$id_auteur . $pass . $alea]);
-	} else {
-		return md5($action . $sha[$id_auteur . $pass . $alea]);
-	}
+    static $sha = [];
+    if (!isset($sha[$id_auteur . $pass . $alea])) {
+        if (!isset($GLOBALS['meta'][$alea])) {
+            if (!$exec = _request('exec') or !autoriser_sans_cookie($exec)) {
+                include_spip('inc/acces');
+                charger_aleas();
+                if (empty($GLOBALS['meta'][$alea])) {
+                    include_spip('inc/minipres');
+                    echo minipres();
+                    spip_log("$alea indisponible");
+                    exit;
+                }
+            }
+        }
+        include_spip('auth/sha256.inc');
+        $sha[$id_auteur . $pass . $alea] = spip_sha256($id_auteur . $pass . @$GLOBALS['meta'][$alea]);
+    }
+    if (function_exists('sha1')) {
+        return sha1($action . $sha[$id_auteur . $pass . $alea]);
+    } else {
+        return md5($action . $sha[$id_auteur . $pass . $alea]);
+    }
 }
 
 /**
@@ -260,9 +260,9 @@ 
  * @return string
  */
 function calculer_action_auteur($action, $id_auteur = null) {
-	[$id_auteur, $pass] = caracteriser_auteur($id_auteur);
+    [$id_auteur, $pass] = caracteriser_auteur($id_auteur);
 
-	return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
+    return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
 }
 
 
@@ -275,15 +275,15 @@ 
  * @return bool
  */
 function verifier_action_auteur($action, $hash) {
-	[$id_auteur, $pass] = caracteriser_auteur();
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere')) {
-		return true;
-	}
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien')) {
-		return true;
-	}
-
-	return false;
+    [$id_auteur, $pass] = caracteriser_auteur();
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere')) {
+        return true;
+    }
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien')) {
+        return true;
+    }
+
+    return false;
 }
 
 //
@@ -299,29 +299,29 @@ 
  * @return string
  */
 function secret_du_site() {
-	if (!isset($GLOBALS['meta']['secret_du_site'])) {
-		include_spip('base/abstract_sql');
-		$GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
-	}
-	if (
-		!isset($GLOBALS['meta']['secret_du_site'])
-		or (strlen($GLOBALS['meta']['secret_du_site']) < 64)
-	) {
-		include_spip('inc/acces');
-		include_spip('auth/sha256.inc');
-		ecrire_meta(
-			'secret_du_site',
-			spip_sha256(
-				$_SERVER['DOCUMENT_ROOT']
-				. ($_SERVER['SERVER_SIGNATURE'] ?? '')
-				. creer_uniqid()
-			),
-			'non'
-		);
-		lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
-	}
-
-	return $GLOBALS['meta']['secret_du_site'];
+    if (!isset($GLOBALS['meta']['secret_du_site'])) {
+        include_spip('base/abstract_sql');
+        $GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
+    }
+    if (
+        !isset($GLOBALS['meta']['secret_du_site'])
+        or (strlen($GLOBALS['meta']['secret_du_site']) < 64)
+    ) {
+        include_spip('inc/acces');
+        include_spip('auth/sha256.inc');
+        ecrire_meta(
+            'secret_du_site',
+            spip_sha256(
+                $_SERVER['DOCUMENT_ROOT']
+                . ($_SERVER['SERVER_SIGNATURE'] ?? '')
+                . creer_uniqid()
+            ),
+            'non'
+        );
+        lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
+    }
+
+    return $GLOBALS['meta']['secret_du_site'];
 }
 
 /**
@@ -331,11 +331,11 @@ 
  * @return string
  */
 function calculer_cle_action($action) {
-	if (function_exists('sha1')) {
-		return sha1($action . secret_du_site());
-	} else {
-		return md5($action . secret_du_site());
-	}
+    if (function_exists('sha1')) {
+        return sha1($action . secret_du_site());
+    } else {
+        return md5($action . secret_du_site());
+    }
 }
 
 /**
@@ -346,7 +346,7 @@ 
  * @return bool
  */
 function verifier_cle_action($action, $cle) {
-	return ($cle == calculer_cle_action($action));
+    return ($cle == calculer_cle_action($action));
 }
 
 
@@ -363,19 +363,19 @@ 
  * @return string Token, de la forme "{id}*{hash}"
  */
 function calculer_token_previsu($url, $id_auteur = null, $alea = 'alea_ephemere') {
-	if (is_null($id_auteur)) {
-		if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
-			$id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
-		}
-	}
-	if (!$id_auteur = intval($id_auteur)) {
-		return '';
-	}
-	// On nettoie l’URL de tous les var_.
-	$url = nettoyer_uri_var($url);
-
-	$token = _action_auteur('previsualiser-' . $url, $id_auteur, null, $alea);
-	return "$id_auteur-$token";
+    if (is_null($id_auteur)) {
+        if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
+            $id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
+        }
+    }
+    if (!$id_auteur = intval($id_auteur)) {
+        return '';
+    }
+    // On nettoie l’URL de tous les var_.
+    $url = nettoyer_uri_var($url);
+
+    $token = _action_auteur('previsualiser-' . $url, $id_auteur, null, $alea);
+    return "$id_auteur-$token";
 }
 
 
@@ -393,31 +393,31 @@ 
  *     + Tableau (id auteur, type d’objet, id_objet) sinon.
  */
 function verifier_token_previsu($token) {
-	// retrouver auteur / hash
-	$e = explode('-', $token, 2);
-	if (count($e) == 2 and is_numeric(reset($e))) {
-		$id_auteur = intval(reset($e));
-	} else {
-		return false;
-	}
-
-	// calculer le type et id de l’url actuelle
-	include_spip('inc/urls');
-	include_spip('inc/filtres_mini');
-	$url = url_absolue(self());
-
-	// verifier le token
-	$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
-	if (!$_token or $token !== $_token) {
-		$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
-		if (!$_token or $token !== $_token) {
-			return false;
-		}
-	}
-
-	return [
-		'id_auteur' => $id_auteur,
-	];
+    // retrouver auteur / hash
+    $e = explode('-', $token, 2);
+    if (count($e) == 2 and is_numeric(reset($e))) {
+        $id_auteur = intval(reset($e));
+    } else {
+        return false;
+    }
+
+    // calculer le type et id de l’url actuelle
+    include_spip('inc/urls');
+    include_spip('inc/filtres_mini');
+    $url = url_absolue(self());
+
+    // verifier le token
+    $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
+    if (!$_token or $token !== $_token) {
+        $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
+        if (!$_token or $token !== $_token) {
+            return false;
+        }
+    }
+
+    return [
+        'id_auteur' => $id_auteur,
+    ];
 }
 
 /**
@@ -426,13 +426,13 @@ 
  * @return bool|array
  */
 function decrire_token_previsu() {
-	static $desc = null;
-	if (is_null($desc)) {
-		if ($token = _request('var_previewtoken')) {
-			$desc = verifier_token_previsu($token);
-		} else {
-			$desc = false;
-		}
-	}
-	return $desc;
+    static $desc = null;
+    if (is_null($desc)) {
+        if ($token = _request('var_previewtoken')) {
+            $desc = verifier_token_previsu($token);
+        } else {
+            $desc = false;
+        }
+    }
+    return $desc;
 }

ecrire/inc/auth.php

Indentation +447 added lines, -447 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -35,33 +35,33 @@ 
  *  - une chaîne vide si autorisation à pénétrer dans l'espace privé.
  */
 function inc_auth_dist() {
-	$row = auth_mode();
+    $row = auth_mode();
 
-	if ($row) {
-		return auth_init_droits($row);
-	}
+    if ($row) {
+        return auth_init_droits($row);
+    }
 
-	if (!$GLOBALS['connect_login']) {
-		return auth_a_loger();
-	}
+    if (!$GLOBALS['connect_login']) {
+        return auth_a_loger();
+    }
 
-	// Cas ou l'auteur a ete identifie mais on n'a pas d'info sur lui
-	// C'est soit parce que la base est inutilisable,
-	// soit parce que la table des auteurs a changee (restauration etc)
-	// Pas la peine d'insister.
-	// Renvoyer le nom fautif et une URL de remise a zero
+    // Cas ou l'auteur a ete identifie mais on n'a pas d'info sur lui
+    // C'est soit parce que la base est inutilisable,
+    // soit parce que la table des auteurs a changee (restauration etc)
+    // Pas la peine d'insister.
+    // Renvoyer le nom fautif et une URL de remise a zero
 
-	if (spip_connect()) {
-		return [
-			'login' => $GLOBALS['connect_login'],
-			'site' => generer_url_public('', 'action=logout&logout=prive')
-		];
-	}
+    if (spip_connect()) {
+        return [
+            'login' => $GLOBALS['connect_login'],
+            'site' => generer_url_public('', 'action=logout&logout=prive')
+        ];
+    }
 
-	$n = intval(sql_errno());
-	spip_log("Erreur base de donnees $n " . sql_error());
+    $n = intval(sql_errno());
+    spip_log("Erreur base de donnees $n " . sql_error());
 
-	return $n ?: 1;
+    return $n ?: 1;
 }
 
 /**
@@ -73,39 +73,39 @@ 
  * @return array|string
  */
 function auth_echec($raison) {
-	include_spip('inc/minipres');
-	include_spip('inc/headers');
-	// pas authentifie. Pourquoi ?
-	if (is_string($raison)) {
-		// redirection vers une page d'authentification
-		// on ne revient pas de cette fonction
-		// sauf si pb de header
-		$raison = redirige_formulaire($raison);
-	} elseif (is_int($raison)) {
-		// erreur SQL a afficher
-		$raison = minipres(
-			_T('info_travaux_titre'),
-			_T('titre_probleme_technique') . '<p><tt>' . sql_errno() . ' ' . sql_error() . '</tt></p>'
-		);
-	} elseif (@$raison['statut']) {
-		// un simple visiteur n'a pas acces a l'espace prive
-		spip_log('connexion refusee a ' . @$raison['id_auteur']);
-		$raison = minipres(_T('avis_erreur_connexion'), _T('avis_erreur_visiteur'));
-	} else {
-		// auteur en fin de droits ...
-		$h = $raison['site'];
-		$raison = minipres(
-			_T('avis_erreur_connexion'),
-			'<br /><br /><p>'
-			. _T('texte_inc_auth_1', ['auth_login' => $raison['login']])
-			. " <a href='$h'>"
-			. _T('texte_inc_auth_2')
-			. '</a>'
-			. _T('texte_inc_auth_3')
-		);
-	}
-
-	return $raison;
+    include_spip('inc/minipres');
+    include_spip('inc/headers');
+    // pas authentifie. Pourquoi ?
+    if (is_string($raison)) {
+        // redirection vers une page d'authentification
+        // on ne revient pas de cette fonction
+        // sauf si pb de header
+        $raison = redirige_formulaire($raison);
+    } elseif (is_int($raison)) {
+        // erreur SQL a afficher
+        $raison = minipres(
+            _T('info_travaux_titre'),
+            _T('titre_probleme_technique') . '<p><tt>' . sql_errno() . ' ' . sql_error() . '</tt></p>'
+        );
+    } elseif (@$raison['statut']) {
+        // un simple visiteur n'a pas acces a l'espace prive
+        spip_log('connexion refusee a ' . @$raison['id_auteur']);
+        $raison = minipres(_T('avis_erreur_connexion'), _T('avis_erreur_visiteur'));
+    } else {
+        // auteur en fin de droits ...
+        $h = $raison['site'];
+        $raison = minipres(
+            _T('avis_erreur_connexion'),
+            '<br /><br /><p>'
+            . _T('texte_inc_auth_1', ['auth_login' => $raison['login']])
+            . " <a href='$h'>"
+            . _T('texte_inc_auth_2')
+            . '</a>'
+            . _T('texte_inc_auth_3')
+        );
+    }
+
+    return $raison;
 }
 
 /**
@@ -115,81 +115,81 @@ 
  * @return array|bool|string
  */
 function auth_mode() {
-	//
-	// Initialiser variables (eviter hacks par URL)
-	//
-	$GLOBALS['connect_login'] = '';
-	$id_auteur = null;
-	$GLOBALS['auth_can_disconnect'] = false;
-
-	//
-	// Recuperer les donnees d'identification
-	//
-	include_spip('inc/session');
-	// Session valide en cours ?
-	if (isset($_COOKIE['spip_session'])) {
-		$session = charger_fonction('session', 'inc');
-		if (
-			$id_auteur = $session()
-			or $id_auteur === 0 // reprise sur restauration
-		) {
-			$GLOBALS['auth_can_disconnect'] = true;
-			$GLOBALS['connect_login'] = session_get('login');
-		} else {
-			unset($_COOKIE['spip_session']);
-		}
-	}
-
-	// Essayer auth http si significatif
-	// (ignorer les login d'intranet independants de spip)
-	if (!$GLOBALS['ignore_auth_http']) {
-		if (
-			(isset($_SERVER['PHP_AUTH_USER']) and isset($_SERVER['PHP_AUTH_PW'])
-				and $r = lire_php_auth($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']))
-			or
-			// Si auth http differtente de basic, PHP_AUTH_PW
-			// est indisponible mais tentons quand meme pour
-			// autocreation via LDAP
-			(isset($_SERVER['REMOTE_USER'])
-				and $r = lire_php_auth($_SERVER['PHP_AUTH_USER'] = $_SERVER['REMOTE_USER'], ''))
-		) {
-			if (!$id_auteur) {
-				$_SERVER['PHP_AUTH_PW'] = '';
-				$GLOBALS['auth_can_disconnect'] = true;
-				$GLOBALS['visiteur_session'] = $r;
-				$GLOBALS['connect_login'] = session_get('login');
-				$id_auteur = $r['id_auteur'];
-			} else {
-				// cas de la session en plus de PHP_AUTH
-				/*				  if ($id_auteur != $r['id_auteur']){
+    //
+    // Initialiser variables (eviter hacks par URL)
+    //
+    $GLOBALS['connect_login'] = '';
+    $id_auteur = null;
+    $GLOBALS['auth_can_disconnect'] = false;
+
+    //
+    // Recuperer les donnees d'identification
+    //
+    include_spip('inc/session');
+    // Session valide en cours ?
+    if (isset($_COOKIE['spip_session'])) {
+        $session = charger_fonction('session', 'inc');
+        if (
+            $id_auteur = $session()
+            or $id_auteur === 0 // reprise sur restauration
+        ) {
+            $GLOBALS['auth_can_disconnect'] = true;
+            $GLOBALS['connect_login'] = session_get('login');
+        } else {
+            unset($_COOKIE['spip_session']);
+        }
+    }
+
+    // Essayer auth http si significatif
+    // (ignorer les login d'intranet independants de spip)
+    if (!$GLOBALS['ignore_auth_http']) {
+        if (
+            (isset($_SERVER['PHP_AUTH_USER']) and isset($_SERVER['PHP_AUTH_PW'])
+                and $r = lire_php_auth($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']))
+            or
+            // Si auth http differtente de basic, PHP_AUTH_PW
+            // est indisponible mais tentons quand meme pour
+            // autocreation via LDAP
+            (isset($_SERVER['REMOTE_USER'])
+                and $r = lire_php_auth($_SERVER['PHP_AUTH_USER'] = $_SERVER['REMOTE_USER'], ''))
+        ) {
+            if (!$id_auteur) {
+                $_SERVER['PHP_AUTH_PW'] = '';
+                $GLOBALS['auth_can_disconnect'] = true;
+                $GLOBALS['visiteur_session'] = $r;
+                $GLOBALS['connect_login'] = session_get('login');
+                $id_auteur = $r['id_auteur'];
+            } else {
+                // cas de la session en plus de PHP_AUTH
+                /*				  if ($id_auteur != $r['id_auteur']){
 					spip_log("vol de session $id_auteur" . join(', ', $r));
 				unset($_COOKIE['spip_session']);
 				$id_auteur = '';
 				} */
-			}
-		} else {
-			// Authentification .htaccess old style, car .htaccess semble
-			// souvent definir *aussi* PHP_AUTH_USER et PHP_AUTH_PW
-			if (isset($_SERVER['REMOTE_USER'])) {
-				$GLOBALS['connect_login'] = $_SERVER['REMOTE_USER'];
-			}
-		}
-	}
-
-	$where = (is_numeric($id_auteur)
-		/*AND $id_auteur>0*/ // reprise lors des restaurations
-	) ?
-		"id_auteur=$id_auteur" :
-		(!strlen($GLOBALS['connect_login']) ? '' : 'login=' . sql_quote($GLOBALS['connect_login'], '', 'text'));
-
-	if (!$where) {
-		return '';
-	}
-
-	// Trouver les autres infos dans la table auteurs.
-	// le champ 'quand' est utilise par l'agenda
-
-	return sql_fetsel('*, en_ligne AS quand', 'spip_auteurs', "$where AND statut!='5poubelle'");
+            }
+        } else {
+            // Authentification .htaccess old style, car .htaccess semble
+            // souvent definir *aussi* PHP_AUTH_USER et PHP_AUTH_PW
+            if (isset($_SERVER['REMOTE_USER'])) {
+                $GLOBALS['connect_login'] = $_SERVER['REMOTE_USER'];
+            }
+        }
+    }
+
+    $where = (is_numeric($id_auteur)
+        /*AND $id_auteur>0*/ // reprise lors des restaurations
+    ) ?
+        "id_auteur=$id_auteur" :
+        (!strlen($GLOBALS['connect_login']) ? '' : 'login=' . sql_quote($GLOBALS['connect_login'], '', 'text'));
+
+    if (!$where) {
+        return '';
+    }
+
+    // Trouver les autres infos dans la table auteurs.
+    // le champ 'quand' est utilise par l'agenda
+
+    return sql_fetsel('*, en_ligne AS quand', 'spip_auteurs', "$where AND statut!='5poubelle'");
 }
 
 /**
@@ -207,86 +207,86 @@ 
  */
 function auth_init_droits($row) {
 
-	include_spip('inc/autoriser');
-	if (!autoriser('loger', '', 0, $row)) {
-		return false;
-	}
-
-
-	if ($row['statut'] == 'nouveau') {
-		include_spip('action/inscrire_auteur');
-		$row = confirmer_statut_inscription($row);
-	}
-
-	$GLOBALS['connect_id_auteur'] = $row['id_auteur'];
-	$GLOBALS['connect_login'] = $row['login'];
-	$GLOBALS['connect_statut'] = $row['statut'];
-
-	$GLOBALS['visiteur_session'] = array_merge((array)$GLOBALS['visiteur_session'], $row);
-
-	// au cas ou : ne pas memoriser les champs sensibles
-	unset($GLOBALS['visiteur_session']['pass']);
-	unset($GLOBALS['visiteur_session']['htpass']);
-	unset($GLOBALS['visiteur_session']['alea_actuel']);
-	unset($GLOBALS['visiteur_session']['alea_futur']);
-	unset($GLOBALS['visiteur_session']['ldap_password']);
-
-	// creer la session au besoin
-	if (!isset($_COOKIE['spip_session'])) {
-		$session = charger_fonction('session', 'inc');
-		$spip_session = $session($row);
-	}
-
-	// reinjecter les preferences_auteur apres le reset de spip_session
-	// car utilisees au retour par auth_loger()
-	$r = @unserialize($row['prefs']);
-	$GLOBALS['visiteur_session']['prefs'] = ($r ?: []);
-	// si prefs pas definies, les definir par defaut
-	if (!isset($GLOBALS['visiteur_session']['prefs']['couleur'])) {
-		$GLOBALS['visiteur_session']['prefs']['couleur'] = 2;
-		$GLOBALS['visiteur_session']['prefs']['display'] = 2;
-		$GLOBALS['visiteur_session']['prefs']['display_navigation'] = 'navigation_avec_icones';
-		$GLOBALS['visiteur_session']['prefs']['display_outils'] = 'oui';
-	}
-
-	$GLOBALS['visiteur_session'] = pipeline(
-		'preparer_visiteur_session',
-		['args' => ['row' => $row],
-		'data' => $GLOBALS['visiteur_session']]
-	);
-
-	// Etablir les droits selon le codage attendu
-	// dans ecrire/index.php ecrire/prive.php
-
-	// Pas autorise a acceder a ecrire ? renvoyer le tableau
-	// A noter : le premier appel a autoriser() a le bon gout
-	// d'initialiser $GLOBALS['visiteur_session']['restreint'],
-	// qui ne figure pas dans le fichier de session
-
-	if (!autoriser('ecrire')) {
-		return $row;
-	}
-
-	// autoriser('ecrire') ne laisse passer que les Admin et les Redac
-
-	auth_trace($row);
-
-	// Administrateurs
-	if (in_array($GLOBALS['connect_statut'], explode(',', _STATUT_AUTEUR_RUBRIQUE))) {
-		if (
-			isset($GLOBALS['visiteur_session']['restreint'])
-			and is_array($GLOBALS['visiteur_session']['restreint'])
-		) {
-			$GLOBALS['connect_id_rubrique'] = $GLOBALS['visiteur_session']['restreint'];
-		}
-		if ($GLOBALS['connect_statut'] == '0minirezo') {
-			$GLOBALS['connect_toutes_rubriques'] = !$GLOBALS['connect_id_rubrique'];
-		}
-	}
-
-	// Pour les redacteurs, inc_version a fait l'initialisation minimale
-
-	return ''; // i.e. pas de pb.
+    include_spip('inc/autoriser');
+    if (!autoriser('loger', '', 0, $row)) {
+        return false;
+    }
+
+
+    if ($row['statut'] == 'nouveau') {
+        include_spip('action/inscrire_auteur');
+        $row = confirmer_statut_inscription($row);
+    }
+
+    $GLOBALS['connect_id_auteur'] = $row['id_auteur'];
+    $GLOBALS['connect_login'] = $row['login'];
+    $GLOBALS['connect_statut'] = $row['statut'];
+
+    $GLOBALS['visiteur_session'] = array_merge((array)$GLOBALS['visiteur_session'], $row);
+
+    // au cas ou : ne pas memoriser les champs sensibles
+    unset($GLOBALS['visiteur_session']['pass']);
+    unset($GLOBALS['visiteur_session']['htpass']);
+    unset($GLOBALS['visiteur_session']['alea_actuel']);
+    unset($GLOBALS['visiteur_session']['alea_futur']);
+    unset($GLOBALS['visiteur_session']['ldap_password']);
+
+    // creer la session au besoin
+    if (!isset($_COOKIE['spip_session'])) {
+        $session = charger_fonction('session', 'inc');
+        $spip_session = $session($row);
+    }
+
+    // reinjecter les preferences_auteur apres le reset de spip_session
+    // car utilisees au retour par auth_loger()
+    $r = @unserialize($row['prefs']);
+    $GLOBALS['visiteur_session']['prefs'] = ($r ?: []);
+    // si prefs pas definies, les definir par defaut
+    if (!isset($GLOBALS['visiteur_session']['prefs']['couleur'])) {
+        $GLOBALS['visiteur_session']['prefs']['couleur'] = 2;
+        $GLOBALS['visiteur_session']['prefs']['display'] = 2;
+        $GLOBALS['visiteur_session']['prefs']['display_navigation'] = 'navigation_avec_icones';
+        $GLOBALS['visiteur_session']['prefs']['display_outils'] = 'oui';
+    }
+
+    $GLOBALS['visiteur_session'] = pipeline(
+        'preparer_visiteur_session',
+        ['args' => ['row' => $row],
+        'data' => $GLOBALS['visiteur_session']]
+    );
+
+    // Etablir les droits selon le codage attendu
+    // dans ecrire/index.php ecrire/prive.php
+
+    // Pas autorise a acceder a ecrire ? renvoyer le tableau
+    // A noter : le premier appel a autoriser() a le bon gout
+    // d'initialiser $GLOBALS['visiteur_session']['restreint'],
+    // qui ne figure pas dans le fichier de session
+
+    if (!autoriser('ecrire')) {
+        return $row;
+    }
+
+    // autoriser('ecrire') ne laisse passer que les Admin et les Redac
+
+    auth_trace($row);
+
+    // Administrateurs
+    if (in_array($GLOBALS['connect_statut'], explode(',', _STATUT_AUTEUR_RUBRIQUE))) {
+        if (
+            isset($GLOBALS['visiteur_session']['restreint'])
+            and is_array($GLOBALS['visiteur_session']['restreint'])
+        ) {
+            $GLOBALS['connect_id_rubrique'] = $GLOBALS['visiteur_session']['restreint'];
+        }
+        if ($GLOBALS['connect_statut'] == '0minirezo') {
+            $GLOBALS['connect_toutes_rubriques'] = !$GLOBALS['connect_id_rubrique'];
+        }
+    }
+
+    // Pour les redacteurs, inc_version a fait l'initialisation minimale
+
+    return ''; // i.e. pas de pb.
 }
 
 /**
@@ -295,23 +295,23 @@ 
  * @return string
  */
 function auth_a_loger() {
-	$redirect = generer_url_public('login', 'url=' . rawurlencode(self('&', true)), '&');
-
-	// un echec au "bonjour" (login initial) quand le statut est
-	// inconnu signale sans doute un probleme de cookies
-	if (isset($_GET['bonjour'])) {
-		$redirect = parametre_url(
-			$redirect,
-			'var_erreur',
-			(!isset($GLOBALS['visiteur_session']['statut'])
-				? 'cookie'
-				: 'statut'
-			),
-			'&'
-		);
-	}
-
-	return $redirect;
+    $redirect = generer_url_public('login', 'url=' . rawurlencode(self('&', true)), '&');
+
+    // un echec au "bonjour" (login initial) quand le statut est
+    // inconnu signale sans doute un probleme de cookies
+    if (isset($_GET['bonjour'])) {
+        $redirect = parametre_url(
+            $redirect,
+            'var_erreur',
+            (!isset($GLOBALS['visiteur_session']['statut'])
+                ? 'cookie'
+                : 'statut'
+            ),
+            '&'
+        );
+    }
+
+    return $redirect;
 }
 
 /**
@@ -323,19 +323,19 @@ 
  * @param null|string $date
  */
 function auth_trace($row, $date = null) {
-	// Indiquer la connexion. A la minute pres ca suffit.
-	if (!is_numeric($connect_quand = $row['quand'] ?? '')) {
-		$connect_quand = strtotime($connect_quand);
-	}
+    // Indiquer la connexion. A la minute pres ca suffit.
+    if (!is_numeric($connect_quand = $row['quand'] ?? '')) {
+        $connect_quand = strtotime($connect_quand);
+    }
 
-	$date ??= date('Y-m-d H:i:s');
+    $date ??= date('Y-m-d H:i:s');
 
-	if (abs(strtotime($date) - $connect_quand) >= 60) {
-		sql_updateq('spip_auteurs', ['en_ligne' => $date], 'id_auteur=' . intval($row['id_auteur']));
-		$row['en_ligne'] = $date;
-	}
+    if (abs(strtotime($date) - $connect_quand) >= 60) {
+        sql_updateq('spip_auteurs', ['en_ligne' => $date], 'id_auteur=' . intval($row['id_auteur']));
+        $row['en_ligne'] = $date;
+    }
 
-	pipeline('trig_auth_trace', ['args' => ['row' => $row, 'date' => $date]]);
+    pipeline('trig_auth_trace', ['args' => ['row' => $row, 'date' => $date]]);
 }
 
 
@@ -361,28 +361,28 @@ 
  * @return mixed
  */
 function auth_administrer($fonction, $args, $defaut = false) {
-	$auth_methode = array_shift($args);
-	$auth_methode = $auth_methode ?: 'spip'; // valeur par defaut au cas ou
-	if (
-		$auth = charger_fonction($auth_methode, 'auth', true)
-		and function_exists($f = "auth_{$auth_methode}_$fonction")
-	) {
-		$res = call_user_func_array($f, $args);
-	} else {
-		$res = $defaut;
-	}
-	$res = pipeline(
-		'auth_administrer',
-		[
-			'args' => [
-				'fonction' => $fonction,
-				'methode' => $auth_methode,
-				'args' => $args
-			],
-			'data' => $res
-		]
-	);
-	return $res;
+    $auth_methode = array_shift($args);
+    $auth_methode = $auth_methode ?: 'spip'; // valeur par defaut au cas ou
+    if (
+        $auth = charger_fonction($auth_methode, 'auth', true)
+        and function_exists($f = "auth_{$auth_methode}_$fonction")
+    ) {
+        $res = call_user_func_array($f, $args);
+    } else {
+        $res = $defaut;
+    }
+    $res = pipeline(
+        'auth_administrer',
+        [
+            'args' => [
+                'fonction' => $fonction,
+                'methode' => $auth_methode,
+                'args' => $args
+            ],
+            'data' => $res
+        ]
+    );
+    return $res;
 }
 
 /**
@@ -392,11 +392,11 @@ 
  * @return array
  */
 function auth_formulaire_login($flux) {
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		$flux = auth_administrer('formulaire_login', [$methode, $flux], $flux);
-	}
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        $flux = auth_administrer('formulaire_login', [$methode, $flux], $flux);
+    }
 
-	return $flux;
+    return $flux;
 }
 
 
@@ -410,19 +410,19 @@ 
  * @return string/bool
  */
 function auth_retrouver_login($login, $serveur = '') {
-	if (!spip_connect($serveur)) {
-		include_spip('inc/minipres');
-		echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'));
-		exit;
-	}
-
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		if ($auteur = auth_administrer('retrouver_login', [$methode, $login, $serveur])) {
-			return $auteur;
-		}
-	}
-
-	return false;
+    if (!spip_connect($serveur)) {
+        include_spip('inc/minipres');
+        echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'));
+        exit;
+    }
+
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        if ($auteur = auth_administrer('retrouver_login', [$methode, $login, $serveur])) {
+            return $auteur;
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -437,52 +437,52 @@ 
  * @return array
  */
 function auth_informer_login($login, $serveur = '') {
-	if (
-		!$login
-		or !$login_base = auth_retrouver_login($login, $serveur)
-		or !$row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur)
-	) {
-		// generer de fausses infos, mais credibles, pour eviter une attaque
-		// https://core.spip.net/issues/1758 + https://core.spip.net/issues/3691
-		include_spip('inc/securiser_action');
-		$fauxalea1 = md5('fauxalea' . secret_du_site() . $login . floor(date('U') / 86400));
-		$fauxalea2 = md5('fauxalea' . secret_du_site() . $login . ceil(date('U') / 86400));
-
-		$row = [
-			'login' => $login,
-			'cnx' => '0',
-			'logo' => '',
-			'alea_actuel' => substr_replace($fauxalea1, '.', 24, 0),
-			'alea_futur' => substr_replace($fauxalea2, '.', 24, 0)
-		];
-
-		// permettre d'autoriser l'envoi de password non crypte lorsque
-		// l'auteur n'est pas (encore) declare dans SPIP, par exemple pour les cas
-		// de premiere authentification via SPIP a une autre application.
-		if (defined('_AUTORISER_AUTH_FAIBLE') and _AUTORISER_AUTH_FAIBLE) {
-			$row['alea_actuel'] = '';
-			$row['alea_futur'] = '';
-		}
-
-		return $row;
-	}
-
-	$prefs = @unserialize($row['prefs']);
-	$infos = [
-		'id_auteur' => $row['id_auteur'],
-		'login' => $row['login'],
-		'cnx' => (isset($prefs['cnx']) and $prefs['cnx'] === 'perma') ? '1' : '0',
-		'logo' => recuperer_fond('formulaires/inc-logo_auteur', $row),
-	];
-
-	// desactiver le hash md5 si pas auteur spip ?
-	if ($row['source'] !== 'spip') {
-		$row['alea_actuel'] = '';
-		$row['alea_futur'] = '';
-	}
-	verifier_visiteur();
-
-	return auth_administrer('informer_login', [$row['source'], $infos, $row, $serveur], $infos);
+    if (
+        !$login
+        or !$login_base = auth_retrouver_login($login, $serveur)
+        or !$row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login_base, $serveur, 'text'), '', '', '', '', $serveur)
+    ) {
+        // generer de fausses infos, mais credibles, pour eviter une attaque
+        // https://core.spip.net/issues/1758 + https://core.spip.net/issues/3691
+        include_spip('inc/securiser_action');
+        $fauxalea1 = md5('fauxalea' . secret_du_site() . $login . floor(date('U') / 86400));
+        $fauxalea2 = md5('fauxalea' . secret_du_site() . $login . ceil(date('U') / 86400));
+
+        $row = [
+            'login' => $login,
+            'cnx' => '0',
+            'logo' => '',
+            'alea_actuel' => substr_replace($fauxalea1, '.', 24, 0),
+            'alea_futur' => substr_replace($fauxalea2, '.', 24, 0)
+        ];
+
+        // permettre d'autoriser l'envoi de password non crypte lorsque
+        // l'auteur n'est pas (encore) declare dans SPIP, par exemple pour les cas
+        // de premiere authentification via SPIP a une autre application.
+        if (defined('_AUTORISER_AUTH_FAIBLE') and _AUTORISER_AUTH_FAIBLE) {
+            $row['alea_actuel'] = '';
+            $row['alea_futur'] = '';
+        }
+
+        return $row;
+    }
+
+    $prefs = @unserialize($row['prefs']);
+    $infos = [
+        'id_auteur' => $row['id_auteur'],
+        'login' => $row['login'],
+        'cnx' => (isset($prefs['cnx']) and $prefs['cnx'] === 'perma') ? '1' : '0',
+        'logo' => recuperer_fond('formulaires/inc-logo_auteur', $row),
+    ];
+
+    // desactiver le hash md5 si pas auteur spip ?
+    if ($row['source'] !== 'spip') {
+        $row['alea_actuel'] = '';
+        $row['alea_futur'] = '';
+    }
+    verifier_visiteur();
+
+    return auth_administrer('informer_login', [$row['source'], $infos, $row, $serveur], $infos);
 }
 
 
@@ -496,21 +496,21 @@ 
  * @return mixed
  */
 function auth_identifier_login($login, $password, $serveur = '') {
-	$erreur = '';
-	foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-		if ($auth = charger_fonction($methode, 'auth', true)) {
-			$auteur = $auth($login, $password, $serveur);
-			if (is_array($auteur) and count($auteur)) {
-				spip_log("connexion de $login par methode $methode");
-				$auteur['auth'] = $methode;
-				return $auteur;
-			} elseif (is_string($auteur)) {
-				$erreur .= "$auteur ";
-			}
-		}
-	}
-
-	return $erreur;
+    $erreur = '';
+    foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+        if ($auth = charger_fonction($methode, 'auth', true)) {
+            $auteur = $auth($login, $password, $serveur);
+            if (is_array($auteur) and count($auteur)) {
+                spip_log("connexion de $login par methode $methode");
+                $auteur['auth'] = $methode;
+                return $auteur;
+            } elseif (is_string($auteur)) {
+                $erreur .= "$auteur ";
+            }
+        }
+    }
+
+    return $erreur;
 }
 
 /**
@@ -524,8 +524,8 @@ 
  * @return string
  */
 function auth_url_retour_login($auth_methode, $login, $redirect = '', $serveur = '') {
-	$securiser_action = charger_fonction('securiser_action', 'inc');
-	return $securiser_action('auth', "$auth_methode/$login", $redirect, true);
+    $securiser_action = charger_fonction('securiser_action', 'inc');
+    return $securiser_action('auth', "$auth_methode/$login", $redirect, true);
 }
 
 /**
@@ -539,9 +539,9 @@ 
  * @return mixed
  */
 function auth_terminer_identifier_login($auth_methode, $login, $serveur = '') {
-	$args = func_get_args();
-	$auteur = auth_administrer('terminer_identifier_login', $args);
-	return $auteur;
+    $args = func_get_args();
+    $auteur = auth_administrer('terminer_identifier_login', $args);
+    return $auteur;
 }
 
 /**
@@ -551,29 +551,29 @@ 
  * @return bool
  */
 function auth_loger($auteur) {
-	if (!is_array($auteur) or !count($auteur)) {
-		return false;
-	}
-
-	// initialiser et poser le cookie de session
-	unset($_COOKIE['spip_session']);
-	if (auth_init_droits($auteur) === false) {
-		return false;
-	}
-
-	// initialiser les prefs
-	$p = $GLOBALS['visiteur_session']['prefs'];
-	$p['cnx'] = (isset($auteur['cookie']) and $auteur['cookie'] == 'oui') ? 'perma' : '';
-
-	sql_updateq(
-		'spip_auteurs',
-		['prefs' => serialize($p)],
-		'id_auteur=' . intval($auteur['id_auteur'])
-	);
-
-	//  bloquer ici le visiteur qui tente d'abuser de ses droits
-	verifier_visiteur();
-	return true;
+    if (!is_array($auteur) or !count($auteur)) {
+        return false;
+    }
+
+    // initialiser et poser le cookie de session
+    unset($_COOKIE['spip_session']);
+    if (auth_init_droits($auteur) === false) {
+        return false;
+    }
+
+    // initialiser les prefs
+    $p = $GLOBALS['visiteur_session']['prefs'];
+    $p['cnx'] = (isset($auteur['cookie']) and $auteur['cookie'] == 'oui') ? 'perma' : '';
+
+    sql_updateq(
+        'spip_auteurs',
+        ['prefs' => serialize($p)],
+        'id_auteur=' . intval($auteur['id_auteur'])
+    );
+
+    //  bloquer ici le visiteur qui tente d'abuser de ses droits
+    verifier_visiteur();
+    return true;
 }
 
 /**
@@ -583,8 +583,8 @@ 
  * return void
  **/
 function auth_deloger() {
-	$logout = charger_fonction('logout', 'action');
-	$logout();
+    $logout = charger_fonction('logout', 'action');
+    $logout();
 }
 
 /**
@@ -598,8 +598,8 @@ 
  * @return bool
  */
 function auth_autoriser_modifier_login($auth_methode, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('autoriser_modifier_login', $args);
+    $args = func_get_args();
+    return auth_administrer('autoriser_modifier_login', $args);
 }
 
 /**
@@ -614,8 +614,8 @@ 
  *  message d'erreur ou chaine vide si pas d'erreur
  */
 function auth_verifier_login($auth_methode, $new_login, $id_auteur = 0, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('verifier_login', $args, '');
+    $args = func_get_args();
+    return auth_administrer('verifier_login', $args, '');
 }
 
 /**
@@ -628,8 +628,8 @@ 
  * @return bool
  */
 function auth_modifier_login($auth_methode, $new_login, $id_auteur, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('modifier_login', $args);
+    $args = func_get_args();
+    return auth_administrer('modifier_login', $args);
 }
 
 /**
@@ -644,8 +644,8 @@ 
  *  succès ou échec
  */
 function auth_autoriser_modifier_pass($auth_methode, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('autoriser_modifier_pass', $args);
+    $args = func_get_args();
+    return auth_administrer('autoriser_modifier_pass', $args);
 }
 
 /**
@@ -661,8 +661,8 @@ 
  *  message d'erreur ou chaine vide si pas d'erreur
  */
 function auth_verifier_pass($auth_methode, $login, $new_pass, $id_auteur = 0, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('verifier_pass', $args, '');
+    $args = func_get_args();
+    return auth_administrer('verifier_pass', $args, '');
 }
 
 /**
@@ -678,8 +678,8 @@ 
  *  succes ou echec
  */
 function auth_modifier_pass($auth_methode, $login, $new_pass, $id_auteur, $serveur = '') {
-	$args = func_get_args();
-	return auth_administrer('modifier_pass', $args);
+    $args = func_get_args();
+    return auth_administrer('modifier_pass', $args);
 }
 
 /**
@@ -695,24 +695,24 @@ 
  * @return void
  */
 function auth_synchroniser_distant(
-	$auth_methode = true,
-	$id_auteur = 0,
-	$champs = [],
-	$options = [],
-	$serveur = ''
+    $auth_methode = true,
+    $id_auteur = 0,
+    $champs = [],
+    $options = [],
+    $serveur = ''
 ) {
-	$args = func_get_args();
-	if ($auth_methode === true or (isset($options['all']) and $options['all'] == true)) {
-		$options['all'] = true; // ajouter une option all=>true pour chaque auth
-		$args = [true, $id_auteur, $champs, $options, $serveur];
-		foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
-			array_shift($args);
-			array_unshift($args, $methode);
-			auth_administrer('synchroniser_distant', $args);
-		}
-	} else {
-		auth_administrer('synchroniser_distant', $args);
-	}
+    $args = func_get_args();
+    if ($auth_methode === true or (isset($options['all']) and $options['all'] == true)) {
+        $options['all'] = true; // ajouter une option all=>true pour chaque auth
+        $args = [true, $id_auteur, $champs, $options, $serveur];
+        foreach ($GLOBALS['liste_des_authentifications'] as $methode) {
+            array_shift($args);
+            array_unshift($args, $methode);
+            auth_administrer('synchroniser_distant', $args);
+        }
+    } else {
+        auth_administrer('synchroniser_distant', $args);
+    }
 }
 
 
@@ -725,44 +725,44 @@ 
  * @return array|bool
  */
 function lire_php_auth($login, $pw, $serveur = '') {
-	if (
-		!$login
-		or !$login = auth_retrouver_login($login, $serveur)
-	) {
-		return false;
-	}
-
-	$row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login, $serveur, 'text'), '', '', '', '', $serveur);
-
-	if (!$row) {
-		if (
-			spip_connect_ldap($serveur)
-			and $auth_ldap = charger_fonction('ldap', 'auth', true)
-		) {
-			return $auth_ldap($login, $pw, $serveur, true);
-		}
-
-		return false;
-	}
-	// su pas de source definie
-	// ou auth/xxx introuvable, utiliser 'spip'
-	if (
-		!$auth_methode = $row['source']
-		or !$auth = charger_fonction($auth_methode, 'auth', true)
-	) {
-		$auth = charger_fonction('spip', 'auth', true);
-	}
-
-	$auteur = '';
-	if ($auth) {
-		$auteur = $auth($login, $pw, $serveur, true);
-	}
-	// verifier que ce n'est pas un message d'erreur
-	if (is_array($auteur) and count($auteur)) {
-		return $auteur;
-	}
-
-	return false;
+    if (
+        !$login
+        or !$login = auth_retrouver_login($login, $serveur)
+    ) {
+        return false;
+    }
+
+    $row = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login, $serveur, 'text'), '', '', '', '', $serveur);
+
+    if (!$row) {
+        if (
+            spip_connect_ldap($serveur)
+            and $auth_ldap = charger_fonction('ldap', 'auth', true)
+        ) {
+            return $auth_ldap($login, $pw, $serveur, true);
+        }
+
+        return false;
+    }
+    // su pas de source definie
+    // ou auth/xxx introuvable, utiliser 'spip'
+    if (
+        !$auth_methode = $row['source']
+        or !$auth = charger_fonction($auth_methode, 'auth', true)
+    ) {
+        $auth = charger_fonction('spip', 'auth', true);
+    }
+
+    $auteur = '';
+    if ($auth) {
+        $auteur = $auth($login, $pw, $serveur, true);
+    }
+    // verifier que ce n'est pas un message d'erreur
+    if (is_array($auteur) and count($auteur)) {
+        return $auteur;
+    }
+
+    return false;
 }
 
 /**
@@ -778,21 +778,21 @@ 
  * @param string $lien
  */
 function ask_php_auth($pb, $raison, $retour = '', $url = '', $re = '', $lien = '') {
-	@Header('WWW-Authenticate: Basic realm="espace prive"');
-	@Header('HTTP/1.0 401 Unauthorized');
-	$corps = '';
-	$public = generer_url_public();
-	$ecrire = generer_url_ecrire();
-	$retour = $retour ?: _T('icone_retour');
-	$corps .= "<p>$raison</p>[<a href='$public'>$retour</a>] ";
-	if ($url) {
-		$corps .= "[<a href='" . generer_url_action('cookie', "essai_auth_http=oui&$url") . "'>$re</a>]";
-	}
-
-	if ($lien) {
-		$corps .= " [<a href='$ecrire'>" . _T('login_espace_prive') . '</a>]';
-	}
-	include_spip('inc/minipres');
-	echo minipres($pb, $corps);
-	exit;
+    @Header('WWW-Authenticate: Basic realm="espace prive"');
+    @Header('HTTP/1.0 401 Unauthorized');
+    $corps = '';
+    $public = generer_url_public();
+    $ecrire = generer_url_ecrire();
+    $retour = $retour ?: _T('icone_retour');
+    $corps .= "<p>$raison</p>[<a href='$public'>$retour</a>] ";
+    if ($url) {
+        $corps .= "[<a href='" . generer_url_action('cookie', "essai_auth_http=oui&$url") . "'>$re</a>]";
+    }
+
+    if ($lien) {
+        $corps .= " [<a href='$ecrire'>" . _T('login_espace_prive') . '</a>]';
+    }
+    include_spip('inc/minipres');
+    echo minipres($pb, $corps);
+    exit;
 }

ecrire/inc/filtres_images_lib_mini.php

Indentation +1351 added lines, -1351 removed lines

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

ecrire/inc/svg.php

Indentation +448 added lines, -448 removed lines

@@ -17,13 +17,13 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('IMG_SVG')) {
-	// complete 	IMG_BMP | IMG_GIF | IMG_JPG | IMG_PNG | IMG_WBMP | IMG_XPM | IMG_WEBP
-	define('IMG_SVG', 128);
-	define('IMAGETYPE_SVG', 19);
+    // complete 	IMG_BMP | IMG_GIF | IMG_JPG | IMG_PNG | IMG_WBMP | IMG_XPM | IMG_WEBP
+    define('IMG_SVG', 128);
+    define('IMAGETYPE_SVG', 19);
 }
 
 /**
@@ -39,39 +39,39 @@ 
  *   false si on a pas pu charger l'image
  */
 function svg_charger($fichier, $maxlen = null) {
-	if (strpos($fichier, 'data:image/svg+xml') === 0) {
-		$image = explode(';', $fichier, 2);
-		$image = end($image);
-		if (strpos($image, 'base64,') === 0) {
-			$image = base64_decode(substr($image, 7));
-		}
-		if (strpos($image, '<svg') !== false) {
-			return $image;
-		}
-		// encodage inconnu ou autre format d'image ?
-		return false;
-	}
-	// c'est peut etre deja une image svg ?
-	if (strpos($fichier, '<svg') !== false) {
-		return $fichier;
-	}
-	if (!file_exists($fichier)) {
-		$fichier  = supprimer_timestamp($fichier);
-		if (!file_exists($fichier)) {
-			return false;
-		}
-	}
-	if (is_null($maxlen)) {
-		$image = file_get_contents($fichier);
-	}
-	else {
-		$image = file_get_contents($fichier, false, null, 0, $maxlen);
-	}
-	// est-ce bien une image svg ?
-	if (strpos($image, '<svg') !== false) {
-		return $image;
-	}
-	return false;
+    if (strpos($fichier, 'data:image/svg+xml') === 0) {
+        $image = explode(';', $fichier, 2);
+        $image = end($image);
+        if (strpos($image, 'base64,') === 0) {
+            $image = base64_decode(substr($image, 7));
+        }
+        if (strpos($image, '<svg') !== false) {
+            return $image;
+        }
+        // encodage inconnu ou autre format d'image ?
+        return false;
+    }
+    // c'est peut etre deja une image svg ?
+    if (strpos($fichier, '<svg') !== false) {
+        return $fichier;
+    }
+    if (!file_exists($fichier)) {
+        $fichier  = supprimer_timestamp($fichier);
+        if (!file_exists($fichier)) {
+            return false;
+        }
+    }
+    if (is_null($maxlen)) {
+        $image = file_get_contents($fichier);
+    }
+    else {
+        $image = file_get_contents($fichier, false, null, 0, $maxlen);
+    }
+    // est-ce bien une image svg ?
+    if (strpos($image, '<svg') !== false) {
+        return $image;
+    }
+    return false;
 }
 
 /**
@@ -80,28 +80,28 @@ 
  * @return array|bool
  */
 function svg_lire_balise_svg($fichier) {
-	if (!$debut_fichier = svg_charger($fichier, 4096)) {
-		return false;
-	}
-
-	if (($ps = stripos($debut_fichier, '<svg')) !== false) {
-		$pe = stripos($debut_fichier, '>', $ps);
-		$balise_svg = substr($debut_fichier, $ps, $pe - $ps + 1);
-
-		if (preg_match_all(',([\w:\-]+)=,Uims', $balise_svg, $matches)) {
-			if (!function_exists('extraire_attribut')) {
-				include_spip('inc/filtres');
-			}
-			$attributs = [];
-			foreach ($matches[1] as $att) {
-				$attributs[$att] = extraire_attribut($balise_svg, $att);
-			}
-
-			return [$balise_svg, $attributs];
-		}
-	}
-
-	return false;
+    if (!$debut_fichier = svg_charger($fichier, 4096)) {
+        return false;
+    }
+
+    if (($ps = stripos($debut_fichier, '<svg')) !== false) {
+        $pe = stripos($debut_fichier, '>', $ps);
+        $balise_svg = substr($debut_fichier, $ps, $pe - $ps + 1);
+
+        if (preg_match_all(',([\w:\-]+)=,Uims', $balise_svg, $matches)) {
+            if (!function_exists('extraire_attribut')) {
+                include_spip('inc/filtres');
+            }
+            $attributs = [];
+            foreach ($matches[1] as $att) {
+                $attributs[$att] = extraire_attribut($balise_svg, $att);
+            }
+
+            return [$balise_svg, $attributs];
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -111,12 +111,12 @@ 
  */
 function svg_lire_attributs($img) {
 
-	if ($svg_infos = svg_lire_balise_svg($img)) {
-		[$balise_svg, $attributs] = $svg_infos;
-		return $attributs;
-	}
+    if ($svg_infos = svg_lire_balise_svg($img)) {
+        [$balise_svg, $attributs] = $svg_infos;
+        return $attributs;
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -126,38 +126,38 @@ 
  * @return bool|float|int
  */
 function svg_dimension_to_pixels($dimension, $precision = 2) {
-	if (preg_match(',^(-?\d+(\.\d+)?)([^\d]*),i', trim($dimension), $m)) {
-		switch (strtolower($m[2])) {
-			case '%':
-				// on ne sait pas faire :(
-				return false;
-				break;
-			case 'em':
-				return round($m[1] * 16, $precision); // 16px font-size par defaut
-				break;
-			case 'ex':
-				return round($m[1] * 16, $precision); // 16px font-size par defaut
-				break;
-			case 'pc':
-				return round($m[1] * 16, $precision); // 1/6 inch = 96px/6 in CSS
-				break;
-			case 'cm':
-				return round($m[1] * 96 / 2.54, $precision); // 96px / 2.54cm;
-				break;
-			case 'mm':
-				return round($m[1] * 96 / 25.4, $precision); // 96px / 25.4mm;
-				break;
-			case 'in':
-				return round($m[1] * 96, $precision); // 1 inch = 96px in CSS
-				break;
-			case 'px':
-			case 'pt':
-			default:
-				return $m[1];
-				break;
-		}
-	}
-	return false;
+    if (preg_match(',^(-?\d+(\.\d+)?)([^\d]*),i', trim($dimension), $m)) {
+        switch (strtolower($m[2])) {
+            case '%':
+                // on ne sait pas faire :(
+                return false;
+                break;
+            case 'em':
+                return round($m[1] * 16, $precision); // 16px font-size par defaut
+                break;
+            case 'ex':
+                return round($m[1] * 16, $precision); // 16px font-size par defaut
+                break;
+            case 'pc':
+                return round($m[1] * 16, $precision); // 1/6 inch = 96px/6 in CSS
+                break;
+            case 'cm':
+                return round($m[1] * 96 / 2.54, $precision); // 96px / 2.54cm;
+                break;
+            case 'mm':
+                return round($m[1] * 96 / 25.4, $precision); // 96px / 25.4mm;
+                break;
+            case 'in':
+                return round($m[1] * 96, $precision); // 1 inch = 96px in CSS
+                break;
+            case 'px':
+            case 'pt':
+            default:
+                return $m[1];
+                break;
+        }
+    }
+    return false;
 }
 
 /**
@@ -168,15 +168,15 @@ 
  * @return string
  */
 function svg_change_balise_svg($svg, $old_balise_svg, $attributs) {
-	$new_balise_svg = '<svg';
-	foreach ($attributs as $k => $v) {
-		$new_balise_svg .= " $k=\"" . entites_html($v) . '"';
-	}
-	$new_balise_svg .= '>';
-
-	$p = strpos($svg, $old_balise_svg);
-	$svg = substr_replace($svg, $new_balise_svg, $p, strlen($old_balise_svg));
-	return $svg;
+    $new_balise_svg = '<svg';
+    foreach ($attributs as $k => $v) {
+        $new_balise_svg .= " $k=\"" . entites_html($v) . '"';
+    }
+    $new_balise_svg .= '>';
+
+    $p = strpos($svg, $old_balise_svg);
+    $svg = substr_replace($svg, $new_balise_svg, $p, strlen($old_balise_svg));
+    return $svg;
 }
 
 /**
@@ -188,15 +188,15 @@ 
  */
 function svg_insert_shapes($svg, $shapes, $start = true) {
 
-	if ($start === false or $start === 'end') {
-		$svg = str_replace('</svg>', $shapes . '</svg>', $svg);
-	}
-	else {
-		$p = stripos($svg, '<svg');
-		$p = strpos($svg, '>', $p);
-		$svg = substr_replace($svg, $shapes, $p + 1, 0);
-	}
-	return $svg;
+    if ($start === false or $start === 'end') {
+        $svg = str_replace('</svg>', $shapes . '</svg>', $svg);
+    }
+    else {
+        $p = stripos($svg, '<svg');
+        $p = strpos($svg, '>', $p);
+        $svg = substr_replace($svg, $shapes, $p + 1, 0);
+    }
+    return $svg;
 }
 
 /**
@@ -209,13 +209,13 @@ 
  * @return string
  */
 function svg_clip_in_box($svg, $x, $y, $width, $height) {
-	$rect = "<rect x=\"$x\" y=\"$y\" width=\"$width\" height=\"$height\" />";
-	$id = 'clip-' . substr(md5($rect . strlen($svg)), 0, 8);
-	$clippath = "<clipPath id=\"$id\">$rect</clipPath>";
-	$g = "<g clip-path=\"url(#$id)\">";
-	$svg = svg_insert_shapes($svg, $clippath . $g);
-	$svg = svg_insert_shapes($svg, '</g>', false);
-	return $svg;
+    $rect = "<rect x=\"$x\" y=\"$y\" width=\"$width\" height=\"$height\" />";
+    $id = 'clip-' . substr(md5($rect . strlen($svg)), 0, 8);
+    $clippath = "<clipPath id=\"$id\">$rect</clipPath>";
+    $g = "<g clip-path=\"url(#$id)\">";
+    $svg = svg_insert_shapes($svg, $clippath . $g);
+    $svg = svg_insert_shapes($svg, '</g>', false);
+    return $svg;
 }
 
 /**
@@ -226,22 +226,22 @@ 
  * @return bool|string
  */
 function svg_redimensionner($img, $new_width, $new_height) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
-		if (!isset($attributs['viewBox'])) {
-			$attributs['viewBox'] = '0 0 ' . $attributs['width'] . ' ' . $attributs['height'];
-		}
-		$attributs['width'] = strval($new_width);
-		$attributs['height'] = strval($new_height);
-
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-		return $svg;
-	}
-
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
+        if (!isset($attributs['viewBox'])) {
+            $attributs['viewBox'] = '0 0 ' . $attributs['width'] . ' ' . $attributs['height'];
+        }
+        $attributs['width'] = strval($new_width);
+        $attributs['height'] = strval($new_height);
+
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+        return $svg;
+    }
+
+    return $img;
 }
 
 /**
@@ -250,15 +250,15 @@ 
  * @return string
  */
 function svg_couleur_to_hexa($couleur) {
-	if (strpos($couleur, 'rgb(') === 0) {
-		$c = explode(',', substr($couleur, 4));
-		$couleur = _couleur_dec_to_hex(intval($c[0]), intval($c[1]), intval($c[2]));
-	}
-	else {
-		$couleur = couleur_html_to_hex($couleur);
-	}
-	$couleur = '#' . ltrim($couleur, '#');
-	return $couleur;
+    if (strpos($couleur, 'rgb(') === 0) {
+        $c = explode(',', substr($couleur, 4));
+        $couleur = _couleur_dec_to_hex(intval($c[0]), intval($c[1]), intval($c[2]));
+    }
+    else {
+        $couleur = couleur_html_to_hex($couleur);
+    }
+    $couleur = '#' . ltrim($couleur, '#');
+    return $couleur;
 }
 
 /**
@@ -267,11 +267,11 @@ 
  * @return array
  */
 function svg_couleur_to_rgb($couleur) {
-	if (strpos($couleur, 'rgb(') === 0) {
-		$c = explode(',', substr($couleur, 4));
-		return ['red' => intval($c[0]),'green' => intval($c[1]),'blue' => intval($c[2])];
-	}
-	return _couleur_hex_to_dec($couleur);
+    if (strpos($couleur, 'rgb(') === 0) {
+        $c = explode(',', substr($couleur, 4));
+        return ['red' => intval($c[0]),'green' => intval($c[1]),'blue' => intval($c[2])];
+    }
+    return _couleur_hex_to_dec($couleur);
 }
 
 
@@ -281,70 +281,70 @@ 
  * @return array
  */
 function svg_getimagesize_from_attr($attributs) {
-	$width = 350; // default width
-	$height = 150; // default height
-
-	$viewBox = "0 0 $width $height";
-	if (isset($attributs['viewBox'])) {
-		$viewBox = $attributs['viewBox'];
-		$viewBox = preg_replace(',\s+,', ' ', $viewBox);
-	}
-	// et on la convertit en px
-	$viewBox = explode(' ', $viewBox);
-	$viewBox = array_map('svg_dimension_to_pixels', $viewBox);
-	if (!$viewBox[2]) {
-		$viewBox[2] = $width;
-	}
-	if (!$viewBox[3]) {
-		$viewBox[3] = $height;
-	}
-
-	$coeff = 1;
-	if (
-		isset($attributs['width'])
-		and $w = svg_dimension_to_pixels($attributs['width'])
-	) {
-		$width = $w;
-	}
-	else {
-		// si on recupere la taille de la viewbox mais si la viewbox est petite on met un multiplicateur pour la taille finale
-		$width = $viewBox[2];
-		if ($width < 1) {
-			$coeff = max($coeff, 1000);
-		}
-		elseif ($width < 10) {
-			$coeff = max($coeff, 100);
-		}
-		elseif ($width < 100) {
-			$coeff = max($coeff, 10);
-		}
-	}
-	if (
-		isset($attributs['height'])
-		and $h = svg_dimension_to_pixels($attributs['height'])
-	) {
-		$height = $h;
-	}
-	else {
-		$height = $viewBox[3];
-		if ($height < 1) {
-			$coeff = max($coeff, 1000);
-		}
-		elseif ($height < 10) {
-			$coeff = max($coeff, 100);
-		}
-		elseif ($height < 100) {
-			$coeff = max($coeff, 10);
-		}
-	}
-
-	// arrondir le width et height en pixel in fine
-	$width = round($coeff * $width);
-	$height = round($coeff * $height);
-
-	$viewBox = implode(' ', $viewBox);
-
-	return [$width, $height, $viewBox];
+    $width = 350; // default width
+    $height = 150; // default height
+
+    $viewBox = "0 0 $width $height";
+    if (isset($attributs['viewBox'])) {
+        $viewBox = $attributs['viewBox'];
+        $viewBox = preg_replace(',\s+,', ' ', $viewBox);
+    }
+    // et on la convertit en px
+    $viewBox = explode(' ', $viewBox);
+    $viewBox = array_map('svg_dimension_to_pixels', $viewBox);
+    if (!$viewBox[2]) {
+        $viewBox[2] = $width;
+    }
+    if (!$viewBox[3]) {
+        $viewBox[3] = $height;
+    }
+
+    $coeff = 1;
+    if (
+        isset($attributs['width'])
+        and $w = svg_dimension_to_pixels($attributs['width'])
+    ) {
+        $width = $w;
+    }
+    else {
+        // si on recupere la taille de la viewbox mais si la viewbox est petite on met un multiplicateur pour la taille finale
+        $width = $viewBox[2];
+        if ($width < 1) {
+            $coeff = max($coeff, 1000);
+        }
+        elseif ($width < 10) {
+            $coeff = max($coeff, 100);
+        }
+        elseif ($width < 100) {
+            $coeff = max($coeff, 10);
+        }
+    }
+    if (
+        isset($attributs['height'])
+        and $h = svg_dimension_to_pixels($attributs['height'])
+    ) {
+        $height = $h;
+    }
+    else {
+        $height = $viewBox[3];
+        if ($height < 1) {
+            $coeff = max($coeff, 1000);
+        }
+        elseif ($height < 10) {
+            $coeff = max($coeff, 100);
+        }
+        elseif ($height < 100) {
+            $coeff = max($coeff, 10);
+        }
+    }
+
+    // arrondir le width et height en pixel in fine
+    $width = round($coeff * $width);
+    $height = round($coeff * $height);
+
+    $viewBox = implode(' ', $viewBox);
+
+    return [$width, $height, $viewBox];
 }
 
 /**
@@ -360,25 +360,25 @@ 
  * @return string
  */
 function svg_force_viewBox_px($img, $force_width_and_height = false) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
 
-		[$width, $height, $viewBox] = svg_getimagesize_from_attr($attributs);
+        [$width, $height, $viewBox] = svg_getimagesize_from_attr($attributs);
 
-		if ($force_width_and_height) {
-			$attributs['width'] = $width;
-			$attributs['height'] = $height;
-		}
+        if ($force_width_and_height) {
+            $attributs['width'] = $width;
+            $attributs['height'] = $height;
+        }
 
-		$attributs['viewBox'] = $viewBox;
+        $attributs['viewBox'] = $viewBox;
 
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-		return $svg;
-	}
-	return $img;
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -387,12 +387,12 @@ 
  * @return array|mixed
  */
 function svg_extract_couleurs($img) {
-	if ($svg = svg_charger($img)) {
-		if (preg_match_all('/(#[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f])|(rgb\([\s\d]+,[\s\d]+,[\s\d]+\))|(#[0-9a-f][0-9a-f][0-9a-f])/imS', $svg, $matches)) {
-			return $matches[0];
-		}
-	}
-	return [];
+    if ($svg = svg_charger($img)) {
+        if (preg_match_all('/(#[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f])|(rgb\([\s\d]+,[\s\d]+,[\s\d]+\))|(#[0-9a-f][0-9a-f][0-9a-f])/imS', $svg, $matches)) {
+            return $matches[0];
+        }
+    }
+    return [];
 }
 
 /**
@@ -403,58 +403,58 @@ 
  * @return bool|string
  */
 function svg_recadrer($img, $new_width, $new_height, $offset_width, $offset_height, $background_color = '') {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
-		$viewBox = explode(' ', $attributs['viewBox']);
-
-		$viewport_w = $new_width;
-		$viewport_h = $new_height;
-		$viewport_ox = $offset_width;
-		$viewport_oy = $offset_height;
-
-		// si on a un width/height qui rescale, il faut rescaler
-		if (
-			isset($attributs['width'])
-			and $w = svg_dimension_to_pixels($attributs['width'])
-			and isset($attributs['height'])
-			and $h = svg_dimension_to_pixels($attributs['height'])
-		) {
-			$xscale = $viewBox[2] / $w;
-			$viewport_w = round($viewport_w * $xscale, 2);
-			$viewport_ox = round($viewport_ox * $xscale, 2);
-			$yscale = $viewBox[3] / $h;
-			$viewport_h = round($viewport_h * $yscale, 2);
-			$viewport_oy = round($viewport_oy * $yscale, 2);
-		}
-
-		if ($viewport_w > $viewBox[2] or $viewport_h > $viewBox[3]) {
-			$svg = svg_clip_in_box($svg, $viewBox[0], $viewBox[1], $viewBox[2], $viewBox[3]);
-		}
-
-		// maintenant on redefinit la viewBox
-		$viewBox[0] += $viewport_ox;
-		$viewBox[1] += $viewport_oy;
-		$viewBox[2] = $viewport_w;
-		$viewBox[3] = $viewport_h;
-
-		$attributs['viewBox'] = implode(' ', $viewBox);
-		$attributs['width'] = strval($new_width);
-		$attributs['height'] = strval($new_height);
-
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-
-		// ajouter un background
-		if ($background_color and $background_color !== 'transparent') {
-			$svg = svg_ajouter_background($svg, $background_color);
-		}
-
-		return $svg;
-	}
-
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
+        $viewBox = explode(' ', $attributs['viewBox']);
+
+        $viewport_w = $new_width;
+        $viewport_h = $new_height;
+        $viewport_ox = $offset_width;
+        $viewport_oy = $offset_height;
+
+        // si on a un width/height qui rescale, il faut rescaler
+        if (
+            isset($attributs['width'])
+            and $w = svg_dimension_to_pixels($attributs['width'])
+            and isset($attributs['height'])
+            and $h = svg_dimension_to_pixels($attributs['height'])
+        ) {
+            $xscale = $viewBox[2] / $w;
+            $viewport_w = round($viewport_w * $xscale, 2);
+            $viewport_ox = round($viewport_ox * $xscale, 2);
+            $yscale = $viewBox[3] / $h;
+            $viewport_h = round($viewport_h * $yscale, 2);
+            $viewport_oy = round($viewport_oy * $yscale, 2);
+        }
+
+        if ($viewport_w > $viewBox[2] or $viewport_h > $viewBox[3]) {
+            $svg = svg_clip_in_box($svg, $viewBox[0], $viewBox[1], $viewBox[2], $viewBox[3]);
+        }
+
+        // maintenant on redefinit la viewBox
+        $viewBox[0] += $viewport_ox;
+        $viewBox[1] += $viewport_oy;
+        $viewBox[2] = $viewport_w;
+        $viewBox[3] = $viewport_h;
+
+        $attributs['viewBox'] = implode(' ', $viewBox);
+        $attributs['width'] = strval($new_width);
+        $attributs['height'] = strval($new_height);
+
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+
+        // ajouter un background
+        if ($background_color and $background_color !== 'transparent') {
+            $svg = svg_ajouter_background($svg, $background_color);
+        }
+
+        return $svg;
+    }
+
+    return $img;
 }
 
 /**
@@ -464,26 +464,26 @@ 
  * @return bool|string
  */
 function svg_ajouter_background($img, $background_color) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($background_color and $background_color !== 'transparent') {
-			[$balise_svg, $attributs] = $svg_infos;
-
-			$background_color = svg_couleur_to_hexa($background_color);
-			if (isset($attributs['viewBox'])) {
-				$viewBox = explode(' ', $attributs['viewBox']);
-				$rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\"/>";
-			}
-			else {
-				$rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
-			}
-			$svg = svg_insert_shapes($svg, $rect);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($background_color and $background_color !== 'transparent') {
+            [$balise_svg, $attributs] = $svg_infos;
+
+            $background_color = svg_couleur_to_hexa($background_color);
+            if (isset($attributs['viewBox'])) {
+                $viewBox = explode(' ', $attributs['viewBox']);
+                $rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\"/>";
+            }
+            else {
+                $rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
+            }
+            $svg = svg_insert_shapes($svg, $rect);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 
@@ -494,26 +494,26 @@ 
  * @return bool|string
  */
 function svg_ajouter_voile($img, $background_color, $opacity) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($background_color and $background_color !== 'transparent') {
-			[$balise_svg, $attributs] = $svg_infos;
-
-			$background_color = svg_couleur_to_hexa($background_color);
-			if (isset($attributs['viewBox'])) {
-				$viewBox = explode(' ', $attributs['viewBox']);
-				$rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\" opacity=\"$opacity\"/>";
-			}
-			else {
-				$rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
-			}
-			$svg = svg_insert_shapes($svg, $rect, false);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($background_color and $background_color !== 'transparent') {
+            [$balise_svg, $attributs] = $svg_infos;
+
+            $background_color = svg_couleur_to_hexa($background_color);
+            if (isset($attributs['viewBox'])) {
+                $viewBox = explode(' ', $attributs['viewBox']);
+                $rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\" opacity=\"$opacity\"/>";
+            }
+            else {
+                $rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
+            }
+            $svg = svg_insert_shapes($svg, $rect, false);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 
@@ -524,27 +524,27 @@ 
  * @return bool|string
  */
 function svg_transformer($img, $attributs) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($attributs) {
-			[$balise_svg, ] = $svg_infos;
-			$g = '<g';
-			foreach ($attributs as $k => $v) {
-				if (strlen($v)) {
-					$g .= " $k=\"" . attribut_html($v) . '"';
-				}
-			}
-			if (strlen($g) > 2) {
-				$g .= '>';
-				$svg = svg_insert_shapes($svg, $g);
-				$svg = svg_insert_shapes($svg, '</g>', false);
-			}
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($attributs) {
+            [$balise_svg, ] = $svg_infos;
+            $g = '<g';
+            foreach ($attributs as $k => $v) {
+                if (strlen($v)) {
+                    $g .= " $k=\"" . attribut_html($v) . '"';
+                }
+            }
+            if (strlen($g) > 2) {
+                $g .= '>';
+                $svg = svg_insert_shapes($svg, $g);
+                $svg = svg_insert_shapes($svg, '</g>', false);
+            }
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -555,21 +555,21 @@ 
  * @return bool|string
  */
 function svg_apply_filter($img, $filter_def) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($filter_def) {
-			[$balise_svg, ] = $svg_infos;
-			$filter_id = 'filter-' . substr(md5($filter_def . strlen($svg)), 0, 8);
-			$filter = "<defs><filter id=\"$filter_id\">$filter_def</filter></defs>";
-			$g = "<g filter=\"url(#$filter_id)\">";
-			$svg = svg_insert_shapes($svg, $filter . $g);
-			$svg = svg_insert_shapes($svg, '</g>', false);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($filter_def) {
+            [$balise_svg, ] = $svg_infos;
+            $filter_id = 'filter-' . substr(md5($filter_def . strlen($svg)), 0, 8);
+            $filter = "<defs><filter id=\"$filter_id\">$filter_def</filter></defs>";
+            $g = "<g filter=\"url(#$filter_id)\">";
+            $svg = svg_insert_shapes($svg, $filter . $g);
+            $svg = svg_insert_shapes($svg, '</g>', false);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -579,8 +579,8 @@ 
  * @return string
  */
 function svg_filter_blur($img, $blur_width) {
-	$blur_width = intval($blur_width);
-	return svg_apply_filter($img, "<feGaussianBlur stdDeviation=\"$blur_width\"/>");
+    $blur_width = intval($blur_width);
+    return svg_apply_filter($img, "<feGaussianBlur stdDeviation=\"$blur_width\"/>");
 }
 
 /**
@@ -590,10 +590,10 @@ 
  * @return bool|string
  */
 function svg_filter_grayscale($img, $intensity) {
-	$value = round(1.0 - $intensity, 2);
-	//$filter = "<feColorMatrix type=\"matrix\" values=\"0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0 0 0 1 0\"/>";
-	$filter = "<feColorMatrix type=\"saturate\" values=\"$value\"/>";
-	return svg_apply_filter($img, $filter);
+    $value = round(1.0 - $intensity, 2);
+    //$filter = "<feColorMatrix type=\"matrix\" values=\"0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0 0 0 1 0\"/>";
+    $filter = "<feColorMatrix type=\"saturate\" values=\"$value\"/>";
+    return svg_apply_filter($img, $filter);
 }
 
 /**
@@ -603,8 +603,8 @@ 
  * @return bool|string
  */
 function svg_filter_sepia($img, $intensity) {
-	$filter = '<feColorMatrix type="matrix" values="0.30 0.30 0.30 0.0 0 0.25 0.25 0.25 0.0 0 0.20 0.20 0.20 0.0 0 0.00 0.00 0.00 1 0"/>';
-	return svg_apply_filter($img, $filter);
+    $filter = '<feColorMatrix type="matrix" values="0.30 0.30 0.30 0.0 0 0.25 0.25 0.25 0.0 0 0.20 0.20 0.20 0.0 0 0.00 0.00 0.00 1 0"/>';
+    return svg_apply_filter($img, $filter);
 }
 
 /**
@@ -614,31 +614,31 @@ 
  * @return bool|string
  */
 function svg_flip($img, $HorV) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $atts] = $svg_infos;
-		$viewBox = explode(' ', $atts['viewBox']);
-
-		if (!in_array($HorV, ['h', 'H'])) {
-			$transform = 'scale(-1,1)';
-
-			$x = intval($viewBox[0]) + intval($viewBox[2] / 2);
-			$mx = -$x;
-			$transform = "translate($x, 0) $transform translate($mx, 0)";
-		}
-		else {
-			$transform = 'scale(1,-1)';
-
-			$y = intval($viewBox[1]) + intval($viewBox[3] / 2);
-			$my = -$y;
-			$transform = "translate(0, $y) $transform translate(0, $my)";
-		}
-		$svg = svg_transformer($svg, ['transform' => $transform]);
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $atts] = $svg_infos;
+        $viewBox = explode(' ', $atts['viewBox']);
+
+        if (!in_array($HorV, ['h', 'H'])) {
+            $transform = 'scale(-1,1)';
+
+            $x = intval($viewBox[0]) + intval($viewBox[2] / 2);
+            $mx = -$x;
+            $transform = "translate($x, 0) $transform translate($mx, 0)";
+        }
+        else {
+            $transform = 'scale(1,-1)';
+
+            $y = intval($viewBox[1]) + intval($viewBox[3] / 2);
+            $my = -$y;
+            $transform = "translate(0, $y) $transform translate(0, $my)";
+        }
+        $svg = svg_transformer($svg, ['transform' => $transform]);
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -652,20 +652,20 @@ 
  * @return bool|string
  */
 function svg_rotate($img, $angle, $center_x, $center_y) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $atts] = $svg_infos;
-		$viewBox = explode(' ', $atts['viewBox']);
-
-		$center_x = round($viewBox[0] + $center_x * $viewBox[2]);
-		$center_y = round($viewBox[1] + $center_y * $viewBox[3]);
-		$svg = svg_transformer($svg, ['transform' => "rotate($angle $center_x $center_y)"]);
-
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $atts] = $svg_infos;
+        $viewBox = explode(' ', $atts['viewBox']);
+
+        $center_x = round($viewBox[0] + $center_x * $viewBox[2]);
+        $center_y = round($viewBox[1] + $center_y * $viewBox[3]);
+        $svg = svg_transformer($svg, ['transform' => "rotate($angle $center_x $center_y)"]);
+
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -677,41 +677,41 @@ 
  * @return bool|mixed|string
  */
 function svg_filtrer_couleurs($img, $callback_filter) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $colors = svg_extract_couleurs($svg)
-	) {
-		$colors = array_unique($colors);
-
-		$short = [];
-		$long = [];
-		while (count($colors)) {
-			$c = array_shift($colors);
-			if (strlen($c) == 4) {
-				$short[] = $c;
-			}
-			else {
-				$long[] = $c;
-			}
-		}
-
-		$colors = [...$long, ...$short];
-		$new_colors = [];
-		$colors = array_flip($colors);
-		foreach ($colors as $c => $k) {
-			$colors[$c] = "@@@COLOR$$k$@@@";
-		}
-
-
-		foreach ($colors as $original => $replace) {
-			$new = svg_couleur_to_hexa($original);
-			$new_colors[$replace] = $callback_filter($new);
-		}
-
-		$svg = str_replace(array_keys($colors), array_values($colors), $svg);
-		$svg = str_replace(array_keys($new_colors), array_values($new_colors), $svg);
-
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $colors = svg_extract_couleurs($svg)
+    ) {
+        $colors = array_unique($colors);
+
+        $short = [];
+        $long = [];
+        while (count($colors)) {
+            $c = array_shift($colors);
+            if (strlen($c) == 4) {
+                $short[] = $c;
+            }
+            else {
+                $long[] = $c;
+            }
+        }
+
+        $colors = [...$long, ...$short];
+        $new_colors = [];
+        $colors = array_flip($colors);
+        foreach ($colors as $c => $k) {
+            $colors[$c] = "@@@COLOR$$k$@@@";
+        }
+
+
+        foreach ($colors as $original => $replace) {
+            $new = svg_couleur_to_hexa($original);
+            $new_colors[$replace] = $callback_filter($new);
+        }
+
+        $svg = str_replace(array_keys($colors), array_values($colors), $svg);
+        $svg = str_replace(array_keys($new_colors), array_values($new_colors), $svg);
+
+        return $svg;
+    }
+    return $img;
 }

ecrire/inc/informer.php

Indentation +57 added lines, -57 removed lines

@@ -11,74 +11,74 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 # Les information d'une rubrique selectionnee dans le mini navigateur
 
 // https://code.spip.net/@inc_informer_dist
 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 = ' . intval($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 = ' . intval($id));
+        if ($row) {
+            $titre = typo($row['titre']);
+            $descriptif = propre($row['descriptif']);
+        } else {
+            $titre = _T('info_racine_site');
+        }
+    }
 
-	$res = '';
-	if ($type == 'rubrique' and $GLOBALS['spip_display'] != 1 and isset($GLOBALS['meta']['image_process'])) {
-		if ($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' and $GLOBALS['spip_display'] != 1 and isset($GLOBALS['meta']['image_process'])) {
+        if ($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 = intval($id);
+    $rac = spip_htmlentities($rac, ENT_QUOTES);
+    $do = spip_htmlentities($do, ENT_QUOTES);
+    $id = intval($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;', textebrut($titre))
-		),
-		"\n\r",
-		'  '
-	);
+    $titre = strtr(
+        str_replace(
+            "'",
+            '&#8217;',
+            str_replace('"', '&#34;', 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 ? '' : $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 ? '' : $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>';
 }

ecrire/inc/rechercher.php

Indentation +317 added lines, -317 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 defined('_RECHERCHE_LOCK_KEY') || define('_RECHERCHE_LOCK_KEY', 'fulltext');
@@ -35,22 +35,22 @@ 
  * @return array Couples (type d'objet => Couples (champ => score))
  */
 function liste_des_champs() {
-	static $liste = null;
-	if (is_null($liste)) {
-		$liste = [];
-		// recuperer les tables_objets_sql declarees
-		include_spip('base/objets');
-		$tables_objets = lister_tables_objets_sql();
-		foreach ($tables_objets as $t => $infos) {
-			if ($infos['rechercher_champs']) {
-				$liste[$infos['type']] = $infos['rechercher_champs'];
-			}
-		}
-		// puis passer dans le pipeline
-		$liste = pipeline('rechercher_liste_des_champs', $liste);
-	}
-
-	return $liste;
+    static $liste = null;
+    if (is_null($liste)) {
+        $liste = [];
+        // recuperer les tables_objets_sql declarees
+        include_spip('base/objets');
+        $tables_objets = lister_tables_objets_sql();
+        foreach ($tables_objets as $t => $infos) {
+            if ($infos['rechercher_champs']) {
+                $liste[$infos['type']] = $infos['rechercher_champs'];
+            }
+        }
+        // puis passer dans le pipeline
+        $liste = pipeline('rechercher_liste_des_champs', $liste);
+    }
+
+    return $liste;
 }
 
 
@@ -58,176 +58,176 @@ 
 // en ne regardant que le titre ou le nom
 // https://code.spip.net/@liste_des_jointures
 function liste_des_jointures() {
-	static $liste = null;
-	if (is_null($liste)) {
-		$liste = [];
-		// recuperer les tables_objets_sql declarees
-		include_spip('base/objets');
-		$tables_objets = lister_tables_objets_sql();
-		foreach ($tables_objets as $t => $infos) {
-			if ($infos['rechercher_jointures']) {
-				$liste[$infos['type']] = $infos['rechercher_jointures'];
-			}
-		}
-		// puis passer dans le pipeline
-		$liste = pipeline('rechercher_liste_des_jointures', $liste);
-	}
-
-	return $liste;
+    static $liste = null;
+    if (is_null($liste)) {
+        $liste = [];
+        // recuperer les tables_objets_sql declarees
+        include_spip('base/objets');
+        $tables_objets = lister_tables_objets_sql();
+        foreach ($tables_objets as $t => $infos) {
+            if ($infos['rechercher_jointures']) {
+                $liste[$infos['type']] = $infos['rechercher_jointures'];
+            }
+        }
+        // puis passer dans le pipeline
+        $liste = pipeline('rechercher_liste_des_jointures', $liste);
+    }
+
+    return $liste;
 }
 
 function expression_recherche($recherche, $options) {
-	// ne calculer qu'une seule fois l'expression par hit
-	// (meme si utilisee dans plusieurs boucles)
-	static $expression = [];
-	$key = serialize([$recherche, $options['preg_flags']]);
-	if (isset($expression[$key])) {
-		return $expression[$key];
-	}
-
-	$u = $GLOBALS['meta']['pcre_u'];
-	if ($u and strpos($options['preg_flags'], (string) $u) === false) {
-		$options['preg_flags'] .= $u;
-	}
-	include_spip('inc/charsets');
-	$recherche = trim($recherche);
-
-	// retirer les + de +truc et les * de truc*
-	$recherche = preg_replace(',(^|\s)\+(\w),Uims', '$1$2', $recherche);
-	$recherche = preg_replace(',(\w)\*($|\s),Uims', '$1$2', $recherche);
-
-	$is_preg = false;
-	if (substr($recherche, 0, 1) == '/' and substr($recherche, -1, 1) == '/' and strlen($recherche) > 2) {
-		// c'est une preg
-		$recherche_trans = translitteration($recherche);
-		$preg = $recherche_trans . $options['preg_flags'];
-		$is_preg = true;
-	} else {
-		// s'il y a plusieurs mots il faut les chercher tous : oblige REGEXP,
-		// sauf ceux de moins de 4 lettres (on supprime ainsi 'le', 'les', 'un',
-		// 'une', 'des' ...)
-
-		// attention : plusieurs mots entre guillemets sont a rechercher tels quels
-		$recherche_trans = $recherche_mod = $recherche_org = $recherche;
-
-		// les expressions entre " " sont un mot a chercher tel quel
-		// -> on remplace les espaces par un \x1 et on enleve les guillemets
-		if (preg_match(',["][^"]+["],Uims', $recherche_mod, $matches)) {
-			foreach ($matches as $match) {
-				$word = preg_replace(',\s+,Uims', "\x1", $match);
-				$word = trim($word, '"');
-				$recherche_mod = str_replace($match, $word, $recherche_mod);
-			}
-		}
-
-		if (preg_match(',\s+,' . $u, $recherche_mod)) {
-			$is_preg = true;
-
-			$recherche_inter = '|';
-			$recherche_mots = explode(' ', $recherche_mod);
-			$min_long = defined('_RECHERCHE_MIN_CAR') ? _RECHERCHE_MIN_CAR : 4;
-			$petits_mots = true;
-			foreach ($recherche_mots as $mot) {
-				if (strlen($mot) >= $min_long) {
-					// echapper les caracteres de regexp qui sont eventuellement dans la recherche
-					$recherche_inter .= preg_quote($mot) . ' ';
-					$petits_mots = false;
-				}
-			}
-			$recherche_inter = str_replace("\x1", '\s', $recherche_inter);
-
-			// mais on cherche quand même l'expression complète, même si elle
-			// comporte des mots de moins de quatre lettres
-			$recherche = trim(preg_replace(',\s+,' . $u, '|', $recherche_inter), '|');
-			if (!$recherche or $petits_mots) {
-				$recherche = preg_quote($recherche_org);
-			}
-			$recherche_trans = translitteration($recherche);
-		}
-
-		$preg = '/' . str_replace('/', '\\/', $recherche_trans) . '/' . $options['preg_flags'];
-	}
-
-	// Si la chaine est inactive, on va utiliser LIKE pour aller plus vite
-	// ou si l'expression reguliere est invalide
-	if (
-		!$is_preg
-		or (@preg_match($preg, '') === false)
-	) {
-		$methode = 'LIKE';
-		$u = $GLOBALS['meta']['pcre_u'];
-
-		// echapper les % et _
-		$q = str_replace(['%', '_'], ['\%', '\_'], trim($recherche));
-
-		// eviter les parentheses et autres caractères qui interferent avec pcre par la suite (dans le preg_match_all) s'il y a des reponses
-		$recherche = preg_quote($recherche, '/');
-		$recherche_trans = translitteration($recherche);
-		$recherche_mod = $recherche_trans;
-
-		// les expressions entre " " sont un mot a chercher tel quel
-		// -> on remplace les espaces par un _ et on enleve les guillemets
-		// corriger le like dans le $q
-		if (preg_match(',["][^"]+["],Uims', $q, $matches)) {
-			foreach ($matches as $match) {
-				$word = preg_replace(',\s+,Uims', '_', $match);
-				$word = trim($word, '"');
-				$q = str_replace($match, $word, $q);
-			}
-		}
-		// corriger la regexp
-		if (preg_match(',["][^"]+["],Uims', $recherche_mod, $matches)) {
-			foreach ($matches as $match) {
-				$word = preg_replace(',\s+,Uims', '[\s]', $match);
-				$word = trim($word, '"');
-				$recherche_mod = str_replace($match, $word, $recherche_mod);
-			}
-		}
-		$q = sql_quote(
-			'%'
-			. preg_replace(',\s+,' . $u, '%', $q)
-			. '%'
-		);
-
-		$preg = '/' . preg_replace(',\s+,' . $u, '.+', trim($recherche_mod)) . '/' . $options['preg_flags'];
-	} else {
-		$methode = 'REGEXP';
-		$q = sql_quote(trim($recherche, '/'));
-	}
-
-	// tous les caracteres transliterables de $q sont remplaces par un joker
-	// permet de matcher en SQL meme si on est sensible aux accents (SQLite)
-	$q_t = $q;
-	for ($i = 0; $i < spip_strlen($q); $i++) {
-		$char = spip_substr($q, $i, 1);
-		if (
-			!is_ascii($char)
-			and $char_t = translitteration($char)
-			and $char_t !== $char
-		) {
-			// on utilise ..?.? car le char utf peut etre encode sur 1, 2 ou 3 bytes
-			// mais c'est un pis aller cf #4354
-			$q_t = str_replace($char, $is_preg ? '..?.?' : '_', $q_t);
-		}
-	}
-
-	$q = $q_t;
-
-	// fix : SQLite 3 est sensible aux accents, on jokerise les caracteres
-	// les plus frequents qui peuvent etre accentues
-	// (oui c'est tres dicustable...)
-	if (
-		isset($GLOBALS['connexions'][$options['serveur'] ?: 0]['type'])
-		and strncmp($GLOBALS['connexions'][$options['serveur'] ?: 0]['type'], 'sqlite', 6) == 0
-	) {
-		$q_t = strtr($q, 'aeuioc', $is_preg ? '......' : '______');
-		// si il reste au moins un char significatif...
-		if (preg_match(",[^'%_.],", $q_t)) {
-			$q = $q_t;
-		}
-	}
-
-	return $expression[$key] = [$methode, $q, $preg];
+    // ne calculer qu'une seule fois l'expression par hit
+    // (meme si utilisee dans plusieurs boucles)
+    static $expression = [];
+    $key = serialize([$recherche, $options['preg_flags']]);
+    if (isset($expression[$key])) {
+        return $expression[$key];
+    }
+
+    $u = $GLOBALS['meta']['pcre_u'];
+    if ($u and strpos($options['preg_flags'], (string) $u) === false) {
+        $options['preg_flags'] .= $u;
+    }
+    include_spip('inc/charsets');
+    $recherche = trim($recherche);
+
+    // retirer les + de +truc et les * de truc*
+    $recherche = preg_replace(',(^|\s)\+(\w),Uims', '$1$2', $recherche);
+    $recherche = preg_replace(',(\w)\*($|\s),Uims', '$1$2', $recherche);
+
+    $is_preg = false;
+    if (substr($recherche, 0, 1) == '/' and substr($recherche, -1, 1) == '/' and strlen($recherche) > 2) {
+        // c'est une preg
+        $recherche_trans = translitteration($recherche);
+        $preg = $recherche_trans . $options['preg_flags'];
+        $is_preg = true;
+    } else {
+        // s'il y a plusieurs mots il faut les chercher tous : oblige REGEXP,
+        // sauf ceux de moins de 4 lettres (on supprime ainsi 'le', 'les', 'un',
+        // 'une', 'des' ...)
+
+        // attention : plusieurs mots entre guillemets sont a rechercher tels quels
+        $recherche_trans = $recherche_mod = $recherche_org = $recherche;
+
+        // les expressions entre " " sont un mot a chercher tel quel
+        // -> on remplace les espaces par un \x1 et on enleve les guillemets
+        if (preg_match(',["][^"]+["],Uims', $recherche_mod, $matches)) {
+            foreach ($matches as $match) {
+                $word = preg_replace(',\s+,Uims', "\x1", $match);
+                $word = trim($word, '"');
+                $recherche_mod = str_replace($match, $word, $recherche_mod);
+            }
+        }
+
+        if (preg_match(',\s+,' . $u, $recherche_mod)) {
+            $is_preg = true;
+
+            $recherche_inter = '|';
+            $recherche_mots = explode(' ', $recherche_mod);
+            $min_long = defined('_RECHERCHE_MIN_CAR') ? _RECHERCHE_MIN_CAR : 4;
+            $petits_mots = true;
+            foreach ($recherche_mots as $mot) {
+                if (strlen($mot) >= $min_long) {
+                    // echapper les caracteres de regexp qui sont eventuellement dans la recherche
+                    $recherche_inter .= preg_quote($mot) . ' ';
+                    $petits_mots = false;
+                }
+            }
+            $recherche_inter = str_replace("\x1", '\s', $recherche_inter);
+
+            // mais on cherche quand même l'expression complète, même si elle
+            // comporte des mots de moins de quatre lettres
+            $recherche = trim(preg_replace(',\s+,' . $u, '|', $recherche_inter), '|');
+            if (!$recherche or $petits_mots) {
+                $recherche = preg_quote($recherche_org);
+            }
+            $recherche_trans = translitteration($recherche);
+        }
+
+        $preg = '/' . str_replace('/', '\\/', $recherche_trans) . '/' . $options['preg_flags'];
+    }
+
+    // Si la chaine est inactive, on va utiliser LIKE pour aller plus vite
+    // ou si l'expression reguliere est invalide
+    if (
+        !$is_preg
+        or (@preg_match($preg, '') === false)
+    ) {
+        $methode = 'LIKE';
+        $u = $GLOBALS['meta']['pcre_u'];
+
+        // echapper les % et _
+        $q = str_replace(['%', '_'], ['\%', '\_'], trim($recherche));
+
+        // eviter les parentheses et autres caractères qui interferent avec pcre par la suite (dans le preg_match_all) s'il y a des reponses
+        $recherche = preg_quote($recherche, '/');
+        $recherche_trans = translitteration($recherche);
+        $recherche_mod = $recherche_trans;
+
+        // les expressions entre " " sont un mot a chercher tel quel
+        // -> on remplace les espaces par un _ et on enleve les guillemets
+        // corriger le like dans le $q
+        if (preg_match(',["][^"]+["],Uims', $q, $matches)) {
+            foreach ($matches as $match) {
+                $word = preg_replace(',\s+,Uims', '_', $match);
+                $word = trim($word, '"');
+                $q = str_replace($match, $word, $q);
+            }
+        }
+        // corriger la regexp
+        if (preg_match(',["][^"]+["],Uims', $recherche_mod, $matches)) {
+            foreach ($matches as $match) {
+                $word = preg_replace(',\s+,Uims', '[\s]', $match);
+                $word = trim($word, '"');
+                $recherche_mod = str_replace($match, $word, $recherche_mod);
+            }
+        }
+        $q = sql_quote(
+            '%'
+            . preg_replace(',\s+,' . $u, '%', $q)
+            . '%'
+        );
+
+        $preg = '/' . preg_replace(',\s+,' . $u, '.+', trim($recherche_mod)) . '/' . $options['preg_flags'];
+    } else {
+        $methode = 'REGEXP';
+        $q = sql_quote(trim($recherche, '/'));
+    }
+
+    // tous les caracteres transliterables de $q sont remplaces par un joker
+    // permet de matcher en SQL meme si on est sensible aux accents (SQLite)
+    $q_t = $q;
+    for ($i = 0; $i < spip_strlen($q); $i++) {
+        $char = spip_substr($q, $i, 1);
+        if (
+            !is_ascii($char)
+            and $char_t = translitteration($char)
+            and $char_t !== $char
+        ) {
+            // on utilise ..?.? car le char utf peut etre encode sur 1, 2 ou 3 bytes
+            // mais c'est un pis aller cf #4354
+            $q_t = str_replace($char, $is_preg ? '..?.?' : '_', $q_t);
+        }
+    }
+
+    $q = $q_t;
+
+    // fix : SQLite 3 est sensible aux accents, on jokerise les caracteres
+    // les plus frequents qui peuvent etre accentues
+    // (oui c'est tres dicustable...)
+    if (
+        isset($GLOBALS['connexions'][$options['serveur'] ?: 0]['type'])
+        and strncmp($GLOBALS['connexions'][$options['serveur'] ?: 0]['type'], 'sqlite', 6) == 0
+    ) {
+        $q_t = strtr($q, 'aeuioc', $is_preg ? '......' : '______');
+        // si il reste au moins un char significatif...
+        if (preg_match(",[^'%_.],", $q_t)) {
+            $q = $q_t;
+        }
+    }
+
+    return $expression[$key] = [$methode, $q, $preg];
 }
 
 
@@ -254,143 +254,143 @@ 
  * @return array
  */
 function recherche_en_base($recherche = '', $tables = null, $options = [], $serveur = '') {
-	include_spip('base/abstract_sql');
-
-	if (!is_array($tables)) {
-		$liste = liste_des_champs();
-
-		if (
-			is_string($tables)
-			and $tables != ''
-		) {
-			$toutes = [];
-			foreach (explode(',', $tables) as $t) {
-				$t = trim($t);
-				if (isset($liste[$t])) {
-					$toutes[$t] = $liste[$t];
-				}
-			}
-			$tables = $toutes;
-			unset($toutes);
-		} else {
-			$tables = $liste;
-		}
-	}
-
-	if (!strlen($recherche) or !count($tables)) {
-		return [];
-	}
-
-	include_spip('inc/autoriser');
-
-	// options par defaut
-	$options = array_merge(
-		[
-		'preg_flags' => 'UimsS',
-		'toutvoir' => false,
-		'champs' => false,
-		'score' => false,
-		'matches' => false,
-		'jointures' => false,
-		'serveur' => $serveur
-		],
-		$options
-	);
-
-	$results = [];
-
-	// Utiliser l'iterateur (DATA:recherche)
-	// pour recuperer les couples (id_objet, score)
-	// Le resultat est au format {
-	//      id1 = { 'score' => x, attrs => { } },
-	//      id2 = { 'score' => x, attrs => { } },
-	// }
-
-	include_spip('inc/recherche_to_array');
-
-	foreach ($tables as $table => $champs) {
-		# lock via memoization, si dispo
-		if (function_exists('cache_lock')) {
-			cache_lock($lock = _RECHERCHE_LOCK_KEY . ' ' . $table . ' ' . $recherche);
-		}
-
-		spip_timer('rech');
-
-		# TODO : ici plutot charger un iterateur via l'API iterateurs
-		$to_array = charger_fonction('recherche_to_array', 'inc');
-		$results[$table] = $to_array(
-			$recherche,
-			array_merge($options, ['table' => $table, 'champs' => $champs])
-		);
-		##var_dump($results[$table]);
-
-
-		spip_log(
-			"recherche $table ($recherche) : " . (is_countable($results[$table]) ? count($results[$table]) : 0) . ' resultats ' . spip_timer('rech'),
-			'recherche'
-		);
-
-		if (isset($lock)) {
-			cache_unlock($lock);
-		}
-	}
-
-	return $results;
+    include_spip('base/abstract_sql');
+
+    if (!is_array($tables)) {
+        $liste = liste_des_champs();
+
+        if (
+            is_string($tables)
+            and $tables != ''
+        ) {
+            $toutes = [];
+            foreach (explode(',', $tables) as $t) {
+                $t = trim($t);
+                if (isset($liste[$t])) {
+                    $toutes[$t] = $liste[$t];
+                }
+            }
+            $tables = $toutes;
+            unset($toutes);
+        } else {
+            $tables = $liste;
+        }
+    }
+
+    if (!strlen($recherche) or !count($tables)) {
+        return [];
+    }
+
+    include_spip('inc/autoriser');
+
+    // options par defaut
+    $options = array_merge(
+        [
+        'preg_flags' => 'UimsS',
+        'toutvoir' => false,
+        'champs' => false,
+        'score' => false,
+        'matches' => false,
+        'jointures' => false,
+        'serveur' => $serveur
+        ],
+        $options
+    );
+
+    $results = [];
+
+    // Utiliser l'iterateur (DATA:recherche)
+    // pour recuperer les couples (id_objet, score)
+    // Le resultat est au format {
+    //      id1 = { 'score' => x, attrs => { } },
+    //      id2 = { 'score' => x, attrs => { } },
+    // }
+
+    include_spip('inc/recherche_to_array');
+
+    foreach ($tables as $table => $champs) {
+        # lock via memoization, si dispo
+        if (function_exists('cache_lock')) {
+            cache_lock($lock = _RECHERCHE_LOCK_KEY . ' ' . $table . ' ' . $recherche);
+        }
+
+        spip_timer('rech');
+
+        # TODO : ici plutot charger un iterateur via l'API iterateurs
+        $to_array = charger_fonction('recherche_to_array', 'inc');
+        $results[$table] = $to_array(
+            $recherche,
+            array_merge($options, ['table' => $table, 'champs' => $champs])
+        );
+        ##var_dump($results[$table]);
+
+
+        spip_log(
+            "recherche $table ($recherche) : " . (is_countable($results[$table]) ? count($results[$table]) : 0) . ' resultats ' . spip_timer('rech'),
+            'recherche'
+        );
+
+        if (isset($lock)) {
+            cache_unlock($lock);
+        }
+    }
+
+    return $results;
 }
 
 
 // Effectue une recherche sur toutes les tables de la base de donnees
 // https://code.spip.net/@remplace_en_base
 function remplace_en_base($recherche = '', $remplace = null, $tables = null, $options = []) {
-	include_spip('inc/modifier');
-
-	// options par defaut
-	$options = array_merge(
-		[
-		'preg_flags' => 'UimsS',
-		'toutmodifier' => false
-		],
-		$options
-	);
-	$options['champs'] = true;
-
-
-	if (!is_array($tables)) {
-		$tables = liste_des_champs();
-	}
-
-	$results = recherche_en_base($recherche, $tables, $options);
-
-	$preg = '/' . str_replace('/', '\\/', $recherche) . '/' . $options['preg_flags'];
-
-	foreach ($results as $table => $r) {
-		$_id_table = id_table_objet($table);
-		foreach ($r as $id => $x) {
-			if (
-				$options['toutmodifier']
-				or autoriser('modifier', $table, $id)
-			) {
-				$modifs = [];
-				foreach ($x['champs'] as $key => $val) {
-					if ($key == $_id_table) {
-						continue;
-					}
-					$repl = preg_replace($preg, $remplace, $val);
-					if ($repl <> $val) {
-						$modifs[$key] = $repl;
-					}
-				}
-				if ($modifs) {
-					objet_modifier_champs(
-						$table,
-						$id,
-						[
-							'champs' => array_keys($modifs),
-						],
-						$modifs
-					);
-				}
-			}
-		}
-	}
+    include_spip('inc/modifier');
+
+    // options par defaut
+    $options = array_merge(
+        [
+        'preg_flags' => 'UimsS',
+        'toutmodifier' => false
+        ],
+        $options
+    );
+    $options['champs'] = true;
+
+
+    if (!is_array($tables)) {
+        $tables = liste_des_champs();
+    }
+
+    $results = recherche_en_base($recherche, $tables, $options);
+
+    $preg = '/' . str_replace('/', '\\/', $recherche) . '/' . $options['preg_flags'];
+
+    foreach ($results as $table => $r) {
+        $_id_table = id_table_objet($table);
+        foreach ($r as $id => $x) {
+            if (
+                $options['toutmodifier']
+                or autoriser('modifier', $table, $id)
+            ) {
+                $modifs = [];
+                foreach ($x['champs'] as $key => $val) {
+                    if ($key == $_id_table) {
+                        continue;
+                    }
+                    $repl = preg_replace($preg, $remplace, $val);
+                    if ($repl <> $val) {
+                        $modifs[$key] = $repl;
+                    }
+                }
+                if ($modifs) {
+                    objet_modifier_champs(
+                        $table,
+                        $id,
+                        [
+                            'champs' => array_keys($modifs),
+                        ],
+                        $modifs
+                    );
+                }
+            }
+        }
+    }
 }