spip / SPIP

ecrire/iterateur/condition.php

Indentation +6 added lines, -6 removed lines

@@ -19,7 +19,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('iterateur/data');
@@ -37,10 +37,10 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_CONDITION_dist($b) {
-	$b->iterateur = 'CONDITION'; # designe la classe d'iterateur
-	$b->show = [
-		'field' => []
-	];
+    $b->iterateur = 'CONDITION'; # designe la classe d'iterateur
+    $b->show = [
+        'field' => []
+    ];
 
-	return $b;
+    return $b;
 }

ecrire/iterateur/pour.php

Indentation +9 added lines, -9 removed lines

@@ -19,7 +19,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -38,13 +38,13 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_POUR_dist($b) {
-	$b->iterateur = 'DATA'; # designe la classe d'iterateur
-	$b->show = [
-		'field' => [
-			'cle' => 'STRING',
-			'valeur' => 'STRING',
-		]
-	];
+    $b->iterateur = 'DATA'; # designe la classe d'iterateur
+    $b->show = [
+        'field' => [
+            'cle' => 'STRING',
+            'valeur' => 'STRING',
+        ]
+    ];
 
-	return $b;
+    return $b;
 }

ecrire/iterateur/php.php

Indentation +14 added lines, -14 removed lines

@@ -20,7 +20,7 @@ 
 
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -38,17 +38,17 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_php_dist($b, $iteratorName) {
-	$b->iterateur = $iteratorName; # designe la classe d'iterateur
-	$b->show = [
-		'field' => [
-			'cle' => 'STRING',
-			'valeur' => 'STRING',
-		]
-	];
-
-	foreach (get_class_methods($iteratorName) as $method) {
-		$b->show['field'][strtolower($method)] = 'METHOD';
-	}
-
-	return $b;
+    $b->iterateur = $iteratorName; # designe la classe d'iterateur
+    $b->show = [
+        'field' => [
+            'cle' => 'STRING',
+            'valeur' => 'STRING',
+        ]
+    ];
+
+    foreach (get_class_methods($iteratorName) as $method) {
+        $b->show['field'][strtolower($method)] = 'METHOD';
+    }
+
+    return $b;
 }

ecrire/inc/pipelines.php

Indentation +129 added lines, -129 removed lines

@@ -16,10 +16,10 @@ 
  * @package SPIP\Core\Pipelines
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 if (test_espace_prive()) {
-	include_spip('inc/pipelines_ecrire');
+    include_spip('inc/pipelines_ecrire');
 }
 
 
