spip / SPIP

ecrire/urls/page.php

Indentation +51 added lines, -51 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('URLS_PAGE_EXEMPLE', 'spip.php?article12');
@@ -30,68 +30,68 @@ 
 // https://code.spip.net/@_generer_url_page
 function _generer_url_page($type, $id, $args = '', $ancre = '') {
 
-	if ($generer_url_externe = charger_fonction("generer_url_$type", 'urls', true)) {
-		$url = $generer_url_externe($id, $args, $ancre);
-		if (null != $url) {
-			return $url;
-		}
-	}
+    if ($generer_url_externe = charger_fonction("generer_url_$type", 'urls', true)) {
+        $url = $generer_url_externe($id, $args, $ancre);
+        if (null != $url) {
+            return $url;
+        }
+    }
 
-	$url = \_DEBUT_URLS_PAGE . $type . \_SEPARATEUR_URLS_PAGE
-		. $id . \_TERMINAISON_URLS_PAGE;
+    $url = \_DEBUT_URLS_PAGE . $type . \_SEPARATEUR_URLS_PAGE
+        . $id . \_TERMINAISON_URLS_PAGE;
 
-	if ($args) {
-		$args = strpos($url, '?') ? "&$args" : "?$args";
-	}
+    if ($args) {
+        $args = strpos($url, '?') ? "&$args" : "?$args";
+    }
 
-	return _DIR_RACINE . $url . $args . ($ancre ? "#$ancre" : '');
+    return _DIR_RACINE . $url . $args . ($ancre ? "#$ancre" : '');
 }
 
 // retrouve le fond et les parametres d'une URL abregee
 // le contexte deja existant est fourni dans args sous forme de tableau ou query string
 // https://code.spip.net/@urls_page_dist
 function urls_page_dist($i, &$entite, $args = '', $ancre = '') {
-	if (is_numeric($i)) {
-		return _generer_url_page($entite, $i, $args, $ancre);
-	}
-
-	// traiter les injections du type domaine.org/spip.php/cestnimportequoi/ou/encore/plus/rubrique23
-	if ($GLOBALS['profondeur_url'] > 0 and $entite == 'sommaire') {
-		return [[], '404'];
-	}
-
-	// voir s'il faut recuperer le id_* implicite et les &debut_xx;
-	if (is_array($args)) {
-		$contexte = $args;
-	} else {
-		parse_str($args, $contexte);
-	}
-	include_spip('inc/urls');
-	$r = nettoyer_url_page($i, $contexte);
-	if ($r) {
-		array_pop($r); // nettoyer_url_page renvoie un argument de plus inutile ici
-		return $r;
-	}
-
-	/*
+    if (is_numeric($i)) {
+        return _generer_url_page($entite, $i, $args, $ancre);
+    }
+
+    // traiter les injections du type domaine.org/spip.php/cestnimportequoi/ou/encore/plus/rubrique23
+    if ($GLOBALS['profondeur_url'] > 0 and $entite == 'sommaire') {
+        return [[], '404'];
+    }
+
+    // voir s'il faut recuperer le id_* implicite et les &debut_xx;
+    if (is_array($args)) {
+        $contexte = $args;
+    } else {
+        parse_str($args, $contexte);
+    }
+    include_spip('inc/urls');
+    $r = nettoyer_url_page($i, $contexte);
+    if ($r) {
+        array_pop($r); // nettoyer_url_page renvoie un argument de plus inutile ici
+        return $r;
+    }
+
+    /*
 	 * Le bloc qui suit sert a faciliter les transitions depuis
 	 * le mode 'urls-propres' vers les modes 'urls-standard' et 'url-html'
 	 * Il est inutile de le recopier si vous personnalisez vos URLs
 	 * et votre .htaccess
 	 */
-	// Si on est revenu en mode html, mais c'est une ancienne url_propre
-	// on ne redirige pas, on assume le nouveau contexte (si possible)
-	$url = $i;
-	$url_propre = $url ?? $_SERVER['REDIRECT_url_propre'] ?? $_ENV['url_propre'] ?? '';
-
-	if ($url_propre) {
-		if ($GLOBALS['profondeur_url'] <= 0) {
-			$urls_anciennes = charger_fonction('propres', 'urls', true);
-		} else {
-			$urls_anciennes = charger_fonction('arbo', 'urls', true);
-		}
-
-		return $urls_anciennes ? $urls_anciennes($url_propre, $entite, $contexte) : '';
-	}
-	/* Fin du bloc compatibilite url-propres */
+    // Si on est revenu en mode html, mais c'est une ancienne url_propre
+    // on ne redirige pas, on assume le nouveau contexte (si possible)
+    $url = $i;
+    $url_propre = $url ?? $_SERVER['REDIRECT_url_propre'] ?? $_ENV['url_propre'] ?? '';
+
+    if ($url_propre) {
+        if ($GLOBALS['profondeur_url'] <= 0) {
+            $urls_anciennes = charger_fonction('propres', 'urls', true);
+        } else {
+            $urls_anciennes = charger_fonction('arbo', 'urls', true);
+        }
+
+        return $urls_anciennes ? $urls_anciennes($url_propre, $entite, $contexte) : '';
+    }
+    /* Fin du bloc compatibilite url-propres */
 }

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/objets.php

Indentation +1256 added lines, -1256 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -32,11 +32,11 @@ 
  * @return void
  **/
 function array_set_merge(&$table, $index, $valeur) {
-	if (!isset($table[$index])) {
-		$table[$index] = $valeur;
-	} else {
-		$table[$index] = array_merge($table[$index], $valeur);
-	}
+    if (!isset($table[$index])) {
+        $table[$index] = $valeur;
+    } else {
+        $table[$index] = array_merge($table[$index], $valeur);
+    }
 }
 
 /**
@@ -53,440 +53,440 @@ 
  * @return array|bool
  */
 function lister_tables_objets_sql(?string $table_sql = null, $desc = []) {
-	static $deja_la = false;
-	static $infos_tables = null;
-	static $md5 = null;
-	static $plugin_hash = null;
-
-	// plugins hash connu ? non si _CACHE_PLUGINS_OPT est pas encore chargé.
-	$_PLUGINS_HASH = defined('_PLUGINS_HASH') ? _PLUGINS_HASH : '!_CACHE_PLUGINS_OPT';
-
-	// prealablement recuperer les tables_principales
-	if (is_null($infos_tables) or $plugin_hash !== $_PLUGINS_HASH) {
-		// pas de reentrance (cas base/serial)
-		if ($deja_la) {
-			spip_log('Re-entrance anormale sur lister_tables_objets_sql : '
-				. var_export(debug_backtrace(), true), _LOG_CRITIQUE);
-
-			return ($table_sql === '::md5' ? $md5 : []);
-		}
-		$deja_la = true;
-		$plugin_hash = $_PLUGINS_HASH; // avant de lancer les pipelines
-
-		// recuperer les declarations explicites ancienne mode
-		// qui servent a completer declarer_tables_objets_sql
-		base_serial($GLOBALS['tables_principales']);
-		base_auxiliaires($GLOBALS['tables_auxiliaires']);
-		$infos_tables = [
-			'spip_articles' => [
-				'page' => 'article',
-				'texte_retour' => 'icone_retour_article',
-				'texte_modifier' => 'icone_modifier_article',
-				'texte_creer' => 'icone_ecrire_article',
-				'texte_objets' => 'public:articles',
-				'texte_objet' => 'public:article',
-				'texte_signale_edition' => 'texte_travail_article',
-				'info_aucun_objet' => 'info_aucun_article',
-				'info_1_objet' => 'info_1_article',
-				'info_nb_objets' => 'info_nb_articles',
-				'texte_logo_objet' => 'logo_article',
-				'texte_langue_objet' => 'titre_langue_article',
-				'texte_definir_comme_traduction_objet' => 'trad_lier',
-				'titre' => 'titre, lang',
-				'date' => 'date',
-				'principale' => 'oui',
-				'introduction_longueur' => '500',
-				'champs_editables' => [
-					'surtitre',
-					'titre',
-					'soustitre',
-					'descriptif',
-					'nom_site',
-					'url_site',
-					'chapo',
-					'texte',
-					'ps',
-					'virtuel'
-				],
-				'champs_versionnes' => [
-					'id_rubrique',
-					'surtitre',
-					'titre',
-					'soustitre',
-					'jointure_auteurs',
-					'descriptif',
-					'nom_site',
-					'url_site',
-					'chapo',
-					'texte',
-					'ps'
-				],
-				'field' => [
-					'id_article' => 'bigint(21) NOT NULL',
-					'surtitre' => "text DEFAULT '' NOT NULL",
-					'titre' => "text DEFAULT '' NOT NULL",
-					'soustitre' => "text DEFAULT '' NOT NULL",
-					'id_rubrique' => "bigint(21) DEFAULT '0' NOT NULL",
-					'descriptif' => "text DEFAULT '' NOT NULL",
-					'chapo' => "mediumtext DEFAULT '' NOT NULL",
-					'texte' => "longtext DEFAULT '' NOT NULL",
-					'ps' => "mediumtext DEFAULT '' NOT NULL",
-					'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'statut' => "varchar(10) DEFAULT '0' NOT NULL",
-					'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'export' => "VARCHAR(10) DEFAULT 'oui'",
-					'date_redac' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'visites' => "integer DEFAULT '0' NOT NULL",
-					'referers' => "integer DEFAULT '0' NOT NULL",
-					'popularite' => "DOUBLE DEFAULT '0' NOT NULL",
-					'accepter_forum' => "CHAR(3) DEFAULT '' NOT NULL",
-					'date_modif' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
-					'id_trad' => "bigint(21) DEFAULT '0' NOT NULL",
-					'nom_site' => "tinytext DEFAULT '' NOT NULL",
-					'url_site' => "text DEFAULT '' NOT NULL",
-					'virtuel' => "text DEFAULT '' NOT NULL",
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_article',
-					'KEY id_rubrique' => 'id_rubrique',
-					'KEY id_secteur' => 'id_secteur',
-					'KEY id_trad' => 'id_trad',
-					'KEY lang' => 'lang',
-					'KEY statut' => 'statut, date',
-				],
-				'join' => [
-					'id_article' => 'id_article',
-					'id_rubrique' => 'id_rubrique'
-				],
-				'parent' => [
-					['type' => 'rubrique', 'champ' => 'id_rubrique']
-				],
-				'rechercher_champs' => [
-					'surtitre' => 5,
-					'titre' => 8,
-					'soustitre' => 5,
-					'chapo' => 3,
-					'texte' => 1,
-					'ps' => 1,
-					'nom_site' => 1,
-					'url_site' => 1,
-					'descriptif' => 4
-				],
-				'rechercher_jointures' => [
-					'auteur' => ['nom' => 10],
-				],
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => 'publie',
-						'previsu' => 'publie,prop,prepa/auteur',
-						'post_date' => 'date',
-						'exception' => ['statut', 'tout']
-					]
-				],
-				'statut_titres' => [
-					'prepa' => 'info_article_redaction',
-					'prop' => 'info_article_propose',
-					'publie' => 'info_article_publie',
-					'refuse' => 'info_article_refuse',
-					'poubelle' => 'info_article_supprime'
-				],
-				'statut_textes_instituer' => [
-					'prepa' => 'texte_statut_en_cours_redaction',
-					'prop' => 'texte_statut_propose_evaluation',
-					'publie' => 'texte_statut_publie',
-					'refuse' => 'texte_statut_refuse',
-					'poubelle' => 'texte_statut_poubelle',
-				],
-				'texte_changer_statut' => 'texte_article_statut',
-				'aide_changer_statut' => 'artstatut',
-				'tables_jointures' => [
-					'profondeur' => 'rubriques',
-					#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			'spip_auteurs' => [
-				'page' => 'auteur',
-				'texte_retour' => 'icone_retour',
-				'texte_ajouter' => 'titre_ajouter_un_auteur',
-				'texte_modifier' => 'admin_modifier_auteur',
-				'texte_objets' => 'icone_auteurs',
-				'texte_objet' => 'public:auteur',
-				'info_aucun_objet' => 'info_aucun_auteur',
-				'info_1_objet' => 'info_1_auteur',
-				'info_nb_objets' => 'info_nb_auteurs',
-				'texte_logo_objet' => 'logo_auteur',
-				'texte_creer_associer' => 'creer_et_associer_un_auteur',
-				'titre' => "nom AS titre, '' AS lang",
-				'date' => 'date',
-				'principale' => 'oui',
-				'champs_editables' => ['nom', 'email', 'bio', 'nom_site', 'url_site', 'imessage', 'pgp'],
-				'champs_versionnes' => ['nom', 'bio', 'email', 'nom_site', 'url_site', 'login'],
-				'field' => [
-					'id_auteur' => 'bigint(21) NOT NULL',
-					'nom' => "text DEFAULT '' NOT NULL",
-					'bio' => "text DEFAULT '' NOT NULL",
-					'email' => "tinytext DEFAULT '' NOT NULL",
-					'nom_site' => "tinytext DEFAULT '' NOT NULL",
-					'url_site' => "text DEFAULT '' NOT NULL",
-					'login' => 'VARCHAR(255) BINARY',
-					'pass' => "tinytext DEFAULT '' NOT NULL",
-					'low_sec' => "tinytext DEFAULT '' NOT NULL",
-					'statut' => "varchar(255)  DEFAULT '0' NOT NULL",
-					'webmestre' => "varchar(3)  DEFAULT 'non' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'pgp' => "TEXT DEFAULT '' NOT NULL",
-					'htpass' => "tinytext DEFAULT '' NOT NULL",
-					'en_ligne' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'alea_actuel' => 'tinytext',
-					'alea_futur' => 'tinytext',
-					'prefs' => 'text',
-					'cookie_oubli' => 'tinytext',
-					'source' => "VARCHAR(10) DEFAULT 'spip' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'imessage' => "VARCHAR(3) DEFAULT '' NOT NULL"
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_auteur',
-					'KEY login' => 'login',
-					'KEY statut' => 'statut',
-					'KEY en_ligne' => 'en_ligne',
-				],
-				'join' => [
-					'id_auteur' => 'id_auteur',
-					'login' => 'login'
-				],
-				'rechercher_champs' => [
-					'nom' => 5,
-					'bio' => 1,
-					'email' => 1,
-					'nom_site' => 1,
-					'url_site' => 1,
-					'login' => 1
-				],
-				// 2 conditions pour les auteurs : statut!=poubelle,
-				// et avoir des articles publies
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => '!5poubelle',
-						'previsu' => '!5poubelle',
-						'exception' => 'statut'
-					],
-					[
-						'champ' => [
-							['spip_auteurs_liens', 'id_auteur'],
-							[
-								'spip_articles',
-								['id_objet', 'id_article', 'objet', 'article']
-							],
-							'statut'
-						],
-						'publie' => 'publie',
-						'previsu' => '!',
-						'post_date' => 'date',
-						'exception' => ['statut', 'lien', 'tout']
-					],
-				],
-				'statut_images' => [
-					'auteur-6forum-16.png',
-					'0minirezo' => 'auteur-0minirezo-16.png',
-					'1comite' => 'auteur-1comite-16.png',
-					'6forum' => 'auteur-6forum-16.png',
-					'5poubelle' => 'auteur-5poubelle-16.png',
-					'nouveau' => ''
-				],
-				'statut_titres' => [
-					'titre_image_visiteur',
-					'0minirezo' => 'titre_image_administrateur',
-					'1comite' => 'titre_image_redacteur_02',
-					'6forum' => 'titre_image_visiteur',
-					'5poubelle' => 'titre_image_auteur_supprime',
-				],
-				'tables_jointures' => [#'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			'spip_rubriques' => [
-				'page' => 'rubrique',
-				'url_voir' => 'rubrique',
-				'url_edit' => 'rubrique_edit',
-				'texte_retour' => 'icone_retour',
-				'texte_objets' => 'public:rubriques',
-				'texte_objet' => 'public:rubrique',
-				'texte_modifier' => 'icone_modifier_rubrique',
-				'texte_creer' => 'icone_creer_rubrique',
-				'texte_ajouter' => 'titre_ajouter_une_rubrique',
-				'texte_creer_associer' => 'creer_et_associer_une_rubrique',
-				'info_aucun_objet' => 'info_aucun_rubrique',
-				'info_1_objet' => 'info_1_rubrique',
-				'info_nb_objets' => 'info_nb_rubriques',
-				'texte_logo_objet' => 'logo_rubrique',
-				'texte_langue_objet' => 'titre_langue_rubrique',
-				'texte_definir_comme_traduction_objet' => 'texte_definir_comme_traduction_rubrique',
-				'titre' => 'titre, lang',
-				'date' => 'date',
-				'principale' => 'oui',
-				'introduction_longueur' => '600',
-				'champs_editables' => ['titre', 'texte', 'descriptif', 'extra'],
-				'champs_versionnes' => ['titre', 'descriptif', 'texte'],
-				'field' => [
-					'id_rubrique' => 'bigint(21) NOT NULL',
-					'id_parent' => "bigint(21) DEFAULT '0' NOT NULL",
-					'titre' => "text DEFAULT '' NOT NULL",
-					'descriptif' => "text DEFAULT '' NOT NULL",
-					'texte' => "longtext DEFAULT '' NOT NULL",
-					'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
-					'maj' => 'TIMESTAMP',
-					'statut' => "varchar(10) DEFAULT '0' NOT NULL",
-					'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
-					'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
-					'statut_tmp' => "varchar(10) DEFAULT '0' NOT NULL",
-					'date_tmp' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
-					'profondeur' => "smallint(5) DEFAULT '0' NOT NULL"
-				],
-				'key' => [
-					'PRIMARY KEY' => 'id_rubrique',
-					'KEY lang' => 'lang',
-					'KEY id_parent' => 'id_parent',
-				],
-				'parent' => [
-					['type' => 'rubrique', 'champ' => 'id_parent']
-				],
-				'rechercher_champs' => [
-					'titre' => 8,
-					'descriptif' => 5,
-					'texte' => 1
-				],
-				'statut' => [
-					[
-						'champ' => 'statut',
-						'publie' => 'publie',
-						'previsu' => '!',
-						'exception' => ['statut', 'tout']
-					],
-				],
-				'tables_jointures' => [#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
-				],
-			],
-			// toutes les tables ont le droit a une jointure sur les auteurs
-			['tables_jointures' => ['id_auteur' => 'auteurs_liens']]
-		];
-
-		// avant d'appeller les pipeline qui peuvent generer une reentrance a l'install
-		// initialiser la signature
-		$md5 = md5(serialize($infos_tables));
-
-		$GLOBALS['tables_principales'] = pipeline('declarer_tables_principales', $GLOBALS['tables_principales']);
-		$GLOBALS['tables_auxiliaires'] = pipeline('declarer_tables_auxiliaires', $GLOBALS['tables_auxiliaires']);
-		$infos_tables = pipeline('declarer_tables_objets_sql', $infos_tables);
-
-		// completer les informations manquantes ou implicites
-		$all = [];
-		foreach (array_keys($infos_tables) as $t) {
-			// les cles numeriques servent a declarer
-			// les proprietes applicables a tous les objets
-			// on les mets de cote
-			if (is_numeric($t)) {
-				$all = array_merge_recursive($all, $infos_tables[$t]);
-				unset($infos_tables[$t]);
-			} else {
-				$infos_tables[$t] = renseigner_table_objet_sql($t, $infos_tables[$t]);
-			}
-		}
-
-		// repercuter les proprietes generales communes a tous les objets
-		foreach (array_keys($infos_tables) as $t) {
-			foreach ($all as $i => $v) {
-				if (in_array($i, ['tables_jointures', 'champs_versionnes'])) {
-					$add = $all[$i];
-					// eviter les doublons de declaration de table jointure (ex des mots sur auteurs)
-					// pour les declarations generiques avec cles numeriques
-					if ($i == 'tables_jointures' and isset($infos_tables[$t][$i]) and is_countable($infos_tables[$t][$i]) ? count($infos_tables[$t][$i]) : 0) {
-						$doublons = array_intersect($infos_tables[$t][$i], $add);
-						foreach ($doublons as $d) {
-							if (
-								is_numeric(array_search($d, $infos_tables[$t][$i]))
-								and is_numeric($k = array_search($d, $add))
-							) {
-								unset($add[$k]);
-							}
-						}
-					}
-					$infos_tables[$t][$i] = array_merge($infos_tables[$t][$i] ?? [], $add);
-				} else {
-					$infos_tables[$t][$i] = array_merge_recursive(
-						$infos_tables[$t][$i] ?? [],
-						$all[$i]
-					);
-				}
-			}
-		}
-
-		// completer les tables principales et auxiliaires
-		// avec celles declarees uniquement dans declarer_table_objets_sql
-		// pour assurer la compat en transition
-		foreach ($infos_tables as $table => $infos) {
-			$principale_ou_auxiliaire = ($infos['principale'] ? 'tables_principales' : 'tables_auxiliaires');
-			// memoriser des champs eventuels declares par des plugins dans le pipeline tables_xxx
-			// qui a ete appelle avant
-			$mem = ($GLOBALS[$principale_ou_auxiliaire][$table] ?? []);
-			// l'ajouter au tableau
-			$GLOBALS[$principale_ou_auxiliaire][$table] = [];
-			if (isset($infos['field']) and isset($infos['key'])) {
-				foreach (['field', 'key', 'join'] as $k) {
-					if (isset($infos_tables[$table][$k])) {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = &$infos_tables[$table][$k];
-					}
-				}
-			} else {
-				// ici on ne renvoie que les declarations, donc RIEN
-				// pour avoir la vrai description en base, il faut passer par trouver_table
-				$GLOBALS[$principale_ou_auxiliaire][$table] = [];
-			}
-			if (is_countable($mem) ? count($mem) : 0) {
-				foreach (array_keys($mem) as $k) {
-					if (isset($GLOBALS[$principale_ou_auxiliaire][$table][$k])) {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = array_merge(
-							$GLOBALS[$principale_ou_auxiliaire][$table][$k],
-							$mem[$k]
-						);
-					} else {
-						$GLOBALS[$principale_ou_auxiliaire][$table][$k] = $mem[$k];
-					}
-				}
-			}
-		}
-
-		// recuperer les interfaces (table_titre, table_date)
-		// on ne le fait que dans un second temps pour que table_objet soit fonctionnel
-		// dans le pipeline de declarer_tables_interfaces
-		include_spip('public/interfaces');
-		foreach (array_keys($infos_tables) as $t) {
-			$infos_tables[$t] = renseigner_table_objet_interfaces($t, $infos_tables[$t]);
-		}
-
-		$deja_la = false;
-		// signature
-		$md5 = md5(serialize($infos_tables));
-	}
-	if ($table_sql === '::md5') {
-		return $md5;
-	}
-	if ($table_sql and !isset($infos_tables[$table_sql])) {
-		#$desc = renseigner_table_objet_sql($table_sql,$desc);
-		$desc = renseigner_table_objet_interfaces($table_sql, $desc);
-
-		return $desc;
-	}
-	if ($table_sql) {
-		return $infos_tables[$table_sql] ?? [];
-	}
-
-	return $infos_tables;
+    static $deja_la = false;
+    static $infos_tables = null;
+    static $md5 = null;
+    static $plugin_hash = null;
+
+    // plugins hash connu ? non si _CACHE_PLUGINS_OPT est pas encore chargé.
+    $_PLUGINS_HASH = defined('_PLUGINS_HASH') ? _PLUGINS_HASH : '!_CACHE_PLUGINS_OPT';
+
+    // prealablement recuperer les tables_principales
+    if (is_null($infos_tables) or $plugin_hash !== $_PLUGINS_HASH) {
+        // pas de reentrance (cas base/serial)
+        if ($deja_la) {
+            spip_log('Re-entrance anormale sur lister_tables_objets_sql : '
+                . var_export(debug_backtrace(), true), _LOG_CRITIQUE);
+
+            return ($table_sql === '::md5' ? $md5 : []);
+        }
+        $deja_la = true;
+        $plugin_hash = $_PLUGINS_HASH; // avant de lancer les pipelines
+
+        // recuperer les declarations explicites ancienne mode
+        // qui servent a completer declarer_tables_objets_sql
+        base_serial($GLOBALS['tables_principales']);
+        base_auxiliaires($GLOBALS['tables_auxiliaires']);
+        $infos_tables = [
+            'spip_articles' => [
+                'page' => 'article',
+                'texte_retour' => 'icone_retour_article',
+                'texte_modifier' => 'icone_modifier_article',
+                'texte_creer' => 'icone_ecrire_article',
+                'texte_objets' => 'public:articles',
+                'texte_objet' => 'public:article',
+                'texte_signale_edition' => 'texte_travail_article',
+                'info_aucun_objet' => 'info_aucun_article',
+                'info_1_objet' => 'info_1_article',
+                'info_nb_objets' => 'info_nb_articles',
+                'texte_logo_objet' => 'logo_article',
+                'texte_langue_objet' => 'titre_langue_article',
+                'texte_definir_comme_traduction_objet' => 'trad_lier',
+                'titre' => 'titre, lang',
+                'date' => 'date',
+                'principale' => 'oui',
+                'introduction_longueur' => '500',
+                'champs_editables' => [
+                    'surtitre',
+                    'titre',
+                    'soustitre',
+                    'descriptif',
+                    'nom_site',
+                    'url_site',
+                    'chapo',
+                    'texte',
+                    'ps',
+                    'virtuel'
+                ],
+                'champs_versionnes' => [
+                    'id_rubrique',
+                    'surtitre',
+                    'titre',
+                    'soustitre',
+                    'jointure_auteurs',
+                    'descriptif',
+                    'nom_site',
+                    'url_site',
+                    'chapo',
+                    'texte',
+                    'ps'
+                ],
+                'field' => [
+                    'id_article' => 'bigint(21) NOT NULL',
+                    'surtitre' => "text DEFAULT '' NOT NULL",
+                    'titre' => "text DEFAULT '' NOT NULL",
+                    'soustitre' => "text DEFAULT '' NOT NULL",
+                    'id_rubrique' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'descriptif' => "text DEFAULT '' NOT NULL",
+                    'chapo' => "mediumtext DEFAULT '' NOT NULL",
+                    'texte' => "longtext DEFAULT '' NOT NULL",
+                    'ps' => "mediumtext DEFAULT '' NOT NULL",
+                    'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'statut' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'export' => "VARCHAR(10) DEFAULT 'oui'",
+                    'date_redac' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'visites' => "integer DEFAULT '0' NOT NULL",
+                    'referers' => "integer DEFAULT '0' NOT NULL",
+                    'popularite' => "DOUBLE DEFAULT '0' NOT NULL",
+                    'accepter_forum' => "CHAR(3) DEFAULT '' NOT NULL",
+                    'date_modif' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
+                    'id_trad' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'nom_site' => "tinytext DEFAULT '' NOT NULL",
+                    'url_site' => "text DEFAULT '' NOT NULL",
+                    'virtuel' => "text DEFAULT '' NOT NULL",
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_article',
+                    'KEY id_rubrique' => 'id_rubrique',
+                    'KEY id_secteur' => 'id_secteur',
+                    'KEY id_trad' => 'id_trad',
+                    'KEY lang' => 'lang',
+                    'KEY statut' => 'statut, date',
+                ],
+                'join' => [
+                    'id_article' => 'id_article',
+                    'id_rubrique' => 'id_rubrique'
+                ],
+                'parent' => [
+                    ['type' => 'rubrique', 'champ' => 'id_rubrique']
+                ],
+                'rechercher_champs' => [
+                    'surtitre' => 5,
+                    'titre' => 8,
+                    'soustitre' => 5,
+                    'chapo' => 3,
+                    'texte' => 1,
+                    'ps' => 1,
+                    'nom_site' => 1,
+                    'url_site' => 1,
+                    'descriptif' => 4
+                ],
+                'rechercher_jointures' => [
+                    'auteur' => ['nom' => 10],
+                ],
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => 'publie',
+                        'previsu' => 'publie,prop,prepa/auteur',
+                        'post_date' => 'date',
+                        'exception' => ['statut', 'tout']
+                    ]
+                ],
+                'statut_titres' => [
+                    'prepa' => 'info_article_redaction',
+                    'prop' => 'info_article_propose',
+                    'publie' => 'info_article_publie',
+                    'refuse' => 'info_article_refuse',
+                    'poubelle' => 'info_article_supprime'
+                ],
+                'statut_textes_instituer' => [
+                    'prepa' => 'texte_statut_en_cours_redaction',
+                    'prop' => 'texte_statut_propose_evaluation',
+                    'publie' => 'texte_statut_publie',
+                    'refuse' => 'texte_statut_refuse',
+                    'poubelle' => 'texte_statut_poubelle',
+                ],
+                'texte_changer_statut' => 'texte_article_statut',
+                'aide_changer_statut' => 'artstatut',
+                'tables_jointures' => [
+                    'profondeur' => 'rubriques',
+                    #'id_auteur' => 'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            'spip_auteurs' => [
+                'page' => 'auteur',
+                'texte_retour' => 'icone_retour',
+                'texte_ajouter' => 'titre_ajouter_un_auteur',
+                'texte_modifier' => 'admin_modifier_auteur',
+                'texte_objets' => 'icone_auteurs',
+                'texte_objet' => 'public:auteur',
+                'info_aucun_objet' => 'info_aucun_auteur',
+                'info_1_objet' => 'info_1_auteur',
+                'info_nb_objets' => 'info_nb_auteurs',
+                'texte_logo_objet' => 'logo_auteur',
+                'texte_creer_associer' => 'creer_et_associer_un_auteur',
+                'titre' => "nom AS titre, '' AS lang",
+                'date' => 'date',
+                'principale' => 'oui',
+                'champs_editables' => ['nom', 'email', 'bio', 'nom_site', 'url_site', 'imessage', 'pgp'],
+                'champs_versionnes' => ['nom', 'bio', 'email', 'nom_site', 'url_site', 'login'],
+                'field' => [
+                    'id_auteur' => 'bigint(21) NOT NULL',
+                    'nom' => "text DEFAULT '' NOT NULL",
+                    'bio' => "text DEFAULT '' NOT NULL",
+                    'email' => "tinytext DEFAULT '' NOT NULL",
+                    'nom_site' => "tinytext DEFAULT '' NOT NULL",
+                    'url_site' => "text DEFAULT '' NOT NULL",
+                    'login' => 'VARCHAR(255) BINARY',
+                    'pass' => "tinytext DEFAULT '' NOT NULL",
+                    'low_sec' => "tinytext DEFAULT '' NOT NULL",
+                    'statut' => "varchar(255)  DEFAULT '0' NOT NULL",
+                    'webmestre' => "varchar(3)  DEFAULT 'non' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'pgp' => "TEXT DEFAULT '' NOT NULL",
+                    'htpass' => "tinytext DEFAULT '' NOT NULL",
+                    'en_ligne' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'alea_actuel' => 'tinytext',
+                    'alea_futur' => 'tinytext',
+                    'prefs' => 'text',
+                    'cookie_oubli' => 'tinytext',
+                    'source' => "VARCHAR(10) DEFAULT 'spip' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'imessage' => "VARCHAR(3) DEFAULT '' NOT NULL"
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_auteur',
+                    'KEY login' => 'login',
+                    'KEY statut' => 'statut',
+                    'KEY en_ligne' => 'en_ligne',
+                ],
+                'join' => [
+                    'id_auteur' => 'id_auteur',
+                    'login' => 'login'
+                ],
+                'rechercher_champs' => [
+                    'nom' => 5,
+                    'bio' => 1,
+                    'email' => 1,
+                    'nom_site' => 1,
+                    'url_site' => 1,
+                    'login' => 1
+                ],
+                // 2 conditions pour les auteurs : statut!=poubelle,
+                // et avoir des articles publies
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => '!5poubelle',
+                        'previsu' => '!5poubelle',
+                        'exception' => 'statut'
+                    ],
+                    [
+                        'champ' => [
+                            ['spip_auteurs_liens', 'id_auteur'],
+                            [
+                                'spip_articles',
+                                ['id_objet', 'id_article', 'objet', 'article']
+                            ],
+                            'statut'
+                        ],
+                        'publie' => 'publie',
+                        'previsu' => '!',
+                        'post_date' => 'date',
+                        'exception' => ['statut', 'lien', 'tout']
+                    ],
+                ],
+                'statut_images' => [
+                    'auteur-6forum-16.png',
+                    '0minirezo' => 'auteur-0minirezo-16.png',
+                    '1comite' => 'auteur-1comite-16.png',
+                    '6forum' => 'auteur-6forum-16.png',
+                    '5poubelle' => 'auteur-5poubelle-16.png',
+                    'nouveau' => ''
+                ],
+                'statut_titres' => [
+                    'titre_image_visiteur',
+                    '0minirezo' => 'titre_image_administrateur',
+                    '1comite' => 'titre_image_redacteur_02',
+                    '6forum' => 'titre_image_visiteur',
+                    '5poubelle' => 'titre_image_auteur_supprime',
+                ],
+                'tables_jointures' => [#'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            'spip_rubriques' => [
+                'page' => 'rubrique',
+                'url_voir' => 'rubrique',
+                'url_edit' => 'rubrique_edit',
+                'texte_retour' => 'icone_retour',
+                'texte_objets' => 'public:rubriques',
+                'texte_objet' => 'public:rubrique',
+                'texte_modifier' => 'icone_modifier_rubrique',
+                'texte_creer' => 'icone_creer_rubrique',
+                'texte_ajouter' => 'titre_ajouter_une_rubrique',
+                'texte_creer_associer' => 'creer_et_associer_une_rubrique',
+                'info_aucun_objet' => 'info_aucun_rubrique',
+                'info_1_objet' => 'info_1_rubrique',
+                'info_nb_objets' => 'info_nb_rubriques',
+                'texte_logo_objet' => 'logo_rubrique',
+                'texte_langue_objet' => 'titre_langue_rubrique',
+                'texte_definir_comme_traduction_objet' => 'texte_definir_comme_traduction_rubrique',
+                'titre' => 'titre, lang',
+                'date' => 'date',
+                'principale' => 'oui',
+                'introduction_longueur' => '600',
+                'champs_editables' => ['titre', 'texte', 'descriptif', 'extra'],
+                'champs_versionnes' => ['titre', 'descriptif', 'texte'],
+                'field' => [
+                    'id_rubrique' => 'bigint(21) NOT NULL',
+                    'id_parent' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'titre' => "text DEFAULT '' NOT NULL",
+                    'descriptif' => "text DEFAULT '' NOT NULL",
+                    'texte' => "longtext DEFAULT '' NOT NULL",
+                    'id_secteur' => "bigint(21) DEFAULT '0' NOT NULL",
+                    'maj' => 'TIMESTAMP',
+                    'statut' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'lang' => "VARCHAR(10) DEFAULT '' NOT NULL",
+                    'langue_choisie' => "VARCHAR(3) DEFAULT 'non'",
+                    'statut_tmp' => "varchar(10) DEFAULT '0' NOT NULL",
+                    'date_tmp' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
+                    'profondeur' => "smallint(5) DEFAULT '0' NOT NULL"
+                ],
+                'key' => [
+                    'PRIMARY KEY' => 'id_rubrique',
+                    'KEY lang' => 'lang',
+                    'KEY id_parent' => 'id_parent',
+                ],
+                'parent' => [
+                    ['type' => 'rubrique', 'champ' => 'id_parent']
+                ],
+                'rechercher_champs' => [
+                    'titre' => 8,
+                    'descriptif' => 5,
+                    'texte' => 1
+                ],
+                'statut' => [
+                    [
+                        'champ' => 'statut',
+                        'publie' => 'publie',
+                        'previsu' => '!',
+                        'exception' => ['statut', 'tout']
+                    ],
+                ],
+                'tables_jointures' => [#'id_auteur' => 'auteurs_liens' // declaration generique plus bas
+                ],
+            ],
+            // toutes les tables ont le droit a une jointure sur les auteurs
+            ['tables_jointures' => ['id_auteur' => 'auteurs_liens']]
+        ];
+
+        // avant d'appeller les pipeline qui peuvent generer une reentrance a l'install
+        // initialiser la signature
+        $md5 = md5(serialize($infos_tables));
+
+        $GLOBALS['tables_principales'] = pipeline('declarer_tables_principales', $GLOBALS['tables_principales']);
+        $GLOBALS['tables_auxiliaires'] = pipeline('declarer_tables_auxiliaires', $GLOBALS['tables_auxiliaires']);
+        $infos_tables = pipeline('declarer_tables_objets_sql', $infos_tables);
+
+        // completer les informations manquantes ou implicites
+        $all = [];
+        foreach (array_keys($infos_tables) as $t) {
+            // les cles numeriques servent a declarer
+            // les proprietes applicables a tous les objets
+            // on les mets de cote
+            if (is_numeric($t)) {
+                $all = array_merge_recursive($all, $infos_tables[$t]);
+                unset($infos_tables[$t]);
+            } else {
+                $infos_tables[$t] = renseigner_table_objet_sql($t, $infos_tables[$t]);
+            }
+        }
+
+        // repercuter les proprietes generales communes a tous les objets
+        foreach (array_keys($infos_tables) as $t) {
+            foreach ($all as $i => $v) {
+                if (in_array($i, ['tables_jointures', 'champs_versionnes'])) {
+                    $add = $all[$i];
+                    // eviter les doublons de declaration de table jointure (ex des mots sur auteurs)
+                    // pour les declarations generiques avec cles numeriques
+                    if ($i == 'tables_jointures' and isset($infos_tables[$t][$i]) and is_countable($infos_tables[$t][$i]) ? count($infos_tables[$t][$i]) : 0) {
+                        $doublons = array_intersect($infos_tables[$t][$i], $add);
+                        foreach ($doublons as $d) {
+                            if (
+                                is_numeric(array_search($d, $infos_tables[$t][$i]))
+                                and is_numeric($k = array_search($d, $add))
+                            ) {
+                                unset($add[$k]);
+                            }
+                        }
+                    }
+                    $infos_tables[$t][$i] = array_merge($infos_tables[$t][$i] ?? [], $add);
+                } else {
+                    $infos_tables[$t][$i] = array_merge_recursive(
+                        $infos_tables[$t][$i] ?? [],
+                        $all[$i]
+                    );
+                }
+            }
+        }
+
+        // completer les tables principales et auxiliaires
+        // avec celles declarees uniquement dans declarer_table_objets_sql
+        // pour assurer la compat en transition
+        foreach ($infos_tables as $table => $infos) {
+            $principale_ou_auxiliaire = ($infos['principale'] ? 'tables_principales' : 'tables_auxiliaires');
+            // memoriser des champs eventuels declares par des plugins dans le pipeline tables_xxx
+            // qui a ete appelle avant
+            $mem = ($GLOBALS[$principale_ou_auxiliaire][$table] ?? []);
+            // l'ajouter au tableau
+            $GLOBALS[$principale_ou_auxiliaire][$table] = [];
+            if (isset($infos['field']) and isset($infos['key'])) {
+                foreach (['field', 'key', 'join'] as $k) {
+                    if (isset($infos_tables[$table][$k])) {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = &$infos_tables[$table][$k];
+                    }
+                }
+            } else {
+                // ici on ne renvoie que les declarations, donc RIEN
+                // pour avoir la vrai description en base, il faut passer par trouver_table
+                $GLOBALS[$principale_ou_auxiliaire][$table] = [];
+            }
+            if (is_countable($mem) ? count($mem) : 0) {
+                foreach (array_keys($mem) as $k) {
+                    if (isset($GLOBALS[$principale_ou_auxiliaire][$table][$k])) {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = array_merge(
+                            $GLOBALS[$principale_ou_auxiliaire][$table][$k],
+                            $mem[$k]
+                        );
+                    } else {
+                        $GLOBALS[$principale_ou_auxiliaire][$table][$k] = $mem[$k];
+                    }
+                }
+            }
+        }
+
+        // recuperer les interfaces (table_titre, table_date)
+        // on ne le fait que dans un second temps pour que table_objet soit fonctionnel
+        // dans le pipeline de declarer_tables_interfaces
+        include_spip('public/interfaces');
+        foreach (array_keys($infos_tables) as $t) {
+            $infos_tables[$t] = renseigner_table_objet_interfaces($t, $infos_tables[$t]);
+        }
+
+        $deja_la = false;
+        // signature
+        $md5 = md5(serialize($infos_tables));
+    }
+    if ($table_sql === '::md5') {
+        return $md5;
+    }
+    if ($table_sql and !isset($infos_tables[$table_sql])) {
+        #$desc = renseigner_table_objet_sql($table_sql,$desc);
+        $desc = renseigner_table_objet_interfaces($table_sql, $desc);
+
+        return $desc;
+    }
+    if ($table_sql) {
+        return $infos_tables[$table_sql] ?? [];
+    }
+
+    return $infos_tables;
 }
 
 
