spip / SPIP

ecrire/genie/optimiser.php

Indentation +111 added lines, -111 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -34,26 +34,26 @@ 
  **/
 function genie_optimiser_dist($t) {
 
-	optimiser_base_une_table();
-	optimiser_base();
-	optimiser_caches_contextes();
+    optimiser_base_une_table();
+    optimiser_base();
+    optimiser_caches_contextes();
 
-	// la date souhaitee pour le tour suivant = apres-demain a 4h du mat ;
-	// sachant qu'on a un delai de 48h, on renvoie aujourd'hui a 4h du mat
-	// avec une periode de flou entre 2h et 6h pour ne pas saturer un hebergeur
-	// qui aurait beaucoup de sites SPIP
-	return -(mktime(2, 0, 0) + random_int(0, 3600 * 4));
+    // la date souhaitee pour le tour suivant = apres-demain a 4h du mat ;
+    // sachant qu'on a un delai de 48h, on renvoie aujourd'hui a 4h du mat
+    // avec une periode de flou entre 2h et 6h pour ne pas saturer un hebergeur
+    // qui aurait beaucoup de sites SPIP
+    return -(mktime(2, 0, 0) + random_int(0, 3600 * 4));
 }
 
 /**
  * Vider les contextes ajax de plus de 48h
  */
 function optimiser_caches_contextes() {
-	sous_repertoire(_DIR_CACHE, 'contextes');
-	if (is_dir($d = _DIR_CACHE . 'contextes')) {
-		include_spip('inc/invalideur');
-		purger_repertoire($d, ['mtime' => time() - 48 * 3600, 'limit' => 10000]);
-	}
+    sous_repertoire(_DIR_CACHE, 'contextes');
+    if (is_dir($d = _DIR_CACHE . 'contextes')) {
+        include_spip('inc/invalideur');
+        purger_repertoire($d, ['mtime' => time() - 48 * 3600, 'limit' => 10000]);
+    }
 }
 
 /**
@@ -68,7 +68,7 @@ 
  * @return void
  **/
 function optimiser_base($attente = 86400) {
-	optimiser_base_disparus($attente);
+    optimiser_base_disparus($attente);
 }
 
 
@@ -85,28 +85,28 @@ 
  **/
 function optimiser_base_une_table() {
 
-	$tables = [];
-	$result = sql_showbase();
-
-	// on n'optimise qu'une seule table a chaque fois,
-	// pour ne pas vautrer le systeme
-	// lire http://dev.mysql.com/doc/refman/5.0/fr/optimize-table.html
-	while ($row = sql_fetch($result)) {
-		$tables[] = array_shift($row);
-	}
-
-	spip_log('optimiser_base_une_table ' . json_encode($tables, JSON_THROW_ON_ERROR), 'genie' . _LOG_DEBUG);
-	if ($tables) {
-		$table_op = (int) (lire_config('optimiser_table', 0) + 1) % count($tables);
-		ecrire_config('optimiser_table', $table_op);
-		$q = $tables[$table_op];
-		spip_log("optimiser_base_une_table : debut d'optimisation de la table $q", 'genie' . _LOG_DEBUG);
-		if (sql_optimize($q)) {
-			spip_log("optimiser_base_une_table : fin d'optimisation de la table $q", 'genie' . _LOG_DEBUG);
-		} else {
-			spip_log("optimiser_base_une_table : Pas d'optimiseur necessaire", 'genie' . _LOG_DEBUG);
-		}
-	}
+    $tables = [];
+    $result = sql_showbase();
+
+    // on n'optimise qu'une seule table a chaque fois,
+    // pour ne pas vautrer le systeme
+    // lire http://dev.mysql.com/doc/refman/5.0/fr/optimize-table.html
+    while ($row = sql_fetch($result)) {
+        $tables[] = array_shift($row);
+    }
+
+    spip_log('optimiser_base_une_table ' . json_encode($tables, JSON_THROW_ON_ERROR), 'genie' . _LOG_DEBUG);
+    if ($tables) {
+        $table_op = (int) (lire_config('optimiser_table', 0) + 1) % count($tables);
+        ecrire_config('optimiser_table', $table_op);
+        $q = $tables[$table_op];
+        spip_log("optimiser_base_une_table : debut d'optimisation de la table $q", 'genie' . _LOG_DEBUG);
+        if (sql_optimize($q)) {
+            spip_log("optimiser_base_une_table : fin d'optimisation de la table $q", 'genie' . _LOG_DEBUG);
+        } else {
+            spip_log("optimiser_base_une_table : Pas d'optimiseur necessaire", 'genie' . _LOG_DEBUG);
+        }
+    }
 }
 
 