@@ -45,28 +45,28 @@ 
  * @return string          Contenu qui sera inséré dans le head HTML
  **/
 function f_jQuery($texte) {
-	$x = '';
-	$jquery_plugins = pipeline(
-		'jquery_plugins',
-		[
-			'javascript/jquery.js',
-			'javascript/jquery.form.js',
-			'javascript/jquery.autosave.js',
-			'javascript/jquery.placeholder-label.js',
-			'javascript/ajaxCallback.js',
-			'javascript/js.cookie.js',
-		]
-	);
-	foreach (array_unique($jquery_plugins) as $script) {
-		if ($script = find_in_path(supprimer_timestamp($script))) {
-			$script = timestamp($script);
-			$x .= "\n<script src=\"$script\" type=\"text/javascript\"></script>\n";
-		}
-	}
+    $x = '';
+    $jquery_plugins = pipeline(
+        'jquery_plugins',
+        [
+            'javascript/jquery.js',
+            'javascript/jquery.form.js',
+            'javascript/jquery.autosave.js',
+            'javascript/jquery.placeholder-label.js',
+            'javascript/ajaxCallback.js',
+            'javascript/js.cookie.js',
+        ]
+    );
+    foreach (array_unique($jquery_plugins) as $script) {
+        if ($script = find_in_path(supprimer_timestamp($script))) {
+            $script = timestamp($script);
+            $x .= "\n<script src=\"$script\" type=\"text/javascript\"></script>\n";
+        }
+    }
 
-	$texte = $x . $texte;
+    $texte = $x . $texte;
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -85,28 +85,28 @@ 
  * @return string         Contenu de la page envoyée au navigateur
  **/
 function f_surligne($texte) {
-	if (!$GLOBALS['html']) {
-		return $texte;
-	}
-	$rech = _request('var_recherche');
-	if (
-		!$rech
-		and (!defined('_SURLIGNE_RECHERCHE_REFERERS')
-			or !_SURLIGNE_RECHERCHE_REFERERS
-			or !isset($_SERVER['HTTP_REFERER']))
-	) {
-		return $texte;
-	}
-	include_spip('inc/surligne');
+    if (!$GLOBALS['html']) {
+        return $texte;
+    }
+    $rech = _request('var_recherche');
+    if (
+        !$rech
+        and (!defined('_SURLIGNE_RECHERCHE_REFERERS')
+            or !_SURLIGNE_RECHERCHE_REFERERS
+            or !isset($_SERVER['HTTP_REFERER']))
+    ) {
+        return $texte;
+    }
+    include_spip('inc/surligne');
 
-	if (isset($_SERVER['HTTP_REFERER'])) {
-		$_SERVER['HTTP_REFERER'] = preg_replace(',[^\w\,/#&;:-]+,', ' ', $_SERVER['HTTP_REFERER']);
-	}
-	if ($rech) {
-		$rech = preg_replace(',[^\w\,/#&;:-]+,', ' ', $rech);
-	}
+    if (isset($_SERVER['HTTP_REFERER'])) {
+        $_SERVER['HTTP_REFERER'] = preg_replace(',[^\w\,/#&;:-]+,', ' ', $_SERVER['HTTP_REFERER']);
+    }
+    if ($rech) {
+        $rech = preg_replace(',[^\w\,/#&;:-]+,', ' ', $rech);
+    }
 
-	return surligner_mots($texte, $rech);
+    return surligner_mots($texte, $rech);
 }
 
 /**
@@ -123,33 +123,33 @@ 
  * @return string         Contenu de la page envoyée au navigateur
  **/
 function f_tidy($texte) {
-	/**
-	 * Indentation à faire ?
-	 *
-	 * - true : actif.
-	 * - false par défaut.
-	 */
+    /**
+     * Indentation à faire ?
+     *
+     * - true : actif.
+     * - false par défaut.
+     */
 
-	if (
-		$GLOBALS['xhtml'] # tidy demande
-		and $GLOBALS['html'] # verifie que la page avait l'entete text/html
-		and strlen($texte)
-		and !headers_sent()
-	) {
-		# Compatibilite ascendante
-		if (!is_string($GLOBALS['xhtml'])) {
-			$GLOBALS['xhtml'] = 'tidy';
-		}
+    if (
+        $GLOBALS['xhtml'] # tidy demande
+        and $GLOBALS['html'] # verifie que la page avait l'entete text/html
+        and strlen($texte)
+        and !headers_sent()
+    ) {
+        # Compatibilite ascendante
+        if (!is_string($GLOBALS['xhtml'])) {
+            $GLOBALS['xhtml'] = 'tidy';
+        }
 
-		if (!$f = charger_fonction($GLOBALS['xhtml'], 'inc', true)) {
-			spip_log("tidy absent, l'indenteur SPIP le remplace");
-			$f = charger_fonction('sax', 'xml');
-		}
+        if (!$f = charger_fonction($GLOBALS['xhtml'], 'inc', true)) {
+            spip_log("tidy absent, l'indenteur SPIP le remplace");
+            $f = charger_fonction('sax', 'xml');
+        }
 
-		return $f($texte);
-	}
+        return $f($texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -168,21 +168,21 @@ 
  * @return string         Contenu de la page envoyée au navigateur
  **/
 function f_insert_head($texte) {
-	if (!$GLOBALS['html']) {
-		return $texte;
-	}
-	include_spip('public/admin'); // pour strripos
+    if (!$GLOBALS['html']) {
+        return $texte;
+    }
+    include_spip('public/admin'); // pour strripos
 
-	($pos = stripos($texte, '</head>'))
-	|| ($pos = stripos($texte, '<body>'))
-	|| ($pos = 0);
+    ($pos = stripos($texte, '</head>'))
+    || ($pos = stripos($texte, '<body>'))
+    || ($pos = 0);
 
-	if (!str_contains(substr($texte, 0, $pos), '<!-- insert_head -->')) {
-		$insert = "\n" . pipeline('insert_head', '<!-- f_insert_head -->') . "\n";
-		$texte = substr_replace($texte, $insert, $pos, 0);
-	}
+    if (!str_contains(substr($texte, 0, $pos), '<!-- insert_head -->')) {
+        $insert = "\n" . pipeline('insert_head', '<!-- f_insert_head -->') . "\n";
+        $texte = substr_replace($texte, $insert, $pos, 0);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -198,34 +198,34 @@ 
  * @return string         Contenu de la page envoyée au navigateur
  **/
 function f_admin($texte) {
-	if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and $GLOBALS['html']) {
-		include_spip('inc/filtres'); // pour http_img_pack
-		$x = "<div class='spip-previsu' "
-			. http_style_background('preview-32.png', '', 32)
-			. '>'
-			. _T('previsualisation')
-			. '</div>';
-		if (!$pos = stripos($texte, '</body>')) {
-			$pos = strlen($texte);
-		}
-		$texte = substr_replace($texte, $x, $pos, 0);
-		// pas de preview en fenetre enfant
-		$x = "<script type='text/javascript'>const frameEl = window.frameElement;if (frameEl) {frameEl.sandbox='sandbox';window.location.href='" . addslashes($GLOBALS['meta']['adresse_site']) . "';}</script>";
-		if (!$pos = stripos($texte, '<head') or !$pos = strpos($texte, '>', $pos)) {
-			$pos = -1;
-		}
-		$texte = substr_replace($texte, $x, $pos + 1, 0);
-	}
+    if (defined('_VAR_PREVIEW') and _VAR_PREVIEW and $GLOBALS['html']) {
+        include_spip('inc/filtres'); // pour http_img_pack
+        $x = "<div class='spip-previsu' "
+            . http_style_background('preview-32.png', '', 32)
+            . '>'
+            . _T('previsualisation')
+            . '</div>';
+        if (!$pos = stripos($texte, '</body>')) {
+            $pos = strlen($texte);
+        }
+        $texte = substr_replace($texte, $x, $pos, 0);
+        // pas de preview en fenetre enfant
+        $x = "<script type='text/javascript'>const frameEl = window.frameElement;if (frameEl) {frameEl.sandbox='sandbox';window.location.href='" . addslashes($GLOBALS['meta']['adresse_site']) . "';}</script>";
+        if (!$pos = stripos($texte, '<head') or !$pos = strpos($texte, '>', $pos)) {
+            $pos = -1;
+        }
+        $texte = substr_replace($texte, $x, $pos + 1, 0);
+    }
 
-	if (isset($GLOBALS['affiche_boutons_admin']) and $GLOBALS['affiche_boutons_admin']) {
-		include_spip('public/admin');
-		$texte = affiche_boutons_admin($texte);
-	}
-	if (_request('var_mode') == 'noajax') {
-		$texte = preg_replace(',(class=[\'"][^\'"]*)ajax([^\'"]*[\'"]),Uims', "\\1\\2", $texte);
-	}
+    if (isset($GLOBALS['affiche_boutons_admin']) and $GLOBALS['affiche_boutons_admin']) {
+        include_spip('public/admin');
+        $texte = affiche_boutons_admin($texte);
+    }
+    if (_request('var_mode') == 'noajax') {
+        $texte = preg_replace(',(class=[\'"][^\'"]*)ajax([^\'"]*[\'"]),Uims', "\\1\\2", $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -243,11 +243,11 @@ 
  * @return array $flux  Description et contenu de l'inclusion
  **/
 function f_recuperer_fond($flux) {
-	if (!test_espace_prive()) {
-		return $flux;
-	}
+    if (!test_espace_prive()) {
+        return $flux;
+    }
 
-	return f_afficher_blocs_ecrire($flux);
+    return f_afficher_blocs_ecrire($flux);
 }
 
 /**
@@ -261,30 +261,30 @@ 
  * @return string         Contenu de la page envoyée au navigateur
  */
 function f_queue($texte) {
-	// eviter une inclusion si rien a faire
-	if (
-		_request('action') == 'cron'
-		or queue_sleep_time_to_next_job() > 0
-		or defined('_DEBUG_BLOCK_QUEUE')
-	) {
-		return $texte;
-	}
+    // eviter une inclusion si rien a faire
+    if (
+        _request('action') == 'cron'
+        or queue_sleep_time_to_next_job() > 0
+        or defined('_DEBUG_BLOCK_QUEUE')
+    ) {
+        return $texte;
+    }
 
-	include_spip('inc/queue');
-	$code = queue_affichage_cron();
+    include_spip('inc/queue');
+    $code = queue_affichage_cron();
 
-	// si rien a afficher
-	// ou si on est pas dans une page html, on ne sait rien faire de mieux
-	if (!$code or !isset($GLOBALS['html']) or !$GLOBALS['html']) {
-		return $texte;
-	}
+    // si rien a afficher
+    // ou si on est pas dans une page html, on ne sait rien faire de mieux
+    if (!$code or !isset($GLOBALS['html']) or !$GLOBALS['html']) {
+        return $texte;
+    }
 
-	// inserer avant le </body> fermant si on peut, a la fin de la page sinon
-	if (($p = strpos($texte, '</body>')) !== false) {
-		$texte = substr($texte, 0, $p) . $code . substr($texte, $p);
-	} else {
-		$texte .= $code;
-	}
+    // inserer avant le </body> fermant si on peut, a la fin de la page sinon
+    if (($p = strpos($texte, '</body>')) !== false) {
+        $texte = substr($texte, 0, $p) . $code . substr($texte, $p);
+    } else {
+        $texte .= $code;
+    }
 
-	return $texte;
+    return $texte;
 }

Spacing +4 added lines, -4 removed lines

@@ -64,7 +64,7 @@ 
 		}
 	}
 
-	$texte = $x . $texte;
+	$texte = $x.$texte;
 
 	return $texte;
 }
@@ -178,7 +178,7 @@ 
 	|| ($pos = 0);
 
 	if (!str_contains(substr($texte, 0, $pos), '<!-- insert_head -->')) {
-		$insert = "\n" . pipeline('insert_head', '<!-- f_insert_head -->') . "\n";
+		$insert = "\n".pipeline('insert_head', '<!-- f_insert_head -->')."\n";
 		$texte = substr_replace($texte, $insert, $pos, 0);
 	}
 
@@ -210,7 +210,7 @@ 
 		}
 		$texte = substr_replace($texte, $x, $pos, 0);
 		// pas de preview en fenetre enfant
-		$x = "<script type='text/javascript'>const frameEl = window.frameElement;if (frameEl) {frameEl.sandbox='sandbox';window.location.href='" . addslashes($GLOBALS['meta']['adresse_site']) . "';}</script>";
+		$x = "<script type='text/javascript'>const frameEl = window.frameElement;if (frameEl) {frameEl.sandbox='sandbox';window.location.href='".addslashes($GLOBALS['meta']['adresse_site'])."';}</script>";
 		if (!$pos = stripos($texte, '<head') or !$pos = strpos($texte, '>', $pos)) {
 			$pos = -1;
 		}
@@ -281,7 +281,7 @@ 
 
 	// inserer avant le </body> fermant si on peut, a la fin de la page sinon
 	if (($p = strpos($texte, '</body>')) !== false) {
-		$texte = substr($texte, 0, $p) . $code . substr($texte, $p);
+		$texte = substr($texte, 0, $p).$code.substr($texte, $p);
 	} else {
 		$texte .= $code;
 	}

ecrire/inc/traduire.php

Indentation +194 added lines, -194 removed lines

@@ -19,7 +19,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -40,20 +40,20 @@ 
  *     Liste des fichiers de langue trouvés, dans l'ordre des chemins
  */
 function find_langs_in_path($file, $dirname = 'lang') {
-	static $dirs = [];
-	$liste = [];
-	foreach (creer_chemin() as $dir) {
-		if (!isset($dirs[$a = $dir . $dirname])) {
-			$dirs[$a] = (is_dir($a) || !$a);
-		}
-		if ($dirs[$a]) {
-			if (is_readable($a .= $file)) {
-				$liste[] = $a;
-			}
-		}
-	}
+    static $dirs = [];
+    $liste = [];
+    foreach (creer_chemin() as $dir) {
+        if (!isset($dirs[$a = $dir . $dirname])) {
+            $dirs[$a] = (is_dir($a) || !$a);
+        }
+        if ($dirs[$a]) {
+            if (is_readable($a .= $file)) {
+                $liste[] = $a;
+            }
+        }
+    }
 
-	return array_reverse($liste);
+    return array_reverse($liste);
 }
 
 /**
@@ -68,23 +68,23 @@ 
  *     Liste des fichiers touvés pour ce module et cette langue.
  **/
 function chercher_module_lang($module, $lang = '') {
-	if ($lang) {
-		$lang = '_' . $lang;
-	}
+    if ($lang) {
+        $lang = '_' . $lang;
+    }
 
-	// 1) dans un repertoire nomme lang/ se trouvant sur le chemin
-	if (
-		$f = ($module == 'local'
-		? find_in_path($module . $lang . '.php', 'lang/')
-		: find_langs_in_path($module . $lang . '.php', 'lang/'))
-	) {
-		return is_array($f) ? $f : [$f];
-	}
+    // 1) dans un repertoire nomme lang/ se trouvant sur le chemin
+    if (
+        $f = ($module == 'local'
+        ? find_in_path($module . $lang . '.php', 'lang/')
+        : find_langs_in_path($module . $lang . '.php', 'lang/'))
+    ) {
+        return is_array($f) ? $f : [$f];
+    }
 
-	// 2) directement dans le chemin (old style, uniquement pour local)
-	return (($module == 'local') or strpos($module, '/'))
-		? (($f = find_in_path($module . $lang . '.php')) ? [$f] : false)
-		: false;
+    // 2) directement dans le chemin (old style, uniquement pour local)
+    return (($module == 'local') or strpos($module, '/'))
+        ? (($f = find_in_path($module . $lang . '.php')) ? [$f] : false)
+        : false;
 }
 
 /**
@@ -106,33 +106,33 @@ 
  * @return void
  **/
 function charger_langue($lang, $module = 'spip') {
-	static $langs = [];
-	$var = 'i18n_' . $module . '_' . $lang;
-	if (!isset($langs[$lang])) {
-		$langs[$lang] = [];
-		if ($lang) {
-			$langs[$lang][] = $lang;
-			if (strpos($lang, '_') !== false) {
-				$l = explode('_', $lang);
-				$langs[$lang][] = reset($l);
-			}
-		}
-		$langs[$lang][] = $GLOBALS['meta']['langue_site'];
-		$langs[$lang][] = _LANGUE_PAR_DEFAUT;
-	}
-	foreach ($langs[$lang] as $l) {
-		if ($fichiers_lang = chercher_module_lang($module, $l)) {
-			$GLOBALS['idx_lang'] = 'i18n_' . $module . '_' . $l;
-			$GLOBALS[$GLOBALS['idx_lang']] = lire_fichier_langue(array_shift($fichiers_lang));
-			surcharger_langue($fichiers_lang);
-			if ($l !== $lang) {
-				$GLOBALS[$var] = &$GLOBALS['i18n_' . $module . '_' . $l];
-			}
-			$GLOBALS['lang_' . $var] = $l;
-			#spip_log("module de langue : {$module}_$l.php", 'traduire');
-			break;
-		}
-	}
+    static $langs = [];
+    $var = 'i18n_' . $module . '_' . $lang;
+    if (!isset($langs[$lang])) {
+        $langs[$lang] = [];
+        if ($lang) {
+            $langs[$lang][] = $lang;
+            if (strpos($lang, '_') !== false) {
+                $l = explode('_', $lang);
+                $langs[$lang][] = reset($l);
+            }
+        }
+        $langs[$lang][] = $GLOBALS['meta']['langue_site'];
+        $langs[$lang][] = _LANGUE_PAR_DEFAUT;
+    }
+    foreach ($langs[$lang] as $l) {
+        if ($fichiers_lang = chercher_module_lang($module, $l)) {
+            $GLOBALS['idx_lang'] = 'i18n_' . $module . '_' . $l;
+            $GLOBALS[$GLOBALS['idx_lang']] = lire_fichier_langue(array_shift($fichiers_lang));
+            surcharger_langue($fichiers_lang);
+            if ($l !== $lang) {
+                $GLOBALS[$var] = &$GLOBALS['i18n_' . $module . '_' . $l];
+            }
+            $GLOBALS['lang_' . $var] = $l;
+            #spip_log("module de langue : {$module}_$l.php", 'traduire');
+            break;
+        }
+    }
 }
 
 /**
@@ -145,21 +145,21 @@ 
  * @return array<string, string>
  */
 function lire_fichier_langue(string $fichier): array {
-	$idx_lang_before = $GLOBALS['idx_lang'] ?? null;
-	$idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang') . '@temporaire';
-	$GLOBALS['idx_lang'] = $idx_lang_tmp;
-	$idx_lang = include $fichier;
-	$GLOBALS['idx_lang'] = $idx_lang_before;
-	if (!is_array($idx_lang)) {
-		if (isset($GLOBALS[$idx_lang_tmp]) and is_array($GLOBALS[$idx_lang_tmp])) {
-			$idx_lang = $GLOBALS[$idx_lang_tmp];
-		} else {
-			$idx_lang = [];
-			spip_log(sprintf('Fichier de langue incorrect : %s', $fichier), _LOG_ERREUR);
-		}
-		unset($GLOBALS[$idx_lang_tmp]);
-	}
-	return $idx_lang;
+    $idx_lang_before = $GLOBALS['idx_lang'] ?? null;
+    $idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang') . '@temporaire';
+    $GLOBALS['idx_lang'] = $idx_lang_tmp;
+    $idx_lang = include $fichier;
+    $GLOBALS['idx_lang'] = $idx_lang_before;
+    if (!is_array($idx_lang)) {
+        if (isset($GLOBALS[$idx_lang_tmp]) and is_array($GLOBALS[$idx_lang_tmp])) {
+            $idx_lang = $GLOBALS[$idx_lang_tmp];
+        } else {
+            $idx_lang = [];
+            spip_log(sprintf('Fichier de langue incorrect : %s', $fichier), _LOG_ERREUR);
+        }
+        unset($GLOBALS[$idx_lang_tmp]);
+    }
+    return $idx_lang;
 }
 
 /**
@@ -179,29 +179,29 @@ 
  *    Liste des chemins de fichiers de langue à surcharger.
  **/
 function surcharger_langue($fichiers) {
-	static $surcharges = [];
-	if (!isset($GLOBALS['idx_lang'])) {
-		return;
-	}
+    static $surcharges = [];
+    if (!isset($GLOBALS['idx_lang'])) {
+        return;
+    }
 
-	if (!is_array($fichiers)) {
-		$fichiers = [$fichiers];
-	}
-	if (!count($fichiers)) {
-		return;
-	}
-	foreach ($fichiers as $fichier) {
-		if (!isset($surcharges[$fichier])) {
-			$surcharges[$fichier] = lire_fichier_langue($fichier);
-		}
-		if (is_array($surcharges[$fichier])) {
-			$GLOBALS[$GLOBALS['idx_lang']] ??= [];
-			$GLOBALS[$GLOBALS['idx_lang']] = array_merge(
-				$GLOBALS[$GLOBALS['idx_lang']],
-				$surcharges[$fichier]
-			);
-		}
-	}
+    if (!is_array($fichiers)) {
+        $fichiers = [$fichiers];
+    }
+    if (!count($fichiers)) {
+        return;
+    }
+    foreach ($fichiers as $fichier) {
+        if (!isset($surcharges[$fichier])) {
+            $surcharges[$fichier] = lire_fichier_langue($fichier);
+        }
+        if (is_array($surcharges[$fichier])) {
+            $GLOBALS[$GLOBALS['idx_lang']] ??= [];
+            $GLOBALS[$GLOBALS['idx_lang']] = array_merge(
+                $GLOBALS[$GLOBALS['idx_lang']],
+                $surcharges[$fichier]
+            );
+        }
+    }
 }
 
 /**
@@ -242,99 +242,99 @@ 
  *     - Description : traduction et description (texte, module, langue)
  **/
 function inc_traduire_dist($ori, $lang, $raw = false) {
-	static $deja_vu = [];
-	static $local = [];
+    static $deja_vu = [];
+    static $local = [];
 
-	if (isset($deja_vu[$lang][$ori]) and (_request('var_mode') != 'traduction')) {
-		return $raw ? $deja_vu[$lang][$ori] : $deja_vu[$lang][$ori]->texte;
-	}
+    if (isset($deja_vu[$lang][$ori]) and (_request('var_mode') != 'traduction')) {
+        return $raw ? $deja_vu[$lang][$ori] : $deja_vu[$lang][$ori]->texte;
+    }
 
-	// modules demandes explicitement <xxx|yyy|zzz:code> cf MODULES_IDIOMES
-	if (strpos($ori, ':')) {
-		[$modules, $code] = explode(':', $ori, 2);
-		$modules = explode('|', $modules);
-		$ori_complet = $ori;
-	} else {
-		$modules = ['spip', 'ecrire'];
-		$code = $ori;
-		$ori_complet = implode('|', $modules) . ':' . $ori;
-	}
+    // modules demandes explicitement <xxx|yyy|zzz:code> cf MODULES_IDIOMES
+    if (strpos($ori, ':')) {
+        [$modules, $code] = explode(':', $ori, 2);
+        $modules = explode('|', $modules);
+        $ori_complet = $ori;
+    } else {
+        $modules = ['spip', 'ecrire'];
+        $code = $ori;
+        $ori_complet = implode('|', $modules) . ':' . $ori;
+    }
 
-	$desc = new Description();
+    $desc = new Description();
 
-	// parcourir tous les modules jusqu'a ce qu'on trouve
-	foreach ($modules as $module) {
-		$var = 'i18n_' . $module . '_' . $lang;
+    // parcourir tous les modules jusqu'a ce qu'on trouve
+    foreach ($modules as $module) {
+        $var = 'i18n_' . $module . '_' . $lang;
 
-		if (empty($GLOBALS[$var])) {
-			charger_langue($lang, $module);
-			// surcharges persos -- on cherche
-			// (lang/)local_xx.php et/ou (lang/)local.php ...
-			if (!isset($local['local_' . $lang])) {
-				// redéfinir la langue en cours pour les surcharges (chercher_langue a pu le changer)
-				$GLOBALS['idx_lang'] = $var;
-				// ... (lang/)local_xx.php
-				$local['local_' . $lang] = chercher_module_lang('local', $lang);
-			}
-			if ($local['local_' . $lang]) {
-				surcharger_langue($local['local_' . $lang]);
-			}
-			// ... puis (lang/)local.php
-			if (!isset($local['local'])) {
-				$local['local'] = chercher_module_lang('local');
-			}
-			if ($local['local']) {
-				surcharger_langue($local['local']);
-			}
-		}
+        if (empty($GLOBALS[$var])) {
+            charger_langue($lang, $module);
+            // surcharges persos -- on cherche
+            // (lang/)local_xx.php et/ou (lang/)local.php ...
+            if (!isset($local['local_' . $lang])) {
+                // redéfinir la langue en cours pour les surcharges (chercher_langue a pu le changer)
+                $GLOBALS['idx_lang'] = $var;
+                // ... (lang/)local_xx.php
+                $local['local_' . $lang] = chercher_module_lang('local', $lang);
+            }
+            if ($local['local_' . $lang]) {
+                surcharger_langue($local['local_' . $lang]);
+            }
+            // ... puis (lang/)local.php
+            if (!isset($local['local'])) {
+                $local['local'] = chercher_module_lang('local');
+            }
+            if ($local['local']) {
+                surcharger_langue($local['local']);
+            }
+        }
 
-		if (isset($GLOBALS[$var][$code])) {
-			$desc->code = $code;
-			$desc->module = $module;
-			$desc->langue = $GLOBALS['lang_' . $var] ?? $lang;
-			$desc->texte = $GLOBALS[$var][$code];
-			break;
-		}
-	}
+        if (isset($GLOBALS[$var][$code])) {
+            $desc->code = $code;
+            $desc->module = $module;
+            $desc->langue = $GLOBALS['lang_' . $var] ?? $lang;
+            $desc->texte = $GLOBALS[$var][$code];
+            break;
+        }
+    }
 
-	if (!$desc->corrections) {
-		$desc->corrections = true;
-		// Retour aux sources si la chaine est absente dans la langue cible ;
-		// on essaie d'abord la langue du site, puis a defaut la langue fr
-		if (
-			($desc->texte === null || !strlen($desc->texte))
-			and $lang !== _LANGUE_PAR_DEFAUT
-		) {
-			if ($lang !== $GLOBALS['meta']['langue_site']) {
-				$desc = inc_traduire_dist($ori, $GLOBALS['meta']['langue_site'], true);
-			} else {
-				$desc = inc_traduire_dist($ori, _LANGUE_PAR_DEFAUT, true);
-			}
-		}
+    if (!$desc->corrections) {
+        $desc->corrections = true;
+        // Retour aux sources si la chaine est absente dans la langue cible ;
+        // on essaie d'abord la langue du site, puis a defaut la langue fr
+        if (
+            ($desc->texte === null || !strlen($desc->texte))
+            and $lang !== _LANGUE_PAR_DEFAUT
+        ) {
+            if ($lang !== $GLOBALS['meta']['langue_site']) {
+                $desc = inc_traduire_dist($ori, $GLOBALS['meta']['langue_site'], true);
+            } else {
+                $desc = inc_traduire_dist($ori, _LANGUE_PAR_DEFAUT, true);
+            }
+        }
 
-		// Supprimer la mention <NEW> ou <MODIF>
-		if ($desc->texte && substr($desc->texte, 0, 1) === '<') {
-			$desc->texte = str_replace(['<NEW>', '<MODIF>'], [], $desc->texte);
-		}
+        // Supprimer la mention <NEW> ou <MODIF>
+        if ($desc->texte && substr($desc->texte, 0, 1) === '<') {
+            $desc->texte = str_replace(['<NEW>', '<MODIF>'], [], $desc->texte);
+        }
 
-		// Si on n'est pas en utf-8, la chaine peut l'etre...
-		// le cas echeant on la convertit en entites html &#xxx;
-		if (
-			(!isset($GLOBALS['meta']['charset']) or $GLOBALS['meta']['charset'] !== 'utf-8')
-			and preg_match(',[\x7f-\xff],S', $desc->texte)
-		) {
-			include_spip('inc/charsets');
-			$desc->texte = charset2unicode($desc->texte, 'utf-8');
-		}
-	}
+        // Si on n'est pas en utf-8, la chaine peut l'etre...
+        // le cas echeant on la convertit en entites html &#xxx;
+        if (
+            (!isset($GLOBALS['meta']['charset']) or $GLOBALS['meta']['charset'] !== 'utf-8')
+            and preg_match(',[\x7f-\xff],S', $desc->texte)
+        ) {
+            include_spip('inc/charsets');
+            $desc->texte = charset2unicode($desc->texte, 'utf-8');
+        }
+    }
 
-	if (_request('var_mode') == 'traduction') {
-		$desc = definir_details_traduction($desc, $ori_complet);
-	} else {
-		$deja_vu[$lang][$ori] = $desc;
-	}
+    if (_request('var_mode') == 'traduction') {
+        $desc = definir_details_traduction($desc, $ori_complet);
+    } else {
+        $deja_vu[$lang][$ori] = $desc;
+    }
 
-	return $raw ? $desc : $desc->texte;
+    return $raw ? $desc : $desc->texte;
 }
 
 /**
@@ -346,23 +346,23 @@ 
  * @return Description
  */
 function definir_details_traduction($desc, $modules) {
-	if (!$desc->mode and $desc->texte) {
-		// ne pas modifier 2 fois l'affichage
-		$desc->mode = 'traduction';
-		$classe = 'debug-traduction' . ($desc->module == 'ecrire' ? '-prive' : '');
-		$desc->texte = '<span '
-			. 'lang=' . $desc->langue
-			. ' class=' . $classe
-			. ' data-module=' . $desc->module
-			. ' data-code=' . $desc->code
-			. ' title=' . $modules . '(' . $desc->langue . ')>'
-			. $desc->texte
-			. '</span>';
-		$desc->texte = str_replace(
-			["$desc->module:", "$desc->module|"],
-			["*$desc->module*:", "*$desc->module*|"],
-			$desc->texte
-		);
-	}
-	return $desc;
+    if (!$desc->mode and $desc->texte) {
+        // ne pas modifier 2 fois l'affichage
+        $desc->mode = 'traduction';
+        $classe = 'debug-traduction' . ($desc->module == 'ecrire' ? '-prive' : '');
+        $desc->texte = '<span '
+            . 'lang=' . $desc->langue
+            . ' class=' . $classe
+            . ' data-module=' . $desc->module
+            . ' data-code=' . $desc->code
+            . ' title=' . $modules . '(' . $desc->langue . ')>'
+            . $desc->texte
+            . '</span>';
+        $desc->texte = str_replace(
+            ["$desc->module:", "$desc->module|"],
+            ["*$desc->module*:", "*$desc->module*|"],
+            $desc->texte
+        );
+    }
+    return $desc;
 }

Spacing +23 added lines, -23 removed lines

@@ -43,7 +43,7 @@ 
 	static $dirs = [];
 	$liste = [];
 	foreach (creer_chemin() as $dir) {
-		if (!isset($dirs[$a = $dir . $dirname])) {
+		if (!isset($dirs[$a = $dir.$dirname])) {
 			$dirs[$a] = (is_dir($a) || !$a);
 		}
 		if ($dirs[$a]) {
@@ -69,21 +69,21 @@ 
  **/
 function chercher_module_lang($module, $lang = '') {
 	if ($lang) {
-		$lang = '_' . $lang;
+		$lang = '_'.$lang;
 	}
 
 	// 1) dans un repertoire nomme lang/ se trouvant sur le chemin
 	if (
 		$f = ($module == 'local'
-		? find_in_path($module . $lang . '.php', 'lang/')
-		: find_langs_in_path($module . $lang . '.php', 'lang/'))
+		? find_in_path($module.$lang.'.php', 'lang/')
+		: find_langs_in_path($module.$lang.'.php', 'lang/'))
 	) {
 		return is_array($f) ? $f : [$f];
 	}
 
 	// 2) directement dans le chemin (old style, uniquement pour local)
 	return (($module == 'local') or strpos($module, '/'))
-		? (($f = find_in_path($module . $lang . '.php')) ? [$f] : false)
+		? (($f = find_in_path($module.$lang.'.php')) ? [$f] : false)
 		: false;
 }
 
@@ -107,7 +107,7 @@ 
  **/
 function charger_langue($lang, $module = 'spip') {
 	static $langs = [];
-	$var = 'i18n_' . $module . '_' . $lang;
+	$var = 'i18n_'.$module.'_'.$lang;
 	if (!isset($langs[$lang])) {
 		$langs[$lang] = [];
 		if ($lang) {
@@ -122,13 +122,13 @@ 
 	}
 	foreach ($langs[$lang] as $l) {
 		if ($fichiers_lang = chercher_module_lang($module, $l)) {
-			$GLOBALS['idx_lang'] = 'i18n_' . $module . '_' . $l;
+			$GLOBALS['idx_lang'] = 'i18n_'.$module.'_'.$l;
 			$GLOBALS[$GLOBALS['idx_lang']] = lire_fichier_langue(array_shift($fichiers_lang));
 			surcharger_langue($fichiers_lang);
 			if ($l !== $lang) {
-				$GLOBALS[$var] = &$GLOBALS['i18n_' . $module . '_' . $l];
+				$GLOBALS[$var] = &$GLOBALS['i18n_'.$module.'_'.$l];
 			}
-			$GLOBALS['lang_' . $var] = $l;
+			$GLOBALS['lang_'.$var] = $l;
 			#spip_log("module de langue : {$module}_$l.php", 'traduire');
 			break;
 		}
@@ -146,7 +146,7 @@ 
  */
 function lire_fichier_langue(string $fichier): array {
 	$idx_lang_before = $GLOBALS['idx_lang'] ?? null;
-	$idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang') . '@temporaire';
+	$idx_lang_tmp = ($GLOBALS['idx_lang'] ?? 'lang').'@temporaire';
 	$GLOBALS['idx_lang'] = $idx_lang_tmp;
 	$idx_lang = include $fichier;
 	$GLOBALS['idx_lang'] = $idx_lang_before;
@@ -257,27 +257,27 @@ 
 	} else {
 		$modules = ['spip', 'ecrire'];
 		$code = $ori;
-		$ori_complet = implode('|', $modules) . ':' . $ori;
+		$ori_complet = implode('|', $modules).':'.$ori;
 	}
 
 	$desc = new Description();
 
 	// parcourir tous les modules jusqu'a ce qu'on trouve
 	foreach ($modules as $module) {
-		$var = 'i18n_' . $module . '_' . $lang;
+		$var = 'i18n_'.$module.'_'.$lang;
 
 		if (empty($GLOBALS[$var])) {
 			charger_langue($lang, $module);
 			// surcharges persos -- on cherche
 			// (lang/)local_xx.php et/ou (lang/)local.php ...
-			if (!isset($local['local_' . $lang])) {
+			if (!isset($local['local_'.$lang])) {
 				// redéfinir la langue en cours pour les surcharges (chercher_langue a pu le changer)
 				$GLOBALS['idx_lang'] = $var;
 				// ... (lang/)local_xx.php
-				$local['local_' . $lang] = chercher_module_lang('local', $lang);
+				$local['local_'.$lang] = chercher_module_lang('local', $lang);
 			}
-			if ($local['local_' . $lang]) {
-				surcharger_langue($local['local_' . $lang]);
+			if ($local['local_'.$lang]) {
+				surcharger_langue($local['local_'.$lang]);
 			}
 			// ... puis (lang/)local.php
 			if (!isset($local['local'])) {
@@ -291,7 +291,7 @@ 
 		if (isset($GLOBALS[$var][$code])) {
 			$desc->code = $code;
 			$desc->module = $module;
-			$desc->langue = $GLOBALS['lang_' . $var] ?? $lang;
+			$desc->langue = $GLOBALS['lang_'.$var] ?? $lang;
 			$desc->texte = $GLOBALS[$var][$code];
 			break;
 		}
@@ -349,13 +349,13 @@ 
 	if (!$desc->mode and $desc->texte) {
 		// ne pas modifier 2 fois l'affichage
 		$desc->mode = 'traduction';
-		$classe = 'debug-traduction' . ($desc->module == 'ecrire' ? '-prive' : '');
+		$classe = 'debug-traduction'.($desc->module == 'ecrire' ? '-prive' : '');
 		$desc->texte = '<span '
-			. 'lang=' . $desc->langue
-			. ' class=' . $classe
-			. ' data-module=' . $desc->module
-			. ' data-code=' . $desc->code
-			. ' title=' . $modules . '(' . $desc->langue . ')>'
+			. 'lang='.$desc->langue
+			. ' class='.$classe
+			. ' data-module='.$desc->module
+			. ' data-code='.$desc->code
+			. ' title='.$modules.'('.$desc->langue.')>'
 			. $desc->texte
 			. '</span>';
 		$desc->texte = str_replace(

ecrire/inc/charsets.php

Indentation +636 added lines, -636 removed lines

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

Spacing +49 added lines, -49 removed lines

@@ -90,7 +90,7 @@ 
 		$charset = 'cp1256';
 	}
 
-	if (find_in_path($charset . '.php', 'charsets/', true)) {
+	if (find_in_path($charset.'.php', 'charsets/', true)) {
 		return $charset;
 	} else {
 		spip_log("Erreur: pas de fichier de conversion 'charsets/$charset'");
@@ -195,38 +195,38 @@ 
 
 	if (!isset($trans[$charset][$charset_cible])) {
 		$trans[$charset][$charset_cible] = [
-			$p . chr(128) => '€',
-			$p . chr(129) => ' ', # pas affecte
-			$p . chr(130) => '‚',
-			$p . chr(131) => 'ƒ',
-			$p . chr(132) => '„',
-			$p . chr(133) => '…',
-			$p . chr(134) => '†',
-			$p . chr(135) => '‡',
-			$p . chr(136) => 'ˆ',
-			$p . chr(137) => '‰',
-			$p . chr(138) => 'Š',
-			$p . chr(139) => '‹',
-			$p . chr(140) => 'Œ',
-			$p . chr(141) => ' ', # pas affecte
-			$p . chr(142) => 'Ž',
-			$p . chr(143) => ' ', # pas affecte
-			$p . chr(144) => ' ', # pas affecte
-			$p . chr(145) => '‘',
-			$p . chr(146) => '’',
-			$p . chr(147) => '“',
-			$p . chr(148) => '”',
-			$p . chr(149) => '•',
-			$p . chr(150) => '–',
-			$p . chr(151) => '—',
-			$p . chr(152) => '˜',
-			$p . chr(153) => '™',
-			$p . chr(154) => 'š',
-			$p . chr(155) => '›',
-			$p . chr(156) => 'œ',
-			$p . chr(157) => ' ', # pas affecte
-			$p . chr(158) => 'ž',
-			$p . chr(159) => 'Ÿ',
+			$p.chr(128) => '€',
+			$p.chr(129) => ' ', # pas affecte
+			$p.chr(130) => '‚',
+			$p.chr(131) => 'ƒ',
+			$p.chr(132) => '„',
+			$p.chr(133) => '…',
+			$p.chr(134) => '†',
+			$p.chr(135) => '‡',
+			$p.chr(136) => 'ˆ',
+			$p.chr(137) => '‰',
+			$p.chr(138) => 'Š',
+			$p.chr(139) => '‹',
+			$p.chr(140) => 'Œ',
+			$p.chr(141) => ' ', # pas affecte
+			$p.chr(142) => 'Ž',
+			$p.chr(143) => ' ', # pas affecte
+			$p.chr(144) => ' ', # pas affecte
+			$p.chr(145) => '‘',
+			$p.chr(146) => '’',
+			$p.chr(147) => '“',
+			$p.chr(148) => '”',
+			$p.chr(149) => '•',
+			$p.chr(150) => '–',
+			$p.chr(151) => '—',
+			$p.chr(152) => '˜',
+			$p.chr(153) => '™',
+			$p.chr(154) => 'š',
+			$p.chr(155) => '›',
+			$p.chr(156) => 'œ',
+			$p.chr(157) => ' ', # pas affecte
+			$p.chr(158) => 'ž',
+			$p.chr(159) => 'Ÿ',
 		];
 		if ($charset_cible != 'unicode') {
 			foreach ($trans[$charset][$charset_cible] as $k => $c) {
@@ -367,7 +367,7 @@ 
 					and is_array($GLOBALS['CHARSET'][$cset])
 				) {
 					foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-						$trans[$charset][chr($key)] = '&#' . $val . ';';
+						$trans[$charset][chr($key)] = '&#'.$val.';';
 					}
 				}
 			}
@@ -433,11 +433,11 @@ 
 					$h = dechex($e);
 					if ($s = isset($CHARSET_REVERSE[$charset][$e])) {
 						$s = $CHARSET_REVERSE[$charset][$e];
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($s);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($s);
+						$t['&#'.$e.';'] = $t['&#0'.$e.';'] = $t['&#00'.$e.';'] = chr($s);
+						$t['&#x'.$h.';'] = $t['&#x0'.$h.';'] = $t['&#x00'.$h.';'] = chr($s);
 					} else {
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($e);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($e);
+						$t['&#'.$e.';'] = $t['&#0'.$e.';'] = $t['&#00'.$e.';'] = chr($e);
+						$t['&#x'.$h.';'] = $t['&#x0'.$h.';'] = $t['&#x00'.$h.';'] = chr($e);
 					}
 				}
 			}
@@ -484,7 +484,7 @@ 
 				and is_array($GLOBALS['CHARSET'][$cset])
 			) {
 				foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-					$trans[$charset][chr($key)] = unicode2charset('&#' . $val . ';');
+					$trans[$charset][chr($key)] = unicode2charset('&#'.$val.';');
 				}
 			}
 		}
@@ -591,7 +591,7 @@ 
 				}
 				$thisPos++;
 			}
-			$encodedLetter = '&#' . preg_replace('/^0+/', '', $decimalCode) . ';';
+			$encodedLetter = '&#'.preg_replace('/^0+/', '', $decimalCode).';';
 			$encodedString .= $encodedLetter;
 		}
 	}
@@ -634,7 +634,7 @@ 
 			} // ignorer le BOM - http://www.unicode.org/faq/utf_bom.html
 			else {
 				if ($word != 65279) {
-					$texte .= '&#' . $word . ';';
+					$texte .= '&#'.$word.';';
 				}
 			}
 		}
@@ -662,13 +662,13 @@ 
 		return chr($num);
 	}
 	if ($num < 2048) {
-		return chr(($num >> 6) + 192) . chr(($num & 63) + 128);
+		return chr(($num >> 6) + 192).chr(($num & 63) + 128);
 	}
 	if ($num < 65536) {
-		return chr(($num >> 12) + 224) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+		return chr(($num >> 12) + 224).chr((($num >> 6) & 63) + 128).chr(($num & 63) + 128);
 	}
 	if ($num < 1_114_112) {
-		return chr(($num >> 18) + 240) . chr((($num >> 12) & 63) + 128) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+		return chr(($num >> 18) + 240).chr((($num >> 12) & 63) + 128).chr((($num >> 6) & 63) + 128).chr(($num & 63) + 128);
 	}
 
 	return '';
@@ -735,7 +735,7 @@ 
 	while (preg_match(',&#0*([0-9]+);,S', $texte, $regs) and !isset($vu[$regs[1]])) {
 		$num = $regs[1];
 		$vu[$num] = true;
-		$s = '\u' . sprintf('%04x', $num);
+		$s = '\u'.sprintf('%04x', $num);
 		$texte = str_replace($regs[0], $s, $texte);
 	}
 
@@ -752,7 +752,7 @@ 
  **/
 function javascript_to_unicode($texte) {
 	while (preg_match(',%u([0-9A-F][0-9A-F][0-9A-F][0-9A-F]),', $texte, $regs)) {
-		$texte = str_replace($regs[0], '&#' . hexdec($regs[1]) . ';', $texte);
+		$texte = str_replace($regs[0], '&#'.hexdec($regs[1]).';', $texte);
 	}
 
 	return $texte;
@@ -797,7 +797,7 @@ 
 		return $texte;
 	}
 
-	$table_translit = 'translit' . $complexe;
+	$table_translit = 'translit'.$complexe;
 
 	// 2. Translitterer grace a la table predefinie
 	if (!isset($trans[$complexe])) {
@@ -888,7 +888,7 @@ 
  *    true s'il a un BOM
  **/
 function bom_utf8($texte): bool {
-	return (substr($texte, 0, 3) === chr(0xEF) . chr(0xBB) . chr(0xBF));
+	return (substr($texte, 0, 3) === chr(0xEF).chr(0xBB).chr(0xBF));
 }
 
 /**
@@ -1058,7 +1058,7 @@ 
 
 	$lettre1 = mb_strtoupper(spip_substr($c, 0, 1));
 
-	return $lettre1 . spip_substr($c, 1);
+	return $lettre1.spip_substr($c, 1);
 }
 
 /**

ecrire/base/repair.php

Spacing +8 added lines, -8 removed lines

@@ -38,7 +38,7 @@ 
 
 	$res = admin_repair_tables();
 	if (!$res) {
-		$res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
+		$res = "<div class='error'>"._T('avis_erreur_mysql').' '.sql_errno().': '.sql_error()."</div>\n";
 	} else {
 		include_spip('inc/rubriques');
 		calculer_rubriques();
@@ -48,7 +48,7 @@ 
 	$res .= pipeline('base_admin_repair', $res);
 	echo minipres(
 		_T('texte_tentative_recuperation'),
-		$res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site'))
+		$res.generer_form_ecrire('accueil', '', '', _T('public:accueil_site'))
 	);
 }
 
@@ -91,12 +91,12 @@ 
 		$count = sql_countsel($tab);
 
 		if ($count > 1) {
-			$m .= '(' . _T('texte_compte_elements', ['count' => $count]) . ")\n";
+			$m .= '('._T('texte_compte_elements', ['count' => $count]).")\n";
 		} else {
 			if ($count == 1) {
-				$m .= '(' . _T('texte_compte_element', ['count' => $count]) . ")\n";
+				$m .= '('._T('texte_compte_element', ['count' => $count]).")\n";
 			} else {
-				$m .= '(' . _T('texte_vide') . ")\n";
+				$m .= '('._T('texte_vide').")\n";
 			}
 		}
 
@@ -105,13 +105,13 @@ 
 			and $msg = join(
 				' ',
 				(is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair
-			) . ' '
+			).' '
 			and !str_contains($msg, ' OK ')
 		) {
 			$class = " class='notice'";
-			$m .= '<br /><tt>' . spip_htmlentities($msg) . "</tt>\n";
+			$m .= '<br /><tt>'.spip_htmlentities($msg)."</tt>\n";
 		} else {
-			$m .= ' ' . _T('texte_table_ok');
+			$m .= ' '._T('texte_table_ok');
 		}
 
 		$res .= "<div$class>$m</div>";

Indentation +63 added lines, -63 removed lines

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

ecrire/xml/sax.php

Indentation +257 added lines, -257 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -24,222 +24,222 @@ 
  * @return string
  */
 function xml_entites_html($texte) {
-	if (
-		!is_string($texte) or !$texte
-		or strpbrk($texte, "&\"'<>") == false
-	) {
-		return $texte;
-	}
-
-	if (!function_exists('spip_htmlspecialchars')) {
-		include_spip('inc/filtres_mini');
-	}
-	$texte = spip_htmlspecialchars($texte, ENT_QUOTES);
-
-	return $texte;
+    if (
+        !is_string($texte) or !$texte
+        or strpbrk($texte, "&\"'<>") == false
+    ) {
+        return $texte;
+    }
+
+    if (!function_exists('spip_htmlspecialchars')) {
+        include_spip('inc/filtres_mini');
+    }
+    $texte = spip_htmlspecialchars($texte, ENT_QUOTES);
+
+    return $texte;
 }
 
 function xml_debutElement($phraseur, $name, $attrs) {
-	$depth = $phraseur->depth;
-
-	$t = $phraseur->ouvrant[$depth] ?? ' ';
-	// espace initial signifie: deja integree au resultat
-	if ($t[0] != ' ') {
-		$phraseur->res .= '<' . $t . '>';
-		$phraseur->ouvrant[$depth] = ' ' . $t;
-	}
-	$t = $phraseur->contenu[$depth];
-	// n'indenter que s'il y a un separateur avant
-	$phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
-	$phraseur->contenu[$depth] = '';
-	$att = '';
-	$sep = ' ';
-	foreach ($attrs as $k => $v) {
-		$delim = !str_contains($v, "'") ? "'" : '"';
-		$val = xml_entites_html($v);
-		$att .= $sep . $k . '=' . $delim
-			. ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
-			. $delim;
-		$sep = "\n $depth";
-	}
-	$phraseur->depth .= '  ';
-	$phraseur->contenu[$phraseur->depth] = '';
-	$phraseur->ouvrant[$phraseur->depth] = $name . $att;
-	$phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
+    $depth = $phraseur->depth;
+
+    $t = $phraseur->ouvrant[$depth] ?? ' ';
+    // espace initial signifie: deja integree au resultat
+    if ($t[0] != ' ') {
+        $phraseur->res .= '<' . $t . '>';
+        $phraseur->ouvrant[$depth] = ' ' . $t;
+    }
+    $t = $phraseur->contenu[$depth];
+    // n'indenter que s'il y a un separateur avant
+    $phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
+    $phraseur->contenu[$depth] = '';
+    $att = '';
+    $sep = ' ';
+    foreach ($attrs as $k => $v) {
+        $delim = !str_contains($v, "'") ? "'" : '"';
+        $val = xml_entites_html($v);
+        $att .= $sep . $k . '=' . $delim
+            . ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
+            . $delim;
+        $sep = "\n $depth";
+    }
+    $phraseur->depth .= '  ';
+    $phraseur->contenu[$phraseur->depth] = '';
+    $phraseur->ouvrant[$phraseur->depth] = $name . $att;
+    $phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
 }
 
 function xml_finElement($phraseur, $name, $fusion_bal = false) {
-	$ouv = $phraseur->ouvrant[$phraseur->depth];
-
-	if ($ouv[0] != ' ') {
-		$phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
-	} else {
-		$ouv = '';
-	}
-	$t = $phraseur->contenu[$phraseur->depth];
-	$phraseur->depth = substr($phraseur->depth, 2);
-	$t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
-
-	// fusion <balise></balise> en <balise />.
-	// ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
-	// en particulier pour les balises Script et A.
-	// en presence d'attributs ne le faire que si la DTD est dispo et d'accord
-	// (param fusion_bal)
-
-	if ($t || (($ouv != $name) and !$fusion_bal)) {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
-	} else {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
-	}
+    $ouv = $phraseur->ouvrant[$phraseur->depth];
+
+    if ($ouv[0] != ' ') {
+        $phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
+    } else {
+        $ouv = '';
+    }
+    $t = $phraseur->contenu[$phraseur->depth];
+    $phraseur->depth = substr($phraseur->depth, 2);
+    $t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
+
+    // fusion <balise></balise> en <balise />.
+    // ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
+    // en particulier pour les balises Script et A.
+    // en presence d'attributs ne le faire que si la DTD est dispo et d'accord
+    // (param fusion_bal)
+
+    if ($t || (($ouv != $name) and !$fusion_bal)) {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
+    } else {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
+    }
 }
 
 function xml_textElement($phraseur, $data) {
-	$depth = $phraseur->depth;
-	$phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
-		? $data
-		: xml_entites_html($data);
+    $depth = $phraseur->depth;
+    $phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
+        ? $data
+        : xml_entites_html($data);
 }
 
 function xml_piElement($phraseur, $target, $data) {
-	$depth = $phraseur->depth;
-
-	if (strtolower($target) != 'php') {
-		$phraseur->contenu[$depth] .= $data;
-	} else {
-		ob_start();
-		eval($data);
-		$data = ob_get_contents();
-		ob_end_clean();
-		$phraseur->contenu[$depth] .= $data;
-	}
+    $depth = $phraseur->depth;
+
+    if (strtolower($target) != 'php') {
+        $phraseur->contenu[$depth] .= $data;
+    } else {
+        ob_start();
+        eval($data);
+        $data = ob_get_contents();
+        ob_end_clean();
+        $phraseur->contenu[$depth] .= $data;
+    }
 }
 
 
 function xml_defaultElement($phraseur, $data) {
-	$depth = $phraseur->depth;
+    $depth = $phraseur->depth;
 
-	if (!isset($phraseur->contenu[$depth])) {
-		$phraseur->contenu[$depth] = '';
-	}
-	$phraseur->contenu[$depth] .= $data;
+    if (!isset($phraseur->contenu[$depth])) {
+        $phraseur->contenu[$depth] = '';
+    }
+    $phraseur->contenu[$depth] .= $data;
 }
 
 function xml_parsestring($phraseur, $data) {
-	$phraseur->contenu[$phraseur->depth] = '';
-
-	if (!xml_parse($phraseur->sax, $data, true)) {
-		coordonnees_erreur(
-			$phraseur,
-			xml_error_string(xml_get_error_code($phraseur->sax))
-			. "<br />\n" .
-			(!$phraseur->depth ? '' :
-				('(' .
-					_T('erreur_balise_non_fermee') .
-					' <tt>' .
-					$phraseur->ouvrant[$phraseur->depth] .
-					'</tt> ' .
-					_T('ligne') .
-					' ' .
-					$phraseur->reperes[$phraseur->depth] .
-			") <br />\n"))
-		);
-	}
+    $phraseur->contenu[$phraseur->depth] = '';
+
+    if (!xml_parse($phraseur->sax, $data, true)) {
+        coordonnees_erreur(
+            $phraseur,
+            xml_error_string(xml_get_error_code($phraseur->sax))
+            . "<br />\n" .
+            (!$phraseur->depth ? '' :
+                ('(' .
+                    _T('erreur_balise_non_fermee') .
+                    ' <tt>' .
+                    $phraseur->ouvrant[$phraseur->depth] .
+                    '</tt> ' .
+                    _T('ligne') .
+                    ' ' .
+                    $phraseur->reperes[$phraseur->depth] .
+            ") <br />\n"))
+        );
+    }
 }
 
 function coordonnees_erreur($phraseur, $msg) {
-	$entete_length = substr_count($phraseur->entete, "\n");
-	$phraseur->err[] = [
-		$msg,
-		xml_get_current_line_number($phraseur->sax) + $entete_length,
-		xml_get_current_column_number($phraseur->sax)
-	];
+    $entete_length = substr_count($phraseur->entete, "\n");
+    $phraseur->err[] = [
+        $msg,
+        xml_get_current_line_number($phraseur->sax) + $entete_length,
+        xml_get_current_column_number($phraseur->sax)
+    ];
 }
 
 function xml_sax_dist($page, $apply = false, $phraseur = null, $doctype = '', $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	if ($apply) {
-		ob_start();
-		if (is_array($apply)) {
-			$r = $page(...$apply);
-		} else {
-			$r = $page();
-		}
-		$page = ob_get_contents();
-		ob_end_clean();
-		// fonction sans aucun "echo", ca doit etre le resultat
-		if (!$page) {
-			$page = $r;
-		}
-	}
-
-	if (!$page) {
-		return '';
-	}
-	// charger la DTD et transcoder les entites,
-	// et escamoter le doctype que sax mange en php5 mais pas en  php4
-	if (!$doctype) {
-		if (!$r = analyser_doctype($page)) {
-			$page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
-				. preg_replace(_REGEXP_DOCTYPE, '', $page);
-			$r = analyser_doctype($page);
-		}
-		[$entete, $avail, $grammaire, $rotlvl] = array_pad($r, 4, null);
-		$page = substr($page, strlen($entete));
-	} else {
-		$avail = 'SYSTEM';
-		$grammaire = $doctype;
-		$rotlvl = basename($grammaire);
-	}
-
-	include_spip('xml/analyser_dtd');
-	$dtc = charger_dtd($grammaire, $avail, $rotlvl);
-	$page = sax_bug($page, $dtc, $charset);
-
-	// compatibilite Tidy espace public
-	if (!$phraseur) {
-		$indenter_xml = charger_fonction('indenter', 'xml');
-
-		return $indenter_xml($page, $apply);
-	}
-
-	$xml_parser = xml_parser_create($charset);
-
-	xml_set_element_handler(
-		$xml_parser,
-		[$phraseur, 'debutElement'],
-		[$phraseur, 'finElement']
-	);
-
-	xml_set_character_data_handler(
-		$xml_parser,
-		[$phraseur, 'textElement']
-	);
-
-	xml_set_processing_instruction_handler(
-		$xml_parser,
-		[$phraseur, 'piElement']
-	);
-
-	xml_set_default_handler(
-		$xml_parser,
-		[$phraseur, 'defaultElement']
-	);
-
-	xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
-
-	$phraseur->sax = $xml_parser;
-	if (isset($entete)) {
-		$phraseur->entete = $entete;
-	}
-	$phraseur->page = $page;
-	$phraseur->dtc = $dtc;
-	$phraseur->phraserTout($xml_parser, $page);
-	xml_parser_free($xml_parser);
-	$phraseur->sax = '';
-
-	return $phraseur;
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    if ($apply) {
+        ob_start();
+        if (is_array($apply)) {
+            $r = $page(...$apply);
+        } else {
+            $r = $page();
+        }
+        $page = ob_get_contents();
+        ob_end_clean();
+        // fonction sans aucun "echo", ca doit etre le resultat
+        if (!$page) {
+            $page = $r;
+        }
+    }
+
+    if (!$page) {
+        return '';
+    }
+    // charger la DTD et transcoder les entites,
+    // et escamoter le doctype que sax mange en php5 mais pas en  php4
+    if (!$doctype) {
+        if (!$r = analyser_doctype($page)) {
+            $page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
+                . preg_replace(_REGEXP_DOCTYPE, '', $page);
+            $r = analyser_doctype($page);
+        }
+        [$entete, $avail, $grammaire, $rotlvl] = array_pad($r, 4, null);
+        $page = substr($page, strlen($entete));
+    } else {
+        $avail = 'SYSTEM';
+        $grammaire = $doctype;
+        $rotlvl = basename($grammaire);
+    }
+
+    include_spip('xml/analyser_dtd');
+    $dtc = charger_dtd($grammaire, $avail, $rotlvl);
+    $page = sax_bug($page, $dtc, $charset);
+
+    // compatibilite Tidy espace public
+    if (!$phraseur) {
+        $indenter_xml = charger_fonction('indenter', 'xml');
+
+        return $indenter_xml($page, $apply);
+    }
+
+    $xml_parser = xml_parser_create($charset);
+
+    xml_set_element_handler(
+        $xml_parser,
+        [$phraseur, 'debutElement'],
+        [$phraseur, 'finElement']
+    );
+
+    xml_set_character_data_handler(
+        $xml_parser,
+        [$phraseur, 'textElement']
+    );
+
+    xml_set_processing_instruction_handler(
+        $xml_parser,
+        [$phraseur, 'piElement']
+    );
+
+    xml_set_default_handler(
+        $xml_parser,
+        [$phraseur, 'defaultElement']
+    );
+
+    xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
+
+    $phraseur->sax = $xml_parser;
+    if (isset($entete)) {
+        $phraseur->entete = $entete;
+    }
+    $phraseur->page = $page;
+    $phraseur->dtc = $dtc;
+    $phraseur->phraserTout($xml_parser, $page);
+    xml_parser_free($xml_parser);
+    $phraseur->sax = '';
+
+    return $phraseur;
 }
 
 // SAX ne dit pas si une Entite est dans un attribut ou non.
@@ -250,24 +250,24 @@ 
 // sinon on se rabat sur ce qu'en connait SPIP en standard.
 
 function sax_bug($data, $dtc, $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-
-	if ($dtc) {
-		$trans = [];
-
-		foreach ($dtc->entites as $k => $v) {
-			if (!strpos(' amp lt gt quot ', (string) $k)) {
-				$trans["&$k;"] = $v;
-			}
-		}
-		$data = strtr($data, $trans);
-	} else {
-		$data = html2unicode($data, true);
-	}
-
-	return unicode2charset($data, $charset);
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+
+    if ($dtc) {
+        $trans = [];
+
+        foreach ($dtc->entites as $k => $v) {
+            if (!strpos(' amp lt gt quot ', (string) $k)) {
+                $trans["&$k;"] = $v;
+            }
+        }
+        $data = strtr($data, $trans);
+    } else {
+        $data = html2unicode($data, true);
+    }
+
+    return unicode2charset($data, $charset);
 }
 
 // Retirer < ? xml... ? > et autre PI, ainsi que les commentaires en debut
@@ -277,52 +277,52 @@ 
 // les autres formats RSS n'ont pas de DTD,
 // mais un XML Schema que SPIP ne fait pas encore lire.
 function analyser_doctype($data) {
-	if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
-		if (preg_match(_REGEXP_XML, $data, $page)) {
-			[, $entete, $topelement] = $page;
-			if ($topelement == 'rss') {
-				return [
-					$entete,
-					'PUBLIC',
-					_DOCTYPE_RSS,
-					'rss-0.91.dtd'
-				];
-			} else {
-				$dtd = $topelement . '.dtd';
-				$f = find_in_path($dtd);
-				if (file_exists($f)) {
-					return [$entete, 'SYSTEM', $f, $dtd];
-				}
-			}
-		}
-		spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
-
-		return [];
-	}
-	[$entete, , $topelement, $avail, $suite] = $page;
-
-	if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
-		if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
-			return [];
-		}
-	}
-	[, $rotlvl, $suite] = $r;
-
-	if (!$suite) {
-		if ($avail != 'SYSTEM') {
-			return [];
-		}
-		$grammaire = $rotlvl;
-		$rotlvl = '';
-	} else {
-		if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
-			if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
-				return [];
-			}
-		}
-
-		$grammaire = $r[1];
-	}
-
-	return [$entete, $avail, $grammaire, $rotlvl];
+    if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
+        if (preg_match(_REGEXP_XML, $data, $page)) {
+            [, $entete, $topelement] = $page;
+            if ($topelement == 'rss') {
+                return [
+                    $entete,
+                    'PUBLIC',
+                    _DOCTYPE_RSS,
+                    'rss-0.91.dtd'
+                ];
+            } else {
+                $dtd = $topelement . '.dtd';
+                $f = find_in_path($dtd);
+                if (file_exists($f)) {
+                    return [$entete, 'SYSTEM', $f, $dtd];
+                }
+            }
+        }
+        spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
+
+        return [];
+    }
+    [$entete, , $topelement, $avail, $suite] = $page;
+
+    if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
+        if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
+            return [];
+        }
+    }
+    [, $rotlvl, $suite] = $r;
+
+    if (!$suite) {
+        if ($avail != 'SYSTEM') {
+            return [];
+        }
+        $grammaire = $rotlvl;
+        $rotlvl = '';
+    } else {
+        if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
+            if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
+                return [];
+            }
+        }
+
+        $grammaire = $r[1];
+    }
+
+    return [$entete, $avail, $grammaire, $rotlvl];
 }

