spip / SPIP

ecrire/public/normaliser.php

Indentation +159 added lines, -159 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les fonctions de ce fichier sont appelees en certains points
@@ -25,193 +25,193 @@ 
 // -> https://www.spip.net/fr_article901.html
 
 function phraser_vieux_logos(&$p) {
-	if ($p->param[0][0]) {
-		$args = [''];
-	} else {
-		$args = array_shift($p->param);
-	}
-
-	foreach ($p->param as $couple) {
-		$nom = trim($couple[0]);
-		if ($nom == '') {
-			array_shift($p->param);
-			break;
-		}
-		$r = phraser_logo_faux_filtres($nom);
-		if ($r === 0) {
-			$c = new Texte();
-			$c->texte = $nom;
-			$args[] = [$c];
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 2) {
-			$p->etoile = '**';
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 1) {
-			array_shift($p->param);
-			$p->etoile = '*';
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
-			$champ = new Champ();
-			$champ->nom_boucle = $m[2];
-			$champ->nom_champ = $m[3];
-			$champ->etoile = $m[5];
-			$champ = [$champ];
-			if ($m[6]) {
-				$r = new Texte();
-				$r->texte = $m[6];
-				$champ[] = $r;
-			}
-			$args[] = $champ;
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} // le cas else est la seule incompatibilite
-	}
-	array_unshift($p->param, $args);
+    if ($p->param[0][0]) {
+        $args = [''];
+    } else {
+        $args = array_shift($p->param);
+    }
+
+    foreach ($p->param as $couple) {
+        $nom = trim($couple[0]);
+        if ($nom == '') {
+            array_shift($p->param);
+            break;
+        }
+        $r = phraser_logo_faux_filtres($nom);
+        if ($r === 0) {
+            $c = new Texte();
+            $c->texte = $nom;
+            $args[] = [$c];
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 2) {
+            $p->etoile = '**';
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 1) {
+            array_shift($p->param);
+            $p->etoile = '*';
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
+            $champ = new Champ();
+            $champ->nom_boucle = $m[2];
+            $champ->nom_champ = $m[3];
+            $champ->etoile = $m[5];
+            $champ = [$champ];
+            if ($m[6]) {
+                $r = new Texte();
+                $r->texte = $m[6];
+                $champ[] = $r;
+            }
+            $args[] = $champ;
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } // le cas else est la seule incompatibilite
+    }
+    array_unshift($p->param, $args);
 }
 
 
 function phraser_logo_faux_filtres($nom) {
-	switch ($nom) {
-		case 'top':
-		case 'left':
-		case 'right':
-		case 'center':
-		case 'bottom':
-			return 0;
-		case 'lien':
-			return 1;
-		case 'fichier':
-			return 2;
-		default:
-			return $nom;
-	}
+    switch ($nom) {
+        case 'top':
+        case 'left':
+        case 'right':
+        case 'center':
+        case 'bottom':
+            return 0;
+        case 'lien':
+            return 1;
+        case 'fichier':
+            return 2;
+        default:
+            return $nom;
+    }
 }
 
 
 // La balise embed_document est a present le modele emb
 
 function phraser_vieux_emb(&$p) {
-	if (!is_array($p->param)) {
-		$p->param = [];
-	}
-
-	// Produire le premier argument {emb}
-	$texte = new Texte();
-	$texte->texte = 'emb';
-	$param = ['', [$texte]];
-
-	// Transformer les filtres en arguments
-	for ($i = 0; $i < (is_countable($p->param) ? count($p->param) : 0); $i++) {
-		if ($p->param[$i][0]) {
-			if (!strstr($p->param[$i][0], '=')) {
-				break;
-			}# on a rencontre un vrai filtre, c'est fini
-			$texte = new Texte();
-			$texte->texte = $p->param[$i][0];
-			$param[] = [$texte];
-		}
-		array_shift($p->param);
-	}
-	array_unshift($p->param, $param);
-	spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
-	$p->nom_champ = 'MODELE';
+    if (!is_array($p->param)) {
+        $p->param = [];
+    }
+
+    // Produire le premier argument {emb}
+    $texte = new Texte();
+    $texte->texte = 'emb';
+    $param = ['', [$texte]];
+
+    // Transformer les filtres en arguments
+    for ($i = 0; $i < (is_countable($p->param) ? count($p->param) : 0); $i++) {
+        if ($p->param[$i][0]) {
+            if (!strstr($p->param[$i][0], '=')) {
+                break;
+            }# on a rencontre un vrai filtre, c'est fini
+            $texte = new Texte();
+            $texte->texte = $p->param[$i][0];
+            $param[] = [$texte];
+        }
+        array_shift($p->param);
+    }
+    array_unshift($p->param, $param);
+    spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
+    $p->nom_champ = 'MODELE';
 }
 
 // Vieux formulaire de recherch
 
 function phraser_vieux_recherche($p) {
-	if ($p->param[0][0]) {
-		$c = new Texte();
-		$c->texte = $p->param[0][0];
-		$p->param[0][1] = [$c];
-		$p->param[0][0] = '';
-		$p->fonctions = [];
-		spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
-	}
+    if ($p->param[0][0]) {
+        $c = new Texte();
+        $c->texte = $p->param[0][0];
+        $p->param[0][1] = [$c];
+        $p->param[0][0] = '';
+        $p->fonctions = [];
+        spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
+    }
 }
 
 // Gerer la notation [(#EXPOSER|on,off)]
 function phraser_vieux_exposer($p) {
-	if ($a = $p->fonctions) {
-		preg_match('#([^,]*)(,(.*))?#', $a[0][0], $regs);
-		$args = [];
-		if ($regs[1]) {
-			$a = new Texte();
-			$a->texte = $regs[1];
-			$args = ['', [$a]];
-			if ($regs[3]) {
-				$a = new Texte();
-				$a->texte = $regs[3];
-				$args[] = [$a];
-			}
-		}
-		$p->param[0] = $args;
-		$p->fonctions = [];
-		$p->nom_champ = 'EXPOSE';
-	}
+    if ($a = $p->fonctions) {
+        preg_match('#([^,]*)(,(.*))?#', $a[0][0], $regs);
+        $args = [];
+        if ($regs[1]) {
+            $a = new Texte();
+            $a->texte = $regs[1];
+            $args = ['', [$a]];
+            if ($regs[3]) {
+                $a = new Texte();
+                $a->texte = $regs[3];
+                $args[] = [$a];
+            }
+        }
+        $p->param[0] = $args;
+        $p->fonctions = [];
+        $p->nom_champ = 'EXPOSE';
+    }
 }
 
 function phraser_vieux_modele($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function phraser_vieux_inclu($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function normaliser_args_inclumodel($p) {
-	$params = $p->param;
-	if (!$params) {
-		return;
-	}
-	$args = $params[0];
-	if ($args[0]) {
-		return;
-	} // filtre immediat
-	array_shift($p->param);
-	foreach ($p->param as $l) {
-		if (!array_shift($l)) {
-			$args = array_merge($args, $l);
-			array_shift($p->param);
-		} else {
-			break;
-		} // filtre
-	}
-	array_unshift($p->param, $args);
+    $params = $p->param;
+    if (!$params) {
+        return;
+    }
+    $args = $params[0];
+    if ($args[0]) {
+        return;
+    } // filtre immediat
+    array_shift($p->param);
+    foreach ($p->param as $l) {
+        if (!array_shift($l)) {
+            $args = array_merge($args, $l);
+            array_shift($p->param);
+        } else {
+            break;
+        } // filtre
+    }
+    array_unshift($p->param, $args);
 }
 
 function normaliser_inclure($champ) {
-	normaliser_args_inclumodel($champ);
-	$l = $champ->param[0];
-	if (is_array($l) and !$l[0]) {
-		foreach ($l as $k => $p) {
-			if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) {
-				$p[0]->texte = trim($p[0]->texte);
-			}
-		}
-		foreach ($l as $k => $p) {
-			if (
-				!$p or $p[0]->type != 'texte' or
-				!preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r)
-			) {
-				continue;
-			}
-
-			if ($r[1]) {
-				$p[0]->texte = $r[1];
-			} else {
-				unset($p[0]);
-			}
-			$champ->texte = $p;
-			unset($champ->param[0][$k]);
-			if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
-				array_shift($champ->param);
-			}
-
-			return;
-		}
-	}
-	spip_log('inclure sans fond ni fichier');
+    normaliser_args_inclumodel($champ);
+    $l = $champ->param[0];
+    if (is_array($l) and !$l[0]) {
+        foreach ($l as $k => $p) {
+            if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) {
+                $p[0]->texte = trim($p[0]->texte);
+            }
+        }
+        foreach ($l as $k => $p) {
+            if (
+                !$p or $p[0]->type != 'texte' or
+                !preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r)
+            ) {
+                continue;
+            }
+
+            if ($r[1]) {
+                $p[0]->texte = $r[1];
+            } else {
+                unset($p[0]);
+            }
+            $champ->texte = $p;
+            unset($champ->param[0][$k]);
+            if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
+                array_shift($champ->param);
+            }
+
+            return;
+        }
+    }
+    spip_log('inclure sans fond ni fichier');
 }