@@ -501,27 +501,27 @@ 
  **/
 function base_serial(&$tables_principales) {
 
-	$spip_jobs = [
-		'id_job' => 'bigint(21) NOT NULL',
-		'descriptif' => "text DEFAULT '' NOT NULL",
-		'fonction' => 'varchar(255) NOT NULL', //nom de la fonction
-		'args' => "longblob DEFAULT '' NOT NULL", // arguments
-		'md5args' => "char(32) NOT NULL default ''", // signature des arguments
-		'inclure' => 'varchar(255) NOT NULL', // fichier a inclure ou path/ pour charger_fonction
-		'priorite' => 'smallint(6) NOT NULL default 0',
-		'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL", // date au plus tot
-		'status' => 'tinyint NOT NULL default 1',
-	];
-
-	$spip_jobs_key = [
-		'PRIMARY KEY' => 'id_job',
-		'KEY date' => 'date',
-		'KEY status' => 'status',
-	];
-
-	/// Attention: mes_fonctions peut avoir deja defini cette variable
-	/// il faut donc rajouter, mais pas reinitialiser
-	$tables_principales['spip_jobs'] = ['field' => &$spip_jobs, 'key' => &$spip_jobs_key];
+    $spip_jobs = [
+        'id_job' => 'bigint(21) NOT NULL',
+        'descriptif' => "text DEFAULT '' NOT NULL",
+        'fonction' => 'varchar(255) NOT NULL', //nom de la fonction
+        'args' => "longblob DEFAULT '' NOT NULL", // arguments
+        'md5args' => "char(32) NOT NULL default ''", // signature des arguments
+        'inclure' => 'varchar(255) NOT NULL', // fichier a inclure ou path/ pour charger_fonction
+        'priorite' => 'smallint(6) NOT NULL default 0',
+        'date' => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL", // date au plus tot
+        'status' => 'tinyint NOT NULL default 1',
+    ];
+
+    $spip_jobs_key = [
+        'PRIMARY KEY' => 'id_job',
+        'KEY date' => 'date',
+        'KEY status' => 'status',
+    ];
+
+    /// Attention: mes_fonctions peut avoir deja defini cette variable
+    /// il faut donc rajouter, mais pas reinitialiser
+    $tables_principales['spip_jobs'] = ['field' => &$spip_jobs, 'key' => &$spip_jobs_key];
 }
 
 
@@ -533,71 +533,71 @@ 
  * @return void
  **/
 function base_auxiliaires(&$tables_auxiliaires) {
-	$spip_resultats = [
-		'recherche' => "char(16) DEFAULT '' NOT NULL",
-		'id' => 'INT UNSIGNED NOT NULL',
-		'points' => "INT UNSIGNED DEFAULT '0' NOT NULL",
-		'table_objet' => "varchar(30) DEFAULT '' NOT NULL",
-		'serveur' => "char(16) DEFAULT '' NOT NULL", // hash md5 partiel du serveur de base ('' pour le serveur principal)
-		'maj' => 'TIMESTAMP'
-	];
-
-	$spip_resultats_key = [// pas de cle ni index, ca fait des insertions plus rapides et les requetes jointes utilisees en recheche ne sont pas plus lentes ...
-	];
-
-	$spip_auteurs_liens = [
-		'id_auteur' => "bigint(21) DEFAULT '0' NOT NULL",
-		'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
-		'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
-		'vu' => "VARCHAR(6) DEFAULT 'non' NOT NULL"
-	];
-
-	$spip_auteurs_liens_key = [
-		'PRIMARY KEY' => 'id_auteur,id_objet,objet',
-		'KEY id_auteur' => 'id_auteur',
-		'KEY id_objet' => 'id_objet',
-		'KEY objet' => 'objet',
-	];
-
-	$spip_meta = [
-		'nom' => 'VARCHAR (255) NOT NULL',
-		'valeur' => "text DEFAULT ''",
-		'impt' => "ENUM('non', 'oui') DEFAULT 'oui' NOT NULL",
-		'maj' => 'TIMESTAMP'
-	];
-
-	$spip_meta_key = [
-		'PRIMARY KEY' => 'nom'
-	];
-
-	$spip_jobs_liens = [
-		'id_job' => "bigint(21) DEFAULT '0' NOT NULL",
-		'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
-		'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
-	];
-
-	$spip_jobs_liens_key = [
-		'PRIMARY KEY' => 'id_job,id_objet,objet',
-		'KEY id_job' => 'id_job'
-	];
-
-	$tables_auxiliaires['spip_auteurs_liens'] = [
-		'field' => &$spip_auteurs_liens,
-		'key' => &$spip_auteurs_liens_key
-	];
-
-	$tables_auxiliaires['spip_meta'] = [
-		'field' => &$spip_meta,
-		'key' => &$spip_meta_key
-	];
-	$tables_auxiliaires['spip_resultats'] = [
-		'field' => &$spip_resultats,
-		'key' => &$spip_resultats_key
-	];
-	$tables_auxiliaires['spip_jobs_liens'] = [
-		'field' => &$spip_jobs_liens,
-		'key' => &$spip_jobs_liens_key
-	];
+    $spip_resultats = [
+        'recherche' => "char(16) DEFAULT '' NOT NULL",
+        'id' => 'INT UNSIGNED NOT NULL',
+        'points' => "INT UNSIGNED DEFAULT '0' NOT NULL",
+        'table_objet' => "varchar(30) DEFAULT '' NOT NULL",
+        'serveur' => "char(16) DEFAULT '' NOT NULL", // hash md5 partiel du serveur de base ('' pour le serveur principal)
+        'maj' => 'TIMESTAMP'
+    ];
+
+    $spip_resultats_key = [// pas de cle ni index, ca fait des insertions plus rapides et les requetes jointes utilisees en recheche ne sont pas plus lentes ...
+    ];
+
+    $spip_auteurs_liens = [
+        'id_auteur' => "bigint(21) DEFAULT '0' NOT NULL",
+        'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
+        'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
+        'vu' => "VARCHAR(6) DEFAULT 'non' NOT NULL"
+    ];
+
+    $spip_auteurs_liens_key = [
+        'PRIMARY KEY' => 'id_auteur,id_objet,objet',
+        'KEY id_auteur' => 'id_auteur',
+        'KEY id_objet' => 'id_objet',
+        'KEY objet' => 'objet',
+    ];
+
+    $spip_meta = [
+        'nom' => 'VARCHAR (255) NOT NULL',
+        'valeur' => "text DEFAULT ''",
+        'impt' => "ENUM('non', 'oui') DEFAULT 'oui' NOT NULL",
+        'maj' => 'TIMESTAMP'
+    ];
+
+    $spip_meta_key = [
+        'PRIMARY KEY' => 'nom'
+    ];
+
+    $spip_jobs_liens = [
+        'id_job' => "bigint(21) DEFAULT '0' NOT NULL",
+        'id_objet' => "bigint(21) DEFAULT '0' NOT NULL",
+        'objet' => "VARCHAR (25) DEFAULT '' NOT NULL",
+    ];
+
+    $spip_jobs_liens_key = [
+        'PRIMARY KEY' => 'id_job,id_objet,objet',
+        'KEY id_job' => 'id_job'
+    ];
+
+    $tables_auxiliaires['spip_auteurs_liens'] = [
+        'field' => &$spip_auteurs_liens,
+        'key' => &$spip_auteurs_liens_key
+    ];
+
+    $tables_auxiliaires['spip_meta'] = [
+        'field' => &$spip_meta,
+        'key' => &$spip_meta_key
+    ];
+    $tables_auxiliaires['spip_resultats'] = [
+        'field' => &$spip_resultats,
+        'key' => &$spip_resultats_key
+    ];
+    $tables_auxiliaires['spip_jobs_liens'] = [
+        'field' => &$spip_jobs_liens,
+        'key' => &$spip_jobs_liens_key
+    ];
 }
 
 