Spacing +21 added lines, -22 removed lines

@@ -45,8 +45,8 @@ 
 	$t = $phraseur->ouvrant[$depth] ?? ' ';
 	// espace initial signifie: deja integree au resultat
 	if ($t[0] != ' ') {
-		$phraseur->res .= '<' . $t . '>';
-		$phraseur->ouvrant[$depth] = ' ' . $t;
+		$phraseur->res .= '<'.$t.'>';
+		$phraseur->ouvrant[$depth] = ' '.$t;
 	}
 	$t = $phraseur->contenu[$depth];
 	// n'indenter que s'il y a un separateur avant
@@ -57,14 +57,14 @@ 
 	foreach ($attrs as $k => $v) {
 		$delim = !str_contains($v, "'") ? "'" : '"';
 		$val = xml_entites_html($v);
-		$att .= $sep . $k . '=' . $delim
+		$att .= $sep.$k.'='.$delim
 			. ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
 			. $delim;
 		$sep = "\n $depth";
 	}
 	$phraseur->depth .= '  ';
 	$phraseur->contenu[$phraseur->depth] = '';
-	$phraseur->ouvrant[$phraseur->depth] = $name . $att;
+	$phraseur->ouvrant[$phraseur->depth] = $name.$att;
 	$phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
 }
 
@@ -72,13 +72,13 @@ 
 	$ouv = $phraseur->ouvrant[$phraseur->depth];
 
 	if ($ouv[0] != ' ') {
-		$phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
+		$phraseur->ouvrant[$phraseur->depth] = ' '.$ouv;
 	} else {
 		$ouv = '';
 	}
 	$t = $phraseur->contenu[$phraseur->depth];
 	$phraseur->depth = substr($phraseur->depth, 2);
-	$t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
+	$t = preg_replace("/[\n\t ]+$/", "\n".$phraseur->depth, $t);
 
 	// fusion <balise></balise> en <balise />.
 	// ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
@@ -87,9 +87,9 @@ 
 	// (param fusion_bal)
 
 	if ($t || (($ouv != $name) and !$fusion_bal)) {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
+		$phraseur->res .= ($ouv ? ('<'.$ouv.'>') : '').$t.'</'.$name.'>';
 	} else {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
+		$phraseur->res .= ($ouv ? ('<'.$ouv.' />') : ('</'.$name.'>'));
 	}
 }
 
