spip / SPIP

ecrire/install/etape_ldap2.php

Indentation +81 added lines, -81 removed lines

@@ -10,88 +10,88 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function install_etape_ldap2_dist() {
-	$minipage = new Spip\Afficher\Minipage\Installation();
-	echo $minipage->installDebutPage(['onload' => 'document.getElementById(\'suivant\').focus();return false;']);
-
-	$adresse_ldap = _request('adresse_ldap');
-
-	$port_ldap = _request('port_ldap');
-
-	$tls_ldap = _request('tls_ldap');
-
-	$protocole_ldap = _request('protocole_ldap');
-
-	$login_ldap = _request('login_ldap');
-
-	$pass_ldap = _request('pass_ldap');
-
-	$port_ldap = (int) $port_ldap;
-
-	$tls = false;
-
-	if ($tls_ldap == 'oui') {
-		if ($port_ldap == 636) {
-			$adresse_ldap = "ldaps://$adresse_ldap";
-		} else {
-			$tls = true;
-		}
-	}
-	else {
-		$tls_ldap == 'non';
-	}
-
-	// Verifions que l'adresse demandee est valide
-	$adresse_ldap = filter_var($adresse_ldap, FILTER_SANITIZE_URL) ?: '';
-
-	$ldap_link = ldap_connect($adresse_ldap, $port_ldap);
-	$erreur = 'ldap_connect(' . spip_htmlspecialchars($adresse_ldap) . ', ' . spip_htmlspecialchars($port_ldap) . ')';
-
-	if ($ldap_link) {
-		if (!ldap_set_option($ldap_link, LDAP_OPT_PROTOCOL_VERSION, $protocole_ldap)) {
-			$protocole_ldap = 2;
-			ldap_set_option($ldap_link, LDAP_OPT_PROTOCOL_VERSION, $protocole_ldap);
-		}
-		if ($tls && !ldap_start_tls($ldap_link)) {
-			$erreur = 'ldap_start_tls(' . spip_htmlspecialchars($ldap_link)
-				. ' ' . spip_htmlspecialchars($adresse_ldap)
-				. ', ' . spip_htmlspecialchars($port_ldap) . ')';
-			$ldap_link = false;
-		}
-		if ($ldap_link) {
-			$ldap_link = ldap_bind($ldap_link, $login_ldap, $pass_ldap);
-			$erreur = "ldap_bind('" . spip_htmlspecialchars($ldap_link)
-				. "', '" . spip_htmlspecialchars($login_ldap)
-				. "', '" . spip_htmlspecialchars($pass_ldap)
-				. "'): " . spip_htmlspecialchars($adresse_ldap)
-				. ', ' . spip_htmlspecialchars($port_ldap);
-		}
-	}
-
-	if ($ldap_link) {
-		echo info_etape(
-			_T('titre_connexion_ldap'),
-			info_progression_etape(2, 'etape_ldap', 'install/')
-		),  _T('info_connexion_ldap_ok');
-		echo generer_form_ecrire('install', (
-			"\n<input type='hidden' name='etape' value='ldap3' />"
-			. "\n<input type='hidden' name='adresse_ldap' value=\"" . spip_htmlspecialchars($adresse_ldap) . '" />'
-			. "\n<input type='hidden' name='port_ldap' value=\"" . spip_htmlspecialchars($port_ldap) . '" />'
-			. "\n<input type='hidden' name='login_ldap' value=\"" . spip_htmlspecialchars($login_ldap) . '" />'
-			. "\n<input type='hidden' name='pass_ldap' value=\"" . spip_htmlspecialchars($pass_ldap) . '" />'
-			. "\n<input type='hidden' name='protocole_ldap' value=\"" . spip_htmlspecialchars($protocole_ldap) . '" />'
-			. "\n<input type='hidden' name='tls_ldap' value=\"" . spip_htmlspecialchars($tls_ldap) . '" />'
-			. bouton_suivant()));
-	} else {
-		echo info_etape(_T('titre_connexion_ldap')), info_progression_etape(1, 'etape_ldap', 'install/', true),
-			"<div class='error'><p>" . _T('avis_connexion_ldap_echec_1') . '</p>',
-			'<p>' . _T('avis_connexion_ldap_echec_2') .
-			"<br />\n" . _T('avis_connexion_ldap_echec_3') .
-			'<br /><br />' . $erreur . '<b> ?</b></p></div>';
-	}
-
-	echo $minipage->installFinPage();
+    $minipage = new Spip\Afficher\Minipage\Installation();
+    echo $minipage->installDebutPage(['onload' => 'document.getElementById(\'suivant\').focus();return false;']);
+
+    $adresse_ldap = _request('adresse_ldap');
+
+    $port_ldap = _request('port_ldap');
+
+    $tls_ldap = _request('tls_ldap');
+
+    $protocole_ldap = _request('protocole_ldap');
+
+    $login_ldap = _request('login_ldap');
+
+    $pass_ldap = _request('pass_ldap');
+
+    $port_ldap = (int) $port_ldap;
+
+    $tls = false;
+
+    if ($tls_ldap == 'oui') {
+        if ($port_ldap == 636) {
+            $adresse_ldap = "ldaps://$adresse_ldap";
+        } else {
+            $tls = true;
+        }
+    }
+    else {
+        $tls_ldap == 'non';
+    }
+
+    // Verifions que l'adresse demandee est valide
+    $adresse_ldap = filter_var($adresse_ldap, FILTER_SANITIZE_URL) ?: '';
+
+    $ldap_link = ldap_connect($adresse_ldap, $port_ldap);
+    $erreur = 'ldap_connect(' . spip_htmlspecialchars($adresse_ldap) . ', ' . spip_htmlspecialchars($port_ldap) . ')';
+
+    if ($ldap_link) {
+        if (!ldap_set_option($ldap_link, LDAP_OPT_PROTOCOL_VERSION, $protocole_ldap)) {
+            $protocole_ldap = 2;
+            ldap_set_option($ldap_link, LDAP_OPT_PROTOCOL_VERSION, $protocole_ldap);
+        }
+        if ($tls && !ldap_start_tls($ldap_link)) {
+            $erreur = 'ldap_start_tls(' . spip_htmlspecialchars($ldap_link)
+                . ' ' . spip_htmlspecialchars($adresse_ldap)
+                . ', ' . spip_htmlspecialchars($port_ldap) . ')';
+            $ldap_link = false;
+        }
+        if ($ldap_link) {
+            $ldap_link = ldap_bind($ldap_link, $login_ldap, $pass_ldap);
+            $erreur = "ldap_bind('" . spip_htmlspecialchars($ldap_link)
+                . "', '" . spip_htmlspecialchars($login_ldap)
+                . "', '" . spip_htmlspecialchars($pass_ldap)
+                . "'): " . spip_htmlspecialchars($adresse_ldap)
+                . ', ' . spip_htmlspecialchars($port_ldap);
+        }
+    }
+
+    if ($ldap_link) {
+        echo info_etape(
+            _T('titre_connexion_ldap'),
+            info_progression_etape(2, 'etape_ldap', 'install/')
+        ),  _T('info_connexion_ldap_ok');
+        echo generer_form_ecrire('install', (
+            "\n<input type='hidden' name='etape' value='ldap3' />"
+            . "\n<input type='hidden' name='adresse_ldap' value=\"" . spip_htmlspecialchars($adresse_ldap) . '" />'
+            . "\n<input type='hidden' name='port_ldap' value=\"" . spip_htmlspecialchars($port_ldap) . '" />'
+            . "\n<input type='hidden' name='login_ldap' value=\"" . spip_htmlspecialchars($login_ldap) . '" />'
+            . "\n<input type='hidden' name='pass_ldap' value=\"" . spip_htmlspecialchars($pass_ldap) . '" />'
+            . "\n<input type='hidden' name='protocole_ldap' value=\"" . spip_htmlspecialchars($protocole_ldap) . '" />'
+            . "\n<input type='hidden' name='tls_ldap' value=\"" . spip_htmlspecialchars($tls_ldap) . '" />'
+            . bouton_suivant()));
+    } else {
+        echo info_etape(_T('titre_connexion_ldap')), info_progression_etape(1, 'etape_ldap', 'install/', true),
+            "<div class='error'><p>" . _T('avis_connexion_ldap_echec_1') . '</p>',
+            '<p>' . _T('avis_connexion_ldap_echec_2') .
+            "<br />\n" . _T('avis_connexion_ldap_echec_3') .
+            '<br /><br />' . $erreur . '<b> ?</b></p></div>';
+    }
+
+    echo $minipage->installFinPage();
 }

ecrire/install/etape_fin.php

Indentation +48 added lines, -48 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/headers');
@@ -19,61 +19,61 @@ 
 // Mise en place des fichiers de configuration si ce n'est fait
 
 function install_etape_fin_dist() {
-	ecrire_acces();
+    ecrire_acces();
 
-	$f = str_replace(_FILE_TMP_SUFFIX, '.php', _FILE_CHMOD_TMP);
-	if (file_exists(_FILE_CHMOD_TMP) && !@rename(_FILE_CHMOD_TMP, $f) && @copy(_FILE_CHMOD_TMP, $f)) {
-		spip_unlink(_FILE_CHMOD_TMP);
-	}
+    $f = str_replace(_FILE_TMP_SUFFIX, '.php', _FILE_CHMOD_TMP);
+    if (file_exists(_FILE_CHMOD_TMP) && !@rename(_FILE_CHMOD_TMP, $f) && @copy(_FILE_CHMOD_TMP, $f)) {
+        spip_unlink(_FILE_CHMOD_TMP);
+    }
 
-	$f = str_replace(_FILE_TMP_SUFFIX, '.php', _FILE_CONNECT_TMP);
-	if (file_exists(_FILE_CONNECT_TMP)) {
-		spip_log("renomme $f");
-		if (!@rename(_FILE_CONNECT_TMP, $f) && @copy(_FILE_CONNECT_TMP, $f)) {
-			@spip_unlink(_FILE_CONNECT_TMP);
-		}
-	}
+    $f = str_replace(_FILE_TMP_SUFFIX, '.php', _FILE_CONNECT_TMP);
+    if (file_exists(_FILE_CONNECT_TMP)) {
+        spip_log("renomme $f");
+        if (!@rename(_FILE_CONNECT_TMP, $f) && @copy(_FILE_CONNECT_TMP, $f)) {
+            @spip_unlink(_FILE_CONNECT_TMP);
+        }
+    }
 
-	// creer le repertoire cache, qui sert partout !
-	// deja fait en etape 4 en principe, on garde au cas ou
-	if (!@file_exists(_DIR_CACHE)) {
-		$rep = preg_replace(',' . _DIR_TMP . ',', '', _DIR_CACHE);
-		$rep = sous_repertoire(_DIR_TMP, $rep, true, true);
-	}
+    // creer le repertoire cache, qui sert partout !
+    // deja fait en etape 4 en principe, on garde au cas ou
+    if (!@file_exists(_DIR_CACHE)) {
+        $rep = preg_replace(',' . _DIR_TMP . ',', '', _DIR_CACHE);
+        $rep = sous_repertoire(_DIR_TMP, $rep, true, true);
+    }
 
-	// Verifier la securite des htaccess
-	// Si elle ne fonctionne pas, prevenir
-	$msg = install_verifier_htaccess();
-	if ($msg) {
-		$cible = _T('public:accueil_site');
-		$cible = generer_form_ecrire('accueil', '', '', $cible);
-		$minipage = new Spip\Afficher\Minipage\Installation();
-		echo $minipage->page($msg . $cible);
-		// ok, deboucher dans l'espace prive
-	} else {
-		redirige_url_ecrire('accueil');
-	}
+    // Verifier la securite des htaccess
+    // Si elle ne fonctionne pas, prevenir
+    $msg = install_verifier_htaccess();
+    if ($msg) {
+        $cible = _T('public:accueil_site');
+        $cible = generer_form_ecrire('accueil', '', '', $cible);
+        $minipage = new Spip\Afficher\Minipage\Installation();
+        echo $minipage->page($msg . $cible);
+        // ok, deboucher dans l'espace prive
+    } else {
+        redirige_url_ecrire('accueil');
+    }
 }
 
 function install_verifier_htaccess() {
-	if (
-		verifier_htaccess(_DIR_TMP, true)
-		&& verifier_htaccess(_DIR_CONNECT, true)
-		&& verifier_htaccess(_DIR_VENDOR, true)
-	) {
-		return '';
-	}
+    if (
+        verifier_htaccess(_DIR_TMP, true)
+        && verifier_htaccess(_DIR_CONNECT, true)
+        && verifier_htaccess(_DIR_VENDOR, true)
+    ) {
+        return '';
+    }
 
-	$titre = _T('htaccess_inoperant');
+    $titre = _T('htaccess_inoperant');
 
-	$averti = _T(
-		'htaccess_a_simuler',
-		[
-			'htaccess' => '<tt>' . _ACCESS_FILE_NAME . '</tt>',
-			'constantes' => '<tt>_DIR_TMP &amp; _DIR_CONNECT</tt>',
-			'document_root' => '<tt>' . $_SERVER['DOCUMENT_ROOT'] . '</tt>'
-		]
-	);
+    $averti = _T(
+        'htaccess_a_simuler',
+        [
+            'htaccess' => '<tt>' . _ACCESS_FILE_NAME . '</tt>',
+            'constantes' => '<tt>_DIR_TMP &amp; _DIR_CONNECT</tt>',
+            'document_root' => '<tt>' . $_SERVER['DOCUMENT_ROOT'] . '</tt>'
+        ]
+    );
 
-	return "<div class='error'><h3>$titre</h3><p>$averti</p></div>";
+    return "<div class='error'><h3>$titre</h3><p>$averti</p></div>";
 }