@@ -654,129 +654,129 @@ 
  * @return array
  */
 function renseigner_table_objet_sql($table_sql, &$infos) {
-	if (!isset($infos['type'])) {
-		// si on arrive de base/trouver_table, on a la cle primaire :
-		// s'en servir pour extrapoler le type
-		if (isset($infos['key']['PRIMARY KEY'])) {
-			$primary = $infos['key']['PRIMARY KEY'];
-			$primary = explode(',', $primary);
-			$primary = reset($primary);
-			$infos['type'] = preg_replace(',^spip_|^id_|s$,', '', $primary);
-		} else {
-			$infos['type'] = preg_replace(',^spip_|s$,', '', $table_sql);
-		}
-	}
-	if (!isset($infos['type_surnoms'])) {
-		$infos['type_surnoms'] = [];
-	}
-
-	if (!isset($infos['table_objet'])) {
-		$infos['table_objet'] = preg_replace(',^spip_,', '', $table_sql);
-	}
-	if (!isset($infos['table_objet_surnoms'])) {
-		$infos['table_objet_surnoms'] = [];
-	}
-
-	if (!isset($infos['principale'])) {
-		$infos['principale'] = (isset($GLOBALS['tables_principales'][$table_sql]) ? 'oui' : false);
-	}
-
-	// normaliser pour pouvoir tester en php $infos['principale']?
-	// et dans une boucle {principale=oui}
-	$infos['principale'] = (($infos['principale'] and $infos['principale'] != 'non') ? 'oui' : false);
-
-	// declarer et normaliser pour pouvoir tester en php $infos['editable']?
-	// et dans une boucle {editable=oui}
-	if (!isset($infos['editable'])) {
-		$infos['editable'] = 'oui';
-	}
-
-	$infos['editable'] = (($infos['editable'] and $infos['editable'] != 'non') ? 'oui' : false);
-
-	// les urls publiques sont par defaut page=type pour les tables principales, et rien pour les autres
-	// seules les exceptions sont donc a declarer
-	if (!isset($infos['page'])) {
-		$infos['page'] = ($infos['principale'] ? $infos['type'] : '');
-	}
-
-	if (!isset($infos['url_voir'])) {
-		$infos['url_voir'] = $infos['type'];
-	}
-	if (!isset($infos['url_edit'])) {
-		$infos['url_edit'] = $infos['url_voir'] . ($infos['editable'] ? '_edit' : '');
-	}
-	if (!isset($infos['icone_objet'])) {
-		$infos['icone_objet'] = $infos['type'];
-	}
-
-	// chaines de langue
-	// par defaut : objet:icone_xxx_objet
-	if (!isset($infos['texte_retour'])) {
-		$infos['texte_retour'] = 'icone_retour';
-	}
-	if (!isset($infos['texte_modifier'])) {
-		$infos['texte_modifier'] = $infos['type'] . ':' . 'icone_modifier_' . $infos['type'];
-	}
-	if (!isset($infos['texte_creer'])) {
-		$infos['texte_creer'] = $infos['type'] . ':' . 'icone_creer_' . $infos['type'];
-	}
-	if (!isset($infos['texte_creer_associer'])) {
-		$infos['texte_creer_associer'] = $infos['type'] . ':' . 'texte_creer_associer_' . $infos['type'];
-	}
-	if (!isset($infos['texte_ajouter'])) {
-		// Ajouter un X
-		$infos['texte_ajouter'] = $infos['type'] . ':' . 'texte_ajouter_' . $infos['type'];
-	}
-	if (!isset($infos['texte_objets'])) {
-		$infos['texte_objets'] = $infos['type'] . ':' . 'titre_' . $infos['table_objet'];
-	}
-	if (!isset($infos['texte_objet'])) {
-		$infos['texte_objet'] = $infos['type'] . ':' . 'titre_' . $infos['type'];
-	}
-	if (!isset($infos['texte_logo_objet'])) {
-		// objet:titre_logo_objet "Logo de ce X"
-		$infos['texte_logo_objet'] = $infos['type'] . ':' . 'titre_logo_' . $infos['type'];
-	}
-	if (!isset($infos['texte_langue_objet'])) {
-		// objet:texte_langue_objet "Langue de ce X"
-		$infos['texte_langue_objet'] = $infos['type'] . ':' . 'titre_langue_' . $infos['type'];
-	}
-	if (!isset($infos['texte_definir_comme_traduction_objet'])) {
-		// "Ce X est une traduction du X numéro :"
-		$infos['texte_definir_comme_traduction_objet'] = $infos['type'] . ':' . 'texte_definir_comme_traduction_' . $infos['type'];
-	}
-
-	// objet:info_aucun_objet
-	if (!isset($infos['info_aucun_objet'])) {
-		$infos['info_aucun_objet'] = $infos['type'] . ':' . 'info_aucun_' . $infos['type'];
-	}
-	// objet:info_1_objet
-	if (!isset($infos['info_1_objet'])) {
-		$infos['info_1_objet'] = $infos['type'] . ':' . 'info_1_' . $infos['type'];
-	}
-	// objet:info_nb_objets
-	if (!isset($infos['info_nb_objets'])) {
-		$infos['info_nb_objets'] = $infos['type'] . ':' . 'info_nb_' . $infos['table_objet'];
-	}
-
-	if (!isset($infos['champs_editables'])) {
-		$infos['champs_editables'] = [];
-	}
-	if (!isset($infos['champs_versionnes'])) {
-		$infos['champs_versionnes'] = [];
-	}
-	if (!isset($infos['rechercher_champs'])) {
-		$infos['rechercher_champs'] = [];
-	}
-	if (!isset($infos['rechercher_jointures'])) {
-		$infos['rechercher_jointures'] = [];
-	}
-
-	if (!isset($infos['modeles'])) {
-		$infos['modeles'] = [$infos['type']];
-	}
-
-	return $infos;
+    if (!isset($infos['type'])) {
+        // si on arrive de base/trouver_table, on a la cle primaire :
+        // s'en servir pour extrapoler le type
+        if (isset($infos['key']['PRIMARY KEY'])) {
+            $primary = $infos['key']['PRIMARY KEY'];
+            $primary = explode(',', $primary);
+            $primary = reset($primary);
+            $infos['type'] = preg_replace(',^spip_|^id_|s$,', '', $primary);
+        } else {
+            $infos['type'] = preg_replace(',^spip_|s$,', '', $table_sql);
+        }
+    }
+    if (!isset($infos['type_surnoms'])) {
+        $infos['type_surnoms'] = [];
+    }
+
+    if (!isset($infos['table_objet'])) {
+        $infos['table_objet'] = preg_replace(',^spip_,', '', $table_sql);
+    }
+    if (!isset($infos['table_objet_surnoms'])) {
+        $infos['table_objet_surnoms'] = [];
+    }
+
+    if (!isset($infos['principale'])) {
+        $infos['principale'] = (isset($GLOBALS['tables_principales'][$table_sql]) ? 'oui' : false);
+    }
+
+    // normaliser pour pouvoir tester en php $infos['principale']?
+    // et dans une boucle {principale=oui}
+    $infos['principale'] = (($infos['principale'] and $infos['principale'] != 'non') ? 'oui' : false);
+
+    // declarer et normaliser pour pouvoir tester en php $infos['editable']?
+    // et dans une boucle {editable=oui}
+    if (!isset($infos['editable'])) {
+        $infos['editable'] = 'oui';
+    }
+
+    $infos['editable'] = (($infos['editable'] and $infos['editable'] != 'non') ? 'oui' : false);
+
+    // les urls publiques sont par defaut page=type pour les tables principales, et rien pour les autres
+    // seules les exceptions sont donc a declarer
+    if (!isset($infos['page'])) {
+        $infos['page'] = ($infos['principale'] ? $infos['type'] : '');
+    }
+
+    if (!isset($infos['url_voir'])) {
+        $infos['url_voir'] = $infos['type'];
+    }
+    if (!isset($infos['url_edit'])) {
+        $infos['url_edit'] = $infos['url_voir'] . ($infos['editable'] ? '_edit' : '');
+    }
+    if (!isset($infos['icone_objet'])) {
+        $infos['icone_objet'] = $infos['type'];
+    }
+
+    // chaines de langue
+    // par defaut : objet:icone_xxx_objet
+    if (!isset($infos['texte_retour'])) {
+        $infos['texte_retour'] = 'icone_retour';
+    }
+    if (!isset($infos['texte_modifier'])) {
+        $infos['texte_modifier'] = $infos['type'] . ':' . 'icone_modifier_' . $infos['type'];
+    }
+    if (!isset($infos['texte_creer'])) {
+        $infos['texte_creer'] = $infos['type'] . ':' . 'icone_creer_' . $infos['type'];
+    }
+    if (!isset($infos['texte_creer_associer'])) {
+        $infos['texte_creer_associer'] = $infos['type'] . ':' . 'texte_creer_associer_' . $infos['type'];
+    }
+    if (!isset($infos['texte_ajouter'])) {
+        // Ajouter un X
+        $infos['texte_ajouter'] = $infos['type'] . ':' . 'texte_ajouter_' . $infos['type'];
+    }
+    if (!isset($infos['texte_objets'])) {
+        $infos['texte_objets'] = $infos['type'] . ':' . 'titre_' . $infos['table_objet'];
+    }
+    if (!isset($infos['texte_objet'])) {
+        $infos['texte_objet'] = $infos['type'] . ':' . 'titre_' . $infos['type'];
+    }
+    if (!isset($infos['texte_logo_objet'])) {
+        // objet:titre_logo_objet "Logo de ce X"
+        $infos['texte_logo_objet'] = $infos['type'] . ':' . 'titre_logo_' . $infos['type'];
+    }
+    if (!isset($infos['texte_langue_objet'])) {
+        // objet:texte_langue_objet "Langue de ce X"
+        $infos['texte_langue_objet'] = $infos['type'] . ':' . 'titre_langue_' . $infos['type'];
+    }
+    if (!isset($infos['texte_definir_comme_traduction_objet'])) {
+        // "Ce X est une traduction du X numéro :"
+        $infos['texte_definir_comme_traduction_objet'] = $infos['type'] . ':' . 'texte_definir_comme_traduction_' . $infos['type'];
+    }
+
+    // objet:info_aucun_objet
+    if (!isset($infos['info_aucun_objet'])) {
+        $infos['info_aucun_objet'] = $infos['type'] . ':' . 'info_aucun_' . $infos['type'];
+    }
+    // objet:info_1_objet
+    if (!isset($infos['info_1_objet'])) {
+        $infos['info_1_objet'] = $infos['type'] . ':' . 'info_1_' . $infos['type'];
+    }
+    // objet:info_nb_objets
+    if (!isset($infos['info_nb_objets'])) {
+        $infos['info_nb_objets'] = $infos['type'] . ':' . 'info_nb_' . $infos['table_objet'];
+    }
+
+    if (!isset($infos['champs_editables'])) {
+        $infos['champs_editables'] = [];
+    }
+    if (!isset($infos['champs_versionnes'])) {
+        $infos['champs_versionnes'] = [];
+    }
+    if (!isset($infos['rechercher_champs'])) {
+        $infos['rechercher_champs'] = [];
+    }
+    if (!isset($infos['rechercher_jointures'])) {
+        $infos['rechercher_jointures'] = [];
+    }
+
+    if (!isset($infos['modeles'])) {
+        $infos['modeles'] = [$infos['type']];
+    }
+
+    return $infos;
 }
 
 /**
@@ -793,30 +793,30 @@ 
  * @return array
  */
 function renseigner_table_objet_interfaces($table_sql, &$infos) {
-	if (!isset($infos['titre'])) {
-		if (isset($infos['table_objet']) and isset($GLOBALS['table_titre'][$infos['table_objet']])) {
-			$infos['titre'] = $GLOBALS['table_titre'][$infos['table_objet']];
-		} else {
-			$infos['titre'] = ((isset($infos['field']['titre'])) ? 'titre,' : "'' as titre,");
-			$infos['titre'] .= ((isset($infos['field']['lang'])) ? 'lang' : "'' as lang");
-		}
-	}
-	if (!isset($infos['date'])) {
-		if (isset($infos['table_objet']) and isset($GLOBALS['table_date'][$infos['table_objet']])) {
-			$infos['date'] = $GLOBALS['table_date'][$infos['table_objet']];
-		} else {
-			$infos['date'] = ((isset($infos['field']['date'])) ? 'date' : '');
-		}
-	}
-
-	$infos['statut'] ??= $GLOBALS['table_statut'][$table_sql] ?? '';
-	$infos['tables_jointures'] ??= [];
-
-	if (isset($GLOBALS['tables_jointures'][$table_sql])) {
-		$infos['tables_jointures'] = array_merge($infos['tables_jointures'], $GLOBALS['tables_jointures'][$table_sql]);
-	}
-
-	return $infos;
+    if (!isset($infos['titre'])) {
+        if (isset($infos['table_objet']) and isset($GLOBALS['table_titre'][$infos['table_objet']])) {
+            $infos['titre'] = $GLOBALS['table_titre'][$infos['table_objet']];
+        } else {
+            $infos['titre'] = ((isset($infos['field']['titre'])) ? 'titre,' : "'' as titre,");
+            $infos['titre'] .= ((isset($infos['field']['lang'])) ? 'lang' : "'' as lang");
+        }
+    }
+    if (!isset($infos['date'])) {
+        if (isset($infos['table_objet']) and isset($GLOBALS['table_date'][$infos['table_objet']])) {
+            $infos['date'] = $GLOBALS['table_date'][$infos['table_objet']];
+        } else {
+            $infos['date'] = ((isset($infos['field']['date'])) ? 'date' : '');
+        }
+    }
+
+    $infos['statut'] ??= $GLOBALS['table_statut'][$table_sql] ?? '';
+    $infos['tables_jointures'] ??= [];
+
+    if (isset($GLOBALS['tables_jointures'][$table_sql])) {
+        $infos['tables_jointures'] = array_merge($infos['tables_jointures'], $GLOBALS['tables_jointures'][$table_sql]);
+    }
+
+    return $infos;
 }
 
 /**
@@ -827,13 +827,13 @@ 
  *     Liste et descriptions des tables principales
  **/
 function lister_tables_principales() {
-	static $done = false;
-	if (!$done or !(is_countable($GLOBALS['tables_principales']) ? count($GLOBALS['tables_principales']) : 0)) {
-		lister_tables_objets_sql();
-		$done = true;
-	}
+    static $done = false;
+    if (!$done or !(is_countable($GLOBALS['tables_principales']) ? count($GLOBALS['tables_principales']) : 0)) {
+        lister_tables_objets_sql();
+        $done = true;
+    }
 
-	return $GLOBALS['tables_principales'];
+    return $GLOBALS['tables_principales'];
 }
 
 /**
@@ -844,13 +844,13 @@ 
  *     Liste et descriptions des tables auxiliaires
  **/
 function lister_tables_auxiliaires() {
-	static $done = false;
-	if (!$done or !(is_countable($GLOBALS['tables_auxiliaires']) ? count($GLOBALS['tables_auxiliaires']) : 0)) {
-		lister_tables_objets_sql();
-		$done = true;
-	}
+    static $done = false;
+    if (!$done or !(is_countable($GLOBALS['tables_auxiliaires']) ? count($GLOBALS['tables_auxiliaires']) : 0)) {
+        lister_tables_objets_sql();
+        $done = true;
+    }
 
-	return $GLOBALS['tables_auxiliaires'];
+    return $GLOBALS['tables_auxiliaires'];
 }
 
 /**
@@ -859,45 +859,45 @@ 
  * @return array
  */
 function lister_tables_objets_surnoms() {
-	static $surnoms = null;
-	static $md5 = null;
-	if (
-		!$surnoms
-		or $md5 != lister_tables_objets_sql('::md5')
-	) {
-		// passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
-		// pour compatibilite, car il faut dorenavent utiliser
-		// declarer_table_objets_sql
-		$surnoms = pipeline(
-			'declarer_tables_objets_surnoms',
-			[
-				# pour les modeles
-				# a enlever ?
-				'doc' => 'documents',
-				'img' => 'documents',
-				'emb' => 'documents',
-			]
-		);
-		$infos_tables = lister_tables_objets_sql();
-		foreach ($infos_tables as $t => $infos) {
-			// cas de base type=>table
-			// et preg_replace(',^spip_|^id_|s$,',table)=>table
-			if ($infos['table_objet']) { // securite, si la fonction est appelee trop tot, c'est vide
-				// optimisations pour table_objet
-				//$surnoms[$infos['type']] = $infos['table_objet'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['table_objet'])] = $infos['table_objet'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['type'])] = $infos['table_objet'];
-				if (is_array($infos['table_objet_surnoms']) and count($infos['table_objet_surnoms'])) {
-					foreach ($infos['table_objet_surnoms'] as $surnom) {
-						$surnoms[$surnom] = $infos['table_objet'];
-					}
-				}
-			}
-		}
-		$md5 = lister_tables_objets_sql('::md5');
-	}
-
-	return $surnoms;
+    static $surnoms = null;
+    static $md5 = null;
+    if (
+        !$surnoms
+        or $md5 != lister_tables_objets_sql('::md5')
+    ) {
+        // passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
+        // pour compatibilite, car il faut dorenavent utiliser
+        // declarer_table_objets_sql
+        $surnoms = pipeline(
+            'declarer_tables_objets_surnoms',
+            [
+                # pour les modeles
+                # a enlever ?
+                'doc' => 'documents',
+                'img' => 'documents',
+                'emb' => 'documents',
+            ]
+        );
+        $infos_tables = lister_tables_objets_sql();
+        foreach ($infos_tables as $t => $infos) {
+            // cas de base type=>table
+            // et preg_replace(',^spip_|^id_|s$,',table)=>table
+            if ($infos['table_objet']) { // securite, si la fonction est appelee trop tot, c'est vide
+                // optimisations pour table_objet
+                //$surnoms[$infos['type']] = $infos['table_objet'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['table_objet'])] = $infos['table_objet'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['type'])] = $infos['table_objet'];
+                if (is_array($infos['table_objet_surnoms']) and count($infos['table_objet_surnoms'])) {
+                    foreach ($infos['table_objet_surnoms'] as $surnom) {
+                        $surnoms[$surnom] = $infos['table_objet'];
+                    }
+                }
+            }
+        }
+        $md5 = lister_tables_objets_sql('::md5');
+    }
+
+    return $surnoms;
 }
 
 /**
@@ -906,35 +906,35 @@ 
  * @return array
  */
 function lister_types_surnoms() {
-	static $surnoms = null;
-	static $md5 = null;
-	if (
-		!$surnoms
-		or $md5 != lister_tables_objets_sql('::md5')
-	) {
-		// passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
-		// pour compatibilite, car il faut dorenavent utiliser
-		// declarer_table_objets_sql
-		$surnoms = pipeline('declarer_type_surnoms', ['racine-site' => 'site']);
-		$infos_tables = lister_tables_objets_sql();
-		foreach ($infos_tables as $t => $infos) {
-			if ($infos['type']) { // securite, si la fonction est appelee trop tot, c'est vide
-				// optimisations pour objet_type
-				//$surnoms[$infos['type']] = $infos['type'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['table_objet'])] = $infos['type'];
-				$surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['type'])] = $infos['type'];
-				// surnoms declares
-				if (is_array($infos['type_surnoms']) and count($infos['type_surnoms'])) {
-					foreach ($infos['type_surnoms'] as $surnom) {
-						$surnoms[$surnom] = $infos['type'];
-					}
-				}
-			}
-		}
-		$md5 = lister_tables_objets_sql('::md5');
-	}
-
-	return $surnoms;
+    static $surnoms = null;
+    static $md5 = null;
+    if (
+        !$surnoms
+        or $md5 != lister_tables_objets_sql('::md5')
+    ) {
+        // passer dans un pipeline qui permet aux plugins de declarer leurs exceptions
+        // pour compatibilite, car il faut dorenavent utiliser
+        // declarer_table_objets_sql
+        $surnoms = pipeline('declarer_type_surnoms', ['racine-site' => 'site']);
+        $infos_tables = lister_tables_objets_sql();
+        foreach ($infos_tables as $t => $infos) {
+            if ($infos['type']) { // securite, si la fonction est appelee trop tot, c'est vide
+                // optimisations pour objet_type
+                //$surnoms[$infos['type']] = $infos['type'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['table_objet'])] = $infos['type'];
+                $surnoms[preg_replace(',^spip_|^id_|s$,', '', $infos['type'])] = $infos['type'];
+                // surnoms declares
+                if (is_array($infos['type_surnoms']) and count($infos['type_surnoms'])) {
+                    foreach ($infos['type_surnoms'] as $surnom) {
+                        $surnoms[$surnom] = $infos['type'];
+                    }
+                }
+            }
+        }
+        $md5 = lister_tables_objets_sql('::md5');
+    }
+
+    return $surnoms;
 }
 
 /**
@@ -948,22 +948,22 @@ 
  *     Couples (nom de la table SQL => même nom, sans 'spip_' devant)
  **/
 function lister_tables_spip($serveur = '') {
-	static $tables = [];
-	if (!isset($tables[$serveur])) {
-		$tables[$serveur] = [];
-		if (!function_exists('sql_alltable')) {
-			include_spip('base/abstract_sql');
-		}
-		$ts = sql_alltable(null, $serveur); // toutes les tables "spip_" (ou prefixe perso)
-		$connexion = $GLOBALS['connexions'][$serveur ?: 0];
-		$spip = $connexion['prefixe'] . '_';
-		foreach ($ts as $t) {
-			$t = substr($t, strlen($spip));
-			$tables[$serveur]["spip_$t"] = $t;
-		}
-	}
-
-	return $tables[$serveur];
+    static $tables = [];
+    if (!isset($tables[$serveur])) {
+        $tables[$serveur] = [];
+        if (!function_exists('sql_alltable')) {
+            include_spip('base/abstract_sql');
+        }
+        $ts = sql_alltable(null, $serveur); // toutes les tables "spip_" (ou prefixe perso)
+        $connexion = $GLOBALS['connexions'][$serveur ?: 0];
+        $spip = $connexion['prefixe'] . '_';
+        foreach ($ts as $t) {
+            $t = substr($t, strlen($spip));
+            $tables[$serveur]["spip_$t"] = $t;
+        }
+    }
+
+    return $tables[$serveur];
 }
 
 