ecrire/inc_version.php

Indentation +213 added lines, -213 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,15 +36,15 @@ 
 define('_PHP_MIN', '7.4.0');
 
 if (!defined('_DIR_RESTREINT_ABS')) {
-	/** le nom du repertoire ecrire/ */
-	define('_DIR_RESTREINT_ABS', 'ecrire/');
+    /** le nom du repertoire ecrire/ */
+    define('_DIR_RESTREINT_ABS', 'ecrire/');
 }
 
 /** Chemin relatif pour aller dans ecrire
  *  vide si on est dans ecrire, 'ecrire/' sinon */
 define(
-	'_DIR_RESTREINT',
-	(!is_dir(_DIR_RESTREINT_ABS) ? '' : _DIR_RESTREINT_ABS)
+    '_DIR_RESTREINT',
+    (!is_dir(_DIR_RESTREINT_ABS) ? '' : _DIR_RESTREINT_ABS)
 );
 
 /** Chemin relatif pour aller à la racine */
@@ -59,8 +59,8 @@ 
 
 // Icones
 if (!defined('_NOM_IMG_PACK')) {
-	/** Nom du dossier images */
-	define('_NOM_IMG_PACK', 'images/');
+    /** Nom du dossier images */
+    define('_NOM_IMG_PACK', 'images/');
 }
 /** le chemin http (relatif) vers les images standard */
 define('_DIR_IMG_PACK', (_DIR_RACINE . 'prive/' . _NOM_IMG_PACK));
@@ -69,8 +69,8 @@ 
 define('_ROOT_IMG_PACK', dirname(__DIR__) . '/prive/' . _NOM_IMG_PACK);
 
 if (!defined('_JAVASCRIPT')) {
-	/** Nom du repertoire des  bibliotheques JavaScript */
-	define('_JAVASCRIPT', 'javascript/');
+    /** Nom du repertoire des  bibliotheques JavaScript */
+    define('_JAVASCRIPT', 'javascript/');
 } // utilisable avec #CHEMIN et find_in_path
 /** le nom du repertoire des  bibliotheques JavaScript du prive */
 define('_DIR_JAVASCRIPT', (_DIR_RACINE . 'prive/' . _JAVASCRIPT));
@@ -80,47 +80,47 @@ 
 # mais on peut les mettre ailleurs et changer completement les noms
 
 if (!defined('_NOM_TEMPORAIRES_INACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Temporaires Inaccessibles par http:// */
-	define('_NOM_TEMPORAIRES_INACCESSIBLES', 'tmp/');
+    /** Nom du repertoire des fichiers Temporaires Inaccessibles par http:// */
+    define('_NOM_TEMPORAIRES_INACCESSIBLES', 'tmp/');
 }
 if (!defined('_NOM_TEMPORAIRES_ACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Temporaires Accessibles par http:// */
-	define('_NOM_TEMPORAIRES_ACCESSIBLES', 'local/');
+    /** Nom du repertoire des fichiers Temporaires Accessibles par http:// */
+    define('_NOM_TEMPORAIRES_ACCESSIBLES', 'local/');
 }
 if (!defined('_NOM_PERMANENTS_INACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Permanents Inaccessibles par http:// */
-	define('_NOM_PERMANENTS_INACCESSIBLES', 'config/');
+    /** Nom du repertoire des fichiers Permanents Inaccessibles par http:// */
+    define('_NOM_PERMANENTS_INACCESSIBLES', 'config/');
 }
 if (!defined('_NOM_PERMANENTS_ACCESSIBLES')) {
-	/** Nom du repertoire des fichiers Permanents Accessibles par http:// */
-	define('_NOM_PERMANENTS_ACCESSIBLES', 'IMG/');
+    /** Nom du repertoire des fichiers Permanents Accessibles par http:// */
+    define('_NOM_PERMANENTS_ACCESSIBLES', 'IMG/');
 }
 
 
 /** Le nom du fichier de personnalisation */
 if (!defined('_NOM_CONFIG')) {
-	define('_NOM_CONFIG', 'mes_options');
+    define('_NOM_CONFIG', 'mes_options');
 }
 
 // Son emplacement absolu si on le trouve
 if (
-	@file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . _NOM_CONFIG . '.php')
-	or (@file_exists($f = _ROOT_RESTREINT . _NOM_CONFIG . '.php'))
+    @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . _NOM_CONFIG . '.php')
+    or (@file_exists($f = _ROOT_RESTREINT . _NOM_CONFIG . '.php'))
 ) {
-	/** Emplacement absolu du fichier d'option */
-	define('_FILE_OPTIONS', $f);
+    /** Emplacement absolu du fichier d'option */
+    define('_FILE_OPTIONS', $f);
 } else {
-	define('_FILE_OPTIONS', '');
+    define('_FILE_OPTIONS', '');
 }
 
 if (!defined('MODULES_IDIOMES')) {
-	/**
-	 * Modules par défaut pour la traduction.
-	 *
-	 * Constante utilisée par le compilateur et le décompilateur
-	 * sa valeur etant traitée par inc_traduire_dist
-	 */
-	define('MODULES_IDIOMES', 'public|spip|ecrire');
+    /**
+     * Modules par défaut pour la traduction.
+     *
+     * Constante utilisée par le compilateur et le décompilateur
+     * sa valeur etant traitée par inc_traduire_dist
+     */
+    define('MODULES_IDIOMES', 'public|spip|ecrire');
 }
 
 // *** Fin des define *** //
@@ -128,10 +128,10 @@ 
 
 // Inclure l'ecran de securite
 if (
-	!defined('_ECRAN_SECURITE')
-	and @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . 'ecran_securite.php')
+    !defined('_ECRAN_SECURITE')
+    and @file_exists($f = _ROOT_RACINE . _NOM_PERMANENTS_INACCESSIBLES . 'ecran_securite.php')
 ) {
-	include $f;
+    include $f;
 }
 
 