@@ -131,16 +131,15 @@ 
 		coordonnees_erreur(
 			$phraseur,
 			xml_error_string(xml_get_error_code($phraseur->sax))
-			. "<br />\n" .
-			(!$phraseur->depth ? '' :
-				('(' .
-					_T('erreur_balise_non_fermee') .
-					' <tt>' .
-					$phraseur->ouvrant[$phraseur->depth] .
-					'</tt> ' .
-					_T('ligne') .
-					' ' .
-					$phraseur->reperes[$phraseur->depth] .
+			. "<br />\n".
+			(!$phraseur->depth ? '' : ('('.
+					_T('erreur_balise_non_fermee').
+					' <tt>'.
+					$phraseur->ouvrant[$phraseur->depth].
+					'</tt> '.
+					_T('ligne').
+					' '.
+					$phraseur->reperes[$phraseur->depth].
 			") <br />\n"))
 		);
 	}
@@ -181,7 +180,7 @@ 
 	// et escamoter le doctype que sax mange en php5 mais pas en  php4
 	if (!$doctype) {
 		if (!$r = analyser_doctype($page)) {
-			$page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
+			$page = _MESSAGE_DOCTYPE._DOCTYPE_ECRIRE
 				. preg_replace(_REGEXP_DOCTYPE, '', $page);
 			$r = analyser_doctype($page);
 		}
@@ -288,18 +287,18 @@ 
 					'rss-0.91.dtd'
 				];
 			} else {
-				$dtd = $topelement . '.dtd';
+				$dtd = $topelement.'.dtd';
 				$f = find_in_path($dtd);
 				if (file_exists($f)) {
 					return [$entete, 'SYSTEM', $f, $dtd];
 				}
 			}
 		}
-		spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
+		spip_log('Dtd pas vu pour '.substr($data, 0, 100));
 
 		return [];
 	}
-	[$entete, , $topelement, $avail, $suite] = $page;
+	[$entete,, $topelement, $avail, $suite] = $page;
 
 	if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
 		if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {

ecrire/req/pg.exp.php

Spacing +83 added lines, -84 removed lines

@@ -64,7 +64,7 @@ 
 	if (!$link) {
 		$erreurs[] = pg_last_error();
 		foreach ($erreurs as $e) {
-			spip_log('Echec pg_connect. Erreur : ' . $e, 'pg.' . _LOG_HS);
+			spip_log('Echec pg_connect. Erreur : '.$e, 'pg.'._LOG_HS);
 		}
 
 		return false;
@@ -82,8 +82,8 @@ 
 	}
 
 	spip_log(
-		"Connexion vers $host, base $db, prefixe $prefixe " . ($link ? 'operationnelle' : 'impossible'),
-		'pg.' . _LOG_DEBUG
+		"Connexion vers $host, base $db, prefixe $prefixe ".($link ? 'operationnelle' : 'impossible'),
+		'pg.'._LOG_DEBUG
 	);
 
 	return !$link ? false : [
@@ -171,7 +171,7 @@ 
 	} else {
 		$suite = '';
 	}
-	$query = preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+	$query = preg_replace('/([,\s])spip_/', '\1'.$prefixe.'_', $query).$suite;
 
 	// renvoyer la requete inerte si demandee
 	if (!$requeter) {
@@ -239,7 +239,7 @@ 
 	// ou revoir l'api de sql_alter en creant un
 	// sql_alter_table($table,array($actions));
 	if (!preg_match('/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is', $query, $regs)) {
-		spip_log("$query mal comprise", 'pg.' . _LOG_ERREUR);
+		spip_log("$query mal comprise", 'pg.'._LOG_ERREUR);
 
 		return false;
 	}
@@ -252,7 +252,7 @@ 
 	$i = 0;
 	$ouverte = false;
 	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . ',' . $do : $do;
+		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i].','.$do : $do;
 		$o = (str_contains($do, '('));
 		$f = (str_contains($do, ')'));
 		if ($o and !$f) {
@@ -265,33 +265,33 @@ 
 		}
 	}
 	$todo = $todo2;
-	$query = $debut . ' ' . array_shift($todo);
+	$query = $debut.' '.array_shift($todo);
 
 	if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
-		spip_log("$query incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("$query incompris", 'pg.'._LOG_ERREUR);
 	} else {
 		if ($r[1]) {
-			spip_log("j'ignore IGNORE dans $query", 'pg.' . _LOG_AVERTISSEMENT);
+			spip_log("j'ignore IGNORE dans $query", 'pg.'._LOG_AVERTISSEMENT);
 		}
-		$f = 'spip_pg_alter_' . strtolower($r[3]);
+		$f = 'spip_pg_alter_'.strtolower($r[3]);
 		if (function_exists($f)) {
 			$f($r[2], $r[4], $serveur, $requeter);
 		} else {
-			spip_log("$query non prevu", 'pg.' . _LOG_ERREUR);
+			spip_log("$query non prevu", 'pg.'._LOG_ERREUR);
 		}
 	}
 	// Alter a plusieurs args. Faudrait optimiser.
 	if ($todo) {
-		spip_pg_alter("TABLE $table " . join(',', $todo));
+		spip_pg_alter("TABLE $table ".join(',', $todo));
 	}
 }
 
 function spip_pg_alter_change($table, $arg, $serveur = '', $requeter = true) {
 	if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i', $arg, $r)) {
-		spip_log("alter change: $arg  incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("alter change: $arg  incompris", 'pg.'._LOG_ERREUR);
 	} else {
 		[, $old, $new, $type, $default, $null, $def2] = $r;
-		$actions = ["ALTER $old TYPE " . mysql2pg_type($type)];
+		$actions = ["ALTER $old TYPE ".mysql2pg_type($type)];
 		if ($null) {
 			$actions[] = "ALTER $old SET NOT NULL";
 		} else {
@@ -304,7 +304,7 @@ 
 			$actions[] = "ALTER $old DROP DEFAULT";
 		}
 
-		spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
+		spip_pg_query("ALTER TABLE $table ".join(', ', $actions));
 
 		if ($old != $new) {
 			spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
@@ -315,7 +315,7 @@ 
 function spip_pg_alter_add($table, $arg, $serveur = '', $requeter = true) {
 	$nom_index = null;
 	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
-		spip_log("alter add $arg  incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("alter add $arg  incompris", 'pg.'._LOG_ERREUR);
 
 		return null;
 	}
@@ -325,14 +325,14 @@ 
 			$m[2] = $n[1];
 		}
 
-		return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
+		return spip_pg_query("ALTER TABLE $table ADD ".$m[1].' '.mysql2pg_type($m[2]), $serveur, $requeter);
 	} elseif ($r[1][0] == 'P') {
 		// la primary peut etre sur plusieurs champs
 		$r[2] = trim(str_replace('`', '', $r[2]));
 		$m = ($r[2][0] == '(') ? substr($r[2], 1, -1) : $r[2];
 
 		return spip_pg_query(
-			"ALTER TABLE $table ADD CONSTRAINT $table" . '_pkey PRIMARY KEY (' . $m . ')',
+			"ALTER TABLE $table ADD CONSTRAINT $table".'_pkey PRIMARY KEY ('.$m.')',
 			$serveur,
 			$requeter
 		);
@@ -351,7 +351,7 @@ 
 				$colonnes = substr($m[1], 1, -1);
 				if (str_contains(',', $colonnes)) {
 					spip_log('PG : Erreur, impossible de creer un index sur plusieurs colonnes'
-						. " sans qu'il ait de nom ($table, ($colonnes))", 'pg.' . _LOG_ERREUR);
+						. " sans qu'il ait de nom ($table, ($colonnes))", 'pg.'._LOG_ERREUR);
 				} else {
 					$nom_index = $colonnes;
 				}
@@ -367,23 +367,23 @@ 
 
 function spip_pg_alter_drop($table, $arg, $serveur = '', $requeter = true) {
 	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r)) {
-		spip_log("alter drop: $arg  incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("alter drop: $arg  incompris", 'pg.'._LOG_ERREUR);
 	} else {
 		if (!$r[1] or $r[1] == 'COLUMN') {
-			return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
+			return spip_pg_query("ALTER TABLE $table DROP ".$r[2], $serveur);
 		} elseif ($r[1][0] == 'P') {
-			return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
+			return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table".'_pkey', $serveur);
 		} else {
-			return spip_pg_query('DROP INDEX ' . $table . '_' . $r[2], $serveur);
+			return spip_pg_query('DROP INDEX '.$table.'_'.$r[2], $serveur);
 		}
 	}
 }
 
 function spip_pg_alter_modify($table, $arg, $serveur = '', $requeter = true) {
 	if (!preg_match('/^`?(\w+)`?\s+(.*)$/', $arg, $r)) {
-		spip_log("alter modify: $arg  incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("alter modify: $arg  incompris", 'pg.'._LOG_ERREUR);
 	} else {
-		return spip_pg_alter_change($table, $r[1] . ' ' . $arg, $serveur = '', $requeter = true);
+		return spip_pg_alter_change($table, $r[1].' '.$arg, $serveur = '', $requeter = true);
 	}
 }
 
@@ -399,7 +399,7 @@ 
 	} elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
 		$rename = $r[2];
 	} else {
-		spip_log("alter rename: $arg  incompris", 'pg.' . _LOG_ERREUR);
+		spip_log("alter rename: $arg  incompris", 'pg.'._LOG_ERREUR);
 	}
 
 	return $rename ? spip_pg_query("ALTER TABLE $table RENAME TO $rename") : false;
@@ -420,8 +420,8 @@ 
 function spip_pg_create_index($nom, $table, $champs, $serveur = '', $requeter = true) {
 	if (!($nom or $table or $champs)) {
 		spip_log(
-			"Champ manquant pour creer un index pg ($nom, $table, (" . @join(',', $champs) . '))',
-			'pg.' . _LOG_ERREUR
+			"Champ manquant pour creer un index pg ($nom, $table, (".@join(',', $champs).'))',
+			'pg.'._LOG_ERREUR
 		);
 
 		return false;
@@ -432,7 +432,7 @@ 
 
 	// PG ne differentie pas noms des index en fonction des tables
 	// il faut donc creer des noms uniques d'index pour une base pg
-	$nom = $table . '_' . $nom;
+	$nom = $table.'_'.$nom;
 	// enlever d'eventuelles parentheses deja presentes sur champs
 	if (!is_array($champs)) {
 		if ($champs[0] == '(') {
@@ -440,7 +440,7 @@ 
 		}
 		$champs = [$champs];
 	}
-	$query = "CREATE INDEX $nom ON $table (" . join(',', $champs) . ')';
+	$query = "CREATE INDEX $nom ON $table (".join(',', $champs).')';
 	if (!$requeter) {
 		return $query;
 	}
@@ -463,7 +463,7 @@ 
 	} else {
 		$suite = '';
 	}
-	$query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+	$query = 'EXPLAIN '.preg_replace('/([,\s])spip_/', '\1'.$prefixe.'_', $query).$suite;
 
 	if (!$requeter) {
 		return $query;
@@ -556,16 +556,16 @@ 
 		}
 	}
 	$from = spip_pg_from($from, $prefixe);
-	$query = 'SELECT ' . $select
+	$query = 'SELECT '.$select
 		. (!$from ? '' : "\nFROM $from")
-		. (!$where ? '' : ("\nWHERE " . (!is_array($where) ? calculer_pg_where($where) : (join(
+		. (!$where ? '' : ("\nWHERE ".(!is_array($where) ? calculer_pg_where($where) : (join(
 			"\n\tAND ",
 			array_map('calculer_pg_where', $where)
 		)))))
 		. spip_pg_groupby($groupby, $from, $select)
 		. (!$having ? '' : "\nHAVING $having")
 		. ($orderby ? ("\nORDER BY $orderby") : '')
-		. (!$limit ? '' : (" LIMIT $count" . (!$offset ? '' : " OFFSET $offset")));
+		. (!$limit ? '' : (" LIMIT $count".(!$offset ? '' : " OFFSET $offset")));
 
 	// renvoyer la requete inerte si demandee
 	if ($requeter === false) {
@@ -586,7 +586,7 @@ 
 		$from = spip_pg_select_as($from);
 	}
 
-	return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1' . $prefixe . '_', $from);
+	return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1'.$prefixe.'_', $from);
 }
 
 function spip_pg_orderby($order, $select) {
@@ -594,7 +594,7 @@ 
 	$arg = (is_array($order) ? $order : preg_split('/\s*,\s*/', $order));
 
 	foreach ($arg as $v) {
-		if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v . '/', $select, $m)) {
+		if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+'.$v.'/', $select, $m)) {
 			$res[] = $m[1];
 		} else {
 			$res[] = $v;
@@ -772,7 +772,7 @@ 
 			$n++;
 			$res .= "\nwhen $index=$v then $n";
 		}
-		$arg = $m[1] . "case $res else 0 end "
+		$arg = $m[1]."case $res else 0 end "
 			. substr($arg, strlen($m[0]));
 	}
 
@@ -815,9 +815,9 @@ 
 	}
 
 	if (strtoupper($join) === 'AND') {
-		return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
+		return $exp.join("\n\t$join ", array_map('calculer_pg_where', $v));
 	} else {
-		return $exp . join($join, $v);
+		return $exp.join($join, $v);
 	}
 }
 
@@ -827,7 +827,7 @@ 
 		if (substr($k, -1) == '@') {
 			// c'est une jointure qui se refere au from precedent
 			// pas de virgule
-			$argsas .= '  ' . $v;
+			$argsas .= '  '.$v;
 		} else {
 			$as = '';
 			//  spip_log("$k : $v", _LOG_DEBUG);
@@ -837,7 +837,7 @@ 
 				} elseif ($v != $k) {
 					$p = strpos($v, ' ');
 					if ($p) {
-						$v = substr($v, 0, $p) . " AS $k" . substr($v, $p);
+						$v = substr($v, 0, $p)." AS $k".substr($v, $p);
 					} else {
 						$as = " AS $k";
 					}
@@ -845,7 +845,7 @@ 
 			}
 			// spip_log("subs $k : $v avec $as", _LOG_DEBUG);
 			// if (strpos($v, 'JOIN') === false)  $argsas .= ', ';
-			$argsas .= ', ' . $v . $as;
+			$argsas .= ', '.$v.$as;
 		}
 	}
 
