spip / SPIP

ecrire/base/trouver_table.php

Indentation +151 added lines, -151 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\SQL\Tables
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('base/objets');
 
@@ -68,154 +68,154 @@ 
  *
  **/
 function base_trouver_table_dist($nom, $serveur = '', $table_spip = true, array $options = []) {
-	$desc_cache = null;
-	static $nom_cache_desc_sql = [];
-
-	if (
-		!spip_connect($serveur)
-		or !preg_match('/^[a-zA-Z0-9._-]*/', $nom)
-	) {
-		return null;
-	}
-
-	$options = $options + [
-		// si false, baissera le niveau de log si une table demandée n’existe pas
-		'log_missing' => true,
-	];
-
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$objets_sql = lister_tables_objets_sql('::md5');
-
-	// le nom du cache depend du serveur mais aussi du nom de la db et du prefixe
-	// ce qui permet une auto invalidation en cas de modif manuelle du fichier
-	// de connexion, et tout risque d'ambiguite
-	if (!isset($nom_cache_desc_sql[$serveur][$objets_sql])) {
-		$nom_cache_desc_sql[$serveur][$objets_sql] =
-			_DIR_CACHE . 'sql_desc_'
-			. ($serveur ? "{$serveur}_" : '')
-			. substr(md5($connexion['db'] . ':' . $connexion['prefixe'] . ":$objets_sql"), 0, 8)
-			. '.txt';
-		// nouveau nom de cache = nouvelle version en memoire
-		unset($connexion['tables']);
-	}
-
-	// un appel avec $nom vide est une demande explicite de vidange du cache des descriptions
-	if (!$nom) {
-		spip_unlink($nom_cache_desc_sql[$serveur][$objets_sql]);
-		$connexion['tables'] = [];
-
-		return null;
-	}
-
-	$nom_sql = $nom;
-	if (preg_match('/\.(.*)$/', $nom, $s)) {
-		$nom_sql = $s[1];
-	} else {
-		$nom_sql = $nom;
-	}
-
-	$fdesc = $desc = '';
-	$connexion = &$GLOBALS['connexions'][$serveur ?: 0];
-
-	// base sous SPIP: gerer les abreviations explicites des noms de table
-	if ($connexion['spip_connect_version']) {
-		if ($table_spip and isset($GLOBALS['table_des_tables'][$nom])) {
-			$nom = $GLOBALS['table_des_tables'][$nom];
-			$nom_sql = 'spip_' . $nom;
-		}
-	}
-
-	// si c'est la premiere table qu'on cherche
-	// et si on est pas explicitement en recalcul
-	// on essaye de recharger le cache des decriptions de ce serveur
-	// dans le fichier cache
-	if (
-		!isset($connexion['tables'][$nom_sql])
-		and defined('_VAR_MODE') and _VAR_MODE !== 'recalcul'
-		and (!isset($connexion['tables']) or !$connexion['tables'])
-	) {
-		if (
-			lire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], $desc_cache)
-			and $desc_cache = unserialize($desc_cache)
-		) {
-			$connexion['tables'] = $desc_cache;
-		}
-	}
-	if ($table_spip and !isset($connexion['tables'][$nom_sql])) {
-		if (isset($GLOBALS['tables_principales'][$nom_sql])) {
-			$fdesc = $GLOBALS['tables_principales'][$nom_sql];
-		}
-		// meme si pas d'abreviation declaree, trouver la table spip_$nom
-		// si c'est une table principale,
-		// puisqu'on le fait aussi pour les tables auxiliaires
-		elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_' . $nom])) {
-			$nom_sql = 'spip_' . $nom;
-			$fdesc = &$GLOBALS['tables_principales'][$nom_sql];
-		} elseif (
-			isset($GLOBALS['tables_auxiliaires'][$n = $nom])
-			or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_' . $nom])
-		) {
-			$nom_sql = $n;
-			$fdesc = &$GLOBALS['tables_auxiliaires'][$n];
-		}  # table locale a cote de SPIP, comme non SPIP:
-	}
-	if (!isset($connexion['tables'][$nom_sql])) {
-		// La *vraie* base a la priorite
-		$exists = sql_table_exists($nom_sql, $table_spip, $serveur);
-		if (
-			!$exists
-			or !$desc = sql_showtable($nom_sql, $table_spip, $serveur)
-			or !$desc['field']
-		) {
-			if (!$fdesc) {
-				$log_level = $options['log_missing'] ? _LOG_INFO_IMPORTANTE : _LOG_DEBUG;
-				spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base' . $log_level);
-
-				return null;
-			}
-			// on ne sait pas lire la structure de la table :
-			// on retombe sur la description donnee dans les fichiers spip
-			$desc = $fdesc;
-			$desc['exist'] = false;
-		} else {
-			$desc['exist'] = true;
-			// gerer le cas des cles vides (echec de l'analyse sur une vue par exemple)
-			// pour recuperer la declaration de lister_tables_objets_sql() si il y en a une
-			if (! $desc['key']) {
-				spip_log("trouver_table: table sans cle '$serveur' '$nom'", 'base');
-				unset($desc['key']);
-			}
-		}
-
-		$desc['table'] = $desc['table_sql'] = $nom_sql;
-		$desc['connexion'] = $serveur;
-
-		// charger les infos declarees pour cette table
-		// en lui passant les infos connues
-		// $desc est prioritaire pour la description de la table
-		$desc = array_merge(lister_tables_objets_sql($nom_sql, $desc), $desc);
-		// s'assurer qu'on a toujours un 'key'
-		if (!isset($desc['key']) && !empty($fdesc['key'])) {
-			$desc['key'] = $fdesc['key'];
-		}
-		if (! isset($desc['key'])) {
-			$desc['key'] = [];
-		}
-
-		// si tables_objets_sql est bien fini d'init, on peut cacher
-		$connexion['tables'][$nom_sql] = $desc;
-		$res = &$connexion['tables'][$nom_sql];
-		// une nouvelle table a ete decrite
-		// mettons donc a jour le cache des descriptions de ce serveur
-		if (is_writeable(_DIR_CACHE)) {
-			ecrire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], serialize($connexion['tables']), true);
-		}
-	} else {
-		$res = &$connexion['tables'][$nom_sql];
-	}
-
-	// toujours retourner $nom dans id_table
-	$res['id_table'] = $nom;
-
-	return $res;
+    $desc_cache = null;
+    static $nom_cache_desc_sql = [];
+
+    if (
+        !spip_connect($serveur)
+        or !preg_match('/^[a-zA-Z0-9._-]*/', $nom)
+    ) {
+        return null;
+    }
+
+    $options = $options + [
+        // si false, baissera le niveau de log si une table demandée n’existe pas
+        'log_missing' => true,
+    ];
+
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $objets_sql = lister_tables_objets_sql('::md5');
+
+    // le nom du cache depend du serveur mais aussi du nom de la db et du prefixe
+    // ce qui permet une auto invalidation en cas de modif manuelle du fichier
+    // de connexion, et tout risque d'ambiguite
+    if (!isset($nom_cache_desc_sql[$serveur][$objets_sql])) {
+        $nom_cache_desc_sql[$serveur][$objets_sql] =
+            _DIR_CACHE . 'sql_desc_'
+            . ($serveur ? "{$serveur}_" : '')
+            . substr(md5($connexion['db'] . ':' . $connexion['prefixe'] . ":$objets_sql"), 0, 8)
+            . '.txt';
+        // nouveau nom de cache = nouvelle version en memoire
+        unset($connexion['tables']);
+    }
+
+    // un appel avec $nom vide est une demande explicite de vidange du cache des descriptions
+    if (!$nom) {
+        spip_unlink($nom_cache_desc_sql[$serveur][$objets_sql]);
+        $connexion['tables'] = [];
+
+        return null;
+    }
+
+    $nom_sql = $nom;
+    if (preg_match('/\.(.*)$/', $nom, $s)) {
+        $nom_sql = $s[1];
+    } else {
+        $nom_sql = $nom;
+    }
+
+    $fdesc = $desc = '';
+    $connexion = &$GLOBALS['connexions'][$serveur ?: 0];
+
+    // base sous SPIP: gerer les abreviations explicites des noms de table
+    if ($connexion['spip_connect_version']) {
+        if ($table_spip and isset($GLOBALS['table_des_tables'][$nom])) {
+            $nom = $GLOBALS['table_des_tables'][$nom];
+            $nom_sql = 'spip_' . $nom;
+        }
+    }
+
+    // si c'est la premiere table qu'on cherche
+    // et si on est pas explicitement en recalcul
+    // on essaye de recharger le cache des decriptions de ce serveur
+    // dans le fichier cache
+    if (
+        !isset($connexion['tables'][$nom_sql])
+        and defined('_VAR_MODE') and _VAR_MODE !== 'recalcul'
+        and (!isset($connexion['tables']) or !$connexion['tables'])
+    ) {
+        if (
+            lire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], $desc_cache)
+            and $desc_cache = unserialize($desc_cache)
+        ) {
+            $connexion['tables'] = $desc_cache;
+        }
+    }
+    if ($table_spip and !isset($connexion['tables'][$nom_sql])) {
+        if (isset($GLOBALS['tables_principales'][$nom_sql])) {
+            $fdesc = $GLOBALS['tables_principales'][$nom_sql];
+        }
+        // meme si pas d'abreviation declaree, trouver la table spip_$nom
+        // si c'est une table principale,
+        // puisqu'on le fait aussi pour les tables auxiliaires
+        elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_' . $nom])) {
+            $nom_sql = 'spip_' . $nom;
+            $fdesc = &$GLOBALS['tables_principales'][$nom_sql];
+        } elseif (
+            isset($GLOBALS['tables_auxiliaires'][$n = $nom])
+            or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_' . $nom])
+        ) {
+            $nom_sql = $n;
+            $fdesc = &$GLOBALS['tables_auxiliaires'][$n];
+        }  # table locale a cote de SPIP, comme non SPIP:
+    }
+    if (!isset($connexion['tables'][$nom_sql])) {
+        // La *vraie* base a la priorite
+        $exists = sql_table_exists($nom_sql, $table_spip, $serveur);
+        if (
+            !$exists
+            or !$desc = sql_showtable($nom_sql, $table_spip, $serveur)
+            or !$desc['field']
+        ) {
+            if (!$fdesc) {
+                $log_level = $options['log_missing'] ? _LOG_INFO_IMPORTANTE : _LOG_DEBUG;
+                spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base' . $log_level);
+
+                return null;
+            }
+            // on ne sait pas lire la structure de la table :
+            // on retombe sur la description donnee dans les fichiers spip
+            $desc = $fdesc;
+            $desc['exist'] = false;
+        } else {
+            $desc['exist'] = true;
+            // gerer le cas des cles vides (echec de l'analyse sur une vue par exemple)
+            // pour recuperer la declaration de lister_tables_objets_sql() si il y en a une
+            if (! $desc['key']) {
+                spip_log("trouver_table: table sans cle '$serveur' '$nom'", 'base');
+                unset($desc['key']);
+            }
+        }
+
+        $desc['table'] = $desc['table_sql'] = $nom_sql;
+        $desc['connexion'] = $serveur;
+
+        // charger les infos declarees pour cette table
+        // en lui passant les infos connues
+        // $desc est prioritaire pour la description de la table
+        $desc = array_merge(lister_tables_objets_sql($nom_sql, $desc), $desc);
+        // s'assurer qu'on a toujours un 'key'
+        if (!isset($desc['key']) && !empty($fdesc['key'])) {
+            $desc['key'] = $fdesc['key'];
+        }
+        if (! isset($desc['key'])) {
+            $desc['key'] = [];
+        }
+
+        // si tables_objets_sql est bien fini d'init, on peut cacher
+        $connexion['tables'][$nom_sql] = $desc;
+        $res = &$connexion['tables'][$nom_sql];
+        // une nouvelle table a ete decrite
+        // mettons donc a jour le cache des descriptions de ce serveur
+        if (is_writeable(_DIR_CACHE)) {
+            ecrire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], serialize($connexion['tables']), true);
+        }
+    } else {
+        $res = &$connexion['tables'][$nom_sql];
+    }
+
+    // toujours retourner $nom dans id_table
+    $res['id_table'] = $nom;
+
+    return $res;
 }