@@ -139,30 +139,30 @@ 
  * Détecteur de robot d'indexation
  */
 if (!defined('_IS_BOT')) {
-	define(
-		'_IS_BOT',
-		isset($_SERVER['HTTP_USER_AGENT'])
-		and preg_match(
-			// mots generiques
-			',bot|slurp|crawler|spider|webvac|yandex|'
-			// MSIE 6.0 est un botnet 99,9% du temps, on traite donc ce USER_AGENT comme un bot
-			. 'MSIE 6\.0|'
-			// UA plus cibles
-			. '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebook|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MetaURI|Moreover|Rambler|Scooter|ScrubbyBloglines|Yahoo|Yeti'
-			. ',i',
-			(string)$_SERVER['HTTP_USER_AGENT']
-		)
-	);
+    define(
+        '_IS_BOT',
+        isset($_SERVER['HTTP_USER_AGENT'])
+        and preg_match(
+            // mots generiques
+            ',bot|slurp|crawler|spider|webvac|yandex|'
+            // MSIE 6.0 est un botnet 99,9% du temps, on traite donc ce USER_AGENT comme un bot
+            . 'MSIE 6\.0|'
+            // UA plus cibles
+            . '80legs|accoona|AltaVista|ASPSeek|Baidu|Charlotte|EC2LinkFinder|eStyle|facebook|flipboard|hootsuite|FunWebProducts|Google|Genieo|INA dlweb|InfegyAtlas|Java VM|LiteFinder|Lycos|MetaURI|Moreover|Rambler|Scooter|ScrubbyBloglines|Yahoo|Yeti'
+            . ',i',
+            (string)$_SERVER['HTTP_USER_AGENT']
+        )
+    );
 }
 
 if (!defined('_IS_CLI')) {
-	define(
-		'_IS_CLI',
-		!isset($_SERVER['HTTP_HOST'])
-		and !strlen($_SERVER['DOCUMENT_ROOT'])
-		and !empty($_SERVER['argv'])
-		and empty($_SERVER['REQUEST_METHOD'])
-	);
+    define(
+        '_IS_CLI',
+        !isset($_SERVER['HTTP_HOST'])
+        and !strlen($_SERVER['DOCUMENT_ROOT'])
+        and !empty($_SERVER['argv'])
+        and empty($_SERVER['REQUEST_METHOD'])
+    );
 }
 
 // *** Parametrage par defaut de SPIP ***
@@ -174,61 +174,61 @@ 
 // Ne pas les rendre indefinies.
 
 global
-	$nombre_de_logs,
-	$taille_des_logs,
-	$table_prefix,
-	$cookie_prefix,
-	$dossier_squelettes,
-	$filtrer_javascript,
-	$type_urls,
-	$debut_date_publication,
-	$ip,
-	$mysql_rappel_connexion,
-	$mysql_rappel_nom_base,
-	$test_i18n,
-	$ignore_auth_http,
-	$ignore_remote_user,
-	$derniere_modif_invalide,
-	$home_server,
-	$help_server,
-	$url_glossaire_externe,
-	$tex_server,
-	$traiter_math,
-	$xhtml,
-	$xml_indent,
-	$source_vignettes,
-	$formats_logos,
-	$controler_dates_rss,
-	$spip_pipeline,
-	$spip_matrice,
-	$plugins,
-	$surcharges,
-	$exceptions_des_tables,
-	$tables_principales,
-	$table_des_tables,
-	$tables_auxiliaires,
-	$table_primary,
-	$table_date,
-	$table_titre,
-	$tables_jointures,
-	$liste_des_statuts,
-	$liste_des_etats,
-	$liste_des_authentifications,
-	$spip_version_branche,
-	$spip_version_code,
-	$spip_version_base,
-	$spip_sql_version,
-	$spip_version_affichee,
-	$visiteur_session,
-	$auteur_session,
-	$connect_statut,
-	$connect_toutes_rubriques,
-	$hash_recherche,
-	$hash_recherche_strict,
-	$ldap_present,
-	$meta,
-	$connect_id_rubrique,
-	$puce;
+    $nombre_de_logs,
+    $taille_des_logs,
+    $table_prefix,
+    $cookie_prefix,
+    $dossier_squelettes,
+    $filtrer_javascript,
+    $type_urls,
+    $debut_date_publication,
+    $ip,
+    $mysql_rappel_connexion,
+    $mysql_rappel_nom_base,
+    $test_i18n,
+    $ignore_auth_http,
+    $ignore_remote_user,
+    $derniere_modif_invalide,
+    $home_server,
+    $help_server,
+    $url_glossaire_externe,
+    $tex_server,
+    $traiter_math,
+    $xhtml,
+    $xml_indent,
+    $source_vignettes,
+    $formats_logos,
+    $controler_dates_rss,
+    $spip_pipeline,
+    $spip_matrice,
+    $plugins,
+    $surcharges,
+    $exceptions_des_tables,
+    $tables_principales,
+    $table_des_tables,
+    $tables_auxiliaires,
+    $table_primary,
+    $table_date,
+    $table_titre,
+    $tables_jointures,
+    $liste_des_statuts,
+    $liste_des_etats,
+    $liste_des_authentifications,
+    $spip_version_branche,
+    $spip_version_code,
+    $spip_version_base,
+    $spip_sql_version,
+    $spip_version_affichee,
+    $visiteur_session,
+    $auteur_session,
+    $connect_statut,
+    $connect_toutes_rubriques,
+    $hash_recherche,
+    $hash_recherche_strict,
+    $ldap_present,
+    $meta,
+    $connect_id_rubrique,
+    $puce;
 
 # comment on logge, defaut 4 tmp/spip.log de 100k, 0 ou 0 suppriment le log
 $nombre_de_logs = 4;