@@ -876,7 +876,7 @@ 
 	$serveur = '',
 	$requeter = true
 ) {
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
+	$c = !$groupby ? '*' : ('DISTINCT '.(is_string($groupby) ? $groupby : join(',', $groupby)));
 	$r = spip_pg_select("COUNT($c)", $from, $where, '', '', '', $having, $serveur, $requeter);
 	if (!$requeter) {
 		return $r;
@@ -977,8 +977,8 @@ 
 
 	return spip_pg_insert(
 		$table,
-		'(' . join(',', array_keys($couples)) . ')',
-		'(' . join(',', $couples) . ')',
+		'('.join(',', array_keys($couples)).')',
+		'('.join(',', $couples).')',
 		$desc,
 		$serveur,
 		$requeter
@@ -1001,7 +1001,7 @@ 
 	$c = $tab_couples[0] ?? [];
 	$les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
 
-	$cles = '(' . join(',', array_keys($les_cles)) . ')';
+	$cles = '('.join(',', array_keys($les_cles)).')';
 	$valeurs = [];
 	foreach ($tab_couples as $couples) {
 		foreach ($couples as $champ => $val) {
@@ -1010,7 +1010,7 @@ 
 		// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
 		$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
 
-		$valeurs[] = '(' . join(',', $couples) . ')';
+		$valeurs[] = '('.join(',', $couples).')';
 	}
 	$valeurs = implode(', ', $valeurs);
 
@@ -1031,7 +1031,7 @@ 
 
 	$set = [];
 	foreach ($couples as $champ => $val) {
-		$set[] = $champ . '=' . $val;
+		$set[] = $champ.'='.$val;
 	}
 
 	$query = calculer_pg_expression('UPDATE', $table, ',')
@@ -1066,7 +1066,7 @@ 
 
 function spip_pg_replace($table, $values, $desc, $serveur = '', $requeter = true) {
 	if (!$values) {
-		spip_log("replace vide $table", 'pg.' . _LOG_AVERTISSEMENT);
+		spip_log("replace vide $table", 'pg.'._LOG_AVERTISSEMENT);
 
 		return 0;
 	}
@@ -1100,8 +1100,8 @@ 
 	if (!$where) {
 		return spip_pg_insert(
 			$table,
-			'(' . join(',', array_keys($values)) . ')',
-			'(' . join(',', $values) . ')',
+			'('.join(',', array_keys($values)).')',
+			'('.join(',', $values).')',
 			$desc,
 			$serveur
 		);
@@ -1122,12 +1122,11 @@ 
 		$couples = pg_affected_rows($couples);
 	}
 	if (!$couples) {
-		$ret = !$seq ? '' :
-			(" RETURNING nextval('$seq') < $prim");
-		$connexion['last'] = $q = "INSERT INTO $table (" . join(',', array_keys($values)) . ') VALUES (' . join(
+		$ret = !$seq ? '' : (" RETURNING nextval('$seq') < $prim");
+		$connexion['last'] = $q = "INSERT INTO $table (".join(',', array_keys($values)).') VALUES ('.join(
 			',',
 			$values
-		) . ")$ret";
+		).")$ret";
 		$couples = spip_pg_query_simple($link, $q);
 		if (!$couples) {
 			return false;
@@ -1175,7 +1174,7 @@ 
 	) {
 		return '';
 	} else {
-		return $raw ? $prim : $table . '_' . $prim . '_seq';
+		return $raw ? $prim : $table.'_'.$prim.'_seq';
 	}
 }
 
@@ -1192,29 +1191,29 @@ 
 			return spip_pg_frommysql($v);
 		} else {
 			if (strncmp($v, '0000', 4) == 0) {
-				$v = '0001' . substr($v, 4);
+				$v = '0001'.substr($v, 4);
 			}
 			if (strpos($v, '-00-00') === 4) {
-				$v = substr($v, 0, 4) . '-01-01' . substr($v, 10);
+				$v = substr($v, 0, 4).'-01-01'.substr($v, 10);
 			}
 
 			return "timestamp '$v'";
 		}
 	} elseif (!sql_test_int($t)) {
-		return ("'" . pg_escape_string($v) . "'");
+		return ("'".pg_escape_string($v)."'");
 	} elseif (is_numeric($v) or (strpos($v, 'CAST(') === 0)) {
 		return $v;
 	} elseif ($v[0] == '0' and $v[1] !== 'x' and ctype_xdigit(substr($v, 1))) {
 		return substr($v, 1);
 	} else {
-		spip_log("Warning: '$v'  n'est pas de type $t", 'pg.' . _LOG_AVERTISSEMENT);
+		spip_log("Warning: '$v'  n'est pas de type $t", 'pg.'._LOG_AVERTISSEMENT);
 
 		return intval($v);
 	}
 }
 
 function spip_pg_hex($v) {
-	return "CAST(x'" . $v . "' as bigint)";
+	return "CAST(x'".$v."' as bigint)";
 }
 
 function spip_pg_quote($v, $type = '') {
@@ -1252,15 +1251,15 @@ 
 		return $not ? '0=0' : '0=1';
 	}
 	if (strpos($valeurs, "CAST(x'") !== false) {
-		return "($val=" . join("OR $val=", explode(',', $valeurs)) . ')';
+		return "($val=".join("OR $val=", explode(',', $valeurs)).')';
 	}
 	$n = $i = 0;
 	$in_sql = '';
 	while ($n = strpos($valeurs, ',', $n + 1)) {
 		if ((++$i) >= 255) {
-			$in_sql .= "($val $not IN (" .
-				substr($valeurs, 0, $n) .
-				"))\n" .
+			$in_sql .= "($val $not IN (".
+				substr($valeurs, 0, $n).
+				"))\n".
 				($not ? "AND\t" : "OR\t");
 			$valeurs = substr($valeurs, $n + 1);
 			$i = $n = 0;
@@ -1276,7 +1275,7 @@ 
 	$s = $link ? pg_last_error($link) : pg_last_error();
 	if ($s) {
 		$s = str_replace('ERROR', 'errcode: 1000 ', $s);
-		spip_log("$s - $query", 'pg.' . _LOG_ERREUR);
+		spip_log("$s - $query", 'pg.'._LOG_ERREUR);
 	}
 
 	return $s;
@@ -1324,7 +1323,7 @@ 
 function spip_pg_showbase($match, $serveur = '', $requeter = true) {
 	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
 	$link = $connexion['link'];
-	$connexion['last'] = $q = 'SELECT tablename FROM pg_tables WHERE tablename ILIKE ' . _q($match);
+	$connexion['last'] = $q = 'SELECT tablename FROM pg_tables WHERE tablename ILIKE '._q($match);
 
 	return spip_pg_query_simple($link, $q);
 }
@@ -1332,7 +1331,7 @@ 
 function spip_pg_showtable($nom_table, $serveur = '', $requeter = true) {
 	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
 	$link = $connexion['link'];
-	$connexion['last'] = $q = 'SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE ' . _q($nom_table);
+	$connexion['last'] = $q = 'SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE '._q($nom_table);
 
 	$res = spip_pg_query_simple($link, $q);
 	if (!$res) {
@@ -1343,15 +1342,15 @@ 
 	// il faut en tenir compte dans le return
 	$fields = [];
 	while ($field = pg_fetch_array($res, null, PGSQL_NUM)) {
-		$fields[$field[0]] = $field[2] . (!$field[1] ? '' : (' DEFAULT ' . $field[1]));
+		$fields[$field[0]] = $field[2].(!$field[1] ? '' : (' DEFAULT '.$field[1]));
 	}
-	$connexion['last'] = $q = 'SELECT indexdef FROM pg_indexes WHERE tablename ILIKE ' . _q($nom_table);
+	$connexion['last'] = $q = 'SELECT indexdef FROM pg_indexes WHERE tablename ILIKE '._q($nom_table);
 	$res = spip_pg_query_simple($link, $q);
 	$keys = [];
 	while ($index = pg_fetch_array($res, null, PGSQL_NUM)) {
 		if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0], $r)) {
-			$nom = str_replace($nom_table . '_', '', $r[2]);
-			$keys[($r[1] ? 'PRIMARY KEY' : ('KEY ' . $nom))] = $r[3];
+			$nom = str_replace($nom_table.'_', '', $r[2]);
+			$keys[($r[1] ? 'PRIMARY KEY' : ('KEY '.$nom))] = $r[3];
 		}
 	}
 
@@ -1383,16 +1382,16 @@ 
 		if (strpos($k, 'KEY ') === 0) {
 			$n = str_replace('`', '', $k);
 			$v = str_replace('`', '"', $v);
-			$i = $nom . preg_replace('/KEY +/', '_', $n);
+			$i = $nom.preg_replace('/KEY +/', '_', $n);
 			if ($k != $n) {
 				$i = "\"$i\"";
 			}
 			$keys[] = "CREATE INDEX $i ON $nom ($v);";
 		} elseif (strpos($k, 'UNIQUE ') === 0) {
 			$k = preg_replace('/^UNIQUE +/', '', $k);
-			$prim .= "$s\n\t\tCONSTRAINT " . str_replace('`', '"', $k) . " UNIQUE ($v)";
+			$prim .= "$s\n\t\tCONSTRAINT ".str_replace('`', '"', $k)." UNIQUE ($v)";
 		} else {
-			$prim .= "$s\n\t\t" . str_replace('`', '"', $k) . " ($v)";
+			$prim .= "$s\n\t\t".str_replace('`', '"', $k)." ($v)";
 		}
 		if ($k == 'PRIMARY KEY') {
 			$prim_name = $v;
@@ -1403,17 +1402,17 @@ 
 
 	$character_set = '';
 	if (@$GLOBALS['meta']['charset_sql_base']) {
-		$character_set .= ' CHARACTER SET ' . $GLOBALS['meta']['charset_sql_base'];
+		$character_set .= ' CHARACTER SET '.$GLOBALS['meta']['charset_sql_base'];
 	}
 	if (@$GLOBALS['meta']['charset_collation_sql_base']) {
-		$character_set .= ' COLLATE ' . $GLOBALS['meta']['charset_collation_sql_base'];
+		$character_set .= ' COLLATE '.$GLOBALS['meta']['charset_collation_sql_base'];
 	}
 
 	foreach ($champs as $k => $v) {
 		$k = str_replace('`', '"', $k);
 		if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i', $v, $defs)) {
 			if (preg_match(',(char|text),i', $defs[1]) and !preg_match(',binary,i', $defs[1])) {
-				$v = $defs[1] . $character_set . ' ' . substr($v, strlen($defs[1]));
+				$v = $defs[1].$character_set.' '.substr($v, strlen($defs[1]));
 			}
 		}
 
@@ -1428,7 +1427,7 @@ 
 
 	// En l'absence de "if not exists" en PG, on neutralise les erreurs
 
-	$q = "CREATE $temporary TABLE $nom ($query" . ($prim ? ",$prim" : '') . ')' .
+	$q = "CREATE $temporary TABLE $nom ($query".($prim ? ",$prim" : '').')'.
 		($character_set ? " DEFAULT $character_set" : '')
 		. "\n";
 
@@ -1439,7 +1438,7 @@ 
 	$r = @pg_query($link, $q);
 
 	if (!$r) {
-		spip_log("Impossible de creer cette table: $q", 'pg.' . _LOG_ERREUR);
+		spip_log("Impossible de creer cette table: $q", 'pg.'._LOG_ERREUR);
 	} else {
 		foreach ($keys as $index) {
 			pg_query($link, $index);
@@ -1462,20 +1461,20 @@ 
 	// vue deja presente
 	if (sql_showtable($nom, false, $serveur)) {
 		if ($requeter) {
-			spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.' . _LOG_ERREUR);
+			spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.'._LOG_ERREUR);
 		}
 
 		return false;
 	}
 
-	$query = "CREATE VIEW $nom AS " . $query_select;
+	$query = "CREATE VIEW $nom AS ".$query_select;
 
 	return spip_pg_query($query, $serveur, $requeter);
 }
 
 
 function spip_pg_set_connect_charset($charset, $serveur = '', $requeter = true) {
-	spip_log('changement de charset sql a ecrire en PG', 'pg.' . _LOG_ERREUR);
+	spip_log('changement de charset sql a ecrire en PG', 'pg.'._LOG_ERREUR);
 }
 
 
@@ -1488,7 +1487,7 @@ 
  * @return bool|string true / false / requete
  **/
 function spip_pg_optimize($table, $serveur = '', $requeter = true) {
-	return spip_pg_query('VACUUM ' . $table, $serveur, $requeter);
+	return spip_pg_query('VACUUM '.$table, $serveur, $requeter);
 }
 
 // Selectionner la sous-chaine dans $objet

Indentation +1177 added lines, -1177 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('_DEFAULT_DB', 'spip');
@@ -30,159 +30,159 @@ 
 // si ca ne marche toujours pas, echec.
 
 function req_pg_dist($addr, $port, $login, #[\SensitiveParameter] $pass, $db = '', $prefixe = '') {
-	static $last_connect = [];
-	if (!extension_loaded('pgsql')) {
-		return false;
-	}
-
-	// si provient de selectdb
-	if (empty($addr) && empty($port) && empty($login) && empty($pass)) {
-		foreach (['addr', 'port', 'login', 'pass', 'prefixe'] as $a) {
-			${$a} = $last_connect[$a];
-		}
-	}
-	[$host, $p] = array_pad(explode(';', $addr), 2, null);
-	if ($p > 0) {
-		$port = " port=$p";
-	} else {
-		$port = '';
-	}
-	$erreurs = [];
-	if ($db) {
-		@$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
-	} elseif (!@$link = pg_connect("host=$host$port user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
-		$erreurs[] = pg_last_error();
-		if (@$link = pg_connect("host=$host$port dbname=$login user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
-			$db = $login;
-		} else {
-			$erreurs[] = pg_last_error();
-			$db = _DEFAULT_DB;
-			$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
-		}
-	}
-	if (!$link) {
-		$erreurs[] = pg_last_error();
-		foreach ($erreurs as $e) {
-			spip_log('Echec pg_connect. Erreur : ' . $e, 'pg.' . _LOG_HS);
-		}
-
-		return false;
-	}
-
-	if ($link) {
-		$last_connect = [
-			'addr' => $addr,
-			'port' => $port,
-			'login' => $login,
-			'pass' => $pass,
-			'db' => $db,
-			'prefixe' => $prefixe,
-		];
-	}
-
-	spip_log(
-		"Connexion vers $host, base $db, prefixe $prefixe " . ($link ? 'operationnelle' : 'impossible'),
-		'pg.' . _LOG_DEBUG
-	);
-
-	return !$link ? false : [
-		'db' => $db,
-		'prefixe' => $prefixe ?: $db,
-		'link' => $link,
-	];
+    static $last_connect = [];
+    if (!extension_loaded('pgsql')) {
+        return false;
+    }
+
+    // si provient de selectdb
+    if (empty($addr) && empty($port) && empty($login) && empty($pass)) {
+        foreach (['addr', 'port', 'login', 'pass', 'prefixe'] as $a) {
+            ${$a} = $last_connect[$a];
+        }
+    }
+    [$host, $p] = array_pad(explode(';', $addr), 2, null);
+    if ($p > 0) {
+        $port = " port=$p";
+    } else {
+        $port = '';
+    }
+    $erreurs = [];
+    if ($db) {
+        @$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
+    } elseif (!@$link = pg_connect("host=$host$port user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
+        $erreurs[] = pg_last_error();
+        if (@$link = pg_connect("host=$host$port dbname=$login user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
+            $db = $login;
+        } else {
+            $erreurs[] = pg_last_error();
+            $db = _DEFAULT_DB;
+            $link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
+        }
+    }
+    if (!$link) {
+        $erreurs[] = pg_last_error();
+        foreach ($erreurs as $e) {
+            spip_log('Echec pg_connect. Erreur : ' . $e, 'pg.' . _LOG_HS);
+        }
+
+        return false;
+    }
+
+    if ($link) {
+        $last_connect = [
+            'addr' => $addr,
+            'port' => $port,
+            'login' => $login,
+            'pass' => $pass,
+            'db' => $db,
+            'prefixe' => $prefixe,
+        ];
+    }
+
+    spip_log(
+        "Connexion vers $host, base $db, prefixe $prefixe " . ($link ? 'operationnelle' : 'impossible'),
+        'pg.' . _LOG_DEBUG
+    );
+
+    return !$link ? false : [
+        'db' => $db,
+        'prefixe' => $prefixe ?: $db,
+        'link' => $link,
+    ];
 }
 
 $GLOBALS['spip_pg_functions_1'] = [
-	'alter' => 'spip_pg_alter',
-	'count' => 'spip_pg_count',
-	'countsel' => 'spip_pg_countsel',
-	'create' => 'spip_pg_create',
-	'create_base' => 'spip_pg_create_base',
-	'create_view' => 'spip_pg_create_view',
-	'date_proche' => 'spip_pg_date_proche',
-	'delete' => 'spip_pg_delete',
-	'drop_table' => 'spip_pg_drop_table',
-	'drop_view' => 'spip_pg_drop_view',
-	'errno' => 'spip_pg_errno',
-	'error' => 'spip_pg_error',
-	'explain' => 'spip_pg_explain',
-	'fetch' => 'spip_pg_fetch',
-	'seek' => 'spip_pg_seek',
-	'free' => 'spip_pg_free',
-	'hex' => 'spip_pg_hex',
-	'in' => 'spip_pg_in',
-	'insert' => 'spip_pg_insert',
-	'insertq' => 'spip_pg_insertq',
-	'insertq_multi' => 'spip_pg_insertq_multi',
-	'listdbs' => 'spip_pg_listdbs',
-	'multi' => 'spip_pg_multi',
-	'optimize' => 'spip_pg_optimize',
-	'query' => 'spip_pg_query',
-	'quote' => 'spip_pg_quote',
-	'replace' => 'spip_pg_replace',
-	'replace_multi' => 'spip_pg_replace_multi',
-	'select' => 'spip_pg_select',
-	'selectdb' => 'spip_pg_selectdb',
-	'set_connect_charset' => 'spip_pg_set_connect_charset',
-	'showbase' => 'spip_pg_showbase',
-	'showtable' => 'spip_pg_showtable',
-	'update' => 'spip_pg_update',
-	'updateq' => 'spip_pg_updateq',
+    'alter' => 'spip_pg_alter',
+    'count' => 'spip_pg_count',
+    'countsel' => 'spip_pg_countsel',
+    'create' => 'spip_pg_create',
+    'create_base' => 'spip_pg_create_base',
+    'create_view' => 'spip_pg_create_view',
+    'date_proche' => 'spip_pg_date_proche',
+    'delete' => 'spip_pg_delete',
+    'drop_table' => 'spip_pg_drop_table',
+    'drop_view' => 'spip_pg_drop_view',
+    'errno' => 'spip_pg_errno',
+    'error' => 'spip_pg_error',
+    'explain' => 'spip_pg_explain',
+    'fetch' => 'spip_pg_fetch',
+    'seek' => 'spip_pg_seek',
+    'free' => 'spip_pg_free',
+    'hex' => 'spip_pg_hex',
+    'in' => 'spip_pg_in',
+    'insert' => 'spip_pg_insert',
+    'insertq' => 'spip_pg_insertq',
+    'insertq_multi' => 'spip_pg_insertq_multi',
+    'listdbs' => 'spip_pg_listdbs',
+    'multi' => 'spip_pg_multi',
+    'optimize' => 'spip_pg_optimize',
+    'query' => 'spip_pg_query',
+    'quote' => 'spip_pg_quote',
+    'replace' => 'spip_pg_replace',
+    'replace_multi' => 'spip_pg_replace_multi',
+    'select' => 'spip_pg_select',
+    'selectdb' => 'spip_pg_selectdb',
+    'set_connect_charset' => 'spip_pg_set_connect_charset',
+    'showbase' => 'spip_pg_showbase',
+    'showtable' => 'spip_pg_showtable',
+    'update' => 'spip_pg_update',
+    'updateq' => 'spip_pg_updateq',
 ];
 
 // Par ou ca passe une fois les traductions faites
 function spip_pg_trace_query($query, $serveur = '') {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	if (isset($_GET['var_profile'])) {
-		include_spip('public/tracer');
-		$t = trace_query_start();
-		$e = '';
-	} else {
-		$t = 0;
-	}
-
-	$connexion['last'] = $query;
-	$r = spip_pg_query_simple($link, $query);
-
-	// Log de l'erreur eventuelle
-	if ($e = spip_pg_errno($serveur)) {
-		$e .= spip_pg_error($query, $serveur);
-	} // et du fautif
-	return $t ? trace_query_end($query, $t, $r, $e, $serveur) : $r;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    if (isset($_GET['var_profile'])) {
+        include_spip('public/tracer');
+        $t = trace_query_start();
+        $e = '';
+    } else {
+        $t = 0;
+    }
+
+    $connexion['last'] = $query;
+    $r = spip_pg_query_simple($link, $query);
+
+    // Log de l'erreur eventuelle
+    if ($e = spip_pg_errno($serveur)) {
+        $e .= spip_pg_error($query, $serveur);
+    } // et du fautif
+    return $t ? trace_query_end($query, $t, $r, $e, $serveur) : $r;
 }
 
 // Fonction de requete generale quand on est sur que c'est SQL standard.
 // Elle change juste le noms des tables ($table_prefix) dans le FROM etc
 
 function spip_pg_query($query, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/i', $query, $regs)) {
-		$suite = strstr($query, (string) $regs[0]);
-		$query = substr($query, 0, -strlen($suite));
-	} else {
-		$suite = '';
-	}
-	$query = preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
-
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
-
-	return spip_pg_trace_query($query, $serveur);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/i', $query, $regs)) {
+        $suite = strstr($query, (string) $regs[0]);
+        $query = substr($query, 0, -strlen($suite));
+    } else {
+        $suite = '';
+    }
+    $query = preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
+
+    return spip_pg_trace_query($query, $serveur);
 }
 
 function spip_pg_query_simple($link, $query) {
-	#spip_log(var_export($query,true), 'pg.'._LOG_DEBUG);
-	return pg_query($link, $query);
+    #spip_log(var_export($query,true), 'pg.'._LOG_DEBUG);
+    return pg_query($link, $query);
 }
 
 /*
@@ -194,196 +194,196 @@ 
  * de requetes showtable intempestives
  */
 function spip_pg_ajouter_champs_timestamp($table, $couples, $desc = '', $serveur = '') {
-	static $tables = [];
-
-	if (!isset($tables[$table])) {
-		if (!$desc) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$desc = $trouver_table($table, $serveur);
-			// si pas de description, on ne fait rien, ou on die() ?
-			if (!$desc) {
-				return $couples;
-			}
-		}
-
-		// recherche des champs avec simplement 'TIMESTAMP'
-		// cependant, il faudra peut etre etendre
-		// avec la gestion de DEFAULT et ON UPDATE
-		// mais ceux-ci ne sont pas utilises dans le core
-		$tables[$table] = [];
-		foreach ($desc['field'] as $k => $v) {
-			$v = strtolower(ltrim($v));
-			// ne pas ajouter de timestamp now() si un default est specifie
-			if (strpos($v, 'timestamp') === 0 and !str_contains($v, 'default')) {
-				$tables[$table][] = $k;
-			}
-		}
-	}
-
-	// ajout des champs type 'timestamp' absents
-	foreach ($tables[$table] as $maj) {
-		if (!array_key_exists($maj, $couples)) {
-			$couples[$maj] = 'NOW()';
-		}
-	}
-
-	return $couples;
+    static $tables = [];
+
+    if (!isset($tables[$table])) {
+        if (!$desc) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $desc = $trouver_table($table, $serveur);
+            // si pas de description, on ne fait rien, ou on die() ?
+            if (!$desc) {
+                return $couples;
+            }
+        }
+
+        // recherche des champs avec simplement 'TIMESTAMP'
+        // cependant, il faudra peut etre etendre
+        // avec la gestion de DEFAULT et ON UPDATE
+        // mais ceux-ci ne sont pas utilises dans le core
+        $tables[$table] = [];
+        foreach ($desc['field'] as $k => $v) {
+            $v = strtolower(ltrim($v));
+            // ne pas ajouter de timestamp now() si un default est specifie
+            if (strpos($v, 'timestamp') === 0 and !str_contains($v, 'default')) {
+                $tables[$table][] = $k;
+            }
+        }
+    }
+
+    // ajout des champs type 'timestamp' absents
+    foreach ($tables[$table] as $maj) {
+        if (!array_key_exists($maj, $couples)) {
+            $couples[$maj] = 'NOW()';
+        }
+    }
+
+    return $couples;
 }
 
 
 // Alter en PG ne traite pas les index
 function spip_pg_alter($query, $serveur = '', $requeter = true) {
-	// il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
-	// tout en cassant en deux alter distincts "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"...
-	// ou revoir l'api de sql_alter en creant un
-	// sql_alter_table($table,array($actions));
-	if (!preg_match('/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is', $query, $regs)) {
-		spip_log("$query mal comprise", 'pg.' . _LOG_ERREUR);
-
-		return false;
-	}
-	$debut = $regs[1];
-	$table = $regs[3];
-	$suite = $regs[4];
-	$todo = explode(',', $suite);
-	// on remet les morceaux dechires ensembles... que c'est laid !
-	$todo2 = [];
-	$i = 0;
-	$ouverte = false;
-	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . ',' . $do : $do;
-		$o = (str_contains($do, '('));
-		$f = (str_contains($do, ')'));
-		if ($o and !$f) {
-			$ouverte = true;
-		} elseif ($f) {
-			$ouverte = false;
-		}
-		if (!$ouverte) {
-			$i++;
-		}
-	}
-	$todo = $todo2;
-	$query = $debut . ' ' . array_shift($todo);
-
-	if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
-		spip_log("$query incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		if ($r[1]) {
-			spip_log("j'ignore IGNORE dans $query", 'pg.' . _LOG_AVERTISSEMENT);
-		}
-		$f = 'spip_pg_alter_' . strtolower($r[3]);
-		if (function_exists($f)) {
-			$f($r[2], $r[4], $serveur, $requeter);
-		} else {
-			spip_log("$query non prevu", 'pg.' . _LOG_ERREUR);
-		}
-	}
-	// Alter a plusieurs args. Faudrait optimiser.
-	if ($todo) {
-		spip_pg_alter("TABLE $table " . join(',', $todo));
-	}
+    // il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
+    // tout en cassant en deux alter distincts "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"...
+    // ou revoir l'api de sql_alter en creant un
+    // sql_alter_table($table,array($actions));
+    if (!preg_match('/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is', $query, $regs)) {
+        spip_log("$query mal comprise", 'pg.' . _LOG_ERREUR);
+
+        return false;
+    }
+    $debut = $regs[1];
+    $table = $regs[3];
+    $suite = $regs[4];
+    $todo = explode(',', $suite);
+    // on remet les morceaux dechires ensembles... que c'est laid !
+    $todo2 = [];
+    $i = 0;
+    $ouverte = false;
+    while ($do = array_shift($todo)) {
+        $todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . ',' . $do : $do;
+        $o = (str_contains($do, '('));
+        $f = (str_contains($do, ')'));
+        if ($o and !$f) {
+            $ouverte = true;
+        } elseif ($f) {
+            $ouverte = false;
+        }
+        if (!$ouverte) {
+            $i++;
+        }
+    }
+    $todo = $todo2;
+    $query = $debut . ' ' . array_shift($todo);
+
+    if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
+        spip_log("$query incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        if ($r[1]) {
+            spip_log("j'ignore IGNORE dans $query", 'pg.' . _LOG_AVERTISSEMENT);
+        }
+        $f = 'spip_pg_alter_' . strtolower($r[3]);
+        if (function_exists($f)) {
+            $f($r[2], $r[4], $serveur, $requeter);
+        } else {
+            spip_log("$query non prevu", 'pg.' . _LOG_ERREUR);
+        }
+    }
+    // Alter a plusieurs args. Faudrait optimiser.
+    if ($todo) {
+        spip_pg_alter("TABLE $table " . join(',', $todo));
+    }
 }
 
 function spip_pg_alter_change($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i', $arg, $r)) {
-		spip_log("alter change: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		[, $old, $new, $type, $default, $null, $def2] = $r;
-		$actions = ["ALTER $old TYPE " . mysql2pg_type($type)];
-		if ($null) {
-			$actions[] = "ALTER $old SET NOT NULL";
-		} else {
-			$actions[] = "ALTER $old DROP NOT NULL";
-		}
-
-		if ($d = ($default ?: $def2)) {
-			$actions[] = "ALTER $old SET $d";
-		} else {
-			$actions[] = "ALTER $old DROP DEFAULT";
-		}
-
-		spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
-
-		if ($old != $new) {
-			spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
-		}
-	}
+    if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i', $arg, $r)) {
+        spip_log("alter change: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        [, $old, $new, $type, $default, $null, $def2] = $r;
+        $actions = ["ALTER $old TYPE " . mysql2pg_type($type)];
+        if ($null) {
+            $actions[] = "ALTER $old SET NOT NULL";
+        } else {
+            $actions[] = "ALTER $old DROP NOT NULL";
+        }
+
+        if ($d = ($default ?: $def2)) {
+            $actions[] = "ALTER $old SET $d";
+        } else {
+            $actions[] = "ALTER $old DROP DEFAULT";
+        }
+
+        spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
+
+        if ($old != $new) {
+            spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
+        }
+    }
 }
 
 function spip_pg_alter_add($table, $arg, $serveur = '', $requeter = true) {
-	$nom_index = null;
-	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
-		spip_log("alter add $arg  incompris", 'pg.' . _LOG_ERREUR);
-
-		return null;
-	}
-	if (!$r[1] or $r[1] == 'COLUMN') {
-		preg_match('/`?(\w+)`?(.*)/', $r[2], $m);
-		if (preg_match('/^(.*)(BEFORE|AFTER|FIRST)(.*)$/is', $m[2], $n)) {
-			$m[2] = $n[1];
-		}
-
-		return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
-	} elseif ($r[1][0] == 'P') {
-		// la primary peut etre sur plusieurs champs
-		$r[2] = trim(str_replace('`', '', $r[2]));
-		$m = ($r[2][0] == '(') ? substr($r[2], 1, -1) : $r[2];
-
-		return spip_pg_query(
-			"ALTER TABLE $table ADD CONSTRAINT $table" . '_pkey PRIMARY KEY (' . $m . ')',
-			$serveur,
-			$requeter
-		);
-	} else {
-		preg_match('/([^\s,]*)\s*(.*)?/', $r[2], $m);
-		// peut etre "(colonne)" ou "nom_index (colonnes)"
-		// bug potentiel si qqn met "(colonne, colonne)"
-		//
-		// nom_index (colonnes)
-		if ($m[2]) {
-			$colonnes = substr($m[2], 1, -1);
-			$nom_index = $m[1];
-		} else {
-			// (colonne)
-			if ($m[1][0] == '(') {
-				$colonnes = substr($m[1], 1, -1);
-				if (str_contains(',', $colonnes)) {
-					spip_log('PG : Erreur, impossible de creer un index sur plusieurs colonnes'
-						. " sans qu'il ait de nom ($table, ($colonnes))", 'pg.' . _LOG_ERREUR);
-				} else {
-					$nom_index = $colonnes;
-				}
-			} // nom_index
-			else {
-				$nom_index = $colonnes = $m[1];
-			}
-		}
-
-		return spip_pg_create_index($nom_index, $table, $colonnes, $serveur, $requeter);
-	}
+    $nom_index = null;
+    if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
+        spip_log("alter add $arg  incompris", 'pg.' . _LOG_ERREUR);
+
+        return null;
+    }
+    if (!$r[1] or $r[1] == 'COLUMN') {
+        preg_match('/`?(\w+)`?(.*)/', $r[2], $m);
+        if (preg_match('/^(.*)(BEFORE|AFTER|FIRST)(.*)$/is', $m[2], $n)) {
+            $m[2] = $n[1];
+        }
+
+        return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
+    } elseif ($r[1][0] == 'P') {
+        // la primary peut etre sur plusieurs champs
+        $r[2] = trim(str_replace('`', '', $r[2]));
+        $m = ($r[2][0] == '(') ? substr($r[2], 1, -1) : $r[2];
+
+        return spip_pg_query(
+            "ALTER TABLE $table ADD CONSTRAINT $table" . '_pkey PRIMARY KEY (' . $m . ')',
+            $serveur,
+            $requeter
+        );
+    } else {
+        preg_match('/([^\s,]*)\s*(.*)?/', $r[2], $m);
+        // peut etre "(colonne)" ou "nom_index (colonnes)"
+        // bug potentiel si qqn met "(colonne, colonne)"
+        //
+        // nom_index (colonnes)
+        if ($m[2]) {
+            $colonnes = substr($m[2], 1, -1);
+            $nom_index = $m[1];
+        } else {
+            // (colonne)
+            if ($m[1][0] == '(') {
+                $colonnes = substr($m[1], 1, -1);
+                if (str_contains(',', $colonnes)) {
+                    spip_log('PG : Erreur, impossible de creer un index sur plusieurs colonnes'
+                        . " sans qu'il ait de nom ($table, ($colonnes))", 'pg.' . _LOG_ERREUR);
+                } else {
+                    $nom_index = $colonnes;
+                }
+            } // nom_index
+            else {
+                $nom_index = $colonnes = $m[1];
+            }
+        }
+
+        return spip_pg_create_index($nom_index, $table, $colonnes, $serveur, $requeter);
+    }
 }
 
 function spip_pg_alter_drop($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r)) {
-		spip_log("alter drop: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		if (!$r[1] or $r[1] == 'COLUMN') {
-			return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
-		} elseif ($r[1][0] == 'P') {
-			return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
-		} else {
-			return spip_pg_query('DROP INDEX ' . $table . '_' . $r[2], $serveur);
-		}
-	}
+    if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r)) {
+        spip_log("alter drop: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        if (!$r[1] or $r[1] == 'COLUMN') {
+            return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
+        } elseif ($r[1][0] == 'P') {
+            return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
+        } else {
+            return spip_pg_query('DROP INDEX ' . $table . '_' . $r[2], $serveur);
+        }
+    }
 }
 
 function spip_pg_alter_modify($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^`?(\w+)`?\s+(.*)$/', $arg, $r)) {
-		spip_log("alter modify: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		return spip_pg_alter_change($table, $r[1] . ' ' . $arg, $serveur = '', $requeter = true);
-	}
+    if (!preg_match('/^`?(\w+)`?\s+(.*)$/', $arg, $r)) {
+        spip_log("alter modify: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        return spip_pg_alter_change($table, $r[1] . ' ' . $arg, $serveur = '', $requeter = true);
+    }
 }
 
 // attention (en pg) :
@@ -391,17 +391,17 @@ 
 // - alter table A rename X to Y = changer le nom de la colonne X en Y
 // pour l'instant, traiter simplement RENAME TO X
 function spip_pg_alter_rename($table, $arg, $serveur = '', $requeter = true) {
-	$rename = '';
-	// si TO, mais pas au debut
-	if (!stripos($arg, 'TO ')) {
-		$rename = $arg;
-	} elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
-		$rename = $r[2];
-	} else {
-		spip_log("alter rename: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	}
-
-	return $rename ? spip_pg_query("ALTER TABLE $table RENAME TO $rename") : false;
+    $rename = '';
+    // si TO, mais pas au debut
+    if (!stripos($arg, 'TO ')) {
+        $rename = $arg;
+    } elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
+        $rename = $r[2];
+    } else {
+        spip_log("alter rename: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    }
+
+    return $rename ? spip_pg_query("ALTER TABLE $table RENAME TO $rename") : false;
 }
 
 
@@ -417,59 +417,59 @@ 
  * @return bool ou requete
  */
 function spip_pg_create_index($nom, $table, $champs, $serveur = '', $requeter = true) {
-	if (!($nom or $table or $champs)) {
-		spip_log(
-			"Champ manquant pour creer un index pg ($nom, $table, (" . @join(',', $champs) . '))',
-			'pg.' . _LOG_ERREUR
-		);
-
-		return false;
-	}
-
-	$nom = str_replace('`', '', $nom);
-	$champs = str_replace('`', '', $champs);
-
-	// PG ne differentie pas noms des index en fonction des tables
-	// il faut donc creer des noms uniques d'index pour une base pg
-	$nom = $table . '_' . $nom;
-	// enlever d'eventuelles parentheses deja presentes sur champs
-	if (!is_array($champs)) {
-		if ($champs[0] == '(') {
-			$champs = substr($champs, 1, -1);
-		}
-		$champs = [$champs];
-	}
-	$query = "CREATE INDEX $nom ON $table (" . join(',', $champs) . ')';
-	if (!$requeter) {
-		return $query;
-	}
-	$res = spip_pg_query($query, $serveur, $requeter);
-
-	return $res;
+    if (!($nom or $table or $champs)) {
+        spip_log(
+            "Champ manquant pour creer un index pg ($nom, $table, (" . @join(',', $champs) . '))',
+            'pg.' . _LOG_ERREUR
+        );
+
+        return false;
+    }
+
+    $nom = str_replace('`', '', $nom);
+    $champs = str_replace('`', '', $champs);
+
+    // PG ne differentie pas noms des index en fonction des tables
+    // il faut donc creer des noms uniques d'index pour une base pg
+    $nom = $table . '_' . $nom;
+    // enlever d'eventuelles parentheses deja presentes sur champs
+    if (!is_array($champs)) {
+        if ($champs[0] == '(') {
+            $champs = substr($champs, 1, -1);
+        }
+        $champs = [$champs];
+    }
+    $query = "CREATE INDEX $nom ON $table (" . join(',', $champs) . ')';
+    if (!$requeter) {
+        return $query;
+    }
+    $res = spip_pg_query($query, $serveur, $requeter);
+
+    return $res;
 }
 
 
 function spip_pg_explain($query, $serveur = '', $requeter = true) {
-	if (strpos(ltrim($query), 'SELECT') !== 0) {
-		return [];
-	}
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	if (preg_match('/\s(SET|VALUES|WHERE)\s/i', $query, $regs)) {
-		$suite = strstr($query, (string) $regs[0]);
-		$query = substr($query, 0, -strlen($suite));
-	} else {
-		$suite = '';
-	}
-	$query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
-
-	if (!$requeter) {
-		return $query;
-	}
-	$r = spip_pg_query_simple($link, $query);
-
-	return spip_pg_fetch($r, null, $serveur);
+    if (strpos(ltrim($query), 'SELECT') !== 0) {
+        return [];
+    }
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    if (preg_match('/\s(SET|VALUES|WHERE)\s/i', $query, $regs)) {
+        $suite = strstr($query, (string) $regs[0]);
+        $query = substr($query, 0, -strlen($suite));
+    } else {
+        $suite = '';
+    }
+    $query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+
+    if (!$requeter) {
+        return $query;
+    }
+    $r = spip_pg_query_simple($link, $query);
+
+    return spip_pg_fetch($r, null, $serveur);
 }
 
 
@@ -488,92 +488,92 @@ 
  *     - False en cas d'erreur.
  **/
 function spip_pg_selectdb($db, $serveur = '', $requeter = true) {
-	// se connecter a la base indiquee
-	// avec les identifiants connus
-	$index = $serveur ? strtolower($serveur) : 0;
+    // se connecter a la base indiquee
+    // avec les identifiants connus
+    $index = $serveur ? strtolower($serveur) : 0;
 
-	if ($link = spip_connect_db('', '', '', '', $db, 'pg', '', '')) {
-		if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
-			return $db;
-		}
-	}
+    if ($link = spip_connect_db('', '', '', '', $db, 'pg', '', '')) {
+        if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
+            return $db;
+        }
+    }
 
-	return false;
+    return false;
 }
 
 // Qu'une seule base pour le moment
 
 function spip_pg_listdbs($serveur) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$dbs = [];
-	$res = spip_pg_query_simple($link, 'select * From pg_database');
-	while ($row = pg_fetch_array($res, null, PGSQL_NUM)) {
-		$dbs[] = reset($row);
-	}
-
-	return $dbs;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $dbs = [];
+    $res = spip_pg_query_simple($link, 'select * From pg_database');
+    while ($row = pg_fetch_array($res, null, PGSQL_NUM)) {
+        $dbs[] = reset($row);
+    }
+
+    return $dbs;
 }
 
 function spip_pg_select(
-	$select,
-	$from,
-	$where = '',
-	$groupby = [],
-	$orderby = '',
-	$limit = '',
-	$having = '',
-	$serveur = '',
-	$requeter = true
+    $select,
+    $from,
+    $where = '',
+    $groupby = [],
+    $orderby = '',
+    $limit = '',
+    $having = '',
+    $serveur = '',
+    $requeter = true
 ) {
 
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	$limit = preg_match('/^\s*(([0-9]+),)?\s*([0-9]+)\s*$/', $limit, $limatch);
-	if ($limit) {
-		$offset = $limatch[2];
-		$count = $limatch[3];
-	}
-
-	$select = spip_pg_frommysql($select);
-
-	// si pas de tri explicitement demande, le GROUP BY ne
-	// contient que la clef primaire.
-	// lui ajouter alors le champ de tri par defaut
-	if (preg_match('/FIELD\(([a-z]+\.[a-z]+),/i', $orderby[0], $groupbyplus)) {
-		$groupby[] = $groupbyplus[1];
-	}
-
-	$orderby = spip_pg_orderby($orderby, $select);
-
-	if ($having) {
-		if (is_array($having)) {
-			$having = join("\n\tAND ", array_map('calculer_pg_where', $having));
-		}
-	}
-	$from = spip_pg_from($from, $prefixe);
-	$query = 'SELECT ' . $select
-		. (!$from ? '' : "\nFROM $from")
-		. (!$where ? '' : ("\nWHERE " . (!is_array($where) ? calculer_pg_where($where) : (join(
-			"\n\tAND ",
-			array_map('calculer_pg_where', $where)
-		)))))
-		. spip_pg_groupby($groupby, $from, $select)
-		. (!$having ? '' : "\nHAVING $having")
-		. ($orderby ? ("\nORDER BY $orderby") : '')
-		. (!$limit ? '' : (" LIMIT $count" . (!$offset ? '' : " OFFSET $offset")));
-
-	// renvoyer la requete inerte si demandee
-	if ($requeter === false) {
-		return $query;
-	}
-
-	$r = spip_pg_trace_query($query, $serveur);
-
-	return $r ?: $query;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    $limit = preg_match('/^\s*(([0-9]+),)?\s*([0-9]+)\s*$/', $limit, $limatch);
+    if ($limit) {
+        $offset = $limatch[2];
+        $count = $limatch[3];
+    }
+
+    $select = spip_pg_frommysql($select);
+
+    // si pas de tri explicitement demande, le GROUP BY ne
+    // contient que la clef primaire.
+    // lui ajouter alors le champ de tri par defaut
+    if (preg_match('/FIELD\(([a-z]+\.[a-z]+),/i', $orderby[0], $groupbyplus)) {
+        $groupby[] = $groupbyplus[1];
+    }
+
+    $orderby = spip_pg_orderby($orderby, $select);
+
+    if ($having) {
+        if (is_array($having)) {
+            $having = join("\n\tAND ", array_map('calculer_pg_where', $having));
+        }
+    }
+    $from = spip_pg_from($from, $prefixe);
+    $query = 'SELECT ' . $select
+        . (!$from ? '' : "\nFROM $from")
+        . (!$where ? '' : ("\nWHERE " . (!is_array($where) ? calculer_pg_where($where) : (join(
+            "\n\tAND ",
+            array_map('calculer_pg_where', $where)
+        )))))
+        . spip_pg_groupby($groupby, $from, $select)
+        . (!$having ? '' : "\nHAVING $having")
+        . ($orderby ? ("\nORDER BY $orderby") : '')
+        . (!$limit ? '' : (" LIMIT $count" . (!$offset ? '' : " OFFSET $offset")));
+
+    // renvoyer la requete inerte si demandee
+    if ($requeter === false) {
+        return $query;
+    }
+
+    $r = spip_pg_trace_query($query, $serveur);
+
+    return $r ?: $query;
 ;
 }
 
