spip / SPIP

ecrire/inc/meta.php

Indentation +191 added lines, -191 removed lines

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

ecrire/inc/lien.php

Indentation +273 added lines, -273 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -23,16 +23,16 @@ 
 //
 
 function inc_lien_dist(
-	$lien,
-	$texte = '',
-	$class = '',
-	$title = '',
-	$hlang = '',
-	$rel = '',
-	$connect = '',
-	$env = array()
+    $lien,
+    $texte = '',
+    $class = '',
+    $title = '',
+    $hlang = '',
+    $rel = '',
+    $connect = '',
+    $env = array()
 ) {
-	return $lien;
+    return $lien;
 }
 
 // Regexp des raccourcis, aussi utilisee pour la fusion de sauvegarde Spip
@@ -44,30 +44,30 @@ 
 // https://code.spip.net/@expanser_liens
 function expanser_liens($t, $connect = '', $env = array()) {
 
-	$t = pipeline('pre_liens', $t);
+    $t = pipeline('pre_liens', $t);
 
-	// on passe a traiter_modeles la liste des liens reperes pour lui permettre
-	// de remettre le texte d'origine dans les parametres du modele
-	$t = traiter_modeles($t, false, false, $connect);
+    // on passe a traiter_modeles la liste des liens reperes pour lui permettre
+    // de remettre le texte d'origine dans les parametres du modele
+    $t = traiter_modeles($t, false, false, $connect);
 
-	return $t;
+    return $t;
 }
 
 // Meme analyse mais pour eliminer les liens
 // et ne laisser que leur titre, a expliciter si ce n'est fait
 // https://code.spip.net/@nettoyer_raccourcis_typo
 function nettoyer_raccourcis_typo($texte, $connect = '') {
-	return $texte;
+    return $texte;
 }
 
 // Repere dans la partie texte d'un raccourci [texte->...]
 // la langue et la bulle eventuelles
 // https://code.spip.net/@traiter_raccourci_lien_atts
 function traiter_raccourci_lien_atts($texte) {
-	$bulle = '';
-	$hlang = '';
+    $bulle = '';
+    $hlang = '';
 
-	return array(trim($texte), $bulle, $hlang);
+    return array(trim($texte), $bulle, $hlang);
 }
 
 define('_RACCOURCI_CHAPO', '/^(\W*)(\W*)(\w*\d+([?#].*)?)$/');
@@ -83,7 +83,7 @@ 
  * @return string
  */
 function virtuel_redirige($virtuel, $url = false) {
-	return $virtuel;
+    return $virtuel;
 }
 
 // Cherche un lien du type [->raccourci 123]
@@ -97,114 +97,114 @@ 
 
 // https://code.spip.net/@calculer_url
 function calculer_url($ref, $texte = '', $pour = 'url', $connect = '', $echappe_typo = true) {
-	$r = traiter_lien_implicite($ref, $texte, $pour, $connect, $echappe_typo);
+    $r = traiter_lien_implicite($ref, $texte, $pour, $connect, $echappe_typo);
 
-	return $r ? $r : traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
+    return $r ? $r : traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
 }
 
 define('_EXTRAIRE_LIEN', ',^\s*(?:' . _PROTOCOLES_STD . '):?/?/?\s*$,iS');
 
 // https://code.spip.net/@traiter_lien_explicite
 function traiter_lien_explicite($ref, $texte = '', $pour = 'url', $connect = '', $echappe_typo = true) {
-	if (preg_match(_EXTRAIRE_LIEN, $ref)) {
-		return ($pour != 'tout') ? '' : array('', '', '', '');
-	}
-
-	$lien = entites_html(trim($ref));
-
-	// Liens explicites
-	if (!$texte) {
-		$texte = str_replace('"', '', $lien);
-		// evite l'affichage de trops longues urls.
-		$lien_court = charger_fonction('lien_court', 'inc');
-		$texte = $lien_court($texte);
-		if ($echappe_typo) {
-			$texte = "<html>" . quote_amp($texte) . "</html>";
-		}
-	}
-
-	// petites corrections d'URL
-	if (preg_match('/^www\.[^@]+$/S', $lien)) {
-		$lien = "http://" . $lien;
-	} else {
-		if (strpos($lien, "@") && email_valide($lien)) {
-			if (!$texte) {
-				$texte = $lien;
-			}
-			$lien = "mailto:" . $lien;
-		}
-	}
-
-	if ($pour == 'url') {
-		return $lien;
-	}
-
-	if ($pour == 'titre') {
-		return $texte;
-	}
-
-	return array('url' => $lien, 'titre' => $texte);
+    if (preg_match(_EXTRAIRE_LIEN, $ref)) {
+        return ($pour != 'tout') ? '' : array('', '', '', '');
+    }
+
+    $lien = entites_html(trim($ref));
+
+    // Liens explicites
+    if (!$texte) {
+        $texte = str_replace('"', '', $lien);
+        // evite l'affichage de trops longues urls.
+        $lien_court = charger_fonction('lien_court', 'inc');
+        $texte = $lien_court($texte);
+        if ($echappe_typo) {
+            $texte = "<html>" . quote_amp($texte) . "</html>";
+        }
+    }
+
+    // petites corrections d'URL
+    if (preg_match('/^www\.[^@]+$/S', $lien)) {
+        $lien = "http://" . $lien;
+    } else {
+        if (strpos($lien, "@") && email_valide($lien)) {
+            if (!$texte) {
+                $texte = $lien;
+            }
+            $lien = "mailto:" . $lien;
+        }
+    }
+
+    if ($pour == 'url') {
+        return $lien;
+    }
+
+    if ($pour == 'titre') {
+        return $texte;
+    }
+
+    return array('url' => $lien, 'titre' => $texte);
 }
 
 function liens_implicite_glose_dist($texte, $id, $type, $args, $ancre, $connect = '') {
-	if (function_exists($f = 'glossaire_' . $ancre)) {
-		$url = $f($texte, $id);
-	} else {
-		$url = glossaire_std($texte);
-	}
+    if (function_exists($f = 'glossaire_' . $ancre)) {
+        $url = $f($texte, $id);
+    } else {
+        $url = glossaire_std($texte);
+    }
 
-	return $url;
+    return $url;
 }
 
 // https://code.spip.net/@traiter_lien_implicite
 function traiter_lien_implicite($ref, $texte = '', $pour = 'url', $connect = '') {
-	if (!($match = typer_raccourci($ref))) {
-		return false;
-	}
-	@list($type, , $id, , $args, , $ancre) = $match;
-	// attention dans le cas des sites le lien doit pointer non pas sur
-	// la page locale du site, mais directement sur le site lui-meme
-	if ($f = charger_fonction("implicite_$type", "liens", true)) {
-		$url = $f($texte, $id, $type, $args, $ancre, $connect);
-	}
-	if (!$url) {
-		$url = generer_url_entite($id, $type, $args, $ancre, $connect ? $connect : null);
-	}
-	if (!$url) {
-		return false;
-	}
-	if (is_array($url)) {
-		@list($type, $id) = $url;
-		$url = generer_url_entite($id, $type, $args, $ancre, $connect ? $connect : null);
-	}
-	if ($pour === 'url') {
-		return $url;
-	}
-	$r = traiter_raccourci_titre($id, $type, $connect);
-	if ($r) {
-		$r['class'] = ($type == 'site') ? 'spip_out' : 'spip_in';
-	}
-	if ($texte = trim($texte)) {
-		$r['titre'] = $texte;
-	}
-	if (!@$r['titre']) {
-		$r['titre'] = _T($type) . " $id";
-	}
-	if ($pour == 'titre') {
-		return $r['titre'];
-	}
-	$r['url'] = $url;
-
-	// dans le cas d'un lien vers un doc, ajouter le type='mime/type'
-	if ($type == 'document'
-		and $mime = sql_getfetsel('mime_type', 'spip_types_documents',
-			"extension IN (" . sql_get_select("extension", "spip_documents", "id_document=" . sql_quote($id)) . ")",
-			'', '', '', '', $connect)
-	) {
-		$r['mime'] = $mime;
-	}
-
-	return $r;
+    if (!($match = typer_raccourci($ref))) {
+        return false;
+    }
+    @list($type, , $id, , $args, , $ancre) = $match;
+    // attention dans le cas des sites le lien doit pointer non pas sur
+    // la page locale du site, mais directement sur le site lui-meme
+    if ($f = charger_fonction("implicite_$type", "liens", true)) {
+        $url = $f($texte, $id, $type, $args, $ancre, $connect);
+    }
+    if (!$url) {
+        $url = generer_url_entite($id, $type, $args, $ancre, $connect ? $connect : null);
+    }
+    if (!$url) {
+        return false;
+    }
+    if (is_array($url)) {
+        @list($type, $id) = $url;
+        $url = generer_url_entite($id, $type, $args, $ancre, $connect ? $connect : null);
+    }
+    if ($pour === 'url') {
+        return $url;
+    }
+    $r = traiter_raccourci_titre($id, $type, $connect);
+    if ($r) {
+        $r['class'] = ($type == 'site') ? 'spip_out' : 'spip_in';
+    }
+    if ($texte = trim($texte)) {
+        $r['titre'] = $texte;
+    }
+    if (!@$r['titre']) {
+        $r['titre'] = _T($type) . " $id";
+    }
+    if ($pour == 'titre') {
+        return $r['titre'];
+    }
+    $r['url'] = $url;
+
+    // dans le cas d'un lien vers un doc, ajouter le type='mime/type'
+    if ($type == 'document'
+        and $mime = sql_getfetsel('mime_type', 'spip_types_documents',
+            "extension IN (" . sql_get_select("extension", "spip_documents", "id_document=" . sql_quote($id)) . ")",
+            '', '', '', '', $connect)
+    ) {
+        $r['mime'] = $mime;
+    }
+
+    return $r;
 }
 
 // analyse des raccourcis issus de [TITRE->RACCOURCInnn] et connexes