@@ -283,48 +283,48 @@ 
 // Prendre en compte les entetes HTTP_X_FORWARDED_XX
 //
 if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
-	if (empty($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-		$_SERVER['HTTP_X_FORWARDED_HOST'] = $_SERVER['HTTP_HOST'];
-	}
-	if (empty($_SERVER['HTTP_X_FORWARDED_PORT'])) {
-		$_SERVER['HTTP_X_FORWARDED_PORT'] = 443;
-	}
+    if (empty($_SERVER['HTTP_X_FORWARDED_HOST'])) {
+        $_SERVER['HTTP_X_FORWARDED_HOST'] = $_SERVER['HTTP_HOST'];
+    }
+    if (empty($_SERVER['HTTP_X_FORWARDED_PORT'])) {
+        $_SERVER['HTTP_X_FORWARDED_PORT'] = 443;
+    }
 }
 if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-	if (isset($_SERVER['HTTP_X_FORWARDED_PORT']) and is_numeric($_SERVER['HTTP_X_FORWARDED_PORT'])) {
-		$_SERVER['SERVER_PORT'] = $_SERVER['HTTP_X_FORWARDED_PORT'];
-		if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
-			$_SERVER['HTTPS'] = 'on';
-			if (isset($_SERVER['REQUEST_SCHEME'])) {
-				$_SERVER['REQUEST_SCHEME'] = 'https';
-			}
-		}
-	}
-	$host = $_SERVER['HTTP_X_FORWARDED_HOST'];
-	if (strpos($host, ',') !== false) {
-		$h = explode(',', $host);
-		$host = trim(reset($h));
-	}
-	// securite sur le contenu de l'entete
-	$host = strtr($host, "<>?\"\{\}\$'` \r\n", '____________');
-	$_SERVER['HTTP_HOST'] = $host;
+    if (isset($_SERVER['HTTP_X_FORWARDED_PORT']) and is_numeric($_SERVER['HTTP_X_FORWARDED_PORT'])) {
+        $_SERVER['SERVER_PORT'] = $_SERVER['HTTP_X_FORWARDED_PORT'];
+        if (isset($_SERVER['HTTP_X_FORWARDED_PROTO']) and $_SERVER['HTTP_X_FORWARDED_PROTO'] === 'https') {
+            $_SERVER['HTTPS'] = 'on';
+            if (isset($_SERVER['REQUEST_SCHEME'])) {
+                $_SERVER['REQUEST_SCHEME'] = 'https';
+            }
+        }
+    }
+    $host = $_SERVER['HTTP_X_FORWARDED_HOST'];
+    if (strpos($host, ',') !== false) {
+        $h = explode(',', $host);
+        $host = trim(reset($h));
+    }
+    // securite sur le contenu de l'entete
+    $host = strtr($host, "<>?\"\{\}\$'` \r\n", '____________');
+    $_SERVER['HTTP_HOST'] = $host;
 }
 //
 // On note le numero IP du client dans la variable $ip
 //
 if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
-	$ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
-	if (strpos($ip, ',') !== false) {
-		$ip = explode(',', $ip);
-		$ip = reset($ip);
-	}
-	// ecraser $_SERVER['REMOTE_ADDR'] si elle est en localhost
-	if (isset($_SERVER['REMOTE_ADDR']) and $_SERVER['REMOTE_ADDR'] === '127.0.0.1') {
-		$_SERVER['REMOTE_ADDR'] = $ip;
-	}
+    $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
+    if (strpos($ip, ',') !== false) {
+        $ip = explode(',', $ip);
+        $ip = reset($ip);
+    }
+    // ecraser $_SERVER['REMOTE_ADDR'] si elle est en localhost
+    if (isset($_SERVER['REMOTE_ADDR']) and $_SERVER['REMOTE_ADDR'] === '127.0.0.1') {
+        $_SERVER['REMOTE_ADDR'] = $ip;
+    }
 }
 if (isset($_SERVER['REMOTE_ADDR'])) {
-	$ip = $_SERVER['REMOTE_ADDR'];
+    $ip = $_SERVER['REMOTE_ADDR'];
 }
 
 // Pour renforcer la privacy, decommentez la ligne ci-dessous (ou recopiez-la
@@ -409,24 +409,24 @@ 
 
 // Liste des statuts.
 $liste_des_statuts = [
-	'info_administrateurs' => '0minirezo',
-	'info_redacteurs' => '1comite',
-	'info_visiteurs' => '6forum',
-	'texte_statut_poubelle' => '5poubelle'
+    'info_administrateurs' => '0minirezo',
+    'info_redacteurs' => '1comite',
+    'info_visiteurs' => '6forum',
+    'texte_statut_poubelle' => '5poubelle'
 ];
 
 $liste_des_etats = [
-	'texte_statut_en_cours_redaction' => 'prepa',
-	'texte_statut_propose_evaluation' => 'prop',
-	'texte_statut_publie' => 'publie',
-	'texte_statut_poubelle' => 'poubelle',
-	'texte_statut_refuse' => 'refuse'
+    'texte_statut_en_cours_redaction' => 'prepa',
+    'texte_statut_propose_evaluation' => 'prop',
+    'texte_statut_publie' => 'publie',
+    'texte_statut_poubelle' => 'poubelle',
+    'texte_statut_refuse' => 'refuse'
 ];
 
 // liste des methodes d'authentifications
 $liste_des_authentifications = [
-	'spip' => 'spip',
-	'ldap' => 'ldap'
+    'spip' => 'spip',
+    'ldap' => 'ldap'
 ];
 
 // Experimental : pour supprimer systematiquement l'affichage des numeros
@@ -476,12 +476,12 @@ 
 // Definition personnelles eventuelles
 
 if (_FILE_OPTIONS) {
-	include_once _FILE_OPTIONS;
+    include_once _FILE_OPTIONS;
 }
 
 if (!defined('SPIP_ERREUR_REPORT')) {
-	/** Masquer les warning */
-	define('SPIP_ERREUR_REPORT', E_ALL ^ E_NOTICE ^ E_DEPRECATED);
+    /** Masquer les warning */
+    define('SPIP_ERREUR_REPORT', E_ALL ^ E_NOTICE ^ E_DEPRECATED);
 }
 error_reporting(SPIP_ERREUR_REPORT);
 