@@ -581,26 +581,26 @@ 
 // car le reste de la requete utilise les alias (AS) systematiquement
 
 function spip_pg_from($from, $prefixe) {
-	if (is_array($from)) {
-		$from = spip_pg_select_as($from);
-	}
+    if (is_array($from)) {
+        $from = spip_pg_select_as($from);
+    }
 
-	return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1' . $prefixe . '_', $from);
+    return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1' . $prefixe . '_', $from);
 }
 
 function spip_pg_orderby($order, $select) {
-	$res = [];
-	$arg = (is_array($order) ? $order : preg_split('/\s*,\s*/', $order));
-
-	foreach ($arg as $v) {
-		if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v . '/', $select, $m)) {
-			$res[] = $m[1];
-		} else {
-			$res[] = $v;
-		}
-	}
-
-	return spip_pg_frommysql(join(',', $res));
+    $res = [];
+    $arg = (is_array($order) ? $order : preg_split('/\s*,\s*/', $order));
+
+    foreach ($arg as $v) {
+        if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v . '/', $select, $m)) {
+            $res[] = $m[1];
+        } else {
+            $res[] = $v;
+        }
+    }
+
+    return spip_pg_frommysql(join(',', $res));
 }
 
 // Conversion a l'arrach' des jointures MySQL en jointures PG
@@ -608,56 +608,56 @@ 
 // et pour enlever les repetitions (sans incidence de perf, mais ca fait sale)
 
 function spip_pg_groupby($groupby, $from, $select) {
-	$join = strpos($from, ',');
-	// ismplifier avant de decouper
-	if (is_string($select)) { // fct SQL sur colonne et constante apostrophee ==> la colonne
-	$select = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $select);
-	}
-
-	if ($join or $groupby) {
-		$join = is_array($select) ? $select : explode(', ', $select);
-	}
-	if ($join) {
-		// enlever les 0 as points, '', ...
-		foreach ($join as $k => $v) {
-			$v = str_replace('DISTINCT ', '', $v);
-			// fct SQL sur colonne et constante apostrophee ==> la colonne
-			$v = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $v);
-			$v = preg_replace('/CAST\(\s*([^(),\' ]*\s+)as\s*\w+\)/', '\\1', $v);
-			// resultat d'agregat ne sont pas a mettre dans le groupby
-			$v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)(\s*AS\s+\w+)\s*,?/i', '', $v);
-			// idem sans AS (fetch numerique)
-			$v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)\s*,?/i', '', $v);
-			// des AS simples : on garde le cote droit du AS
-			$v = preg_replace('/^.*\sAS\s+(\w+)\s*$/i', '\\1', $v);
-			// ne reste plus que les vrais colonnes, ou des constantes a virer
-			if (preg_match(',^[\'"],', $v) or is_numeric($v)) {
-				unset($join[$k]);
-			} else {
-				$join[$k] = trim($v);
-			}
-		}
-		$join = array_diff($join, ['']);
-		$join = implode(',', $join);
-	}
-	if (is_array($groupby)) {
-		$groupby = join(',', $groupby);
-	}
-	if ($join) {
-		$groupby = $groupby ? "$groupby, $join" : $join;
-	}
-	if (!$groupby) {
-		return '';
-	}
-
-	$groupby = spip_pg_frommysql($groupby);
-	// Ne pas mettre dans le Group-By des valeurs numeriques
-	// issue de prepare_recherche
-	$groupby = preg_replace('/^\s*\d+\s+AS\s+\w+\s*,?\s*/i', '', $groupby);
-	$groupby = preg_replace('/,\s*\d+\s+AS\s+\w+\s*/i', '', $groupby);
-	$groupby = preg_replace('/\s+AS\s+\w+\s*/i', '', $groupby);
-
-	return "\nGROUP BY $groupby";
+    $join = strpos($from, ',');
+    // ismplifier avant de decouper
+    if (is_string($select)) { // fct SQL sur colonne et constante apostrophee ==> la colonne
+    $select = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $select);
+    }
+
+    if ($join or $groupby) {
+        $join = is_array($select) ? $select : explode(', ', $select);
+    }
+    if ($join) {
+        // enlever les 0 as points, '', ...
+        foreach ($join as $k => $v) {
+            $v = str_replace('DISTINCT ', '', $v);
+            // fct SQL sur colonne et constante apostrophee ==> la colonne
+            $v = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $v);
+            $v = preg_replace('/CAST\(\s*([^(),\' ]*\s+)as\s*\w+\)/', '\\1', $v);
+            // resultat d'agregat ne sont pas a mettre dans le groupby
+            $v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)(\s*AS\s+\w+)\s*,?/i', '', $v);
+            // idem sans AS (fetch numerique)
+            $v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)\s*,?/i', '', $v);
+            // des AS simples : on garde le cote droit du AS
+            $v = preg_replace('/^.*\sAS\s+(\w+)\s*$/i', '\\1', $v);
+            // ne reste plus que les vrais colonnes, ou des constantes a virer
+            if (preg_match(',^[\'"],', $v) or is_numeric($v)) {
+                unset($join[$k]);
+            } else {
+                $join[$k] = trim($v);
+            }
+        }
+        $join = array_diff($join, ['']);
+        $join = implode(',', $join);
+    }
+    if (is_array($groupby)) {
+        $groupby = join(',', $groupby);
+    }
+    if ($join) {
+        $groupby = $groupby ? "$groupby, $join" : $join;
+    }
+    if (!$groupby) {
+        return '';
+    }
+
+    $groupby = spip_pg_frommysql($groupby);
+    // Ne pas mettre dans le Group-By des valeurs numeriques
+    // issue de prepare_recherche
+    $groupby = preg_replace('/^\s*\d+\s+AS\s+\w+\s*,?\s*/i', '', $groupby);
+    $groupby = preg_replace('/,\s*\d+\s+AS\s+\w+\s*/i', '', $groupby);
+    $groupby = preg_replace('/\s+AS\s+\w+\s*/i', '', $groupby);
+
+    return "\nGROUP BY $groupby";
 }
 
 // Conversion des operateurs MySQL en PG
@@ -668,492 +668,492 @@ 
 // A ameliorer.
 
 function spip_pg_frommysql($arg) {
-	if (is_array($arg)) {
-		$arg = join(', ', $arg);
-	}
-
-	$res = spip_pg_fromfield($arg);
-
-	$res = preg_replace('/\brand[(][)]/i', 'random()', $res);
-
-	$res = preg_replace(
-		'/\b0\.0[+]([a-zA-Z0-9_.]+)\s*/',
-		'CAST(substring(\1, \'^ *[0-9.]+\') as float)',
-		$res
-	);
-	$res = preg_replace(
-		'/\b0[+]([a-zA-Z0-9_.]+)\s*/',
-		'CAST(substring(\1, \'^ *[0-9]+\') as int)',
-		$res
-	);
-	$res = preg_replace(
-		'/\bconv[(]([^,]*)[^)]*[)]/i',
-		'CAST(substring(\1, \'^ *[0-9]+\') as int)',
-		$res
-	);
-
-	$res = preg_replace(
-		'/UNIX_TIMESTAMP\s*[(]\s*[)]/',
-		' EXTRACT(epoch FROM NOW())',
-		$res
-	);
-
-	// la fonction md5(integer) n'est pas connu en pg
-	// il faut donc forcer les types en text (cas de md5(id_article))
-	$res = preg_replace(
-		'/md5\s*[(]([^)]*)[)]/i',
-		'MD5(CAST(\1 AS text))',
-		$res
-	);
-
-	$res = preg_replace(
-		'/UNIX_TIMESTAMP\s*[(]([^)]*)[)]/',
-		' EXTRACT(epoch FROM \1)',
-		$res
-	);
-
-	$res = preg_replace(
-		'/\bDAYOFMONTH\s*[(]([^()]*([(][^()]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(day FROM \1)',
-		$res
-	);
-
-	$res = preg_replace(
-		'/\bMONTH\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(month FROM \1)',
-		$res
-	);
-
-	$res = preg_replace(
-		'/\bYEAR\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(year FROM \1)',
-		$res
-	);
-
-	$res = preg_replace(
-		'/TO_DAYS\s*[(]([^()]*([(][^)]*[)][()]*)*)[)]/',
-		' EXTRACT(day FROM \1 - \'0001-01-01\')',
-		$res
-	);
-
-	$res = preg_replace('/(EXTRACT[(][^ ]* FROM *)"([^"]*)"/', '\1\'\2\'', $res);
-
-	$res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m%d\'[)]/', 'to_char(\1, \'YYYYMMDD\')', $res);
-
-	$res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m\'[)]/', 'to_char(\1, \'YYYYMM\')', $res);
-
-	$res = preg_replace('/DATE_SUB\s*[(]([^,]*),/', '(\1 -', $res);
-	$res = preg_replace('/DATE_ADD\s*[(]([^,]*),/', '(\1 +', $res);
-	$res = preg_replace('/INTERVAL\s+(\d+\s+\w+)/', 'INTERVAL \'\1\'', $res);
-	$res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\s+\d+:\d+(:\d+)\')/', '\1 timestamp \2', $res);
-	$res = preg_replace('/(\'\d+-\d+-\d+\s+\d+:\d+:\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
-
-	$res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\')/', '\1 timestamp \2', $res);
-	$res = preg_replace('/(\'\d+-\d+-\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
-
-	$res = preg_replace('/(timestamp .\d+)-00-/', '\1-01-', $res);
-	$res = preg_replace('/(timestamp .\d+-\d+)-00/', '\1-01', $res);
+    if (is_array($arg)) {
+        $arg = join(', ', $arg);
+    }
+
+    $res = spip_pg_fromfield($arg);
+
+    $res = preg_replace('/\brand[(][)]/i', 'random()', $res);
+
+    $res = preg_replace(
+        '/\b0\.0[+]([a-zA-Z0-9_.]+)\s*/',
+        'CAST(substring(\1, \'^ *[0-9.]+\') as float)',
+        $res
+    );
+    $res = preg_replace(
+        '/\b0[+]([a-zA-Z0-9_.]+)\s*/',
+        'CAST(substring(\1, \'^ *[0-9]+\') as int)',
+        $res
+    );
+    $res = preg_replace(
+        '/\bconv[(]([^,]*)[^)]*[)]/i',
+        'CAST(substring(\1, \'^ *[0-9]+\') as int)',
+        $res
+    );
+
+    $res = preg_replace(
+        '/UNIX_TIMESTAMP\s*[(]\s*[)]/',
+        ' EXTRACT(epoch FROM NOW())',
+        $res
+    );
+
+    // la fonction md5(integer) n'est pas connu en pg
+    // il faut donc forcer les types en text (cas de md5(id_article))
+    $res = preg_replace(
+        '/md5\s*[(]([^)]*)[)]/i',
+        'MD5(CAST(\1 AS text))',
+        $res
+    );
+
+    $res = preg_replace(
+        '/UNIX_TIMESTAMP\s*[(]([^)]*)[)]/',
+        ' EXTRACT(epoch FROM \1)',
+        $res
+    );
+
+    $res = preg_replace(
+        '/\bDAYOFMONTH\s*[(]([^()]*([(][^()]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(day FROM \1)',
+        $res
+    );
+
+    $res = preg_replace(
+        '/\bMONTH\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(month FROM \1)',
+        $res
+    );
+
+    $res = preg_replace(
+        '/\bYEAR\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(year FROM \1)',
+        $res
+    );
+
+    $res = preg_replace(
+        '/TO_DAYS\s*[(]([^()]*([(][^)]*[)][()]*)*)[)]/',
+        ' EXTRACT(day FROM \1 - \'0001-01-01\')',
+        $res
+    );
+
+    $res = preg_replace('/(EXTRACT[(][^ ]* FROM *)"([^"]*)"/', '\1\'\2\'', $res);
+
+    $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m%d\'[)]/', 'to_char(\1, \'YYYYMMDD\')', $res);
+
+    $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m\'[)]/', 'to_char(\1, \'YYYYMM\')', $res);
+
+    $res = preg_replace('/DATE_SUB\s*[(]([^,]*),/', '(\1 -', $res);
+    $res = preg_replace('/DATE_ADD\s*[(]([^,]*),/', '(\1 +', $res);
+    $res = preg_replace('/INTERVAL\s+(\d+\s+\w+)/', 'INTERVAL \'\1\'', $res);
+    $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\s+\d+:\d+(:\d+)\')/', '\1 timestamp \2', $res);
+    $res = preg_replace('/(\'\d+-\d+-\d+\s+\d+:\d+:\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
+
+    $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\')/', '\1 timestamp \2', $res);
+    $res = preg_replace('/(\'\d+-\d+-\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
+
+    $res = preg_replace('/(timestamp .\d+)-00-/', '\1-01-', $res);
+    $res = preg_replace('/(timestamp .\d+-\d+)-00/', '\1-01', $res);
 # correct en theorie mais produit des debordements arithmetiques
 #	$res = preg_replace("/(EXTRACT[(][^ ]* FROM *)(timestamp *'[^']*' *[+-] *timestamp *'[^']*') *[)]/", '\2', $res);
-	$res = preg_replace("/(EXTRACT[(][^ ]* FROM *)('[^']*')/", '\1 timestamp \2', $res);
-	$res = preg_replace('/\sLIKE\s+/', ' ILIKE ', $res);
+    $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)('[^']*')/", '\1 timestamp \2', $res);
+    $res = preg_replace('/\sLIKE\s+/', ' ILIKE ', $res);
 