@@ -978,18 +978,18 @@ 
  *     Couples (nom de la table SQL => même nom)
  **/
 function lister_toutes_tables($serveur) {
-	static $tables = [];
-	if (!isset($tables[$serveur])) {
-		$tables[$serveur] = [];
-		if (!function_exists('sql_alltable')) {
-			include_spip('base/abstract_sql');
-		}
-		$ts = sql_alltable('%', $serveur); // toutes les tables
-		foreach ($ts as $t) {
-			$tables[$serveur][$t] = $t;
-		}
-	}
-	return $tables[$serveur];
+    static $tables = [];
+    if (!isset($tables[$serveur])) {
+        $tables[$serveur] = [];
+        if (!function_exists('sql_alltable')) {
+            include_spip('base/abstract_sql');
+        }
+        $ts = sql_alltable('%', $serveur); // toutes les tables
+        foreach ($ts as $t) {
+            $tables[$serveur][$t] = $t;
+        }
+    }
+    return $tables[$serveur];
 }
 
 /**
@@ -1010,39 +1010,39 @@ 
  **/
 function table_objet(string $type, string $serveur = ''): string {
 
-	if ($type) {
-		$type = preg_replace(',^spip_|^id_|s$,', '', $type);
-	}
-	if (!strlen($type)) {
-		return '';
-	}
-
-	$surnoms = lister_tables_objets_surnoms();
-	if (isset($surnoms[$type])) {
-		return $surnoms[$type];
-	}
-
-	if ($serveur !== false) {
-		$t = lister_tables_spip($serveur);
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$typetrim = rtrim($type, 's') . 's';
-		if (
-			(isset($t[$typetrim]) or in_array($typetrim, $t))
-			and ($desc = $trouver_table(rtrim($type, 's') . 's', $serveur))
-		) {
-			return $desc['id_table'];
-		} elseif (
-			(isset($t[$type]) or in_array($type, $t))
-			and ($desc = $trouver_table($type, $serveur))
-		) {
-			return $desc['id_table'];
-		}
-
-		spip_log('table_objet(' . $type . ') calculee sans verification');
-		#spip_log(debug_backtrace(),'db');
-	}
-
-	return rtrim($type, 's') . 's'; # cas historique ne devant plus servir, sauf si $serveur=false
+    if ($type) {
+        $type = preg_replace(',^spip_|^id_|s$,', '', $type);
+    }
+    if (!strlen($type)) {
+        return '';
+    }
+
+    $surnoms = lister_tables_objets_surnoms();
+    if (isset($surnoms[$type])) {
+        return $surnoms[$type];
+    }
+
+    if ($serveur !== false) {
+        $t = lister_tables_spip($serveur);
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $typetrim = rtrim($type, 's') . 's';
+        if (
+            (isset($t[$typetrim]) or in_array($typetrim, $t))
+            and ($desc = $trouver_table(rtrim($type, 's') . 's', $serveur))
+        ) {
+            return $desc['id_table'];
+        } elseif (
+            (isset($t[$type]) or in_array($type, $t))
+            and ($desc = $trouver_table($type, $serveur))
+        ) {
+            return $desc['id_table'];
+        }
+
+        spip_log('table_objet(' . $type . ') calculee sans verification');
+        #spip_log(debug_backtrace(),'db');
+    }
+
+    return rtrim($type, 's') . 's'; # cas historique ne devant plus servir, sauf si $serveur=false
 }
 
 /**
@@ -1063,33 +1063,33 @@ 
  **/
 function table_objet_sql(string $type, string $serveur = ''): string {
 
-	$nom = table_objet($type, $serveur);
-	if (!strlen($nom)) {
-		return '';
-	}
-	if (!isset($GLOBALS['table_des_tables']['articles'])) {
-		// eviter de multiples inclusions
-		include_spip('public/interfaces');
-	}
-	if (isset($GLOBALS['table_des_tables'][$nom])) {
-		$nom = $GLOBALS['table_des_tables'][$nom];
-		$nom = "spip_$nom";
-	} else {
-		$infos_tables = lister_tables_objets_sql();
-		if (isset($infos_tables["spip_$nom"])) {
-			$nom = "spip_$nom";
-		} elseif ($serveur !== false) {
-			$t = lister_tables_spip($serveur);
-			if (isset($t[$nom]) or in_array($nom, $t)) {
-				$trouver_table = charger_fonction('trouver_table', 'base');
-				if ($desc = $trouver_table($nom, $serveur)) {
-					return $desc['table_sql'];
-				}
-			}
-		}
-	}
-
-	return $nom;
+    $nom = table_objet($type, $serveur);
+    if (!strlen($nom)) {
+        return '';
+    }
+    if (!isset($GLOBALS['table_des_tables']['articles'])) {
+        // eviter de multiples inclusions
+        include_spip('public/interfaces');
+    }
+    if (isset($GLOBALS['table_des_tables'][$nom])) {
+        $nom = $GLOBALS['table_des_tables'][$nom];
+        $nom = "spip_$nom";
+    } else {
+        $infos_tables = lister_tables_objets_sql();
+        if (isset($infos_tables["spip_$nom"])) {
+            $nom = "spip_$nom";
+        } elseif ($serveur !== false) {
+            $t = lister_tables_spip($serveur);
+            if (isset($t[$nom]) or in_array($nom, $t)) {
+                $trouver_table = charger_fonction('trouver_table', 'base');
+                if ($desc = $trouver_table($nom, $serveur)) {
+                    return $desc['table_sql'];
+                }
+            }
+        }
+    }
+
+    return $nom;
 }
 
 /**
@@ -1108,35 +1108,35 @@ 
  *     Nom de la clé primaire
  **/
 function id_table_objet($type, $serveur = '') {
-	static $trouver_table = null;
-	$type = objet_type($type, $serveur);
-	if (!$type) {
-		return;
-	}
-	$t = table_objet($type);
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-
-	$ts = lister_tables_spip($serveur);
-	if (
-		in_array($t, $ts)
-		or in_array($t, lister_toutes_tables($serveur))
-	) {
-		$desc = $trouver_table($t, $serveur);
-		if (isset($desc['key']['PRIMARY KEY'])) {
-			return $desc['key']['PRIMARY KEY'];
-		}
-		if (!$desc or isset($desc['field']["id_$type"])) {
-			return "id_$type";
-		}
-		// sinon renvoyer le premier champ de la table...
-		$keys = array_keys($desc['field']);
-
-		return array_shift($keys);
-	}
-
-	return "id_$type";
+    static $trouver_table = null;
+    $type = objet_type($type, $serveur);
+    if (!$type) {
+        return;
+    }
+    $t = table_objet($type);
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+
+    $ts = lister_tables_spip($serveur);
+    if (
+        in_array($t, $ts)
+        or in_array($t, lister_toutes_tables($serveur))
+    ) {
+        $desc = $trouver_table($t, $serveur);
+        if (isset($desc['key']['PRIMARY KEY'])) {
+            return $desc['key']['PRIMARY KEY'];
+        }
+        if (!$desc or isset($desc['field']["id_$type"])) {
+            return "id_$type";
+        }
+        // sinon renvoyer le premier champ de la table...
+        $keys = array_keys($desc['field']);
+
+        return array_shift($keys);
+    }
+
+    return "id_$type";
 }
 
 /**
@@ -1155,60 +1155,60 @@ 
  *     Type de l'objet
  **/
 function objet_type(string $table_objet, string $serveur = '') : ?string {
-	if (!$table_objet) {
-		return null;
-	}
-	$surnoms = lister_types_surnoms();
-
-	// scenario de base
-	// le type est decline a partir du nom de la table en enlevant le prefixe eventuel
-	// et la marque du pluriel
-	// on accepte id_xx en entree aussi
-	$type = preg_replace(',^spip_|^id_|s$,', '', $table_objet);
-	if (isset($surnoms[$type])) {
-		return $surnoms[$type];
-	}
-
-	// securite : eliminer les caracteres non \w
-	$type = preg_replace(',[^\w-],', '', $type);
-
-	// si le type redonne bien la table c'est bon
-	// oui si table_objet ressemblait deja a un type
-	if (
-		$type == $table_objet
-		or (table_objet($type, $serveur) == $table_objet)
-		or (table_objet_sql($type, $serveur) == $table_objet)
-	) {
-		return $type;
-	}
-
-	// si on ne veut pas chercher en base
-	if ($serveur === false) {
-		return $type;
-	}
-
-	// sinon on passe par la cle primaire id_xx pour trouver le type
-	// car le s a la fin est incertain
-	// notamment en cas de pluriel derogatoire
-	// id_jeu/spip_jeux id_journal/spip_journaux qui necessitent tout deux
-	// une declaration jeu => jeux, journal => journaux
-	// dans le pipeline declarer_tables_objets_surnoms
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$ts = lister_tables_spip($serveur);
-	$desc = false;
-	if (in_array($table_objet, $ts)) {
-		$desc = $trouver_table($table_objet);
-	}
-	if (!$desc and in_array($table_objet = table_objet($type, $serveur), $ts)) {
-		$desc = $trouver_table($table_objet, $serveur);
-	}
-	// si le type est declare : bingo !
-	if ($desc and isset($desc['type'])) {
-		return $desc['type'];
-	}
-
-	// on a fait ce qu'on a pu
-	return $type;
+    if (!$table_objet) {
+        return null;
+    }
+    $surnoms = lister_types_surnoms();
+
+    // scenario de base
+    // le type est decline a partir du nom de la table en enlevant le prefixe eventuel
+    // et la marque du pluriel
+    // on accepte id_xx en entree aussi
+    $type = preg_replace(',^spip_|^id_|s$,', '', $table_objet);
+    if (isset($surnoms[$type])) {
+        return $surnoms[$type];
+    }
+
+    // securite : eliminer les caracteres non \w
+    $type = preg_replace(',[^\w-],', '', $type);
+
+    // si le type redonne bien la table c'est bon
+    // oui si table_objet ressemblait deja a un type
+    if (
+        $type == $table_objet
+        or (table_objet($type, $serveur) == $table_objet)
+        or (table_objet_sql($type, $serveur) == $table_objet)
+    ) {
+        return $type;
+    }
+
+    // si on ne veut pas chercher en base
+    if ($serveur === false) {
+        return $type;
+    }
+
+    // sinon on passe par la cle primaire id_xx pour trouver le type
+    // car le s a la fin est incertain
+    // notamment en cas de pluriel derogatoire
+    // id_jeu/spip_jeux id_journal/spip_journaux qui necessitent tout deux
+    // une declaration jeu => jeux, journal => journaux
+    // dans le pipeline declarer_tables_objets_surnoms
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $ts = lister_tables_spip($serveur);
+    $desc = false;
+    if (in_array($table_objet, $ts)) {
+        $desc = $trouver_table($table_objet);
+    }
+    if (!$desc and in_array($table_objet = table_objet($type, $serveur), $ts)) {
+        $desc = $trouver_table($table_objet, $serveur);
+    }
+    // si le type est declare : bingo !
+    if ($desc and isset($desc['type'])) {
+        return $desc['type'];
+    }
+
+    // on a fait ce qu'on a pu
+    return $type;
 }
 
 /**
@@ -1224,62 +1224,62 @@ 
  * @return bool
  */
 function objet_test_si_publie($objet, $id_objet, $serveur = '') {
-	// voir si une fonction est definie pour faire le boulot
-	// elle a la priorite dans ce cas
-	if ($f = charger_fonction($objet . '_test_si_publie', 'base', true)) {
-		return $f($objet, $id_objet, $serveur);
-	}
-
-	// sinon on se fie a la declaration de l'objet si presente
-	$id_table = $table_objet = table_objet($objet);
-	$id_table_objet = id_table_objet($objet, $serveur);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	if (
-		$desc = $trouver_table($table_objet, $serveur)
-		and isset($desc['statut'])
-		and $desc['statut']
-	) {
-		$boucle = new Boucle();
-		$boucle->show = $desc;
-		$boucle->nom = 'objet_test_si_publie';
-		$boucle->id_boucle = $id_table;
-		$boucle->id_table = $id_table;
-		$boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
-		$boucle->sql_serveur = $serveur;
-		$boucle->select[] = $id_table_objet;
-		$boucle->from[$table_objet] = table_objet_sql($objet, $serveur);
-		$boucle->where[] = $id_table . '.' . $id_table_objet . '=' . intval($id_objet);
-
-		$boucle->descr['nom'] = 'objet_test_si_publie'; // eviter notice php
-		$boucle->descr['sourcefile'] = 'internal';
-		$boucle->descr['gram'] = 'html';
-
-		include_spip('public/compiler');
-		include_spip('public/composer');
-		instituer_boucle($boucle, false, true);
-		$res = calculer_select(
-			$boucle->select,
-			$boucle->from,
-			$boucle->from_type,
-			$boucle->where,
-			$boucle->join,
-			$boucle->group,
-			$boucle->order,
-			$boucle->limit,
-			$boucle->having,
-			$table_objet,
-			$id_table,
-			$serveur
-		);
-		if (sql_fetch($res)) {
-			return true;
-		}
-
-		return false;
-	}
-
-	// si pas d'info statut ni de fonction : l'objet est publie
-	return true;
+    // voir si une fonction est definie pour faire le boulot
+    // elle a la priorite dans ce cas
+    if ($f = charger_fonction($objet . '_test_si_publie', 'base', true)) {
+        return $f($objet, $id_objet, $serveur);
+    }
+
+    // sinon on se fie a la declaration de l'objet si presente
+    $id_table = $table_objet = table_objet($objet);
+    $id_table_objet = id_table_objet($objet, $serveur);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    if (
+        $desc = $trouver_table($table_objet, $serveur)
+        and isset($desc['statut'])
+        and $desc['statut']
+    ) {
+        $boucle = new Boucle();
+        $boucle->show = $desc;
+        $boucle->nom = 'objet_test_si_publie';
+        $boucle->id_boucle = $id_table;
+        $boucle->id_table = $id_table;
+        $boucle->primary = $desc['key']['PRIMARY KEY'] ?? '';
+        $boucle->sql_serveur = $serveur;
+        $boucle->select[] = $id_table_objet;
+        $boucle->from[$table_objet] = table_objet_sql($objet, $serveur);
+        $boucle->where[] = $id_table . '.' . $id_table_objet . '=' . intval($id_objet);
+
+        $boucle->descr['nom'] = 'objet_test_si_publie'; // eviter notice php
+        $boucle->descr['sourcefile'] = 'internal';
+        $boucle->descr['gram'] = 'html';
+
+        include_spip('public/compiler');
+        include_spip('public/composer');
+        instituer_boucle($boucle, false, true);
+        $res = calculer_select(
+            $boucle->select,
+            $boucle->from,
+            $boucle->from_type,
+            $boucle->where,
+            $boucle->join,
+            $boucle->group,
+            $boucle->order,
+            $boucle->limit,
+            $boucle->having,
+            $table_objet,
+            $id_table,
+            $serveur
+        );
+        if (sql_fetch($res)) {
+            return true;
+        }
+
+        return false;
+    }
+
+    // si pas d'info statut ni de fonction : l'objet est publie
+    return true;
 }
 
 
@@ -1314,124 +1314,124 @@ 
  *     Retourne un tableau décrivant les parents trouvés
  */
 function objet_lister_parents($objet, $id_objet, $parent_direct_seulement = false) {
-	$parents = [];
-
-	// Si on trouve une ou des méthodes de parent
-	if ($parent_methodes = objet_type_decrire_infos_parents($objet)) {
-		// On identifie les informations sur l'objet source dont on cherche le parent.
-		include_spip('base/abstract_sql');
-		$table_objet = table_objet_sql($objet);
-		$cle_objet = id_table_objet($objet);
-		$id_objet = intval($id_objet);
-
-		// On teste chacun méthode dans l'ordre, et dès qu'on a trouvé un parent on s'arrête
-		foreach ($parent_methodes as $parent_methode) {
-			// Champ identifiant le parent (id et éventuellement le type)
-			// -- cette identification ne dépend pas du fait que le parent soit stocké dans une table de différente
-			//    de celle de l'objet source
-			$select = [];
-			if (isset($parent_methode['champ'])) {
-				$select[] = $parent_methode['champ'];
-			}
-			if (isset($parent_methode['champ_type'])) {
-				$select[] = $parent_methode['champ_type'];
-			}
-
-			// Détermination de la table du parent et des conditions sur l'objet source et le parent.
-			$condition_objet_invalide = false;
-			$where = [];
-			if (!isset($parent_methode['table'])) {
-				// Le parent est stocké dans la même table que l'objet source :
-				// -- toutes les conditions s'appliquent à la table source.
-				$table = $table_objet;
-				$where = ["$cle_objet = $id_objet"];
-				// -- Condition supplémentaire sur la détection du parent
-				if (isset($parent_methode['condition'])) {
-					$where[] = $parent_methode['condition'];
-				}
-			} elseif (!$parent_direct_seulement) {
-				// Le parent est stocké dans une table différente de l'objet source.
-				// -- on vérifie d'emblée si il y a une condition sur l'objet source et si celle-ci est vérifiée
-				//    Si non, on peut arrêter le traitement.
-				if (isset($parent_methode['condition'])) {
-					$where = [
-						"$cle_objet = $id_objet",
-						$parent_methode['condition']
-					];
-					if (!sql_countsel($table_objet, $where)) {
-						$condition_objet_invalide = true;
-					}
-				}
-
-				// Si pas de condition sur l'objet source ou que la condition est vérifiée, on peut construire
-				// la requête sur la table qui accueille le parent.
-				if (!$condition_objet_invalide) {
-					$table = $parent_methode['table'];
-					// On construit les conditions en fonction de l'identification de l'objet source
-					$where = [];
-					// -- si le champ_source de l'id n'est pas précisé c'est qu'il est déjà connu et donc que c'est
-					//    le même que celui de l'objet source.
-					$where[] = isset($parent_methode['source_champ'])
-						? "{$parent_methode['source_champ']} = $id_objet"
-						: "${cle_objet} = $id_objet";
-					if (isset($parent_methode['source_champ_type'])) {
-						$where[] = "{$parent_methode['source_champ_type']} = " . sql_quote($objet);
-					}
-					// -- Condition supplémentaire sur la détection du parent
-					if (isset($parent_methode['table_condition'])) {
-						$where[] = $parent_methode['table_condition'];
-					}
-				}
-			}
-
-			// On lance la requête de récupération du parent
-			$is_table_lien = (strpos($table, '_liens') !== false and substr($table, -6) === '_liens');
-			if (
-				!$condition_objet_invalide
-				and $where
-				and ($lignes = sql_allfetsel($is_table_lien ? '*' : $select, $table, $where))
-			) {
-				foreach ($lignes as $ligne) {
-					// Si le type est fixe
-					if (isset($parent_methode['type'])) {
-						$parent = [
-							'objet' 	=> $parent_methode['type'],
-							'id_objet'	=> intval($ligne[$parent_methode['champ']]),
-							'champ' 	=> $parent_methode['champ'],
-							'table'    => $table,
-						];
-					}
-					elseif (isset($parent_methode['champ_type'])) {
-						$parent = [
-							'objet' 	 => $ligne[$parent_methode['champ_type']],
-							'id_objet' 	 => intval($ligne[$parent_methode['champ']]),
-							'champ' 	 => $parent_methode['champ'],
-							'champ_type' => $parent_methode['champ_type'],
-							'table'    => $table,
-						];
-					}
-					if ($is_table_lien) {
-						$parent['lien'] = $ligne;
-					}
-					$parents[] = $parent;
-				}
-			}
-		}
-	}
-
-	// On passe par un pipeline avant de retourner
-	$parents = pipeline(
-		'objet_lister_parents',
-		[
-			'args' => [
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-			],
-			'data' => $parents,
-		]
-	);
-
-	return $parents;
+    $parents = [];
+
+    // Si on trouve une ou des méthodes de parent
+    if ($parent_methodes = objet_type_decrire_infos_parents($objet)) {
+        // On identifie les informations sur l'objet source dont on cherche le parent.
+        include_spip('base/abstract_sql');
+        $table_objet = table_objet_sql($objet);
+        $cle_objet = id_table_objet($objet);
+        $id_objet = intval($id_objet);
+
+        // On teste chacun méthode dans l'ordre, et dès qu'on a trouvé un parent on s'arrête
+        foreach ($parent_methodes as $parent_methode) {
+            // Champ identifiant le parent (id et éventuellement le type)
+            // -- cette identification ne dépend pas du fait que le parent soit stocké dans une table de différente
+            //    de celle de l'objet source
+            $select = [];
+            if (isset($parent_methode['champ'])) {
+                $select[] = $parent_methode['champ'];
+            }
+            if (isset($parent_methode['champ_type'])) {
+                $select[] = $parent_methode['champ_type'];
+            }
+
+            // Détermination de la table du parent et des conditions sur l'objet source et le parent.
+            $condition_objet_invalide = false;
+            $where = [];
+            if (!isset($parent_methode['table'])) {
+                // Le parent est stocké dans la même table que l'objet source :
+                // -- toutes les conditions s'appliquent à la table source.
+                $table = $table_objet;
+                $where = ["$cle_objet = $id_objet"];
+                // -- Condition supplémentaire sur la détection du parent
+                if (isset($parent_methode['condition'])) {
+                    $where[] = $parent_methode['condition'];
+                }
+            } elseif (!$parent_direct_seulement) {
+                // Le parent est stocké dans une table différente de l'objet source.
+                // -- on vérifie d'emblée si il y a une condition sur l'objet source et si celle-ci est vérifiée
+                //    Si non, on peut arrêter le traitement.
+                if (isset($parent_methode['condition'])) {
+                    $where = [
+                        "$cle_objet = $id_objet",
+                        $parent_methode['condition']
+                    ];
+                    if (!sql_countsel($table_objet, $where)) {
+                        $condition_objet_invalide = true;
+                    }
+                }
+
+                // Si pas de condition sur l'objet source ou que la condition est vérifiée, on peut construire
+                // la requête sur la table qui accueille le parent.
+                if (!$condition_objet_invalide) {
+                    $table = $parent_methode['table'];
+                    // On construit les conditions en fonction de l'identification de l'objet source
+                    $where = [];
+                    // -- si le champ_source de l'id n'est pas précisé c'est qu'il est déjà connu et donc que c'est
+                    //    le même que celui de l'objet source.
+                    $where[] = isset($parent_methode['source_champ'])
+                        ? "{$parent_methode['source_champ']} = $id_objet"
+                        : "${cle_objet} = $id_objet";
+                    if (isset($parent_methode['source_champ_type'])) {
+                        $where[] = "{$parent_methode['source_champ_type']} = " . sql_quote($objet);
+                    }
+                    // -- Condition supplémentaire sur la détection du parent
+                    if (isset($parent_methode['table_condition'])) {
+                        $where[] = $parent_methode['table_condition'];
+                    }
+                }
+            }
+
+            // On lance la requête de récupération du parent
+            $is_table_lien = (strpos($table, '_liens') !== false and substr($table, -6) === '_liens');
+            if (
+                !$condition_objet_invalide
+                and $where
+                and ($lignes = sql_allfetsel($is_table_lien ? '*' : $select, $table, $where))
+            ) {
+                foreach ($lignes as $ligne) {
+                    // Si le type est fixe
+                    if (isset($parent_methode['type'])) {
+                        $parent = [
+                            'objet' 	=> $parent_methode['type'],
+                            'id_objet'	=> intval($ligne[$parent_methode['champ']]),
+                            'champ' 	=> $parent_methode['champ'],
+                            'table'    => $table,
+                        ];
+                    }
+                    elseif (isset($parent_methode['champ_type'])) {
+                        $parent = [
+                            'objet' 	 => $ligne[$parent_methode['champ_type']],
+                            'id_objet' 	 => intval($ligne[$parent_methode['champ']]),
+                            'champ' 	 => $parent_methode['champ'],
+                            'champ_type' => $parent_methode['champ_type'],
+                            'table'    => $table,
+                        ];
+                    }
+                    if ($is_table_lien) {
+                        $parent['lien'] = $ligne;
+                    }
+                    $parents[] = $parent;
+                }
+            }
+        }
+    }
+
+    // On passe par un pipeline avant de retourner
+    $parents = pipeline(
+        'objet_lister_parents',
+        [
+            'args' => [
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+            ],
+            'data' => $parents,
+        ]
+    );
+
+    return $parents;
 }
 
 /**
@@ -1443,17 +1443,17 @@ 
  * @return array
  */
 function objet_lister_parents_par_type($objet, $id_objet) {
-	$parents = objet_lister_parents($objet, $id_objet);
+    $parents = objet_lister_parents($objet, $id_objet);
 
-	$parents_par_type = [];
-	foreach ($parents as $parent) {
-		if (!isset($parents_par_type[$parent['objet']])) {
-			$parents_par_type[$parent['objet']] = [];
-		}
-		$parents_par_type[$parent['objet']][] = $parent['id_objet'];
-	}
+    $parents_par_type = [];
+    foreach ($parents as $parent) {
+        if (!isset($parents_par_type[$parent['objet']])) {
+            $parents_par_type[$parent['objet']] = [];
+        }
+        $parents_par_type[$parent['objet']][] = $parent['id_objet'];
+    }
 
-	return $parents_par_type;
+    return $parents_par_type;
 }
 
 