ecrire/install/etape_3.php

Indentation +346 added lines, -346 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/headers');
@@ -18,199 +18,199 @@ 
 
 function install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db) {
 
-	// Prefix des tables :
-	// S'il n'est pas defini par mes_options/inc/mutualiser, on va le creer
-	// a partir de ce qui est envoye a l'installation
-	if (!defined('_INSTALL_TABLE_PREFIX')) {
-		$table_prefix = ($GLOBALS['table_prefix'] != 'spip')
-			? $GLOBALS['table_prefix']
-			: preparer_prefixe_tables(_request('tprefix'));
-		// S'il est vide on remet spip
-		if (!$table_prefix) {
-			$table_prefix = 'spip';
-		}
-	} else {
-		$table_prefix = _INSTALL_TABLE_PREFIX;
-	}
-
-	if (preg_match(',(.*):(.*),', $adresse_db, $r)) {
-		[, $adresse_db, $port] = $r;
-	} else {
-		$port = '';
-	}
-
-	$GLOBALS['connexions'][$server_db]
-		= spip_connect_db($adresse_db, $port, $login_db, $pass_db, '', $server_db);
-
-	$GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
-		= $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
-
-	$fquery = sql_serveur('query', $server_db);
-	if ($choix_db == 'new_spip') {
-		$re = ',^[a-z_][a-z_0-9-]*$,i';
-		if (preg_match($re, $sel_db)) {
-			$ok = sql_create_base($sel_db, $server_db);
-			if (!$ok) {
-				$re = "Impossible de creer la base $re";
-				spip_log($re);
-				return '<p>' . _T('avis_connexion_erreur_creer_base') . "</p><!--\n$re\n-->";
-			}
-		} else {
-			$re = "Le nom de la base doit correspondre a $re";
-			spip_log($re);
-
-			return '<p>' . _T('avis_connexion_erreur_nom_base') . "</p><!--\n$re\n-->";
-		}
-	}
-
-	// on rejoue la connexion apres avoir teste si il faut lui indiquer
-	// un sql_mode
-	install_mode_appel($server_db, false);
-	$GLOBALS['connexions'][$server_db]
-		= spip_connect_db($adresse_db, $port, $login_db, $pass_db, $sel_db, $server_db);
-
-	$GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
-		= $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
-
-	// Completer le tableau decrivant la connexion
-
-	$GLOBALS['connexions'][$server_db]['prefixe'] = $table_prefix;
-	$GLOBALS['connexions'][$server_db]['db'] = $sel_db;
-
-	$old = sql_showbase($table_prefix . '_meta', $server_db);
-	if ($old) {
-		$old = sql_fetch($old, $server_db);
-	}
-	if (!$old) {
-		// Si possible, demander au serveur d'envoyer les textes
-		// dans le codage std de SPIP,
-		$charset = sql_get_charset(_DEFAULT_CHARSET, $server_db);
-
-		if ($charset) {
-			sql_set_charset($charset['charset'], $server_db);
-			$GLOBALS['meta']['charset_sql_base'] =
-				$charset['charset'];
-			$GLOBALS['meta']['charset_collation_sql_base'] =
-				$charset['collation'];
-			$GLOBALS['meta']['charset_sql_connexion'] =
-				$charset['charset'];
-			$charsetbase = $charset['charset'];
-		} else {
-			spip_log(_DEFAULT_CHARSET . ' inconnu du serveur SQL');
-			$charsetbase = 'standard';
-		}
-		spip_log("Creation des tables. Codage $charsetbase");
-		creer_base($server_db); // AT LAST
-		// memoriser avec quel charset on l'a creee
-
-		if ($charset) {
-			$t = [
-				'nom' => 'charset_sql_base',
-				'valeur' => $charset['charset'],
-				'impt' => 'non'
-			];
-			@sql_insertq('spip_meta', $t, [], $server_db);
-			$t['nom'] = 'charset_collation_sql_base';
-			$t['valeur'] = $charset['collation'];
-			@sql_insertq('spip_meta', $t, [], $server_db);
-			$t['nom'] = 'charset_sql_connexion';
-			$t['valeur'] = $charset['charset'];
-			@sql_insertq('spip_meta', $t, [], $server_db);
-		}
-		$t = [
-			'nom' => 'version_installee',
-			'valeur' => $GLOBALS['spip_version_base'],
-			'impt' => 'non'
-		];
-		@sql_insertq('spip_meta', $t, [], $server_db);
-		$t['nom'] = 'nouvelle_install';
-		$t['valeur'] = 1;
-		@sql_insertq('spip_meta', $t, [], $server_db);
-		// positionner la langue par defaut du site si un cookie de lang a ete mis
-		if (isset($_COOKIE['spip_lang_ecrire'])) {
-			@sql_insertq(
-				'spip_meta',
-				['nom' => 'langue_site', 'valeur' => $_COOKIE['spip_lang_ecrire']],
-				[],
-				$server_db
-			);
-		}
-	} else {
-		// pour recreer les tables disparues au besoin
-		spip_log('Table des Meta deja la. Verification des autres.');
-		creer_base($server_db);
-		$fupdateq = sql_serveur('updateq', $server_db);
-
-		$r = $fquery("SELECT valeur FROM spip_meta WHERE nom='version_installee'", $server_db);
-
-		if ($r) {
-			$r = sql_fetch($r, $server_db);
-		}
-		$version_installee = $r ? (double)$r['valeur'] : 0;
-		if (!$version_installee || $GLOBALS['spip_version_base'] < $version_installee) {
-			$fupdateq(
-				'spip_meta',
-				['valeur' => $GLOBALS['spip_version_base'], 'impt' => 'non'],
-				"nom='version_installee'",
-				'',
-				$server_db
-			);
-			spip_log('nouvelle version installee: ' . $GLOBALS['spip_version_base']);
-		}
-		// eliminer la derniere operation d'admin mal terminee
-		// notamment la mise a jour
-		@$fquery("DELETE FROM spip_meta WHERE nom='import_all' OR  nom='admin'", $server_db);
-	}
-
-	// recuperer le charset de la connexion dans les meta
-	$charset = '';
-	$r = $fquery("SELECT valeur FROM spip_meta WHERE nom='charset_sql_connexion'", $server_db);
-	if ($r) {
-		$r = sql_fetch($r, $server_db);
-	}
-	if ($r) {
-		$charset = $r['valeur'];
-	}
-
-	$ligne_rappel = install_mode_appel($server_db);
-
-	$result_ok = @$fquery('SELECT COUNT(*) FROM spip_meta', $server_db);
-	if (!$result_ok) {
-		return "<!--\nvielle = $old rappel= $ligne_rappel\n-->";
-	}
-
-	if ($chmod_db) {
-		install_fichier_connexion(
-			_FILE_CHMOD_TMP,
-			"if (!defined('_SPIP_CHMOD')) define('_SPIP_CHMOD', " . sprintf('0%3o', $chmod_db) . ");\n"
-		);
-	}
-
-	// si ce fichier existe a cette etape c'est qu'il provient
-	// d'une installation qui ne l'a pas cree correctement.
-	// Le supprimer pour que _FILE_CONNECT_TMP prime.
-
-	if (_FILE_CONNECT && file_exists(_FILE_CONNECT)) {
-		spip_unlink(_FILE_CONNECT);
-	}
-
-	install_fichier_connexion(
-		_FILE_CONNECT_TMP,
-		$ligne_rappel
-		. install_connexion(
-			$adresse_db,
-			$port,
-			$login_db,
-			$pass_db,
-			$sel_db,
-			$server_db,
-			$table_prefix,
-			'',
-			$charset
-		)
-	);
-
-	return '';
+    // Prefix des tables :
+    // S'il n'est pas defini par mes_options/inc/mutualiser, on va le creer
+    // a partir de ce qui est envoye a l'installation
+    if (!defined('_INSTALL_TABLE_PREFIX')) {
+        $table_prefix = ($GLOBALS['table_prefix'] != 'spip')
+            ? $GLOBALS['table_prefix']
+            : preparer_prefixe_tables(_request('tprefix'));
+        // S'il est vide on remet spip
+        if (!$table_prefix) {
+            $table_prefix = 'spip';
+        }
+    } else {
+        $table_prefix = _INSTALL_TABLE_PREFIX;
+    }
+
+    if (preg_match(',(.*):(.*),', $adresse_db, $r)) {
+        [, $adresse_db, $port] = $r;
+    } else {
+        $port = '';
+    }
+
+    $GLOBALS['connexions'][$server_db]
+        = spip_connect_db($adresse_db, $port, $login_db, $pass_db, '', $server_db);
+
+    $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
+        = $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
+
+    $fquery = sql_serveur('query', $server_db);
+    if ($choix_db == 'new_spip') {
+        $re = ',^[a-z_][a-z_0-9-]*$,i';
+        if (preg_match($re, $sel_db)) {
+            $ok = sql_create_base($sel_db, $server_db);
+            if (!$ok) {
+                $re = "Impossible de creer la base $re";
+                spip_log($re);
+                return '<p>' . _T('avis_connexion_erreur_creer_base') . "</p><!--\n$re\n-->";
+            }
+        } else {
+            $re = "Le nom de la base doit correspondre a $re";
+            spip_log($re);
+
+            return '<p>' . _T('avis_connexion_erreur_nom_base') . "</p><!--\n$re\n-->";
+        }
+    }
+
+    // on rejoue la connexion apres avoir teste si il faut lui indiquer
+    // un sql_mode
+    install_mode_appel($server_db, false);
+    $GLOBALS['connexions'][$server_db]
+        = spip_connect_db($adresse_db, $port, $login_db, $pass_db, $sel_db, $server_db);
+
+    $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
+        = $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
+
+    // Completer le tableau decrivant la connexion
+
+    $GLOBALS['connexions'][$server_db]['prefixe'] = $table_prefix;
+    $GLOBALS['connexions'][$server_db]['db'] = $sel_db;
+
+    $old = sql_showbase($table_prefix . '_meta', $server_db);
+    if ($old) {
+        $old = sql_fetch($old, $server_db);
+    }
+    if (!$old) {
+        // Si possible, demander au serveur d'envoyer les textes
+        // dans le codage std de SPIP,
+        $charset = sql_get_charset(_DEFAULT_CHARSET, $server_db);
+
+        if ($charset) {
+            sql_set_charset($charset['charset'], $server_db);
+            $GLOBALS['meta']['charset_sql_base'] =
+                $charset['charset'];
+            $GLOBALS['meta']['charset_collation_sql_base'] =
+                $charset['collation'];
+            $GLOBALS['meta']['charset_sql_connexion'] =
+                $charset['charset'];
+            $charsetbase = $charset['charset'];
+        } else {
+            spip_log(_DEFAULT_CHARSET . ' inconnu du serveur SQL');
+            $charsetbase = 'standard';
+        }
+        spip_log("Creation des tables. Codage $charsetbase");
+        creer_base($server_db); // AT LAST
+        // memoriser avec quel charset on l'a creee
+
+        if ($charset) {
+            $t = [
+                'nom' => 'charset_sql_base',
+                'valeur' => $charset['charset'],
+                'impt' => 'non'
+            ];
+            @sql_insertq('spip_meta', $t, [], $server_db);
+            $t['nom'] = 'charset_collation_sql_base';
+            $t['valeur'] = $charset['collation'];
+            @sql_insertq('spip_meta', $t, [], $server_db);
+            $t['nom'] = 'charset_sql_connexion';
+            $t['valeur'] = $charset['charset'];
+            @sql_insertq('spip_meta', $t, [], $server_db);
+        }
+        $t = [
+            'nom' => 'version_installee',
+            'valeur' => $GLOBALS['spip_version_base'],
+            'impt' => 'non'
+        ];
+        @sql_insertq('spip_meta', $t, [], $server_db);
+        $t['nom'] = 'nouvelle_install';
+        $t['valeur'] = 1;
+        @sql_insertq('spip_meta', $t, [], $server_db);
+        // positionner la langue par defaut du site si un cookie de lang a ete mis
+        if (isset($_COOKIE['spip_lang_ecrire'])) {
+            @sql_insertq(
+                'spip_meta',
+                ['nom' => 'langue_site', 'valeur' => $_COOKIE['spip_lang_ecrire']],
+                [],
+                $server_db
+            );
+        }
+    } else {
+        // pour recreer les tables disparues au besoin
+        spip_log('Table des Meta deja la. Verification des autres.');
+        creer_base($server_db);
+        $fupdateq = sql_serveur('updateq', $server_db);
+
+        $r = $fquery("SELECT valeur FROM spip_meta WHERE nom='version_installee'", $server_db);
+
+        if ($r) {
+            $r = sql_fetch($r, $server_db);
+        }
+        $version_installee = $r ? (double)$r['valeur'] : 0;
+        if (!$version_installee || $GLOBALS['spip_version_base'] < $version_installee) {
+            $fupdateq(
+                'spip_meta',
+                ['valeur' => $GLOBALS['spip_version_base'], 'impt' => 'non'],
+                "nom='version_installee'",
+                '',
+                $server_db
+            );
+            spip_log('nouvelle version installee: ' . $GLOBALS['spip_version_base']);
+        }
+        // eliminer la derniere operation d'admin mal terminee
+        // notamment la mise a jour
+        @$fquery("DELETE FROM spip_meta WHERE nom='import_all' OR  nom='admin'", $server_db);
+    }
+
+    // recuperer le charset de la connexion dans les meta
+    $charset = '';
+    $r = $fquery("SELECT valeur FROM spip_meta WHERE nom='charset_sql_connexion'", $server_db);
+    if ($r) {
+        $r = sql_fetch($r, $server_db);
+    }
+    if ($r) {
+        $charset = $r['valeur'];
+    }
+
+    $ligne_rappel = install_mode_appel($server_db);
+
+    $result_ok = @$fquery('SELECT COUNT(*) FROM spip_meta', $server_db);
+    if (!$result_ok) {
+        return "<!--\nvielle = $old rappel= $ligne_rappel\n-->";
+    }
+
+    if ($chmod_db) {
+        install_fichier_connexion(
+            _FILE_CHMOD_TMP,
+            "if (!defined('_SPIP_CHMOD')) define('_SPIP_CHMOD', " . sprintf('0%3o', $chmod_db) . ");\n"
+        );
+    }
+
+    // si ce fichier existe a cette etape c'est qu'il provient
+    // d'une installation qui ne l'a pas cree correctement.
+    // Le supprimer pour que _FILE_CONNECT_TMP prime.
+
+    if (_FILE_CONNECT && file_exists(_FILE_CONNECT)) {
+        spip_unlink(_FILE_CONNECT);
+    }
+
+    install_fichier_connexion(
+        _FILE_CONNECT_TMP,
+        $ligne_rappel
+        . install_connexion(
+            $adresse_db,
+            $port,
+            $login_db,
+            $pass_db,
+            $sel_db,
+            $server_db,
+            $table_prefix,
+            '',
+            $charset
+        )
+    );
+
+    return '';
 }
 
 /**
@@ -225,166 +225,166 @@ 
  * @return string Le préfixe corrigé
  */
 function preparer_prefixe_tables($prefixe) {
-	return trim(preg_replace(',^\d+,', '', preg_replace(',[^a-z0-9],', '', strtolower($prefixe))));
+    return trim(preg_replace(',^\d+,', '', preg_replace(',[^a-z0-9],', '', strtolower($prefixe))));
 }
 
 function install_propose_ldap() {
-	return generer_form_ecrire('install', (
-	fieldset(
-		_T('info_authentification_externe'),
-		[
-			'etape' => [
-				'label' => _T('texte_annuaire_ldap_1'),
-				'valeur' => 'ldap1',
-				'hidden' => true
-			]
-		],
-		bouton_suivant(_T('bouton_acces_ldap'))
-	)));
+    return generer_form_ecrire('install', (
+    fieldset(
+        _T('info_authentification_externe'),
+        [
+            'etape' => [
+                'label' => _T('texte_annuaire_ldap_1'),
+                'valeur' => 'ldap1',
+                'hidden' => true
+            ]
+        ],
+        bouton_suivant(_T('bouton_acces_ldap'))
+    )));
 }
 
 
 function install_premier_auteur($email, $login, $nom, #[\SensitiveParameter] $pass, $hidden, $auteur_obligatoire) {
-	return info_progression_etape(3, 'etape_', 'install/') .
-	info_etape(
-		_T('info_informations_personnelles'),
-		'<b>' . _T('texte_informations_personnelles_1') . '</b>' .
-		aider('install5', true) .
-		'<p>' .
-		($auteur_obligatoire ?
-			''
-			:
-			_T('texte_informations_personnelles_2') . ' ' . _T('info_laisser_champs_vides')
-		)
-	)
-	. generer_form_ecrire('install', (
-		"\n<input type='hidden' name='etape' value='3b' />"
-		. $hidden
-		. fieldset(
-			_T('info_identification_publique'),
-			[
-				'nom' => [
-					'label' => '<b>' . _T('entree_signature') . "</b><br />\n" . _T('entree_nom_pseudo_1') . "\n",
-					'valeur' => $nom,
-					'required' => $auteur_obligatoire,
-				],
-				'email' => [
-					'label' => '<b>' . _T('entree_adresse_email') . "</b>\n",
-					'valeur' => $email,
-				]
-			]
-		)
-
-		. fieldset(
-			_T('entree_identifiants_connexion'),
-			[
-				'login' => [
-					'label' => '<b>' . _T('entree_login') . "</b><br />\n" . _T(
-						'info_login_trop_court_car_pluriel',
-						['nb' => _LOGIN_TROP_COURT]
-					) . "\n",
-					'valeur' => $login,
-					'required' => $auteur_obligatoire,
-				],
-				'pass' => [
-					'label' => '<b>' . _T('entree_mot_passe') . "</b><br />\n" . _T(
-						'info_passe_trop_court_car_pluriel',
-						['nb' => _PASS_LONGUEUR_MINI]
-					) . "\n",
-					'valeur' => $pass,
-					'required' => $auteur_obligatoire,
-				],
-				'pass_verif' => [
-					'label' => '<b>' . _T('info_confirmer_passe') . "</b><br />\n",
-					'valeur' => $pass,
-					'required' => $auteur_obligatoire,
-				]
-			]
-		)
-		. bouton_suivant()));
+    return info_progression_etape(3, 'etape_', 'install/') .
+    info_etape(
+        _T('info_informations_personnelles'),
+        '<b>' . _T('texte_informations_personnelles_1') . '</b>' .
+        aider('install5', true) .
+        '<p>' .
+        ($auteur_obligatoire ?
+            ''
+            :
+            _T('texte_informations_personnelles_2') . ' ' . _T('info_laisser_champs_vides')
+        )
+    )
+    . generer_form_ecrire('install', (
+        "\n<input type='hidden' name='etape' value='3b' />"
+        . $hidden
+        . fieldset(
+            _T('info_identification_publique'),
+            [
+                'nom' => [
+                    'label' => '<b>' . _T('entree_signature') . "</b><br />\n" . _T('entree_nom_pseudo_1') . "\n",
+                    'valeur' => $nom,
+                    'required' => $auteur_obligatoire,
+                ],
+                'email' => [
+                    'label' => '<b>' . _T('entree_adresse_email') . "</b>\n",
+                    'valeur' => $email,
+                ]
+            ]
+        )
+
+        . fieldset(
+            _T('entree_identifiants_connexion'),
+            [
+                'login' => [
+                    'label' => '<b>' . _T('entree_login') . "</b><br />\n" . _T(
+                        'info_login_trop_court_car_pluriel',
+                        ['nb' => _LOGIN_TROP_COURT]
+                    ) . "\n",
+                    'valeur' => $login,
+                    'required' => $auteur_obligatoire,
+                ],
+                'pass' => [
+                    'label' => '<b>' . _T('entree_mot_passe') . "</b><br />\n" . _T(
+                        'info_passe_trop_court_car_pluriel',
+                        ['nb' => _PASS_LONGUEUR_MINI]
+                    ) . "\n",
+                    'valeur' => $pass,
+                    'required' => $auteur_obligatoire,
+                ],
+                'pass_verif' => [
+                    'label' => '<b>' . _T('info_confirmer_passe') . "</b><br />\n",
+                    'valeur' => $pass,
+                    'required' => $auteur_obligatoire,
+                ]
+            ]
+        )
+        . bouton_suivant()));
 }
 
 function install_etape_3_dist() {
-	$ldap_present = _request('ldap_present');
-
-	if (!$ldap_present) {
-		$adresse_db = defined('_INSTALL_HOST_DB')
-			? _INSTALL_HOST_DB
-			: _request('adresse_db');
-
-		$login_db = defined('_INSTALL_USER_DB')
-			? _INSTALL_USER_DB
-			: _request('login_db');
-
-		$pass_db = defined('_INSTALL_PASS_DB')
-			? _INSTALL_PASS_DB
-			: _request('pass_db');
-
-		$server_db = defined('_INSTALL_SERVER_DB')
-			? _INSTALL_SERVER_DB
-			: _request('server_db');
-
-		$chmod_db = defined('_SPIP_CHMOD')
-			? _SPIP_CHMOD
-			: _request('chmod');
-
-		$choix_db = defined('_INSTALL_NAME_DB')
-			? _INSTALL_NAME_DB
-			: _request('choix_db');
-
-		$sel_db = ($choix_db == 'new_spip')
-			? _request('table_new') : $choix_db;
-
-		$res = install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db);
-
-		if ($res) {
-			$res = info_progression_etape(2, 'etape_', 'install/', true)
-				. "<div class='error'><h3>" . _T('avis_operation_echec') . '</h3>'
-				. $res
-				. '<p>' . _T('texte_operation_echec') . '</p>'
-				. '</div>';
-		}
-	} else {
-		$res = '';
-		[$adresse_db, $login_db, $pass_db, $sel_db, $server_db] = analyse_fichier_connection(_FILE_CONNECT_TMP);
-		$GLOBALS['connexions'][$server_db] = spip_connect_db($adresse_db, $sel_db, $login_db, $pass_db, $sel_db, $server_db);
-	}
-
-	if (!$res) {
-		if (file_exists(_FILE_CONNECT_TMP)) {
-			include(_FILE_CONNECT_TMP);
-		} else {
-			redirige_url_ecrire('install');
-		}
-
-		if (file_exists(_FILE_CHMOD_TMP)) {
-			include(_FILE_CHMOD_TMP);
-		} else {
-			redirige_url_ecrire('install');
-		}
-
-		$hidden = predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db)
-			. (defined('_INSTALL_NAME_DB') ? ''
-				: "\n<input type='hidden' name='sel_db' value=\"" . spip_htmlspecialchars($sel_db) . '" />');
-
-		$auteur_obligatoire = ($ldap_present ? 0 : !sql_countsel('spip_auteurs', '', '', '', $server_db));
-
-		$res = "<div class='success'><b>"
-			. _T('info_base_installee')
-			. '</b></div>'
-			. install_premier_auteur(
-				_request('email'),
-				_request('login'),
-				_request('nom'),
-				_request('pass'),
-				$hidden,
-				$auteur_obligatoire
-			)
-			. (($ldap_present || !function_exists('ldap_connect'))
-				? '' : install_propose_ldap());
-	}
-
-
-	$minipage = new Spip\Afficher\Minipage\Installation();
-	echo $minipage->page($res);
+    $ldap_present = _request('ldap_present');
+
+    if (!$ldap_present) {
+        $adresse_db = defined('_INSTALL_HOST_DB')
+            ? _INSTALL_HOST_DB
+            : _request('adresse_db');
+
+        $login_db = defined('_INSTALL_USER_DB')
+            ? _INSTALL_USER_DB
+            : _request('login_db');
+
+        $pass_db = defined('_INSTALL_PASS_DB')
+            ? _INSTALL_PASS_DB
+            : _request('pass_db');
+
+        $server_db = defined('_INSTALL_SERVER_DB')
+            ? _INSTALL_SERVER_DB
+            : _request('server_db');
+
+        $chmod_db = defined('_SPIP_CHMOD')
+            ? _SPIP_CHMOD
+            : _request('chmod');
+
+        $choix_db = defined('_INSTALL_NAME_DB')
+            ? _INSTALL_NAME_DB
+            : _request('choix_db');
+
+        $sel_db = ($choix_db == 'new_spip')
+            ? _request('table_new') : $choix_db;
+
+        $res = install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db);
+
+        if ($res) {
+            $res = info_progression_etape(2, 'etape_', 'install/', true)
+                . "<div class='error'><h3>" . _T('avis_operation_echec') . '</h3>'
+                . $res
+                . '<p>' . _T('texte_operation_echec') . '</p>'
+                . '</div>';
+        }
+    } else {
+        $res = '';
+        [$adresse_db, $login_db, $pass_db, $sel_db, $server_db] = analyse_fichier_connection(_FILE_CONNECT_TMP);
+        $GLOBALS['connexions'][$server_db] = spip_connect_db($adresse_db, $sel_db, $login_db, $pass_db, $sel_db, $server_db);
+    }
+
+    if (!$res) {
+        if (file_exists(_FILE_CONNECT_TMP)) {
+            include(_FILE_CONNECT_TMP);
+        } else {
+            redirige_url_ecrire('install');
+        }
+
+        if (file_exists(_FILE_CHMOD_TMP)) {
+            include(_FILE_CHMOD_TMP);
+        } else {
+            redirige_url_ecrire('install');
+        }
+
+        $hidden = predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db)
+            . (defined('_INSTALL_NAME_DB') ? ''
+                : "\n<input type='hidden' name='sel_db' value=\"" . spip_htmlspecialchars($sel_db) . '" />');
+
+        $auteur_obligatoire = ($ldap_present ? 0 : !sql_countsel('spip_auteurs', '', '', '', $server_db));
+
+        $res = "<div class='success'><b>"
+            . _T('info_base_installee')
+            . '</b></div>'
+            . install_premier_auteur(
+                _request('email'),
+                _request('login'),
+                _request('nom'),
+                _request('pass'),
+                $hidden,
+                $auteur_obligatoire
+            )
+            . (($ldap_present || !function_exists('ldap_connect'))
+                ? '' : install_propose_ldap());
+    }
+
+
+    $minipage = new Spip\Afficher\Minipage\Installation();
+    echo $minipage->page($res);
 }