@@ -494,10 +494,10 @@ 
 // ===> on execute en neutralisant les messages d'erreur
 
 spip_initialisation_core(
-	(_DIR_RACINE . _NOM_PERMANENTS_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_INACCESSIBLES),
-	(_DIR_RACINE . _NOM_TEMPORAIRES_ACCESSIBLES)
+    (_DIR_RACINE . _NOM_PERMANENTS_INACCESSIBLES),
+    (_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES),
+    (_DIR_RACINE . _NOM_TEMPORAIRES_INACCESSIBLES),
+    (_DIR_RACINE . _NOM_TEMPORAIRES_ACCESSIBLES)
 );
 
 
@@ -507,70 +507,70 @@ 
 // donc il faut avoir tout fini ici avant de charger les plugins
 
 if (@is_readable(_CACHE_PLUGINS_OPT) and @is_readable(_CACHE_PLUGINS_PATH)) {
-	// chargement optimise precompile
-	include_once(_CACHE_PLUGINS_OPT);
+    // chargement optimise precompile
+    include_once(_CACHE_PLUGINS_OPT);
 } else {
-	spip_initialisation_suite();
-	include_spip('inc/plugin');
-	// generer les fichiers php precompiles
-	// de chargement des plugins et des pipelines
-	actualise_plugins_actifs();
+    spip_initialisation_suite();
+    include_spip('inc/plugin');
+    // generer les fichiers php precompiles
+    // de chargement des plugins et des pipelines
+    actualise_plugins_actifs();
 }
 
 // Initialisations non critiques surchargeables par les plugins
 spip_initialisation_suite();
 
 if (!defined('_LOG_FILTRE_GRAVITE')) {
-	/** niveau maxi d'enregistrement des logs */
-	define('_LOG_FILTRE_GRAVITE', _LOG_INFO_IMPORTANTE);
+    /** niveau maxi d'enregistrement des logs */
+    define('_LOG_FILTRE_GRAVITE', _LOG_INFO_IMPORTANTE);
 }
 
 if (!defined('_OUTILS_DEVELOPPEURS')) {
-	/** Activer des outils pour développeurs ? */
-	define('_OUTILS_DEVELOPPEURS', false);
+    /** Activer des outils pour développeurs ? */
+    define('_OUTILS_DEVELOPPEURS', false);
 }
 
 // charger systematiquement inc/autoriser dans l'espace restreint
 if (test_espace_prive()) {
-	include_spip('inc/autoriser');
+    include_spip('inc/autoriser');
 }
 //
 // Installer Spip si pas installe... sauf si justement on est en train
 //
 if (
-	!(_FILE_CONNECT
-	or autoriser_sans_cookie(_request('exec'))
-	or _request('action') == 'cookie'
-	or _request('action') == 'converser'
-	or _request('action') == 'test_dirs')
+    !(_FILE_CONNECT
+    or autoriser_sans_cookie(_request('exec'))
+    or _request('action') == 'cookie'
+    or _request('action') == 'converser'
+    or _request('action') == 'test_dirs')
 ) {
-	// Si on peut installer, on lance illico
-	if (test_espace_prive()) {
-		include_spip('inc/headers');
-		redirige_url_ecrire('install');
-	} else {
-		// Si on est dans le site public, dire que qq s'en occupe
-		include_spip('inc/minipres');
-		utiliser_langue_visiteur();
-		echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>" . _T('info_travaux_texte') . '</p>', ['status' => 503]);
-		exit;
-	}
-	// autrement c'est une install ad hoc (spikini...), on sait pas faire
+    // Si on peut installer, on lance illico
+    if (test_espace_prive()) {
+        include_spip('inc/headers');
+        redirige_url_ecrire('install');
+    } else {
+        // Si on est dans le site public, dire que qq s'en occupe
+        include_spip('inc/minipres');
+        utiliser_langue_visiteur();
+        echo minipres(_T('info_travaux_titre'), "<p style='text-align: center;'>" . _T('info_travaux_texte') . '</p>', ['status' => 503]);
+        exit;
+    }
+    // autrement c'est une install ad hoc (spikini...), on sait pas faire
 }
 
 // memoriser un tri sessionne eventuel
 if (
-	isset($_REQUEST['var_memotri'])
-	and $t = $_REQUEST['var_memotri']
-	and (strncmp($t, 'trisession', 10) == 0 or strncmp($t, 'senssession', 11) == 0)
+    isset($_REQUEST['var_memotri'])
+    and $t = $_REQUEST['var_memotri']
+    and (strncmp($t, 'trisession', 10) == 0 or strncmp($t, 'senssession', 11) == 0)
 ) {
-	if (!function_exists('session_set')) {
-		include_spip('inc/session');
-	}
-	$t = preg_replace(',\W,', '_', $t);
-	if ($v = _request($t)) {
-		session_set($t, $v);
-	}
+    if (!function_exists('session_set')) {
+        include_spip('inc/session');
+    }
+    $t = preg_replace(',\W,', '_', $t);
+    if ($v = _request($t)) {
+        session_set($t, $v);
+    }
 }
 
 /**
@@ -580,22 +580,22 @@ 
  * La globale $spip_header_silencieux permet de rendre le header minimal pour raisons de securite
  */
 if (!defined('_HEADER_COMPOSED_BY')) {
-	define('_HEADER_COMPOSED_BY', 'Composed-By: SPIP');
+    define('_HEADER_COMPOSED_BY', 'Composed-By: SPIP');
 }
 if (!headers_sent() and _HEADER_COMPOSED_BY) {
-	if (!defined('_HEADER_VARY')) {
-		define('_HEADER_VARY', 'Vary: Cookie, Accept-Encoding');
-	}
-	if (_HEADER_VARY) {
-		header(_HEADER_VARY);
-	}
-	if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
-		include_spip('inc/filtres_mini');
-		header(_HEADER_COMPOSED_BY . " $spip_version_affichee @ www.spip.net + " . url_absolue(_DIR_VAR . 'config.txt'));
-	} else {
-		// header minimal
-		header(_HEADER_COMPOSED_BY . ' @ www.spip.net');
-	}
+    if (!defined('_HEADER_VARY')) {
+        define('_HEADER_VARY', 'Vary: Cookie, Accept-Encoding');
+    }
+    if (_HEADER_VARY) {
+        header(_HEADER_VARY);
+    }
+    if (!isset($GLOBALS['spip_header_silencieux']) or !$GLOBALS['spip_header_silencieux']) {
+        include_spip('inc/filtres_mini');
+        header(_HEADER_COMPOSED_BY . " $spip_version_affichee @ www.spip.net + " . url_absolue(_DIR_VAR . 'config.txt'));
+    } else {
+        // header minimal
+        header(_HEADER_COMPOSED_BY . ' @ www.spip.net');
+    }
 }
 
 $methode = ($_SERVER['REQUEST_METHOD'] ?? ((php_sapi_name() == 'cli') ? 'cli' : ''));

ecrire/exec/base_repair.php

Indentation +22 added lines, -22 removed lines