-	return str_replace('REGEXP', '~', $res);
+    return str_replace('REGEXP', '~', $res);
 }
 
 function spip_pg_fromfield($arg) {
-	while (preg_match('/^(.*?)FIELD\s*\(([^,]*)((,[^,)]*)*)\)/', $arg, $m)) {
-		preg_match_all('/,([^,]*)/', $m[3], $r, PREG_PATTERN_ORDER);
-		$res = '';
-		$n = 0;
-		$index = $m[2];
-		foreach ($r[1] as $v) {
-			$n++;
-			$res .= "\nwhen $index=$v then $n";
-		}
-		$arg = $m[1] . "case $res else 0 end "
-			. substr($arg, strlen($m[0]));
-	}
-
-	return $arg;
+    while (preg_match('/^(.*?)FIELD\s*\(([^,]*)((,[^,)]*)*)\)/', $arg, $m)) {
+        preg_match_all('/,([^,]*)/', $m[3], $r, PREG_PATTERN_ORDER);
+        $res = '';
+        $n = 0;
+        $index = $m[2];
+        foreach ($r[1] as $v) {
+            $n++;
+            $res .= "\nwhen $index=$v then $n";
+        }
+        $arg = $m[1] . "case $res else 0 end "
+            . substr($arg, strlen($m[0]));
+    }
+
+    return $arg;
 }
 
 function calculer_pg_where($v) {
-	if (!is_array($v)) {
-		return spip_pg_frommysql($v);
-	}
-
-	$op = str_replace('REGEXP', '~', array_shift($v));
-	if (!($n = count($v))) {
-		return $op;
-	} else {
-		$arg = calculer_pg_where(array_shift($v));
-		if ($n == 1) {
-			return "$op($arg)";
-		} else {
-			$arg2 = calculer_pg_where(array_shift($v));
-			if ($n == 2) {
-				return "($arg $op $arg2)";
-			} else {
-				return "($arg $op ($arg2) : $v[0])";
-			}
-		}
-	}
+    if (!is_array($v)) {
+        return spip_pg_frommysql($v);
+    }
+
+    $op = str_replace('REGEXP', '~', array_shift($v));
+    if (!($n = count($v))) {
+        return $op;
+    } else {
+        $arg = calculer_pg_where(array_shift($v));
+        if ($n == 1) {
+            return "$op($arg)";
+        } else {
+            $arg2 = calculer_pg_where(array_shift($v));
+            if ($n == 2) {
+                return "($arg $op $arg2)";
+            } else {
+                return "($arg $op ($arg2) : $v[0])";
+            }
+        }
+    }
 }
 
 
 function calculer_pg_expression($expression, $v, $join = 'AND') {
-	if (empty($v)) {
-		return '';
-	}
+    if (empty($v)) {
+        return '';
+    }
 
-	$exp = "\n$expression ";
+    $exp = "\n$expression ";
 
-	if (!is_array($v)) {
-		$v = [$v];
-	}
+    if (!is_array($v)) {
+        $v = [$v];
+    }
 
-	if (strtoupper($join) === 'AND') {
-		return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
-	} else {
-		return $exp . join($join, $v);
-	}
+    if (strtoupper($join) === 'AND') {
+        return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
+    } else {
+        return $exp . join($join, $v);
+    }
 }
 
 function spip_pg_select_as($args) {
-	$argsas = '';
-	foreach ($args as $k => $v) {
-		if (substr($k, -1) == '@') {
-			// c'est une jointure qui se refere au from precedent
-			// pas de virgule
-			$argsas .= '  ' . $v;
-		} else {
-			$as = '';
-			//  spip_log("$k : $v", _LOG_DEBUG);
-			if (!is_numeric($k)) {
-				if (preg_match('/\.(.*)$/', $k, $r)) {
-					$v = $k;
-				} elseif ($v != $k) {
-					$p = strpos($v, ' ');
-					if ($p) {
-						$v = substr($v, 0, $p) . " AS $k" . substr($v, $p);
-					} else {
-						$as = " AS $k";
-					}
-				}
-			}
-			// spip_log("subs $k : $v avec $as", _LOG_DEBUG);
-			// if (strpos($v, 'JOIN') === false)  $argsas .= ', ';
-			$argsas .= ', ' . $v . $as;
-		}
-	}
-
-	return substr($argsas, 2);
+    $argsas = '';
+    foreach ($args as $k => $v) {
+        if (substr($k, -1) == '@') {
+            // c'est une jointure qui se refere au from precedent
+            // pas de virgule
+            $argsas .= '  ' . $v;
+        } else {
+            $as = '';
+            //  spip_log("$k : $v", _LOG_DEBUG);
+            if (!is_numeric($k)) {
+                if (preg_match('/\.(.*)$/', $k, $r)) {
+                    $v = $k;
+                } elseif ($v != $k) {
+                    $p = strpos($v, ' ');
+                    if ($p) {
+                        $v = substr($v, 0, $p) . " AS $k" . substr($v, $p);
+                    } else {
+                        $as = " AS $k";
+                    }
+                }
+            }
+            // spip_log("subs $k : $v avec $as", _LOG_DEBUG);
+            // if (strpos($v, 'JOIN') === false)  $argsas .= ', ';
+            $argsas .= ', ' . $v . $as;
+        }
+    }
+
+    return substr($argsas, 2);
 }
 
 function spip_pg_fetch($res, $t = '', $serveur = '', $requeter = true) {
 
-	if ($res) {
-		$res = pg_fetch_array($res, null, PGSQL_ASSOC);
-	}
+    if ($res) {
+        $res = pg_fetch_array($res, null, PGSQL_ASSOC);
+    }
 
-	return $res;
+    return $res;
 }
 
 function spip_pg_seek($r, $row_number, $serveur = '', $requeter = true) {
-	if ($r) {
-		return pg_result_seek($r, $row_number);
-	}
+    if ($r) {
+        return pg_result_seek($r, $row_number);
+    }
 }
 
 
 function spip_pg_countsel(
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$having = [],
-	$serveur = '',
-	$requeter = true
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $having = [],
+    $serveur = '',
+    $requeter = true
 ) {
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
-	$r = spip_pg_select("COUNT($c)", $from, $where, '', '', '', $having, $serveur, $requeter);
-	if (!$requeter) {
-		return $r;
-	}
-	if (!is_resource($r)) {
-		return 0;
-	}
-	[$c] = pg_fetch_array($r, null, PGSQL_NUM);
-
-	return $c;
+    $c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
+    $r = spip_pg_select("COUNT($c)", $from, $where, '', '', '', $having, $serveur, $requeter);
+    if (!$requeter) {
+        return $r;
+    }
+    if (!is_resource($r)) {
+        return 0;
+    }
+    [$c] = pg_fetch_array($r, null, PGSQL_NUM);
+
+    return $c;
 }
 
 function spip_pg_count($res, $serveur = '', $requeter = true) {
-	return !$res ? 0 : pg_numrows($res);
+    return !$res ? 0 : pg_numrows($res);
 }
 
 function spip_pg_free($res, $serveur = '', $requeter = true) {
-	// rien a faire en postgres
+    // rien a faire en postgres
 }
 
 function spip_pg_delete($table, $where = '', $serveur = '', $requeter = true) {
 
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$table = prefixer_table_spip($table, $connexion['prefixe']);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $table = prefixer_table_spip($table, $connexion['prefixe']);
 
-	$query = calculer_pg_expression('DELETE FROM', $table, ',')
-		. calculer_pg_expression('WHERE', $where, 'AND');
+    $query = calculer_pg_expression('DELETE FROM', $table, ',')
+        . calculer_pg_expression('WHERE', $where, 'AND');
 
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
 
-	$res = spip_pg_trace_query($query, $serveur);
-	if ($res) {
-		return pg_affected_rows($res);
-	} else {
-		return false;
-	}
+    $res = spip_pg_trace_query($query, $serveur);
+    if ($res) {
+        return pg_affected_rows($res);
+    } else {
+        return false;
+    }
 }
 
 function spip_pg_insert($table, $champs, $valeurs, $desc = [], $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	$seq = spip_pg_sequence($table, true);
-	// si pas de cle primaire dans l'insertion, renvoyer curval
-	if (!preg_match(",\b$seq\b,", $champs)) {
-		$seq = spip_pg_sequence($table);
-		$seq = prefixer_table_spip($seq, $prefixe);
-		$seq = "currval('$seq')";
-	}
-
-	$table = prefixer_table_spip($table, $prefixe);
-	$ret = !$seq ? '' : (" RETURNING $seq");
-	$ins = (strlen($champs) < 3)
-		? ' DEFAULT VALUES'
-		: "$champs VALUES $valeurs";
-	$q = "INSERT INTO $table $ins $ret";
-	if (!$requeter) {
-		return $q;
-	}
-	$connexion['last'] = $q;
-	$r = spip_pg_query_simple($link, $q);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    $seq = spip_pg_sequence($table, true);
+    // si pas de cle primaire dans l'insertion, renvoyer curval
+    if (!preg_match(",\b$seq\b,", $champs)) {
+        $seq = spip_pg_sequence($table);
+        $seq = prefixer_table_spip($seq, $prefixe);
+        $seq = "currval('$seq')";
+    }
+
+    $table = prefixer_table_spip($table, $prefixe);
+    $ret = !$seq ? '' : (" RETURNING $seq");
+    $ins = (strlen($champs) < 3)
+        ? ' DEFAULT VALUES'
+        : "$champs VALUES $valeurs";
+    $q = "INSERT INTO $table $ins $ret";
+    if (!$requeter) {
+        return $q;
+    }
+    $connexion['last'] = $q;
+    $r = spip_pg_query_simple($link, $q);
 #	spip_log($q,'pg.'._LOG_DEBUG);
-	if ($r) {
-		if (!$ret) {
-			return 0;
-		}
-		if ($r2 = pg_fetch_array($r, null, PGSQL_NUM)) {
-			return $r2[0];
-		}
-	}
-
-	return false;
+    if ($r) {
+        if (!$ret) {
+            return 0;
+        }
+        if ($r2 = pg_fetch_array($r, null, PGSQL_NUM)) {
+            return $r2[0];
+        }
+    }
+
+    return false;
 }
 
 function spip_pg_insertq($table, $couples = [], $desc = [], $serveur = '', $requeter = true) {
 
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = $desc['field'];
-
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = spip_pg_cite($val, $fields[$champ]);
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
-
-	return spip_pg_insert(
-		$table,
-		'(' . join(',', array_keys($couples)) . ')',
-		'(' . join(',', $couples) . ')',
-		$desc,
-		$serveur,
-		$requeter
-	);
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = $desc['field'];
+
+    foreach ($couples as $champ => $val) {
+        $couples[$champ] = spip_pg_cite($val, $fields[$champ]);
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+
+    return spip_pg_insert(
+        $table,
+        '(' . join(',', array_keys($couples)) . ')',
+        '(' . join(',', $couples) . ')',
+        $desc,
+        $serveur,
+        $requeter
+    );
 }
 
 
 function spip_pg_insertq_multi($table, $tab_couples = [], $desc = [], $serveur = '', $requeter = true) {
 
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = $desc['field'] ?? [];
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	// une premiere fois pour ajouter maj dans les cles
-	$c = $tab_couples[0] ?? [];
-	$les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
-
-	$cles = '(' . join(',', array_keys($les_cles)) . ')';
-	$valeurs = [];
-	foreach ($tab_couples as $couples) {
-		foreach ($couples as $champ => $val) {
-			$couples[$champ] = spip_pg_cite($val, $fields[$champ]);
-		}
-		// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-		$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
-
-		$valeurs[] = '(' . join(',', $couples) . ')';
-	}
-	$valeurs = implode(', ', $valeurs);
-
-	return spip_pg_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = $desc['field'] ?? [];
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    // une premiere fois pour ajouter maj dans les cles
+    $c = $tab_couples[0] ?? [];
+    $les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
+
+    $cles = '(' . join(',', array_keys($les_cles)) . ')';
+    $valeurs = [];
+    foreach ($tab_couples as $couples) {
+        foreach ($couples as $champ => $val) {
+            $couples[$champ] = spip_pg_cite($val, $fields[$champ]);
+        }
+        // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+        $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+
+        $valeurs[] = '(' . join(',', $couples) . ')';
+    }
+    $valeurs = implode(', ', $valeurs);
+
+    return spip_pg_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
 }
 
 
 function spip_pg_update($table, $couples, $where = '', $desc = '', $serveur = '', $requeter = true) {
 
-	if (!$couples) {
-		return;
-	}
-	$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$table = prefixer_table_spip($table, $connexion['prefixe']);
+    if (!$couples) {
+        return;
+    }
+    $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $table = prefixer_table_spip($table, $connexion['prefixe']);
 
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
 
-	$set = [];
-	foreach ($couples as $champ => $val) {
-		$set[] = $champ . '=' . $val;
-	}
+    $set = [];
+    foreach ($couples as $champ => $val) {
+        $set[] = $champ . '=' . $val;
+    }
 
-	$query = calculer_pg_expression('UPDATE', $table, ',')
-		. calculer_pg_expression('SET', $set, ',')
-		. calculer_pg_expression('WHERE', $where, 'AND');
+    $query = calculer_pg_expression('UPDATE', $table, ',')
+        . calculer_pg_expression('SET', $set, ',')
+        . calculer_pg_expression('WHERE', $where, 'AND');
 
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
 
-	return spip_pg_trace_query($query, $serveur);
+    return spip_pg_trace_query($query, $serveur);
 }
 
 // idem, mais les valeurs sont des constantes a mettre entre apostrophes
 // sauf les expressions de date lorsqu'il s'agit de fonctions SQL (NOW etc)
 function spip_pg_updateq($table, $couples, $where = '', $desc = [], $serveur = '', $requeter = true) {
-	if (!$couples) {
-		return;
-	}
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	$fields = $desc['field'];
-	foreach ($couples as $k => $val) {
-		$couples[$k] = spip_pg_cite($val, $fields[$k]);
-	}
-
-	return spip_pg_update($table, $couples, $where, $desc, $serveur, $requeter);
+    if (!$couples) {
+        return;
+    }
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    $fields = $desc['field'];
+    foreach ($couples as $k => $val) {
+        $couples[$k] = spip_pg_cite($val, $fields[$k]);
+    }
+
+    return spip_pg_update($table, $couples, $where, $desc, $serveur, $requeter);
 }
 
 
 function spip_pg_replace($table, $values, $desc, $serveur = '', $requeter = true) {
-	if (!$values) {
-		spip_log("replace vide $table", 'pg.' . _LOG_AVERTISSEMENT);
-
-		return 0;
-	}
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$prim = $desc['key']['PRIMARY KEY'];
-	$ids = preg_split('/,\s*/', $prim);
-	$noprims = $prims = [];
-	foreach ($values as $k => $v) {
-		$values[$k] = $v = spip_pg_cite($v, $desc['field'][$k]);
-
-		if (!in_array($k, $ids)) {
-			$noprims[$k] = "$k=$v";
-		} else {
-			$prims[$k] = "$k=$v";
-		}
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$values = spip_pg_ajouter_champs_timestamp($table, $values, $desc, $serveur);
-
-	$where = join(' AND ', $prims);
-	if (!$where) {
-		return spip_pg_insert(
-			$table,
-			'(' . join(',', array_keys($values)) . ')',
-			'(' . join(',', $values) . ')',
-			$desc,
-			$serveur
-		);
-	}
-	$couples = join(',', $noprims);
-
-	$seq = spip_pg_sequence($table);
-	$table = prefixer_table_spip($table, $prefixe);
-	$seq = prefixer_table_spip($seq, $prefixe);
-
-	$connexion['last'] = $q = "UPDATE $table SET $couples WHERE $where";
-	if ($couples) {
-		$couples = spip_pg_query_simple($link, $q);
+    if (!$values) {
+        spip_log("replace vide $table", 'pg.' . _LOG_AVERTISSEMENT);
+
+        return 0;
+    }
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $prim = $desc['key']['PRIMARY KEY'];
+    $ids = preg_split('/,\s*/', $prim);
+    $noprims = $prims = [];
+    foreach ($values as $k => $v) {
+        $values[$k] = $v = spip_pg_cite($v, $desc['field'][$k]);
+
+        if (!in_array($k, $ids)) {
+            $noprims[$k] = "$k=$v";
+        } else {
+            $prims[$k] = "$k=$v";
+        }
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $values = spip_pg_ajouter_champs_timestamp($table, $values, $desc, $serveur);
+
+    $where = join(' AND ', $prims);
+    if (!$where) {
+        return spip_pg_insert(
+            $table,
+            '(' . join(',', array_keys($values)) . ')',
+            '(' . join(',', $values) . ')',
+            $desc,
+            $serveur
+        );
+    }
+    $couples = join(',', $noprims);
+
+    $seq = spip_pg_sequence($table);
+    $table = prefixer_table_spip($table, $prefixe);
+    $seq = prefixer_table_spip($seq, $prefixe);
+
+    $connexion['last'] = $q = "UPDATE $table SET $couples WHERE $where";
+    if ($couples) {
+        $couples = spip_pg_query_simple($link, $q);
 #	  spip_log($q,'pg.'._LOG_DEBUG);
-		if (!$couples) {
-			return false;
-		}
-		$couples = pg_affected_rows($couples);
-	}
-	if (!$couples) {
-		$ret = !$seq ? '' :
-			(" RETURNING nextval('$seq') < $prim");
-		$connexion['last'] = $q = "INSERT INTO $table (" . join(',', array_keys($values)) . ') VALUES (' . join(
-			',',
-			$values
-		) . ")$ret";
-		$couples = spip_pg_query_simple($link, $q);
-		if (!$couples) {
-			return false;
-		} elseif ($ret) {
-			$r = pg_fetch_array($couples, null, PGSQL_NUM);
-			if ($r[0]) {
-				$connexion['last'] = $q = "SELECT setval('$seq', $prim) from $table";
-				// Le code de SPIP met parfois la sequence a 0 (dans l'import)
-				// MySQL n'en dit rien, on fait pareil pour PG
-				$r = @pg_query($link, $q);
-			}
-		}
-	}
-
-	return $couples;
+        if (!$couples) {
+            return false;
+        }
+        $couples = pg_affected_rows($couples);
+    }
+    if (!$couples) {
+        $ret = !$seq ? '' :
+            (" RETURNING nextval('$seq') < $prim");
+        $connexion['last'] = $q = "INSERT INTO $table (" . join(',', array_keys($values)) . ') VALUES (' . join(
+            ',',
+            $values
+        ) . ")$ret";
+        $couples = spip_pg_query_simple($link, $q);
+        if (!$couples) {
+            return false;
+        } elseif ($ret) {
+            $r = pg_fetch_array($couples, null, PGSQL_NUM);
+            if ($r[0]) {
+                $connexion['last'] = $q = "SELECT setval('$seq', $prim) from $table";
+                // Le code de SPIP met parfois la sequence a 0 (dans l'import)
+                // MySQL n'en dit rien, on fait pareil pour PG
+                $r = @pg_query($link, $q);
+            }
+        }
+    }
+
+    return $couples;
 }
 
 
 function spip_pg_replace_multi($table, $tab_couples, $desc = [], $serveur = '', $requeter = true) {
-	$retour = null;
-	// boucler pour traiter chaque requete independemment
-	foreach ($tab_couples as $couples) {
-		$retour = spip_pg_replace($table, $couples, $desc, $serveur, $requeter);
-	}
-
-	// renvoie le dernier id
-	return $retour;
+    $retour = null;
+    // boucler pour traiter chaque requete independemment
+    foreach ($tab_couples as $couples) {
+        $retour = spip_pg_replace($table, $couples, $desc, $serveur, $requeter);
+    }
+
+    // renvoie le dernier id
+    return $retour;
 }
 
 
@@ -1162,149 +1162,149 @@ 
 
 function spip_pg_sequence($table, $raw = false) {
 
-	include_spip('base/serial');
-	if (!isset($GLOBALS['tables_principales'][$table])) {
-		return false;
-	}
-	$desc = $GLOBALS['tables_principales'][$table];
-	$prim = @$desc['key']['PRIMARY KEY'];
-	if (
-		!preg_match('/^\w+$/', $prim)
-		or !str_contains($desc['field'][$prim], 'int')
-	) {
-		return '';
-	} else {
-		return $raw ? $prim : $table . '_' . $prim . '_seq';
-	}
+    include_spip('base/serial');
+    if (!isset($GLOBALS['tables_principales'][$table])) {
+        return false;
+    }
+    $desc = $GLOBALS['tables_principales'][$table];
+    $prim = @$desc['key']['PRIMARY KEY'];
+    if (
+        !preg_match('/^\w+$/', $prim)
+        or !str_contains($desc['field'][$prim], 'int')
+    ) {
+        return '';
+    } else {
+        return $raw ? $prim : $table . '_' . $prim . '_seq';
+    }
 }
 
 // Explicite les conversions de Mysql d'une valeur $v de type $t
 // Dans le cas d'un champ date, pas d'apostrophe, c'est une syntaxe ad hoc
 
 function spip_pg_cite($v, $t) {
-	if (is_null($v)) {
-		return 'NULL';
-	} // null php se traduit en NULL SQL
-
-	if (sql_test_date($t)) {
-		if ($v and (strpos('0123456789', (string) $v[0]) === false)) {
-			return spip_pg_frommysql($v);
-		} else {
-			if (strncmp($v, '0000', 4) == 0) {
-				$v = '0001' . substr($v, 4);
-			}
-			if (strpos($v, '-00-00') === 4) {
-				$v = substr($v, 0, 4) . '-01-01' . substr($v, 10);
-			}
-
-			return "timestamp '$v'";
-		}
-	} elseif (!sql_test_int($t)) {
-		return ("'" . pg_escape_string($v) . "'");
-	} elseif (is_numeric($v) or (strpos($v, 'CAST(') === 0)) {
-		return $v;
-	} elseif ($v[0] == '0' and $v[1] !== 'x' and ctype_xdigit(substr($v, 1))) {
-		return substr($v, 1);
-	} else {
-		spip_log("Warning: '$v'  n'est pas de type $t", 'pg.' . _LOG_AVERTISSEMENT);
-
-		return intval($v);
-	}
+    if (is_null($v)) {
+        return 'NULL';
+    } // null php se traduit en NULL SQL
+
+    if (sql_test_date($t)) {
+        if ($v and (strpos('0123456789', (string) $v[0]) === false)) {
+            return spip_pg_frommysql($v);
+        } else {
+            if (strncmp($v, '0000', 4) == 0) {
+                $v = '0001' . substr($v, 4);
+            }
+            if (strpos($v, '-00-00') === 4) {
+                $v = substr($v, 0, 4) . '-01-01' . substr($v, 10);
+            }
+
+            return "timestamp '$v'";
+        }
+    } elseif (!sql_test_int($t)) {
+        return ("'" . pg_escape_string($v) . "'");
+    } elseif (is_numeric($v) or (strpos($v, 'CAST(') === 0)) {
+        return $v;
+    } elseif ($v[0] == '0' and $v[1] !== 'x' and ctype_xdigit(substr($v, 1))) {
+        return substr($v, 1);
+    } else {
+        spip_log("Warning: '$v'  n'est pas de type $t", 'pg.' . _LOG_AVERTISSEMENT);
+
+        return intval($v);
+    }
 }
 
 function spip_pg_hex($v) {
-	return "CAST(x'" . $v . "' as bigint)";
+    return "CAST(x'" . $v . "' as bigint)";
 }
 
 function spip_pg_quote($v, $type = '') {
-	if (!is_array($v)) {
-		return spip_pg_cite($v, $type);
-	}
-	// si c'est un tableau, le parcourir en propageant le type
-	foreach ($v as $k => $r) {
-		$v[$k] = spip_pg_quote($r, $type);
-	}
-
-	return join(',', $v);
+    if (!is_array($v)) {
+        return spip_pg_cite($v, $type);
+    }
+    // si c'est un tableau, le parcourir en propageant le type
+    foreach ($v as $k => $r) {
+        $v[$k] = spip_pg_quote($r, $type);
+    }
+
+    return join(',', $v);
 }
 
 function spip_pg_date_proche($champ, $interval, $unite) {
-	return '('
-	. $champ
-	. (($interval <= 0) ? '>' : '<')
-	. (($interval <= 0) ? 'DATE_SUB' : 'DATE_ADD')
-	. '('
-	. sql_quote(date('Y-m-d H:i:s'))
-	. ', INTERVAL '
-	. (($interval > 0) ? $interval : (0 - $interval))
-	. ' '
-	. $unite
-	. '))';
+    return '('
+    . $champ
+    . (($interval <= 0) ? '>' : '<')
+    . (($interval <= 0) ? 'DATE_SUB' : 'DATE_ADD')
+    . '('
+    . sql_quote(date('Y-m-d H:i:s'))
+    . ', INTERVAL '
+    . (($interval > 0) ? $interval : (0 - $interval))
+    . ' '
+    . $unite
+    . '))';
 }
 
 function spip_pg_in($val, $valeurs, $not = '', $serveur = '') {
 //
 // IN (...) souvent limite a 255  elements, d'ou cette fonction assistante
 //
-	// s'il n'y a pas de valeur, eviter de produire un IN vide: PG rale.
-	if (!$valeurs) {
-		return $not ? '0=0' : '0=1';
-	}
-	if (strpos($valeurs, "CAST(x'") !== false) {
-		return "($val=" . join("OR $val=", explode(',', $valeurs)) . ')';
-	}
-	$n = $i = 0;
-	$in_sql = '';
-	while ($n = strpos($valeurs, ',', $n + 1)) {
-		if ((++$i) >= 255) {
-			$in_sql .= "($val $not IN (" .
-				substr($valeurs, 0, $n) .
-				"))\n" .
-				($not ? "AND\t" : "OR\t");
-			$valeurs = substr($valeurs, $n + 1);
-			$i = $n = 0;
-		}
-	}
-	$in_sql .= "($val $not IN ($valeurs))";
-
-	return "($in_sql)";
+    // s'il n'y a pas de valeur, eviter de produire un IN vide: PG rale.
+    if (!$valeurs) {
+        return $not ? '0=0' : '0=1';
+    }
+    if (strpos($valeurs, "CAST(x'") !== false) {
+        return "($val=" . join("OR $val=", explode(',', $valeurs)) . ')';
+    }
+    $n = $i = 0;
+    $in_sql = '';
+    while ($n = strpos($valeurs, ',', $n + 1)) {
+        if ((++$i) >= 255) {
+            $in_sql .= "($val $not IN (" .
+                substr($valeurs, 0, $n) .
+                "))\n" .
+                ($not ? "AND\t" : "OR\t");
+            $valeurs = substr($valeurs, $n + 1);
+            $i = $n = 0;
+        }
+    }
+    $in_sql .= "($val $not IN ($valeurs))";
+
+    return "($in_sql)";
 }
 
 function spip_pg_error($query = '', $serveur = '', $requeter = true) {
-	$link = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0]['link'];
-	$s = $link ? pg_last_error($link) : pg_last_error();
-	if ($s) {
-		$s = str_replace('ERROR', 'errcode: 1000 ', $s);
-		spip_log("$s - $query", 'pg.' . _LOG_ERREUR);
-	}
-
-	return $s;
+    $link = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0]['link'];
+    $s = $link ? pg_last_error($link) : pg_last_error();
+    if ($s) {
+        $s = str_replace('ERROR', 'errcode: 1000 ', $s);
+        spip_log("$s - $query", 'pg.' . _LOG_ERREUR);
+    }
+
+    return $s;
 }
 
 function spip_pg_errno($serveur = '') {
-	// il faudrait avoir la derniere ressource retournee et utiliser
-	// http://fr2.php.net/manual/fr/function.pg-result-error.php
-	return 0;
+    // il faudrait avoir la derniere ressource retournee et utiliser
+    // http://fr2.php.net/manual/fr/function.pg-result-error.php
+    return 0;
 }
 
 function spip_pg_drop_table($table, $exist = '', $serveur = '', $requeter = true) {
-	if ($exist) {
-		$exist = ' IF EXISTS';
-	}
-	if (spip_pg_query("DROP TABLE$exist $table", $serveur, $requeter)) {
-		return true;
-	} else {
-		return false;
-	}
+    if ($exist) {
+        $exist = ' IF EXISTS';
+    }
+    if (spip_pg_query("DROP TABLE$exist $table", $serveur, $requeter)) {
+        return true;
+    } else {
+        return false;
+    }
 }
 
 // supprime une vue
 function spip_pg_drop_view($view, $exist = '', $serveur = '', $requeter = true) {
-	if ($exist) {
-		$exist = ' IF EXISTS';
-	}
+    if ($exist) {
+        $exist = ' IF EXISTS';
+    }
 
-	return spip_pg_query("DROP VIEW$exist $view", $serveur, $requeter);
+    return spip_pg_query("DROP VIEW$exist $view", $serveur, $requeter);
 }
 
 /**
@@ -1321,40 +1321,40 @@ 
  *     Ressource à utiliser avec sql_fetch()
  **/
 function spip_pg_showbase($match, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$connexion['last'] = $q = 'SELECT tablename FROM pg_tables WHERE tablename ILIKE ' . _q($match);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $connexion['last'] = $q = 'SELECT tablename FROM pg_tables WHERE tablename ILIKE ' . _q($match);
 
-	return spip_pg_query_simple($link, $q);
+    return spip_pg_query_simple($link, $q);
 }
 
 function spip_pg_showtable($nom_table, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$connexion['last'] = $q = 'SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE ' . _q($nom_table);
-
-	$res = spip_pg_query_simple($link, $q);
-	if (!$res) {
-		return false;
-	}
-
-	// etrangement, $res peut ne rien contenir, mais arriver ici...
-	// il faut en tenir compte dans le return
-	$fields = [];
-	while ($field = pg_fetch_array($res, null, PGSQL_NUM)) {
-		$fields[$field[0]] = $field[2] . (!$field[1] ? '' : (' DEFAULT ' . $field[1]));
-	}
-	$connexion['last'] = $q = 'SELECT indexdef FROM pg_indexes WHERE tablename ILIKE ' . _q($nom_table);
-	$res = spip_pg_query_simple($link, $q);
-	$keys = [];
-	while ($index = pg_fetch_array($res, null, PGSQL_NUM)) {
-		if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0], $r)) {
-			$nom = str_replace($nom_table . '_', '', $r[2]);
-			$keys[($r[1] ? 'PRIMARY KEY' : ('KEY ' . $nom))] = $r[3];
-		}
-	}
-
-	return count($fields) ? ['field' => $fields, 'key' => $keys] : false;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $connexion['last'] = $q = 'SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE ' . _q($nom_table);
+
+    $res = spip_pg_query_simple($link, $q);
+    if (!$res) {
+        return false;
+    }
+
+    // etrangement, $res peut ne rien contenir, mais arriver ici...
+    // il faut en tenir compte dans le return
+    $fields = [];
+    while ($field = pg_fetch_array($res, null, PGSQL_NUM)) {
+        $fields[$field[0]] = $field[2] . (!$field[1] ? '' : (' DEFAULT ' . $field[1]));
+    }
+    $connexion['last'] = $q = 'SELECT indexdef FROM pg_indexes WHERE tablename ILIKE ' . _q($nom_table);
+    $res = spip_pg_query_simple($link, $q);
+    $keys = [];
+    while ($index = pg_fetch_array($res, null, PGSQL_NUM)) {
+        if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0], $r)) {
+            $nom = str_replace($nom_table . '_', '', $r[2]);
+            $keys[($r[1] ? 'PRIMARY KEY' : ('KEY ' . $nom))] = $r[3];
+        }
+    }
+
+    return count($fields) ? ['field' => $fields, 'key' => $keys] : false;
 }
 
 // Fonction de creation d'une table SQL nommee $nom