ecrire/install/etape_1.php

Indentation +30 added lines, -30 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -34,45 +34,45 @@ 
  */
 function install_etape_1_dist() {
 
-	$minipage = new Spip\Afficher\Minipage\Installation();
-	echo $minipage->installDebutPage();
+    $minipage = new Spip\Afficher\Minipage\Installation();
+    echo $minipage->installDebutPage();
 
-	// stopper en cas de grosse incompatibilite de l'hebergement
-	tester_compatibilite_hebergement();
+    // stopper en cas de grosse incompatibilite de l'hebergement
+    tester_compatibilite_hebergement();
 
-	// Recuperer les anciennes donnees pour plus de facilite (si presentes)
-	$s = @is_readable(_FILE_CONNECT_TMP) ? analyse_fichier_connection(_FILE_CONNECT_TMP) : '';
+    // Recuperer les anciennes donnees pour plus de facilite (si presentes)
+    $s = @is_readable(_FILE_CONNECT_TMP) ? analyse_fichier_connection(_FILE_CONNECT_TMP) : '';
 
-	[$adresse_db, $login_db] = $s ?: ['localhost', ''];
+    [$adresse_db, $login_db] = $s ?: ['localhost', ''];
 
-	$chmod = (isset($_GET['chmod']) && preg_match(',^\d+$,', $_GET['chmod'])) ?
-		sprintf('%04o', $_GET['chmod']) : '0777';
+    $chmod = (isset($_GET['chmod']) && preg_match(',^\d+$,', $_GET['chmod'])) ?
+        sprintf('%04o', $_GET['chmod']) : '0777';
 
-	if (@is_readable(_FILE_CHMOD_TMP)) {
-		$s = @implode('', @file(_FILE_CHMOD_TMP));
-		if (preg_match("#define\('_SPIP_CHMOD', (.*)\)#", $s, $regs)) {
-			$chmod = $regs[1];
-		}
-	}
+    if (@is_readable(_FILE_CHMOD_TMP)) {
+        $s = @implode('', @file(_FILE_CHMOD_TMP));
+        if (preg_match("#define\('_SPIP_CHMOD', (.*)\)#", $s, $regs)) {
+            $chmod = $regs[1];
+        }
+    }
 
 
-	$db = [$adresse_db, _T('entree_base_donnee_2')];
-	$login = [$login_db, _T('entree_login_connexion_2')];
-	$pass = ['', _T('entree_mot_passe_2')];
+    $db = [$adresse_db, _T('entree_base_donnee_2')];
+    $login = [$login_db, _T('entree_login_connexion_2')];
+    $pass = ['', _T('entree_mot_passe_2')];
 
-	$predef = [
-		defined('_INSTALL_SERVER_DB') ? _INSTALL_SERVER_DB : '',
-		defined('_INSTALL_HOST_DB'),
-		defined('_INSTALL_USER_DB'),
-		defined('_INSTALL_PASS_DB')
-	];
+    $predef = [
+        defined('_INSTALL_SERVER_DB') ? _INSTALL_SERVER_DB : '',
+        defined('_INSTALL_HOST_DB'),
+        defined('_INSTALL_USER_DB'),
+        defined('_INSTALL_PASS_DB')
+    ];
 
 
-	echo info_progression_etape(1, 'etape_', 'install/');
+    echo info_progression_etape(1, 'etape_', 'install/');
 
-	// ces deux chaines de langues doivent etre reecrites
+    // ces deux chaines de langues doivent etre reecrites
 #	echo info_etape(_T('info_connexion_mysql'), _T('texte_connexion_mysql').aide ("install1", true));
-	echo info_etape(_T('info_connexion_base_donnee'));
-	echo install_connexion_form($db, $login, $pass, $predef, "\n<input type='hidden' name='chmod' value='$chmod' />", 2);
-	echo $minipage->installFinPage();
+    echo info_etape(_T('info_connexion_base_donnee'));
+    echo install_connexion_form($db, $login, $pass, $predef, "\n<input type='hidden' name='chmod' value='$chmod' />", 2);
+    echo $minipage->installFinPage();
 }