@@ -23,7 +23,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -31,25 +31,25 @@ 
  * Réparer la base de données
  */
 function exec_base_repair_dist() {
-	$action = null;
-	$ok = false;
-	if (!spip_connect()) {
-		$message = _T('titre_probleme_technique');
-	} else {
-		$version_sql = sql_version();
-		if (!$version_sql) {
-			$message = _T('avis_erreur_connexion_mysql');
-		} else {
-			$message = _T('texte_requetes_echouent');
-			$ok = true;
-		}
-		$action = _T('texte_tenter_reparation');
-	}
-	if ($ok) {
-		$admin = charger_fonction('admin', 'inc');
-		echo $admin('repair', $action, $message, true);
-	} else {
-		include_spip('inc/minipres');
-		echo minipres(_T('titre_reparation'), "<p>$message</p>");
-	}
+    $action = null;
+    $ok = false;
+    if (!spip_connect()) {
+        $message = _T('titre_probleme_technique');
+    } else {
+        $version_sql = sql_version();
+        if (!$version_sql) {
+            $message = _T('avis_erreur_connexion_mysql');
+        } else {
+            $message = _T('texte_requetes_echouent');
+            $ok = true;
+        }
+        $action = _T('texte_tenter_reparation');
+    }
+    if ($ok) {
+        $admin = charger_fonction('admin', 'inc');
+        echo $admin('repair', $action, $message, true);
+    } else {
+        include_spip('inc/minipres');
+        echo minipres(_T('titre_reparation'), "<p>$message</p>");
+    }
 }

ecrire/exec/demande_mise_a_jour.php

Indentation +24 added lines, -24 removed lines

@@ -20,7 +20,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -28,29 +28,29 @@ 
  * Demander à mettre à jour la base de données
  */
 function exec_demande_mise_a_jour_dist() {
-	// on fait la verif du path avant tout,
-	// et l'installation des qu'on est dans la colonne principale
-	// si jamais la liste des plugins actifs change, il faut faire un refresh du hit
-	// pour etre sur que les bons fichiers seront charges lors de l'install
-	include_spip('inc/plugin');
-	if (actualise_plugins_actifs()) {
-		include_spip('inc/headers');
-		redirige_par_entete(self());
-	}
+    // on fait la verif du path avant tout,
+    // et l'installation des qu'on est dans la colonne principale
+    // si jamais la liste des plugins actifs change, il faut faire un refresh du hit
+    // pour etre sur que les bons fichiers seront charges lors de l'install
+    include_spip('inc/plugin');
+    if (actualise_plugins_actifs()) {
+        include_spip('inc/headers');
+        redirige_par_entete(self());
+    }
 
-	include_spip('inc/presentation');
-	include_spip('inc/filtres_boites');
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page('', '', '', '', true, false, false);
+    include_spip('inc/presentation');
+    include_spip('inc/filtres_boites');
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page('', '', '', '', true, false, false);
 
-	echo debut_grand_cadre();
-	echo boite_ouvrir(_T('info_message_technique'), 'notice');
-	echo '<p>' . _T('info_procedure_maj_version') . '</p>',
-		'<p>' . _T('info_administrateur_site_01') . '</p>';
-	echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
-	echo boite_fermer();
-	// masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
-	echo '<style type="text/css">#debug-nav {display: none;}</style>';
-	echo fin_grand_cadre();
-	echo fin_page();
+    echo debut_grand_cadre();
+    echo boite_ouvrir(_T('info_message_technique'), 'notice');
+    echo '<p>' . _T('info_procedure_maj_version') . '</p>',
+        '<p>' . _T('info_administrateur_site_01') . '</p>';
+    echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
+    echo boite_fermer();
+    // masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
+    echo '<style type="text/css">#debug-nav {display: none;}</style>';
+    echo fin_grand_cadre();
+    echo fin_page();
 }

ecrire/exec/404.php

Indentation +16 added lines, -16 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,25 +25,25 @@ 
  */
 function exec_404_dist() {
 
-	$exec = _request('exec');
+    $exec = _request('exec');
 
-	$titre = "exec_$exec";
-	$navigation = '';
-	$extra = '';
+    $titre = "exec_$exec";
+    $navigation = '';
+    $extra = '';
 
-	include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page($titre);
+    include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page($titre);
 
-	echo debut_gauche();
-	echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_gauche();
+    echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo creer_colonne_droite();
-	echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo creer_colonne_droite();
+    echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo debut_droite();
-	echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
-	echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_droite();
+    echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
+    echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo fin_gauche(), fin_page();
+    echo fin_gauche(), fin_page();
 }

ecrire/exec/403.php