ecrire/base/delete_all.php

Indentation +22 added lines, -22 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -29,27 +29,27 @@ 
  * @param string $titre Inutilisé
  **/
 function base_delete_all_dist($titre) {
-	$delete = _request('delete');
-	$res = [];
-	if (is_array($delete)) {
-		foreach ($delete as $table) {
-			if (sql_drop_table($table)) {
-				$res[] = $table;
-			} else {
-				spip_log("SPIP n'a pas pu detruire $table.", _LOG_ERREUR);
-			}
-		}
+    $delete = _request('delete');
+    $res = [];
+    if (is_array($delete)) {
+        foreach ($delete as $table) {
+            if (sql_drop_table($table)) {
+                $res[] = $table;
+            } else {
+                spip_log("SPIP n'a pas pu detruire $table.", _LOG_ERREUR);
+            }
+        }
 
-		// un pipeline pour detruire les tables installees par les plugins
-		pipeline('delete_tables', '');
+        // un pipeline pour detruire les tables installees par les plugins
+        pipeline('delete_tables', '');
 
-		spip_unlink(_FILE_CONNECT);
-		spip_unlink(_FILE_CHMOD);
-		spip_unlink(_FILE_META);
-		spip_unlink(_ACCESS_FILE_NAME);
-		spip_unlink(_CACHE_RUBRIQUES);
-	}
-	$d = is_countable($delete) ? count($delete) : 0;
-	$r = count($res);
-	spip_log("Tables detruites: $r sur $d: " . join(', ', $res), _LOG_INFO_IMPORTANTE);
+        spip_unlink(_FILE_CONNECT);
+        spip_unlink(_FILE_CHMOD);
+        spip_unlink(_FILE_META);
+        spip_unlink(_ACCESS_FILE_NAME);
+        spip_unlink(_CACHE_RUBRIQUES);
+    }
+    $d = is_countable($delete) ? count($delete) : 0;
+    $r = count($res);
+    spip_log("Tables detruites: $r sur $d: " . join(', ', $res), _LOG_INFO_IMPORTANTE);
 }

ecrire/base/dump.php

Indentation +540 added lines, -540 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('_VERSION_ARCHIVE', '1.3');
@@ -38,7 +38,7 @@ 
  * @return string
  **/
 function base_dump_meta_name($rub) {
-	return $meta = "status_dump_{$rub}_" . abs($GLOBALS['visiteur_session']['id_auteur']);
+    return $meta = "status_dump_{$rub}_" . abs($GLOBALS['visiteur_session']['id_auteur']);
 }
 
 /**
@@ -53,15 +53,15 @@ 
  * @return string
  **/
 function base_dump_dir($meta) {
-	include_spip('inc/documents');
-	// determine upload va aussi initialiser l'index "restreint"
-	$maindir = determine_upload();
-	if (!$GLOBALS['visiteur_session']['restreint']) {
-		$maindir = _DIR_DUMP;
-	}
-	$dir = sous_repertoire($maindir, $meta);
-
-	return $dir;
+    include_spip('inc/documents');
+    // determine upload va aussi initialiser l'index "restreint"
+    $maindir = determine_upload();
+    if (!$GLOBALS['visiteur_session']['restreint']) {
+        $maindir = _DIR_DUMP;
+    }
+    $dir = sous_repertoire($maindir, $meta);
+
+    return $dir;
 }
 
 /**
@@ -75,28 +75,28 @@ 
  * @return array
  */
 function base_lister_toutes_tables(
-	$serveur = '',
-	$tables = [],
-	$exclude = [],
-	$affiche_vrai_prefixe = false
+    $serveur = '',
+    $tables = [],
+    $exclude = [],
+    $affiche_vrai_prefixe = false
 ) {
-	spip_connect($serveur);
-	$connexion = $GLOBALS['connexions'][$serveur ?: 0];
-	$prefixe = $connexion['prefixe'];
-
-	$p = '/^' . $prefixe . '/';
-	$res = $tables;
-	foreach (sql_alltable(null, $serveur) as $t) {
-		if (preg_match($p, $t)) {
-			$t1 = preg_replace($p, 'spip', $t);
-			if (!in_array($t1, $tables) and !in_array($t1, $exclude)) {
-				$res[] = ($affiche_vrai_prefixe ? $t : $t1);
-			}
-		}
-	}
-	sort($res);
-
-	return $res;
+    spip_connect($serveur);
+    $connexion = $GLOBALS['connexions'][$serveur ?: 0];
+    $prefixe = $connexion['prefixe'];
+
+    $p = '/^' . $prefixe . '/';
+    $res = $tables;
+    foreach (sql_alltable(null, $serveur) as $t) {
+        if (preg_match($p, $t)) {
+            $t1 = preg_replace($p, 'spip', $t);
+            if (!in_array($t1, $tables) and !in_array($t1, $exclude)) {
+                $res[] = ($affiche_vrai_prefixe ? $t : $t1);
+            }
+        }
+    }
+    sort($res);
+
+    return $res;
 }
 
 /**
@@ -106,11 +106,11 @@ 
  * @return string
  */
 function base_prefixe_tables($serveur = '') {
-	spip_connect($serveur);
-	$connexion = $GLOBALS['connexions'][$serveur ?: 0];
-	$prefixe = $connexion['prefixe'];
+    spip_connect($serveur);
+    $connexion = $GLOBALS['connexions'][$serveur ?: 0];
+    $prefixe = $connexion['prefixe'];
 
-	return $prefixe;
+    return $prefixe;
 }
 
 
@@ -125,31 +125,31 @@ 
  * @return array
  */
 function base_saisie_tables($name, $tables, $exclude = [], $post = null, $serveur = '') {
-	include_spip('inc/filtres');
-	$res = [];
-	foreach ($tables as $k => $t) {
-		// par defaut tout est coche sauf les tables dans $exclude
-		if (is_null($post)) {
-			$check = (in_array($t, $exclude) ? false : true);
-		} // mais si on a poste une selection, la reprendre
-		else {
-			$check = in_array($t, $post);
-		}
-
-		$res[$k] = "<input type='checkbox' value='$t' name='$name"
-			. "[]' id='$name$k'"
-			. ($check ? " checked='checked'" : '')
-			. "/>\n"
-			. "<label for='$name$k'>$t</label>"
-			. ' ('
-			. sinon(
-				singulier_ou_pluriel(sql_countsel($t, '', '', '', $serveur), 'dump:une_donnee', 'dump:nb_donnees'),
-				_T('dump:aucune_donnee')
-			)
-			. ')';
-	}
-
-	return $res;
+    include_spip('inc/filtres');
+    $res = [];
+    foreach ($tables as $k => $t) {
+        // par defaut tout est coche sauf les tables dans $exclude
+        if (is_null($post)) {
+            $check = (in_array($t, $exclude) ? false : true);
+        } // mais si on a poste une selection, la reprendre
+        else {
+            $check = in_array($t, $post);
+        }
+
+        $res[$k] = "<input type='checkbox' value='$t' name='$name"
+            . "[]' id='$name$k'"
+            . ($check ? " checked='checked'" : '')
+            . "/>\n"
+            . "<label for='$name$k'>$t</label>"
+            . ' ('
+            . sinon(
+                singulier_ou_pluriel(sql_countsel($t, '', '', '', $serveur), 'dump:une_donnee', 'dump:nb_donnees'),
+                _T('dump:aucune_donnee')
+            )
+            . ')';
+    }
+
+    return $res;
 }
 
 