ecrire/public.php

Indentation +183 added lines, -183 removed lines

@@ -20,188 +20,188 @@
 // par souci de compatiilite).
 
 if (isset($GLOBALS['_INC_PUBLIC']) && $GLOBALS['_INC_PUBLIC']) {
-	echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
+    echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
 } else {
-	$GLOBALS['_INC_PUBLIC'] = 1;
-	define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
-
-	// Faut-il initialiser SPIP ? (oui dans le cas general)
-	if (!defined('_DIR_RESTREINT_ABS')) {
-		if (
-			defined('_DIR_RESTREINT')
-			&& @file_exists(_ROOT_RESTREINT . 'inc_version.php')
-		) {
-			include_once _ROOT_RESTREINT . 'inc_version.php';
-		} else {
-			die('inc_version absent ?');
-		}
-	} // $fond defini dans le fichier d'appel ?
-
-	else {
-		if (isset($fond) && !_request('fond')) {
-		} // fond demande dans l'url par page=xxxx ?
-		else {
-			if (isset($_GET[_SPIP_PAGE])) {
-				$fond = (string)$_GET[_SPIP_PAGE];
-
-				// Securite
-				if (
-					strstr($fond, '/')
-					&& !(isset($GLOBALS['visiteur_session']) && include_spip('inc/autoriser') && autoriser('webmestre'))
-				) {
-					include_spip('inc/minipres');
-					echo minipres();
-					exit;
-				}
-				// l'argument Page a priorite sur l'argument action
-				// le cas se presente a cause des RewriteRule d'Apache
-				// qui permettent d'ajouter un argument dans la QueryString
-				// mais pas d'en retirer un en conservant les autres.
-				if (isset($_GET['action']) && $_GET['action'] === $fond) {
-					unset($_GET['action']);
-				}
-				# sinon, fond par defaut
-			} else {
-				// sinon fond par defaut (cf. assembler.php)
-				$fond = pipeline('detecter_fond_par_defaut', '');
-			}
-		}
-	}
-
-	$tableau_des_temps = [];
-
-	// Particularites de certains squelettes
-	if ($fond == 'login') {
-		$forcer_lang = true;
-	}
-
-	if (
-		isset($forcer_lang) && $forcer_lang && $forcer_lang !== 'non'
-		&& !_request('action')
-		&& $_SERVER['REQUEST_METHOD'] != 'POST'
-	) {
-		include_spip('inc/lang');
-		verifier_lang_url();
-	}
-
-	$lang = isset($_GET['lang']) ? lang_select($_GET['lang']) : '';
-
-	// Charger l'aiguilleur des traitements derogatoires
-	// (action en base SQL, formulaires CVT, AJax)
-	if (_request('action') || _request('var_ajax') || _request('formulaire_action')) {
-		include_spip('public/aiguiller');
-		if (
-			// cas des appels actions ?action=xxx
-			traiter_appels_actions()
-			// cas des hits ajax sur les inclusions ajax
-			|| traiter_appels_inclusions_ajax()
-			// cas des formulaires charger/verifier/traiter
-			|| traiter_formulaires_dynamiques()
-		) {
-			// lancer les taches sur affichage final, comme le cron
-			// mais sans rien afficher
-			$GLOBALS['html'] = false; // ne rien afficher
-			pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
-			exit; // le hit est fini !
-		}
-	}
-
-	// Il y a du texte a produire, charger le metteur en page
-	include_spip('public/assembler');
-	$page = assembler($fond, _request('connect') ?? '');
-
-	if (isset($page['status'])) {
-		include_spip('inc/headers');
-		http_response_code($page['status']);
-	}
-
-	// Content-Type ?
-	if (!isset($page['entetes']['Content-Type'])) {
-		$charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
-		$page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
-		$html = true;
-	} else {
-		$html = preg_match(',^\s*text/html,', $page['entetes']['Content-Type']);
-	}
-
-	// Tester si on est admin et il y a des choses supplementaires a dire
-	// type tableau pour y mettre des choses au besoin.
-	$debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
-
-	// affiche-t-on les boutons d'administration ? voir f_admin()
-	$affiche_boutons_admin = ($html && (
-		isset($_COOKIE['spip_admin']) && (!isset($flag_preserver) || !$flag_preserver)
-		|| $debug && include_spip('inc/autoriser') && autoriser('debug')
-		|| defined('_VAR_PREVIEW') && _VAR_PREVIEW)
-	);
-
-	if ($affiche_boutons_admin) {
-		include_spip('balise/formulaire_admin');
-	}
-
-
-	// Execution de la page calculee
-
-	// traitements sur les entetes avant envoi
-	// peut servir pour le plugin de stats
-	$page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
-
-
-	// eval $page et affecte $res
-	include _ROOT_RESTREINT . 'public/evaluer_page.php';
-	envoyer_entetes($page['entetes']);
-	if ($res === false) {
-		include_spip('inc/autoriser');
-		$err = _T('zbug_erreur_execution_page');
-		if (autoriser('webmestre')) {
-			$err .= "\n<hr />\n"
-				. highlight_string($page['codephp'], true)
-				. "\n<hr />\n";
-		}
-		$msg = [$err];
-		erreur_squelette($msg);
-	}
-
-	//
-	// Envoyer le resultat apres post-traitements
-	//
-	// (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
-	// cf. public/assembler.php)
-	echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
-
-	if ($lang) {
-		lang_select();
-	}
-	// l'affichage de la page a pu lever des erreurs (inclusion manquante)
-	// il faut tester a nouveau
-	$debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
-
-	// Appel au debusqueur en cas d'erreurs ou de demande de trace
-	// at last
-	if ($debug) {
-		// en cas d'erreur, retester l'affichage
-		if ($html && ($affiche_boutons_admin || $debug)) {
-			$var_mode_affiche = _request('var_mode_affiche');
-			$var_mode_objet = _request('var_mode_objet');
-			$GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
-			echo erreur_squelette(false);
-		}
-	} else {
-		if (
-			isset($GLOBALS['meta']['date_prochain_postdate'])
-			&& $GLOBALS['meta']['date_prochain_postdate'] <= time()
-		) {
-			include_spip('inc/rubriques');
-			calculer_prochain_postdate(true);
-		}
-
-		// Effectuer une tache de fond ?
-		// si _DIRECT_CRON_FORCE est present, on force l'appel
-		if (defined('_DIRECT_CRON_FORCE')) {
-			cron();
-		}
-
-		// sauver le cache chemin si necessaire
-		save_path_cache();
-	}
+    $GLOBALS['_INC_PUBLIC'] = 1;
+    define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
+
+    // Faut-il initialiser SPIP ? (oui dans le cas general)
+    if (!defined('_DIR_RESTREINT_ABS')) {
+        if (
+            defined('_DIR_RESTREINT')
+            && @file_exists(_ROOT_RESTREINT . 'inc_version.php')
+        ) {
+            include_once _ROOT_RESTREINT . 'inc_version.php';
+        } else {
+            die('inc_version absent ?');
+        }
+    } // $fond defini dans le fichier d'appel ?
+
+    else {
+        if (isset($fond) && !_request('fond')) {
+        } // fond demande dans l'url par page=xxxx ?
+        else {
+            if (isset($_GET[_SPIP_PAGE])) {
+                $fond = (string)$_GET[_SPIP_PAGE];
+
+                // Securite
+                if (
+                    strstr($fond, '/')
+                    && !(isset($GLOBALS['visiteur_session']) && include_spip('inc/autoriser') && autoriser('webmestre'))
+                ) {
+                    include_spip('inc/minipres');
+                    echo minipres();
+                    exit;
+                }
+                // l'argument Page a priorite sur l'argument action
+                // le cas se presente a cause des RewriteRule d'Apache
+                // qui permettent d'ajouter un argument dans la QueryString
+                // mais pas d'en retirer un en conservant les autres.
+                if (isset($_GET['action']) && $_GET['action'] === $fond) {
+                    unset($_GET['action']);
+                }
+                # sinon, fond par defaut
+            } else {
+                // sinon fond par defaut (cf. assembler.php)
+                $fond = pipeline('detecter_fond_par_defaut', '');
+            }
+        }
+    }
+
+    $tableau_des_temps = [];
+
+    // Particularites de certains squelettes
+    if ($fond == 'login') {
+        $forcer_lang = true;
+    }
+
+    if (
+        isset($forcer_lang) && $forcer_lang && $forcer_lang !== 'non'
+        && !_request('action')
+        && $_SERVER['REQUEST_METHOD'] != 'POST'
+    ) {
+        include_spip('inc/lang');
+        verifier_lang_url();
+    }
+
+    $lang = isset($_GET['lang']) ? lang_select($_GET['lang']) : '';
+
+    // Charger l'aiguilleur des traitements derogatoires
+    // (action en base SQL, formulaires CVT, AJax)
+    if (_request('action') || _request('var_ajax') || _request('formulaire_action')) {
+        include_spip('public/aiguiller');
+        if (
+            // cas des appels actions ?action=xxx
+            traiter_appels_actions()
+            // cas des hits ajax sur les inclusions ajax
+            || traiter_appels_inclusions_ajax()
+            // cas des formulaires charger/verifier/traiter
+            || traiter_formulaires_dynamiques()
+        ) {
+            // lancer les taches sur affichage final, comme le cron
+            // mais sans rien afficher
+            $GLOBALS['html'] = false; // ne rien afficher
+            pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
+            exit; // le hit est fini !
+        }
+    }
+
+    // Il y a du texte a produire, charger le metteur en page
+    include_spip('public/assembler');
+    $page = assembler($fond, _request('connect') ?? '');
+
+    if (isset($page['status'])) {
+        include_spip('inc/headers');
+        http_response_code($page['status']);
+    }
+
+    // Content-Type ?
+    if (!isset($page['entetes']['Content-Type'])) {
+        $charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
+        $page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
+        $html = true;
+    } else {
+        $html = preg_match(',^\s*text/html,', $page['entetes']['Content-Type']);
+    }
+
+    // Tester si on est admin et il y a des choses supplementaires a dire
+    // type tableau pour y mettre des choses au besoin.
+    $debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
+
+    // affiche-t-on les boutons d'administration ? voir f_admin()
+    $affiche_boutons_admin = ($html && (
+        isset($_COOKIE['spip_admin']) && (!isset($flag_preserver) || !$flag_preserver)
+        || $debug && include_spip('inc/autoriser') && autoriser('debug')
+        || defined('_VAR_PREVIEW') && _VAR_PREVIEW)
+    );
+
+    if ($affiche_boutons_admin) {
+        include_spip('balise/formulaire_admin');
+    }
+
+
+    // Execution de la page calculee
+
+    // traitements sur les entetes avant envoi
+    // peut servir pour le plugin de stats
+    $page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
+
+
+    // eval $page et affecte $res
+    include _ROOT_RESTREINT . 'public/evaluer_page.php';
+    envoyer_entetes($page['entetes']);
+    if ($res === false) {
+        include_spip('inc/autoriser');
+        $err = _T('zbug_erreur_execution_page');
+        if (autoriser('webmestre')) {
+            $err .= "\n<hr />\n"
+                . highlight_string($page['codephp'], true)
+                . "\n<hr />\n";
+        }
+        $msg = [$err];
+        erreur_squelette($msg);
+    }
+
+    //
+    // Envoyer le resultat apres post-traitements
+    //
+    // (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
+    // cf. public/assembler.php)
+    echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
+
+    if ($lang) {
+        lang_select();
+    }
+    // l'affichage de la page a pu lever des erreurs (inclusion manquante)
+    // il faut tester a nouveau
+    $debug = (_request('var_mode') == 'debug' || $tableau_des_temps) ? [1] : [];
+
+    // Appel au debusqueur en cas d'erreurs ou de demande de trace
+    // at last
+    if ($debug) {
+        // en cas d'erreur, retester l'affichage
+        if ($html && ($affiche_boutons_admin || $debug)) {
+            $var_mode_affiche = _request('var_mode_affiche');
+            $var_mode_objet = _request('var_mode_objet');
+            $GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
+            echo erreur_squelette(false);
+        }
+    } else {
+        if (
+            isset($GLOBALS['meta']['date_prochain_postdate'])
+            && $GLOBALS['meta']['date_prochain_postdate'] <= time()
+        ) {
+            include_spip('inc/rubriques');
+            calculer_prochain_postdate(true);
+        }
+
+        // Effectuer une tache de fond ?
+        // si _DIRECT_CRON_FORCE est present, on force l'appel
+        if (defined('_DIRECT_CRON_FORCE')) {
+            cron();
+        }
+
+        // sauver le cache chemin si necessaire
+        save_path_cache();
+    }
 }