@@ -1486,85 +1486,85 @@ 
  *     Retourne un tableau de tableaux, avec comme clés les types des objets, et dans chacun un tableau des identifiants trouvés
  */
 function objet_lister_enfants($objet, $id_objet) {
-	$enfants = [];
-
-	// Si on trouve des types d'enfants et leurs méthodes
-	if ($enfants_methodes = objet_type_decrire_infos_enfants($objet)) {
-		include_spip('base/abstract_sql');
-		$id_objet = intval($id_objet);
-
-		// On parcourt tous les types d'enfants trouvés
-		foreach ($enfants_methodes as $objet_enfant => $_methode_parent) {
-			// On construit les conditions d'identification du parent
-			$where = [];
-			// -- L'identifiant du parent
-			if (isset($_methode_parent['champ'])) {
-				$where[] = $_methode_parent['champ'] . ' = ' . $id_objet;
-			}
-			// -- Si le parent est variable
-			if (isset($_methode_parent['champ_type'])) {
-				$where[] = $_methode_parent['champ_type'] . ' = ' . sql_quote($objet);
-			}
-
-			// On détermine la table, le champ id des enfants et on complète éventuellement les conditions
-			if (!isset($_methode_parent['table'])) {
-				// Les enfants sont stockés dans la même table que l'objet parent :
-				$table_enfant = table_objet_sql($objet_enfant);
-				$cle_objet_enfant = id_table_objet($objet_enfant);
-
-				// S'il y a une condition supplémentaire
-				if (isset($_methode_parent['condition'])) {
-					$where[] = $_methode_parent['condition'];
-				}
-			} else {
-				// Les enfants sont stockés dans une table différente de l'objet parent.
-				$table_enfant = $_methode_parent['table'];
-				$cle_objet_enfant = $_methode_parent['source_champ'] ?? id_table_objet($objet_enfant);
-
-				// S'il y a une condition supplémentaire
-				if (isset($_methode_parent['table_condition'])) {
-					$where[] = $_methode_parent['table_condition'];
-				}
-			}
-
-			// On lance la requête
-			$is_table_lien = (strpos($table_enfant, '_liens') !== false and substr($table_enfant, -6) === '_liens');
-			if ($rows = sql_allfetsel($is_table_lien ? '*' : $cle_objet_enfant, $table_enfant, $where)) {
-				$enfant = [
-					'objet' => $objet_enfant,
-					'id_objet' => 0,
-					'table' => $table_enfant
-				];
-				if (isset($_methode_parent['champ'])) {
-					$enfant['champ'] = $_methode_parent['champ'];
-				}
-				if (isset($_methode_parent['champ_type'])) {
-					$enfant['champ_type'] = $_methode_parent['champ_type'];
-				}
-				foreach ($rows as $row) {
-					$enfant['id_objet'] = intval($row[$cle_objet_enfant]);
-					if ($is_table_lien) {
-						$enfant['lien'] = $row;
-					}
-					$enfants[] = $enfant;
-				}
-			}
-		}
-	}
-
-	// On passe par un pipeline avant de retourner
-	$enfants = pipeline(
-		'objet_lister_enfants',
-		[
-			'args' => [
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-			],
-			'data' => $enfants,
-		]
-	);
-
-	return $enfants;
+    $enfants = [];
+
+    // Si on trouve des types d'enfants et leurs méthodes
+    if ($enfants_methodes = objet_type_decrire_infos_enfants($objet)) {
+        include_spip('base/abstract_sql');
+        $id_objet = intval($id_objet);
+
+        // On parcourt tous les types d'enfants trouvés
+        foreach ($enfants_methodes as $objet_enfant => $_methode_parent) {
+            // On construit les conditions d'identification du parent
+            $where = [];
+            // -- L'identifiant du parent
+            if (isset($_methode_parent['champ'])) {
+                $where[] = $_methode_parent['champ'] . ' = ' . $id_objet;
+            }
+            // -- Si le parent est variable
+            if (isset($_methode_parent['champ_type'])) {
+                $where[] = $_methode_parent['champ_type'] . ' = ' . sql_quote($objet);
+            }
+
+            // On détermine la table, le champ id des enfants et on complète éventuellement les conditions
+            if (!isset($_methode_parent['table'])) {
+                // Les enfants sont stockés dans la même table que l'objet parent :
+                $table_enfant = table_objet_sql($objet_enfant);
+                $cle_objet_enfant = id_table_objet($objet_enfant);
+
+                // S'il y a une condition supplémentaire
+                if (isset($_methode_parent['condition'])) {
+                    $where[] = $_methode_parent['condition'];
+                }
+            } else {
+                // Les enfants sont stockés dans une table différente de l'objet parent.
+                $table_enfant = $_methode_parent['table'];
+                $cle_objet_enfant = $_methode_parent['source_champ'] ?? id_table_objet($objet_enfant);
+
+                // S'il y a une condition supplémentaire
+                if (isset($_methode_parent['table_condition'])) {
+                    $where[] = $_methode_parent['table_condition'];
+                }
+            }
+
+            // On lance la requête
+            $is_table_lien = (strpos($table_enfant, '_liens') !== false and substr($table_enfant, -6) === '_liens');
+            if ($rows = sql_allfetsel($is_table_lien ? '*' : $cle_objet_enfant, $table_enfant, $where)) {
+                $enfant = [
+                    'objet' => $objet_enfant,
+                    'id_objet' => 0,
+                    'table' => $table_enfant
+                ];
+                if (isset($_methode_parent['champ'])) {
+                    $enfant['champ'] = $_methode_parent['champ'];
+                }
+                if (isset($_methode_parent['champ_type'])) {
+                    $enfant['champ_type'] = $_methode_parent['champ_type'];
+                }
+                foreach ($rows as $row) {
+                    $enfant['id_objet'] = intval($row[$cle_objet_enfant]);
+                    if ($is_table_lien) {
+                        $enfant['lien'] = $row;
+                    }
+                    $enfants[] = $enfant;
+                }
+            }
+        }
+    }
+
+    // On passe par un pipeline avant de retourner
+    $enfants = pipeline(
+        'objet_lister_enfants',
+        [
+            'args' => [
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+            ],
+            'data' => $enfants,
+        ]
+    );
+
+    return $enfants;
 }
 
 /**
@@ -1576,17 +1576,17 @@ 
  * @return array
  */
 function objet_lister_enfants_par_type($objet, $id_objet) {
-	$enfants = objet_lister_enfants($objet, $id_objet);
+    $enfants = objet_lister_enfants($objet, $id_objet);
 
-	$enfants_par_type = [];
-	foreach ($enfants as $enfant) {
-		if (!isset($enfants_par_type[$enfant['objet']])) {
-			$enfants_par_type[$enfant['objet']] = [];
-		}
-		$enfants_par_type[$enfant['objet']][] = $enfant['id_objet'];
-	}
+    $enfants_par_type = [];
+    foreach ($enfants as $enfant) {
+        if (!isset($enfants_par_type[$enfant['objet']])) {
+            $enfants_par_type[$enfant['objet']] = [];
+        }
+        $enfants_par_type[$enfant['objet']][] = $enfant['id_objet'];
+    }
 
-	return $enfants_par_type;
+    return $enfants_par_type;
 }
 
 /**
@@ -1598,35 +1598,35 @@ 
  *     Retourne un tableau de tableau contenant les informations de type et de champ pour trouver le parent ou false sinon
  */
 function objet_type_decrire_infos_parents($objet) {
-	static $parents = [];
-
-	// Si on ne l'a pas encore cherché pour cet objet
-	if (!isset($parents[$objet])) {
-		$parents[$objet] = false;
-		$table = table_objet_sql($objet);
-
-		// Si on trouve bien la description de cet objet
-		if ($infos = lister_tables_objets_sql($table)) {
-			if (isset($infos['parent']) and is_array($infos['parent'])) {
-				// S'il y a une description explicite de parent, c'est prioritaire
-				// -- on traite les cas où il y a une ou plusieurs description mais on renvoie toujours un tableau
-				//    de description
-				if (!isset($infos['parent'][0])) {
-					$parents[$objet] = [$infos['parent']];
-				} else {
-					$parents[$objet] = $infos['parent'];
-				}
-			} elseif (isset($infos['field']['id_rubrique'])) {
-				// Sinon on cherche des cas courants connus magiquement, à commencer par id_rubrique
-				$parents[$objet] = [['type' => 'rubrique', 'champ' => 'id_rubrique']];
-			} elseif (isset($infos['field']['id_parent'])) {
-				// Sinon on cherche un champ id_parent, ce qui signifie que l'objet est parent de lui-même
-				$parents[$objet] = [['type' => $objet, 'champ' => 'id_parent']];
-			}
-		}
-	}
-
-	return $parents[$objet];
+    static $parents = [];
+
+    // Si on ne l'a pas encore cherché pour cet objet
+    if (!isset($parents[$objet])) {
+        $parents[$objet] = false;
+        $table = table_objet_sql($objet);
+
+        // Si on trouve bien la description de cet objet
+        if ($infos = lister_tables_objets_sql($table)) {
+            if (isset($infos['parent']) and is_array($infos['parent'])) {
+                // S'il y a une description explicite de parent, c'est prioritaire
+                // -- on traite les cas où il y a une ou plusieurs description mais on renvoie toujours un tableau
+                //    de description
+                if (!isset($infos['parent'][0])) {
+                    $parents[$objet] = [$infos['parent']];
+                } else {
+                    $parents[$objet] = $infos['parent'];
+                }
+            } elseif (isset($infos['field']['id_rubrique'])) {
+                // Sinon on cherche des cas courants connus magiquement, à commencer par id_rubrique
+                $parents[$objet] = [['type' => 'rubrique', 'champ' => 'id_rubrique']];
+            } elseif (isset($infos['field']['id_parent'])) {
+                // Sinon on cherche un champ id_parent, ce qui signifie que l'objet est parent de lui-même
+                $parents[$objet] = [['type' => $objet, 'champ' => 'id_parent']];
+            }
+        }
+    }
+
+    return $parents[$objet];
 }
 
 /**
@@ -1638,36 +1638,36 @@ 
  *     Retourne un tableau de tableaux contenant chacun les informations d'un type d'enfant
  */
 function objet_type_decrire_infos_enfants($objet) {
-	static $enfants = [];
-
-	// Si on a déjà fait la recherche pour ce type d'objet
-	if (!isset($enfants[$objet])) {
-		$enfants[$objet] = [];
-		$tables = lister_tables_objets_sql();
-
-		// On parcourt toutes les tables d'objet, et on cherche si chacune peut être enfant
-		foreach ($tables as $table => $infos) {
-			$objet_enfant = objet_type($table);
-
-			// On ne va pas refaire les tests des différents cas, on réutilise
-			if ($parent_methodes = objet_type_decrire_infos_parents($objet_enfant)) {
-				// On parcourt les différents cas possible, si certains peuvent concerner l'objet demandé
-				foreach ($parent_methodes as $parent_methode) {
-					// Si la méthode qu'on teste n'exclut pas le parent demandé
-					if (!isset($parent_methode['exclus']) or !in_array($objet, $parent_methode['exclus'])) {
-						// Si le type du parent est fixe et directement l'objet demandé
-						if (isset($parent_methode['type']) and isset($parent_methode['champ']) and $parent_methode['type'] == $objet) {
-							$enfants[$objet][$objet_enfant] = $parent_methode;
-						}
-						// Si le type est variable, alors l'objet demandé peut forcément être parent
-						elseif (isset($parent_methode['champ_type']) and isset($parent_methode['champ'])) {
-							$enfants[$objet][$objet_enfant] = $parent_methode;
-						}
-					}
-				}
-			}
-		}
-	}
-
-	return $enfants[$objet];
+    static $enfants = [];
+
+    // Si on a déjà fait la recherche pour ce type d'objet
+    if (!isset($enfants[$objet])) {
+        $enfants[$objet] = [];
+        $tables = lister_tables_objets_sql();
+
+        // On parcourt toutes les tables d'objet, et on cherche si chacune peut être enfant
+        foreach ($tables as $table => $infos) {
+            $objet_enfant = objet_type($table);
+
+            // On ne va pas refaire les tests des différents cas, on réutilise
+            if ($parent_methodes = objet_type_decrire_infos_parents($objet_enfant)) {
+                // On parcourt les différents cas possible, si certains peuvent concerner l'objet demandé
+                foreach ($parent_methodes as $parent_methode) {
+                    // Si la méthode qu'on teste n'exclut pas le parent demandé
+                    if (!isset($parent_methode['exclus']) or !in_array($objet, $parent_methode['exclus'])) {
+                        // Si le type du parent est fixe et directement l'objet demandé
+                        if (isset($parent_methode['type']) and isset($parent_methode['champ']) and $parent_methode['type'] == $objet) {
+                            $enfants[$objet][$objet_enfant] = $parent_methode;
+                        }
+                        // Si le type est variable, alors l'objet demandé peut forcément être parent
+                        elseif (isset($parent_methode['champ_type']) and isset($parent_methode['champ'])) {
+                            $enfants[$objet][$objet_enfant] = $parent_methode;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    return $enfants[$objet];
 }

ecrire/base/abstract_sql.php

Indentation +693 added lines, -693 removed lines

@@ -25,7 +25,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /** Version de l'API SQL */
@@ -45,39 +45,39 @@ 
  *     contexte de l'erreur
  **/
 function sql_error_backtrace($compil_info = false) {
-	$trace = debug_backtrace();
-	$caller = array_shift($trace);
-	while (count($trace) and (empty($trace[0]['file']) or $trace[0]['file'] === $caller['file'] or $trace[0]['file'] === __FILE__)) {
-		array_shift($trace);
-	}
-
-	if ($compil_info) {
-		$contexte_compil = [
-			$trace[0]['file'],// sourcefile
-			'', //nom
-			(isset($trace[1]) ? $trace[1]['function'] . "(){\n" : '')
-			. $trace[0]['function'] . '();'
-			. (isset($trace[1]) ? "\n}" : ''), //id_boucle
-			$trace[0]['line'], // ligne
-			$GLOBALS['spip_lang'], // lang
-		];
-
-		return $contexte_compil;
-	}
-
-	$message = count($trace) ? $trace[0]['file'] . ' L' . $trace[0]['line'] : '';
-	$f = [];
-	while (count($trace) and $t = array_shift($trace)) {
-		if (in_array($t['function'], ['include_once', 'include_spip', 'find_in_path'])) {
-			break;
-		}
-		$f[] = $t['function'];
-	}
-	if (count($f)) {
-		$message .= ' [' . implode('(),', $f) . '()]';
-	}
-
-	return $message;
+    $trace = debug_backtrace();
+    $caller = array_shift($trace);
+    while (count($trace) and (empty($trace[0]['file']) or $trace[0]['file'] === $caller['file'] or $trace[0]['file'] === __FILE__)) {
+        array_shift($trace);
+    }
+
+    if ($compil_info) {
+        $contexte_compil = [
+            $trace[0]['file'],// sourcefile
+            '', //nom
+            (isset($trace[1]) ? $trace[1]['function'] . "(){\n" : '')
+            . $trace[0]['function'] . '();'
+            . (isset($trace[1]) ? "\n}" : ''), //id_boucle
+            $trace[0]['line'], // ligne
+            $GLOBALS['spip_lang'], // lang
+        ];
+
+        return $contexte_compil;
+    }
+
+    $message = count($trace) ? $trace[0]['file'] . ' L' . $trace[0]['line'] : '';
+    $f = [];
+    while (count($trace) and $t = array_shift($trace)) {
+        if (in_array($t['function'], ['include_once', 'include_spip', 'find_in_path'])) {
+            break;
+        }
+        $f[] = $t['function'];
+    }
+    if (count($f)) {
+        $message .= ' [' . implode('(),', $f) . '()]';
+    }
+
+    return $message;
 }
 
 
@@ -102,16 +102,16 @@ 
  *
  **/
 function sql_serveur($ins_sql = '', $serveur = '', $continue = false) {
-	static $sql_serveur = [];
-	if (!isset($sql_serveur[$serveur][$ins_sql])) {
-		$f = spip_connect_sql(\SQL_ABSTRACT_VERSION, $ins_sql, $serveur, $continue);
-		if (!is_string($f) or !$f) {
-			return $f;
-		}
-		$sql_serveur[$serveur][$ins_sql] = $f;
-	}
-
-	return $sql_serveur[$serveur][$ins_sql];
+    static $sql_serveur = [];
+    if (!isset($sql_serveur[$serveur][$ins_sql])) {
+        $f = spip_connect_sql(\SQL_ABSTRACT_VERSION, $ins_sql, $serveur, $continue);
+        if (!is_string($f) or !$f) {
+            return $f;
+        }
+        $sql_serveur[$serveur][$ins_sql] = $f;
+    }
+
+    return $sql_serveur[$serveur][$ins_sql];
 }
 
 /**
@@ -133,23 +133,23 @@ 
  *     Retourne le nom du charset si effectivement trouvé, sinon false.
  **/
 function sql_get_charset($charset, $serveur = '', $option = true) {
-	// le nom http du charset differe parfois du nom SQL utf-8 ==> utf8 etc.
-	$desc = sql_serveur('', $serveur, true);
-	$desc = $desc[\SQL_ABSTRACT_VERSION];
-	$c = $desc['charsets'][$charset];
-	if ($c) {
-		if (function_exists($f = @$desc['get_charset'])) {
-			if ($f($c, $serveur, $option !== false)) {
-				return $c;
-			}
-		}
-	}
-	spip_log(
-		"SPIP ne connait pas les Charsets disponibles sur le serveur $serveur. Le serveur choisira seul.",
-		_LOG_AVERTISSEMENT
-	);
-
-	return false;
+    // le nom http du charset differe parfois du nom SQL utf-8 ==> utf8 etc.
+    $desc = sql_serveur('', $serveur, true);
+    $desc = $desc[\SQL_ABSTRACT_VERSION];
+    $c = $desc['charsets'][$charset];
+    if ($c) {
+        if (function_exists($f = @$desc['get_charset'])) {
+            if ($f($c, $serveur, $option !== false)) {
+                return $c;
+            }
+        }
+    }
+    spip_log(
+        "SPIP ne connait pas les Charsets disponibles sur le serveur $serveur. Le serveur choisira seul.",
+        _LOG_AVERTISSEMENT
+    );
+
+    return false;
 }
 
 
@@ -175,12 +175,12 @@ 
  *    Retourne true si elle reussie.
  **/
 function sql_set_charset($charset, $serveur = '', $option = true) {
-	$f = sql_serveur('set_charset', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('set_charset', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($charset, $serveur, $option !== false);
+    return $f($charset, $serveur, $option !== false);
 }
 
 
@@ -231,59 +231,59 @@ 
  *
  **/
 function sql_select(
-	$select = [],
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = '',
-	$option = true
+    $select = [],
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = '',
+    $option = true
 ) {
-	$f = sql_serveur('select', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-
-	$debug = (defined('_VAR_MODE') and _VAR_MODE == 'debug');
-	if (($option !== false) and !$debug) {
-		$res = $f(
-			$select,
-			$from,
-			$where,
-			$groupby,
-			$orderby,
-			$limit,
-			$having,
-			$serveur,
-			is_array($option) ? true : $option
-		);
-	} else {
-		$query = $f($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, false);
-		if (!$option) {
-			return $query;
-		}
-		// le debug, c'est pour ce qui a ete produit par le compilateur
-		if (isset($GLOBALS['debug']['aucasou'])) {
-			[$table, $id, ] = $GLOBALS['debug']['aucasou'];
-			$nom = $GLOBALS['debug_objets']['courant'] . $id;
-			$GLOBALS['debug_objets']['requete'][$nom] = $query;
-		}
-		$res = $f($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, true);
-	}
-
-	// en cas d'erreur
-	if (!is_string($res)) {
-		return $res;
-	}
-	// denoncer l'erreur SQL dans sa version brute
-	spip_sql_erreur($serveur);
-	// idem dans sa version squelette (prefixe des tables non substitue)
-	$contexte_compil = sql_error_backtrace(true);
-	erreur_squelette([sql_errno($serveur), sql_error($serveur), $res], $contexte_compil);
-
-	return false;
+    $f = sql_serveur('select', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+
+    $debug = (defined('_VAR_MODE') and _VAR_MODE == 'debug');
+    if (($option !== false) and !$debug) {
+        $res = $f(
+            $select,
+            $from,
+            $where,
+            $groupby,
+            $orderby,
+            $limit,
+            $having,
+            $serveur,
+            is_array($option) ? true : $option
+        );
+    } else {
+        $query = $f($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, false);
+        if (!$option) {
+            return $query;
+        }
+        // le debug, c'est pour ce qui a ete produit par le compilateur
+        if (isset($GLOBALS['debug']['aucasou'])) {
+            [$table, $id, ] = $GLOBALS['debug']['aucasou'];
+            $nom = $GLOBALS['debug_objets']['courant'] . $id;
+            $GLOBALS['debug_objets']['requete'][$nom] = $query;
+        }
+        $res = $f($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, true);
+    }
+
+    // en cas d'erreur
+    if (!is_string($res)) {
+        return $res;
+    }
+    // denoncer l'erreur SQL dans sa version brute
+    spip_sql_erreur($serveur);
+    // idem dans sa version squelette (prefixe des tables non substitue)
+    $contexte_compil = sql_error_backtrace(true);
+    erreur_squelette([sql_errno($serveur), sql_error($serveur), $res], $contexte_compil);
+
+    return false;
 }
 
 
@@ -320,16 +320,16 @@ 
  *
  **/
 function sql_get_select(
-	$select = [],
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = ''
+    $select = [],
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = ''
 ) {
-	return sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, false);
+    return sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, false);
 }
 
 
@@ -373,23 +373,23 @@ 
  *
  **/
 function sql_countsel(
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$having = [],
-	$serveur = '',
-	$option = true
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $having = [],
+    $serveur = '',
+    $option = true
 ) {
-	$f = sql_serveur('countsel', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($from, $where, $groupby, $having, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('countsel', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($from, $where, $groupby, $having, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -421,16 +421,16 @@ 
  *     Ce retour n'est pas pertinent pour savoir si l'opération est correctement réalisée.
  **/
 function sql_alter($q, $serveur = '', $option = true) {
-	$f = sql_serveur('alter', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($q, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('alter', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($q, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -453,12 +453,12 @@ 
  *    presentant une ligne de resultat d'une selection
  */
 function sql_fetch($res, $serveur = '', $option = true) {
-	$f = sql_serveur('fetch', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('fetch', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($res, null, $serveur, $option !== false);
+    return $f($res, null, $serveur, $option !== false);
 }
 
 
@@ -485,20 +485,20 @@ 
  *    presentant une ligne de resultat d'une selection
  */
 function sql_fetch_all($res, $serveur = '', $option = true) {
-	$rows = [];
-	if (!$res) {
-		return $rows;
-	}
-	$f = sql_serveur('fetch', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return [];
-	}
-	while ($r = $f($res, null, $serveur, $option !== false)) {
-		$rows[] = $r;
-	}
-	sql_free($res, $serveur);
-
-	return $rows;
+    $rows = [];
+    if (!$res) {
+        return $rows;
+    }
+    $f = sql_serveur('fetch', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return [];
+    }
+    while ($r = $f($res, null, $serveur, $option !== false)) {
+        $rows[] = $r;
+    }
+    sql_free($res, $serveur);
+
+    return $rows;
 }
 
 /**
@@ -526,16 +526,16 @@ 
  *    Operation effectuée (true), sinon false.
  **/
 function sql_seek($res, $row_number, $serveur = '', $option = true) {
-	$f = sql_serveur('seek', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($res, $row_number, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('seek', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($res, $row_number, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -560,16 +560,16 @@ 
  *    False en cas d'erreur.
  **/
 function sql_listdbs($serveur = '', $option = true) {
-	$f = sql_serveur('listdbs', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($serveur);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('listdbs', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($serveur);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -592,16 +592,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_selectdb($nom, $serveur = '', $option = true) {
-	$f = sql_serveur('selectdb', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($nom, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('selectdb', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($nom, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -626,16 +626,16 @@ 
  *     - false en cas d'erreur.
  **/
 function sql_count($res, $serveur = '', $option = true) {
-	$f = sql_serveur('count', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($res, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('count', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($res, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -657,12 +657,12 @@ 
  *     True si réussi
  */
 function sql_free($res, $serveur = '', $option = true) {
-	$f = sql_serveur('free', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('free', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($res);
+    return $f($res);
 }
 
 
@@ -700,17 +700,17 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_insert($table, $noms, $valeurs, $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('insert', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $noms, $valeurs, $desc, $serveur, $option !== false);
-	if ($r === false or $r === null) {
-		spip_sql_erreur($serveur);
-		$r = false;
-	}
-
-	return $r;
+    $f = sql_serveur('insert', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $noms, $valeurs, $desc, $serveur, $option !== false);
+    if ($r === false or $r === null) {
+        spip_sql_erreur($serveur);
+        $r = false;
+    }
+
+    return $r;
 }
 
 /**
@@ -751,17 +751,17 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_insertq($table, $couples = [], $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('insertq', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $couples, $desc, $serveur, $option !== false);
-	if ($r === false or $r === null) {
-		spip_sql_erreur($serveur);
-		$r = false;
-	}
-
-	return $r;
+    $f = sql_serveur('insertq', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $couples, $desc, $serveur, $option !== false);
+    if ($r === false or $r === null) {
+        spip_sql_erreur($serveur);
+        $r = false;
+    }
+
+    return $r;
 }
 
 /**
@@ -796,17 +796,17 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_insertq_multi($table, $couples = [], $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('insertq_multi', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $couples, $desc, $serveur, $option !== false);
-	if ($r === false or $r === null) {
-		spip_sql_erreur($serveur);
-		$r = false;
-	}
-
-	return $r;
+    $f = sql_serveur('insertq_multi', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $couples, $desc, $serveur, $option !== false);
+    if ($r === false or $r === null) {
+        spip_sql_erreur($serveur);
+        $r = false;
+    }
+
+    return $r;
 }
 
 /**
@@ -846,16 +846,16 @@ 
  *     - array Tableau décrivant la requête et son temps d'exécution si var_profile est actif
  */
 function sql_update($table, $exp, $where = '', $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('update', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $exp, $where, $desc, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('update', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $exp, $where, $desc, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -901,16 +901,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_updateq($table, $exp, $where = '', $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('updateq', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $exp, $where, $desc, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('updateq', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $exp, $where, $desc, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -941,16 +941,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_delete($table, $where = '', $serveur = '', $option = true) {
-	$f = sql_serveur('delete', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $where, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('delete', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $where, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -986,16 +986,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_replace($table, $couples, $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('replace', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $couples, $desc, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('replace', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $couples, $desc, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -1033,16 +1033,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_replace_multi($table, $tab_couples, $desc = [], $serveur = '', $option = true) {
-	$f = sql_serveur('replace_multi', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $tab_couples, $desc, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('replace_multi', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $tab_couples, $desc, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1070,16 +1070,16 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_drop_table($table, $exist = '', $serveur = '', $option = true) {
-	$f = sql_serveur('drop_table', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $exist, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('drop_table', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $exist, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1103,16 +1103,16 @@ 
  *     - true si la requête a réussie, false sinon
  */
 function sql_drop_view($table, $exist = '', $serveur = '', $option = true) {
-	$f = sql_serveur('drop_view', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $exist, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('drop_view', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $exist, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1136,18 +1136,18 @@ 
  *     Ressource à utiliser avec sql_fetch()
  **/
 function sql_showbase($spip = null, $serveur = '', $option = true) {
-	$f = sql_serveur('showbase', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-
-	// la globale n'est remplie qu'apres l'appel de sql_serveur.
-	if ($spip == null) {
-		$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-		$spip = $connexion['prefixe'] . '\_%';
-	}
-
-	return $f($spip, $serveur, $option !== false);
+    $f = sql_serveur('showbase', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+
+    // la globale n'est remplie qu'apres l'appel de sql_serveur.
+    if ($spip == null) {
+        $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+        $spip = $connexion['prefixe'] . '\_%';
+    }
+
+    return $f($spip, $serveur, $option !== false);
 }
 
 /**
@@ -1170,15 +1170,15 @@ 
  *     Liste des tables SQL
  **/
 function sql_alltable($spip = null, $serveur = '', $option = true) {
-	$q = sql_showbase($spip, $serveur, $option);
-	$r = [];
-	if ($q) {
-		while ($t = sql_fetch($q, $serveur)) {
-			$r[] = array_shift($t);
-		}
-	}
-
-	return $r;
+    $q = sql_showbase($spip, $serveur, $option);
+    $r = [];
+    if ($q) {
+        while ($t = sql_fetch($q, $serveur)) {
+            $r[] = array_shift($t);
+        }
+    }
+
+    return $r;
 }
 
 /**
@@ -1211,31 +1211,31 @@ 
  *       - 'join' => array() // jointures, si déclarées.
  **/
 function sql_showtable($table, $table_spip = false, $serveur = '', $option = true) {
-	$f = sql_serveur('showtable', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-
-	// la globale n'est remplie qu'apres l'appel de sql_serveur.
-	if ($table_spip) {
-		$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-		$prefixe = $connexion['prefixe'];
-		$vraie_table = prefixer_table_spip($table, $prefixe);
-	} else {
-		$vraie_table = $table;
-	}
-
-	$f = $f($vraie_table, $serveur, $option !== false);
-	if (!$f) {
-		return [];
-	}
-	if (isset($GLOBALS['tables_principales'][$table]['join'])) {
-		$f['join'] = $GLOBALS['tables_principales'][$table]['join'];
-	} elseif (isset($GLOBALS['tables_auxiliaires'][$table]['join'])) {
-		$f['join'] = $GLOBALS['tables_auxiliaires'][$table]['join'];
-	}
-
-	return $f;
+    $f = sql_serveur('showtable', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+
+    // la globale n'est remplie qu'apres l'appel de sql_serveur.
+    if ($table_spip) {
+        $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+        $prefixe = $connexion['prefixe'];
+        $vraie_table = prefixer_table_spip($table, $prefixe);
+    } else {
+        $vraie_table = $table;
+    }
+
+    $f = $f($vraie_table, $serveur, $option !== false);
+    if (!$f) {
+        return [];
+    }
+    if (isset($GLOBALS['tables_principales'][$table]['join'])) {
+        $f['join'] = $GLOBALS['tables_principales'][$table]['join'];
+    } elseif (isset($GLOBALS['tables_auxiliaires'][$table]['join'])) {
+        $f['join'] = $GLOBALS['tables_auxiliaires'][$table]['join'];
+    }
+
+    return $f;
 }
 
 
@@ -1263,21 +1263,21 @@ 
  *     - False en cas d'erreur.
  **/
 function sql_table_exists(string $table, bool $table_spip = true, $serveur = '', $option = true) {
-	$f = sql_serveur('table_exists', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-
-	// la globale n'est remplie qu'apres l'appel de sql_serveur.
-	if ($table_spip) {
-		$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-		$prefixe = $connexion['prefixe'];
-		$vraie_table = prefixer_table_spip($table, $prefixe);
-	} else {
-		$vraie_table = $table;
-	}
-
-	return $f($vraie_table, $serveur, $option !== false);
+    $f = sql_serveur('table_exists', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+
+    // la globale n'est remplie qu'apres l'appel de sql_serveur.
+    if ($table_spip) {
+        $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+        $prefixe = $connexion['prefixe'];
+        $vraie_table = prefixer_table_spip($table, $prefixe);
+    } else {
+        $vraie_table = $table;
+    }
+
+    return $f($vraie_table, $serveur, $option !== false);
 }
 
 
@@ -1323,24 +1323,24 @@ 
  *     true si succès, false en cas d'echec
  **/
 function sql_create(
-	$nom,
-	$champs,
-	$cles = [],
-	$autoinc = false,
-	$temporary = false,
-	$serveur = '',
-	$option = true
+    $nom,
+    $champs,
+    $cles = [],
+    $autoinc = false,
+    $temporary = false,
+    $serveur = '',
+    $option = true
 ) {
-	$f = sql_serveur('create', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($nom, $champs, $cles, $autoinc, $temporary, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('create', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($nom, $champs, $cles, $autoinc, $temporary, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1358,16 +1358,16 @@ 
  * @return bool true si la base est créee.
  **/
 function sql_create_base($nom, $serveur = '', $option = true) {
-	$f = sql_serveur('create_base', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($nom, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('create_base', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($nom, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -1397,16 +1397,16 @@ 
  *     - false en cas d'échec.
  **/
 function sql_create_view($nom, $select_query, $serveur = '', $option = true) {
-	$f = sql_serveur('create_view', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($nom, $select_query, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('create_view', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($nom, $select_query, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1435,12 +1435,12 @@ 
  *     Texte de sélection pour la requête
  */
 function sql_multi($sel, $lang, $serveur = '', $option = true) {
-	$f = sql_serveur('multi', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('multi', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($sel, $lang);
+    return $f($sel, $lang);
 }
 
 
@@ -1455,12 +1455,12 @@ 
  *      False si le serveur est indisponible
  */
 function sql_error($serveur = '') {
-	$f = sql_serveur('error', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('error', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f('query inconnue', $serveur);
+    return $f('query inconnue', $serveur);
 }
 
 /**
@@ -1474,12 +1474,12 @@ 
  *      False si le serveur est indisponible
  */
 function sql_errno($serveur = '') {
-	$f = sql_serveur('errno', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('errno', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($serveur);
+    return $f($serveur);
 }
 
 /**
@@ -1497,16 +1497,16 @@ 
  * @return array           Tableau de l'explication
  */
 function sql_explain($q, $serveur = '', $option = true) {
-	$f = sql_serveur('explain', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($q, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('explain', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($q, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1524,16 +1524,16 @@ 
  * @return bool            Toujours true
  */
 function sql_optimize($table, $serveur = '', $option = true) {
-	$f = sql_serveur('optimize', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('optimize', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1553,16 +1553,16 @@ 
  *     - true si la requête a réussie, false sinon
  */
 function sql_repair($table, $serveur = '', $option = true) {
-	$f = sql_serveur('repair', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($table, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('repair', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($table, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 
@@ -1587,16 +1587,16 @@ 
  *     - array : Tableau décrivant requête et temps d'exécution si var_profile actif pour tracer.
  */
 function sql_query($ins, $serveur = '', $option = true) {
-	$f = sql_serveur('query', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($ins, $serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('query', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($ins, $serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 /**
@@ -1644,27 +1644,27 @@ 
  *
  **/
 function sql_fetsel(
-	$select = [],
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = '',
-	$option = true
+    $select = [],
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = '',
+    $option = true
 ) {
-	$q = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
-	if ($option === false) {
-		return $q;
-	}
-	if (!$q) {
-		return [];
-	}
-	$r = sql_fetch($q, $serveur, $option);
-	sql_free($q, $serveur, $option);
-
-	return $r;
+    $q = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
+    if ($option === false) {
+        return $q;
+    }
+    if (!$q) {
+        return [];
+    }
+    $r = sql_fetch($q, $serveur, $option);
+    sql_free($q, $serveur, $option);
+
+    return $r;
 }
 
 
@@ -1721,22 +1721,22 @@ 
  *
  **/
 function sql_allfetsel(
-	$select = [],
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = '',
-	$option = true
+    $select = [],
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = '',
+    $option = true
 ) {
-	$q = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
-	if ($option === false) {
-		return $q;
-	}
+    $q = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
+    if ($option === false) {
+        return $q;
+    }
 
-	return sql_fetch_all($q, $serveur, $option);
+    return sql_fetch_all($q, $serveur, $option);
 }
 
 
@@ -1783,33 +1783,33 @@ 
  *
  **/
 function sql_getfetsel(
-	$select,
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = '',
-	$option = true
+    $select,
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = '',
+    $option = true
 ) {
-	if (preg_match('/\s+as\s+(\w+)$/i', $select, $c)) {
-		$id = $c[1];
-	} elseif (!preg_match('/\W/', $select)) {
-		$id = $select;
-	} else {
-		$id = 'n';
-		$select .= ' AS n';
-	}
-	$r = sql_fetsel($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
-	if ($option === false) {
-		return $r;
-	}
-	if (!$r) {
-		return null;
-	}
-
-	return $r[$id];
+    if (preg_match('/\s+as\s+(\w+)$/i', $select, $c)) {
+        $id = $c[1];
+    } elseif (!preg_match('/\W/', $select)) {
+        $id = $select;
+    } else {
+        $id = 'n';
+        $select .= ' AS n';
+    }
+    $r = sql_fetsel($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur, $option);
+    if ($option === false) {
+        return $r;
+    }
+    if (!$r) {
+        return null;
+    }
+
+    return $r[$id];
 }
 
 /**
@@ -1827,9 +1827,9 @@ 
  *    Numero de version du serveur SQL
  **/
 function sql_version($serveur = '', $option = true) {
-	$row = sql_fetsel('version() AS n', '', '', '', '', '', '', $serveur);
+    $row = sql_fetsel('version() AS n', '', '', '', '', '', '', $serveur);
 
-	return ($row['n']);
+    return ($row['n']);
 }
 
 /**
@@ -1865,16 +1865,16 @@ 
  *    Le serveur SQL prefere t'il des transactions pour les insertions multiples ?
  **/
 function sql_preferer_transaction($serveur = '', $option = true) {
-	$f = sql_serveur('preferer_transaction', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('preferer_transaction', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 ;
@@ -1899,16 +1899,16 @@ 
  *      false en cas d'erreur
  **/
 function sql_demarrer_transaction($serveur = '', $option = true) {
-	$f = sql_serveur('demarrer_transaction', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('demarrer_transaction', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 ;
@@ -1933,16 +1933,16 @@ 
  *      false en cas d'erreur
  **/
 function sql_terminer_transaction($serveur = '', $option = true) {
-	$f = sql_serveur('terminer_transaction', $serveur, 'continue');
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-	$r = $f($serveur, $option !== false);
-	if ($r === false) {
-		spip_sql_erreur($serveur);
-	}
-
-	return $r;
+    $f = sql_serveur('terminer_transaction', $serveur, 'continue');
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+    $r = $f($serveur, $option !== false);
+    if ($r === false) {
+        spip_sql_erreur($serveur);
+    }
+
+    return $r;
 }
 
 ;
@@ -1969,12 +1969,12 @@ 
  *     Valeur hexadécimale attendue par le serveur SQL
  **/
 function sql_hex($val, $serveur = '', $option = true) {
-	$f = sql_serveur('hex', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('hex', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($val);
+    return $f($val);
 }
 
 /**
@@ -2000,12 +2000,12 @@ 
  *     La chaine echappee
  **/
 function sql_quote($val, $serveur = '', $type = '') {
-	$f = sql_serveur('quote', $serveur, true);
-	if (!is_string($f) or !$f) {
-		$f = '_q';
-	}
+    $f = sql_serveur('quote', $serveur, true);
+    if (!is_string($f) or !$f) {
+        $f = '_q';
+    }
 
-	return $f($val, $type);
+    return $f($val, $type);
 }
 
 /**
@@ -2030,12 +2030,12 @@ 
  *     - false si le serveur SQL est indisponible
  **/
 function sql_date_proche($champ, $interval, $unite, $serveur = '', $option = true) {
-	$f = sql_serveur('date_proche', $serveur, true);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
+    $f = sql_serveur('date_proche', $serveur, true);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
 
-	return $f($champ, $interval, $unite);
+    return $f($champ, $interval, $unite);
 }
 
 /**
@@ -2071,26 +2071,26 @@ 
  *     Expression de requête SQL
  **/
 function sql_in_quote($champ, $valeurs, $not = '', $serveur = '', $type = '', $option = true) {
-	$quote = sql_serveur('quote', $serveur, true);
-	if (!is_string($quote) or !$quote) {
-		return false;
-	}
-
-	// sql_quote produit une chaine dans tous les cas
-	$valeurs = array_filter($valeurs, fn($v) => !is_array($v));
-	$valeurs = array_unique($valeurs);
-	$valeurs = $quote($valeurs, $type);
-
-	if (!strlen(trim($valeurs))) {
-		return ($not ? '0=0' : '0=1');
-	}
-
-	$f = sql_serveur('in', $serveur, $option === 'continue' or $option === false);
-	if (!is_string($f) or !$f) {
-		return false;
-	}
-
-	return $f($champ, $valeurs, $not ? 'NOT' : '', $serveur, $option !== false);
+    $quote = sql_serveur('quote', $serveur, true);
+    if (!is_string($quote) or !$quote) {
+        return false;
+    }
+
+    // sql_quote produit une chaine dans tous les cas
+    $valeurs = array_filter($valeurs, fn($v) => !is_array($v));
+    $valeurs = array_unique($valeurs);
+    $valeurs = $quote($valeurs, $type);
+
+    if (!strlen(trim($valeurs))) {
+        return ($not ? '0=0' : '0=1');
+    }
+
+    $f = sql_serveur('in', $serveur, $option === 'continue' or $option === false);
+    if (!is_string($f) or !$f) {
+        return false;
+    }
+
+    return $f($champ, $valeurs, $not ? 'NOT' : '', $serveur, $option !== false);
 }
 
 /**
@@ -2107,19 +2107,19 @@ 
  * @param bool $option
  */
 function sql_in($champ, $valeurs, $not = '', $serveur = '', $option = true) {
-	$type = '';
-	if (!is_array($valeurs)) {
-		$valeurs = strval($valeurs);
-		if (isset($valeurs[0]) and $valeurs[0] === ',') {
-			$valeurs = substr($valeurs, 1);
-		}
-		// on explode en tableau pour pouvoir securiser le contenu
-		$valeurs = explode(',', $valeurs);
-		// et on force un cast de type int donc
-		$type = 'int';
-	}
-
-	return sql_in_quote($champ, $valeurs, $not, $serveur, $type, $option);
+    $type = '';
+    if (!is_array($valeurs)) {
+        $valeurs = strval($valeurs);
+        if (isset($valeurs[0]) and $valeurs[0] === ',') {
+            $valeurs = substr($valeurs, 1);
+        }
+        // on explode en tableau pour pouvoir securiser le contenu
+        $valeurs = explode(',', $valeurs);
+        // et on force un cast de type int donc
+        $type = 'int';
+    }
+
+    return sql_in_quote($champ, $valeurs, $not, $serveur, $type, $option);
 }
 
 
@@ -2160,24 +2160,24 @@ 
  *     Expression de requête SQL
  **/
 function sql_in_select(
-	$in,
-	$select,
-	$from = [],
-	$where = [],
-	$groupby = [],
-	$orderby = [],
-	$limit = '',
-	$having = [],
-	$serveur = ''
+    $in,
+    $select,
+    $from = [],
+    $where = [],
+    $groupby = [],
+    $orderby = [],
+    $limit = '',
+    $having = [],
+    $serveur = ''
 ) {
-	$liste = [];
-	$res = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur);
-	while ($r = sql_fetch($res)) {
-		$liste[] = array_shift($r);
-	}
-	sql_free($res);
-
-	return sql_in($in, $liste);
+    $liste = [];
+    $res = sql_select($select, $from, $where, $groupby, $orderby, $limit, $having, $serveur);
+    while ($r = sql_fetch($res)) {
+        $liste[] = array_shift($r);
+    }
+    sql_free($res);
+
+    return sql_in($in, $liste);
 }
 
 /**
@@ -2209,29 +2209,29 @@ 
  *    Position apres le saut.
  */
 function sql_skip($res, $pos, $saut, $count, $serveur = '', $option = true) {
-	// pas de saut en arriere qu'on ne sait pas faire sans sql_seek
-	if (($saut = intval($saut)) <= 0) {
-		return $pos;
-	}
-
-	$seek = $pos + $saut;
-	// si le saut fait depasser le maxi, on libere la resource
-	// et on sort
-	if ($seek >= $count) {
-		sql_free($res, $serveur, $option);
-
-		return $count;
-	}
-
-	if (sql_seek($res, $seek)) {
-		$pos = $seek;
-	} else {
-		while ($pos < $seek and sql_fetch($res, $serveur, $option)) {
-			$pos++;
-		}
-	}
-
-	return $pos;
+    // pas de saut en arriere qu'on ne sait pas faire sans sql_seek
+    if (($saut = intval($saut)) <= 0) {
+        return $pos;
+    }
+
+    $seek = $pos + $saut;
+    // si le saut fait depasser le maxi, on libere la resource
+    // et on sort
+    if ($seek >= $count) {
+        sql_free($res, $serveur, $option);
+
+        return $count;
+    }
+
+    if (sql_seek($res, $seek)) {
+        $pos = $seek;
+    } else {
+        while ($pos < $seek and sql_fetch($res, $serveur, $option)) {
+            $pos++;
+        }
+    }
+
+    return $pos;
 }
 
 
@@ -2251,7 +2251,7 @@ 
  *     True si le champ est de type entier
  */
 function sql_test_int($type, $serveur = '', $option = true) {
-	return preg_match('/^(TINYINT|SMALLINT|MEDIUMINT|INT|INTEGER|BIGINT)/i', trim($type));
+    return preg_match('/^(TINYINT|SMALLINT|MEDIUMINT|INT|INTEGER|BIGINT)/i', trim($type));
 }
 
 /**
@@ -2270,7 +2270,7 @@ 
  *     True si le champ est de type entier
  */
 function sql_test_date($type, $serveur = '', $option = true) {
-	return preg_match('/^(DATE|DATETIME|TIMESTAMP|TIME)/i', trim($type));
+    return preg_match('/^(DATE|DATETIME|TIMESTAMP|TIME)/i', trim($type));
 }
 
 /**
@@ -2292,19 +2292,19 @@ 
  *     La date formatee
  */
 function sql_format_date($annee = 0, $mois = 0, $jour = 0, $h = 0, $m = 0, $s = 0, $serveur = '') {
-	$annee = sprintf('%04s', $annee);
-	$mois = sprintf('%02s', $mois);
-
-	if ($annee == '0000') {
-		$mois = 0;
-	}
-	if ($mois == '00') {
-		$jour = 0;
-	}
-
-	return sprintf('%04u', $annee) . '-' . sprintf('%02u', $mois) . '-'
-	. sprintf('%02u', $jour) . ' ' . sprintf('%02u', $h) . ':'
-	. sprintf('%02u', $m) . ':' . sprintf('%02u', $s);
+    $annee = sprintf('%04s', $annee);
+    $mois = sprintf('%02s', $mois);
+
+    if ($annee == '0000') {
+        $mois = 0;
+    }
+    if ($mois == '00') {
+        $jour = 0;
+    }
+
+    return sprintf('%04u', $annee) . '-' . sprintf('%02u', $mois) . '-'
+    . sprintf('%02u', $jour) . ' ' . sprintf('%02u', $h) . ':'
+    . sprintf('%02u', $m) . ':' . sprintf('%02u', $s);
 }
 
 
@@ -2327,32 +2327,32 @@ 
  **/
 function description_table($nom, $serveur = '') {
 
-	static $trouver_table;
+    static $trouver_table;
 
-	/* toujours utiliser trouver_table
+    /* toujours utiliser trouver_table
 	 qui renverra la description theorique
 	 car sinon on va se comporter differement selon que la table est declaree
 	 ou non
 	 */
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-	if ($desc = $trouver_table($nom, $serveur)) {
-		return $desc;
-	}
-
-	// sauf a l'installation :
-	include_spip('base/serial');
-	if (isset($GLOBALS['tables_principales'][$nom])) {
-		return $GLOBALS['tables_principales'][$nom];
-	}
-
-	include_spip('base/auxiliaires');
-	if (isset($GLOBALS['tables_auxiliaires'][$nom])) {
-		return $GLOBALS['tables_auxiliaires'][$nom];
-	}
-
-	return false;
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+    if ($desc = $trouver_table($nom, $serveur)) {
+        return $desc;
+    }
+
+    // sauf a l'installation :
+    include_spip('base/serial');
+    if (isset($GLOBALS['tables_principales'][$nom])) {
+        return $GLOBALS['tables_principales'][$nom];
+    }
+
+    include_spip('base/auxiliaires');
+    if (isset($GLOBALS['tables_auxiliaires'][$nom])) {
+        return $GLOBALS['tables_auxiliaires'][$nom];
+    }
+
+    return false;
 }
 
 /**
@@ -2365,8 +2365,8 @@ 
  * @return string Table sql éventuellement renommée
  */
 function prefixer_table_spip($table, $prefixe) {
-	if ($prefixe) {
-		$table = preg_replace('/^spip_/', $prefixe . '_', $table);
-	}
-	return $table;
+    if ($prefixe) {
+        $table = preg_replace('/^spip_/', $prefixe . '_', $table);
+    }
+    return $table;
 }

ecrire/base/connect_sql.php

Indentation +303 added lines, -303 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\SQL
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 require_once _ROOT_RESTREINT . 'base/objets.php';
 
@@ -42,118 +42,118 @@ 
  **/
 function spip_connect($serveur = '', $version = '') {
 
-	$serveur = !is_string($serveur) ? '' : strtolower($serveur);
-	$index = $serveur ?: 0;
-	if (!$version) {
-		$version = $GLOBALS['spip_sql_version'];
-	}
-	if (isset($GLOBALS['connexions'][$index][$version])) {
-		return $GLOBALS['connexions'][$index];
-	}
-
-	include_spip('base/abstract_sql');
-	$install = (_request('exec') == 'install');
-
-	// Premiere connexion ?
-	if (!($old = isset($GLOBALS['connexions'][$index]))) {
-		$f = (!preg_match('/^[\w\.]*$/', $serveur))
-			? '' // nom de serveur mal ecrit
-			: ($serveur ?
-				(_DIR_CONNECT . $serveur . '.php') // serveur externe
-				: (_FILE_CONNECT ?: ($install ? _FILE_CONNECT_TMP // init du serveur principal
-						: ''))); // installation pas faite
-
-		unset($GLOBALS['db_ok']);
-		unset($GLOBALS['spip_connect_version']);
-		if ($f) {
-			if (is_readable($f)) {
-				include($f);
-			} elseif ($serveur and !$install) {
-				// chercher une declaration de serveur dans le path
-				// qui pourra un jour servir a declarer des bases sqlite
-				// par des plugins. Et sert aussi aux boucles POUR.
-				find_in_path("$serveur.php", 'connect/', true);
-			}
-		}
-		if (!isset($GLOBALS['db_ok'])) {
-			// fera mieux la prochaine fois
-			if ($install) {
-				return false;
-			}
-			if ($f and is_readable($f)) {
-				spip_log("spip_connect: fichier de connexion '$f' OK.", _LOG_INFO_IMPORTANTE);
-			} else {
-				spip_log("spip_connect: fichier de connexion '$f' non trouve", _LOG_INFO_IMPORTANTE);
-			}
-			spip_log("spip_connect: echec connexion ou serveur $index mal defini dans '$f'.", _LOG_HS);
-
-			// ne plus reessayer si ce n'est pas l'install
-			return $GLOBALS['connexions'][$index] = false;
-		}
-		$GLOBALS['connexions'][$index] = $GLOBALS['db_ok'];
-	}
-	// si la connexion a deja ete tentee mais a echoue, le dire!
-	if (!$GLOBALS['connexions'][$index]) {
-		return false;
-	}
-
-	// la connexion a reussi ou etait deja faite.
-	// chargement de la version du jeu de fonctions
-	// si pas dans le fichier par defaut
-	$type = $GLOBALS['db_ok']['type'];
-	$jeu = 'spip_' . $type . '_functions_' . $version;
-	if (!isset($GLOBALS[$jeu])) {
-		if (!find_in_path($type . '_' . $version . '.php', 'req/', true)) {
-			spip_log("spip_connect: serveur $index version '$version' non defini pour '$type'", _LOG_HS);
-
-			// ne plus reessayer
-			return $GLOBALS['connexions'][$index][$version] = [];
-		}
-	}
-	$GLOBALS['connexions'][$index][$version] = $GLOBALS[$jeu];
-	if ($old) {
-		return $GLOBALS['connexions'][$index];
-	}
-
-	$GLOBALS['connexions'][$index]['spip_connect_version'] = $GLOBALS['spip_connect_version'] ?? 0;
-
-	// initialisation de l'alphabet utilise dans les connexions SQL
-	// si l'installation l'a determine.
-	// Celui du serveur principal l'impose aux serveurs secondaires
-	// s'ils le connaissent
-
-	if (!$serveur) {
-		$charset = spip_connect_main($GLOBALS[$jeu], $GLOBALS['db_ok']['charset']);
-		if (!$charset) {
-			unset($GLOBALS['connexions'][$index]);
-			spip_log('spip_connect: absence de charset', _LOG_AVERTISSEMENT);
-
-			return false;
-		}
-	} else {
-		if ($GLOBALS['db_ok']['charset']) {
-			$charset = $GLOBALS['db_ok']['charset'];
-		}
-		// spip_meta n'existe pas toujours dans la base
-		// C'est le cas d'un dump sqlite par exemple
-		elseif (
-			$GLOBALS['connexions'][$index]['spip_connect_version']
-			and sql_showtable('spip_meta', true, $serveur)
-			and $r = sql_getfetsel('valeur', 'spip_meta', "nom='charset_sql_connexion'", '', '', '', '', $serveur)
-		) {
-			$charset = $r;
-		} else {
-			$charset = -1;
-		}
-	}
-	if ($charset != -1) {
-		$f = $GLOBALS[$jeu]['set_charset'];
-		if (function_exists($f)) {
-			$f($charset, $serveur);
-		}
-	}
-
-	return $GLOBALS['connexions'][$index];
+    $serveur = !is_string($serveur) ? '' : strtolower($serveur);
+    $index = $serveur ?: 0;
+    if (!$version) {
+        $version = $GLOBALS['spip_sql_version'];
+    }
+    if (isset($GLOBALS['connexions'][$index][$version])) {
+        return $GLOBALS['connexions'][$index];
+    }
+
+    include_spip('base/abstract_sql');
+    $install = (_request('exec') == 'install');
+
+    // Premiere connexion ?
+    if (!($old = isset($GLOBALS['connexions'][$index]))) {
+        $f = (!preg_match('/^[\w\.]*$/', $serveur))
+            ? '' // nom de serveur mal ecrit
+            : ($serveur ?
+                (_DIR_CONNECT . $serveur . '.php') // serveur externe
+                : (_FILE_CONNECT ?: ($install ? _FILE_CONNECT_TMP // init du serveur principal
+                        : ''))); // installation pas faite
+
+        unset($GLOBALS['db_ok']);
+        unset($GLOBALS['spip_connect_version']);
+        if ($f) {
+            if (is_readable($f)) {
+                include($f);
+            } elseif ($serveur and !$install) {
+                // chercher une declaration de serveur dans le path
+                // qui pourra un jour servir a declarer des bases sqlite
+                // par des plugins. Et sert aussi aux boucles POUR.
+                find_in_path("$serveur.php", 'connect/', true);
+            }
+        }
+        if (!isset($GLOBALS['db_ok'])) {
+            // fera mieux la prochaine fois
+            if ($install) {
+                return false;
+            }
+            if ($f and is_readable($f)) {
+                spip_log("spip_connect: fichier de connexion '$f' OK.", _LOG_INFO_IMPORTANTE);
+            } else {
+                spip_log("spip_connect: fichier de connexion '$f' non trouve", _LOG_INFO_IMPORTANTE);
+            }
+            spip_log("spip_connect: echec connexion ou serveur $index mal defini dans '$f'.", _LOG_HS);
+
+            // ne plus reessayer si ce n'est pas l'install
+            return $GLOBALS['connexions'][$index] = false;
+        }
+        $GLOBALS['connexions'][$index] = $GLOBALS['db_ok'];
+    }
+    // si la connexion a deja ete tentee mais a echoue, le dire!
+    if (!$GLOBALS['connexions'][$index]) {
+        return false;
+    }
+
+    // la connexion a reussi ou etait deja faite.
+    // chargement de la version du jeu de fonctions
+    // si pas dans le fichier par defaut
+    $type = $GLOBALS['db_ok']['type'];
+    $jeu = 'spip_' . $type . '_functions_' . $version;
+    if (!isset($GLOBALS[$jeu])) {
+        if (!find_in_path($type . '_' . $version . '.php', 'req/', true)) {
+            spip_log("spip_connect: serveur $index version '$version' non defini pour '$type'", _LOG_HS);
+
+            // ne plus reessayer
+            return $GLOBALS['connexions'][$index][$version] = [];
+        }
+    }
+    $GLOBALS['connexions'][$index][$version] = $GLOBALS[$jeu];
+    if ($old) {
+        return $GLOBALS['connexions'][$index];
+    }
+
+    $GLOBALS['connexions'][$index]['spip_connect_version'] = $GLOBALS['spip_connect_version'] ?? 0;
+
+    // initialisation de l'alphabet utilise dans les connexions SQL
+    // si l'installation l'a determine.
+    // Celui du serveur principal l'impose aux serveurs secondaires
+    // s'ils le connaissent
+
+    if (!$serveur) {
+        $charset = spip_connect_main($GLOBALS[$jeu], $GLOBALS['db_ok']['charset']);
+        if (!$charset) {
+            unset($GLOBALS['connexions'][$index]);
+            spip_log('spip_connect: absence de charset', _LOG_AVERTISSEMENT);
+
+            return false;
+        }
+    } else {
+        if ($GLOBALS['db_ok']['charset']) {
+            $charset = $GLOBALS['db_ok']['charset'];
+        }
+        // spip_meta n'existe pas toujours dans la base
+        // C'est le cas d'un dump sqlite par exemple
+        elseif (
+            $GLOBALS['connexions'][$index]['spip_connect_version']
+            and sql_showtable('spip_meta', true, $serveur)
+            and $r = sql_getfetsel('valeur', 'spip_meta', "nom='charset_sql_connexion'", '', '', '', '', $serveur)
+        ) {
+            $charset = $r;
+        } else {
+            $charset = -1;
+        }
+    }
+    if ($charset != -1) {
+        $f = $GLOBALS[$jeu]['set_charset'];
+        if (function_exists($f)) {
+            $f($charset, $serveur);
+        }
+    }
+
+    return $GLOBALS['connexions'][$index];
 }
 
 /**
@@ -162,12 +162,12 @@ 
  * @param string $serveur Nom du connecteur de bdd utilisé
  **/
 function spip_sql_erreur($serveur = '') {
-	$connexion = spip_connect($serveur);
-	$e = sql_errno($serveur);
-	$t = ($connexion['type'] ?? 'sql');
-	$m = "Erreur $e de $t: " . sql_error($serveur) . "\nin " . sql_error_backtrace() . "\n" . trim($connexion['last']);
-	$f = $t . $serveur;
-	spip_log($m, $f . '.' . _LOG_ERREUR);
+    $connexion = spip_connect($serveur);
+    $e = sql_errno($serveur);
+    $t = ($connexion['type'] ?? 'sql');
+    $m = "Erreur $e de $t: " . sql_error($serveur) . "\nin " . sql_error_backtrace() . "\n" . trim($connexion['last']);
+    $f = $t . $serveur;
+    spip_log($m, $f . '.' . _LOG_ERREUR);
 }
 
 /**
@@ -189,23 +189,23 @@ 
  *     - array : description de la connexion, si l'instruction sql est indisponible pour cette connexion
  **/
 function spip_connect_sql($version, $ins = '', $serveur = '', $continue = false) {
-	$desc = spip_connect($serveur, $version);
-	if (
-		$desc 
-		and $f = ($desc[$version][$ins] ?? '')
-		and function_exists($f)
-	 ) {
-		return $f;
-	}
-	if ($continue) {
-		return $desc;
-	}
-	if ($ins) {
-		spip_log("Le serveur '$serveur' version $version n'a pas '$ins'", _LOG_ERREUR);
-	}
-	include_spip('inc/minipres');
-	echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'), ['status' => 503]);
-	exit;
+    $desc = spip_connect($serveur, $version);
+    if (
+        $desc 
+        and $f = ($desc[$version][$ins] ?? '')
+        and function_exists($f)
+        ) {
+        return $f;
+    }
+    if ($continue) {
+        return $desc;
+    }
+    if ($ins) {
+        spip_log("Le serveur '$serveur' version $version n'a pas '$ins'", _LOG_ERREUR);
+    }
+    include_spip('inc/minipres');
+    echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'), ['status' => 503]);
+    exit;
 }
 
 /**
@@ -231,69 +231,69 @@ 
  * @return array          Description de la connexion
  */
 function spip_connect_db(
-	$host,
-	$port,
-	$login,
-	$pass,
-	$db = '',
-	$type = 'mysql',
-	$prefixe = '',
-	$auth = '',
-	$charset = ''
+    $host,
+    $port,
+    $login,
+    $pass,
+    $db = '',
+    $type = 'mysql',
+    $prefixe = '',
+    $auth = '',
+    $charset = ''
 ) {
-	// temps avant nouvelle tentative de connexion
-	// suite a une connection echouee
-	if (!defined('_CONNECT_RETRY_DELAY')) {
-		define('_CONNECT_RETRY_DELAY', 30);
-	}
-
-	$f = '';
-	// un fichier de identifiant par combinaison (type,host,port,db)
-	// pour ne pas declarer tout indisponible d'un coup
-	// si en cours d'installation ou si db=@test@ on ne pose rien
-	// car c'est un test de connexion
-	if (!defined('_ECRIRE_INSTALL') and $db !== '@test@') {
-		$f = _DIR_TMP . $type . '.' . substr(md5($host . $port . $db), 0, 8) . '.out';
-	} elseif ($db == '@test@') {
-		$db = '';
-	}
-
-	if (
-		$f
-		and @file_exists($f)
-		and (time() - @filemtime($f) < _CONNECT_RETRY_DELAY)
-	) {
-		spip_log("Echec : $f recent. Pas de tentative de connexion", _LOG_HS);
-
-		return;
-	}
-
-	if (!$prefixe) {
-		$prefixe = $GLOBALS['table_prefix'] ?? $db;
-	}
-	$h = charger_fonction($type, 'req', true);
-	if (!$h) {
-		spip_log("les requetes $type ne sont pas fournies", _LOG_HS);
-
-		return;
-	}
-	if ($g = $h($host, $port, $login, $pass, $db, $prefixe)) {
-		if (!is_array($auth)) {
-			// compatibilite version 0.7 initiale
-			$g['ldap'] = $auth;
-			$auth = ['ldap' => $auth];
-		}
-		$g['authentification'] = $auth;
-		$g['type'] = $type;
-		$g['charset'] = $charset;
-
-		return $GLOBALS['db_ok'] = $g;
-	}
-	// En cas d'indisponibilite du serveur, eviter de le bombarder
-	if ($f) {
-		@touch($f);
-		spip_log("Echec connexion serveur $type : host[$host] port[$port] login[$login] base[$db]", $type . '.' . _LOG_HS);
-	}
+    // temps avant nouvelle tentative de connexion
+    // suite a une connection echouee
+    if (!defined('_CONNECT_RETRY_DELAY')) {
+        define('_CONNECT_RETRY_DELAY', 30);
+    }
+
+    $f = '';
+    // un fichier de identifiant par combinaison (type,host,port,db)
+    // pour ne pas declarer tout indisponible d'un coup
+    // si en cours d'installation ou si db=@test@ on ne pose rien
+    // car c'est un test de connexion
+    if (!defined('_ECRIRE_INSTALL') and $db !== '@test@') {
+        $f = _DIR_TMP . $type . '.' . substr(md5($host . $port . $db), 0, 8) . '.out';
+    } elseif ($db == '@test@') {
+        $db = '';
+    }
+
+    if (
+        $f
+        and @file_exists($f)
+        and (time() - @filemtime($f) < _CONNECT_RETRY_DELAY)
+    ) {
+        spip_log("Echec : $f recent. Pas de tentative de connexion", _LOG_HS);
+
+        return;
+    }
+
+    if (!$prefixe) {
+        $prefixe = $GLOBALS['table_prefix'] ?? $db;
+    }
+    $h = charger_fonction($type, 'req', true);
+    if (!$h) {
+        spip_log("les requetes $type ne sont pas fournies", _LOG_HS);
+
+        return;
+    }
+    if ($g = $h($host, $port, $login, $pass, $db, $prefixe)) {
+        if (!is_array($auth)) {
+            // compatibilite version 0.7 initiale
+            $g['ldap'] = $auth;
+            $auth = ['ldap' => $auth];
+        }
+        $g['authentification'] = $auth;
+        $g['type'] = $type;
+        $g['charset'] = $charset;
+
+        return $GLOBALS['db_ok'] = $g;
+    }
+    // En cas d'indisponibilite du serveur, eviter de le bombarder
+    if ($f) {
+        @touch($f);
+        spip_log("Echec connexion serveur $type : host[$host] port[$port] login[$login] base[$db]", $type . '.' . _LOG_HS);
+    }
 }
 
 
@@ -325,32 +325,32 @@ 
  *     - nom du charset sinon
  **/
 function spip_connect_main($connexion, $charset_sql_connexion = '') {
-	if ($GLOBALS['spip_connect_version'] < 0.1 and _DIR_RESTREINT) {
-		include_spip('inc/headers');
-		redirige_url_ecrire('upgrade', 'reinstall=oui');
-	}
-
-	if (!($f = $connexion['select'])) {
-		return false;
-	}
-	// si le charset est fourni, l'utiliser
-	if ($charset_sql_connexion) {
-		return $charset_sql_connexion;
-	}
-	// sinon on regarde la table spip_meta
-	// en cas d'erreur select retourne la requette (is_string=true donc)
-	if (
-		!$r = $f('valeur', 'spip_meta', "nom='charset_sql_connexion'")
-		or is_string($r)
-	) {
-		return false;
-	}
-	if (!($f = $connexion['fetch'])) {
-		return false;
-	}
-	$r = $f($r);
-
-	return (isset($r['valeur']) && $r['valeur']) ? $r['valeur'] : -1;
+    if ($GLOBALS['spip_connect_version'] < 0.1 and _DIR_RESTREINT) {
+        include_spip('inc/headers');
+        redirige_url_ecrire('upgrade', 'reinstall=oui');
+    }
+
+    if (!($f = $connexion['select'])) {
+        return false;
+    }
+    // si le charset est fourni, l'utiliser
+    if ($charset_sql_connexion) {
+        return $charset_sql_connexion;
+    }
+    // sinon on regarde la table spip_meta
+    // en cas d'erreur select retourne la requette (is_string=true donc)
+    if (
+        !$r = $f('valeur', 'spip_meta', "nom='charset_sql_connexion'")
+        or is_string($r)
+    ) {
+        return false;
+    }
+    if (!($f = $connexion['fetch'])) {
+        return false;
+    }
+    $r = $f($r);
+
+    return (isset($r['valeur']) && $r['valeur']) ? $r['valeur'] : -1;
 }
 
 /**
@@ -366,9 +366,9 @@ 
  * @return array
  */
 function spip_connect_ldap($serveur = '') {
-	include_spip('auth/ldap');
+    include_spip('auth/ldap');
 
-	return auth_ldap_connect($serveur);
+    return auth_ldap_connect($serveur);
 }
 
 /**
@@ -384,16 +384,16 @@ 
  * @return string Valeur échappée.
  **/
 function _q($a): string {
-	if (is_numeric($a)) {
-		return strval($a);
-	} elseif (is_array($a)) {
-		return join(',', array_map('_q', $a));
-	} elseif (is_scalar($a)) {
-		return ("'" . addslashes($a) . "'");
-	} elseif ($a === null) {
-		return "''";
-	}
-	throw new \RuntimeException("Can’t use _q with " . gettype($a));
+    if (is_numeric($a)) {
+        return strval($a);
+    } elseif (is_array($a)) {
+        return join(',', array_map('_q', $a));
+    } elseif (is_scalar($a)) {
+        return ("'" . addslashes($a) . "'");
+    } elseif ($a === null) {
+        return "''";
+    }
+    throw new \RuntimeException("Can’t use _q with " . gettype($a));
 }
 
 /**
@@ -409,66 +409,66 @@ 
  * @return array
  */
 function query_echappe_textes($query, $uniqid = null) {
-	static $codeEchappements = null;
-	if (is_null($codeEchappements) or $uniqid) {
-		if (is_null($uniqid)) {
-			$uniqid = uniqid();
-		}
-		$uniqid = substr(md5($uniqid), 0, 4);
-		$codeEchappements = ['\\\\' => "\x1@#{$uniqid}#@\x1", "\\'" => "\x2@#{$uniqid}#@\x2", '\\"' => "\x3@#{$uniqid}#@\x3"];
-	}
-	if ($query === null) {
-		return $codeEchappements;
-	}
-
-	// si la query contient deja des codes d'echappement on va s'emmeler les pinceaux et donc on ne touche a rien
-	// ce n'est pas un cas legitime
-	foreach ($codeEchappements as $codeEchappement) {
-		if (strpos($query, (string) $codeEchappement) !== false) {
-			return [$query, []];
-		}
-	}
-
-	$query_echappees = str_replace(array_keys($codeEchappements), array_values($codeEchappements), $query);
-	if (preg_match_all("/('[^']*')|(\"[^\"]*\")/S", $query_echappees, $textes)) {
-		$textes = reset($textes); // indice 0 du match
-		switch (count($textes)) {
-			case 0:
-				$replace = [];
-				break;
-			case 1:
-				$replace = ['%1$s'];
-				break;
-			case 2:
-				$replace = ['%1$s', '%2$s'];
-				break;
-			case 3:
-				$replace = ['%1$s', '%2$s', '%3$s'];
-				break;
-			case 4:
-				$replace = ['%1$s', '%2$s', '%3$s', '%4$s'];
-				break;
-			case 5:
-				$replace = ['%1$s', '%2$s', '%3$s', '%4$s', '%5$s'];
-				break;
-			default:
-				$replace = range(1, count($textes));
-				$replace = '%' . implode('$s,%', $replace) . '$s';
-				$replace = explode(',', $replace);
-				break;
-		}
-		$query_echappees = str_replace($textes, $replace, $query_echappees);
-	} else {
-		$textes = [];
-	}
-
-	// si il reste des quotes simples ou doubles, c'est qu'on s'est emmelles les pinceaux
-	// dans le doute on ne touche a rien
-	if (strpbrk($query_echappees, "'\"") !== false) {
-		return [$query, []];
-	}
-
-	return [$query_echappees, $textes];
+    static $codeEchappements = null;
+    if (is_null($codeEchappements) or $uniqid) {
+        if (is_null($uniqid)) {
+            $uniqid = uniqid();
+        }
+        $uniqid = substr(md5($uniqid), 0, 4);
+        $codeEchappements = ['\\\\' => "\x1@#{$uniqid}#@\x1", "\\'" => "\x2@#{$uniqid}#@\x2", '\\"' => "\x3@#{$uniqid}#@\x3"];
+    }
+    if ($query === null) {
+        return $codeEchappements;
+    }
+
+    // si la query contient deja des codes d'echappement on va s'emmeler les pinceaux et donc on ne touche a rien
+    // ce n'est pas un cas legitime
+    foreach ($codeEchappements as $codeEchappement) {
+        if (strpos($query, (string) $codeEchappement) !== false) {
+            return [$query, []];
+        }
+    }
+
+    $query_echappees = str_replace(array_keys($codeEchappements), array_values($codeEchappements), $query);
+    if (preg_match_all("/('[^']*')|(\"[^\"]*\")/S", $query_echappees, $textes)) {
+        $textes = reset($textes); // indice 0 du match
+        switch (count($textes)) {
+            case 0:
+                $replace = [];
+                break;
+            case 1:
+                $replace = ['%1$s'];
+                break;
+            case 2:
+                $replace = ['%1$s', '%2$s'];
+                break;
+            case 3:
+                $replace = ['%1$s', '%2$s', '%3$s'];
+                break;
+            case 4:
+                $replace = ['%1$s', '%2$s', '%3$s', '%4$s'];
+                break;
+            case 5:
+                $replace = ['%1$s', '%2$s', '%3$s', '%4$s', '%5$s'];
+                break;
+            default:
+                $replace = range(1, count($textes));
+                $replace = '%' . implode('$s,%', $replace) . '$s';
+                $replace = explode(',', $replace);
+                break;
+        }
+        $query_echappees = str_replace($textes, $replace, $query_echappees);
+    } else {
+        $textes = [];
+    }
+
+    // si il reste des quotes simples ou doubles, c'est qu'on s'est emmelles les pinceaux
+    // dans le doute on ne touche a rien
+    if (strpbrk($query_echappees, "'\"") !== false) {
+        return [$query, []];
+    }
+
+    return [$query_echappees, $textes];
 }
 
 /**
@@ -482,14 +482,14 @@ 
  * @return string
  */
 function query_reinjecte_textes($query, $textes) {
-	// recuperer les codes echappements
-	$codeEchappements = query_echappe_textes(null);
+    // recuperer les codes echappements
+    $codeEchappements = query_echappe_textes(null);
 
-	$query = sprintf($query, ...$textes);
+    $query = sprintf($query, ...$textes);
 
-	$query = str_replace(array_values($codeEchappements), array_keys($codeEchappements), $query);
+    $query = str_replace(array_values($codeEchappements), array_keys($codeEchappements), $query);
 
-	return $query;
+    return $query;
 }
 
 
@@ -508,7 +508,7 @@ 
  **/
 function spip_query($query, $serveur = '') {
 
-	$f = spip_connect_sql($GLOBALS['spip_sql_version'], 'query', $serveur, true);
+    $f = spip_connect_sql($GLOBALS['spip_sql_version'], 'query', $serveur, true);
 
-	return function_exists($f) ? $f($query, $serveur) : false;
+    return function_exists($f) ? $f($query, $serveur) : false;
 }

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/base/upgrade.php

Indentation +282 added lines, -282 removed lines

@@ -17,17 +17,17 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_UPGRADE_TIME_OUT')) {
-	/**
-	 * Durée en secondes pour relancer les scripts de mises à jour, x secondes
-	 * avant que la durée d'exécution du script provoque un timeout
-	 *
-	 * @var int
-	 **/
-	define('_UPGRADE_TIME_OUT', 20);
+    /**
+     * Durée en secondes pour relancer les scripts de mises à jour, x secondes
+     * avant que la durée d'exécution du script provoque un timeout
+     *
+     * @var int
+     **/
+    define('_UPGRADE_TIME_OUT', 20);
 }
 
 /**
@@ -50,40 +50,40 @@ 
  * @return void
  */
 function base_upgrade_dist($titre = '', $reprise = '') {
-	if (!$titre) {
-		return;
-	} // anti-testeur automatique
-	if ($GLOBALS['spip_version_base'] != $GLOBALS['meta']['version_installee']) {
-		if (!is_numeric(_request('reinstall'))) {
-			include_spip('base/create');
-			spip_log('recree les tables eventuellement disparues', 'maj.' . _LOG_INFO_IMPORTANTE);
-			creer_base();
-		}
-
-		// quand on rentre par ici, c'est toujours une mise a jour de SPIP
-		// lancement de l'upgrade SPIP
-		$res = maj_base();
-
-		if ($res) {
-			// on arrete tout ici !
-			exit;
-		}
-	}
-	spip_log('Fin de mise a jour SQL. Debut m-a-j acces et config', 'maj.' . _LOG_INFO_IMPORTANTE);
-
-	// supprimer quelques fichiers temporaires qui peuvent se retrouver invalides
-	@spip_unlink(_CACHE_RUBRIQUES);
-	@spip_unlink(_CACHE_PIPELINES);
-	@spip_unlink(_CACHE_PLUGINS_PATH);
-	@spip_unlink(_CACHE_PLUGINS_OPT);
-	@spip_unlink(_CACHE_PLUGINS_FCT);
-	@spip_unlink(_CACHE_CHEMIN);
-	@spip_unlink(_DIR_TMP . 'plugin_xml_cache.gz');
-
-	include_spip('inc/auth');
-	auth_synchroniser_distant();
-	$config = charger_fonction('config', 'inc');
-	$config();
+    if (!$titre) {
+        return;
+    } // anti-testeur automatique
+    if ($GLOBALS['spip_version_base'] != $GLOBALS['meta']['version_installee']) {
+        if (!is_numeric(_request('reinstall'))) {
+            include_spip('base/create');
+            spip_log('recree les tables eventuellement disparues', 'maj.' . _LOG_INFO_IMPORTANTE);
+            creer_base();
+        }
+
+        // quand on rentre par ici, c'est toujours une mise a jour de SPIP
+        // lancement de l'upgrade SPIP
+        $res = maj_base();
+
+        if ($res) {
+            // on arrete tout ici !
+            exit;
+        }
+    }
+    spip_log('Fin de mise a jour SQL. Debut m-a-j acces et config', 'maj.' . _LOG_INFO_IMPORTANTE);
+
+    // supprimer quelques fichiers temporaires qui peuvent se retrouver invalides
+    @spip_unlink(_CACHE_RUBRIQUES);
+    @spip_unlink(_CACHE_PIPELINES);
+    @spip_unlink(_CACHE_PLUGINS_PATH);
+    @spip_unlink(_CACHE_PLUGINS_OPT);
+    @spip_unlink(_CACHE_PLUGINS_FCT);
+    @spip_unlink(_CACHE_CHEMIN);
+    @spip_unlink(_DIR_TMP . 'plugin_xml_cache.gz');
+
+    include_spip('inc/auth');
+    auth_synchroniser_distant();
+    $config = charger_fonction('config', 'inc');
+    $config();
 }
 
 /**
@@ -114,51 +114,51 @@ 
  */
 function maj_base($version_cible = 0, $redirect = '', $debut_page = true) {
 
-	$version_installee = $GLOBALS['meta']['version_installee'] ?? null;
-
-	spip_log(
-		"Version anterieure: $version_installee. Courante: " . $GLOBALS['spip_version_base'],
-		'maj.' . _LOG_INFO_IMPORTANTE
-	);
-	if (!$version_installee or ($GLOBALS['spip_version_base'] < $version_installee)) {
-		sql_replace(
-			'spip_meta',
-			[
-				'nom' => 'version_installee',
-				'valeur' => $GLOBALS['spip_version_base'],
-				'impt' => 'non'
-			]
-		);
-		return false;
-	}
-	if (!upgrade_test()) {
-		return true;
-	}
-
-	$cible = ($version_cible ?: $GLOBALS['spip_version_base']);
-
-	if ($version_installee < 2021_01_01_00) {
-		include_spip('maj/legacy/v21');
-		include_spip('maj/legacy/v30');
-		include_spip('maj/legacy/v31');
-		include_spip('maj/legacy/v32');
-		include_spip('maj/legacy/v40');
-	}
-
-	include_spip('maj/2021');
-
-	ksort($GLOBALS['maj']);
-	$res = maj_while($version_installee, $cible, $GLOBALS['maj'], 'version_installee', 'meta', $redirect, $debut_page);
-	if ($res) {
-		if (!is_array($res)) {
-			spip_log("Pb d'acces SQL a la mise a jour", 'maj.' . _LOG_INFO_ERREUR);
-		} else {
-			echo _T('avis_operation_echec') . ' ' . join(' ', $res);
-			echo install_fin_html();
-		}
-	}
-
-	return $res;
+    $version_installee = $GLOBALS['meta']['version_installee'] ?? null;
+
+    spip_log(
+        "Version anterieure: $version_installee. Courante: " . $GLOBALS['spip_version_base'],
+        'maj.' . _LOG_INFO_IMPORTANTE
+    );
+    if (!$version_installee or ($GLOBALS['spip_version_base'] < $version_installee)) {
+        sql_replace(
+            'spip_meta',
+            [
+                'nom' => 'version_installee',
+                'valeur' => $GLOBALS['spip_version_base'],
+                'impt' => 'non'
+            ]
+        );
+        return false;
+    }
+    if (!upgrade_test()) {
+        return true;
+    }
+
+    $cible = ($version_cible ?: $GLOBALS['spip_version_base']);
+
+    if ($version_installee < 2021_01_01_00) {
+        include_spip('maj/legacy/v21');
+        include_spip('maj/legacy/v30');
+        include_spip('maj/legacy/v31');
+        include_spip('maj/legacy/v32');
+        include_spip('maj/legacy/v40');
+    }
+
+    include_spip('maj/2021');
+
+    ksort($GLOBALS['maj']);
+    $res = maj_while($version_installee, $cible, $GLOBALS['maj'], 'version_installee', 'meta', $redirect, $debut_page);
+    if ($res) {
+        if (!is_array($res)) {
+            spip_log("Pb d'acces SQL a la mise a jour", 'maj.' . _LOG_INFO_ERREUR);
+        } else {
+            echo _T('avis_operation_echec') . ' ' . join(' ', $res);
+            echo install_fin_html();
+        }
+    }
+
+    return $res;
 }
 
 /**
@@ -200,53 +200,53 @@ 
  */
 function maj_plugin($nom_meta_base_version, $version_cible, $maj, $table_meta = 'meta') {
 
-	if ($table_meta !== 'meta') {
-		installer_table_meta($table_meta);
-	}
-
-	$current_version = null;
-
-	if (
-		(!isset($GLOBALS[$table_meta][$nom_meta_base_version]))
-		|| (!spip_version_compare($current_version = $GLOBALS[$table_meta][$nom_meta_base_version], $version_cible, '='))
-	) {
-		// $maj['create'] contient les directives propres a la premiere creation de base
-		// c'est une operation derogatoire qui fait aboutir directement dans la version_cible
-		if (isset($maj['create'])) {
-			if (!isset($GLOBALS[$table_meta][$nom_meta_base_version])) {
-				// installation : on ne fait que l'operation create
-				$maj = ['init' => $maj['create']];
-				// et on lui ajoute un appel a inc/config
-				// pour creer les metas par defaut
-				$config = charger_fonction('config', 'inc');
-				$maj[$version_cible] = [[$config]];
-			}
-			// dans tous les cas enlever cet index du tableau
-			unset($maj['create']);
-		}
-		// si init, deja dans le bon ordre
-		if (!isset($maj['init'])) {
-			include_spip('inc/plugin'); // pour spip_version_compare
-			uksort($maj, 'spip_version_compare');
-		}
-
-		// la redirection se fait par defaut sur la page d'administration des plugins
-		// sauf lorsque nous sommes sur l'installation de SPIP
-		// ou define _REDIRECT_MAJ_PLUGIN
-		$redirect = (defined('_REDIRECT_MAJ_PLUGIN') ? _REDIRECT_MAJ_PLUGIN : generer_url_ecrire('admin_plugin'));
-		if (defined('_ECRIRE_INSTALL')) {
-			$redirect = parametre_url(generer_url_ecrire('install'), 'etape', _request('etape'));
-		}
-
-		$res = maj_while($current_version, $version_cible, $maj, $nom_meta_base_version, $table_meta, $redirect);
-		if ($res) {
-			if (!is_array($res)) {
-				spip_log("Pb d'acces SQL a la mise a jour", 'maj.' . _LOG_INFO_ERREUR);
-			} else {
-				echo '<p>' . _T('avis_operation_echec') . ' ' . join(' ', $res) . '</p>';
-			}
-		}
-	}
+    if ($table_meta !== 'meta') {
+        installer_table_meta($table_meta);
+    }
+
+    $current_version = null;
+
+    if (
+        (!isset($GLOBALS[$table_meta][$nom_meta_base_version]))
+        || (!spip_version_compare($current_version = $GLOBALS[$table_meta][$nom_meta_base_version], $version_cible, '='))
+    ) {
+        // $maj['create'] contient les directives propres a la premiere creation de base
+        // c'est une operation derogatoire qui fait aboutir directement dans la version_cible
+        if (isset($maj['create'])) {
+            if (!isset($GLOBALS[$table_meta][$nom_meta_base_version])) {
+                // installation : on ne fait que l'operation create
+                $maj = ['init' => $maj['create']];
+                // et on lui ajoute un appel a inc/config
+                // pour creer les metas par defaut
+                $config = charger_fonction('config', 'inc');
+                $maj[$version_cible] = [[$config]];
+            }
+            // dans tous les cas enlever cet index du tableau
+            unset($maj['create']);
+        }
+        // si init, deja dans le bon ordre
+        if (!isset($maj['init'])) {
+            include_spip('inc/plugin'); // pour spip_version_compare
+            uksort($maj, 'spip_version_compare');
+        }
+
+        // la redirection se fait par defaut sur la page d'administration des plugins
+        // sauf lorsque nous sommes sur l'installation de SPIP
+        // ou define _REDIRECT_MAJ_PLUGIN
+        $redirect = (defined('_REDIRECT_MAJ_PLUGIN') ? _REDIRECT_MAJ_PLUGIN : generer_url_ecrire('admin_plugin'));
+        if (defined('_ECRIRE_INSTALL')) {
+            $redirect = parametre_url(generer_url_ecrire('install'), 'etape', _request('etape'));
+        }
+
+        $res = maj_while($current_version, $version_cible, $maj, $nom_meta_base_version, $table_meta, $redirect);
+        if ($res) {
+            if (!is_array($res)) {
+                spip_log("Pb d'acces SQL a la mise a jour", 'maj.' . _LOG_INFO_ERREUR);
+            } else {
+                echo '<p>' . _T('avis_operation_echec') . ' ' . join(' ', $res) . '</p>';
+            }
+        }
+    }
 }
 
 /**
@@ -263,17 +263,17 @@ 
  * @return void
  */
 function relance_maj($meta, $table, $redirect = '') {
-	include_spip('inc/headers');
-	if (!$redirect) {
-		// recuperer la valeur installee en cours
-		// on la tronque numeriquement, elle ne sert pas reellement
-		// sauf pour verifier que ce n'est pas oui ou non
-		// sinon is_numeric va echouer sur un numero de version 1.2.3
-		$installee = intval($GLOBALS[$table][$meta]);
-		$redirect = generer_url_ecrire('upgrade', "reinstall=$installee&meta=$meta&table=$table", true);
-	}
-	echo redirige_formulaire($redirect);
-	exit();
+    include_spip('inc/headers');
+    if (!$redirect) {
+        // recuperer la valeur installee en cours
+        // on la tronque numeriquement, elle ne sert pas reellement
+        // sauf pour verifier que ce n'est pas oui ou non
+        // sinon is_numeric va echouer sur un numero de version 1.2.3
+        $installee = intval($GLOBALS[$table][$meta]);
+        $redirect = generer_url_ecrire('upgrade', "reinstall=$installee&meta=$meta&table=$table", true);
+    }
+    echo redirige_formulaire($redirect);
+    exit();
 }
 
 /**
@@ -286,26 +286,26 @@ 
  * @return void
  */
 function maj_debut_page($installee, $meta, $table) {
-	static $done = false;
-	if ($done) {
-		return;
-	}
-	include_spip('inc/minipres');
-	@ini_set('zlib.output_compression', '0'); // pour permettre l'affichage au fur et a mesure
-	$timeout = _UPGRADE_TIME_OUT * 2;
-	$titre = _T('titre_page_upgrade');
-	$balise_img = charger_filtre('balise_img');
-	$titre .= $balise_img(chemin_image('loader.svg'), '', 'loader');
-	echo(install_debut_html($titre));
-	// script de rechargement auto sur timeout
-	$redirect = generer_url_ecrire('upgrade', "reinstall=$installee&meta=$meta&table=$table", true);
-	echo http_script("window.setTimeout('location.href=\"" . $redirect . "\";'," . ($timeout * 1000) . ')');
-	echo "<div style='text-align: left'>\n";
-	if (ob_get_level()) {
-		ob_flush();
-	}
-	flush();
-	$done = true;
+    static $done = false;
+    if ($done) {
+        return;
+    }
+    include_spip('inc/minipres');
+    @ini_set('zlib.output_compression', '0'); // pour permettre l'affichage au fur et a mesure
+    $timeout = _UPGRADE_TIME_OUT * 2;
+    $titre = _T('titre_page_upgrade');
+    $balise_img = charger_filtre('balise_img');
+    $titre .= $balise_img(chemin_image('loader.svg'), '', 'loader');
+    echo(install_debut_html($titre));
+    // script de rechargement auto sur timeout
+    $redirect = generer_url_ecrire('upgrade', "reinstall=$installee&meta=$meta&table=$table", true);
+    echo http_script("window.setTimeout('location.href=\"" . $redirect . "\";'," . ($timeout * 1000) . ')');
+    echo "<div style='text-align: left'>\n";
+    if (ob_get_level()) {
+        ob_flush();
+    }
+    flush();
+    $done = true;
 }
 
 
@@ -349,64 +349,64 @@ 
  *    - tableau vide sinon.
  */
 function maj_while($installee, $cible, $maj, $meta = '', $table = 'meta', $redirect = '', $debut_page = false) {
-	# inclusions pour que les procedures d'upgrade disposent des fonctions de base
-	include_spip('base/create');
-	include_spip('base/abstract_sql');
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	include_spip('inc/plugin'); // pour spip_version_compare
-	$n = 0;
-	$time = time();
-
-	if (!defined('_TIME_OUT')) {
-		/**
-		 * Définir le timeout qui peut-être utilisé dans les fonctions
-		 * de mises à jour qui durent trop longtemps
-		 *
-		 * À utiliser tel que : `if (time() >= _TIME_OUT)`
-		 *
-		 * @var int
-		 */
-		define('_TIME_OUT', $time + _UPGRADE_TIME_OUT);
-	}
-
-	foreach ($maj as $v => $operations) {
-		// si une maj pour cette version
-		if (
-			$v == 'init' or
-			(spip_version_compare($v, $installee, '>')
-				and spip_version_compare($v, $cible, '<='))
-		) {
-			if ($debut_page) {
-				maj_debut_page($v, $meta, $table);
-			}
-			echo "MAJ $v";
-			$etape = serie_alter($v, $operations, $meta, $table, $redirect);
-			$trouver_table(''); // vider le cache des descriptions de table
-			# echec sur une etape en cours ?
-			# on sort
-			if ($etape) {
-				return [$v, $etape];
-			}
-			$n = time() - $time;
-			spip_log("$table $meta: $v en $n secondes", 'maj.' . _LOG_INFO_IMPORTANTE);
-			if ($meta) {
-				ecrire_meta($meta, $installee = $v, 'oui', $table);
-			}
-			echo (_IS_CLI ? "\n" : '<br />');
-		}
-		if (time() >= _TIME_OUT) {
-			relance_maj($meta, $table, $redirect);
-		}
-	}
-	$trouver_table(''); // vider le cache des descriptions de table
-	// indispensable pour les chgt de versions qui n'ecrivent pas en base
-	// tant pis pour la redondance eventuelle avec ci-dessus
-	if ($meta) {
-		ecrire_meta($meta, $cible, 'oui', $table);
-	}
-	spip_log("MAJ terminee. $meta: $installee", 'maj.' . _LOG_INFO_IMPORTANTE);
-
-	return [];
+    # inclusions pour que les procedures d'upgrade disposent des fonctions de base
+    include_spip('base/create');
+    include_spip('base/abstract_sql');
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    include_spip('inc/plugin'); // pour spip_version_compare
+    $n = 0;
+    $time = time();
+
+    if (!defined('_TIME_OUT')) {
+        /**
+         * Définir le timeout qui peut-être utilisé dans les fonctions
+         * de mises à jour qui durent trop longtemps
+         *
+         * À utiliser tel que : `if (time() >= _TIME_OUT)`
+         *
+         * @var int
+         */
+        define('_TIME_OUT', $time + _UPGRADE_TIME_OUT);
+    }
+
+    foreach ($maj as $v => $operations) {
+        // si une maj pour cette version
+        if (
+            $v == 'init' or
+            (spip_version_compare($v, $installee, '>')
+                and spip_version_compare($v, $cible, '<='))
+        ) {
+            if ($debut_page) {
+                maj_debut_page($v, $meta, $table);
+            }
+            echo "MAJ $v";
+            $etape = serie_alter($v, $operations, $meta, $table, $redirect);
+            $trouver_table(''); // vider le cache des descriptions de table
+            # echec sur une etape en cours ?
+            # on sort
+            if ($etape) {
+                return [$v, $etape];
+            }
+            $n = time() - $time;
+            spip_log("$table $meta: $v en $n secondes", 'maj.' . _LOG_INFO_IMPORTANTE);
+            if ($meta) {
+                ecrire_meta($meta, $installee = $v, 'oui', $table);
+            }
+            echo (_IS_CLI ? "\n" : '<br />');
+        }
+        if (time() >= _TIME_OUT) {
+            relance_maj($meta, $table, $redirect);
+        }
+    }
+    $trouver_table(''); // vider le cache des descriptions de table
+    // indispensable pour les chgt de versions qui n'ecrivent pas en base
+    // tant pis pour la redondance eventuelle avec ci-dessus
+    if ($meta) {
+        ecrire_meta($meta, $cible, 'oui', $table);
+    }
+    spip_log("MAJ terminee. $meta: $installee", 'maj.' . _LOG_INFO_IMPORTANTE);
+
+    return [];
 }
 
 /**
@@ -429,53 +429,53 @@ 
  * @return int
  */
 function serie_alter($serie, $q = [], $meta = '', $table = 'meta', $redirect = '') {
-	$meta2 = $meta . '_maj_' . $serie;
-	$etape = 0;
-	if (isset($GLOBALS[$table][$meta2])) {
-		$etape = intval($GLOBALS[$table][$meta2]);
-	}
-	foreach ($q as $i => $r) {
-		if ($i >= $etape) {
-			$msg = "maj $table $meta2 etape $i";
-			if (
-				is_array($r)
-				and function_exists($f = array_shift($r))
-			) {
-				// note: $r (arguments de la fonction $f) peut avoir des données tabulaires
-				spip_log("$msg: $f " . @join(',', $r), 'maj.' . _LOG_INFO_IMPORTANTE);
-				// pour les fonctions atomiques sql_xx
-				// on enregistre le meta avant de lancer la fonction,
-				// de maniere a eviter de boucler sur timeout
-				// mais pour les fonctions complexes,
-				// il faut les rejouer jusqu'a achevement.
-				// C'est a elle d'assurer qu'elles progressent a chaque rappel
-				if (strncmp($f, 'sql_', 4) == 0) {
-					ecrire_meta($meta2, $i + 1, 'non', $table);
-				}
-				echo (_IS_CLI ? '.' : " <span title='$i'>.</span>");
-				call_user_func_array($f, $r);
-				// si temps imparti depasse, on relance sans ecrire en meta
-				// car on est peut etre sorti sur timeout si c'est une fonction longue
-				if (time() >= _TIME_OUT) {
-					relance_maj($meta, $table, $redirect);
-				}
-				ecrire_meta($meta2, $i + 1, 'non', $table);
-				spip_log("$meta2: ok", 'maj.' . _LOG_INFO_IMPORTANTE);
-			} else {
-				if (!is_array($r)) {
-					spip_log("maj $i format incorrect", 'maj.' . _LOG_ERREUR);
-				} else {
-					spip_log("maj $i fonction $f non definie", 'maj.' . _LOG_ERREUR);
-				}
-				// en cas d'erreur serieuse, on s'arrete
-				// mais on permet de passer par dessus en rechargeant la page.
-				return $i + 1;
-			}
-		}
-	}
-	effacer_meta($meta2, $table);
-
-	return 0;
+    $meta2 = $meta . '_maj_' . $serie;
+    $etape = 0;
+    if (isset($GLOBALS[$table][$meta2])) {
+        $etape = intval($GLOBALS[$table][$meta2]);
+    }
+    foreach ($q as $i => $r) {
+        if ($i >= $etape) {
+            $msg = "maj $table $meta2 etape $i";
+            if (
+                is_array($r)
+                and function_exists($f = array_shift($r))
+            ) {
+                // note: $r (arguments de la fonction $f) peut avoir des données tabulaires
+                spip_log("$msg: $f " . @join(',', $r), 'maj.' . _LOG_INFO_IMPORTANTE);
+                // pour les fonctions atomiques sql_xx
+                // on enregistre le meta avant de lancer la fonction,
+                // de maniere a eviter de boucler sur timeout
+                // mais pour les fonctions complexes,
+                // il faut les rejouer jusqu'a achevement.
+                // C'est a elle d'assurer qu'elles progressent a chaque rappel
+                if (strncmp($f, 'sql_', 4) == 0) {
+                    ecrire_meta($meta2, $i + 1, 'non', $table);
+                }
+                echo (_IS_CLI ? '.' : " <span title='$i'>.</span>");
+                call_user_func_array($f, $r);
+                // si temps imparti depasse, on relance sans ecrire en meta
+                // car on est peut etre sorti sur timeout si c'est une fonction longue
+                if (time() >= _TIME_OUT) {
+                    relance_maj($meta, $table, $redirect);
+                }
+                ecrire_meta($meta2, $i + 1, 'non', $table);
+                spip_log("$meta2: ok", 'maj.' . _LOG_INFO_IMPORTANTE);
+            } else {
+                if (!is_array($r)) {
+                    spip_log("maj $i format incorrect", 'maj.' . _LOG_ERREUR);
+                } else {
+                    spip_log("maj $i fonction $f non definie", 'maj.' . _LOG_ERREUR);
+                }
+                // en cas d'erreur serieuse, on s'arrete
+                // mais on permet de passer par dessus en rechargeant la page.
+                return $i + 1;
+            }
+        }
+    }
+    effacer_meta($meta2, $table);
+
+    return 0;
 }
 
 /**
@@ -484,16 +484,16 @@ 
  * @return bool True si possible.
  **/
 function upgrade_test() {
-	sql_drop_table('spip_test', true);
-	sql_create('spip_test', ['a' => 'int']);
-	sql_alter('TABLE spip_test ADD b INT');
-	sql_insertq('spip_test', ['b' => 1], ['field' => ['b' => 'int']]);
-	$result = sql_select('b', 'spip_test');
-	// ne pas garder le resultat de la requete sinon sqlite3
-	// ne peut pas supprimer la table spip_test lors du sql_alter qui suit
-	// car cette table serait alors 'verouillee'
-	$result = $result ? true : false;
-	sql_alter('TABLE spip_test DROP b');
-
-	return $result;
+    sql_drop_table('spip_test', true);
+    sql_create('spip_test', ['a' => 'int']);
+    sql_alter('TABLE spip_test ADD b INT');
+    sql_insertq('spip_test', ['b' => 1], ['field' => ['b' => 'int']]);
+    $result = sql_select('b', 'spip_test');
+    // ne pas garder le resultat de la requete sinon sqlite3
+    // ne peut pas supprimer la table spip_test lors du sql_alter qui suit
+    // car cette table serait alors 'verouillee'
+    $result = $result ? true : false;
+    sql_alter('TABLE spip_test DROP b');
+
+    return $result;
 }

ecrire/index.php

Indentation +77 added lines, -77 removed lines

@@ -19,14 +19,14 @@ 
 /** Drapeau indiquant que l'on est dans l'espace privé */
 define('_ESPACE_PRIVE', true);
 if (!defined('_ECRIRE_INC_VERSION')) {
-	include 'inc_version.php';
+    include 'inc_version.php';
 }
 
 // Verification anti magic_quotes_sybase, pour qui addslashes("'") = "''"
 // On prefere la faire ici plutot que dans inc_version, c'est moins souvent et
 // si le reglage est modifie sur un site en prod, ca fait moins mal
 if (addslashes("'") !== "\\'") {
-	die('SPIP incompatible magic_quotes_sybase');
+    die('SPIP incompatible magic_quotes_sybase');
 }
 
 include_spip('inc/cookie');
@@ -42,18 +42,18 @@ 
 // alors il faut blinder les variables d'URL
 //
 if (autoriser_sans_cookie($exec, false)) {
-	if (!isset($reinstall)) {
-		$reinstall = 'non';
-	}
-	$var_auth = true;
+    if (!isset($reinstall)) {
+        $reinstall = 'non';
+    }
+    $var_auth = true;
 } else {
-	// Authentification, redefinissable
-	$auth = charger_fonction('auth', 'inc');
-	$var_auth = $auth();
-	if ($var_auth) {
-		echo auth_echec($var_auth);
-		exit;
-	}
+    // Authentification, redefinissable
+    $auth = charger_fonction('auth', 'inc');
+    $var_auth = $auth();
+    if ($var_auth) {
+        echo auth_echec($var_auth);
+        exit;
+    }
 }
 
 // initialiser a la langue par defaut
@@ -64,29 +64,29 @@ 
 
 
 if (_request('action') or _request('var_ajax') or _request('formulaire_action')) {
-	if (!autoriser_sans_cookie($exec)) {
-		// Charger l'aiguilleur qui va mettre sur la bonne voie les traitements derogatoires
-		include_spip('public/aiguiller');
-		if (
-			// cas des appels actions ?action=xxx
-			traiter_appels_actions()
-			or
-			// cas des hits ajax sur les inclusions ajax
-			traiter_appels_inclusions_ajax()
-			or
-			// cas des formulaires charger/verifier/traiter
-			traiter_formulaires_dynamiques()
-		) {
-			exit;
-		} // le hit est fini !
-	}
+    if (!autoriser_sans_cookie($exec)) {
+        // Charger l'aiguilleur qui va mettre sur la bonne voie les traitements derogatoires
+        include_spip('public/aiguiller');
+        if (
+            // cas des appels actions ?action=xxx
+            traiter_appels_actions()
+            or
+            // cas des hits ajax sur les inclusions ajax
+            traiter_appels_inclusions_ajax()
+            or
+            // cas des formulaires charger/verifier/traiter
+            traiter_formulaires_dynamiques()
+        ) {
+            exit;
+        } // le hit est fini !
+    }
 }
 // securiser les redirect du back-office
 if (_request('redirect')) {
-	if (!function_exists('securiser_redirect_action')) {
-		include_spip('public/aiguiller');
-	}
-	set_request('redirect', securiser_redirect_action(_request('redirect')));
+    if (!function_exists('securiser_redirect_action')) {
+        include_spip('public/aiguiller');
+    }
+    set_request('redirect', securiser_redirect_action(_request('redirect')));
 }
 
 
@@ -96,12 +96,12 @@ 
 
 // Controle de la version, sauf si on est deja en train de s'en occuper
 if (
-	!$reinstall == 'oui'
-	and !_AJAX
-	and isset($GLOBALS['meta']['version_installee'])
-	and ($GLOBALS['spip_version_base'] != (str_replace(',', '.', $GLOBALS['meta']['version_installee'])))
+    !$reinstall == 'oui'
+    and !_AJAX
+    and isset($GLOBALS['meta']['version_installee'])
+    and ($GLOBALS['spip_version_base'] != (str_replace(',', '.', $GLOBALS['meta']['version_installee'])))
 ) {
-	$exec = 'demande_mise_a_jour';
+    $exec = 'demande_mise_a_jour';
 }
 
 // Quand une action d'administration est en cours (meta "admin"),
@@ -111,39 +111,39 @@ 
 // sinon c'est qu'elle a ete interrompue et il faut la reprendre
 
 elseif (isset($GLOBALS['meta']['admin'])) {
-	if (preg_match('/^(.*)_(\d+)_/', $GLOBALS['meta']['admin'], $l)) {
-		[, $var_f, $n] = $l;
-	}
-	if (
-		_AJAX
-		or !(
-			isset($_COOKIE['spip_admin'])
-			or (isset($GLOBALS['visiteur_session']) and $GLOBALS['visiteur_session']['statut'] == '0minirezo')
-		)
-	) {
-		spip_log('Quand la meta admin vaut ' .
-			$GLOBALS['meta']['admin'] .
-			' seul un admin peut se connecter et sans AJAX.' .
-			' En cas de probleme, detruire cette meta.');
-		die(_T('info_travaux_texte'));
-	}
-	if ($n) {
-		[, $var_f, $n] = $l;
-		if (tester_url_ecrire("base_$var_f")) {
-			$var_f = "base_$var_f";
-		}
-		if ($var_f != $exec) {
-			spip_log("Le script $var_f lance par auteur$n se substitue a l'exec $exec");
-			$exec = $var_f;
-			set_request('exec', $exec);
-		}
-	}
+    if (preg_match('/^(.*)_(\d+)_/', $GLOBALS['meta']['admin'], $l)) {
+        [, $var_f, $n] = $l;
+    }
+    if (
+        _AJAX
+        or !(
+            isset($_COOKIE['spip_admin'])
+            or (isset($GLOBALS['visiteur_session']) and $GLOBALS['visiteur_session']['statut'] == '0minirezo')
+        )
+    ) {
+        spip_log('Quand la meta admin vaut ' .
+            $GLOBALS['meta']['admin'] .
+            ' seul un admin peut se connecter et sans AJAX.' .
+            ' En cas de probleme, detruire cette meta.');
+        die(_T('info_travaux_texte'));
+    }
+    if ($n) {
+        [, $var_f, $n] = $l;
+        if (tester_url_ecrire("base_$var_f")) {
+            $var_f = "base_$var_f";
+        }
+        if ($var_f != $exec) {
+            spip_log("Le script $var_f lance par auteur$n se substitue a l'exec $exec");
+            $exec = $var_f;
+            set_request('exec', $exec);
+        }
+    }
 }
 // si nom pas plausible, prendre le script par defaut
 // attention aux deux cas 404/403 qui commencent par un 4 !
 elseif (!preg_match(',^[a-z4_][0-9a-z_-]*$,i', $exec)) {
-	$exec = 'accueil';
-	set_request('exec', $exec);
+    $exec = 'accueil';
+    set_request('exec', $exec);
 }
 
 // compatibilite ascendante : obsolete, ne plus utiliser
@@ -155,19 +155,19 @@ 
 // on appelle directement la fonction, car un appel d'action peut conduire a une boucle infinie
 // si le cookie n'est pas pose correctement dans l'action
 if (
-	!$var_auth and isset($_COOKIE['spip_lang_ecrire'])
-	and $_COOKIE['spip_lang_ecrire'] <> $GLOBALS['visiteur_session']['lang']
+    !$var_auth and isset($_COOKIE['spip_lang_ecrire'])
+    and $_COOKIE['spip_lang_ecrire'] <> $GLOBALS['visiteur_session']['lang']
 ) {
-	include_spip('action/converser');
-	action_converser_post($GLOBALS['visiteur_session']['lang'], true);
+    include_spip('action/converser');
+    action_converser_post($GLOBALS['visiteur_session']['lang'], true);
 }
 
 if ($var_f = tester_url_ecrire($exec)) {
-	$var_f = charger_fonction($var_f);
-	$var_f(); // at last
+    $var_f = charger_fonction($var_f);
+    $var_f(); // at last
 } else {
-	// Rien de connu: rerouter vers exec=404 au lieu d'echouer
-	// ce qui permet de laisser la main a un plugin
-	$var_f = charger_fonction('404');
-	$var_f($exec);
+    // Rien de connu: rerouter vers exec=404 au lieu d'echouer
+    // ce qui permet de laisser la main a un plugin
+    $var_f = charger_fonction('404');
+    $var_f($exec);
 }