@@ -1365,116 +1365,116 @@ 
 // Le nom des index est prefixe par celui de la table pour eviter les conflits
 function spip_pg_create($nom, $champs, $cles, $autoinc = false, $temporary = false, $serveur = '', $requeter = true) {
 
-	$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$nom = prefixer_table_spip($nom, $connexion['prefixe']);
-
-	$query = $prim = $prim_name = $v = $s = $p = '';
-	$keys = [];
-
-	// certains plugins declarent les tables  (permet leur inclusion dans le dump)
-	// sans les renseigner (laisse le compilo recuperer la description)
-	if (!is_array($champs) || !is_array($cles)) {
-		return;
-	}
-
-	foreach ($cles as $k => $v) {
-		if (strpos($k, 'KEY ') === 0) {
-			$n = str_replace('`', '', $k);
-			$v = str_replace('`', '"', $v);
-			$i = $nom . preg_replace('/KEY +/', '_', $n);
-			if ($k != $n) {
-				$i = "\"$i\"";
-			}
-			$keys[] = "CREATE INDEX $i ON $nom ($v);";
-		} elseif (strpos($k, 'UNIQUE ') === 0) {
-			$k = preg_replace('/^UNIQUE +/', '', $k);
-			$prim .= "$s\n\t\tCONSTRAINT " . str_replace('`', '"', $k) . " UNIQUE ($v)";
-		} else {
-			$prim .= "$s\n\t\t" . str_replace('`', '"', $k) . " ($v)";
-		}
-		if ($k == 'PRIMARY KEY') {
-			$prim_name = $v;
-		}
-		$s = ',';
-	}
-	$s = '';
-
-	$character_set = '';
-	if (@$GLOBALS['meta']['charset_sql_base']) {
-		$character_set .= ' CHARACTER SET ' . $GLOBALS['meta']['charset_sql_base'];
-	}
-	if (@$GLOBALS['meta']['charset_collation_sql_base']) {
-		$character_set .= ' COLLATE ' . $GLOBALS['meta']['charset_collation_sql_base'];
-	}
-
-	foreach ($champs as $k => $v) {
-		$k = str_replace('`', '"', $k);
-		if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i', $v, $defs)) {
-			if (preg_match(',(char|text),i', $defs[1]) and !preg_match(',binary,i', $defs[1])) {
-				$v = $defs[1] . $character_set . ' ' . substr($v, strlen($defs[1]));
-			}
-		}
-
-		$query .= "$s\n\t\t$k "
-			. (($autoinc && ($prim_name == $k) && preg_match(',\b(big|small|medium|tiny)?int\b,i', $v))
-				? ' bigserial'
-				: mysql2pg_type($v)
-			);
-		$s = ',';
-	}
-	$temporary = $temporary ? 'TEMPORARY' : '';
-
-	// En l'absence de "if not exists" en PG, on neutralise les erreurs
-
-	$q = "CREATE $temporary TABLE $nom ($query" . ($prim ? ",$prim" : '') . ')' .
-		($character_set ? " DEFAULT $character_set" : '')
-		. "\n";
-
-	if (!$requeter) {
-		return $q;
-	}
-	$connexion['last'] = $q;
-	$r = @pg_query($link, $q);
-
-	if (!$r) {
-		spip_log("Impossible de creer cette table: $q", 'pg.' . _LOG_ERREUR);
-	} else {
-		foreach ($keys as $index) {
-			pg_query($link, $index);
-		}
-	}
-
-	return $r;
+    $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $nom = prefixer_table_spip($nom, $connexion['prefixe']);
+
+    $query = $prim = $prim_name = $v = $s = $p = '';
+    $keys = [];
+
+    // certains plugins declarent les tables  (permet leur inclusion dans le dump)
+    // sans les renseigner (laisse le compilo recuperer la description)
+    if (!is_array($champs) || !is_array($cles)) {
+        return;
+    }
+
+    foreach ($cles as $k => $v) {
+        if (strpos($k, 'KEY ') === 0) {
+            $n = str_replace('`', '', $k);
+            $v = str_replace('`', '"', $v);
+            $i = $nom . preg_replace('/KEY +/', '_', $n);
+            if ($k != $n) {
+                $i = "\"$i\"";
+            }
+            $keys[] = "CREATE INDEX $i ON $nom ($v);";
+        } elseif (strpos($k, 'UNIQUE ') === 0) {
+            $k = preg_replace('/^UNIQUE +/', '', $k);
+            $prim .= "$s\n\t\tCONSTRAINT " . str_replace('`', '"', $k) . " UNIQUE ($v)";
+        } else {
+            $prim .= "$s\n\t\t" . str_replace('`', '"', $k) . " ($v)";
+        }
+        if ($k == 'PRIMARY KEY') {
+            $prim_name = $v;
+        }
+        $s = ',';
+    }
+    $s = '';
+
+    $character_set = '';
+    if (@$GLOBALS['meta']['charset_sql_base']) {
+        $character_set .= ' CHARACTER SET ' . $GLOBALS['meta']['charset_sql_base'];
+    }
+    if (@$GLOBALS['meta']['charset_collation_sql_base']) {
+        $character_set .= ' COLLATE ' . $GLOBALS['meta']['charset_collation_sql_base'];
+    }
+
+    foreach ($champs as $k => $v) {
+        $k = str_replace('`', '"', $k);
+        if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i', $v, $defs)) {
+            if (preg_match(',(char|text),i', $defs[1]) and !preg_match(',binary,i', $defs[1])) {
+                $v = $defs[1] . $character_set . ' ' . substr($v, strlen($defs[1]));
+            }
+        }
+
+        $query .= "$s\n\t\t$k "
+            . (($autoinc && ($prim_name == $k) && preg_match(',\b(big|small|medium|tiny)?int\b,i', $v))
+                ? ' bigserial'
+                : mysql2pg_type($v)
+            );
+        $s = ',';
+    }
+    $temporary = $temporary ? 'TEMPORARY' : '';
+
+    // En l'absence de "if not exists" en PG, on neutralise les erreurs
+
+    $q = "CREATE $temporary TABLE $nom ($query" . ($prim ? ",$prim" : '') . ')' .
+        ($character_set ? " DEFAULT $character_set" : '')
+        . "\n";
+
+    if (!$requeter) {
+        return $q;
+    }
+    $connexion['last'] = $q;
+    $r = @pg_query($link, $q);
+
+    if (!$r) {
+        spip_log("Impossible de creer cette table: $q", 'pg.' . _LOG_ERREUR);
+    } else {
+        foreach ($keys as $index) {
+            pg_query($link, $index);
+        }
+    }
+
+    return $r;
 }
 
 
 function spip_pg_create_base($nom, $serveur = '', $requeter = true) {
-	return spip_pg_query("CREATE DATABASE $nom", $serveur, $requeter);
+    return spip_pg_query("CREATE DATABASE $nom", $serveur, $requeter);
 }
 
 // Fonction de creation d'une vue SQL nommee $nom
 function spip_pg_create_view($nom, $query_select, $serveur = '', $requeter = true) {
-	if (!$query_select) {
-		return false;
-	}
-	// vue deja presente
-	if (sql_showtable($nom, false, $serveur)) {
-		if ($requeter) {
-			spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.' . _LOG_ERREUR);
-		}
+    if (!$query_select) {
+        return false;
+    }
+    // vue deja presente
+    if (sql_showtable($nom, false, $serveur)) {
+        if ($requeter) {
+            spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.' . _LOG_ERREUR);
+        }
 
-		return false;
-	}
+        return false;
+    }
 
-	$query = "CREATE VIEW $nom AS " . $query_select;
+    $query = "CREATE VIEW $nom AS " . $query_select;
 
-	return spip_pg_query($query, $serveur, $requeter);
+    return spip_pg_query($query, $serveur, $requeter);
 }
 
 
 function spip_pg_set_connect_charset($charset, $serveur = '', $requeter = true) {
-	spip_log('changement de charset sql a ecrire en PG', 'pg.' . _LOG_ERREUR);
+    spip_log('changement de charset sql a ecrire en PG', 'pg.' . _LOG_ERREUR);
 }
 
 
@@ -1487,50 +1487,50 @@ 
  * @return bool|string true / false / requete
  **/
 function spip_pg_optimize($table, $serveur = '', $requeter = true) {
-	return spip_pg_query('VACUUM ' . $table, $serveur, $requeter);
+    return spip_pg_query('VACUUM ' . $table, $serveur, $requeter);
 }
 
 // Selectionner la sous-chaine dans $objet
 // correspondant a $lang. Cf balise Multi de Spip
 
 function spip_pg_multi($objet, $lang) {
-	$r = 'regexp_replace('
-		. $objet
-		. ",'<multi>.*[[]"
-		. $lang
-		. "[]]([^[]*).*</multi>', E'\\\\1') AS multi";
+    $r = 'regexp_replace('
+        . $objet
+        . ",'<multi>.*[[]"
+        . $lang
+        . "[]]([^[]*).*</multi>', E'\\\\1') AS multi";
 
-	return $r;
+    return $r;
 }
 
 // Palanquee d'idiosyncrasies MySQL dans les creations de table
 // A completer par les autres, mais essayer de reduire en amont.
 
 function mysql2pg_type($v) {
-	$remplace = [
-		'/auto_increment/i' => '', // non reconnu
-		'/bigint/i' => 'bigint',
-		'/mediumint/i' => 'mediumint',
-		'/smallint/i' => 'smallint',
-		'/tinyint/i' => 'int',
-		'/int\s*[(]\s*\d+\s*[)]/i' => 'int',
-		'/longtext/i' => 'text',
-		'/mediumtext/i' => 'text',
-		'/tinytext/i' => 'text',
-		'/longblob/i' => 'text',
-		'/0000-00-00/' => '0001-01-01',
-		'/datetime/i' => 'timestamp',
-		'/unsigned/i' => '',
-		'/double/i' => 'double precision',
-		'/VARCHAR\((\d+)\)\s+BINARY/i' => 'varchar(\1)',
-		'/ENUM *[(][^)]*[)]/i' => 'varchar(255)',
-		'/(timestamp .* )ON .*$/is' => '\\1',
-	];
-
-	return preg_replace(array_keys($remplace), array_values($remplace), $v);
+    $remplace = [
+        '/auto_increment/i' => '', // non reconnu
+        '/bigint/i' => 'bigint',
+        '/mediumint/i' => 'mediumint',
+        '/smallint/i' => 'smallint',
+        '/tinyint/i' => 'int',
+        '/int\s*[(]\s*\d+\s*[)]/i' => 'int',
+        '/longtext/i' => 'text',
+        '/mediumtext/i' => 'text',
+        '/tinytext/i' => 'text',
+        '/longblob/i' => 'text',
+        '/0000-00-00/' => '0001-01-01',
+        '/datetime/i' => 'timestamp',
+        '/unsigned/i' => '',
+        '/double/i' => 'double precision',
+        '/VARCHAR\((\d+)\)\s+BINARY/i' => 'varchar(\1)',
+        '/ENUM *[(][^)]*[)]/i' => 'varchar(255)',
+        '/(timestamp .* )ON .*$/is' => '\\1',
+    ];
+
+    return preg_replace(array_keys($remplace), array_values($remplace), $v);
 }
 
 // Renvoie false si on n'a pas les fonctions pg (pour l'install)
 function spip_versions_pg() {
-	return function_exists('pg_connect');
+    return function_exists('pg_connect');
 }