ecrire/typographie/fr.php

Indentation +58 added lines, -58 removed lines

@@ -10,73 +10,73 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Correction typographique francaise
 
 function typographie_fr_dist($letexte) {
 
-	static $trans;
+    static $trans;
 
-	// Nettoyer 160 = nbsp ; 187 = raquo ; 171 = laquo ; 176 = deg ;
-	// 147 = ldquo; 148 = rdquo; ' = zouli apostrophe
-	if (!$trans) {
-		$trans = [
-			"'" => '’',
-			' ' => '~',
-			'»' => '»',
-			'«' => '«',
-			'”' => '”',
-			'“' => '“',
-			'°' => '°'
-		];
-		$chars = [160 => '~', 187 => '»', 171 => '«', 148 => '”', 147 => '“', 176 => '°'];
-		$chars_trans = array_keys($chars);
-		$chars = array_values($chars);
-		$chars_trans = implode(' ', array_map('chr', $chars_trans));
-		$chars_trans = unicode2charset(charset2unicode($chars_trans, 'iso-8859-1', 'forcer'));
-		$chars_trans = explode(' ', $chars_trans);
-		foreach ($chars as $k => $r) {
-			$trans[$chars_trans[$k]] = $r;
-		}
-	}
+    // Nettoyer 160 = nbsp ; 187 = raquo ; 171 = laquo ; 176 = deg ;
+    // 147 = ldquo; 148 = rdquo; ' = zouli apostrophe
+    if (!$trans) {
+        $trans = [
+            "'" => '’',
+            ' ' => '~',
+            '»' => '»',
+            '«' => '«',
+            '”' => '”',
+            '“' => '“',
+            '°' => '°'
+        ];
+        $chars = [160 => '~', 187 => '»', 171 => '«', 148 => '”', 147 => '“', 176 => '°'];
+        $chars_trans = array_keys($chars);
+        $chars = array_values($chars);
+        $chars_trans = implode(' ', array_map('chr', $chars_trans));
+        $chars_trans = unicode2charset(charset2unicode($chars_trans, 'iso-8859-1', 'forcer'));
+        $chars_trans = explode(' ', $chars_trans);
+        foreach ($chars as $k => $r) {
+            $trans[$chars_trans[$k]] = $r;
+        }
+    }
 
-	$letexte = strtr($letexte, $trans);
+    $letexte = strtr($letexte, $trans);
 
-	$cherche1 = [
-		/* 1 */
-		'/((?:^|[^\#0-9a-zA-Z\&])[\#0-9a-zA-Z]*)\;/S',
-		/* 2 */
-		'/»| --?,|(?::(?!:)| %)(?:\W|$)/S',
-		/* 3 */
-		'/([^[<(!?.])([!?][!?\.]*)/iS',
-		/* 4 */
-		'/&#171;|(?:M(?:M?\.|mes?|r\.?)|[MnN]&#176;) /S'
-	];
-	$remplace1 = [
-		/* 1 */
-		'\1~;',
-		/* 2 */
-		'~\0',
-		/* 3 */
-		'\1~\2',
-		/* 4 */
-		'\0~'
-	];
-	$letexte = preg_replace($cherche1, $remplace1, $letexte);
-	$letexte = preg_replace('/ *~+ */S', '~', $letexte);
+    $cherche1 = [
+        /* 1 */
+        '/((?:^|[^\#0-9a-zA-Z\&])[\#0-9a-zA-Z]*)\;/S',
+        /* 2 */
+        '/&#187;| --?,|(?::(?!:)| %)(?:\W|$)/S',
+        /* 3 */
+        '/([^[<(!?.])([!?][!?\.]*)/iS',
+        /* 4 */
+        '/&#171;|(?:M(?:M?\.|mes?|r\.?)|[MnN]&#176;) /S'
+    ];
+    $remplace1 = [
+        /* 1 */
+        '\1~;',
+        /* 2 */
+        '~\0',
+        /* 3 */
+        '\1~\2',
+        /* 4 */
+        '\0~'
+    ];
+    $letexte = preg_replace($cherche1, $remplace1, $letexte);
+    $letexte = preg_replace('/ *~+ */S', '~', $letexte);
 
-	$cherche2 = [
-		'/([^-\n]|^)--([^-]|$)/S',
-		',(' . _PROTOCOLES_STD . ')~((://[^"\'\s\[\]\}\)<>]+)~([?]))?,S',
-		'/~/'
-	];
-	$remplace2 = [
-		'\1&mdash;\2',
-		'\1\3\4',
-		'&nbsp;'
-	];
+    $cherche2 = [
+        '/([^-\n]|^)--([^-]|$)/S',
+        ',(' . _PROTOCOLES_STD . ')~((://[^"\'\s\[\]\}\)<>]+)~([?]))?,S',
+        '/~/'
+    ];
+    $remplace2 = [
+        '\1&mdash;\2',
+        '\1\3\4',
+        '&nbsp;'
+    ];
 
-	return preg_replace($cherche2, $remplace2, $letexte);
+    return preg_replace($cherche2, $remplace2, $letexte);
 }