Indentation +28 added lines, -28 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -27,40 +27,40 @@ 
  */
 function exec_403_dist($message = '') {
 
-	$exec = _request('exec');
+    $exec = _request('exec');
 
-	$titre = "exec_$exec";
-	$navigation = '';
-	$extra = '';
+    $titre = "exec_$exec";
+    $navigation = '';
+    $extra = '';
 
-	if (!$message) {
-		$message = _T('avis_acces_interdit_prive', ['exec' => _request('exec')]);
-	}
+    if (!$message) {
+        $message = _T('avis_acces_interdit_prive', ['exec' => _request('exec')]);
+    }
 
-	$contenu = "<h1 class='grostitre'>" . _T('info_acces_interdit') . '</h1>' . $message;
+    $contenu = "<h1 class='grostitre'>" . _T('info_acces_interdit') . '</h1>' . $message;
 
-	if (_request('var_zajax')) {
-		include_spip('inc/actions');
-		ajax_retour($contenu);
-	} else {
-		include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
+    if (_request('var_zajax')) {
+        include_spip('inc/actions');
+        ajax_retour($contenu);
+    } else {
+        include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
 
-		$commencer_page = charger_fonction('commencer_page', 'inc');
-		echo $commencer_page($titre);
+        $commencer_page = charger_fonction('commencer_page', 'inc');
+        echo $commencer_page($titre);
 
-		echo debut_gauche();
-		echo recuperer_fond('prive/squelettes/navigation/dist', []);
-		echo pipeline('affiche_gauche', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
+        echo debut_gauche();
+        echo recuperer_fond('prive/squelettes/navigation/dist', []);
+        echo pipeline('affiche_gauche', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
 
-		echo creer_colonne_droite();
-		echo pipeline('affiche_droite', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
+        echo creer_colonne_droite();
+        echo pipeline('affiche_droite', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
 
-		echo debut_droite();
-		echo pipeline(
-			'affiche_milieu',
-			['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => $contenu]
-		);
+        echo debut_droite();
+        echo pipeline(
+            'affiche_milieu',
+            ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => $contenu]
+        );
 
-		echo fin_gauche(), fin_page();
-	}
+        echo fin_gauche(), fin_page();
+    }
 }

ecrire/inc/nfslock.php

Indentation +92 added lines, -92 removed lines

@@ -7,7 +7,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/acces');
@@ -101,93 +101,93 @@ 
  * @return int|bool Timestamp du verrou, false si erreur
  */
 function spip_nfslock($fichier, $max_age = 0) {
-	$tries = 0;
+    $tries = 0;
 
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
 
-	/*
+    /*
 	 * 1. create a tmp file with a psuedo random file name. we also make
 	 *    tpath which is a buffer to store the full pathname of the tmp file.
 	 */
 
-	$id = creer_uniqid();
-	$tpath = _DIR_TMP . "slock.$id";
-	$tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
-	if (!$tmpfd) {  /* open failed */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $id = creer_uniqid();
+    $tpath = _DIR_TMP . "slock.$id";
+    $tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
+    if (!$tmpfd) {  /* open failed */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //NFSL_SYSF
-	}
+        return false; //NFSL_SYSF
+    }
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file.
 	 *    then start looping trying to lock it
 	 */
 
-	while ($tries < 10) {
-		/*
+    while ($tries < 10) {
+        /*
 		 * 3. link tmp file to lock file.  if it goes, we win and we clean
 		 *    up and return the st_ctime of the lock file.
 		 */
 
-		if (link($tpath, $lock_file) == 1) {
-			spip_unlink($tpath); /* got it! */
-			@fclose($tmpfd);
-			if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
-				spip_unlink($lock_file);
+        if (link($tpath, $lock_file) == 1) {
+            spip_unlink($tpath); /* got it! */
+            @fclose($tmpfd);
+            if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
+                spip_unlink($lock_file);
 
-				return false; // (NFSL_SYSF);
-			}
+                return false; // (NFSL_SYSF);
+            }
 
-			return ($our_tmp['ctime']);
-		}
+            return ($our_tmp['ctime']);
+        }
 
-		/*
+        /*
 		 * 4. the lock failed.  check for a stale lock file, being mindful
 		 *    of NFS and the fact the time is set from the NFS server.  we
 		 *    do a write on the tmp file to update its time to the server's
 		 *    idea of "now."
 		 */
 
-		$old_stat = lstat($lock_file);
-		if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
-			break;
-		} /* something bogus is going on */
+        $old_stat = lstat($lock_file);
+        if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
+            break;
+        } /* something bogus is going on */
 
 
-		if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
-			spip_unlink($lock_file); /* break the stale lock */
-			$tries++;
-			/* It is CRITICAL that we sleep after breaking
+        if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
+            spip_unlink($lock_file); /* break the stale lock */
+            $tries++;
+            /* It is CRITICAL that we sleep after breaking
 			 * the lock. Otherwise, we could race with
 			 * another process and unlink it's newly-
 			 * created file.
 			 */
-			sleep(1 + random_int(0, 4));
-			continue;
-		}
+            sleep(1 + random_int(0, 4));
+            continue;
+        }
 
-		/*
+        /*
 		 * 5. try again
 		 */
 
-		$tries++;
-		sleep(1 + random_int(0, 4));
-	}
+        $tries++;
+        sleep(1 + random_int(0, 4));
+    }
 
-	/*
+    /*
 	 * 6. give up, failure.
 	 */
 
-	spip_unlink($tpath);
-	@fclose($tmpfd);
+    spip_unlink($tpath);
+    @fclose($tmpfd);
 
-	return false; //(NFSL_LOCKED);
+    return false; //(NFSL_LOCKED);
 }
 
 /**
@@ -231,75 +231,75 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfsunlock($fichier, $birth, $max_age = 0, $test = false) {
-	$id = creer_uniqid();
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
+    $id = creer_uniqid();
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
 
-	/*
+    /*
 	 * 1. Build a temp file and stat that to get an idea of what the server
 	 *    thinks the current time is (our_tmp.st_ctime)..
 	 */
 
-	$tpath = _DIR_TMP . "stime.$id";
-	$tmpfd = @fopen($tpath, 'w');
-	if (
-		(!$tmpfd)
-		or (@fputs($tmpfd, 'zz', 2) != 2)
-		or !($our_tmp = fstat($tmpfd))
-	) {
-		/* The open failed, or we can't write the file, or we can't stat it */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $tpath = _DIR_TMP . "stime.$id";
+    $tmpfd = @fopen($tpath, 'w');
+    if (
+        (!$tmpfd)
+        or (@fputs($tmpfd, 'zz', 2) != 2)
+        or !($our_tmp = fstat($tmpfd))
+    ) {
+        /* The open failed, or we can't write the file, or we can't stat it */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //(NFSL_SYSF);
-	}
+        return false; //(NFSL_SYSF);
+    }
 
-	@fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
-	spip_unlink($tpath);
+    @fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
+    spip_unlink($tpath);
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file
 	 */
 
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
-	/*
+    /*
 	 * 3. If the ctime hasn't been modified, unlink the file and return. If the
 	 *    lock has expired, sleep the usual random interval before returning.
 	 *    If we didn't sleep, there could be a race if the caller immediately
 	 *    tries to relock the file.
 	 */
 
-	if (
-		($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
-		&& ($old_stat['ctime'] == $birth)
-	) {  /* hasn't been modified since birth */
-		if (!$test) {
-			spip_unlink($lock_file);
-		}      /* so the lock is ours to remove */
-		if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
-			if (!$test) {
-				return false;
-			} //(NFSL_LOST);
-			sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
-		}
-
-		return true;//(NFSL_OK);			/* success */
-	}
-
-	/*
+    if (
+        ($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
+        && ($old_stat['ctime'] == $birth)
+    ) {  /* hasn't been modified since birth */
+        if (!$test) {
+            spip_unlink($lock_file);
+        }      /* so the lock is ours to remove */
+        if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
+            if (!$test) {
+                return false;
+            } //(NFSL_LOST);
+            sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
+        }
+
+        return true;//(NFSL_OK);			/* success */
+    }
+
+    /*
 	 * 4. Either ctime has been modified, or the entire lock file is missing.
 	 *    If the lock should still be ours, based on the ctime of the temp
 	 *    file, return with NFSL_STOLEN. If not, then our lock is expired and
 	 *    someone else has grabbed the file, so return NFSL_LOST.
 	 */
 
-	if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
-		return false;
-	} //(NFSL_STOLEN);
+    if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
+        return false;
+    } //(NFSL_STOLEN);
 
-	return false; //(NFSL_LOST);	/* The lock must have expired first. */
+    return false; //(NFSL_LOST);	/* The lock must have expired first. */
 }
 
 
@@ -323,5 +323,5 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfslock_test($fichier, $birth, $max_age = 0) {
-	return spip_nfsunlock($fichier, $birth, $max_age, true);
+    return spip_nfsunlock($fichier, $birth, $max_age, true);
 }

ecrire/inc/csv.php