@@ -161,27 +161,27 @@ 
  * @return array
  */
 function lister_tables_noexport() {
-	// par defaut tout est exporte sauf les tables ci-dessous
-	static $EXPORT_tables_noexport = null;
-	if (!is_null($EXPORT_tables_noexport)) {
-		return $EXPORT_tables_noexport;
-	}
-
-	$EXPORT_tables_noexport = [
-		'spip_caches', // plugin invalideur
-		'spip_resultats', // resultats de recherche ... c'est un cache !
-		'spip_test', // c'est un test !
-		#'spip_referers',
-		#'spip_referers_articles',
-		#'spip_visites',
-		#'spip_visites_articles',
-		#'spip_versions',
-		#'spip_versions_fragments'
-	];
-
-	$EXPORT_tables_noexport = pipeline('lister_tables_noexport', $EXPORT_tables_noexport);
-
-	return $EXPORT_tables_noexport;
+    // par defaut tout est exporte sauf les tables ci-dessous
+    static $EXPORT_tables_noexport = null;
+    if (!is_null($EXPORT_tables_noexport)) {
+        return $EXPORT_tables_noexport;
+    }
+
+    $EXPORT_tables_noexport = [
+        'spip_caches', // plugin invalideur
+        'spip_resultats', // resultats de recherche ... c'est un cache !
+        'spip_test', // c'est un test !
+        #'spip_referers',
+        #'spip_referers_articles',
+        #'spip_visites',
+        #'spip_visites_articles',
+        #'spip_versions',
+        #'spip_versions_fragments'
+    ];
+
+    $EXPORT_tables_noexport = pipeline('lister_tables_noexport', $EXPORT_tables_noexport);
+
+    return $EXPORT_tables_noexport;
 }
 
 /**
@@ -192,25 +192,25 @@ 
  * @return array
  */
 function lister_tables_noimport() {
-	static $IMPORT_tables_noimport = null;
-	if (!is_null($IMPORT_tables_noimport)) {
-		return $IMPORT_tables_noimport;
-	}
-
-	$IMPORT_tables_noimport = [];
-	// par defaut tout est importe sauf les tables ci-dessous
-	// possibiliter de definir cela tables via la meta
-	// compatibilite
-	if (isset($GLOBALS['meta']['IMPORT_tables_noimport'])) {
-		$IMPORT_tables_noimport = unserialize($GLOBALS['meta']['IMPORT_tables_noimport']);
-		if (!is_array($IMPORT_tables_noimport)) {
-			include_spip('inc/meta');
-			effacer_meta('IMPORT_tables_noimport');
-		}
-	}
-	$IMPORT_tables_noimport = pipeline('lister_tables_noimport', $IMPORT_tables_noimport);
-
-	return $IMPORT_tables_noimport;
+    static $IMPORT_tables_noimport = null;
+    if (!is_null($IMPORT_tables_noimport)) {
+        return $IMPORT_tables_noimport;
+    }
+
+    $IMPORT_tables_noimport = [];
+    // par defaut tout est importe sauf les tables ci-dessous
+    // possibiliter de definir cela tables via la meta
+    // compatibilite
+    if (isset($GLOBALS['meta']['IMPORT_tables_noimport'])) {
+        $IMPORT_tables_noimport = unserialize($GLOBALS['meta']['IMPORT_tables_noimport']);
+        if (!is_array($IMPORT_tables_noimport)) {
+            include_spip('inc/meta');
+            effacer_meta('IMPORT_tables_noimport');
+        }
+    }
+    $IMPORT_tables_noimport = pipeline('lister_tables_noimport', $IMPORT_tables_noimport);
+
+    return $IMPORT_tables_noimport;
 }
 
 
@@ -222,23 +222,23 @@ 
  * @return array
  */
 function lister_tables_noerase() {
-	static $IMPORT_tables_noerase = null;
-	if (!is_null($IMPORT_tables_noerase)) {
-		return $IMPORT_tables_noerase;
-	}
-
-	$IMPORT_tables_noerase = [
-		'spip_meta',
-		// par defaut on ne vide pas les stats, car elles ne figurent pas dans les dump
-		// et le cas echeant, un bouton dans l'admin permet de les vider a la main...
-		'spip_referers',
-		'spip_referers_articles',
-		'spip_visites',
-		'spip_visites_articles'
-	];
-	$IMPORT_tables_noerase = pipeline('lister_tables_noerase', $IMPORT_tables_noerase);
-
-	return $IMPORT_tables_noerase;
+    static $IMPORT_tables_noerase = null;
+    if (!is_null($IMPORT_tables_noerase)) {
+        return $IMPORT_tables_noerase;
+    }
+
+    $IMPORT_tables_noerase = [
+        'spip_meta',
+        // par defaut on ne vide pas les stats, car elles ne figurent pas dans les dump
+        // et le cas echeant, un bouton dans l'admin permet de les vider a la main...
+        'spip_referers',
+        'spip_referers_articles',
+        'spip_visites',
+        'spip_visites_articles'
+    ];
+    $IMPORT_tables_noerase = pipeline('lister_tables_noerase', $IMPORT_tables_noerase);
+
+    return $IMPORT_tables_noerase;
 }
 
 