ecrire/typographie/en.php

Indentation +25 added lines, -25 removed lines

@@ -10,35 +10,35 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // rien sauf les "~" et "-,"
 
 function typographie_en_dist($letexte) {
 
-	// zouli apostrophe
-	$letexte = str_replace("'", '’', $letexte);
-
-	$cherche1 = [
-		'/ --?,/S'
-	];
-	$remplace1 = [
-		'~\0'
-	];
-	$letexte = preg_replace($cherche1, $remplace1, $letexte);
-
-	$letexte = str_replace(' ', '~', $letexte);
-	$letexte = preg_replace('/ *~+ */', '~', $letexte);
-
-	$cherche2 = [
-		'/([^-\n]|^)--([^-]|$)/',
-		'/~/'
-	];
-	$remplace2 = [
-		'\1—\2',
-		' '
-	];
-
-	return preg_replace($cherche2, $remplace2, $letexte);
+    // zouli apostrophe
+    $letexte = str_replace("'", '’', $letexte);
+
+    $cherche1 = [
+        '/ --?,/S'
+    ];
+    $remplace1 = [
+        '~\0'
+    ];
+    $letexte = preg_replace($cherche1, $remplace1, $letexte);
+
+    $letexte = str_replace(' ', '~', $letexte);
+    $letexte = preg_replace('/ *~+ */', '~', $letexte);
+
+    $cherche2 = [
+        '/([^-\n]|^)--([^-]|$)/',
+        '/~/'
+    ];
+    $remplace2 = [
+        '\1—\2',
+        ' '
+    ];
+
+    return preg_replace($cherche2, $remplace2, $letexte);
 }

ecrire/notifications/instituerarticle.php

Indentation +44 added lines, -44 removed lines

@@ -10,53 +10,53 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Fonction appelee par divers pipelines
 function notifications_instituerarticle_dist($quoi, $id_article, $options) {
 
-	// ne devrait jamais se produire
-	if ($options['statut'] == $options['statut_ancien']) {
-		spip_log('statut inchange', 'notifications');
-
-		return;
-	}
-
-	include_spip('inc/texte');
-
-	$modele = '';
-	if ($options['statut'] == 'publie') {
-		if (
-			$GLOBALS['meta']['post_dates'] == 'non'
-			&& strtotime($options['date']) > time()
-		) {
-			$modele = 'notifications/article_valide';
-		} else {
-			$modele = 'notifications/article_publie';
-		}
-	}
-
-	if ($options['statut'] == 'prop' && $options['statut_ancien'] != 'publie') {
-		$modele = 'notifications/article_propose';
-	}
-
-	if ($modele) {
-		$destinataires = [];
-		if ($GLOBALS['meta']['suivi_edito'] == 'oui') {
-			$destinataires = explode(',', $GLOBALS['meta']['adresse_suivi']);
-		}
-
-
-		$destinataires = pipeline(
-			'notifications_destinataires',
-			[
-				'args' => ['quoi' => $quoi, 'id' => $id_article, 'options' => $options],
-				'data' => $destinataires
-			]
-		);
-
-		$texte = email_notification_article($id_article, $modele);
-		notifications_envoyer_mails($destinataires, $texte);
-	}
+    // ne devrait jamais se produire
+    if ($options['statut'] == $options['statut_ancien']) {
+        spip_log('statut inchange', 'notifications');
+
+        return;
+    }
+
+    include_spip('inc/texte');
+
+    $modele = '';
+    if ($options['statut'] == 'publie') {
+        if (
+            $GLOBALS['meta']['post_dates'] == 'non'
+            && strtotime($options['date']) > time()
+        ) {
+            $modele = 'notifications/article_valide';
+        } else {
+            $modele = 'notifications/article_publie';
+        }
+    }
+
+    if ($options['statut'] == 'prop' && $options['statut_ancien'] != 'publie') {
+        $modele = 'notifications/article_propose';
+    }
+
+    if ($modele) {
+        $destinataires = [];
+        if ($GLOBALS['meta']['suivi_edito'] == 'oui') {
+            $destinataires = explode(',', $GLOBALS['meta']['adresse_suivi']);
+        }
+
+
+        $destinataires = pipeline(
+            'notifications_destinataires',
+            [
+                'args' => ['quoi' => $quoi, 'id' => $id_article, 'options' => $options],
+                'data' => $destinataires
+            ]
+        );
+
+        $texte = email_notification_article($id_article, $modele);
+        notifications_envoyer_mails($destinataires, $texte);
+    }
 }

ecrire/public/jointures.php

Indentation +395 added lines, -395 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -34,11 +34,11 @@ 
  *     Chaine sinon : le nom du champ (non décomposable donc)
  */
 function decompose_champ_id_objet($champ) {
-	if ($champ !== 'id_objet' && preg_match(',^id_([a-z_]+)$,', $champ, $regs)) {
-		return ['id_objet', 'objet', objet_type($champ)];
-	}
+    if ($champ !== 'id_objet' && preg_match(',^id_([a-z_]+)$,', $champ, $regs)) {
+        return ['id_objet', 'objet', objet_type($champ)];
+    }
 
-	return $champ;
+    return $champ;
 }
 
 /**
@@ -57,21 +57,21 @@ 
  *     - array(id_objet, objet), si le champ n'existe pas mais qu'on peut décomposer
  */
 function trouver_champs_decomposes($champ, $desc) {
-	if (
-		!is_array($desc)
-		|| array_key_exists($champ, $desc['field'])
-	) {
-		return [$champ];
-	}
-	// si le champ se décompose, tester que les colonnes décomposées sont présentes
-	if (is_array($decompose = decompose_champ_id_objet($champ))) {
-		array_pop($decompose);
-		if (count(array_intersect($decompose, array_keys($desc['field']))) === count($decompose)) {
-			return $decompose;
-		}
-	}
-
-	return [$champ];
+    if (
+        !is_array($desc)
+        || array_key_exists($champ, $desc['field'])
+    ) {
+        return [$champ];
+    }
+    // si le champ se décompose, tester que les colonnes décomposées sont présentes
+    if (is_array($decompose = decompose_champ_id_objet($champ))) {
+        array_pop($decompose);
+        if (count(array_intersect($decompose, array_keys($desc['field']))) === count($decompose)) {
+            return $decompose;
+        }
+    }
+
+    return [$champ];
 }
 
 