@@ -213,41 +213,41 @@ 
 
 // https://code.spip.net/@typer_raccourci
 function typer_raccourci($lien) {
-	if (!preg_match(_RACCOURCI_URL, $lien, $match)) {
-		return array();
-	}
-	$f = $match[1];
-	// valeur par defaut et alias historiques
-	if (!$f) {
-		$f = 'article';
-	} else {
-		if ($f == 'art') {
-			$f = 'article';
-		} else {
-			if ($f == 'br') {
-				$f = 'breve';
-			} else {
-				if ($f == 'rub') {
-					$f = 'rubrique';
-				} else {
-					if ($f == 'aut') {
-						$f = 'auteur';
-					} else {
-						if ($f == 'doc' or $f == 'im' or $f == 'img' or $f == 'image' or $f == 'emb') {
-							$f = 'document';
-						} else {
-							if (preg_match('/^br..?ve$/S', $f)) {
-								$f = 'breve';
-							}
-						}
-					}
-				}
-			}
-		}
-	} # accents :(
-	$match[0] = $f;
-
-	return $match;
+    if (!preg_match(_RACCOURCI_URL, $lien, $match)) {
+        return array();
+    }
+    $f = $match[1];
+    // valeur par defaut et alias historiques
+    if (!$f) {
+        $f = 'article';
+    } else {
+        if ($f == 'art') {
+            $f = 'article';
+        } else {
+            if ($f == 'br') {
+                $f = 'breve';
+            } else {
+                if ($f == 'rub') {
+                    $f = 'rubrique';
+                } else {
+                    if ($f == 'aut') {
+                        $f = 'auteur';
+                    } else {
+                        if ($f == 'doc' or $f == 'im' or $f == 'img' or $f == 'image' or $f == 'emb') {
+                            $f = 'document';
+                        } else {
+                            if (preg_match('/^br..?ve$/S', $f)) {
+                                $f = 'breve';
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    } # accents :(
+    $match[0] = $f;
+
+    return $match;
 }
 
 /**
@@ -262,25 +262,25 @@ 
  * }
  **/
 function traiter_raccourci_titre($id, $type, $connect = null) {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table(table_objet($type));
-	if (!($desc and $s = $desc['titre'])) {
-		return array();
-	}
-	$_id = $desc['key']['PRIMARY KEY'];
-	$r = sql_fetsel($s, $desc['table'], "$_id=$id", '', '', '', '', $connect);
-	if (!$r) {
-		return array();
-	}
-	$r['titre'] = supprimer_numero($r['titre']);
-	if (!$r['titre'] and !empty($r['surnom'])) {
-		$r['titre'] = $r['surnom'];
-	}
-	if (!isset($r['lang'])) {
-		$r['lang'] = '';
-	}
-
-	return $r;
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table(table_objet($type));
+    if (!($desc and $s = $desc['titre'])) {
+        return array();
+    }
+    $_id = $desc['key']['PRIMARY KEY'];
+    $r = sql_fetsel($s, $desc['table'], "$_id=$id", '', '', '', '', $connect);
+    if (!$r) {
+        return array();
+    }
+    $r['titre'] = supprimer_numero($r['titre']);
+    if (!$r['titre'] and !empty($r['surnom'])) {
+        $r['titre'] = $r['surnom'];
+    }
+    if (!isset($r['lang'])) {
+        $r['lang'] = '';
+    }
+
+    return $r;
 }
 
 // traite les modeles (dans la fonction typo), en remplacant
@@ -292,115 +292,115 @@ 
 // https://code.spip.net/@traiter_modeles
 
 define('_RACCOURCI_MODELE',
-	'(<([a-z_-]{3,})' # <modele
-	. '\s*([0-9]*)\s*' # id
-	. '([|](?:<[^<>]*>|[^>])*?)?' # |arguments (y compris des tags <...>)
-	. '\s*/?' . '>)' # fin du modele >
-	. '\s*(<\/a>)?' # eventuel </a>
+    '(<([a-z_-]{3,})' # <modele
+    . '\s*([0-9]*)\s*' # id
+    . '([|](?:<[^<>]*>|[^>])*?)?' # |arguments (y compris des tags <...>)
+    . '\s*/?' . '>)' # fin du modele >
+    . '\s*(<\/a>)?' # eventuel </a>
 );
 
 define('_RACCOURCI_MODELE_DEBUT', '@^' . _RACCOURCI_MODELE . '@isS');
 
 // https://code.spip.net/@traiter_modeles
 function traiter_modeles($texte, $doublons = false, $echap = '', $connect = '', $liens = null, $env = array()) {
-	// preserver la compatibilite : true = recherche des documents
-	if ($doublons === true) {
-		$doublons = array('documents' => array('doc', 'emb', 'img'));
-	}
-	// detecter les modeles (rapide)
-	if (strpos($texte, "<") !== false and
-		preg_match_all('/<[a-z_-]{3,}\s*[0-9|]+/iS', $texte, $matches, PREG_SET_ORDER)
-	) {
-		include_spip('public/assembler');
-		$wrap_embed_html = charger_fonction("wrap_embed_html", "inc", true);
-		foreach ($matches as $match) {
-			// Recuperer l'appel complet (y compris un eventuel lien)
-
-			$a = strpos($texte, $match[0]);
-			preg_match(_RACCOURCI_MODELE_DEBUT,
-				substr($texte, $a), $regs);
-			$regs[] = ""; // s'assurer qu'il y a toujours un 5e arg, eventuellement vide
-			list(, $mod, $type, $id, $params, $fin) = $regs;
-			if ($fin and
-				preg_match('/<a\s[^<>]*>\s*$/i',
-					substr($texte, 0, $a), $r)
-			) {
-				$lien = array(
-					'href' => extraire_attribut($r[0], 'href'),
-					'class' => extraire_attribut($r[0], 'class'),
-					'mime' => extraire_attribut($r[0], 'type'),
-					'title' => extraire_attribut($r[0], 'title'),
-					'hreflang' => extraire_attribut($r[0], 'hreflang')
-				);
-				$n = strlen($r[0]);
-				$a -= $n;
-				$cherche = $n + strlen($regs[0]);
-			} else {
-				$lien = false;
-				$cherche = strlen($mod);
-			}
-
-			// calculer le modele
-			# hack indexation
-			if ($doublons) {
-				$texte .= preg_replace(',[|][^|=]*,s', ' ', $params);
-			} # version normale
-			else {
-				// si un tableau de liens a ete passe, reinjecter le contenu d'origine
-				// dans les parametres, plutot que les liens echappes
-				if (!is_null($liens)) {
-					$params = str_replace($liens[0], $liens[1], $params);
-				}
-				$modele = inclure_modele($type, $id, $params, $lien, $connect, $env);
-				// en cas d'echec, 
-				// si l'objet demande a une url, 
-				// creer un petit encadre vers elle
-				if ($modele === false) {
-					if (!$lien) {
-						$lien = traiter_lien_implicite("$type$id", '', 'tout', $connect);
-					}
-					if ($lien) {
-						$modele = '<a href="'
-							. $lien['url']
-							. '" class="spip_modele'
-							. '">'
-							. sinon($lien['titre'], _T('ecrire:info_sans_titre'))
-							. "</a>";
-					} else {
-						$modele = "";
-						if (test_espace_prive()) {
-							$modele = entites_html(substr($texte, $a, $cherche));
-							if (!is_null($liens)) {
-								$modele = "<pre>" . str_replace($liens[0], $liens[1], $modele) . "</pre>";
-							}
-						}
-					}
-				}
-				// le remplacer dans le texte
-				if ($modele !== false) {
-					$modele = protege_js_modeles($modele);
-					if ($wrap_embed_html) {
-						$modele = $wrap_embed_html($mod, $modele);
-					}
-					$rempl = code_echappement($modele, $echap);
-					$texte = substr($texte, 0, $a)
-						. $rempl
-						. substr($texte, $a + $cherche);
-				}
-			}
-
-			// hack pour tout l'espace prive
-			if (((!_DIR_RESTREINT) or ($doublons)) and ($id)) {
-				foreach ($doublons ? $doublons : array('documents' => array('doc', 'emb', 'img')) as $quoi => $modeles) {
-					if (in_array($type, $modeles)) {
-						$GLOBALS["doublons_{$quoi}_inclus"][] = $id;
-					}
-				}
-			}
-		}
-	}
-
-	return $texte;
+    // preserver la compatibilite : true = recherche des documents
+    if ($doublons === true) {
+        $doublons = array('documents' => array('doc', 'emb', 'img'));
+    }
+    // detecter les modeles (rapide)
+    if (strpos($texte, "<") !== false and
+        preg_match_all('/<[a-z_-]{3,}\s*[0-9|]+/iS', $texte, $matches, PREG_SET_ORDER)
+    ) {
+        include_spip('public/assembler');
+        $wrap_embed_html = charger_fonction("wrap_embed_html", "inc", true);
+        foreach ($matches as $match) {
+            // Recuperer l'appel complet (y compris un eventuel lien)
+
+            $a = strpos($texte, $match[0]);
+            preg_match(_RACCOURCI_MODELE_DEBUT,
+                substr($texte, $a), $regs);
+            $regs[] = ""; // s'assurer qu'il y a toujours un 5e arg, eventuellement vide
+            list(, $mod, $type, $id, $params, $fin) = $regs;
+            if ($fin and
+                preg_match('/<a\s[^<>]*>\s*$/i',
+                    substr($texte, 0, $a), $r)
+            ) {
+                $lien = array(
+                    'href' => extraire_attribut($r[0], 'href'),
+                    'class' => extraire_attribut($r[0], 'class'),
+                    'mime' => extraire_attribut($r[0], 'type'),
+                    'title' => extraire_attribut($r[0], 'title'),
+                    'hreflang' => extraire_attribut($r[0], 'hreflang')
+                );
+                $n = strlen($r[0]);
+                $a -= $n;
+                $cherche = $n + strlen($regs[0]);
+            } else {
+                $lien = false;
+                $cherche = strlen($mod);
+            }
+
+            // calculer le modele
+            # hack indexation
+            if ($doublons) {
+                $texte .= preg_replace(',[|][^|=]*,s', ' ', $params);
+            } # version normale
+            else {
+                // si un tableau de liens a ete passe, reinjecter le contenu d'origine
+                // dans les parametres, plutot que les liens echappes
+                if (!is_null($liens)) {
+                    $params = str_replace($liens[0], $liens[1], $params);
+                }
+                $modele = inclure_modele($type, $id, $params, $lien, $connect, $env);
+                // en cas d'echec, 
+                // si l'objet demande a une url, 
+                // creer un petit encadre vers elle
+                if ($modele === false) {
+                    if (!$lien) {
+                        $lien = traiter_lien_implicite("$type$id", '', 'tout', $connect);
+                    }
+                    if ($lien) {
+                        $modele = '<a href="'
+                            . $lien['url']
+                            . '" class="spip_modele'
+                            . '">'
+                            . sinon($lien['titre'], _T('ecrire:info_sans_titre'))
+                            . "</a>";
+                    } else {
+                        $modele = "";
+                        if (test_espace_prive()) {
+                            $modele = entites_html(substr($texte, $a, $cherche));
+                            if (!is_null($liens)) {
+                                $modele = "<pre>" . str_replace($liens[0], $liens[1], $modele) . "</pre>";
+                            }
+                        }
+                    }
+                }
+                // le remplacer dans le texte
+                if ($modele !== false) {
+                    $modele = protege_js_modeles($modele);
+                    if ($wrap_embed_html) {
+                        $modele = $wrap_embed_html($mod, $modele);
+                    }
+                    $rempl = code_echappement($modele, $echap);
+                    $texte = substr($texte, 0, $a)
+                        . $rempl
+                        . substr($texte, $a + $cherche);
+                }
+            }
+
+            // hack pour tout l'espace prive
+            if (((!_DIR_RESTREINT) or ($doublons)) and ($id)) {
+                foreach ($doublons ? $doublons : array('documents' => array('doc', 'emb', 'img')) as $quoi => $modeles) {
+                    if (in_array($type, $modeles)) {
+                        $GLOBALS["doublons_{$quoi}_inclus"][] = $id;
+                    }
+                }
+            }
+        }
+    }
+
+    return $texte;
 }
 
 //
@@ -408,15 +408,15 @@ 
 //
 // https://code.spip.net/@traiter_raccourci_ancre
 function traiter_raccourci_ancre($letexte) {
-	return $letexte;
+    return $letexte;
 }
 
 // https://code.spip.net/@traiter_raccourci_glossaire
 function traiter_raccourci_glossaire($texte) {
-	return $texte;
+    return $texte;
 }
 
 // https://code.spip.net/@glossaire_std
 function glossaire_std($terme) {
-	return $terme;
+    return $terme;
 }

ecrire/inc/presentation_mini.php

Indentation +129 added lines, -129 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Affichage
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -45,7 +45,7 @@ 
  * @return string Code HTML
  */
 function debut_gauche() {
-	return "<div id = 'conteneur' class = ''>\n<div id = 'navigation' class = 'lat' role = 'contentinfo'>\n";
+    return "<div id = 'conteneur' class = ''>\n<div id = 'navigation' class = 'lat' role = 'contentinfo'>\n";
 }
 
 /**
@@ -61,13 +61,13 @@ 
  * @return string Code HTML
  */
 function creer_colonne_droite() {
-	static $deja_colonne_droite;
-	if ($deja_colonne_droite) {
-		return '';
-	}
-	$deja_colonne_droite = true;
+    static $deja_colonne_droite;
+    if ($deja_colonne_droite) {
+        return '';
+    }
+    $deja_colonne_droite = true;
 
-	return "\n</div><div id='extra' class='lat' role='complementary'>";
+    return "\n</div><div id='extra' class='lat' role='complementary'>";
 }
 
 /**
@@ -76,10 +76,10 @@ 
  * @return string Code HTML
  */
 function debut_droite() {
-	return liste_objets_bloques(_request('exec'))
-	. creer_colonne_droite()
-	. "</div>"
-	. "\n<div id='contenu'>";
+    return liste_objets_bloques(_request('exec'))
+    . creer_colonne_droite()
+    . "</div>"
+    . "\n<div id='contenu'>";
 }
 
 /**
@@ -101,30 +101,30 @@ 
  *     Code HTML
  **/
 function liste_objets_bloques($exec, $contexte = array(), $auteur = null) {
-	$res = '';
-	if ($GLOBALS['meta']["articles_modif"] != "non") {
-		include_spip('inc/drapeau_edition');
-		if (is_null($auteur)) {
-			$auteur = $GLOBALS['visiteur_session'];
-		}
-		if ($en_cours = trouver_objet_exec($exec)
-			and $en_cours['edition']
-			and $type = $en_cours['type']
-			and ((isset($contexte[$en_cours['id_table_objet']]) and $id = $contexte[$en_cours['id_table_objet']])
-				or $id = _request($en_cours['id_table_objet']))
-		) {
-			// marquer le fait que l'objet est ouvert en edition par toto
-			// a telle date ; une alerte sera donnee aux autres redacteurs
-			signale_edition($id, $auteur, $type);
-		}
-
-		$objets_ouverts = liste_drapeau_edition($auteur['id_auteur']);
-		if (count($objets_ouverts)) {
-			$res .= recuperer_fond('prive/objets/liste/objets-en-edition', array(), array('ajax' => true));
-		}
-	}
-
-	return $res;
+    $res = '';
+    if ($GLOBALS['meta']["articles_modif"] != "non") {
+        include_spip('inc/drapeau_edition');
+        if (is_null($auteur)) {
+            $auteur = $GLOBALS['visiteur_session'];
+        }
+        if ($en_cours = trouver_objet_exec($exec)
+            and $en_cours['edition']
+            and $type = $en_cours['type']
+            and ((isset($contexte[$en_cours['id_table_objet']]) and $id = $contexte[$en_cours['id_table_objet']])
+                or $id = _request($en_cours['id_table_objet']))
+        ) {
+            // marquer le fait que l'objet est ouvert en edition par toto
+            // a telle date ; une alerte sera donnee aux autres redacteurs
+            signale_edition($id, $auteur, $type);
+        }
+
+        $objets_ouverts = liste_drapeau_edition($auteur['id_auteur']);
+        if (count($objets_ouverts)) {
+            $res .= recuperer_fond('prive/objets/liste/objets-en-edition', array(), array('ajax' => true));
+        }
+    }
+
+    return $res;
 }
 
 
@@ -138,20 +138,20 @@ 
  * @return string Code HTML
  **/
 function fin_page() {
-	include_spip('inc/pipelines');
-	// avec &var_profile=1 on a le tableau de mesures SQL
-	$debug = ((_request('exec') !== 'valider_xml')
-		and ((_request('var_mode') == 'debug')
-			or (isset($GLOBALS['tableau_des_temps']) and $GLOBALS['tableau_des_temps'])
-			and isset($_COOKIE['spip_admin'])));
-	$t = '</div><div id="pied"><div class="largeur">'
-		. recuperer_fond('prive/squelettes/inclure/pied')
-		. "</div>"
-		. "</div></div>" // cf. div#page et div.largeur ouvertes dans conmmencer_page()
-		. ($debug ? erreur_squelette() : '')
-		. "</body></html>\n";
-
-	return f_queue($t);
+    include_spip('inc/pipelines');
+    // avec &var_profile=1 on a le tableau de mesures SQL
+    $debug = ((_request('exec') !== 'valider_xml')
+        and ((_request('var_mode') == 'debug')
+            or (isset($GLOBALS['tableau_des_temps']) and $GLOBALS['tableau_des_temps'])
+            and isset($_COOKIE['spip_admin'])));
+    $t = '</div><div id="pied"><div class="largeur">'
+        . recuperer_fond('prive/squelettes/inclure/pied')
+        . "</div>"
+        . "</div></div>" // cf. div#page et div.largeur ouvertes dans conmmencer_page()
+        . ($debug ? erreur_squelette() : '')
+        . "</body></html>\n";
+
+    return f_queue($t);
 }
 
 /**
@@ -166,20 +166,20 @@ 
  * @return string Code HTML
  **/
 function html_tests_js() {
-	if (_SPIP_AJAX and !defined('_TESTER_NOSCRIPT')) {
-		// pour le pied de page (deja defini si on est validation XML)
-		define('_TESTER_NOSCRIPT',
-			"<noscript>\n<div style='display:none;'><img src='"
-			. generer_url_ecrire('test_ajax', 'js=-1')
-			. "' width='1' height='1' alt='' /></div></noscript>\n");
-	}
-
-	$rejouer = '';
-	if (defined('_SESSION_REJOUER')) {
-		$rejouer = (_SESSION_REJOUER === true) ? rejouer_session() : _SESSION_REJOUER;
-	}
-
-	return $rejouer . (defined('_TESTER_NOSCRIPT') ? _TESTER_NOSCRIPT : '');
+    if (_SPIP_AJAX and !defined('_TESTER_NOSCRIPT')) {
+        // pour le pied de page (deja defini si on est validation XML)
+        define('_TESTER_NOSCRIPT',
+            "<noscript>\n<div style='display:none;'><img src='"
+            . generer_url_ecrire('test_ajax', 'js=-1')
+            . "' width='1' height='1' alt='' /></div></noscript>\n");
+    }
+
+    $rejouer = '';
+    if (defined('_SESSION_REJOUER')) {
+        $rejouer = (_SESSION_REJOUER === true) ? rejouer_session() : _SESSION_REJOUER;
+    }
+
+    return $rejouer . (defined('_TESTER_NOSCRIPT') ? _TESTER_NOSCRIPT : '');
 }
 
 /**
@@ -189,25 +189,25 @@ 
  **/
 function info_maj_spip() {
 
-	$maj = isset($GLOBALS['meta']['info_maj_spip']) ? $GLOBALS['meta']['info_maj_spip'] : null;
-	if (!$maj) {
-		return "";
-	}
+    $maj = isset($GLOBALS['meta']['info_maj_spip']) ? $GLOBALS['meta']['info_maj_spip'] : null;
+    if (!$maj) {
+        return "";
+    }
 
-	$maj = explode('|', $maj);
-	// c'est une ancienne notif, on a fait la maj depuis !
-	if ($GLOBALS['spip_version_branche'] !== reset($maj)) {
-		return "";
-	}
+    $maj = explode('|', $maj);
+    // c'est une ancienne notif, on a fait la maj depuis !
+    if ($GLOBALS['spip_version_branche'] !== reset($maj)) {
+        return "";
+    }
 
-	if (!autoriser('webmestre')) {
-		return "";
-	}
+    if (!autoriser('webmestre')) {
+        return "";
+    }
 
-	array_shift($maj);
-	$maj = implode('|', $maj);
+    array_shift($maj);
+    $maj = implode('|', $maj);
 
-	return "$maj<br />";
+    return "$maj<br />";
 }
 
 /**
@@ -218,43 +218,43 @@ 
  **/
 function info_copyright() {
 
-	$version = $GLOBALS['spip_version_affichee'];
-
-	//
-	// Mention, le cas echeant, de la revision SVN courante
-	//
-	if ($vcs = version_vcs_courante(_DIR_RACINE, true)) {
-		if ($vcs['vcs'] === 'GIT') {
-			$url = 'https://git.spip.net/spip/spip/commit/' . $vcs['commit'];
-		} elseif ($vcs['vcs'] === 'SVN') {
-			$url = 'https://core.spip.net/projects/spip/repository/revisions/' . $vcs['commit'];
-		} else {
-			$url = '';
-		}
-		// affichage "GIT [master: abcdef]"
-		$commit = isset($vcs['commit_short']) ? $vcs['commit_short'] : $vcs['commit'];
-		if ($url) {
-			$commit = "<a href=\"$url\" target=\"_blank\" rel=\"noopener noreferrer\">$commit</a>";
-		}
-		if ($vcs['branch']) {
-			$commit = $vcs['branch'] . ': ' . $commit;
-		}
-		$version .= " {$vcs['vcs']} [$commit]";
-	}
-
-	// et la version de l'ecran de securite
-	$secu = defined('_ECRAN_SECURITE')
-		? "<br />" . _T('ecran_securite', array('version' => _ECRAN_SECURITE))
-		: '';
-
-	return _T('info_copyright',
-		array(
-			'spip' => "<b>SPIP $version</b> ",
-			'lien_gpl' =>
-				"<a href='" . generer_url_ecrire("aide",
-					"aide=licence&var_lang=" . $GLOBALS['spip_lang']) . "' class=\"aide popin\">" . _T('info_copyright_gpl') . "</a>"
-		))
-	. $secu;
+    $version = $GLOBALS['spip_version_affichee'];
+
+    //
+    // Mention, le cas echeant, de la revision SVN courante
+    //
+    if ($vcs = version_vcs_courante(_DIR_RACINE, true)) {
+        if ($vcs['vcs'] === 'GIT') {
+            $url = 'https://git.spip.net/spip/spip/commit/' . $vcs['commit'];
+        } elseif ($vcs['vcs'] === 'SVN') {
+            $url = 'https://core.spip.net/projects/spip/repository/revisions/' . $vcs['commit'];
+        } else {
+            $url = '';
+        }
+        // affichage "GIT [master: abcdef]"
+        $commit = isset($vcs['commit_short']) ? $vcs['commit_short'] : $vcs['commit'];
+        if ($url) {
+            $commit = "<a href=\"$url\" target=\"_blank\" rel=\"noopener noreferrer\">$commit</a>";
+        }
+        if ($vcs['branch']) {
+            $commit = $vcs['branch'] . ': ' . $commit;
+        }
+        $version .= " {$vcs['vcs']} [$commit]";
+    }
+
+    // et la version de l'ecran de securite
+    $secu = defined('_ECRAN_SECURITE')
+        ? "<br />" . _T('ecran_securite', array('version' => _ECRAN_SECURITE))
+        : '';
+
+    return _T('info_copyright',
+        array(
+            'spip' => "<b>SPIP $version</b> ",
+            'lien_gpl' =>
+                "<a href='" . generer_url_ecrire("aide",
+                    "aide=licence&var_lang=" . $GLOBALS['spip_lang']) . "' class=\"aide popin\">" . _T('info_copyright_gpl') . "</a>"
+        ))
+    . $secu;
 
 }
 
@@ -270,17 +270,17 @@ 
  * @return string             Code HTML
  **/
 function formulaire_recherche($page, $complement = "") {
-	$recherche = _request('recherche');
-	$recherche_aff = entites_html($recherche);
-	if (!strlen($recherche)) {
-		$recherche_aff = _T('info_rechercher');
-		$onfocus = " onfocus=\"this.value='';\"";
-	} else {
-		$onfocus = '';
-	}
-
-	$form = '<input type="text" size="10" value="' . $recherche_aff . '" name="recherche" class="recherche" accesskey="r"' . $onfocus . ' />';
-	$form .= "<input type='image' src='" . chemin_image('rechercher-20.png') . "' name='submit' class='submit' alt='" . _T('info_rechercher') . "' />";
-
-	return "<div class='spip_recherche'>" . generer_form_ecrire($page, $form . $complement, " method='get'") . "</div>";
+    $recherche = _request('recherche');
+    $recherche_aff = entites_html($recherche);
+    if (!strlen($recherche)) {
+        $recherche_aff = _T('info_rechercher');
+        $onfocus = " onfocus=\"this.value='';\"";
+    } else {
+        $onfocus = '';
+    }
+
+    $form = '<input type="text" size="10" value="' . $recherche_aff . '" name="recherche" class="recherche" accesskey="r"' . $onfocus . ' />';
+    $form .= "<input type='image' src='" . chemin_image('rechercher-20.png') . "' name='submit' class='submit' alt='" . _T('info_rechercher') . "' />";
+
+    return "<div class='spip_recherche'>" . generer_form_ecrire($page, $form . $complement, " method='get'") . "</div>";
 }

ecrire/inc/json.php

Indentation +50 added lines, -50 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les fonctions de toggg pour faire du JSON
@@ -26,64 +26,64 @@ 
 
 // https://code.spip.net/@var2js
 function var2js($var) {
-	$asso = false;
-	switch (true) {
-		case is_null($var):
-			return 'null';
-		case is_string($var):
-			return '"' . addcslashes($var, "\"\\\n\r/") . '"';
-		case is_bool($var):
-			return $var ? 'true' : 'false';
-		case is_scalar($var):
-			return (string)$var;
-		case is_object($var):// blam
-			$var = get_object_vars($var);
-			$asso = true;
-			// $var devient un array, on continue
-		case is_array($var):
-			$keys = array_keys($var);
-			$ikey = count($keys);
-			while (!$asso && $ikey--) {
-				$asso = $ikey !== $keys[$ikey];
-			}
-			$sep = '';
-			if ($asso) {
-				$ret = '{';
-				foreach ($var as $key => $elt) {
-					$ret .= $sep . '"' . $key . '":' . var2js($elt);
-					$sep = ',';
-				}
+    $asso = false;
+    switch (true) {
+        case is_null($var):
+            return 'null';
+        case is_string($var):
+            return '"' . addcslashes($var, "\"\\\n\r/") . '"';
+        case is_bool($var):
+            return $var ? 'true' : 'false';
+        case is_scalar($var):
+            return (string)$var;
+        case is_object($var):// blam
+            $var = get_object_vars($var);
+            $asso = true;
+            // $var devient un array, on continue
+        case is_array($var):
+            $keys = array_keys($var);
+            $ikey = count($keys);
+            while (!$asso && $ikey--) {
+                $asso = $ikey !== $keys[$ikey];
+            }
+            $sep = '';
+            if ($asso) {
+                $ret = '{';
+                foreach ($var as $key => $elt) {
+                    $ret .= $sep . '"' . $key . '":' . var2js($elt);
+                    $sep = ',';
+                }
 
-				return $ret . '}';
-			} else {
-				$ret = '[';
-				foreach ($var as $elt) {
-					$ret .= $sep . var2js($elt);
-					$sep = ',';
-				}
+                return $ret . '}';
+            } else {
+                $ret = '[';
+                foreach ($var as $elt) {
+                    $ret .= $sep . var2js($elt);
+                    $sep = ',';
+                }
 
-				return $ret . ']';
-			}
-	}
+                return $ret . ']';
+            }
+    }
 
-	return false;
+    return false;
 }
 
 if (!function_exists('json_encode')) {
-	function json_encode($v) {
-		return var2js($v);
-	}
+    function json_encode($v) {
+        return var2js($v);
+    }
 }
 
 // https://code.spip.net/@json_export
 function json_export($var) {
-	$var = json_encode($var);
+    $var = json_encode($var);
 
-	// flag indiquant qu'on est en iframe et qu'il faut proteger nos
-	// donnees dans un <textarea> ; attention $_FILES a ete vide par array_pop
-	if (defined('FILE_UPLOAD')) {
-		return '<textarea>' . spip_htmlspecialchars($var) . '</textarea>';
-	} else {
-		return $var;
-	}
+    // flag indiquant qu'on est en iframe et qu'il faut proteger nos
+    // donnees dans un <textarea> ; attention $_FILES a ete vide par array_pop
+    if (defined('FILE_UPLOAD')) {
+        return '<textarea>' . spip_htmlspecialchars($var) . '</textarea>';
+    } else {
+        return $var;
+    }
 }

ecrire/inc/layer.php

Indentation +105 added lines, -105 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -26,41 +26,41 @@ 
  * @return string Code HTML du cadre dépliable
  **/
 function cadre_depliable($icone, $titre, $deplie, $contenu, $ids = '', $style_cadre = 'r') {
-	$bouton = bouton_block_depliable($titre, $deplie, $ids);
-
-	return
-		debut_cadre($style_cadre, $icone, '', $bouton, '', '', false)
-		. debut_block_depliable($deplie, $ids)
-		. "<div class='cadre_padding'>\n"
-		. $contenu
-		. "</div>\n"
-		. fin_block()
-		. fin_cadre();
+    $bouton = bouton_block_depliable($titre, $deplie, $ids);
+
+    return
+        debut_cadre($style_cadre, $icone, '', $bouton, '', '', false)
+        . debut_block_depliable($deplie, $ids)
+        . "<div class='cadre_padding'>\n"
+        . $contenu
+        . "</div>\n"
+        . fin_block()
+        . fin_cadre();
 }
 
 // https://code.spip.net/@block_parfois_visible
 function block_parfois_visible($nom, $invite, $masque, $style = '', $visible = false) {
-	return "\n"
-	. bouton_block_depliable($invite, $visible, $nom)
-	. debut_block_depliable($visible, $nom)
-	. $masque
-	. fin_block();
+    return "\n"
+    . bouton_block_depliable($invite, $visible, $nom)
+    . debut_block_depliable($visible, $nom)
+    . $masque
+    . fin_block();
 }
 
 // https://code.spip.net/@debut_block_depliable
 function debut_block_depliable($deplie, $id = "") {
-	$class = ' blocdeplie';
-	// si on n'accepte pas js, ne pas fermer
-	if (!$deplie) {
-		$class = " blocreplie";
-	}
+    $class = ' blocdeplie';
+    // si on n'accepte pas js, ne pas fermer
+    if (!$deplie) {
+        $class = " blocreplie";
+    }
 
-	return "<div " . ($id ? "id='$id' " : "") . "class='bloc_depliable$class'>";
+    return "<div " . ($id ? "id='$id' " : "") . "class='bloc_depliable$class'>";
 }
 
 // https://code.spip.net/@fin_block
 function fin_block() {
-	return "<div class='nettoyeur'></div>\n</div>";
+    return "<div class='nettoyeur'></div>\n</div>";
 }
 
 // $texte : texte du bouton
@@ -68,32 +68,32 @@ 
 // $ids : id des div lies au bouton (facultatif, par defaut c'est le div.bloc_depliable qui suit)
 // https://code.spip.net/@bouton_block_depliable
 function bouton_block_depliable($texte, $deplie, $ids = "") {
-	$bouton_id = 'b' . substr(md5($texte . microtime()), 0, 8);
-
-	$class = ($deplie === true) ? " deplie" : (($deplie == -1) ? " impliable" : " replie");
-	if (strlen($ids)) {
-		$cible = explode(',', $ids);
-		$cible = '#' . implode(",#", $cible);
-	} else {
-		$cible = "#$bouton_id + div.bloc_depliable";
-	}
-
-	$b = (strpos($texte, "<h") === false ? 'h3' : 'div');
-
-	return "<$b "
-	. ($bouton_id ? "id='$bouton_id' " : "")
-	. "class='titrem$class'"
-	. (($deplie === -1)
-		? ""
-		: " onmouseover=\"jQuery(this).depliant('$cible');\""
-	)
-	. ">"
-	// une ancre pour rendre accessible au clavier le depliage du sous bloc
-	. "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
-	. "$texte</$b>"
-	. http_script(($deplie === 'incertain')
-		? "jQuery(function($){if ($('$cible').is(':visible')) { $('#$bouton_id').addClass('deplie').removeClass('replie'); }});"
-		: '');
+    $bouton_id = 'b' . substr(md5($texte . microtime()), 0, 8);
+
+    $class = ($deplie === true) ? " deplie" : (($deplie == -1) ? " impliable" : " replie");
+    if (strlen($ids)) {
+        $cible = explode(',', $ids);
+        $cible = '#' . implode(",#", $cible);
+    } else {
+        $cible = "#$bouton_id + div.bloc_depliable";
+    }
+
+    $b = (strpos($texte, "<h") === false ? 'h3' : 'div');
+
+    return "<$b "
+    . ($bouton_id ? "id='$bouton_id' " : "")
+    . "class='titrem$class'"
+    . (($deplie === -1)
+        ? ""
+        : " onmouseover=\"jQuery(this).depliant('$cible');\""
+    )
+    . ">"
+    // une ancre pour rendre accessible au clavier le depliage du sous bloc
+    . "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
+    . "$texte</$b>"
+    . http_script(($deplie === 'incertain')
+        ? "jQuery(function($){if ($('$cible').is(':visible')) { $('#$bouton_id').addClass('deplie').removeClass('replie'); }});"
+        : '');
 }
 
 //
@@ -102,62 +102,62 @@ 
 // https://code.spip.net/@verif_butineur
 function verif_butineur() {
 
-	preg_match(",^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,", $_SERVER['HTTP_USER_AGENT'], $match);
-	$GLOBALS['browser_name'] = $match[1];
-	$GLOBALS['browser_version'] = $match[2];
-	$GLOBALS['browser_description'] = $match[3];
-	$GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
-	$GLOBALS['browser_barre'] = '';
-
-	if (!preg_match(",opera,i", $GLOBALS['browser_description']) && preg_match(",opera,i", $GLOBALS['browser_name'])) {
-		$GLOBALS['browser_name'] = "Opera";
-		$GLOBALS['browser_version'] = $match[2];
-		$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
-	} else {
-		if (preg_match(",opera,i", $GLOBALS['browser_description'])) {
-			preg_match(",Opera ([^\ ]*),i", $GLOBALS['browser_description'], $match);
-			$GLOBALS['browser_name'] = "Opera";
-			$GLOBALS['browser_version'] = $match[1];
-			$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
-		} else {
-			if (preg_match(",msie,i", $GLOBALS['browser_description'])) {
-				preg_match(",MSIE ([^;]*),i", $GLOBALS['browser_description'], $match);
-				$GLOBALS['browser_name'] = "MSIE";
-				$GLOBALS['browser_version'] = $match[1];
-				$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.5);
-			} else {
-				if (preg_match(",KHTML,i", $GLOBALS['browser_description']) &&
-					preg_match(",Safari/([^;]*),", $GLOBALS['browser_description'], $match)
-				) {
-					$GLOBALS['browser_name'] = "Safari";
-					$GLOBALS['browser_version'] = $match[1];
-					$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.0);
-				} else {
-					if (preg_match(",mozilla,i", $GLOBALS['browser_name']) and $GLOBALS['browser_version'] >= 5) {
-						// Numero de version pour Mozilla "authentique"
-						if (preg_match(",rv:([0-9]+\.[0-9]+),", $GLOBALS['browser_description'], $match)) {
-							$GLOBALS['browser_rev'] = doubleval($match[1]);
-						} // Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
-						else {
-							if (strpos($GLOBALS['browser_description'], "Gecko") and !strpos($GLOBALS['browser_description'],
-									"KHTML")
-							) {
-								$GLOBALS['browser_rev'] = 1.4;
-							} // Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
-							else {
-								$GLOBALS['browser_rev'] = 1.0;
-							}
-						}
-						$GLOBALS['browser_barre'] = $GLOBALS['browser_rev'] >= 1.3;
-					}
-				}
-			}
-		}
-	}
-
-	if (!$GLOBALS['browser_name']) {
-		$GLOBALS['browser_name'] = "Mozilla";
-	}
+    preg_match(",^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,", $_SERVER['HTTP_USER_AGENT'], $match);
+    $GLOBALS['browser_name'] = $match[1];
+    $GLOBALS['browser_version'] = $match[2];
+    $GLOBALS['browser_description'] = $match[3];
+    $GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
+    $GLOBALS['browser_barre'] = '';
+
+    if (!preg_match(",opera,i", $GLOBALS['browser_description']) && preg_match(",opera,i", $GLOBALS['browser_name'])) {
+        $GLOBALS['browser_name'] = "Opera";
+        $GLOBALS['browser_version'] = $match[2];
+        $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
+    } else {
+        if (preg_match(",opera,i", $GLOBALS['browser_description'])) {
+            preg_match(",Opera ([^\ ]*),i", $GLOBALS['browser_description'], $match);
+            $GLOBALS['browser_name'] = "Opera";
+            $GLOBALS['browser_version'] = $match[1];
+            $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
+        } else {
+            if (preg_match(",msie,i", $GLOBALS['browser_description'])) {
+                preg_match(",MSIE ([^;]*),i", $GLOBALS['browser_description'], $match);
+                $GLOBALS['browser_name'] = "MSIE";
+                $GLOBALS['browser_version'] = $match[1];
+                $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.5);
+            } else {
+                if (preg_match(",KHTML,i", $GLOBALS['browser_description']) &&
+                    preg_match(",Safari/([^;]*),", $GLOBALS['browser_description'], $match)
+                ) {
+                    $GLOBALS['browser_name'] = "Safari";
+                    $GLOBALS['browser_version'] = $match[1];
+                    $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.0);
+                } else {
+                    if (preg_match(",mozilla,i", $GLOBALS['browser_name']) and $GLOBALS['browser_version'] >= 5) {
+                        // Numero de version pour Mozilla "authentique"
+                        if (preg_match(",rv:([0-9]+\.[0-9]+),", $GLOBALS['browser_description'], $match)) {
+                            $GLOBALS['browser_rev'] = doubleval($match[1]);
+                        } // Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
+                        else {
+                            if (strpos($GLOBALS['browser_description'], "Gecko") and !strpos($GLOBALS['browser_description'],
+                                    "KHTML")
+                            ) {
+                                $GLOBALS['browser_rev'] = 1.4;
+                            } // Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
+                            else {
+                                $GLOBALS['browser_rev'] = 1.0;
+                            }
+                        }
+                        $GLOBALS['browser_barre'] = $GLOBALS['browser_rev'] >= 1.3;
+                    }
+                }
+            }
+        }
+    }
+
+    if (!$GLOBALS['browser_name']) {
+        $GLOBALS['browser_name'] = "Mozilla";
+    }
 }
 
 verif_butineur();

ecrire/inc/install.php

Indentation +354 added lines, -354 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -43,12 +43,12 @@ 
  * @return void
  **/
 function install_fichier_connexion($nom, $texte) {
-	$texte = "<" . "?php\n"
-		. "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
-		. $texte
-		. "?" . ">";
+    $texte = "<" . "?php\n"
+        . "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
+        . $texte
+        . "?" . ">";
 
-	ecrire_fichier($nom, $texte);
+    ecrire_fichier($nom, $texte);
 }
 
 
@@ -77,20 +77,20 @@ 
  *
  **/
 function install_connexion($adr, $port, $login, $pass, $base, $type, $pref, $ldap = '', $charset = '') {
-	$adr = addcslashes($adr, "'\\");
-	$port = addcslashes($port, "'\\");
-	$login = addcslashes($login, "'\\");
-	$pass = addcslashes($pass, "'\\");
-	$base = addcslashes($base, "'\\");
-	$type = addcslashes($type, "'\\");
-	$pref = addcslashes($pref, "'\\");
-	$ldap = addcslashes($ldap, "'\\");
-	$charset = addcslashes($charset, "'\\");
-
-	return "\$GLOBALS['spip_connect_version'] = 0.8;\n"
-	. "spip_connect_db("
-	. "'$adr','$port','$login','$pass','$base'"
-	. ",'$type', '$pref','$ldap','$charset');\n";
+    $adr = addcslashes($adr, "'\\");
+    $port = addcslashes($port, "'\\");
+    $login = addcslashes($login, "'\\");
+    $pass = addcslashes($pass, "'\\");
+    $base = addcslashes($base, "'\\");
+    $type = addcslashes($type, "'\\");
+    $pref = addcslashes($pref, "'\\");
+    $ldap = addcslashes($ldap, "'\\");
+    $charset = addcslashes($charset, "'\\");
+
+    return "\$GLOBALS['spip_connect_version'] = 0.8;\n"
+    . "spip_connect_db("
+    . "'$adr','$port','$login','$pass','$base'"
+    . ",'$type', '$pref','$ldap','$charset');\n";
 }
 
 
@@ -106,26 +106,26 @@ 
  *     Tableau des informations sur la connexion
  **/
 function analyse_fichier_connection($file) {
-	$s = @join('', file($file));
-	if (preg_match("#mysql_connect\([\"'](.*)[\"'],[\"'](.*)[\"'],[\"'](.*)[\"']\)#", $s, $regs)) {
-		array_shift($regs);
-
-		return $regs;
-	} else {
-		$ar = '\s*\'([^\']*)\'';
-		$r = '\s*,' . $ar;
-		$r = "#spip_connect_db[(]$ar$r$r$r$r(?:$r(?:$r(?:$r(?:$r)?)?)?)?#";
-		if (preg_match($r, $s, $regs)) {
-			$regs[2] = $regs[1] . (!$regs[2] ? '' : ":" . $regs[2] . ";");
-			array_shift($regs);
-			array_shift($regs);
-
-			return $regs;
-		}
-	}
-	spip_log("$file n'est pas un fichier de connexion");
-
-	return array();
+    $s = @join('', file($file));
+    if (preg_match("#mysql_connect\([\"'](.*)[\"'],[\"'](.*)[\"'],[\"'](.*)[\"']\)#", $s, $regs)) {
+        array_shift($regs);
+
+        return $regs;
+    } else {
+        $ar = '\s*\'([^\']*)\'';
+        $r = '\s*,' . $ar;
+        $r = "#spip_connect_db[(]$ar$r$r$r$r(?:$r(?:$r(?:$r(?:$r)?)?)?)?#";
+        if (preg_match($r, $s, $regs)) {
+            $regs[2] = $regs[1] . (!$regs[2] ? '' : ":" . $regs[2] . ";");
+            array_shift($regs);
+            array_shift($regs);
+
+            return $regs;
+        }
+    }
+    spip_log("$file n'est pas un fichier de connexion");
+
+    return array();
 }
 
 /**
@@ -142,21 +142,21 @@ 
  *     Liste des noms de connecteurs
  **/
 function bases_referencees($exclu = '') {
-	$tables = array();
-	foreach (preg_files(_DIR_CONNECT, '.php$') as $f) {
-		if ($f != $exclu and analyse_fichier_connection($f)) {
-			$tables[] = basename($f, '.php');
-		}
-	}
-
-	return $tables;
+    $tables = array();
+    foreach (preg_files(_DIR_CONNECT, '.php$') as $f) {
+        if ($f != $exclu and analyse_fichier_connection($f)) {
+            $tables[] = basename($f, '.php');
+        }
+    }
+
+    return $tables;
 }
 
 
 function install_mode_appel($server_db, $tout = true) {
-	return ($server_db != 'mysql') ? ''
-		: (($tout ? test_rappel_nom_base_mysql($server_db) : '')
-			. test_sql_mode_mysql($server_db));
+    return ($server_db != 'mysql') ? ''
+        : (($tout ? test_rappel_nom_base_mysql($server_db) : '')
+            . test_sql_mode_mysql($server_db));
 }
 
 //
@@ -164,52 +164,52 @@ 
 // (sert a l'etape 1 de l'installation)
 // https://code.spip.net/@tester_compatibilite_hebergement
 function tester_compatibilite_hebergement() {
-	$err = array();
-
-	$p = phpversion();
-	if (version_compare($p, _PHP_MIN, '<')) {
-		$err[] = _T('install_php_version', array('version' => $p, 'minimum' => _PHP_MIN));
-	}
-
-	// Si on n'a pas la bonne version de PHP, c'est la fin
-	if ($err) {
-		die("<div class='error'>"
-			. "<h3>" . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>"
-			. "<li><strong>{$err[0]}</strong></li>\n</ul></div>");
-	}
-
-	// Il faut une base de donnees tout de meme ...
-	$serveurs = install_select_serveur();
-	if (!$serveurs) {
-		$err[] = _T('install_extension_php_obligatoire')
-			. " <a href='http://www.php.net/mysql'>MYSQL</a>"
-			. "| <a href='http://www.php.net/pgsql'>PostgreSQL</a>"
-			. "| <a href='http://www.php.net/sqlite'>SQLite</a>";
-	}
-
-	// et il faut preg
-	if (!function_exists('preg_match_all')) {
-		$err[] = _T('install_extension_php_obligatoire')
-			. " <a href='http://se.php.net/pcre'>PCRE</a>";
-	}
-
-	// et surtout pas ce mbstring.overload
-	if ($a = @ini_get('mbstring.func_overload')) {
-		$err[] = _T('install_extension_mbstring')
-			. "mbstring.func_overload=$a - <a href='http://www.php.net/mb_string'>mb_string</a>.<br /><small>";
-	}
-
-	if ($err) {
-		echo "<div class='error'>"
-			. "<h3>" . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>";
-		foreach ($err as $e) {
-			echo "<li><strong>$e</strong></li>\n";
-		}
-
-		# a priori ici on pourrait die(), mais il faut laisser la possibilite
-		# de forcer malgre tout (pour tester, ou si bug de detection)
-		echo "</ul></div>\n";
-	}
+    $err = array();
+
+    $p = phpversion();
+    if (version_compare($p, _PHP_MIN, '<')) {
+        $err[] = _T('install_php_version', array('version' => $p, 'minimum' => _PHP_MIN));
+    }
+
+    // Si on n'a pas la bonne version de PHP, c'est la fin
+    if ($err) {
+        die("<div class='error'>"
+            . "<h3>" . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>"
+            . "<li><strong>{$err[0]}</strong></li>\n</ul></div>");
+    }
+
+    // Il faut une base de donnees tout de meme ...
+    $serveurs = install_select_serveur();
+    if (!$serveurs) {
+        $err[] = _T('install_extension_php_obligatoire')
+            . " <a href='http://www.php.net/mysql'>MYSQL</a>"
+            . "| <a href='http://www.php.net/pgsql'>PostgreSQL</a>"
+            . "| <a href='http://www.php.net/sqlite'>SQLite</a>";
+    }
+
+    // et il faut preg
+    if (!function_exists('preg_match_all')) {
+        $err[] = _T('install_extension_php_obligatoire')
+            . " <a href='http://se.php.net/pcre'>PCRE</a>";
+    }
+
+    // et surtout pas ce mbstring.overload
+    if ($a = @ini_get('mbstring.func_overload')) {
+        $err[] = _T('install_extension_mbstring')
+            . "mbstring.func_overload=$a - <a href='http://www.php.net/mb_string'>mb_string</a>.<br /><small>";
+    }
+
+    if ($err) {
+        echo "<div class='error'>"
+            . "<h3>" . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>";
+        foreach ($err as $e) {
+            echo "<li><strong>$e</strong></li>\n";
+        }
+
+        # a priori ici on pourrait die(), mais il faut laisser la possibilite
+        # de forcer malgre tout (pour tester, ou si bug de detection)
+        echo "</ul></div>\n";
+    }
 }
 
 
@@ -219,24 +219,24 @@ 
  * @note superflu ??
  */
 function login_hebergeur() {
-	$base_hebergeur = 'localhost'; # par defaut
+    $base_hebergeur = 'localhost'; # par defaut
 
-	// Free
-	if (preg_match(',(.*)\.free\.fr$,', $_SERVER['SERVER_NAME'], $regs)) {
-		$base_hebergeur = 'sql.free.fr';
-		$login_hebergeur = $regs[1];
-	} else {
-		$login_hebergeur = '';
-	}
+    // Free
+    if (preg_match(',(.*)\.free\.fr$,', $_SERVER['SERVER_NAME'], $regs)) {
+        $base_hebergeur = 'sql.free.fr';
+        $login_hebergeur = $regs[1];
+    } else {
+        $login_hebergeur = '';
+    }
 
-	return array($base_hebergeur, $login_hebergeur);
+    return array($base_hebergeur, $login_hebergeur);
 }
 
 
 // https://code.spip.net/@info_etape
 function info_etape($titre, $complement = '') {
-	return "<h2>" . $titre . "</h2>\n" .
-	($complement ? "" . $complement . "\n" : '');
+    return "<h2>" . $titre . "</h2>\n" .
+    ($complement ? "" . $complement . "\n" : '');
 }
 
 /**
@@ -246,155 +246,155 @@ 
  * @return string Code HTML du bouton
  **/
 function bouton_suivant($code = '') {
-	if ($code == '') {
-		$code = _T('bouton_suivant');
-	}
-	static $suivant = 0;
-	$id = 'suivant' . (($suivant > 0) ? strval($suivant) : '');
-	$suivant += 1;
-
-	return "\n<p class='boutons suivant'><input id='" . $id . "' type='submit'\nvalue=\"" .
-	$code .
-	" >>\" /></p>\n";
+    if ($code == '') {
+        $code = _T('bouton_suivant');
+    }
+    static $suivant = 0;
+    $id = 'suivant' . (($suivant > 0) ? strval($suivant) : '');
+    $suivant += 1;
+
+    return "\n<p class='boutons suivant'><input id='" . $id . "' type='submit'\nvalue=\"" .
+    $code .
+    " >>\" /></p>\n";
 }
 
 // https://code.spip.net/@info_progression_etape
 function info_progression_etape($en_cours, $phase, $dir, $erreur = false) {
-	//$en_cours = _request('etape')?_request('etape'):"";
-	$liste = find_all_in_path($dir, $phase . '(([0-9])+|fin)[.]php$');
-	$debut = 1;
-	$etat = "ok";
-	$last = count($liste);
+    //$en_cours = _request('etape')?_request('etape'):"";
+    $liste = find_all_in_path($dir, $phase . '(([0-9])+|fin)[.]php$');
+    $debut = 1;
+    $etat = "ok";
+    $last = count($liste);
 //	$texte_etat = array('ok'=>'OK','encours'=>_T('en_cours'),'todo'=>_T('todo'));
 
-	$intitule_etat["etape_"][1] = typo(_T('info_connexion_base_donnee'));
-	$intitule_etat["etape_"][2] = typo(_T('menu_aide_installation_choix_base'));
-	$intitule_etat["etape_"][3] = typo(_T('info_informations_personnelles'));
-	$intitule_etat["etape_"][4] = typo(_T('info_derniere_etape'));
+    $intitule_etat["etape_"][1] = typo(_T('info_connexion_base_donnee'));
+    $intitule_etat["etape_"][2] = typo(_T('menu_aide_installation_choix_base'));
+    $intitule_etat["etape_"][3] = typo(_T('info_informations_personnelles'));
+    $intitule_etat["etape_"][4] = typo(_T('info_derniere_etape'));
 
-	$intitule_etat["etape_ldap"][1] = typo(_T('titre_connexion_ldap'));
-	$intitule_etat["etape_ldap"][2] = typo(_T('titre_connexion_ldap'));
-	$intitule_etat["etape_ldap"][3] = typo(_T('info_chemin_acces_1'));
-	$intitule_etat["etape_ldap"][4] = typo(_T('info_reglage_ldap'));
-	$intitule_etat["etape_ldap"][5] = typo(_T('info_ldap_ok'));
+    $intitule_etat["etape_ldap"][1] = typo(_T('titre_connexion_ldap'));
+    $intitule_etat["etape_ldap"][2] = typo(_T('titre_connexion_ldap'));
+    $intitule_etat["etape_ldap"][3] = typo(_T('info_chemin_acces_1'));
+    $intitule_etat["etape_ldap"][4] = typo(_T('info_reglage_ldap'));
+    $intitule_etat["etape_ldap"][5] = typo(_T('info_ldap_ok'));
 
 //	$aff_etapes = "<span id='etapes'>";
 
-	$aff_etapes = "<ul id='infos_etapes' class='infos_$phase$en_cours'>";
-
-	foreach ($liste as $etape => $fichier) {
-		if ($debut < $last) {
-			if ($debut == $en_cours && $erreur) {
-				$class = "on erreur";
-			} else {
-				if ($debut == $en_cours) {
-					$class = "on";
-				} else {
-					if ($debut > $en_cours) {
-						$class = "prochains";
-					} else {
-						$class = "valides";
-					}
-				}
-			}
-
-			$aff_etapes .= "<li class='$class'><div class='fond'>";
-			$aff_etapes .= ($debut == $en_cours) ? "<strong>" : '';
-			$aff_etapes .= "<em>" . _T('etape') . " </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
-			$aff_etapes .= $intitule_etat["$phase"][$debut];
-			$aff_etapes .= ($debut == $en_cours) ? "</strong>" : '';
-			$aff_etapes .= "</div></li>";
-		}
-		$debut++;
-	}
-	$aff_etapes .= "</ul>";
-	$aff_etapes .= "<br class='nettoyeur' />\n";
-
-	return $aff_etapes;
+    $aff_etapes = "<ul id='infos_etapes' class='infos_$phase$en_cours'>";
+
+    foreach ($liste as $etape => $fichier) {
+        if ($debut < $last) {
+            if ($debut == $en_cours && $erreur) {
+                $class = "on erreur";
+            } else {
+                if ($debut == $en_cours) {
+                    $class = "on";
+                } else {
+                    if ($debut > $en_cours) {
+                        $class = "prochains";
+                    } else {
+                        $class = "valides";
+                    }
+                }
+            }
+
+            $aff_etapes .= "<li class='$class'><div class='fond'>";
+            $aff_etapes .= ($debut == $en_cours) ? "<strong>" : '';
+            $aff_etapes .= "<em>" . _T('etape') . " </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
+            $aff_etapes .= $intitule_etat["$phase"][$debut];
+            $aff_etapes .= ($debut == $en_cours) ? "</strong>" : '';
+            $aff_etapes .= "</div></li>";
+        }
+        $debut++;
+    }
+    $aff_etapes .= "</ul>";
+    $aff_etapes .= "<br class='nettoyeur' />\n";
+
+    return $aff_etapes;
 }
 
 
 // https://code.spip.net/@fieldset
 function fieldset($legend, $champs = array(), $apres = '', $avant = '') {
-	return "<fieldset>\n" .
-	$avant .
-	($legend ? "<legend>" . $legend . "</legend>\n" : '') .
-	fieldset_champs($champs) .
-	$apres .
-	"</fieldset>\n";
+    return "<fieldset>\n" .
+    $avant .
+    ($legend ? "<legend>" . $legend . "</legend>\n" : '') .
+    fieldset_champs($champs) .
+    $apres .
+    "</fieldset>\n";
 }
 
 function fieldset_champs($champs = array()) {
-	$fieldset = '';
-	foreach ($champs as $nom => $contenu) {
-		$type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
-		$class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
-		if (isset($contenu['alternatives'])) {
-			$fieldset .= $contenu['label'] . "\n";
-			foreach ($contenu['alternatives'] as $valeur => $label) {
-				$fieldset .= "<input type='radio' name='" . $nom .
-					"' id='$nom-$valeur' value='$valeur'"
-					. (($valeur == $contenu['valeur']) ? "\nchecked='checked'" : '')
-					. "/>\n";
-				$fieldset .= "<label for='$nom-$valeur'>" . $label . "</label>\n";
-			}
-			$fieldset .= "<br />\n";
-		} else {
-			$fieldset .= "<label for='" . $nom . "'>" . $contenu['label'] . "</label>\n";
-			$fieldset .= "<input " . $class . "type='" . $type . "' id='" . $nom . "' name='" . $nom . "'\nvalue='" . $contenu['valeur'] . "'"
-				. (preg_match(',^(pass|login),', $nom) ? " autocomplete='off'" : '')
-				. ((isset($contenu['required']) and $contenu['required']) ? " required='required'" : "")
-				. " />\n";
-		}
-	}
-
-	return $fieldset;
+    $fieldset = '';
+    foreach ($champs as $nom => $contenu) {
+        $type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
+        $class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
+        if (isset($contenu['alternatives'])) {
+            $fieldset .= $contenu['label'] . "\n";
+            foreach ($contenu['alternatives'] as $valeur => $label) {
+                $fieldset .= "<input type='radio' name='" . $nom .
+                    "' id='$nom-$valeur' value='$valeur'"
+                    . (($valeur == $contenu['valeur']) ? "\nchecked='checked'" : '')
+                    . "/>\n";
+                $fieldset .= "<label for='$nom-$valeur'>" . $label . "</label>\n";
+            }
+            $fieldset .= "<br />\n";
+        } else {
+            $fieldset .= "<label for='" . $nom . "'>" . $contenu['label'] . "</label>\n";
+            $fieldset .= "<input " . $class . "type='" . $type . "' id='" . $nom . "' name='" . $nom . "'\nvalue='" . $contenu['valeur'] . "'"
+                . (preg_match(',^(pass|login),', $nom) ? " autocomplete='off'" : '')
+                . ((isset($contenu['required']) and $contenu['required']) ? " required='required'" : "")
+                . " />\n";
+        }
+    }
+
+    return $fieldset;
 }
 
 function install_select_serveur() {
-	$options = array();
-	$dir = _DIR_RESTREINT . 'req/';
-	$d = opendir($dir);
-	if (!$d) {
-		return array();
-	}
-	while (($f = readdir($d)) !== false) {
-		if ((preg_match('/^(.*)[.]php$/', $f, $s))
-			and is_readable($f = $dir . $f)
-		) {
-			require_once($f);
-			$s = $s[1];
-			$v = 'spip_versions_' . $s;
-			if (function_exists($v) and $v()) {
-				$titre = _T("install_select_type_$s");
-				// proposer mysql par defaut si dispo
-				$checked = ($s == 'mysql' ? " checked='checked'" : "");
-				$options[$s] = "<li><input type='radio' id='$s' value='$s' name='server_db'$checked>"
-					. "<label for='$s'>" . ($titre ? $titre : $s) . "</label></li>";
-			} else {
-				spip_log("$s: portage indisponible");
-			}
-		}
-	}
-	sort($options);
-
-	return $options;
+    $options = array();
+    $dir = _DIR_RESTREINT . 'req/';
+    $d = opendir($dir);
+    if (!$d) {
+        return array();
+    }
+    while (($f = readdir($d)) !== false) {
+        if ((preg_match('/^(.*)[.]php$/', $f, $s))
+            and is_readable($f = $dir . $f)
+        ) {
+            require_once($f);
+            $s = $s[1];
+            $v = 'spip_versions_' . $s;
+            if (function_exists($v) and $v()) {
+                $titre = _T("install_select_type_$s");
+                // proposer mysql par defaut si dispo
+                $checked = ($s == 'mysql' ? " checked='checked'" : "");
+                $options[$s] = "<li><input type='radio' id='$s' value='$s' name='server_db'$checked>"
+                    . "<label for='$s'>" . ($titre ? $titre : $s) . "</label></li>";
+            } else {
+                spip_log("$s: portage indisponible");
+            }
+        }
+    }
+    sort($options);
+
+    return $options;
 }
 
 // https://code.spip.net/@install_connexion_form
 function install_connexion_form($db, $login, $pass, $predef, $hidden, $etape, $jquery = true) {
-	$server_db = (is_string($predef[0])) ? $predef[0] : '';
-
-	return generer_form_ecrire('install', (
-		"\n<input type='hidden' name='etape' value='$etape' />"
-		. $hidden
-		. (_request('echec') ?
-			("<p><b>" . _T('avis_connexion_echec_1') .
-				"</b></p><p>" . _T('avis_connexion_echec_2') . "</p><p style='font-size: small;'>" . _T('avis_connexion_echec_3') . "</p>")
-			: "")
-
-		. ($jquery ? http_script('', 'jquery.js') : '')
-		. http_script('
+    $server_db = (is_string($predef[0])) ? $predef[0] : '';
+
+    return generer_form_ecrire('install', (
+        "\n<input type='hidden' name='etape' value='$etape' />"
+        . $hidden
+        . (_request('echec') ?
+            ("<p><b>" . _T('avis_connexion_echec_1') .
+                "</b></p><p>" . _T('avis_connexion_echec_2') . "</p><p style='font-size: small;'>" . _T('avis_connexion_echec_3') . "</p>")
+            : "")
+
+        . ($jquery ? http_script('', 'jquery.js') : '')
+        . http_script('
 		jQuery(function($) {
 			$details_db = $("#install_adresse_base_hebergeur,#install_login_base_hebergeur,#install_pass_base_hebergeur");
 			$("input[type=hidden][name=server_db]").each(function(){
@@ -427,67 +427,67 @@ 
 			});
 		});')
 
-		. ($server_db
-			? '<input type="hidden" name="server_db" value="' . $server_db . '" />'
-			. (($predef[0])
-				? ('<h3>' . _T('install_serveur_hebergeur') . '</h3>')
-				: '')
-			: ('<fieldset><legend>'
-				. _T('install_select_type_db')
-				. "</legend>"
-				. '<p class="explication">'
-				. _T('install_types_db_connus')
-				// Passer l'avertissement SQLIte en  commentaire, on pourra facilement le supprimer par la suite sans changer les traductions.
-				// . "<br /><small>(". _T('install_types_db_connus_avertissement') .')</small>'
-				. '</p>'
-				. "\n<div class='p'>\n<ul>\n"
-				. join("\n", install_select_serveur())
-				. "\n</ul>\n</div></fieldset>")
-		)
-		. '<div id="install_adresse_base_hebergeur">'
-		. '<p>' . _T('texte_connexion_mysql') . '</p>'
-		. ($predef[1]
-			? '<h3>' . _T('install_adresse_base_hebergeur') . '</h3>'
-			: fieldset(_T('entree_base_donnee_1'),
-				array(
-					'adresse_db' => array(
-						'label' => $db[1],
-						'valeur' => $db[0]
-					),
-				)
-			)
-		)
-		. '</div>'
-
-		. '<div id="install_login_base_hebergeur">'
-		. ($predef[2]
-			? '<h3>' . _T('install_login_base_hebergeur') . '</h3>'
-			: fieldset(_T('entree_login_connexion_1'),
-				array(
-					'login_db' => array(
-						'label' => $login[1],
-						'valeur' => $login[0]
-					),
-				)
-			)
-		)
-		. '</div>'
-
-		. '<div id="install_pass_base_hebergeur">'
-		. ($predef[3]
-			? '<h3>' . _T('install_pass_base_hebergeur') . '</h3>'
-			: fieldset(_T('entree_mot_passe_1'),
-				array(
-					'pass_db' => array(
-						'label' => $pass[1],
-						'valeur' => $pass[0]
-					),
-				)
-			)
-		)
-		. '</div>'
-
-		. bouton_suivant()));
+        . ($server_db
+            ? '<input type="hidden" name="server_db" value="' . $server_db . '" />'
+            . (($predef[0])
+                ? ('<h3>' . _T('install_serveur_hebergeur') . '</h3>')
+                : '')
+            : ('<fieldset><legend>'
+                . _T('install_select_type_db')
+                . "</legend>"
+                . '<p class="explication">'
+                . _T('install_types_db_connus')
+                // Passer l'avertissement SQLIte en  commentaire, on pourra facilement le supprimer par la suite sans changer les traductions.
+                // . "<br /><small>(". _T('install_types_db_connus_avertissement') .')</small>'
+                . '</p>'
+                . "\n<div class='p'>\n<ul>\n"
+                . join("\n", install_select_serveur())
+                . "\n</ul>\n</div></fieldset>")
+        )
+        . '<div id="install_adresse_base_hebergeur">'
+        . '<p>' . _T('texte_connexion_mysql') . '</p>'
+        . ($predef[1]
+            ? '<h3>' . _T('install_adresse_base_hebergeur') . '</h3>'
+            : fieldset(_T('entree_base_donnee_1'),
+                array(
+                    'adresse_db' => array(
+                        'label' => $db[1],
+                        'valeur' => $db[0]
+                    ),
+                )
+            )
+        )
+        . '</div>'
+
+        . '<div id="install_login_base_hebergeur">'
+        . ($predef[2]
+            ? '<h3>' . _T('install_login_base_hebergeur') . '</h3>'
+            : fieldset(_T('entree_login_connexion_1'),
+                array(
+                    'login_db' => array(
+                        'label' => $login[1],
+                        'valeur' => $login[0]
+                    ),
+                )
+            )
+        )
+        . '</div>'
+
+        . '<div id="install_pass_base_hebergeur">'
+        . ($predef[3]
+            ? '<h3>' . _T('install_pass_base_hebergeur') . '</h3>'
+            : fieldset(_T('entree_mot_passe_1'),
+                array(
+                    'pass_db' => array(
+                        'label' => $pass[1],
+                        'valeur' => $pass[0]
+                    ),
+                )
+            )
+        )
+        . '</div>'
+
+        . bouton_suivant()));
 
 }
 
@@ -496,75 +496,75 @@ 
 
 // https://code.spip.net/@predef_ou_cache
 function predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db) {
-	return ((defined('_INSTALL_HOST_DB'))
-		? ''
-		: "\n<input type='hidden' name='adresse_db'  value=\"" . spip_htmlspecialchars($adresse_db) . "\" />"
-	)
-	. ((defined('_INSTALL_USER_DB'))
-		? ''
-		: "\n<input type='hidden' name='login_db' value=\"" . spip_htmlspecialchars($login_db) . "\" />"
-	)
-	. ((defined('_INSTALL_PASS_DB'))
-		? ''
-		: "\n<input type='hidden' name='pass_db' value=\"" . spip_htmlspecialchars($pass_db) . "\" />"
-	)
-
-	. ((defined('_INSTALL_SERVER_DB'))
-		? ''
-		: "\n<input type='hidden' name='server_db' value=\"" . spip_htmlspecialchars($server_db) . "\" />"
-	);
+    return ((defined('_INSTALL_HOST_DB'))
+        ? ''
+        : "\n<input type='hidden' name='adresse_db'  value=\"" . spip_htmlspecialchars($adresse_db) . "\" />"
+    )
+    . ((defined('_INSTALL_USER_DB'))
+        ? ''
+        : "\n<input type='hidden' name='login_db' value=\"" . spip_htmlspecialchars($login_db) . "\" />"
+    )
+    . ((defined('_INSTALL_PASS_DB'))
+        ? ''
+        : "\n<input type='hidden' name='pass_db' value=\"" . spip_htmlspecialchars($pass_db) . "\" />"
+    )
+
+    . ((defined('_INSTALL_SERVER_DB'))
+        ? ''
+        : "\n<input type='hidden' name='server_db' value=\"" . spip_htmlspecialchars($server_db) . "\" />"
+    );
 }
 
 // presentation des bases existantes
 
 // https://code.spip.net/@install_etape_liste_bases
 function install_etape_liste_bases($server_db, $login_db, $disabled = array()) {
-	$bases = $checked = array();
-	$noms = sql_listdbs($server_db);
-	if (!$noms) {
-		return '';
-	}
-
-	foreach ($noms as $nom) {
-		$id = spip_htmlspecialchars($nom);
-		$dis = in_array($nom, $disabled) ? " disabled='disabled'" : '';
-		$base = " name=\"choix_db\" value=\""
-			. $nom
-			. '"'
-			. $dis
-			. " type='radio' id='$id'";
-		$label = "<label for='$id'>"
-			. ($dis ? "<i>$nom</i>" : $nom)
-			. "</label>";
-
-		if (!$checked and !$dis and
-			(($nom == $login_db) or
-				($GLOBALS['table_prefix'] == $nom))
-		) {
-			$checked = "<input$base checked='checked' />\n$label";
-		} else {
-			$bases[] = "<input$base />\n$label";
-		}
-	}
-
-	if (!$bases && !$checked) {
-		return false;
-	}
-
-	if ($checked) {
-		array_unshift($bases, $checked);
-		$checked = true;
-	}
-
-	return array($checked, $bases);
+    $bases = $checked = array();
+    $noms = sql_listdbs($server_db);
+    if (!$noms) {
+        return '';
+    }
+
+    foreach ($noms as $nom) {
+        $id = spip_htmlspecialchars($nom);
+        $dis = in_array($nom, $disabled) ? " disabled='disabled'" : '';
+        $base = " name=\"choix_db\" value=\""
+            . $nom
+            . '"'
+            . $dis
+            . " type='radio' id='$id'";
+        $label = "<label for='$id'>"
+            . ($dis ? "<i>$nom</i>" : $nom)
+            . "</label>";
+
+        if (!$checked and !$dis and
+            (($nom == $login_db) or
+                ($GLOBALS['table_prefix'] == $nom))
+        ) {
+            $checked = "<input$base checked='checked' />\n$label";
+        } else {
+            $bases[] = "<input$base />\n$label";
+        }
+    }
+
+    if (!$bases && !$checked) {
+        return false;
+    }
+
+    if ($checked) {
+        array_unshift($bases, $checked);
+        $checked = true;
+    }
+
+    return array($checked, $bases);
 }
 
 function install_propager($hidden) {
-	$res = '';
-	foreach ($hidden as $k) {
-		$v = spip_htmlentities(_request($k));
-		$res .= "<input type='hidden' name='$k' value='$v' />";
-	}
+    $res = '';
+    foreach ($hidden as $k) {
+        $v = spip_htmlentities(_request($k));
+        $res .= "<input type='hidden' name='$k' value='$v' />";
+    }
 
-	return $res;
+    return $res;
 }

ecrire/inc/genie.php

Indentation +76 added lines, -76 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -75,24 +75,24 @@ 
  * @return
  **/
 function inc_genie_dist($taches = array()) {
-	include_spip('inc/queue');
-
-	if (_request('exec') == 'job_queue') {
-		return false;
-	}
-
-	$force_jobs = array();
-	// l'ancienne facon de lancer une tache cron immediatement
-	// etait de la passer en parametre a ing_genie_dist
-	// on reroute en ajoutant simplement le job a la queue, ASAP
-	foreach ($taches as $function => $period) {
-		$force_jobs[] = queue_add_job($function, _T('tache_cron_asap', array('function' => $function)),
-			array(time() - abs($period)), "genie/");
-	}
-
-	// et on passe la main a la gestion de la queue !
-	// en forcant eventuellement les jobs ajoute a l'instant
-	return queue_schedule(count($force_jobs) ? $force_jobs : null);
+    include_spip('inc/queue');
+
+    if (_request('exec') == 'job_queue') {
+        return false;
+    }
+
+    $force_jobs = array();
+    // l'ancienne facon de lancer une tache cron immediatement
+    // etait de la passer en parametre a ing_genie_dist
+    // on reroute en ajoutant simplement le job a la queue, ASAP
+    foreach ($taches as $function => $period) {
+        $force_jobs[] = queue_add_job($function, _T('tache_cron_asap', array('function' => $function)),
+            array(time() - abs($period)), "genie/");
+    }
+
+    // et on passe la main a la gestion de la queue !
+    // en forcant eventuellement les jobs ajoute a l'instant
+    return queue_schedule(count($force_jobs) ? $force_jobs : null);
 }
 
 //
@@ -106,32 +106,32 @@ 
 // https://code.spip.net/@taches_generales
 function taches_generales($taches_generales = array()) {
 
-	// verifier que toutes les taches cron sont planifiees
-	// c'est une tache cron !
-	$taches_generales['queue_watch'] = 3600 * 24;
+    // verifier que toutes les taches cron sont planifiees
+    // c'est une tache cron !
+    $taches_generales['queue_watch'] = 3600 * 24;
 
-	// MAJ des rubriques publiques (cas de la publication post-datee)
-	// est fait au coup par coup a present
-	//	$taches_generales['rubriques'] = 3600;
+    // MAJ des rubriques publiques (cas de la publication post-datee)
+    // est fait au coup par coup a present
+    //	$taches_generales['rubriques'] = 3600;
 
-	// Optimisation de la base
-	$taches_generales['optimiser'] = 3600 * 48;
+    // Optimisation de la base
+    $taches_generales['optimiser'] = 3600 * 48;
 
-	// nouveautes
-	if (isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
-		and $GLOBALS['meta']['jours_neuf']
-		and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
-	) {
-		$taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
-	}
+    // nouveautes
+    if (isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
+        and $GLOBALS['meta']['jours_neuf']
+        and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
+    ) {
+        $taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
+    }
 
-	// maintenance (ajax, verifications diverses)
-	$taches_generales['maintenance'] = 3600 * 2;
+    // maintenance (ajax, verifications diverses)
+    $taches_generales['maintenance'] = 3600 * 2;
 
-	// verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
-	$taches_generales['mise_a_jour'] = 3 * 24 * 3600;
+    // verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
+    $taches_generales['mise_a_jour'] = 3 * 24 * 3600;
 
-	return pipeline('taches_generales_cron', $taches_generales);
+    return pipeline('taches_generales_cron', $taches_generales);
 }
 
 /**
@@ -147,22 +147,22 @@ 
  * @return int
  */
 function genie_queue_watch_dist() {
-	static $deja_la = false;
-	if ($deja_la) {
-		return;
-	} // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
-	$deja_la = true;
-	$taches = taches_generales();
-	$programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
-	$programmees = array_column($programmees, 'fonction');
-	foreach ($taches as $tache => $periode) {
-		if (!in_array($tache, $programmees)) {
-			queue_genie_replan_job($tache, $periode, time() - round(rand(1, $periode)), 0);
-		}
-	}
-	$deja_la = false;
-
-	return 1;
+    static $deja_la = false;
+    if ($deja_la) {
+        return;
+    } // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
+    $deja_la = true;
+    $taches = taches_generales();
+    $programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
+    $programmees = array_column($programmees, 'fonction');
+    foreach ($taches as $tache => $periode) {
+        if (!in_array($tache, $programmees)) {
+            queue_genie_replan_job($tache, $periode, time() - round(rand(1, $periode)), 0);
+        }
+    }
+    $deja_la = false;
+
+    return 1;
 }
 
 /**
@@ -183,25 +183,25 @@ 
  * @return void
  */
 function queue_genie_replan_job($function, $period, $last = 0, $time = null, $priority = 0) {
-	static $done = array();
-	if (isset($done[$function])) {
-		return;
-	}
-	$done[$function] = true;
-	if (is_null($time)) {
-		$time = time();
-		if ($last) {
-			$time = max($last + $period, $time);
-		}
-	}
-	if (!$last) {
-		$last = $time - $period;
-	}
-	spip_log("replan_job $function $period $last $time $priority", 'queue');
-	include_spip('inc/queue');
-	// on replanifie un job cron
-	// uniquement si il n'y en a pas deja un avec le meme nom
-	// independament de l'argument
-	queue_add_job($function, _T('tache_cron_secondes', array('function' => $function, 'nb' => $period)), array($last),
-		"genie/", 'function_only', $time, $priority);
+    static $done = array();
+    if (isset($done[$function])) {
+        return;
+    }
+    $done[$function] = true;
+    if (is_null($time)) {
+        $time = time();
+        if ($last) {
+            $time = max($last + $period, $time);
+        }
+    }
+    if (!$last) {
+        $last = $time - $period;
+    }
+    spip_log("replan_job $function $period $last $time $priority", 'queue');
+    include_spip('inc/queue');
+    // on replanifie un job cron
+    // uniquement si il n'y en a pas deja un avec le meme nom
+    // independament de l'argument
+    queue_add_job($function, _T('tache_cron_secondes', array('function' => $function, 'nb' => $period)), array($last),
+        "genie/", 'function_only', $time, $priority);
 }

ecrire/inc/presentation.php

Indentation +100 added lines, -100 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Presentation
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/presentation_mini');
@@ -31,44 +31,44 @@ 
 
 // https://code.spip.net/@debut_cadre
 function debut_cadre($style, $icone = "", $fonction = "", $titre = "", $id = "", $class = "", $padding = true) {
-	$style_mapping = array(
-		'r' => 'simple',
-		'e' => 'raccourcis',
-		'couleur' => 'basic highlight',
-		'couleur-foncee' => 'basic highlight',
-		'trait-couleur' => 'important',
-		'alerte' => 'notice',
-		'info' => 'info',
-		'sous_rub' => 'simple sous-rub'
-	);
-	$style_titre_mapping = array('couleur' => 'topper', 'trait-couleur' => 'section');
-	$c = isset($style_mapping[$style]) ? $style_mapping[$style] : 'simple';
-	$class = $c . ($class ? " $class" : "");
-	if (!$padding) {
-		$class .= ($class ? " " : "") . "no-padding";
-	}
-
-	//($id?"id='$id' ":"")
-	if (strlen($icone) > 1) {
-		if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
-			list($fond, $fonction) = $icone_renommer($icone, $fonction);
-		}
-		$size = 24;
-		if (preg_match("/-([0-9]{1,3})[.](gif|png)$/i", $fond, $match)) {
-			$size = $match[1];
-		}
-		if ($fonction) {
-			// 2 images pour composer l'icone : le fond (article) en background,
-			// la fonction (new) en image
-			$icone = http_img_pack($fonction, "", "class='cadre-icone' width='$size' height='$size'\n" .
-				http_style_background($fond, "no-repeat center center", $size));
-		} else {
-			$icone = http_img_pack($fond, "", "class='cadre-icone' width='$size' height='$size'");
-		}
-		$titre = $icone . $titre;
-	}
-
-	return boite_ouvrir($titre, $class, isset($style_titre_mapping[$style]) ? $style_titre_mapping[$style] : '', $id);
+    $style_mapping = array(
+        'r' => 'simple',
+        'e' => 'raccourcis',
+        'couleur' => 'basic highlight',
+        'couleur-foncee' => 'basic highlight',
+        'trait-couleur' => 'important',
+        'alerte' => 'notice',
+        'info' => 'info',
+        'sous_rub' => 'simple sous-rub'
+    );
+    $style_titre_mapping = array('couleur' => 'topper', 'trait-couleur' => 'section');
+    $c = isset($style_mapping[$style]) ? $style_mapping[$style] : 'simple';
+    $class = $c . ($class ? " $class" : "");
+    if (!$padding) {
+        $class .= ($class ? " " : "") . "no-padding";
+    }
+
+    //($id?"id='$id' ":"")
+    if (strlen($icone) > 1) {
+        if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
+            list($fond, $fonction) = $icone_renommer($icone, $fonction);
+        }
+        $size = 24;
+        if (preg_match("/-([0-9]{1,3})[.](gif|png)$/i", $fond, $match)) {
+            $size = $match[1];
+        }
+        if ($fonction) {
+            // 2 images pour composer l'icone : le fond (article) en background,
+            // la fonction (new) en image
+            $icone = http_img_pack($fonction, "", "class='cadre-icone' width='$size' height='$size'\n" .
+                http_style_background($fond, "no-repeat center center", $size));
+        } else {
+            $icone = http_img_pack($fond, "", "class='cadre-icone' width='$size' height='$size'");
+        }
+        $titre = $icone . $titre;
+    }
+
+    return boite_ouvrir($titre, $class, isset($style_titre_mapping[$style]) ? $style_titre_mapping[$style] : '', $id);
 }
 
 // https://code.spip.net/@fin_cadre
@@ -76,66 +76,66 @@ 
 
 
 function debut_cadre_relief(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = "",
-	$class = ""
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = "",
+    $class = ""
 ) {
-	return debut_cadre('r', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('r', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_relief() { return fin_cadre('r'); }
 
 function debut_cadre_enfonce(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = "",
-	$class = ""
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = "",
+    $class = ""
 ) {
-	return debut_cadre('e', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('e', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_enfonce() { return fin_cadre('e'); }
 
 function debut_cadre_sous_rub(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = "",
-	$class = ""
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = "",
+    $class = ""
 ) {
-	return debut_cadre('sous_rub', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('sous_rub', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_sous_rub() { return fin_cadre('sous_rub'); }
 
 function debut_cadre_couleur(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = "",
-	$class = ""
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = "",
+    $class = ""
 ) {
-	return debut_cadre('couleur', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('couleur', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_couleur() { return fin_cadre('couleur'); }
 
 function debut_cadre_trait_couleur(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = "",
-	$class = ""
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = "",
+    $class = ""
 ) {
-	return debut_cadre('trait-couleur', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('trait-couleur', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_trait_couleur() { return fin_cadre('trait-couleur'); }
@@ -156,18 +156,18 @@ 
  * @return string Code PHP.
  **/
 function gros_titre(
-	$titre,
-	$ze_logo = ''
+    $titre,
+    $ze_logo = ''
 ) {
-	return "<h1 class = 'grostitre'>" . $ze_logo . ' ' . typo($titre) . "</h1>\n";
+    return "<h1 class = 'grostitre'>" . $ze_logo . ' ' . typo($titre) . "</h1>\n";
 }
 
 // La boite des raccourcis
 // Se place a droite si l'ecran est en mode panoramique.
 // https://code.spip.net/@bloc_des_raccourcis
 function bloc_des_raccourcis($bloc) {
-	return creer_colonne_droite()
-	. boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis') . $bloc . boite_fermer();
+    return creer_colonne_droite()
+    . boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis') . $bloc . boite_fermer();
 }
 
 //
@@ -184,10 +184,10 @@ 
 
 // https://code.spip.net/@onglet
 function onglet($texte, $lien, $onglet_ref, $onglet, $icone = "") {
-	return "<li>"
-	. ($icone ? http_img_pack($icone, '', " class='cadre-icone'") : '')
-	. lien_ou_expose($lien, $texte, $onglet == $onglet_ref)
-	. "</li>";
+    return "<li>"
+    . ($icone ? http_img_pack($icone, '', " class='cadre-icone'") : '')
+    . lien_ou_expose($lien, $texte, $onglet == $onglet_ref)
+    . "</li>";
 }
 
 /**
@@ -219,14 +219,14 @@ 
  *     Code HTML du lien
  **/
 function icone_verticale($texte, $lien, $fond, $fonction = "", $align = "", $javascript = "") {
-	// cas d'ajax_action_auteur: faut defaire le boulot
-	// (il faudrait fusionner avec le cas $javascript)
-	if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
-		list($x, $lien, $atts, $texte) = $r;
-		$javascript .= $atts;
-	}
-
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $align", $javascript);
+    // cas d'ajax_action_auteur: faut defaire le boulot
+    // (il faudrait fusionner avec le cas $javascript)
+    if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
+        list($x, $lien, $atts, $texte) = $r;
+        $javascript .= $atts;
+    }
+
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $align", $javascript);
 }
 
 /**
@@ -251,15 +251,15 @@ 
  *     Code HTML du lien
  **/
 function icone_horizontale($texte, $lien, $fond, $fonction = "", $dummy = "", $javascript = "") {
-	$retour = '';
-	// cas d'ajax_action_auteur: faut defaire le boulot
-	// (il faudrait fusionner avec le cas $javascript)
-	if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
-		list($x, $lien, $atts, $texte) = $r;
-		$javascript .= $atts;
-	}
+    $retour = '';
+    // cas d'ajax_action_auteur: faut defaire le boulot
+    // (il faudrait fusionner avec le cas $javascript)
+    if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
+        list($x, $lien, $atts, $texte) = $r;
+        $javascript .= $atts;
+    }
 
-	$retour = icone_base($lien, $texte, $fond, $fonction, "horizontale", $javascript);
+    $retour = icone_base($lien, $texte, $fond, $fonction, "horizontale", $javascript);
 
-	return $retour;
+    return $retour;
 }

ecrire/plugins/afficher_liste.php

Indentation +72 added lines, -72 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/charsets');
 
@@ -28,88 +28,88 @@ 
  * @return string
  */
 function plugins_afficher_liste_dist(
-	$url_page,
-	$liste_plugins,
-	$liste_plugins_checked,
-	$liste_plugins_actifs,
-	$dir_plugins = _DIR_PLUGINS,
-	$afficher_un = 'afficher_plugin'
+    $url_page,
+    $liste_plugins,
+    $liste_plugins_checked,
+    $liste_plugins_actifs,
+    $dir_plugins = _DIR_PLUGINS,
+    $afficher_un = 'afficher_plugin'
 ) {
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$ligne_plug = charger_fonction($afficher_un, 'plugins');
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $ligne_plug = charger_fonction($afficher_un, 'plugins');
 
-	$all_infos = $get_infos($liste_plugins, false, $dir_plugins);
+    $all_infos = $get_infos($liste_plugins, false, $dir_plugins);
 
-	$all_infos = pipeline('filtrer_liste_plugins',
-		array(
-			'args' => array(
-				'liste_plugins' => $liste_plugins,
-				'liste_plugins_checked' => $liste_plugins_checked,
-				'liste_plugins_actifs' => $liste_plugins_actifs,
-				'dir_plugins' => $dir_plugins
-			),
-			'data' => $all_infos
-		)
-	);
+    $all_infos = pipeline('filtrer_liste_plugins',
+        array(
+            'args' => array(
+                'liste_plugins' => $liste_plugins,
+                'liste_plugins_checked' => $liste_plugins_checked,
+                'liste_plugins_actifs' => $liste_plugins_actifs,
+                'dir_plugins' => $dir_plugins
+            ),
+            'data' => $all_infos
+        )
+    );
 
-	$liste_plugins = array_flip($liste_plugins);
-	foreach ($liste_plugins as $chemin => $v) {
-		// des plugins ont pu etre enleves de la liste par le pipeline. On en tient compte.
-		if (isset($all_infos[$chemin])) {
-			$liste_plugins[$chemin] = strtoupper(trim(typo(translitteration(unicode2charset(html2unicode($all_infos[$chemin]['nom']))))));
-		} else {
-			unset($liste_plugins[$chemin]);
-		}
-	}
-	asort($liste_plugins);
-	$exposed = urldecode(_request('plugin'));
+    $liste_plugins = array_flip($liste_plugins);
+    foreach ($liste_plugins as $chemin => $v) {
+        // des plugins ont pu etre enleves de la liste par le pipeline. On en tient compte.
+        if (isset($all_infos[$chemin])) {
+            $liste_plugins[$chemin] = strtoupper(trim(typo(translitteration(unicode2charset(html2unicode($all_infos[$chemin]['nom']))))));
+        } else {
+            unset($liste_plugins[$chemin]);
+        }
+    }
+    asort($liste_plugins);
+    $exposed = urldecode(_request('plugin'));
 
-	$block_par_lettre = false;//count($liste_plugins)>10;
-	$fast_liste_plugins_actifs = array();
-	$fast_liste_plugins_checked = array();
-	if (is_array($liste_plugins_actifs)) {
-		$fast_liste_plugins_actifs = array_flip($liste_plugins_actifs);
-	}
-	if (is_array($liste_plugins_checked)) {
-		$fast_liste_plugins_checked = array_flip($liste_plugins_checked);
-	}
+    $block_par_lettre = false;//count($liste_plugins)>10;
+    $fast_liste_plugins_actifs = array();
+    $fast_liste_plugins_checked = array();
+    if (is_array($liste_plugins_actifs)) {
+        $fast_liste_plugins_actifs = array_flip($liste_plugins_actifs);
+    }
+    if (is_array($liste_plugins_checked)) {
+        $fast_liste_plugins_checked = array_flip($liste_plugins_checked);
+    }
 
-	$res = '';
-	$block = '';
-	$initiale = '';
-	$block_actif = false;
-	foreach ($liste_plugins as $plug => $nom) {
-		if (($i = substr($nom, 0, 1)) !== $initiale) {
-			$res .= $block_par_lettre ? affiche_block_initiale($initiale, $block, $block_actif) : $block;
-			$initiale = $i;
-			$block = '';
-			$block_actif = false;
-		}
-		// le rep suivant
-		$actif = isset($fast_liste_plugins_actifs[$plug]);
-		$checked = isset($fast_liste_plugins_checked[$plug]);
-		$block_actif = $block_actif | $actif;
-		$expose = ($exposed and ($exposed == $plug or $exposed == $dir_plugins . $plug or $exposed == substr($dir_plugins,
-					strlen(_DIR_RACINE)) . $plug));
-		$block .= $ligne_plug($url_page, $plug, $checked, $actif, $expose, "item", $dir_plugins) . "\n";
-	}
-	$res .= $block_par_lettre ? affiche_block_initiale($initiale, $block, $block_actif) : $block;
-	$class = basename($dir_plugins);
+    $res = '';
+    $block = '';
+    $initiale = '';
+    $block_actif = false;
+    foreach ($liste_plugins as $plug => $nom) {
+        if (($i = substr($nom, 0, 1)) !== $initiale) {
+            $res .= $block_par_lettre ? affiche_block_initiale($initiale, $block, $block_actif) : $block;
+            $initiale = $i;
+            $block = '';
+            $block_actif = false;
+        }
+        // le rep suivant
+        $actif = isset($fast_liste_plugins_actifs[$plug]);
+        $checked = isset($fast_liste_plugins_checked[$plug]);
+        $block_actif = $block_actif | $actif;
+        $expose = ($exposed and ($exposed == $plug or $exposed == $dir_plugins . $plug or $exposed == substr($dir_plugins,
+                    strlen(_DIR_RACINE)) . $plug));
+        $block .= $ligne_plug($url_page, $plug, $checked, $actif, $expose, "item", $dir_plugins) . "\n";
+    }
+    $res .= $block_par_lettre ? affiche_block_initiale($initiale, $block, $block_actif) : $block;
+    $class = basename($dir_plugins);
 
-	return $res ? "<ul class='liste-items plugins $class'>$res</ul>" : "";
+    return $res ? "<ul class='liste-items plugins $class'>$res</ul>" : "";
 }
 
 
 // https://code.spip.net/@affiche_block_initiale
 function affiche_block_initiale($initiale, $block, $block_actif) {
-	if (strlen($block)) {
-		return "<li class='item'>"
-		. bouton_block_depliable($initiale, $block_actif ? true : false)
-		. debut_block_depliable($block_actif)
-		. "<ul>$block</ul>"
-		. fin_block()
-		. "</li>";
-	}
+    if (strlen($block)) {
+        return "<li class='item'>"
+        . bouton_block_depliable($initiale, $block_actif ? true : false)
+        . debut_block_depliable($block_actif)
+        . "<ul>$block</ul>"
+        . fin_block()
+        . "</li>";
+    }
 
-	return "";
+    return "";
 }