@@ -252,86 +252,86 @@ 
  * @return array
  */
 function base_liste_table_for_dump($exclude_tables = []) {
-	$tables_for_dump = [];
-	$tables_pointees = [];
-	$tables = [];
-	$tables_principales = $GLOBALS['tables_principales'];
-	$tables_auxiliaires = $GLOBALS['tables_auxiliaires'];
-	$tables_jointures = $GLOBALS['tables_jointures'];
-
-	if (
-		include_spip('base/objets')
-		and function_exists('lister_tables_objets_sql')
-	) {
-		$tables = lister_tables_objets_sql();
-		foreach ($tables as $t => $infos) {
-			if ($infos['principale'] and !isset($tables_principales[$t])) {
-				$tables_principales[$t] = true;
-			}
-			if (!$infos['principale'] and !isset($tables_auxiliaires[$t])) {
-				$tables_auxiliaires[$t] = true;
-			}
-			if (is_countable($infos['tables_jointures']) ? count($infos['tables_jointures']) : 0) {
-				$tables_jointures[$t] = array_merge(
-					$tables_jointures[$t] ?? [],
-					$infos['tables_jointures']
-				);
-			}
-		}
-	}
-
-	// on construit un index des tables de liens
-	// pour les ajouter SI les deux tables qu'ils connectent sont sauvegardees
-	$tables_for_link = [];
-	foreach ($tables_jointures as $table => $liste_relations) {
-		if (is_array($liste_relations)) {
-			$nom = $table;
-			if (!isset($tables_auxiliaires[$nom]) && !isset($tables_principales[$nom])) {
-				$nom = "spip_$table";
-			}
-			if (isset($tables_auxiliaires[$nom]) || isset($tables_principales[$nom])) {
-				foreach ($liste_relations as $link_table) {
-					if (isset($tables_auxiliaires[$link_table])/*||isset($tables_principales[$link_table])*/) {
-						$tables_for_link[$link_table][] = $nom;
-					} else {
-						if (isset($tables_auxiliaires["spip_$link_table"])/*||isset($tables_principales["spip_$link_table"])*/) {
-							$tables_for_link["spip_$link_table"][] = $nom;
-						}
-					}
-				}
-			}
-		}
-	}
-
-	$liste_tables = [...array_keys($tables_principales), ...array_keys($tables_auxiliaires), ...array_keys($tables)];
-	foreach ($liste_tables as $table) {
-		//		$name = preg_replace("{^spip_}","",$table);
-		if (
-			!isset($tables_pointees[$table])
-			&& !in_array($table, $exclude_tables)
-			&& !isset($tables_for_link[$table])
-		) {
-			$tables_for_dump[] = $table;
-			$tables_pointees[$table] = 1;
-		}
-	}
-	foreach ($tables_for_link as $link_table => $liste) {
-		$connecte = true;
-		foreach ($liste as $connect_table) {
-			if (!in_array($connect_table, $tables_for_dump)) {
-				$connecte = false;
-			}
-		}
-		if ($connecte) {
-			# on ajoute les liaisons en premier
-			# si une restauration est interrompue,
-			# cela se verra mieux si il manque des objets
-			# que des liens
-		array_unshift($tables_for_dump, $link_table);
-		}
-	}
-
-	return [$tables_for_dump, $tables_for_link];
+    $tables_for_dump = [];
+    $tables_pointees = [];
+    $tables = [];
+    $tables_principales = $GLOBALS['tables_principales'];
+    $tables_auxiliaires = $GLOBALS['tables_auxiliaires'];
+    $tables_jointures = $GLOBALS['tables_jointures'];
+
+    if (
+        include_spip('base/objets')
+        and function_exists('lister_tables_objets_sql')
+    ) {
+        $tables = lister_tables_objets_sql();
+        foreach ($tables as $t => $infos) {
+            if ($infos['principale'] and !isset($tables_principales[$t])) {
+                $tables_principales[$t] = true;
+            }
+            if (!$infos['principale'] and !isset($tables_auxiliaires[$t])) {
+                $tables_auxiliaires[$t] = true;
+            }
+            if (is_countable($infos['tables_jointures']) ? count($infos['tables_jointures']) : 0) {
+                $tables_jointures[$t] = array_merge(
+                    $tables_jointures[$t] ?? [],
+                    $infos['tables_jointures']
+                );
+            }
+        }
+    }
+
+    // on construit un index des tables de liens
+    // pour les ajouter SI les deux tables qu'ils connectent sont sauvegardees
+    $tables_for_link = [];
+    foreach ($tables_jointures as $table => $liste_relations) {
+        if (is_array($liste_relations)) {
+            $nom = $table;
+            if (!isset($tables_auxiliaires[$nom]) && !isset($tables_principales[$nom])) {
+                $nom = "spip_$table";
+            }
+            if (isset($tables_auxiliaires[$nom]) || isset($tables_principales[$nom])) {
+                foreach ($liste_relations as $link_table) {
+                    if (isset($tables_auxiliaires[$link_table])/*||isset($tables_principales[$link_table])*/) {
+                        $tables_for_link[$link_table][] = $nom;
+                    } else {
+                        if (isset($tables_auxiliaires["spip_$link_table"])/*||isset($tables_principales["spip_$link_table"])*/) {
+                            $tables_for_link["spip_$link_table"][] = $nom;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    $liste_tables = [...array_keys($tables_principales), ...array_keys($tables_auxiliaires), ...array_keys($tables)];
+    foreach ($liste_tables as $table) {
+        //		$name = preg_replace("{^spip_}","",$table);
+        if (
+            !isset($tables_pointees[$table])
+            && !in_array($table, $exclude_tables)
+            && !isset($tables_for_link[$table])
+        ) {
+            $tables_for_dump[] = $table;
+            $tables_pointees[$table] = 1;
+        }
+    }
+    foreach ($tables_for_link as $link_table => $liste) {
+        $connecte = true;
+        foreach ($liste as $connect_table) {
+            if (!in_array($connect_table, $tables_for_dump)) {
+                $connecte = false;
+            }
+        }
+        if ($connecte) {
+            # on ajoute les liaisons en premier
+            # si une restauration est interrompue,
+            # cela se verra mieux si il manque des objets
+            # que des liens
+        array_unshift($tables_for_dump, $link_table);
+        }
+    }
+
+    return [$tables_for_dump, $tables_for_link];
 }
 
 /**
@@ -346,37 +346,37 @@ 
  * @param string $serveur
  */
 function base_vider_tables_destination_copie($tables, $exclure_tables = [], $serveur = '') {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-
-	spip_log(
-		'Vider ' . count($tables) . " tables sur serveur '$serveur' : " . join(', ', $tables),
-		'base.' . _LOG_INFO_IMPORTANTE
-	);
-	foreach ($tables as $table) {
-		if (!in_array($table, $exclure_tables)) {
-			// sur le serveur principal, il ne faut pas supprimer l'auteur loge !
-			if (($table != 'spip_auteurs') or $serveur != '') {
-				// regarder si il y a au moins un champ impt='non'
-				$desc = $trouver_table($table, $serveur);
-				if (isset($desc['field']['impt'])) {
-					sql_delete($table, "impt='oui'", $serveur);
-				} elseif ($desc) {
-					sql_delete($table, '', $serveur);
-				}
-			}
-		}
-	}
-
-	// sur le serveur principal, il ne faut pas supprimer l'auteur loge !
-	// Bidouille pour garder l'acces admin actuel pendant toute la restauration
-	if (
-		$serveur == ''
-		and in_array('spip_auteurs', $tables)
-		and !in_array('spip_auteurs', $exclure_tables)
-	) {
-		base_conserver_copieur(true, $serveur);
-		sql_delete('spip_auteurs', 'id_auteur>0', $serveur);
-	}
+    $trouver_table = charger_fonction('trouver_table', 'base');
+
+    spip_log(
+        'Vider ' . count($tables) . " tables sur serveur '$serveur' : " . join(', ', $tables),
+        'base.' . _LOG_INFO_IMPORTANTE
+    );
+    foreach ($tables as $table) {
+        if (!in_array($table, $exclure_tables)) {
+            // sur le serveur principal, il ne faut pas supprimer l'auteur loge !
+            if (($table != 'spip_auteurs') or $serveur != '') {
+                // regarder si il y a au moins un champ impt='non'
+                $desc = $trouver_table($table, $serveur);
+                if (isset($desc['field']['impt'])) {
+                    sql_delete($table, "impt='oui'", $serveur);
+                } elseif ($desc) {
+                    sql_delete($table, '', $serveur);
+                }
+            }
+        }
+    }
+
+    // sur le serveur principal, il ne faut pas supprimer l'auteur loge !
+    // Bidouille pour garder l'acces admin actuel pendant toute la restauration
+    if (
+        $serveur == ''
+        and in_array('spip_auteurs', $tables)
+        and !in_array('spip_auteurs', $exclure_tables)
+    ) {
+        base_conserver_copieur(true, $serveur);
+        sql_delete('spip_auteurs', 'id_auteur>0', $serveur);
+    }
 }
 
 /**
@@ -387,36 +387,36 @@ 
  * @return void
  */
 function base_conserver_copieur($move = true, $serveur = '') {
-	// s'asurer qu'on a pas deja fait la manip !
-	if ($GLOBALS['visiteur_session']['id_auteur'] > 0 and sql_countsel('spip_auteurs', 'id_auteur>0')) {
-		spip_log(
-			'Conserver copieur dans id_auteur=' . $GLOBALS['visiteur_session']['id_auteur'] . " pour le serveur '$serveur'",
-			'dump.' . _LOG_INFO_IMPORTANTE
-		);
-		sql_delete('spip_auteurs', 'id_auteur<0', $serveur);
-		if ($move) {
-			sql_updateq(
-				'spip_auteurs',
-				['id_auteur' => -$GLOBALS['visiteur_session']['id_auteur']],
-				'id_auteur=' . intval($GLOBALS['visiteur_session']['id_auteur']),
-				[],
-				$serveur
-			);
-		} else {
-			$row = sql_fetsel(
-				'*',
-				'spip_auteurs',
-				'id_auteur=' . $GLOBALS['visiteur_session']['id_auteur'],
-				'',
-				'',
-				'',
-				'',
-				$serveur
-			);
-			$row['id_auteur'] = -$GLOBALS['visiteur_session']['id_auteur'];
-			sql_insertq('spip_auteurs', $row, [], $serveur);
-		}
-	}
+    // s'asurer qu'on a pas deja fait la manip !
+    if ($GLOBALS['visiteur_session']['id_auteur'] > 0 and sql_countsel('spip_auteurs', 'id_auteur>0')) {
+        spip_log(
+            'Conserver copieur dans id_auteur=' . $GLOBALS['visiteur_session']['id_auteur'] . " pour le serveur '$serveur'",
+            'dump.' . _LOG_INFO_IMPORTANTE
+        );
+        sql_delete('spip_auteurs', 'id_auteur<0', $serveur);
+        if ($move) {
+            sql_updateq(
+                'spip_auteurs',
+                ['id_auteur' => -$GLOBALS['visiteur_session']['id_auteur']],
+                'id_auteur=' . intval($GLOBALS['visiteur_session']['id_auteur']),
+                [],
+                $serveur
+            );
+        } else {
+            $row = sql_fetsel(
+                '*',
+                'spip_auteurs',
+                'id_auteur=' . $GLOBALS['visiteur_session']['id_auteur'],
+                '',
+                '',
+                '',
+                '',
+                $serveur
+            );
+            $row['id_auteur'] = -$GLOBALS['visiteur_session']['id_auteur'];
+            sql_insertq('spip_auteurs', $row, [], $serveur);
+        }
+    }
 }
 
 /**
@@ -431,21 +431,21 @@ 
  * @param string $serveur
  */
 function base_detruire_copieur_si_besoin($serveur = '') {
-	// rien a faire si ce n'est pas le serveur principal !
-	if ($serveur == '') {
-		if (sql_countsel('spip_auteurs', 'id_auteur>0')) {
-			spip_log("Detruire copieur id_auteur<0 pour le serveur '$serveur'", 'dump.' . _LOG_INFO_IMPORTANTE);
-			sql_delete('spip_auteurs', 'id_auteur<0', $serveur);
-		} else {
-			spip_log(
-				"Restaurer copieur id_auteur<0 pour le serveur '$serveur' (aucun autre auteur en base)",
-				'dump.' . _LOG_INFO_IMPORTANTE
-			);
-			sql_update('spip_auteurs', ['id_auteur' => '-id_auteur'], 'id_auteur<0');
-		}
-	} else {
-		spip_log("Pas de destruction copieur sur serveur '$serveur'", 'dump.' . _LOG_INFO_IMPORTANTE);
-	}
+    // rien a faire si ce n'est pas le serveur principal !
+    if ($serveur == '') {
+        if (sql_countsel('spip_auteurs', 'id_auteur>0')) {
+            spip_log("Detruire copieur id_auteur<0 pour le serveur '$serveur'", 'dump.' . _LOG_INFO_IMPORTANTE);
+            sql_delete('spip_auteurs', 'id_auteur<0', $serveur);
+        } else {
+            spip_log(
+                "Restaurer copieur id_auteur<0 pour le serveur '$serveur' (aucun autre auteur en base)",
+                'dump.' . _LOG_INFO_IMPORTANTE
+            );
+            sql_update('spip_auteurs', ['id_auteur' => '-id_auteur'], 'id_auteur<0');
+        }
+    } else {
+        spip_log("Pas de destruction copieur sur serveur '$serveur'", 'dump.' . _LOG_INFO_IMPORTANTE);
+    }
 }
 
 /**
@@ -460,40 +460,40 @@ 
  * @return array
  */
 function base_preparer_table_dest($table, $desc, $serveur_dest, $init = false) {
-	$upgrade = false;
-	// si la table existe et qu'on est a l'init, la dropper
-	if ($desc_dest = sql_showtable($table, true, $serveur_dest) and $init) {
-		if ($serveur_dest == '' and in_array($table, ['spip_meta', 'spip_auteurs'])) {
-			// ne pas dropper auteurs et meta sur le serveur principal
-			// faire un simple upgrade a la place
-			// pour ajouter les champs manquants
-			$upgrade = true;
-			// coherence avec le drop sur les autres tables
-			base_vider_tables_destination_copie([$table], [], $serveur_dest);
-			if ($table == 'spip_meta') {
-				// virer les version base qui vont venir avec l'import
-				sql_delete($table, "nom like '%_base_version'", $serveur_dest);
-				// hum casse la base si pas version_installee a l'import ...
-				sql_delete($table, "nom='version_installee'", $serveur_dest);
-			}
-		} else {
-			sql_drop_table($table, '', $serveur_dest);
-			spip_log("drop table '$table' sur serveur '$serveur_dest'", 'dump.' . _LOG_INFO_IMPORTANTE);
-		}
-		$desc_dest = false;
-	}
-	// si la table n'existe pas dans la destination, la creer a l'identique !
-	if (!$desc_dest) {
-		spip_log("creation '$table' sur serveur '$serveur_dest'", 'dump.' . _LOG_INFO_IMPORTANTE);
-		include_spip('base/create');
-		creer_ou_upgrader_table($table, $desc, 'auto', $upgrade, $serveur_dest);
-		$desc_dest = sql_showtable($table, true, $serveur_dest);
-	}
-	if (!$desc_dest) {
-		spip_log("Erreur creation '$table' sur serveur '$serveur_dest'" . var_export($desc, 1), 'dump.' . _LOG_ERREUR);
-	}
-
-	return $desc_dest;
+    $upgrade = false;
+    // si la table existe et qu'on est a l'init, la dropper
+    if ($desc_dest = sql_showtable($table, true, $serveur_dest) and $init) {
+        if ($serveur_dest == '' and in_array($table, ['spip_meta', 'spip_auteurs'])) {
+            // ne pas dropper auteurs et meta sur le serveur principal
+            // faire un simple upgrade a la place
+            // pour ajouter les champs manquants
+            $upgrade = true;
+            // coherence avec le drop sur les autres tables
+            base_vider_tables_destination_copie([$table], [], $serveur_dest);
+            if ($table == 'spip_meta') {
+                // virer les version base qui vont venir avec l'import
+                sql_delete($table, "nom like '%_base_version'", $serveur_dest);
+                // hum casse la base si pas version_installee a l'import ...
+                sql_delete($table, "nom='version_installee'", $serveur_dest);
+            }
+        } else {
+            sql_drop_table($table, '', $serveur_dest);
+            spip_log("drop table '$table' sur serveur '$serveur_dest'", 'dump.' . _LOG_INFO_IMPORTANTE);
+        }
+        $desc_dest = false;
+    }
+    // si la table n'existe pas dans la destination, la creer a l'identique !
+    if (!$desc_dest) {
+        spip_log("creation '$table' sur serveur '$serveur_dest'", 'dump.' . _LOG_INFO_IMPORTANTE);
+        include_spip('base/create');
+        creer_ou_upgrader_table($table, $desc, 'auto', $upgrade, $serveur_dest);
+        $desc_dest = sql_showtable($table, true, $serveur_dest);
+    }
+    if (!$desc_dest) {
+        spip_log("Erreur creation '$table' sur serveur '$serveur_dest'" . var_export($desc, 1), 'dump.' . _LOG_ERREUR);
+    }
+
+    return $desc_dest;
 }
 
 /**
@@ -539,211 +539,211 @@ 
  */
 function base_copier_tables($status_file, $tables, $serveur_source, $serveur_dest, $options = []) {
 
-	$status = [];
-	$callback_progression = $options['callback_progression'] ?? '';
-	$max_time = $options['max_time'] ?? 0;
-	$drop_source = $options['drop_source'] ?? false;
-	$no_erase_dest = $options['no_erase_dest'] ?? [];
-	$where = $options['where'] ?? [];
-	$fonction_base_inserer = $options['fonction_base_inserer'] ?? 'inserer_copie';
-	$desc_tables_dest = $options['desc_tables_dest'] ?? [];
-	$racine_fonctions = $options['racine_fonctions_dest'] ?? 'base';
-	$data_pool = $options['data_pool'] ?? 50 * 1024;
-
-	spip_log(
-		'Copier ' . count($tables) . " tables de '$serveur_source' vers '$serveur_dest'",
-		'dump.' . _LOG_INFO_IMPORTANTE
-	);
-
-	if (!$inserer_copie = charger_fonction($fonction_base_inserer, $racine_fonctions, true)) {
-		spip_log("Fonction '{$racine_fonctions}_$fonction_base_inserer' inconnue. Abandon", 'dump.' . _LOG_INFO_IMPORTANTE);
-
-		return true; // echec mais on a fini, donc true
-	}
-	if (!$preparer_table_dest = charger_fonction('preparer_table_dest', $racine_fonctions, true)) {
-		spip_log("Fonction '{$racine_fonctions}_$preparer_table_dest' inconnue. Abandon", 'dump.' . _LOG_INFO_IMPORTANTE);
-
-		return true; // echec mais on a fini, donc true
-	}
-
-	if (
-		!lire_fichier($status_file, $status)
-		or !$status = unserialize($status)
-	) {
-		$status = [];
-	}
-	$status['etape'] = 'basecopie';
-
-	// puis relister les tables a importer
-	// et les vider si besoin, au moment du premier passage ici
-	$initialisation_copie = (!isset($status['dump_status_copie'])) ? 0 : $status['dump_status_copie'];
-
-	// si init pas encore faite, vider les tables du serveur destination
-	if (!$initialisation_copie) {
-		if (
-			!$vider_tables_destination_copie = charger_fonction(
-				'vider_tables_destination_copie',
-				$racine_fonctions,
-				true
-			)
-		) {
-			spip_log(
-				"Fonction '{$racine_fonctions}_vider_tables_destination_copie' inconnue. Abandon",
-				'dump.' . _LOG_INFO_IMPORTANTE
-			);
-
-			return true; // echec mais on a fini, donc true
-		}
-		$vider_tables_destination_copie($tables, $no_erase_dest, $serveur_dest);
-		$status['dump_status_copie'] = 'ok';
-		ecrire_fichier($status_file, serialize($status));
-	}
-
-	// les tables auteurs et meta doivent etre copiees en dernier !
-	if (in_array('spip_auteurs', $tables)) {
-		$tables = array_diff($tables, ['spip_auteurs']);
-		$tables[] = 'spip_auteurs';
-	}
-	if (in_array('spip_meta', $tables)) {
-		$tables = array_diff($tables, ['spip_meta']);
-		$tables[] = 'spip_meta';
-	}
-	spip_log('Tables a copier :' . implode(', ', $tables), 'dump.' . _LOG_INFO);
-
-	$trouver_table = charger_fonction('trouver_table', 'base');
-
-	foreach ($tables as $table) {
-		// si table commence par spip_ c'est une table SPIP, renommer le prefixe si besoin
-		// sinon chercher la vraie table
-		$desc_source = false;
-		if (strncmp($table, 'spip_', 5) == 0) {
-			$desc_source = $trouver_table(preg_replace(',^spip_,', '', $table), $serveur_source, true);
-		}
-		if (!$desc_source or !isset($desc_source['exist']) or !$desc_source['exist']) {
-			$desc_source = $trouver_table($table, $serveur_source, false);
-		}
-
-		// verifier que la table est presente dans la base source
-		if ($desc_source) {
-			// $status['tables_copiees'][$table] contient l'avancement
-			// de la copie pour la $table : 0 a N et -N quand elle est finie (-1 si vide et finie...)
-			if (!isset($status['tables_copiees'][$table])) {
-				$status['tables_copiees'][$table] = 0;
-			}
-
-			if (
-				is_numeric($status['tables_copiees'][$table])
-				and $status['tables_copiees'][$table] >= 0
-				and $desc_dest = $preparer_table_dest(
-					$table,
-					$desc_tables_dest[$table] ?? $desc_source,
-					$serveur_dest,
-					$status['tables_copiees'][$table] == 0
-				)
-			) {
-				if ($callback_progression) {
-					$callback_progression($status['tables_copiees'][$table], 0, $table);
-				}
-				while (true) {
-					$n = intval($status['tables_copiees'][$table]);
-					// on copie par lot de 400
-					$res = sql_select(
-						'*',
-						$table,
-						$where[$table] ?? '',
-						'',
-						'',
-						"$n,400",
-						'',
-						$serveur_source
-					);
-					while ($row = sql_fetch($res, $serveur_source)) {
-						$rows = [$row];
-						// lire un groupe de donnees si demande en option
-						// (permet un envoi par lot vers la destination)
-						if ($data_pool > 0) {
-							$s = strlen(serialize($row));
-							while ($s < $data_pool and $row = sql_fetch($res, $serveur_source)) {
-								$s += strlen(serialize($row));
-								$rows[] = $row;
-							}
-						}
-						// si l'enregistrement est deja en base, ca fera un echec ou un doublon
-						// mais si ca renvoie false c'est une erreur fatale => abandon
-						if ($inserer_copie($table, $rows, $desc_dest, $serveur_dest) === false) {
-							// forcer la sortie, charge a l'appelant de gerer l'echec
-							spip_log("Erreur fatale dans $inserer_copie table $table", 'dump' . _LOG_ERREUR);
-							$status['errors'][] = "Erreur fatale  lors de la copie de la table $table";
-							ecrire_fichier($status_file, serialize($status));
-
-							// copie finie
-							return true;
-						}
-						$status['tables_copiees'][$table] += count($rows);
-						if ($max_time and time() > $max_time) {
-							break;
-						}
-					}
-					if ($n == $status['tables_copiees'][$table]) {
-						break;
-					}
-					spip_log("recopie $table " . $status['tables_copiees'][$table], 'dump.' . _LOG_INFO_IMPORTANTE);
-					if ($callback_progression) {
-						$callback_progression($status['tables_copiees'][$table], 0, $table);
-					}
-					ecrire_fichier($status_file, serialize($status));
-					if ($max_time and time() > $max_time) {
-						return false;
-					} // on a pas fini, mais le temps imparti est ecoule
-				}
-				if ($drop_source) {
-					sql_drop_table($table, '', $serveur_source);
-					spip_log("drop $table sur serveur source '$serveur_source'", 'dump.' . _LOG_INFO_IMPORTANTE);
-				}
-				$status['tables_copiees'][$table] = ($status['tables_copiees'][$table] ? -$status['tables_copiees'][$table] : 'zero');
-				ecrire_fichier($status_file, serialize($status));
-				spip_log('tables_recopiees ' . implode(',', array_keys($status['tables_copiees'])), 'dump.' . _LOG_INFO);
-				if ($callback_progression) {
-					$callback_progression($status['tables_copiees'][$table], $status['tables_copiees'][$table], $table);
-				}
-			} else {
-				if ($status['tables_copiees'][$table] < 0) {
-					spip_log("Table $table deja copiee : " . $status['tables_copiees'][$table], 'dump.' . _LOG_INFO);
-				}
-				if ($callback_progression) {
-					$callback_progression(
-						0,
-						$status['tables_copiees'][$table],
-						"$table" . ((is_numeric($status['tables_copiees'][$table]) and $status['tables_copiees'][$table] >= 0) ? '[Echec]' : '')
-					);
-				}
-			}
-		} else {
-			$status['errors'][] = "Impossible de lire la description de la table $table";
-			ecrire_fichier($status_file, serialize($status));
-			spip_log("Impossible de lire la description de la table $table", 'dump.' . _LOG_ERREUR);
-		}
-	}
-
-	// si le nombre de tables envoyees n'est pas egal au nombre de tables demandees
-	// abandonner
-	if ((is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) < count($tables)) {
-		spip_log(
-			'Nombre de tables copiees incorrect : ' . (is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) . '/' . count($tables),
-			'dump.' . _LOG_ERREUR
-		);
-		$status['errors'][] = 'Nombre de tables copiees incorrect : ' . (is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) . '/' . count($tables);
-		ecrire_fichier($status_file, serialize($status));
-	}
-
-	if ($detruire_copieur_si_besoin = charger_fonction('detruire_copieur_si_besoin', $racine_fonctions, true)) {
-		$detruire_copieur_si_besoin($serveur_dest);
-	} else {
-		spip_log("Fonction '{$racine_fonctions}_detruire_copieur_si_besoin' inconnue.", 'dump.' . _LOG_INFO_IMPORTANTE);
-	}
-
-	// OK, copie complete
-	return true;
+    $status = [];
+    $callback_progression = $options['callback_progression'] ?? '';
+    $max_time = $options['max_time'] ?? 0;
+    $drop_source = $options['drop_source'] ?? false;
+    $no_erase_dest = $options['no_erase_dest'] ?? [];
+    $where = $options['where'] ?? [];
+    $fonction_base_inserer = $options['fonction_base_inserer'] ?? 'inserer_copie';
+    $desc_tables_dest = $options['desc_tables_dest'] ?? [];
+    $racine_fonctions = $options['racine_fonctions_dest'] ?? 'base';
+    $data_pool = $options['data_pool'] ?? 50 * 1024;
+
+    spip_log(
+        'Copier ' . count($tables) . " tables de '$serveur_source' vers '$serveur_dest'",
+        'dump.' . _LOG_INFO_IMPORTANTE
+    );
+
+    if (!$inserer_copie = charger_fonction($fonction_base_inserer, $racine_fonctions, true)) {
+        spip_log("Fonction '{$racine_fonctions}_$fonction_base_inserer' inconnue. Abandon", 'dump.' . _LOG_INFO_IMPORTANTE);
+
+        return true; // echec mais on a fini, donc true
+    }
+    if (!$preparer_table_dest = charger_fonction('preparer_table_dest', $racine_fonctions, true)) {
+        spip_log("Fonction '{$racine_fonctions}_$preparer_table_dest' inconnue. Abandon", 'dump.' . _LOG_INFO_IMPORTANTE);
+
+        return true; // echec mais on a fini, donc true
+    }
+
+    if (
+        !lire_fichier($status_file, $status)
+        or !$status = unserialize($status)
+    ) {
+        $status = [];
+    }
+    $status['etape'] = 'basecopie';
+
+    // puis relister les tables a importer
+    // et les vider si besoin, au moment du premier passage ici
+    $initialisation_copie = (!isset($status['dump_status_copie'])) ? 0 : $status['dump_status_copie'];
+
+    // si init pas encore faite, vider les tables du serveur destination
+    if (!$initialisation_copie) {
+        if (
+            !$vider_tables_destination_copie = charger_fonction(
+                'vider_tables_destination_copie',
+                $racine_fonctions,
+                true
+            )
+        ) {
+            spip_log(
+                "Fonction '{$racine_fonctions}_vider_tables_destination_copie' inconnue. Abandon",
+                'dump.' . _LOG_INFO_IMPORTANTE
+            );
+
+            return true; // echec mais on a fini, donc true
+        }
+        $vider_tables_destination_copie($tables, $no_erase_dest, $serveur_dest);
+        $status['dump_status_copie'] = 'ok';
+        ecrire_fichier($status_file, serialize($status));
+    }
+
+    // les tables auteurs et meta doivent etre copiees en dernier !
+    if (in_array('spip_auteurs', $tables)) {
+        $tables = array_diff($tables, ['spip_auteurs']);
+        $tables[] = 'spip_auteurs';
+    }
+    if (in_array('spip_meta', $tables)) {
+        $tables = array_diff($tables, ['spip_meta']);
+        $tables[] = 'spip_meta';
+    }
+    spip_log('Tables a copier :' . implode(', ', $tables), 'dump.' . _LOG_INFO);
+
+    $trouver_table = charger_fonction('trouver_table', 'base');
+
+    foreach ($tables as $table) {
+        // si table commence par spip_ c'est une table SPIP, renommer le prefixe si besoin
+        // sinon chercher la vraie table
+        $desc_source = false;
+        if (strncmp($table, 'spip_', 5) == 0) {
+            $desc_source = $trouver_table(preg_replace(',^spip_,', '', $table), $serveur_source, true);
+        }
+        if (!$desc_source or !isset($desc_source['exist']) or !$desc_source['exist']) {
+            $desc_source = $trouver_table($table, $serveur_source, false);
+        }
+
+        // verifier que la table est presente dans la base source
+        if ($desc_source) {
+            // $status['tables_copiees'][$table] contient l'avancement
+            // de la copie pour la $table : 0 a N et -N quand elle est finie (-1 si vide et finie...)
+            if (!isset($status['tables_copiees'][$table])) {
+                $status['tables_copiees'][$table] = 0;
+            }
+
+            if (
+                is_numeric($status['tables_copiees'][$table])
+                and $status['tables_copiees'][$table] >= 0
+                and $desc_dest = $preparer_table_dest(
+                    $table,
+                    $desc_tables_dest[$table] ?? $desc_source,
+                    $serveur_dest,
+                    $status['tables_copiees'][$table] == 0
+                )
+            ) {
+                if ($callback_progression) {
+                    $callback_progression($status['tables_copiees'][$table], 0, $table);
+                }
+                while (true) {
+                    $n = intval($status['tables_copiees'][$table]);
+                    // on copie par lot de 400
+                    $res = sql_select(
+                        '*',
+                        $table,
+                        $where[$table] ?? '',
+                        '',
+                        '',
+                        "$n,400",
+                        '',
+                        $serveur_source
+                    );
+                    while ($row = sql_fetch($res, $serveur_source)) {
+                        $rows = [$row];
+                        // lire un groupe de donnees si demande en option
+                        // (permet un envoi par lot vers la destination)
+                        if ($data_pool > 0) {
+                            $s = strlen(serialize($row));
+                            while ($s < $data_pool and $row = sql_fetch($res, $serveur_source)) {
+                                $s += strlen(serialize($row));
+                                $rows[] = $row;
+                            }
+                        }
+                        // si l'enregistrement est deja en base, ca fera un echec ou un doublon
+                        // mais si ca renvoie false c'est une erreur fatale => abandon
+                        if ($inserer_copie($table, $rows, $desc_dest, $serveur_dest) === false) {
+                            // forcer la sortie, charge a l'appelant de gerer l'echec
+                            spip_log("Erreur fatale dans $inserer_copie table $table", 'dump' . _LOG_ERREUR);
+                            $status['errors'][] = "Erreur fatale  lors de la copie de la table $table";
+                            ecrire_fichier($status_file, serialize($status));
+
+                            // copie finie
+                            return true;
+                        }
+                        $status['tables_copiees'][$table] += count($rows);
+                        if ($max_time and time() > $max_time) {
+                            break;
+                        }
+                    }
+                    if ($n == $status['tables_copiees'][$table]) {
+                        break;
+                    }
+                    spip_log("recopie $table " . $status['tables_copiees'][$table], 'dump.' . _LOG_INFO_IMPORTANTE);
+                    if ($callback_progression) {
+                        $callback_progression($status['tables_copiees'][$table], 0, $table);
+                    }
+                    ecrire_fichier($status_file, serialize($status));
+                    if ($max_time and time() > $max_time) {
+                        return false;
+                    } // on a pas fini, mais le temps imparti est ecoule
+                }
+                if ($drop_source) {
+                    sql_drop_table($table, '', $serveur_source);
+                    spip_log("drop $table sur serveur source '$serveur_source'", 'dump.' . _LOG_INFO_IMPORTANTE);
+                }
+                $status['tables_copiees'][$table] = ($status['tables_copiees'][$table] ? -$status['tables_copiees'][$table] : 'zero');
+                ecrire_fichier($status_file, serialize($status));
+                spip_log('tables_recopiees ' . implode(',', array_keys($status['tables_copiees'])), 'dump.' . _LOG_INFO);
+                if ($callback_progression) {
+                    $callback_progression($status['tables_copiees'][$table], $status['tables_copiees'][$table], $table);
+                }
+            } else {
+                if ($status['tables_copiees'][$table] < 0) {
+                    spip_log("Table $table deja copiee : " . $status['tables_copiees'][$table], 'dump.' . _LOG_INFO);
+                }
+                if ($callback_progression) {
+                    $callback_progression(
+                        0,
+                        $status['tables_copiees'][$table],
+                        "$table" . ((is_numeric($status['tables_copiees'][$table]) and $status['tables_copiees'][$table] >= 0) ? '[Echec]' : '')
+                    );
+                }
+            }
+        } else {
+            $status['errors'][] = "Impossible de lire la description de la table $table";
+            ecrire_fichier($status_file, serialize($status));
+            spip_log("Impossible de lire la description de la table $table", 'dump.' . _LOG_ERREUR);
+        }
+    }
+
+    // si le nombre de tables envoyees n'est pas egal au nombre de tables demandees
+    // abandonner
+    if ((is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) < count($tables)) {
+        spip_log(
+            'Nombre de tables copiees incorrect : ' . (is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) . '/' . count($tables),
+            'dump.' . _LOG_ERREUR
+        );
+        $status['errors'][] = 'Nombre de tables copiees incorrect : ' . (is_countable($status['tables_copiees']) ? count($status['tables_copiees']) : 0) . '/' . count($tables);
+        ecrire_fichier($status_file, serialize($status));
+    }
+
+    if ($detruire_copieur_si_besoin = charger_fonction('detruire_copieur_si_besoin', $racine_fonctions, true)) {
+        $detruire_copieur_si_besoin($serveur_dest);
+    } else {
+        spip_log("Fonction '{$racine_fonctions}_detruire_copieur_si_besoin' inconnue.", 'dump.' . _LOG_INFO_IMPORTANTE);
+    }
+
+    // OK, copie complete
+    return true;
 }
 
 /**
@@ -757,31 +757,31 @@ 
  */
 function base_inserer_copie($table, $rows, $desc_dest, $serveur_dest) {
 
-	// verifier le nombre d'insertion
-	$nb1 = sql_countsel($table, '', '', '', $serveur_dest);
-	// si l'enregistrement est deja en base, ca fera un echec ou un doublon
-	$r = sql_insertq_multi($table, $rows, $desc_dest, $serveur_dest);
-	$nb = sql_countsel($table, '', '', '', $serveur_dest);
-	if ($nb - $nb1 < count($rows)) {
-		spip_log(
-			'base_inserer_copie : ' . ($nb - $nb1) . ' insertions au lieu de ' . count($rows) . '. On retente 1 par 1',
-			'dump' . _LOG_INFO_IMPORTANTE
-		);
-		foreach ($rows as $row) {
-			// si l'enregistrement est deja en base, ca fera un echec ou un doublon
-			$r = sql_insertq($table, $row, $desc_dest, $serveur_dest);
-		}
-		// on reverifie le total
-		$r = 0;
-		$nb = sql_countsel($table, '', '', '', $serveur_dest);
-		if ($nb - $nb1 < count($rows)) {
-			spip_log(
-				'base_inserer_copie : ' . ($nb - $nb1) . ' insertions au lieu de ' . count($rows) . ' apres insertion 1 par 1',
-				'dump' . _LOG_ERREUR
-			);
-			$r = false;
-		}
-	}
-
-	return $r;
+    // verifier le nombre d'insertion
+    $nb1 = sql_countsel($table, '', '', '', $serveur_dest);
+    // si l'enregistrement est deja en base, ca fera un echec ou un doublon
+    $r = sql_insertq_multi($table, $rows, $desc_dest, $serveur_dest);
+    $nb = sql_countsel($table, '', '', '', $serveur_dest);
+    if ($nb - $nb1 < count($rows)) {
+        spip_log(
+            'base_inserer_copie : ' . ($nb - $nb1) . ' insertions au lieu de ' . count($rows) . '. On retente 1 par 1',
+            'dump' . _LOG_INFO_IMPORTANTE
+        );
+        foreach ($rows as $row) {
+            // si l'enregistrement est deja en base, ca fera un echec ou un doublon
+            $r = sql_insertq($table, $row, $desc_dest, $serveur_dest);
+        }
+        // on reverifie le total
+        $r = 0;
+        $nb = sql_countsel($table, '', '', '', $serveur_dest);
+        if ($nb - $nb1 < count($rows)) {
+            spip_log(
+                'base_inserer_copie : ' . ($nb - $nb1) . ' insertions au lieu de ' . count($rows) . ' apres insertion 1 par 1',
+                'dump' . _LOG_ERREUR
+            );
+            $r = false;
+        }
+    }
+
+    return $r;
 }

ecrire/genie/mail.php

Indentation +27 added lines, -27 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -32,35 +32,35 @@ 
  * @return int
  */
 function genie_mail_dist($t) {
-	$adresse_neuf = $GLOBALS['meta']['adresse_neuf'];
-	$jours_neuf = $GLOBALS['meta']['jours_neuf'];
+    $adresse_neuf = $GLOBALS['meta']['adresse_neuf'];
+    $jours_neuf = $GLOBALS['meta']['jours_neuf'];
 
-	$now = time();
-	if (!isset($GLOBALS['meta']['dernier_envoi_neuf'])) {
-		ecrire_meta('dernier_envoi_neuf', date('Y-m-d H:i:s', $now - (3600 * 24 * $jours_neuf)));
-	}
+    $now = time();
+    if (!isset($GLOBALS['meta']['dernier_envoi_neuf'])) {
+        ecrire_meta('dernier_envoi_neuf', date('Y-m-d H:i:s', $now - (3600 * 24 * $jours_neuf)));
+    }
 
-	$page = recuperer_fond(
-		'nouveautes',
-		['date' => $GLOBALS['meta']['dernier_envoi_neuf'], 'jours_neuf' => $jours_neuf],
-		['raw' => true]
-	);
+    $page = recuperer_fond(
+        'nouveautes',
+        ['date' => $GLOBALS['meta']['dernier_envoi_neuf'], 'jours_neuf' => $jours_neuf],
+        ['raw' => true]
+    );
 
-	if (strlen(trim($page['texte']))) {
-		// recuperer les entetes envoyes par #HTTP_HEADER
-		$headers = '';
-		if (isset($page['entetes']) and is_countable($page['entetes']) ? count($page['entetes']) : 0) {
-			foreach ($page['entetes'] as $k => $v) {
-				$headers .= (strlen($v) ? "$k: $v" : $k) . "\n";
-			}
-		}
+    if (strlen(trim($page['texte']))) {
+        // recuperer les entetes envoyes par #HTTP_HEADER
+        $headers = '';
+        if (isset($page['entetes']) and is_countable($page['entetes']) ? count($page['entetes']) : 0) {
+            foreach ($page['entetes'] as $k => $v) {
+                $headers .= (strlen($v) ? "$k: $v" : $k) . "\n";
+            }
+        }
 
-		include_spip('inc/notifications');
-		notifications_envoyer_mails($adresse_neuf, $page['texte'], '', '', $headers);
-		ecrire_meta('dernier_envoi_neuf', date('Y-m-d H:i:s', $now));
-	} else {
-		spip_log("mail nouveautes : rien de neuf depuis $jours_neuf jours");
-	}
+        include_spip('inc/notifications');
+        notifications_envoyer_mails($adresse_neuf, $page['texte'], '', '', $headers);
+        ecrire_meta('dernier_envoi_neuf', date('Y-m-d H:i:s', $now));
+    } else {
+        spip_log("mail nouveautes : rien de neuf depuis $jours_neuf jours");
+    }
 
-	return 1;
+    return 1;
 }

ecrire/inc/plonger.php

Indentation +88 added lines, -88 removed lines

@@ -11,112 +11,112 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/texte');
 
 function inc_plonger_dist($id_rubrique, $idom = '', $list = [], $col = 1, $exclu = 0, $do = 'aff') {
 
-	if ($list) {
-		$id_rubrique = $list[$col - 1];
-	}
+    if ($list) {
+        $id_rubrique = $list[$col - 1];
+    }
 
-	$ret = '';
+    $ret = '';
 
-	# recherche les filles et petites-filles de la rubrique donnee
-	# en excluant une eventuelle rubrique interdite (par exemple, lorsqu'on
-	# deplace une rubrique, on peut la deplacer partout a partir de la
-	# racine... sauf vers elle-meme ou sa propre branche)
-	$ordre = [];
-	$rub = [];
+    # recherche les filles et petites-filles de la rubrique donnee
+    # en excluant une eventuelle rubrique interdite (par exemple, lorsqu'on
+    # deplace une rubrique, on peut la deplacer partout a partir de la
+    # racine... sauf vers elle-meme ou sa propre branche)
+    $ordre = [];
+    $rub = [];
 
-	$res = sql_select(
-		'rub1.id_rubrique, rub1.titre, rub1.id_parent, rub1.lang, rub1.langue_choisie, rub2.id_rubrique AS id_enfant',
-		'spip_rubriques AS rub1 LEFT JOIN spip_rubriques AS rub2 ON (rub1.id_rubrique = rub2.id_parent)',
-		'rub1.id_parent = ' . sql_quote($id_rubrique) . '
+    $res = sql_select(
+        'rub1.id_rubrique, rub1.titre, rub1.id_parent, rub1.lang, rub1.langue_choisie, rub2.id_rubrique AS id_enfant',
+        'spip_rubriques AS rub1 LEFT JOIN spip_rubriques AS rub2 ON (rub1.id_rubrique = rub2.id_parent)',
+        'rub1.id_parent = ' . sql_quote($id_rubrique) . '
 			AND rub1.id_rubrique!=' . sql_quote($exclu) . '
 			AND (rub2.id_rubrique IS NULL OR rub2.id_rubrique!=' . sql_quote($exclu) . ')',
-		'',
-		'0+rub1.titre,rub1.titre'
-	);
+        '',
+        '0+rub1.titre,rub1.titre'
+    );
 
-	while ($row = sql_fetch($res)) {
-		if (autoriser('voir', 'rubrique', $row['id_rubrique'])) {
-			$rub[$row['id_rubrique']]['enfants'] = $row['id_enfant'];
-			if ($row['id_parent'] == $id_rubrique) {
-				$t = trim(typo(supprimer_numero($row['titre'])));
-				if ($row['langue_choisie'] != 'oui') {
-					$t .= ' <small title="'
-						. traduire_nom_langue($row['lang'])
-						. '">[' . $row['lang'] . ']</small>';
-				}
-				$ordre[$row['id_rubrique']] = $t;
-			}
-		}
-	}
-	$next = $list[$col] ?? 0;
-	if ($ordre) {
-		$rec = generer_url_ecrire('plonger', "rac=$idom&exclus=$exclu&do=$do&col=" . ($col + 1));
-		$info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
-		$args = "'$idom',this,$col,'" . $GLOBALS['spip_lang_left'] . "','$info',event";
+    while ($row = sql_fetch($res)) {
+        if (autoriser('voir', 'rubrique', $row['id_rubrique'])) {
+            $rub[$row['id_rubrique']]['enfants'] = $row['id_enfant'];
+            if ($row['id_parent'] == $id_rubrique) {
+                $t = trim(typo(supprimer_numero($row['titre'])));
+                if ($row['langue_choisie'] != 'oui') {
+                    $t .= ' <small title="'
+                        . traduire_nom_langue($row['lang'])
+                        . '">[' . $row['lang'] . ']</small>';
+                }
+                $ordre[$row['id_rubrique']] = $t;
+            }
+        }
+    }
+    $next = $list[$col] ?? 0;
+    if ($ordre) {
+        $rec = generer_url_ecrire('plonger', "rac=$idom&exclus=$exclu&do=$do&col=" . ($col + 1));
+        $info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
+        $args = "'$idom',this,$col,'" . $GLOBALS['spip_lang_left'] . "','$info',event";
 
-		foreach ($ordre as $id => $titrebrut) {
-			$titre = supprimer_numero($titrebrut);
+        foreach ($ordre as $id => $titrebrut) {
+            $titre = supprimer_numero($titrebrut);
 
-			$classe1 = 'petit-item ' . ($id_rubrique ? 'petite-rubrique' : 'petit-secteur');
-			if (isset($rub[$id]['enfants'])) {
-				$classe2 = " class='rub-ouverte'";
-				$url = "\nhref='$rec&amp;id=$id'";
-			} else {
-				$classe2 = $url = '';
-				$url = "\nhref='javascript:void(0)'";
-			}
+            $classe1 = 'petit-item ' . ($id_rubrique ? 'petite-rubrique' : 'petit-secteur');
+            if (isset($rub[$id]['enfants'])) {
+                $classe2 = " class='rub-ouverte'";
+                $url = "\nhref='$rec&amp;id=$id'";
+            } else {
+                $classe2 = $url = '';
+                $url = "\nhref='javascript:void(0)'";
+            }
 
-			$js_func = $do . '_selection_titre';
-			$click = "\nonclick=\"changerhighlight(this.parentNode.parentNode.parentNode);\nreturn "
-				. (!is_array($list) ? ' false'
-					: "aff_selection_provisoire($id,$args)")
+            $js_func = $do . '_selection_titre';
+            $click = "\nonclick=\"changerhighlight(this.parentNode.parentNode.parentNode);\nreturn "
+                . (!is_array($list) ? ' false'
+                    : "aff_selection_provisoire($id,$args)")
 # ce lien provoque la selection (directe) de la rubrique cliquee
 # et l'affichage de son titre dans le bandeau
-				. "\"\nondblclick=\""
-				. "$js_func(this."
-				. 'firstChild.nodeValue,'
-				. $id
-				. ",'selection_rubrique','id_parent');"
-				. "\nreturn aff_selection_provisoire($id,$args);"
-				. '"';
+                . "\"\nondblclick=\""
+                . "$js_func(this."
+                . 'firstChild.nodeValue,'
+                . $id
+                . ",'selection_rubrique','id_parent');"
+                . "\nreturn aff_selection_provisoire($id,$args);"
+                . '"';
 
-			$ret .= "<div class='"
-				. (($id == $next) ? 'item on' : 'item')
-				. "'><div class='"
-				. $classe1
-				. "'><div$classe2><a"
-				. $url
-				. $click
-				. '>'
-				. $titre
-				. '</a></div></div></div>';
-		}
-	}
+            $ret .= "<div class='"
+                . (($id == $next) ? 'item on' : 'item')
+                . "'><div class='"
+                . $classe1
+                . "'><div$classe2><a"
+                . $url
+                . $click
+                . '>'
+                . $titre
+                . '</a></div></div></div>';
+        }
+    }
 
-	$idom2 = $idom . '_col_' . ($col + 1);
-	$left = ($col * 250);
+    $idom2 = $idom . '_col_' . ($col + 1);
+    $left = ($col * 250);
 
-	return http_img_pack(
-		'loader.svg',
-		'',
-		"class='loader' style='visibility: hidden; position: absolute; " . $GLOBALS['spip_lang_left'] . ': '
-		. ($left - 30)
-		. "px; top: 2px; z-index: 2;' id='img_$idom2'"
-	)
-	. "<div style='width: 250px; height: 100%; overflow: auto; position: absolute; top: 0px; " . $GLOBALS['spip_lang_left'] . ': '
-	. ($left - 250)
-	. "px;'>"
-	. $ret
-	. "\n</div>\n<div id='$idom2'>"
-	. ($next
-		? inc_plonger_dist($id_rubrique, $idom, $list, $col + 1, $exclu)
-		: '')
-	. "\n</div>";
+    return http_img_pack(
+        'loader.svg',
+        '',
+        "class='loader' style='visibility: hidden; position: absolute; " . $GLOBALS['spip_lang_left'] . ': '
+        . ($left - 30)
+        . "px; top: 2px; z-index: 2;' id='img_$idom2'"
+    )
+    . "<div style='width: 250px; height: 100%; overflow: auto; position: absolute; top: 0px; " . $GLOBALS['spip_lang_left'] . ': '
+    . ($left - 250)
+    . "px;'>"
+    . $ret
+    . "\n</div>\n<div id='$idom2'>"
+    . ($next
+        ? inc_plonger_dist($id_rubrique, $idom, $list, $col + 1, $exclu)
+        : '')
+    . "\n</div>";
 }

ecrire/inc/presentation.php

Indentation +113 added lines, -113 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Presentation
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/presentation_mini');
@@ -31,141 +31,141 @@ 
 include_spip('inc/filtres_alertes');
 
 function debut_cadre($style, $icone = '', $fonction = '', $titre = '', $id = '', $class = '', $padding = true) {
-	$fond = null;
-	$style_mapping = [
-		'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 = ['couleur' => 'topper', 'trait-couleur' => 'section'];
-	$c = $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)) {
-			[$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, $style_titre_mapping[$style] ?? '', $id);
+    $fond = null;
+    $style_mapping = [
+        '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 = ['couleur' => 'topper', 'trait-couleur' => 'section'];
+    $c = $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)) {
+            [$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, $style_titre_mapping[$style] ?? '', $id);
 }
 
 function fin_cadre() {
- return boite_fermer();
+    return boite_fermer();
 }
 
 
 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();
+    return fin_cadre();
 }
 
 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();
+    return fin_cadre();
 }
 
 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();
+    return fin_cadre();
 }
 
 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();
+    return fin_cadre();
 }
 
 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();
+    return fin_cadre();
 }
 
 function debut_boite_alerte() {
- return debut_cadre('alerte', '', '', '', '', '');
+    return debut_cadre('alerte', '', '', '', '', '');
 }
 
 function fin_boite_alerte() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_boite_info() {
- return debut_cadre('info', '', '', '', '', '');
+    return debut_cadre('info', '', '', '', '', '');
 }
 
 function fin_boite_info() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 /**
@@ -176,17 +176,17 @@ 
  * @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.
 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();
 }
 
 //
@@ -196,18 +196,18 @@ 
 // Fonctions onglets
 // @param string $sous_classe	prend la valeur second pour definir les onglet de deuxieme niveau
 function debut_onglet($classe = 'barre_onglet') {
- return "<div class = '$classe clearfix'><ul>\n";
+    return "<div class = '$classe clearfix'><ul>\n";
 }
 
 function fin_onglet() {
- return "</ul></div>\n";
+    return "</ul></div>\n";
 }
 
 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>';
 }
 
 /**
@@ -239,14 +239,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)) {
-		[$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)) {
+        [$x, $lien, $atts, $texte] = $r;
+        $javascript .= $atts;
+    }
+
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $align", $javascript);
 }
 
 /**
@@ -271,15 +271,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)) {
-		[$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)) {
+        [$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/inc/layer.php

Indentation +109 added lines, -109 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -26,70 +26,70 @@ 
  * @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();
 }
 
 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();
 }
 
 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'>";
 }
 
 function fin_block() {
-	return "<div class='nettoyeur'></div>\n</div>";
+    return "<div class='nettoyeur'></div>\n</div>";
 }
 
 // $texte : texte du bouton
 // $deplie : true (deplie) ou false (plie) ou -1 (inactif) ou 'incertain' pour que le bouton s'auto init au chargement de la page
 // $ids : id des div lies au bouton (facultatif, par defaut c'est le div.bloc_depliable qui suit)
 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'); }});"
+        : '');
 }
 
 //
@@ -97,66 +97,66 @@ 
 //
 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/meta.php

Indentation +197 added lines, -197 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les parametres generaux du site sont dans une table SQL;
@@ -27,51 +27,51 @@ 
 define('_META_CACHE_TIME', 1 << 24);
 
 function inc_meta_dist($table = 'meta') {
-	$new = null;
-	// 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);
+    $new = null;
+    // 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] = [];
-	}
-	// 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] = [];
+    }
+    // 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 + ($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 + ($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
@@ -79,39 +79,39 @@ 
 
 function lire_metas($table = 'meta') {
 
-	if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
-		include_spip('base/abstract_sql');
-		$GLOBALS[$table] = [];
-		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] = [];
+        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 = [];
-			if (isset($GLOBALS['meta']['tables_config'])) {
-				$liste = unserialize($GLOBALS['meta']['tables_config']);
-			}
-			if (!$liste) {
-				$liste = [];
-			}
-			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 = [];
+            if (isset($GLOBALS['meta']['tables_config'])) {
+                $liste = unserialize($GLOBALS['meta']['tables_config']);
+            }
+            if (!$liste) {
+                $liste = [];
+            }
+            if (!in_array($table, $liste)) {
+                $liste[] = $table;
+                ecrire_meta('tables_config', serialize($liste));
+            }
+        }
+    }
 
-	return $GLOBALS[$table] ?? null;
+    return $GLOBALS[$table] ?? null;
 }
 
 
@@ -125,22 +125,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 = $GLOBALS[$table] ?? [];
-		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 = $GLOBALS[$table] ?? [];
+        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));
+    }
 }
 
 /**
@@ -156,21 +156,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 = [];
-	$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 = [];
+    $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;
+    }
 }
 
 /**
@@ -191,53 +191,53 @@ 
  **/
 function ecrire_meta($nom, $valeur, $importable = null, $table = 'meta') {
 
-	static $touch = [];
-	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 = [];
+    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 = ['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 = ['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;
+    }
 }
 
 /**
@@ -249,7 +249,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');
 }
 
 /**
@@ -258,14 +258,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);
 }
 
 /**
@@ -277,47 +277,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/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
@@ -25,63 +25,63 @@ 
  */
 
 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);
+    }
 }
 
 function json_export($var) {
-	$var = json_encode($var, JSON_THROW_ON_ERROR);
+    $var = json_encode($var, JSON_THROW_ON_ERROR);
 
-	// 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;
+    }
 }