@@ -101,23 +101,23 @@ 
  *     Alias de la table de jointure (Lx)
  */
 function calculer_jointure(&$boucle, $depart, $arrivee, $col = '', $cond = false, $max_liens = 5) {
-	// les jointures minimales sont optimales :
-	// on contraint le nombre d'etapes en l'augmentant
-	// jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi
-	$max = 1;
-	$res = false;
-	$milieu_exclus = ($col ?: []);
-	while ($max <= $max_liens && !$res) {
-		$res = calculer_chaine_jointures($boucle, $depart, $arrivee, [], $milieu_exclus, $max);
-		$max++;
-	}
-	if (!$res) {
-		return '';
-	}
-
-	[$nom, $desc] = $depart;
-
-	return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col);
+    // les jointures minimales sont optimales :
+    // on contraint le nombre d'etapes en l'augmentant
+    // jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi
+    $max = 1;
+    $res = false;
+    $milieu_exclus = ($col ?: []);
+    while ($max <= $max_liens && !$res) {
+        $res = calculer_chaine_jointures($boucle, $depart, $arrivee, [], $milieu_exclus, $max);
+        $max++;
+    }
+    if (!$res) {
+        return '';
+    }
+
+    [$nom, $desc] = $depart;
+
+    return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col);
 }
 
 /**
@@ -156,78 +156,78 @@ 
  *     Alias de la table de jointure (Lx)
  */
 function fabrique_jointures(&$boucle, $res, $cond = false, $desc = [], $nom = '', $col = '', $echap = true) {
-	$a = [];
-	$j = null;
-	$n = null;
-	static $num = [];
-	$id_table = '';
-	$cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle];
-	foreach ($res as $cle => $r) {
-		[$d, $a, $j] = $r;
-		if (!$id_table) {
-			$id_table = $d;
-		}
-		$n = ++$cpt;
-		if (is_array($j)) { // c'est un lien sur un champ du type id_objet,objet,'article'
-			[$j1, $j2, $obj, $type] = $j;
-			// trouver de quel cote est (id_objet,objet)
-			$obj = $j1 == "id_$obj" ? "$id_table.$obj" : "L$n.$obj";
-			// le where complementaire est envoye dans la jointure et dans le where
-			// on utilise une clé qui le relie a la jointure pour que l'optimiseur
-			// sache qu'il peut enlever ce where si il enleve la jointure
-			$boucle->where["JOIN-L$n"] =
-				$echap ?
-					["'='","'$obj'","sql_quote('$type')"]
-					:
-					['=',"$obj",sql_quote($type)];
-			$boucle->join["L$n"] =
-				$echap ?
-					["'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')"]
-					:
-					[$id_table, $j2, $j1, "$obj=" . sql_quote($type)];
-		} else {
-			$boucle->join["L$n"] = $echap ? ["'$id_table'", "'$j'"] : [$id_table, $j];
-		}
-		$boucle->from[$id_table = "L$n"] = $a[0];
-	}
-
-
-	// pas besoin de group by
-	// (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555)
-	// si une seule jointure et sur une table avec primary key formee
-	// de l'index principal et de l'index de jointure (non conditionnel! [6031])
-	// et operateur d'egalite (https://core.spip.net/issues/477)
-
-	if ($pk = (isset($a[1]) && (count($boucle->from) == 2) && !$cond)) {
-		$pk = nogroupby_if($desc, $a[1], $col);
-	}
-
-	// pas de group by
-	// si une seule jointure
-	// et si l'index de jointure est une primary key a l'arrivee !
-	if (
-		!$pk
-		&& count($boucle->from) == 2
-		&& isset($a[1]['key']['PRIMARY KEY'])
-		&& $j == $a[1]['key']['PRIMARY KEY']
-	) {
-		$pk = true;
-	}
-
-	// la clause Group by est en conflit avec ORDER BY, a completer
-	$groups = liste_champs_jointures($nom, $desc, true);
-	if (!$pk) {
-		foreach ($groups as $id_prim) {
-			$id_field = $nom . '.' . $id_prim;
-			if (!in_array($id_field, $boucle->group)) {
-				$boucle->group[] = $id_field;
-			}
-		}
-	}
-
-	$boucle->modificateur['lien'] = true;
-
-	return "L$n";
+    $a = [];
+    $j = null;
+    $n = null;
+    static $num = [];
+    $id_table = '';
+    $cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle];
+    foreach ($res as $cle => $r) {
+        [$d, $a, $j] = $r;
+        if (!$id_table) {
+            $id_table = $d;
+        }
+        $n = ++$cpt;
+        if (is_array($j)) { // c'est un lien sur un champ du type id_objet,objet,'article'
+            [$j1, $j2, $obj, $type] = $j;
+            // trouver de quel cote est (id_objet,objet)
+            $obj = $j1 == "id_$obj" ? "$id_table.$obj" : "L$n.$obj";
+            // le where complementaire est envoye dans la jointure et dans le where
+            // on utilise une clé qui le relie a la jointure pour que l'optimiseur
+            // sache qu'il peut enlever ce where si il enleve la jointure
+            $boucle->where["JOIN-L$n"] =
+                $echap ?
+                    ["'='","'$obj'","sql_quote('$type')"]
+                    :
+                    ['=',"$obj",sql_quote($type)];
+            $boucle->join["L$n"] =
+                $echap ?
+                    ["'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')"]
+                    :
+                    [$id_table, $j2, $j1, "$obj=" . sql_quote($type)];
+        } else {
+            $boucle->join["L$n"] = $echap ? ["'$id_table'", "'$j'"] : [$id_table, $j];
+        }
+        $boucle->from[$id_table = "L$n"] = $a[0];
+    }
+
+
+    // pas besoin de group by
+    // (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555)
+    // si une seule jointure et sur une table avec primary key formee
+    // de l'index principal et de l'index de jointure (non conditionnel! [6031])
+    // et operateur d'egalite (https://core.spip.net/issues/477)
+
+    if ($pk = (isset($a[1]) && (count($boucle->from) == 2) && !$cond)) {
+        $pk = nogroupby_if($desc, $a[1], $col);
+    }
+
+    // pas de group by
+    // si une seule jointure
+    // et si l'index de jointure est une primary key a l'arrivee !
+    if (
+        !$pk
+        && count($boucle->from) == 2
+        && isset($a[1]['key']['PRIMARY KEY'])
+        && $j == $a[1]['key']['PRIMARY KEY']
+    ) {
+        $pk = true;
+    }
+
+    // la clause Group by est en conflit avec ORDER BY, a completer
+    $groups = liste_champs_jointures($nom, $desc, true);
+    if (!$pk) {
+        foreach ($groups as $id_prim) {
+            $id_field = $nom . '.' . $id_prim;
+            if (!in_array($id_field, $boucle->group)) {
+                $boucle->group[] = $id_field;
+            }
+        }
+    }
+
+    $boucle->modificateur['lien'] = true;
+
+    return "L$n";
 }
 
 /**
@@ -242,18 +242,18 @@ 
  * @return bool
  */
 function nogroupby_if($depart, $arrivee, $col) {
-	if (
-		empty($arrivee['key']['PRIMARY KEY'])
-		|| !($pk = $arrivee['key']['PRIMARY KEY'])
-		|| empty($depart['key']['PRIMARY KEY'])
-	) {
-		return false;
-	}
-	$id_primary = $depart['key']['PRIMARY KEY'];
-	if (is_array($col)) {
-		$col = implode(', *', $col);
-	} // cas id_objet, objet
-	return (preg_match("/^$id_primary, *$col$/", $pk) || preg_match("/^$col, *$id_primary$/", $pk));
+    if (
+        empty($arrivee['key']['PRIMARY KEY'])
+        || !($pk = $arrivee['key']['PRIMARY KEY'])
+        || empty($depart['key']['PRIMARY KEY'])
+    ) {
+        return false;
+    }
+    $id_primary = $depart['key']['PRIMARY KEY'];
+    if (is_array($col)) {
+        $col = implode(', *', $col);
+    } // cas id_objet, objet
+    return (preg_match("/^$id_primary, *$col$/", $pk) || preg_match("/^$col, *$id_primary$/", $pk));
 }
 
 /**
@@ -271,46 +271,46 @@ 
  */
 function liste_champs_jointures($nom, $desc, $primary = false) {
 
-	static $nojoin = ['idx', 'maj', 'date', 'statut'];
+    static $nojoin = ['idx', 'maj', 'date', 'statut'];
 
-	// si cle primaire demandee, la privilegier
-	if ($primary && isset($desc['key']['PRIMARY KEY'])) {
-		return split_key($desc['key']['PRIMARY KEY']);
-	}
+    // si cle primaire demandee, la privilegier
+    if ($primary && isset($desc['key']['PRIMARY KEY'])) {
+        return split_key($desc['key']['PRIMARY KEY']);
+    }
 
-	// les champs declares explicitement pour les jointures
-	if (isset($desc['join'])) {
-		return $desc['join'];
-	}
-	/*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join'];
+    // les champs declares explicitement pour les jointures
+    if (isset($desc['join'])) {
+        return $desc['join'];
+    }
+    /*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join'];
 	elseif (isset($GLOBALS['tables_auxiliaires'][$nom]['join'])) return $GLOBALS['tables_auxiliaires'][$nom]['join'];*/
 
-	// si pas de cle, c'est fichu
-	if (!isset($desc['key'])) {
-		return [];
-	}
-
-	// si cle primaire
-	if (isset($desc['key']['PRIMARY KEY'])) {
-		return split_key($desc['key']['PRIMARY KEY']);
-	}
-
-	// ici on se rabat sur les cles secondaires,
-	// en eliminant celles qui sont pas pertinentes (idx, maj)
-	// si jamais le resultat n'est pas pertinent pour une table donnee,
-	// il faut declarer explicitement le champ 'join' de sa description
-
-	$join = [];
-	foreach ($desc['key'] as $v) {
-		$join = split_key($v, $join);
-	}
-	foreach ($join as $k) {
-		if (in_array($k, $nojoin)) {
-			unset($join[$k]);
-		}
-	}
-
-	return $join;
+    // si pas de cle, c'est fichu
+    if (!isset($desc['key'])) {
+        return [];
+    }
+
+    // si cle primaire
+    if (isset($desc['key']['PRIMARY KEY'])) {
+        return split_key($desc['key']['PRIMARY KEY']);
+    }
+
+    // ici on se rabat sur les cles secondaires,
+    // en eliminant celles qui sont pas pertinentes (idx, maj)
+    // si jamais le resultat n'est pas pertinent pour une table donnee,
+    // il faut declarer explicitement le champ 'join' de sa description
+
+    $join = [];
+    foreach ($desc['key'] as $v) {
+        $join = split_key($v, $join);
+    }
+    foreach ($join as $k) {
+        if (in_array($k, $nojoin)) {
+            unset($join[$k]);
+        }
+    }
+
+    return $join;
 }
 
 /**
@@ -321,14 +321,14 @@ 
  * @return array
  */
 function split_key($v, $join = []) {
-	foreach (preg_split('/,\s*/', $v) as $k) {
-		if (str_contains($k, '(')) {
-			$k = explode('(', $k);
-			$k = trim(reset($k));
-		}
-		$join[$k] = $k;
-	}
-	return $join;
+    foreach (preg_split('/,\s*/', $v) as $k) {
+        if (str_contains($k, '(')) {
+            $k = explode('(', $k);
+            $k = trim(reset($k));
+        }
+        $join[$k] = $k;
+    }
+    return $join;
 }
 
 /**
@@ -351,134 +351,134 @@ 
  * @return array
  */
 function calculer_chaine_jointures(
-	&$boucle,
-	$depart,
-	$arrivee,
-	$vu = [],
-	$milieu_exclus = [],
-	$max_liens = 5
+    &$boucle,
+    $depart,
+    $arrivee,
+    $vu = [],
+    $milieu_exclus = [],
+    $max_liens = 5
 ) {
-	static $trouver_table;
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-
-	if (is_string($milieu_exclus)) {
-		$milieu_exclus = [$milieu_exclus];
-	}
-	// quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet
-	// faire une jointure sur objet tout seul n'a pas de sens
-	if (in_array('id_objet', $milieu_exclus) && !in_array('objet', $milieu_exclus)) {
-		$milieu_exclus[] = 'objet';
-	}
-
-	[$dnom, $ddesc] = $depart;
-	[$anom, $adesc] = $arrivee;
-	if ($vu === []) {
-		$vu[] = $dnom; // ne pas oublier la table de depart
-		$vu[] = $anom; // ne pas oublier la table d'arrivee
-	}
-
-	$akeys = [];
-	foreach ($adesc['key'] as $k) {
-		// respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres...
-		$akeys = array_merge($akeys, preg_split('/,\s*/', $k));
-	}
-
-	// enlever les cles d'arrivee exclues par l'appel
-	$akeys = array_diff($akeys, $milieu_exclus);
-
-	// cles candidates au depart
-	$keys = liste_champs_jointures($dnom, $ddesc);
-	// enlever les cles dde depart exclues par l'appel
-	$keys = array_diff($keys, $milieu_exclus);
-
-	$v = $keys ? array_intersect(array_values($keys), $akeys) : false;
-
-	if ($v) {
-		return [[$dnom, [$adesc['table'], $adesc], array_shift($v)]];
-	}
-
-	// regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx
-	if (count(array_intersect(['id_objet', 'objet'], $keys)) == 2) {
-		// regarder si l'une des cles d'arrivee peut se decomposer en
-		// id_objet,objet
-		// si oui on la prend
-		foreach ($akeys as $key) {
-			$v = decompose_champ_id_objet($key);
-			if (is_array($v)) {
-				$objet = array_shift($v); // objet,'article'
-				array_unshift($v, $key); // id_article,objet,'article'
-				array_unshift($v, $objet); // id_objet,id_article,objet,'article'
-				return [[$dnom, [$adesc['table'], $adesc], $v]];
-			}
-		}
-	} else {
-		// regarder si l'une des cles de depart peut se decomposer en
-		// id_objet,objet a l'arrivee
-		// si oui on la prend
-		foreach ($keys as $key) {
-			if (count($v = trouver_champs_decomposes($key, $adesc)) > 1 && count($v) == count(array_intersect($v, $akeys))) {
-				$v = decompose_champ_id_objet($key);
-				// id_objet,objet,'article'
-				array_unshift($v, $key);
-				// id_article,id_objet,objet,'article'
-				return [[$dnom, [$adesc['table'], $adesc], $v]];
-			}
-		}
-	}
-	// si l'on voulait une jointure direct, c'est rate !
-	if ($max_liens <= 1) {
-		return [];
-	}
-
-	// sinon essayer de passer par une autre table
-	$new = $vu;
-	foreach ($boucle->jointures as $v) {
-		if (
-			$v
-			&& !in_array($v, $vu)
-			&& ($def = $trouver_table($v, $boucle->sql_serveur))
-			&& !in_array($def['table_sql'], $vu)
-		) {
-			// ne pas tester les cles qui sont exclues a l'appel
-			// ie la cle de la jointure precedente
-			$test_cles = $milieu_exclus;
-			$new[] = $v;
-			$max_iter = 50; // securite
-			while (
-				count($jointure_directe_possible = calculer_chaine_jointures(
-					$boucle,
-					$depart,
-					[$v, $def],
-					$vu,
-					$test_cles,
-					1
-				)) && $max_iter--
-			) {
-				$jointure_directe_possible = reset($jointure_directe_possible);
-				$milieu = end($jointure_directe_possible);
-				$exclure_fin = $milieu_exclus;
-				if (is_string($milieu)) {
-					$exclure_fin[] = $milieu;
-					$test_cles[] = $milieu;
-				} else {
-					$exclure_fin = array_merge($exclure_fin, $milieu);
-					$test_cles = array_merge($test_cles, $milieu);
-				}
-				// essayer de rejoindre l'arrivee a partir de cette etape intermediaire
-				// sans repasser par la meme cle milieu, ni une cle deja vue !
-				$r = calculer_chaine_jointures($boucle, [$v, $def], $arrivee, $new, $exclure_fin, $max_liens - 1);
-				if ($r) {
-					array_unshift($r, $jointure_directe_possible);
-
-					return $r;
-				}
-			}
-		}
-	}
-
-	return [];
+    static $trouver_table;
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+
+    if (is_string($milieu_exclus)) {
+        $milieu_exclus = [$milieu_exclus];
+    }
+    // quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet
+    // faire une jointure sur objet tout seul n'a pas de sens
+    if (in_array('id_objet', $milieu_exclus) && !in_array('objet', $milieu_exclus)) {
+        $milieu_exclus[] = 'objet';
+    }
+
+    [$dnom, $ddesc] = $depart;
+    [$anom, $adesc] = $arrivee;
+    if ($vu === []) {
+        $vu[] = $dnom; // ne pas oublier la table de depart
+        $vu[] = $anom; // ne pas oublier la table d'arrivee
+    }
+
+    $akeys = [];
+    foreach ($adesc['key'] as $k) {
+        // respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres...
+        $akeys = array_merge($akeys, preg_split('/,\s*/', $k));
+    }
+
+    // enlever les cles d'arrivee exclues par l'appel
+    $akeys = array_diff($akeys, $milieu_exclus);
+
+    // cles candidates au depart
+    $keys = liste_champs_jointures($dnom, $ddesc);
+    // enlever les cles dde depart exclues par l'appel
+    $keys = array_diff($keys, $milieu_exclus);
+
+    $v = $keys ? array_intersect(array_values($keys), $akeys) : false;
+
+    if ($v) {
+        return [[$dnom, [$adesc['table'], $adesc], array_shift($v)]];
+    }
+
+    // regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx
+    if (count(array_intersect(['id_objet', 'objet'], $keys)) == 2) {
+        // regarder si l'une des cles d'arrivee peut se decomposer en
+        // id_objet,objet
+        // si oui on la prend
+        foreach ($akeys as $key) {
+            $v = decompose_champ_id_objet($key);
+            if (is_array($v)) {
+                $objet = array_shift($v); // objet,'article'
+                array_unshift($v, $key); // id_article,objet,'article'
+                array_unshift($v, $objet); // id_objet,id_article,objet,'article'
+                return [[$dnom, [$adesc['table'], $adesc], $v]];
+            }
+        }
+    } else {
+        // regarder si l'une des cles de depart peut se decomposer en
+        // id_objet,objet a l'arrivee
+        // si oui on la prend
+        foreach ($keys as $key) {
+            if (count($v = trouver_champs_decomposes($key, $adesc)) > 1 && count($v) == count(array_intersect($v, $akeys))) {
+                $v = decompose_champ_id_objet($key);
+                // id_objet,objet,'article'
+                array_unshift($v, $key);
+                // id_article,id_objet,objet,'article'
+                return [[$dnom, [$adesc['table'], $adesc], $v]];
+            }
+        }
+    }
+    // si l'on voulait une jointure direct, c'est rate !
+    if ($max_liens <= 1) {
+        return [];
+    }
+
+    // sinon essayer de passer par une autre table
+    $new = $vu;
+    foreach ($boucle->jointures as $v) {
+        if (
+            $v
+            && !in_array($v, $vu)
+            && ($def = $trouver_table($v, $boucle->sql_serveur))
+            && !in_array($def['table_sql'], $vu)
+        ) {
+            // ne pas tester les cles qui sont exclues a l'appel
+            // ie la cle de la jointure precedente
+            $test_cles = $milieu_exclus;
+            $new[] = $v;
+            $max_iter = 50; // securite
+            while (
+                count($jointure_directe_possible = calculer_chaine_jointures(
+                    $boucle,
+                    $depart,
+                    [$v, $def],
+                    $vu,
+                    $test_cles,
+                    1
+                )) && $max_iter--
+            ) {
+                $jointure_directe_possible = reset($jointure_directe_possible);
+                $milieu = end($jointure_directe_possible);
+                $exclure_fin = $milieu_exclus;
+                if (is_string($milieu)) {
+                    $exclure_fin[] = $milieu;
+                    $test_cles[] = $milieu;
+                } else {
+                    $exclure_fin = array_merge($exclure_fin, $milieu);
+                    $test_cles = array_merge($test_cles, $milieu);
+                }
+                // essayer de rejoindre l'arrivee a partir de cette etape intermediaire
+                // sans repasser par la meme cle milieu, ni une cle deja vue !
+                $r = calculer_chaine_jointures($boucle, [$v, $def], $arrivee, $new, $exclure_fin, $max_liens - 1);
+                if ($r) {
+                    array_unshift($r, $jointure_directe_possible);
+
+                    return $r;
+                }
+            }
+        }
+    }
+
+    return [];
 }
 
 /**
@@ -489,18 +489,18 @@ 
  * @return array
  */
 function trouver_cles_table($keys) {
-	$res = [];
-	foreach ($keys as $v) {
-		if (!strpos($v, ',')) {
-			$res[$v] = 1;
-		} else {
-			foreach (preg_split('/\s*,\s*/', $v) as $k) {
-				$res[$k] = 1;
-			}
-		}
-	}
-
-	return array_keys($res);
+    $res = [];
+    foreach ($keys as $v) {
+        if (!strpos($v, ',')) {
+            $res[$v] = 1;
+        } else {
+            foreach (preg_split('/\s*,\s*/', $v) as $k) {
+                $res[$k] = 1;
+            }
+        }
+    }
+
+    return array_keys($res);
 }
 
 