Indentation +108 added lines, -108 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,118 +33,118 @@ 
  **/
 function analyse_csv($t) {
 
-	// Quel est le séparateur ?
-	$virg = substr_count($t, ',');
-	$pvirg = substr_count($t, ';');
-	$tab = substr_count($t, "\t");
-	if ($virg > $pvirg) {
-		$sep = ',';
-		$hs = ',';
-	} else {
-		$sep = ';';
-		$hs = '&#59;';
-		$virg = $pvirg;
-	}
-	// un certain nombre de tab => le séparateur est tab
-	if ($tab > $virg / 10) {
-		$sep = "\t";
-		$hs = "\t";
-	}
+    // Quel est le séparateur ?
+    $virg = substr_count($t, ',');
+    $pvirg = substr_count($t, ';');
+    $tab = substr_count($t, "\t");
+    if ($virg > $pvirg) {
+        $sep = ',';
+        $hs = ',';
+    } else {
+        $sep = ';';
+        $hs = '&#59;';
+        $virg = $pvirg;
+    }
+    // un certain nombre de tab => le séparateur est tab
+    if ($tab > $virg / 10) {
+        $sep = "\t";
+        $hs = "\t";
+    }
 
-	// un separateur suivi de 3 guillemets attention !
-	// attention au ; ou , suceptible d'etre confondu avec un separateur
-	// on substitue un # et on remplacera a la fin
-	$t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
-	$t = str_replace('""', '&#34#', $t);
-	preg_match_all('/"[^"]*"/', $t, $r);
-	foreach ($r[0] as $cell) {
-		$t = str_replace(
-			$cell,
-			str_replace(
-				$sep,
-				$hs,
-				str_replace(
-					"\n",
-					'``**``', // échapper les saut de lignes, on les remettra après.
-					substr($cell, 1, -1)
-				)
-			),
-			$t
-		);
-	}
+    // un separateur suivi de 3 guillemets attention !
+    // attention au ; ou , suceptible d'etre confondu avec un separateur
+    // on substitue un # et on remplacera a la fin
+    $t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
+    $t = str_replace('""', '&#34#', $t);
+    preg_match_all('/"[^"]*"/', $t, $r);
+    foreach ($r[0] as $cell) {
+        $t = str_replace(
+            $cell,
+            str_replace(
+                $sep,
+                $hs,
+                str_replace(
+                    "\n",
+                    '``**``', // échapper les saut de lignes, on les remettra après.
+                    substr($cell, 1, -1)
+                )
+            ),
+            $t
+        );
+    }
 
-	$t = preg_replace(
-		'/\r?\n/',
-		"\n",
-		preg_replace('/[\r\n]+/', "\n", $t)
-	);
+    $t = preg_replace(
+        '/\r?\n/',
+        "\n",
+        preg_replace('/[\r\n]+/', "\n", $t)
+    );
 
-	[$entete, $corps] = explode("\n", $t, 2);
-	$caption = '';
-	// sauter la ligne de tete formee seulement de separateurs
-	if (substr_count($entete, $sep) == strlen($entete)) {
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si une seule colonne, en faire le titre
-	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . '|';
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si premiere colonne vide, le raccourci doit quand meme produire <th...
-	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
-	}
+    [$entete, $corps] = explode("\n", $t, 2);
+    $caption = '';
+    // sauter la ligne de tete formee seulement de separateurs
+    if (substr_count($entete, $sep) == strlen($entete)) {
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si une seule colonne, en faire le titre
+    if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
+        $caption = "\n||" . $l[1] . '|';
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si premiere colonne vide, le raccourci doit quand meme produire <th...
+    if ($entete[0] == $sep) {
+        $entete = ' ' . $entete;
+    }
 
-	$lignes = explode("\n", $corps);
+    $lignes = explode("\n", $corps);
 
-	// retrait des lignes vides finales
-	while (
-		count($lignes) > 0
-		and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
-	) {
-		unset($lignes[count($lignes) - 1]);
-	}
-	//  calcul du  nombre de colonne a chaque ligne
-	$nbcols = [];
-	$max = $mil = substr_count($entete, $sep);
-	foreach ($lignes as $k => $v) {
-		if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
-			if ($max > $nbcols[$k]) {
-				$mil = $nbcols[$k];
-			} else {
-				$mil = $max;
-				$max = $nbcols[$k];
-			}
-		}
-	}
-	// Si pas le meme nombre, cadrer au nombre max
-	if ($mil <> $max) {
-		foreach ($nbcols as $k => $v) {
-			if ($v < $max) {
-				$lignes[$k] .= str_repeat($sep, $max - $v);
-			}
-		}
-	}
-	// et retirer les colonnes integralement vides
-	while (true) {
-		$nbcols = ($entete[strlen($entete) - 1] === $sep);
-		foreach ($lignes as $v) {
-			$nbcols &= ($v[strlen($v) - 1] === $sep);
-		}
-		if (!$nbcols) {
-			break;
-		}
-		$entete = substr($entete, 0, -1);
-		foreach ($lignes as $k => $v) {
-			$lignes[$k] = substr($v, 0, -1);
-		}
-	}
+    // retrait des lignes vides finales
+    while (
+        count($lignes) > 0
+        and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
+    ) {
+        unset($lignes[count($lignes) - 1]);
+    }
+    //  calcul du  nombre de colonne a chaque ligne
+    $nbcols = [];
+    $max = $mil = substr_count($entete, $sep);
+    foreach ($lignes as $k => $v) {
+        if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
+            if ($max > $nbcols[$k]) {
+                $mil = $nbcols[$k];
+            } else {
+                $mil = $max;
+                $max = $nbcols[$k];
+            }
+        }
+    }
+    // Si pas le meme nombre, cadrer au nombre max
+    if ($mil <> $max) {
+        foreach ($nbcols as $k => $v) {
+            if ($v < $max) {
+                $lignes[$k] .= str_repeat($sep, $max - $v);
+            }
+        }
+    }
+    // et retirer les colonnes integralement vides
+    while (true) {
+        $nbcols = ($entete[strlen($entete) - 1] === $sep);
+        foreach ($lignes as $v) {
+            $nbcols &= ($v[strlen($v) - 1] === $sep);
+        }
+        if (!$nbcols) {
+            break;
+        }
+        $entete = substr($entete, 0, -1);
+        foreach ($lignes as $k => $v) {
+            $lignes[$k] = substr($v, 0, -1);
+        }
+    }
 
-	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#', '"', $l);
-		$l = str_replace('``**``', "\n", $l);
-		$l = explode($sep, $l);
-	}
+    foreach ($lignes as &$l) {
+        $l = str_replace('&#34#', '"', $l);
+        $l = str_replace('``**``', "\n", $l);
+        $l = explode($sep, $l);
+    }
 
-	return [explode($sep, $entete), $lignes, $caption];
+    return [explode($sep, $entete), $lignes, $caption];
 }

ecrire/inc/puce_statut.php

Indentation +236 added lines, -236 removed lines

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