@@ -132,18 +132,18 @@ 
  *     Nombre de suppressions
  **/
 function optimiser_sansref($table, $id, $sel, $and = '') {
-	$in = [];
-	while ($row = sql_fetch($sel)) {
-		$in[$row['id']] = true;
-	}
-	sql_free($sel);
-
-	if ($in) {
-		sql_delete($table, sql_in($id, array_keys($in)) . ($and ? " AND $and" : ''));
-		spip_log("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)), 'genie' . _LOG_DEBUG);
-	}
-
-	return count($in);
+    $in = [];
+    while ($row = sql_fetch($sel)) {
+        $in[$row['id']] = true;
+    }
+    sql_free($sel);
+
+    if ($in) {
+        sql_delete($table, sql_in($id, array_keys($in)) . ($and ? " AND $and" : ''));
+        spip_log("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)), 'genie' . _LOG_DEBUG);
+    }
+
+    return count($in);
 }
 
 
@@ -165,81 +165,81 @@ 
  **/
 function optimiser_base_disparus($attente = 86400) {
 
-	# format = 20060610110141, si on veut forcer une optimisation tout de suite
-	$mydate = date('Y-m-d H:i:s', time() - $attente);
-	$mydate_quote = sql_quote($mydate);
+    # format = 20060610110141, si on veut forcer une optimisation tout de suite
+    $mydate = date('Y-m-d H:i:s', time() - $attente);
+    $mydate_quote = sql_quote($mydate);
 
-	$n = 0;
+    $n = 0;
 
-	//
-	// Rubriques
-	//
+    //
+    // Rubriques
+    //
 
-	# les articles qui sont dans une id_rubrique inexistante
-	# attention on controle id_rubrique>0 pour ne pas tuer les articles
-	# specialement affectes a une rubrique non-existante (plugin,
-	# cf. https://core.spip.net/issues/1549 )
-	$res = sql_select(
-		'A.id_article AS id',
-		'spip_articles AS A
+    # les articles qui sont dans une id_rubrique inexistante
+    # attention on controle id_rubrique>0 pour ne pas tuer les articles
+    # specialement affectes a une rubrique non-existante (plugin,
+    # cf. https://core.spip.net/issues/1549 )
+    $res = sql_select(
+        'A.id_article AS id',
+        'spip_articles AS A
 		        LEFT JOIN spip_rubriques AS R
 		          ON A.id_rubrique=R.id_rubrique',
-		"A.id_rubrique > 0
+        "A.id_rubrique > 0
 			 AND R.id_rubrique IS NULL
 		         AND A.maj < $mydate_quote"
-	);
+    );
 
-	$n += optimiser_sansref('spip_articles', 'id_article', $res);
+    $n += optimiser_sansref('spip_articles', 'id_article', $res);
 
-	// les articles a la poubelle
-	sql_delete('spip_articles', "statut='poubelle' AND maj < $mydate_quote");
+    // les articles a la poubelle
+    sql_delete('spip_articles', "statut='poubelle' AND maj < $mydate_quote");
 
-	//
-	// Auteurs
-	//
+    //
+    // Auteurs
+    //
 
-	include_spip('action/editer_liens');
-	// optimiser les liens de tous les auteurs vers des objets effaces
-	// et depuis des auteurs effaces
-	$n += objet_optimiser_liens(['auteur' => '*'], '*');
+    include_spip('action/editer_liens');
+    // optimiser les liens de tous les auteurs vers des objets effaces
+    // et depuis des auteurs effaces
+    $n += objet_optimiser_liens(['auteur' => '*'], '*');
 
-	# effacer les auteurs poubelle qui ne sont lies a rien
-	$res = sql_select(
-		'A.id_auteur AS id',
-		'spip_auteurs AS A
+    # effacer les auteurs poubelle qui ne sont lies a rien
+    $res = sql_select(
+        'A.id_auteur AS id',
+        'spip_auteurs AS A
 		      	LEFT JOIN spip_auteurs_liens AS L
 		          ON L.id_auteur=A.id_auteur',
-		"L.id_auteur IS NULL
+        "L.id_auteur IS NULL
 		       	AND A.statut='5poubelle' AND A.maj < $mydate_quote"
-	);
-
-	$n += optimiser_sansref('spip_auteurs', 'id_auteur', $res);
-
-	# supprimer les auteurs 'nouveau' qui n'ont jamais donne suite
-	# au mail de confirmation (45 jours pour repondre, ca devrait suffire)
-	if (!defined('_AUTEURS_DELAI_REJET_NOUVEAU')) {
-		define('_AUTEURS_DELAI_REJET_NOUVEAU', 45 * 24 * 3600);
-	}
-	sql_delete('spip_auteurs', "statut='nouveau' AND maj < " . sql_quote(date('Y-m-d', time() - (int) _AUTEURS_DELAI_REJET_NOUVEAU)));
-
-	/**
-	 * Permet aux plugins de compléter l'optimisation suite aux éléments disparus
-	 *
-	 * L'index 'data' est un entier indiquant le nombre d'optimisations
-	 * qui ont été réalisées (par exemple le nombre de suppressions faites)
-	 * et qui doit être incrémenté par les fonctions
-	 * utilisant ce pipeline si elles suppriment des éléments.
-	 *
-	 * @pipeline_appel optimiser_base_disparus
-	 */
-	$n = pipeline('optimiser_base_disparus', [
-		'args' => [
-			'attente' => $attente,
-			'date' => $mydate
-		],
-		'data' => $n
-	]);
-
-
-	spip_log("optimiser_base_disparus : {$n} lien(s) mort(s)", 'genie' . _LOG_DEBUG);
+    );
+
+    $n += optimiser_sansref('spip_auteurs', 'id_auteur', $res);
+
+    # supprimer les auteurs 'nouveau' qui n'ont jamais donne suite
+    # au mail de confirmation (45 jours pour repondre, ca devrait suffire)
+    if (!defined('_AUTEURS_DELAI_REJET_NOUVEAU')) {
+        define('_AUTEURS_DELAI_REJET_NOUVEAU', 45 * 24 * 3600);
+    }
+    sql_delete('spip_auteurs', "statut='nouveau' AND maj < " . sql_quote(date('Y-m-d', time() - (int) _AUTEURS_DELAI_REJET_NOUVEAU)));
+
+    /**
+     * Permet aux plugins de compléter l'optimisation suite aux éléments disparus
+     *
+     * L'index 'data' est un entier indiquant le nombre d'optimisations
+     * qui ont été réalisées (par exemple le nombre de suppressions faites)
+     * et qui doit être incrémenté par les fonctions
+     * utilisant ce pipeline si elles suppriment des éléments.
+     *
+     * @pipeline_appel optimiser_base_disparus
+     */
+    $n = pipeline('optimiser_base_disparus', [
+        'args' => [
+            'attente' => $attente,
+            'date' => $mydate
+        ],
+        'data' => $n
+    ]);
+
+
+    spip_log("optimiser_base_disparus : {$n} lien(s) mort(s)", 'genie' . _LOG_DEBUG);
 }

ecrire/genie/mise_a_jour.php

Indentation +133 added lines, -133 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -26,15 +26,15 @@ 
  * @return int
  */
 function genie_mise_a_jour_dist($t) {
-	include_spip('inc/meta');
-	$maj = info_maj($GLOBALS['spip_version_branche']);
-	ecrire_meta('info_maj_spip', $maj ? ($GLOBALS['spip_version_branche'] . "|$maj") : '', 'non');
+    include_spip('inc/meta');
+    $maj = info_maj($GLOBALS['spip_version_branche']);
+    ecrire_meta('info_maj_spip', $maj ? ($GLOBALS['spip_version_branche'] . "|$maj") : '', 'non');
 
-	mise_a_jour_ecran_securite();
+    mise_a_jour_ecran_securite();
 
-	spip_log('Verification version SPIP : ' . ($maj ?: 'version a jour'), 'verifie_maj');
+    spip_log('Verification version SPIP : ' . ($maj ?: 'version a jour'), 'verifie_maj');
 
-	return 1;
+    return 1;
 }
 
 // TODO : fournir une URL sur spip.net pour maitriser la diffusion d'une nouvelle version de l'ecran via l'update auto
@@ -51,46 +51,46 @@ 
  * ou de ne repondre une 304 que si le md5 est bon
  */
 function mise_a_jour_ecran_securite() {
-	// TODO : url https avec verification du certificat
-	return;
-
-	// si l'ecran n'est pas deja present ou pas updatable, sortir
-	if (
-		!_URL_ECRAN_SECURITE
-		|| !file_exists($filename = _DIR_ETC . 'ecran_securite.php')
-		|| !is_writable($filename)
-		|| !($last_modified = filemtime($filename))
-		|| !($md5 = md5_file($filename))
-	) {
-		return false;
-	}
-
-	include_spip('inc/distant');
-	$tmp_file = _DIR_TMP . 'ecran_securite.php';
-	$url = parametre_url(_URL_ECRAN_SECURITE, 'md5', $md5);
-	$url = parametre_url($url, 'vspip', $GLOBALS['spip_version_branche']);
-	$res = recuperer_url($url, [
-		'if_modified_since' => $last_modified,
-		'file' => $tmp_file
-	]);
-
-	// si il y a une version plus recente que l'on a recu correctement
-	if (
-		$res['status'] == 200
-		&& $res['length']
-		&& ($tmp_file = $res['file'])
-	) {
-		if ($md5 !== md5_file($tmp_file)) {
-			// on essaye de l'inclure pour verifier que ca ne fait pas erreur fatale
-			include_once $tmp_file;
-			// ok, on le copie a la place de l'ecran existant
-			// en backupant l'ecran avant, au cas ou
-			@copy($filename, $filename . '-bck-' . date('Y-m-d-His', $last_modified));
-			@rename($tmp_file, $filename);
-		} else {
-			@unlink($tmp_file);
-		}
-	}
+    // TODO : url https avec verification du certificat
+    return;
+
+    // si l'ecran n'est pas deja present ou pas updatable, sortir
+    if (
+        !_URL_ECRAN_SECURITE
+        || !file_exists($filename = _DIR_ETC . 'ecran_securite.php')
+        || !is_writable($filename)
+        || !($last_modified = filemtime($filename))
+        || !($md5 = md5_file($filename))
+    ) {
+        return false;
+    }
+
+    include_spip('inc/distant');
+    $tmp_file = _DIR_TMP . 'ecran_securite.php';
+    $url = parametre_url(_URL_ECRAN_SECURITE, 'md5', $md5);
+    $url = parametre_url($url, 'vspip', $GLOBALS['spip_version_branche']);
+    $res = recuperer_url($url, [
+        'if_modified_since' => $last_modified,
+        'file' => $tmp_file
+    ]);
+
+    // si il y a une version plus recente que l'on a recu correctement
+    if (
+        $res['status'] == 200
+        && $res['length']
+        && ($tmp_file = $res['file'])
+    ) {
+        if ($md5 !== md5_file($tmp_file)) {
+            // on essaye de l'inclure pour verifier que ca ne fait pas erreur fatale
+            include_once $tmp_file;
+            // ok, on le copie a la place de l'ecran existant
+            // en backupant l'ecran avant, au cas ou
+            @copy($filename, $filename . '-bck-' . date('Y-m-d-His', $last_modified));
+            @rename($tmp_file, $filename);
+        } else {
+            @unlink($tmp_file);
+        }
+    }
 }
 
 /**
@@ -106,28 +106,28 @@ 
  * @return string
  */
 function info_maj(string $version): string {
-	include_spip('inc/plugin');
-
-	// API V1
-	$contenu = info_maj_cache();
-	if (!$contenu) {
-		return '';
-	}
-
-	$maj = info_maj_versions($version, array_keys($contenu['versions'] ?? []));
-	if (!$maj['mineure'] && !$maj['majeure']) {
-		return '';
-	}
-
-	$message = [];
-	if ($maj['mineure']) {
-		$message[] = _T('nouvelle_version_spip', ['version' => $maj['mineure']]);
-	}
-	if ($maj['majeure']) {
-		$message[] = _T('nouvelle_version_spip_majeure', ['version' => $maj['majeure']]);
-	}
-
-	return '<a class="info_maj_spip" href="https://www.spip.net/fr_update" title="' . $maj['mineure'] . '">' . implode(' | ', $message) . '</a>';
+    include_spip('inc/plugin');
+
+    // API V1
+    $contenu = info_maj_cache();
+    if (!$contenu) {
+        return '';
+    }
+
+    $maj = info_maj_versions($version, array_keys($contenu['versions'] ?? []));
+    if (!$maj['mineure'] && !$maj['majeure']) {
+        return '';
+    }
+
+    $message = [];
+    if ($maj['mineure']) {
+        $message[] = _T('nouvelle_version_spip', ['version' => $maj['mineure']]);
+    }
+    if ($maj['majeure']) {
+        $message[] = _T('nouvelle_version_spip_majeure', ['version' => $maj['majeure']]);
+    }
+
+    return '<a class="info_maj_spip" href="https://www.spip.net/fr_update" title="' . $maj['mineure'] . '">' . implode(' | ', $message) . '</a>';
 }
 
 /**
@@ -142,34 +142,34 @@ 
  * @return array|null Contenu du fichier de cache de l'info de maj de SPIP.
  */
 function info_maj_cache(): ?array {
-	$contenu = '';
-	$options = [];
-	$nom = _DIR_CACHE . _VERSIONS_LISTE;
-	if (file_exists($nom)) {
-		$contenu = file_get_contents($nom);
-		$options['if_modified_since'] = filemtime($nom);
-	}
-	include_spip('inc/distant');
-	$res = recuperer_url_cache(_VERSIONS_SERVEUR, $options);
-
-	// Si rien de neuf (ou inaccessible), garder l'ancienne
-	if ($res && $res['page']) {
-		$contenu = $res['page'];
-		ecrire_fichier($nom, $contenu);
-	}
-
-	if (!$contenu) {
-		return null;
-	}
-
-	try {
-		$json = json_decode((string) $contenu, true, 512, JSON_THROW_ON_ERROR);
-	} catch (JsonException $e) {
-		spip_log('Failed to parse Json data : ' . $e->getMessage(), 'verifie_maj');
-		return null;
-	}
-
-	return $json;
+    $contenu = '';
+    $options = [];
+    $nom = _DIR_CACHE . _VERSIONS_LISTE;
+    if (file_exists($nom)) {
+        $contenu = file_get_contents($nom);
+        $options['if_modified_since'] = filemtime($nom);
+    }
+    include_spip('inc/distant');
+    $res = recuperer_url_cache(_VERSIONS_SERVEUR, $options);
+
+    // Si rien de neuf (ou inaccessible), garder l'ancienne
+    if ($res && $res['page']) {
+        $contenu = $res['page'];
+        ecrire_fichier($nom, $contenu);
+    }
+
+    if (!$contenu) {
+        return null;
+    }
+
+    try {
+        $json = json_decode((string) $contenu, true, 512, JSON_THROW_ON_ERROR);
+    } catch (JsonException $e) {
+        spip_log('Failed to parse Json data : ' . $e->getMessage(), 'verifie_maj');
+        return null;
+    }
+
+    return $json;
 }
 
 /**
@@ -184,40 +184,40 @@ 
  * @return array<string, string> Version mineure supérieure, version majeure supérieure
  */
 function info_maj_versions(string $version, array $versions): array {
-	$maj = ['mineure' => '', 'majeure' => ''];
-	if (!$version) {
-		return $maj;
-	}
-
-	// pas de version dev
-	$versions = array_diff($versions, ['dev']);
-
-	// branche en cours d'utilisation
-	$branche = implode('.', array_slice(explode('.', $version, 3), 0, 2));
-
-	foreach ($versions as $v) {
-		[$maj2, $min2, $rev2] = explode('.', $v);
-		$branche_maj = $maj2 . '.' . $min2;
-		$version_maj = $maj2 . '.' . $min2 . '.' . $rev2;
-		$is_version_stable = is_numeric($rev2);
-		// d'abord les mises à jour de la même branche (version mineure)
-		if (
-			spip_version_compare($version, $version_maj, '<')
-			&& spip_version_compare($maj['mineure'], $version_maj, '<')
-			&& spip_version_compare($branche, $branche_maj, '=')
-		) {
-			$maj['mineure'] = $version_maj;
-		}
-		// puis les mises à jours majeures
-		if (
-			$is_version_stable
-			&& spip_version_compare($version, $version_maj, '<')
-			&& spip_version_compare($maj['majeure'], $version_maj, '<')
-			&& spip_version_compare($branche, $branche_maj, '<')
-		) {
-			$maj['majeure'] = $version_maj;
-		}
-	}
-
-	return $maj;
+    $maj = ['mineure' => '', 'majeure' => ''];
+    if (!$version) {
+        return $maj;
+    }
+
+    // pas de version dev
+    $versions = array_diff($versions, ['dev']);
+
+    // branche en cours d'utilisation
+    $branche = implode('.', array_slice(explode('.', $version, 3), 0, 2));
+
+    foreach ($versions as $v) {
+        [$maj2, $min2, $rev2] = explode('.', $v);
+        $branche_maj = $maj2 . '.' . $min2;
+        $version_maj = $maj2 . '.' . $min2 . '.' . $rev2;
+        $is_version_stable = is_numeric($rev2);
+        // d'abord les mises à jour de la même branche (version mineure)
+        if (
+            spip_version_compare($version, $version_maj, '<')
+            && spip_version_compare($maj['mineure'], $version_maj, '<')
+            && spip_version_compare($branche, $branche_maj, '=')
+        ) {
+            $maj['mineure'] = $version_maj;
+        }
+        // puis les mises à jours majeures
+        if (
+            $is_version_stable
+            && spip_version_compare($version, $version_maj, '<')
+            && spip_version_compare($maj['majeure'], $version_maj, '<')
+            && spip_version_compare($branche, $branche_maj, '<')
+        ) {
+            $maj['majeure'] = $version_maj;
+        }
+    }
+
+    return $maj;
 }

ecrire/genie/maintenance.php

Indentation +49 added lines, -49 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -34,19 +34,19 @@ 
  */
 function genie_maintenance_dist($t) {
 
-	// (re)mettre .htaccess avec deny from all
-	// dans les deux repertoires dits inaccessibles par http
-	include_spip('inc/acces');
-	verifier_htaccess(_DIR_ETC);
-	verifier_htaccess(_DIR_TMP);
-	verifier_htaccess(_DIR_VENDOR);
+    // (re)mettre .htaccess avec deny from all
+    // dans les deux repertoires dits inaccessibles par http
+    include_spip('inc/acces');
+    verifier_htaccess(_DIR_ETC);
+    verifier_htaccess(_DIR_TMP);
+    verifier_htaccess(_DIR_VENDOR);
 
-	// Verifier qu'aucune table n'est crashee
-	if (!_request('reinstall')) {
-		verifier_crash_tables();
-	}
+    // Verifier qu'aucune table n'est crashee
+    if (!_request('reinstall')) {
+        verifier_crash_tables();
+    }
 
-	return 1;
+    return 1;
 }
 
 
@@ -63,33 +63,33 @@ 
  *     des tables qui ont crashé.
  */
 function verifier_crash_tables() {
-	if (spip_connect()) {
-		include_spip('base/serial');
-		include_spip('base/auxiliaires');
-		$crash = [];
-		foreach (['tables_principales', 'tables_auxiliaires'] as $com) {
-			foreach ($GLOBALS[$com] as $table => $desc) {
-				if (
-					!sql_select('*', $table, '', '', '', 1)
-					&& !defined('spip_interdire_cache')
-				) { # cas "LOST CONNECTION"
-				$crash[] = $table;
-				}
-			}
-		}
-		#$crash[] = 'test';
-		if ($crash) {
-			ecrire_meta('message_crash_tables', serialize($crash));
-			spip_log('crash des tables', 'err');
-			spip_log($crash, 'err');
-		} else {
-			effacer_meta('message_crash_tables');
-		}
+    if (spip_connect()) {
+        include_spip('base/serial');
+        include_spip('base/auxiliaires');
+        $crash = [];
+        foreach (['tables_principales', 'tables_auxiliaires'] as $com) {
+            foreach ($GLOBALS[$com] as $table => $desc) {
+                if (
+                    !sql_select('*', $table, '', '', '', 1)
+                    && !defined('spip_interdire_cache')
+                ) { # cas "LOST CONNECTION"
+                $crash[] = $table;
+                }
+            }
+        }
+        #$crash[] = 'test';
+        if ($crash) {
+            ecrire_meta('message_crash_tables', serialize($crash));
+            spip_log('crash des tables', 'err');
+            spip_log($crash, 'err');
+        } else {
+            effacer_meta('message_crash_tables');
+        }
 
-		return $crash;
-	}
+        return $crash;
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -105,16 +105,16 @@ 
  * @return string
  */
 function message_crash_tables() {
-	if ($crash = verifier_crash_tables()) {
-		return
-			'<strong>' . _T('texte_recuperer_base') . '</strong><br />'
-			. ' <tt>' . implode(', ', $crash) . '</tt><br />'
-			. generer_form_ecrire(
-				'base_repair',
-				_T('texte_crash_base'),
-				'',
-				_T('bouton_tenter_recuperation')
-			);
-	}
-	return '';
+    if ($crash = verifier_crash_tables()) {
+        return
+            '<strong>' . _T('texte_recuperer_base') . '</strong><br />'
+            . ' <tt>' . implode(', ', $crash) . '</tt><br />'
+            . generer_form_ecrire(
+                'base_repair',
+                _T('texte_crash_base'),
+                '',
+                _T('bouton_tenter_recuperation')
+            );
+    }
+    return '';
 }

ecrire/genie/mail.php

Indentation +27 added lines, -27 removed lines

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

ecrire/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,', (string) $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,', (string) $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/balise/info_.php

Indentation +23 added lines, -23 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -39,29 +39,29 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_INFO__dist($p) {
-	$info = $p->nom_champ;
-	$type_objet = interprete_argument_balise(1, $p);
-	$id_objet = interprete_argument_balise(2, $p);
-	if ($info === 'INFO_' || !$type_objet || !$id_objet) {
-		$msg = _T('zbug_balise_sans_argument', ['balise' => ' INFO_']);
-		erreur_squelette($msg, $p);
-		$p->interdire_scripts = true;
+    $info = $p->nom_champ;
+    $type_objet = interprete_argument_balise(1, $p);
+    $id_objet = interprete_argument_balise(2, $p);
+    if ($info === 'INFO_' || !$type_objet || !$id_objet) {
+        $msg = _T('zbug_balise_sans_argument', ['balise' => ' INFO_']);
+        erreur_squelette($msg, $p);
+        $p->interdire_scripts = true;
 
-		return $p;
-	} else {
-		// Récupérer tous les params à la suite de objet et id_objet
-		$_params = '[';
-		$nb_params = is_countable($p->param[0]) ? count($p->param[0]) : 0; // 1ère valeur vide donc 1 en plus
-		for ($i = 3; $i < $nb_params; $i++) {
-			$_params .= interprete_argument_balise($i, $p) . ',';
-		}
-		$_params .= ']';
+        return $p;
+    } else {
+        // Récupérer tous les params à la suite de objet et id_objet
+        $_params = '[';
+        $nb_params = is_countable($p->param[0]) ? count($p->param[0]) : 0; // 1ère valeur vide donc 1 en plus
+        for ($i = 3; $i < $nb_params; $i++) {
+            $_params .= interprete_argument_balise($i, $p) . ',';
+        }
+        $_params .= ']';
 
-		$info_sql = strtolower(substr((string) $info, 5));
-		$code = "generer_objet_info($id_objet, $type_objet, '$info_sql', " . ($p->etoile ? _q($p->etoile) : "''") . ", $_params)";
-		$p->code = champ_sql($info, $p, $code);
-		$p->interdire_scripts = true;
+        $info_sql = strtolower(substr((string) $info, 5));
+        $code = "generer_objet_info($id_objet, $type_objet, '$info_sql', " . ($p->etoile ? _q($p->etoile) : "''") . ", $_params)";
+        $p->code = champ_sql($info, $p, $code);
+        $p->interdire_scripts = true;
 
-		return $p;
-	}
+        return $p;
+    }
 }

ecrire/balise/url_logout.php

Indentation +8 added lines, -8 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -35,7 +35,7 @@ 
  *     Pile complétée du code compilé
  **/
 function balise_URL_LOGOUT($p) {
-	return calculer_balise_dynamique($p, 'URL_LOGOUT', []);
+    return calculer_balise_dynamique($p, 'URL_LOGOUT', []);
 }
 
 
@@ -51,9 +51,9 @@ 
  *   Liste (url) des arguments collectés.
  */
 function balise_URL_LOGOUT_stat($args, $context_compil) {
-	$url = $args[0] ?? '';
+    $url = $args[0] ?? '';
 
-	return [$url];
+    return [$url];
 }
 
 /**
@@ -68,9 +68,9 @@ 
  **/
 function balise_URL_LOGOUT_dyn($cible) {
 
-	if (empty($GLOBALS['visiteur_session']['login']) && empty($GLOBALS['visiteur_session']['statut'])) {
-		return '';
-	}
+    if (empty($GLOBALS['visiteur_session']['login']) && empty($GLOBALS['visiteur_session']['statut'])) {
+        return '';
+    }
 
-	return generer_url_action('logout', 'logout=public&url=' . rawurlencode((string) ($cible ?: self('&'))));
+    return generer_url_action('logout', 'logout=public&url=' . rawurlencode((string) ($cible ?: self('&'))));
 }

ecrire/balise/menu_lang.php

Indentation +8 added lines, -8 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,7 +36,7 @@ 
  *     Pile complétée du code compilé
  **/
 function balise_MENU_LANG($p) {
-	return calculer_balise_dynamique($p, 'MENU_LANG', ['lang']);
+    return calculer_balise_dynamique($p, 'MENU_LANG', ['lang']);
 }
 
 /**
@@ -55,11 +55,11 @@ 
  *   string: (vide) si pas de multilinguisme
  */
 function balise_MENU_LANG_stat($args, $context_compil) {
-	if (!str_contains((string) $GLOBALS['meta']['langues_multilingue'], ',')) {
-		return '';
-	}
+    if (!str_contains((string) $GLOBALS['meta']['langues_multilingue'], ',')) {
+        return '';
+    }
 
-	return $args;
+    return $args;
 }
 
 /**
@@ -75,7 +75,7 @@ 
  *     Liste : Chemin du squelette, durée du cache, contexte
  **/
 function balise_MENU_LANG_dyn($opt) {
-	include_spip('balise/menu_lang_ecrire');
+    include_spip('balise/menu_lang_ecrire');
 
-	return menu_lang_pour_tous('var_lang', $opt);
+    return menu_lang_pour_tous('var_lang', $opt);
 }

ecrire/balise/url_.php

Indentation +151 added lines, -151 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,14 +36,14 @@ 
  *     Code compilé
  **/
 function generer_generer_url($type, $p) {
-	$_id = interprete_argument_balise(1, $p);
+    $_id = interprete_argument_balise(1, $p);
 
-	if (!$_id) {
-		$primary = id_table_objet($type);
-		$_id = champ_sql($primary, $p);
-	}
+    if (!$_id) {
+        $primary = id_table_objet($type);
+        $_id = champ_sql($primary, $p);
+    }
 
-	return generer_generer_url_arg($type, $p, $_id);
+    return generer_generer_url_arg($type, $p, $_id);
 }
 
 /**
@@ -72,28 +72,28 @@ 
  *     Code compilé
  **/
 function generer_generer_url_arg($type, $p, $_id) {
-	if ($s = trouver_nom_serveur_distant($p)) {
-		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
-			return $f($type, $_id, $s);
-		}
-		if (!$GLOBALS['connexions'][strtolower((string) $s)]['spip_connect_version']) {
-			return null;
-		}
-		$s = _q($s);
-		# exception des urls de documents sur un serveur distant...
-		if ($type == 'document') {
-			return
-				"quete_meta('adresse_site', $s) . '/' .\n\t" .
-				"quete_meta('dir_img', $s) . \n\t" .
-				"quete_fichier($_id,$s)";
-		}
-		$s = ", '', '', $s, quete_meta('type_urls', $s)";
-	} else {
-		$s = ", '', '', true";
-	}
-
-	return "urlencode_1738(generer_objet_url($_id, '$type'$s))";
+    if ($s = trouver_nom_serveur_distant($p)) {
+        // si une fonction de generation des url a ete definie pour ce connect l'utiliser
+        if (function_exists($f = 'generer_generer_url_' . $s)) {
+            return $f($type, $_id, $s);
+        }
+        if (!$GLOBALS['connexions'][strtolower((string) $s)]['spip_connect_version']) {
+            return null;
+        }
+        $s = _q($s);
+        # exception des urls de documents sur un serveur distant...
+        if ($type == 'document') {
+            return
+                "quete_meta('adresse_site', $s) . '/' .\n\t" .
+                "quete_meta('dir_img', $s) . \n\t" .
+                "quete_fichier($_id,$s)";
+        }
+        $s = ", '', '', $s, quete_meta('type_urls', $s)";
+    } else {
+        $s = ", '', '', true";
+    }
+
+    return "urlencode_1738(generer_objet_url($_id, '$type'$s))";
 }
 
 
@@ -118,27 +118,27 @@ 
  */
 function balise_URL__dist($p) {
 
-	$nom = $p->nom_champ;
-	if ($nom === 'URL_') {
-		$msg = ['zbug_balise_sans_argument', ['balise' => ' URL_']];
-		erreur_squelette($msg, $p);
-		$p->interdire_scripts = false;
-
-		return $p;
-	} elseif ($f = charger_fonction($nom, 'balise', true)) {
-		return $f($p);
-	} else {
-		$nom = strtolower((string) $nom);
-		$code = generer_generer_url(substr($nom, 4), $p);
-		$code = champ_sql($nom, $p, $code);
-		$p->code = $code;
-		if (!$p->etoile) {
-			$p->code = "vider_url($code)";
-		}
-		$p->interdire_scripts = false;
-
-		return $p;
-	}
+    $nom = $p->nom_champ;
+    if ($nom === 'URL_') {
+        $msg = ['zbug_balise_sans_argument', ['balise' => ' URL_']];
+        erreur_squelette($msg, $p);
+        $p->interdire_scripts = false;
+
+        return $p;
+    } elseif ($f = charger_fonction($nom, 'balise', true)) {
+        return $f($p);
+    } else {
+        $nom = strtolower((string) $nom);
+        $code = generer_generer_url(substr($nom, 4), $p);
+        $code = champ_sql($nom, $p, $code);
+        $p->code = $code;
+        if (!$p->etoile) {
+            $p->code = "vider_url($code)";
+        }
+        $p->interdire_scripts = false;
+
+        return $p;
+    }
 }
 
 /**
@@ -162,16 +162,16 @@ 
  */
 function balise_URL_ARTICLE_dist($p) {
 
-	// Cas particulier des boucles (SYNDIC_ARTICLES)
-	$code = $p->type_requete == 'syndic_articles' ? champ_sql('url', $p) : generer_generer_url('article', $p);
+    // Cas particulier des boucles (SYNDIC_ARTICLES)
+    $code = $p->type_requete == 'syndic_articles' ? champ_sql('url', $p) : generer_generer_url('article', $p);
 
-	$p->code = $code;
-	if (!$p->etoile) {
-		$p->code = "vider_url($code)";
-	}
-	$p->interdire_scripts = false;
+    $p->code = $code;
+    if (!$p->etoile) {
+        $p->code = "vider_url($code)";
+    }
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -191,21 +191,21 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_SITE_dist($p) {
-	$code = champ_sql('url_site', $p, '');
-	if (!$code) {
-		$code = generer_generer_url('site', $p);
-		if ($code === null) {
-			return null;
-		}
-	} else {
-		if (!$p->etoile) {
-			$code = "calculer_url($code,'','url', \$connect)";
-		}
-	}
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    $code = champ_sql('url_site', $p, '');
+    if (!$code) {
+        $code = generer_generer_url('site', $p);
+        if ($code === null) {
+            return null;
+        }
+    } else {
+        if (!$p->etoile) {
+            $code = "calculer_url($code,'','url', \$connect)";
+        }
+    }
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 // Autres balises URL_*, qui ne concernent pas une table
@@ -224,11 +224,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_SITE_SPIP_dist($p) {
-	$p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
-	$p->code = 'spip_htmlspecialchars(' . $p->code . ')';
-	$p->interdire_scripts = false;
+    $p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
+    $p->code = 'spip_htmlspecialchars(' . $p->code . ')';
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 
@@ -257,42 +257,42 @@ 
  */
 function balise_URL_PAGE_dist($p) {
 
-	$code = interprete_argument_balise(1, $p);
-	$args = interprete_argument_balise(2, $p);
-	if ($args == null) {
-		$args = "''";
-	}
-
-	if ($s = trouver_nom_serveur_distant($p)) {
-		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
-		// elle devra aussi traiter le cas derogatoire type=page
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
-			if ($args && $args !== "''") {
-				$code .= ", $args";
-			}
-			$code = $f('page', $code, $s);
-			$p->code = $code;
-			return $p;
-		}
-		$s = 'connect=' . addslashes((string) $s);
-		$args = (($args && $args !== "''") ? "$args . '&$s'" : "'$s'");
-	}
-
-	if (!$code) {
-		$noentities = $p->etoile ? "'&'" : '';
-		$code = "url_de_base() . preg_replace(',^./,', '', self($noentities))";
-	} else {
-		if (!$args) {
-			$args = "''";
-		}
-		$noentities = $p->etoile ? ', true' : '';
-		$code = "generer_url_public($code, $args$noentities)";
-	}
-	$p->code = $code;
-	spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO);
-
-	#$p->interdire_scripts = true;
-	return $p;
+    $code = interprete_argument_balise(1, $p);
+    $args = interprete_argument_balise(2, $p);
+    if ($args == null) {
+        $args = "''";
+    }
+
+    if ($s = trouver_nom_serveur_distant($p)) {
+        // si une fonction de generation des url a ete definie pour ce connect l'utiliser
+        // elle devra aussi traiter le cas derogatoire type=page
+        if (function_exists($f = 'generer_generer_url_' . $s)) {
+            if ($args && $args !== "''") {
+                $code .= ", $args";
+            }
+            $code = $f('page', $code, $s);
+            $p->code = $code;
+            return $p;
+        }
+        $s = 'connect=' . addslashes((string) $s);
+        $args = (($args && $args !== "''") ? "$args . '&$s'" : "'$s'");
+    }
+
+    if (!$code) {
+        $noentities = $p->etoile ? "'&'" : '';
+        $code = "url_de_base() . preg_replace(',^./,', '', self($noentities))";
+    } else {
+        if (!$args) {
+            $args = "''";
+        }
+        $noentities = $p->etoile ? ', true' : '';
+        $code = "generer_url_public($code, $args$noentities)";
+    }
+    $p->code = $code;
+    spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO);
+
+    #$p->interdire_scripts = true;
+    return $p;
 }
 
 
@@ -319,24 +319,24 @@ 
  */
 function balise_URL_ECRIRE_dist($p) {
 
-	$code = interprete_argument_balise(1, $p);
-	if (!$code) {
-		$fonc = "''";
-	} else {
-		$fonc = $code;
-		$args = interprete_argument_balise(2, $p);
-		if ($args === null) {
-			$args = "''";
-		}
-		$noentities = $p->etoile ? ', true' : '';
-		if ($args != "''" || $noentities) {
-			$fonc .= ",$args$noentities";
-		}
-	}
-	$p->code = 'generer_url_ecrire(' . $fonc . ')';
-	$p->interdire_scripts = false;
-
-	return $p;
+    $code = interprete_argument_balise(1, $p);
+    if (!$code) {
+        $fonc = "''";
+    } else {
+        $fonc = $code;
+        $args = interprete_argument_balise(2, $p);
+        if ($args === null) {
+            $args = "''";
+        }
+        $noentities = $p->etoile ? ', true' : '';
+        if ($args != "''" || $noentities) {
+            $fonc .= ",$args$noentities";
+        }
+    }
+    $p->code = 'generer_url_ecrire(' . $fonc . ')';
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 
@@ -362,24 +362,24 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_ACTION_AUTEUR_dist($p) {
-	$p->descr['session'] = true;
-
-	$p->code = interprete_argument_balise(1, $p);
-
-	$args = interprete_argument_balise(2, $p);
-	if ($args != "''" && $args !== null) {
-		$p->code .= ',' . $args;
-	}
-	$redirect = interprete_argument_balise(3, $p);
-	if ($redirect != "''" && $redirect !== null) {
-		if ($args == "''" || $args === null) {
-			$p->code .= ",''";
-		}
-		$p->code .= ',' . $redirect;
-	}
-
-	$p->code = 'generer_action_auteur(' . $p->code . ')';
-	$p->interdire_scripts = false;
-
-	return $p;
+    $p->descr['session'] = true;
+
+    $p->code = interprete_argument_balise(1, $p);
+
+    $args = interprete_argument_balise(2, $p);
+    if ($args != "''" && $args !== null) {
+        $p->code .= ',' . $args;
+    }
+    $redirect = interprete_argument_balise(3, $p);
+    if ($redirect != "''" && $redirect !== null) {
+        if ($args == "''" || $args === null) {
+            $p->code .= ",''";
+        }
+        $p->code .= ',' . $redirect;
+    }
+
+    $p->code = 'generer_action_auteur(' . $p->code . ')';
+    $p->interdire_scripts = false;
+
+    return $p;
 }