@@ -527,34 +527,34 @@ 
  *     - 'alias' : alias utilisé pour la table (si pertinent. ie: avec `$boucle->from` transmis par exemple)
  */
 function chercher_champ_dans_tables($cle, $tables, $connect, $checkarrivee = false) {
-	static $trouver_table = '';
-	if (!$trouver_table) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-	}
-
-	if (!is_array($cle)) {
-		$cle = [$cle];
-	}
-
-	foreach ($tables as $k => $table) {
-		if (
-			$table
-			&& ($desc = $trouver_table($table, $connect))
-			&& (
-				isset($desc['field'])
-				&& count(array_intersect($cle, array_keys($desc['field']))) === count($cle)
-				&& ($checkarrivee == false || $checkarrivee == $desc['table'])
-			)
-		) {
-			return [
-				'desc' => $desc,
-				'table' => $desc['table'],
-				'alias' => $k,
-			];
-		}
-	}
-
-	return false;
+    static $trouver_table = '';
+    if (!$trouver_table) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+    }
+
+    if (!is_array($cle)) {
+        $cle = [$cle];
+    }
+
+    foreach ($tables as $k => $table) {
+        if (
+            $table
+            && ($desc = $trouver_table($table, $connect))
+            && (
+                isset($desc['field'])
+                && count(array_intersect($cle, array_keys($desc['field']))) === count($cle)
+                && ($checkarrivee == false || $checkarrivee == $desc['table'])
+            )
+        ) {
+            return [
+                'desc' => $desc,
+                'table' => $desc['table'],
+                'alias' => $k,
+            ];
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -580,52 +580,52 @@ 
  */
 function trouver_champ_exterieur($cle, $joints, &$boucle, $checkarrivee = false) {
 
-	// support de la recherche multi champ :
-	// si en seconde etape on a decompose le champ id_xx en id_objet,objet
-	// on reentre ici soit en cherchant une table les 2 champs id_objet,objet
-	// soit une table avec les 3 champs id_xx, id_objet, objet
-	if (!is_array($cle)) {
-		$cle = [$cle];
-	}
-
-	if ($infos = chercher_champ_dans_tables($cle, $joints, $boucle->sql_serveur, $checkarrivee)) {
-		return [$infos['table'], $infos['desc'], $cle];
-	}
-
-	// au premier coup, on essaye de decomposer, si possible
-	if (
-		count($cle) == 1
-		&& ($c = reset($cle))
-		&& is_array($decompose = decompose_champ_id_objet($c))
-	) {
-		$desc = $boucle->show;
-
-		// cas 1 : la cle id_xx est dans la table de depart
-		// -> on cherche uniquement id_objet,objet a l'arrivee
-		if (isset($desc['field'][$c])) {
-			$cle = [];
-			$cle[] = array_shift($decompose); // id_objet
-			$cle[] = array_shift($decompose); // objet
-			return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee);
-		}
-		// cas 2 : la cle id_xx n'est pas dans la table de depart
-		// -> il faut trouver une cle de depart zzz telle que
-		// id_objet,objet,zzz soit a l'arrivee
-		else {
-			$depart = liste_champs_jointures(($desc['table'] ?? ''), $desc);
-			foreach ($depart as $d) {
-				$cle = [];
-				$cle[] = array_shift($decompose); // id_objet
-				$cle[] = array_shift($decompose); // objet
-				$cle[] = $d;
-				if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee)) {
-					return $ext;
-				}
-			}
-		}
-	}
-
-	return '';
+    // support de la recherche multi champ :
+    // si en seconde etape on a decompose le champ id_xx en id_objet,objet
+    // on reentre ici soit en cherchant une table les 2 champs id_objet,objet
+    // soit une table avec les 3 champs id_xx, id_objet, objet
+    if (!is_array($cle)) {
+        $cle = [$cle];
+    }
+
+    if ($infos = chercher_champ_dans_tables($cle, $joints, $boucle->sql_serveur, $checkarrivee)) {
+        return [$infos['table'], $infos['desc'], $cle];
+    }
+
+    // au premier coup, on essaye de decomposer, si possible
+    if (
+        count($cle) == 1
+        && ($c = reset($cle))
+        && is_array($decompose = decompose_champ_id_objet($c))
+    ) {
+        $desc = $boucle->show;
+
+        // cas 1 : la cle id_xx est dans la table de depart
+        // -> on cherche uniquement id_objet,objet a l'arrivee
+        if (isset($desc['field'][$c])) {
+            $cle = [];
+            $cle[] = array_shift($decompose); // id_objet
+            $cle[] = array_shift($decompose); // objet
+            return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee);
+        }
+        // cas 2 : la cle id_xx n'est pas dans la table de depart
+        // -> il faut trouver une cle de depart zzz telle que
+        // id_objet,objet,zzz soit a l'arrivee
+        else {
+            $depart = liste_champs_jointures(($desc['table'] ?? ''), $desc);
+            foreach ($depart as $d) {
+                $cle = [];
+                $cle[] = array_shift($decompose); // id_objet
+                $cle[] = array_shift($decompose); // objet
+                $cle[] = $d;
+                if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee)) {
+                    return $ext;
+                }
+            }
+        }
+    }
+
+    return '';
 }
 
 /**
@@ -657,21 +657,21 @@ 
  * @return string
  */
 function trouver_jointure_champ($champ, &$boucle, $jointures = false, $cond = false, $checkarrivee = false) {
-	if ($jointures === false) {
-		$jointures = $boucle->jointures;
-	}
-	// TODO : aberration, on utilise $jointures pour trouver le champ
-	// mais pas poour construire la jointure ensuite
-	$arrivee = trouver_champ_exterieur($champ, $jointures, $boucle, $checkarrivee);
-	if ($arrivee) {
-		$desc = $boucle->show;
-		array_pop($arrivee); // enlever la cle en 3eme argument
-		$cle = calculer_jointure($boucle, [$desc['id_table'], $desc], $arrivee, '', $cond);
-		if ($cle) {
-			return $cle;
-		}
-	}
-	spip_log("trouver_jointure_champ: $champ inconnu");
-
-	return '';
+    if ($jointures === false) {
+        $jointures = $boucle->jointures;
+    }
+    // TODO : aberration, on utilise $jointures pour trouver le champ
+    // mais pas poour construire la jointure ensuite
+    $arrivee = trouver_champ_exterieur($champ, $jointures, $boucle, $checkarrivee);
+    if ($arrivee) {
+        $desc = $boucle->show;
+        array_pop($arrivee); // enlever la cle en 3eme argument
+        $cle = calculer_jointure($boucle, [$desc['id_table'], $desc], $arrivee, '', $cond);
+        if ($cle) {
+            return $cle;
+        }
+    }
+    spip_log("trouver_jointure_champ: $champ inconnu");
+
+    return '';
 }