spip / SPIP

ecrire/bootstrap/inc/logging.php

Indentation +124 added lines, -124 removed lines

@@ -26,85 +26,85 @@ 
  * ```
  */
 function spip_logger(?string $name = null): LoggerInterface {
-	/* @var array<string,LoggerInterface> */
-	static $loggers = [];
-	/* @var ?Factory */
-	static $loggerFactory = null;
-
-	$name ??= 'spip';
-
-	if ($loggerFactory === null) {
-		$spipToMonologLevels = [
-			Level::Emergency, // _LOG_HS
-			Level::Alert,     // _LOG_ALERTE_ROUGE
-			Level::Critical,  // _LOG_CRITIQUE
-			Level::Error,     // _LOG_ERREUR
-			Level::Warning,   // _LOG_AVERTISSEMENT
-			Level::Notice,    // _LOG_INFO_IMPORTANTE
-			Level::Info,      // _LOG_INFO
-			Level::Debug,     // _LOG_DEBUG
-		];
-
-		$config = [
-			'siteDir' => _ROOT_RACINE,
-			'filesystem' => new Filesystem(),
-			// max log par hit
-			'max_log' => defined('_MAX_LOG') ? constant('_MAX_LOG') : null,
-			// pour indiquer le chemin du fichier qui envoie le log
-			'fileline' => defined('_LOG_FILELINE') ? constant('_LOG_FILELINE') : null,
-			// échappement des log
-			'brut' => defined('_LOG_BRUT') ? constant('_LOG_BRUT') : null,
-			// à quel level on commence à logguer
-			'max_level' => (function() use ($spipToMonologLevels): Level {
-				if (!defined('_LOG_FILTRE_GRAVITE')) {
-					return Level::Notice;
-				}
-				$level = constant('_LOG_FILTRE_GRAVITE');
-				if ($level instanceof Level) {
-					return $level;
-				}
-				if (isset($spipToMonologLevels[$level])) {
-					return $spipToMonologLevels[$level];
-				}
-				return match($level) {
-					LogLevel::EMERGENCY => Level::Emergency,
-					LogLevel::ALERT => Level::Alert,
-					LogLevel::CRITICAL => Level::Critical,
-					LogLevel::CRITICAL => Level::Error,
-					LogLevel::CRITICAL => Level::Warning,
-					LogLevel::CRITICAL => Level::Notice,
-					LogLevel::CRITICAL => Level::Info,
-					LogLevel::CRITICAL => Level::Debug,
-					default => Level::Notice,
-				};
-			})(),
-			// rotation: nombre de fichiers
-			'max_files' => $GLOBALS['nombre_de_logs'] ??= 4,
-			// rotation: taille max d’un fichier
-			'max_size' => ($GLOBALS['taille_des_logs'] ??= 100) * 1024,
-			// chemin du fichier de log
-			'log_path' => (function() {
-				$log_dir = defined('_DIR_LOG') ? str_replace(_DIR_RACINE, '', constant('_DIR_LOG')) : 'tmp/log/';
-				$log_file = defined('_FILE_LOG') ? constant('_FILE_LOG') : 'spip';
-				$log_suffix = defined('_FILE_LOG_SUFFIX') ? constant('_FILE_LOG_SUFFIX') : '.log';
-
-				$log_file = str_replace('spip', '%s', $log_file);
-				return sprintf('%s%s%s', $log_dir, $log_file, $log_suffix);
-			})(),
-		];
-		$env = getenv('APP_ENV') ?? 'prod';
-		if ($env === 'dev') {
-			$config = [
-				...$config,
-				'fileline' => true,
-				'max_level' => Level::Debug,
-			];
-		}
-		$config = array_filter($config);
-
-		$loggerFactory = new Factory(new Config(...$config), new LineFormatter());
-		unset($args, $env, $spipToMonologLevels);
-	}
+    /* @var array<string,LoggerInterface> */
+    static $loggers = [];
+    /* @var ?Factory */
+    static $loggerFactory = null;
+
+    $name ??= 'spip';
+
+    if ($loggerFactory === null) {
+        $spipToMonologLevels = [
+            Level::Emergency, // _LOG_HS
+            Level::Alert,     // _LOG_ALERTE_ROUGE
+            Level::Critical,  // _LOG_CRITIQUE
+            Level::Error,     // _LOG_ERREUR
+            Level::Warning,   // _LOG_AVERTISSEMENT
+            Level::Notice,    // _LOG_INFO_IMPORTANTE
+            Level::Info,      // _LOG_INFO
+            Level::Debug,     // _LOG_DEBUG
+        ];
+
+        $config = [
+            'siteDir' => _ROOT_RACINE,
+            'filesystem' => new Filesystem(),
+            // max log par hit
+            'max_log' => defined('_MAX_LOG') ? constant('_MAX_LOG') : null,
+            // pour indiquer le chemin du fichier qui envoie le log
+            'fileline' => defined('_LOG_FILELINE') ? constant('_LOG_FILELINE') : null,
+            // échappement des log
+            'brut' => defined('_LOG_BRUT') ? constant('_LOG_BRUT') : null,
+            // à quel level on commence à logguer
+            'max_level' => (function() use ($spipToMonologLevels): Level {
+                if (!defined('_LOG_FILTRE_GRAVITE')) {
+                    return Level::Notice;
+                }
+                $level = constant('_LOG_FILTRE_GRAVITE');
+                if ($level instanceof Level) {
+                    return $level;
+                }
+                if (isset($spipToMonologLevels[$level])) {
+                    return $spipToMonologLevels[$level];
+                }
+                return match($level) {
+                    LogLevel::EMERGENCY => Level::Emergency,
+                    LogLevel::ALERT => Level::Alert,
+                    LogLevel::CRITICAL => Level::Critical,
+                    LogLevel::CRITICAL => Level::Error,
+                    LogLevel::CRITICAL => Level::Warning,
+                    LogLevel::CRITICAL => Level::Notice,
+                    LogLevel::CRITICAL => Level::Info,
+                    LogLevel::CRITICAL => Level::Debug,
+                    default => Level::Notice,
+                };
+            })(),
+            // rotation: nombre de fichiers
+            'max_files' => $GLOBALS['nombre_de_logs'] ??= 4,
+            // rotation: taille max d’un fichier
+            'max_size' => ($GLOBALS['taille_des_logs'] ??= 100) * 1024,
+            // chemin du fichier de log
+            'log_path' => (function() {
+                $log_dir = defined('_DIR_LOG') ? str_replace(_DIR_RACINE, '', constant('_DIR_LOG')) : 'tmp/log/';
+                $log_file = defined('_FILE_LOG') ? constant('_FILE_LOG') : 'spip';
+                $log_suffix = defined('_FILE_LOG_SUFFIX') ? constant('_FILE_LOG_SUFFIX') : '.log';
+
+                $log_file = str_replace('spip', '%s', $log_file);
+                return sprintf('%s%s%s', $log_dir, $log_file, $log_suffix);
+            })(),
+        ];
+        $env = getenv('APP_ENV') ?? 'prod';
+        if ($env === 'dev') {
+            $config = [
+                ...$config,
+                'fileline' => true,
+                'max_level' => Level::Debug,
+            ];
+        }
+        $config = array_filter($config);
+
+        $loggerFactory = new Factory(new Config(...$config), new LineFormatter());
+        unset($args, $env, $spipToMonologLevels);
+    }
 
     return $loggers[$name] ??= $loggerFactory->createFromFilename($name);
 }
@@ -135,18 +135,18 @@ 
 function spip_log($message, $name = null): void
 {
     static $spipToMonologLevels = [
-		Level::Emergency, // _LOG_HS
-		Level::Alert,     // _LOG_ALERTE_ROUGE
-		Level::Critical,  // _LOG_CRITIQUE
-		Level::Error,     // _LOG_ERREUR
-		Level::Warning,   // _LOG_AVERTISSEMENT
-		Level::Notice,    // _LOG_INFO_IMPORTANTE
-		Level::Info,      // _LOG_INFO
-		Level::Debug,     // _LOG_DEBUG
+        Level::Emergency, // _LOG_HS
+        Level::Alert,     // _LOG_ALERTE_ROUGE
+        Level::Critical,  // _LOG_CRITIQUE
+        Level::Error,     // _LOG_ERREUR
+        Level::Warning,   // _LOG_AVERTISSEMENT
+        Level::Notice,    // _LOG_INFO_IMPORTANTE
+        Level::Info,      // _LOG_INFO
+        Level::Debug,     // _LOG_DEBUG
     ];
 
-	# Éviter de trop polluer les logs de dépréciation
-	static $deprecated = [];
+    # Éviter de trop polluer les logs de dépréciation
+    static $deprecated = [];
 
     preg_match('/^([a-z_]*)\.?(\d)?$/iS', (string) $name, $regs);
     $logFile = 'spip';
@@ -154,46 +154,46 @@ 
         $logFile = $regs[1];
     }
 
-	if (!isset($regs[2])) {
-		$level = Level::Info;
-	} else {
-		$level = $spipToMonologLevels[intval($regs[2])] ?? Level::Info;
-	}
+    if (!isset($regs[2])) {
+        $level = Level::Info;
+    } else {
+        $level = $spipToMonologLevels[intval($regs[2])] ?? Level::Info;
+    }
 
-	$logger = spip_logger($logFile);
-	$logger->log($level, preg_replace(
+    $logger = spip_logger($logFile);
+    $logger->log($level, preg_replace(
         "/\n*$/",
         "\n",
         is_string($message) ? $message : print_r($message, true)
     ));
 
 
-	if (!array_key_exists($logFile, $deprecated)) {
-		$deprecated[$logFile] = true;
-		if ($logFile === 'spip') {
-			trigger_deprecation(
-				'spip',
-				'5.0',
-				sprintf(
-					'spip_log(\'message\') function is deprecated ; use spip_logger().'
-					. ' Example: spip_logger()->info(\'message\').',
-					$logFile,
-					$logFile,
-				)
-			);
-		} else {
-			trigger_deprecation(
-				'spip',
-				'5.0',
-				sprintf(
-					'spip_log(\'message\', \'%s\') function is deprecated ; use spip_logger().'
-					. ' Example: spip_logger(\'%s\')->info(\'message\').',
-					$logFile,
-					$logFile,
-				)
-			);
-		}
-	}
+    if (!array_key_exists($logFile, $deprecated)) {
+        $deprecated[$logFile] = true;
+        if ($logFile === 'spip') {
+            trigger_deprecation(
+                'spip',
+                '5.0',
+                sprintf(
+                    'spip_log(\'message\') function is deprecated ; use spip_logger().'
+                    . ' Example: spip_logger()->info(\'message\').',
+                    $logFile,
+                    $logFile,
+                )
+            );
+        } else {
+            trigger_deprecation(
+                'spip',
+                '5.0',
+                sprintf(
+                    'spip_log(\'message\', \'%s\') function is deprecated ; use spip_logger().'
+                    . ' Example: spip_logger(\'%s\')->info(\'message\').',
+                    $logFile,
+                    $logFile,
+                )
+            );
+        }
+    }
 }
 
 
@@ -205,6 +205,6 @@ 
  * @param array $opt Tableau d'options
  **/
 function journal($phrase, $opt = []) {
-	$journal = charger_fonction('journal', 'inc');
-	$journal($phrase, $opt);
+    $journal = charger_fonction('journal', 'inc');
+    $journal($phrase, $opt);
 }

Spacing +15 added lines, -15 removed lines

@@ -36,13 +36,13 @@ 
 	if ($loggerFactory === null) {
 		$spipToMonologLevels = [
 			Level::Emergency, // _LOG_HS
-			Level::Alert,     // _LOG_ALERTE_ROUGE
-			Level::Critical,  // _LOG_CRITIQUE
-			Level::Error,     // _LOG_ERREUR
-			Level::Warning,   // _LOG_AVERTISSEMENT
-			Level::Notice,    // _LOG_INFO_IMPORTANTE
-			Level::Info,      // _LOG_INFO
-			Level::Debug,     // _LOG_DEBUG
+			Level::Alert, // _LOG_ALERTE_ROUGE
+			Level::Critical, // _LOG_CRITIQUE
+			Level::Error, // _LOG_ERREUR
+			Level::Warning, // _LOG_AVERTISSEMENT
+			Level::Notice, // _LOG_INFO_IMPORTANTE
+			Level::Info, // _LOG_INFO
+			Level::Debug, // _LOG_DEBUG
 		];
 
 		$config = [
@@ -55,7 +55,7 @@ 
 			// échappement des log
 			'brut' => defined('_LOG_BRUT') ? constant('_LOG_BRUT') : null,
 			// à quel level on commence à logguer
-			'max_level' => (function() use ($spipToMonologLevels): Level {
+			'max_level' => (function() use ($spipToMonologLevels) : Level {
 				if (!defined('_LOG_FILTRE_GRAVITE')) {
 					return Level::Notice;
 				}
@@ -136,13 +136,13 @@ 
 {
     static $spipToMonologLevels = [
 		Level::Emergency, // _LOG_HS
-		Level::Alert,     // _LOG_ALERTE_ROUGE
-		Level::Critical,  // _LOG_CRITIQUE
-		Level::Error,     // _LOG_ERREUR
-		Level::Warning,   // _LOG_AVERTISSEMENT
-		Level::Notice,    // _LOG_INFO_IMPORTANTE
-		Level::Info,      // _LOG_INFO
-		Level::Debug,     // _LOG_DEBUG
+		Level::Alert, // _LOG_ALERTE_ROUGE
+		Level::Critical, // _LOG_CRITIQUE
+		Level::Error, // _LOG_ERREUR
+		Level::Warning, // _LOG_AVERTISSEMENT
+		Level::Notice, // _LOG_INFO_IMPORTANTE
+		Level::Info, // _LOG_INFO
+		Level::Debug, // _LOG_DEBUG
     ];
 
 	# Éviter de trop polluer les logs de dépréciation

ecrire/bootstrap/inc/urls.php

Indentation +500 added lines, -501 removed lines

@@ -8,11 +8,11 @@ 
  * @return string
  */
 function quote_amp($u) {
-	return preg_replace(
-		'/&(?![a-z]{0,4}\w{2,3};|#x?[0-9a-f]{2,6};)/i',
-		'&',
-		$u
-	);
+    return preg_replace(
+        '/&(?![a-z]{0,4}\w{2,3};|#x?[0-9a-f]{2,6};)/i',
+        '&',
+        $u
+    );
 }
 
 /**
@@ -20,23 +20,22 @@ 
  *
  * On est sur le web, on exclut certains protocoles,
  * notamment 'file://', 'php://' et d'autres…
-
  * @param string $url
  * @return bool
  */
 function tester_url_absolue($url) {
-	$url = trim($url ?? '');
-	if ($url && preg_match(';^([a-z]{3,7}:)?//;Uims', $url, $m)) {
-		if (
-			isset($m[1])
-			&& ($p = strtolower(rtrim($m[1], ':')))
-			&& in_array($p, ['file', 'php', 'zlib', 'glob', 'phar', 'ssh2', 'rar', 'ogg', 'expect', 'zip'])
-		) {
-			return false;
-		}
-		return true;
-	}
-	return false;
+    $url = trim($url ?? '');
+    if ($url && preg_match(';^([a-z]{3,7}:)?//;Uims', $url, $m)) {
+        if (
+            isset($m[1])
+            && ($p = strtolower(rtrim($m[1], ':')))
+            && in_array($p, ['file', 'php', 'zlib', 'glob', 'phar', 'ssh2', 'rar', 'ogg', 'expect', 'zip'])
+        ) {
+            return false;
+        }
+        return true;
+    }
+    return false;
 }
 
 /**
@@ -58,100 +57,100 @@ 
  * @return string URL
  */
 function parametre_url($url, $c, $v = null, $sep = '&') {
-	// requete erronnee : plusieurs variable dans $c et aucun $v
-	if (str_contains($c, '|') && is_null($v)) {
-		return null;
-	}
-
-	// lever l'#ancre
-	if (preg_match(',^([^#]*)(#.*)$,', $url, $r)) {
-		$url = $r[1];
-		$ancre = $r[2];
-	} else {
-		$ancre = '';
-	}
-
-	// eclater
-	$url = preg_split(',[?]|&|&,', $url);
-
-	// recuperer la base
-	$a = array_shift($url);
-	if (!$a) {
-		$a = './';
-	}
-
-	// preparer la regexp de maniere securisee
-	$regexp = explode('|', $c);
-	foreach ($regexp as $r => $e) {
-		$regexp[$r] = str_replace('[]', '\[\]', preg_replace(',[^\w\d\[\]-],', '', $e));
-	}
-	$regexp = ',^(' . implode('|', $regexp) . '[[]?[]]?)(=.*)?$,';
-	$ajouts = array_flip(explode('|', $c));
-	$u = is_array($v) ? $v : rawurlencode((string) $v);
-	$testv = (is_array($v) ? count($v) : strlen((string) $v));
-	$v_read = null;
-	// lire les variables et agir
-	foreach ($url as $n => $val) {
-		if (preg_match($regexp, urldecode($val), $r)) {
-			$r = array_pad($r, 3, null);
-			if ($v === null) {
-				// c'est un tableau, on memorise les valeurs
-				if (str_ends_with($r[1], '[]')) {
-					if (!$v_read) {
-						$v_read = [];
-					}
-					$v_read[] = $r[2] ? substr($r[2], 1) : '';
-				} // c'est un scalaire, on retourne direct
-				else {
-					return $r[2] ? substr($r[2], 1) : '';
-				}
-			} // suppression
-			elseif (!$testv) {
-				unset($url[$n]);
-			}
-			// Ajout. Pour une variable, remplacer au meme endroit,
-			// pour un tableau ce sera fait dans la prochaine boucle
-			elseif (!str_ends_with($r[1], '[]')) {
-				$url[$n] = $r[1] . '=' . $u;
-				unset($ajouts[$r[1]]);
-			}
-			// Pour les tableaux on laisse tomber les valeurs de
-			// départ, on remplira à l'étape suivante
-			else {
-				unset($url[$n]);
-			}
-		}
-	}
-
-	// traiter les parametres pas encore trouves
-	if (
-		$v === null
-		&& ($args = func_get_args())
-		&& count($args) == 2
-	) {
-		return $v_read; // rien trouve ou un tableau
-	} elseif ($testv) {
-		foreach ($ajouts as $k => $n) {
-			if (!is_array($v)) {
-				$url[] = $k . '=' . $u;
-			} else {
-				$id = (str_ends_with($k, '[]')) ? $k : ($k . '[]');
-				foreach ($v as $w) {
-					$url[] = $id . '=' . (is_array($w) ? 'Array' : rawurlencode($w));
-				}
-			}
-		}
-	}
-
-	// eliminer les vides
-	$url = array_filter($url);
-
-	// recomposer l'adresse
-	if ($url) {
-		$a .= '?' . join($sep, $url);
-	}
-
-	return $a . $ancre;
+    // requete erronnee : plusieurs variable dans $c et aucun $v
+    if (str_contains($c, '|') && is_null($v)) {
+        return null;
+    }
+
+    // lever l'#ancre
+    if (preg_match(',^([^#]*)(#.*)$,', $url, $r)) {
+        $url = $r[1];
+        $ancre = $r[2];
+    } else {
+        $ancre = '';
+    }
+
+    // eclater
+    $url = preg_split(',[?]|&|&,', $url);
+
+    // recuperer la base
+    $a = array_shift($url);
+    if (!$a) {
+        $a = './';
+    }
+
+    // preparer la regexp de maniere securisee
+    $regexp = explode('|', $c);
+    foreach ($regexp as $r => $e) {
+        $regexp[$r] = str_replace('[]', '\[\]', preg_replace(',[^\w\d\[\]-],', '', $e));
+    }
+    $regexp = ',^(' . implode('|', $regexp) . '[[]?[]]?)(=.*)?$,';
+    $ajouts = array_flip(explode('|', $c));
+    $u = is_array($v) ? $v : rawurlencode((string) $v);
+    $testv = (is_array($v) ? count($v) : strlen((string) $v));
+    $v_read = null;
+    // lire les variables et agir
+    foreach ($url as $n => $val) {
+        if (preg_match($regexp, urldecode($val), $r)) {
+            $r = array_pad($r, 3, null);
+            if ($v === null) {
+                // c'est un tableau, on memorise les valeurs
+                if (str_ends_with($r[1], '[]')) {
+                    if (!$v_read) {
+                        $v_read = [];
+                    }
+                    $v_read[] = $r[2] ? substr($r[2], 1) : '';
+                } // c'est un scalaire, on retourne direct
+                else {
+                    return $r[2] ? substr($r[2], 1) : '';
+                }
+            } // suppression
+            elseif (!$testv) {
+                unset($url[$n]);
+            }
+            // Ajout. Pour une variable, remplacer au meme endroit,
+            // pour un tableau ce sera fait dans la prochaine boucle
+            elseif (!str_ends_with($r[1], '[]')) {
+                $url[$n] = $r[1] . '=' . $u;
+                unset($ajouts[$r[1]]);
+            }
+            // Pour les tableaux on laisse tomber les valeurs de
+            // départ, on remplira à l'étape suivante
+            else {
+                unset($url[$n]);
+            }
+        }
+    }
+
+    // traiter les parametres pas encore trouves
+    if (
+        $v === null
+        && ($args = func_get_args())
+        && count($args) == 2
+    ) {
+        return $v_read; // rien trouve ou un tableau
+    } elseif ($testv) {
+        foreach ($ajouts as $k => $n) {
+            if (!is_array($v)) {
+                $url[] = $k . '=' . $u;
+            } else {
+                $id = (str_ends_with($k, '[]')) ? $k : ($k . '[]');
+                foreach ($v as $w) {
+                    $url[] = $id . '=' . (is_array($w) ? 'Array' : rawurlencode($w));
+                }
+            }
+        }
+    }
+
+    // eliminer les vides
+    $url = array_filter($url);
+
+    // recomposer l'adresse
+    if ($url) {
+        $a .= '?' . join($sep, $url);
+    }
+
+    return $a . $ancre;
 }
 
 /**
@@ -166,22 +165,22 @@ 
  * @uses translitteration()
  */
 function ancre_url(string $url, ?string $ancre = ''): string {
-	$ancre ??= '';
-	// lever l'#ancre
-	if (preg_match(',^([^#]*)(#.*)$,', $url, $r)) {
-		$url = $r[1];
-	}
-	if (preg_match('/[^-_a-zA-Z0-9]+/S', $ancre)) {
-		if (!function_exists('translitteration')) {
-			include_spip('inc/charsets');
-		}
-		$ancre = preg_replace(
-			['/^[^-_a-zA-Z0-9]+/', '/[^-_a-zA-Z0-9]/'],
-			['', '-'],
-			translitteration($ancre)
-		);
-	}
-	return $url . (strlen($ancre) ? '#' . $ancre : '');
+    $ancre ??= '';
+    // lever l'#ancre
+    if (preg_match(',^([^#]*)(#.*)$,', $url, $r)) {
+        $url = $r[1];
+    }
+    if (preg_match('/[^-_a-zA-Z0-9]+/S', $ancre)) {
+        if (!function_exists('translitteration')) {
+            include_spip('inc/charsets');
+        }
+        $ancre = preg_replace(
+            ['/^[^-_a-zA-Z0-9]+/', '/[^-_a-zA-Z0-9]/'],
+            ['', '-'],
+            translitteration($ancre)
+        );
+    }
+    return $url . (strlen($ancre) ? '#' . $ancre : '');
 }
 
 /**
@@ -191,16 +190,16 @@ 
  * @return string
  */
 function nettoyer_uri($reset = null) {
-	static $done = false;
-	static $propre = '';
-	if (!is_null($reset)) {
-		return $propre = $reset;
-	}
-	if ($done) {
-		return $propre;
-	}
-	$done = true;
-	return $propre = nettoyer_uri_var($GLOBALS['REQUEST_URI']);
+    static $done = false;
+    static $propre = '';
+    if (!is_null($reset)) {
+        return $propre = $reset;
+    }
+    if ($done) {
+        return $propre;
+    }
+    $done = true;
+    return $propre = nettoyer_uri_var($GLOBALS['REQUEST_URI']);
 }
 
 /**
@@ -215,36 +214,36 @@ 
  * @return string
  */
 function nettoyer_uri_var($request_uri) {
-	static $preg_nettoyer;
-	if (!defined('_CONTEXTE_IGNORE_LISTE_VARIABLES')) {
-		/** @var array<string> Liste (regexp) de noms de variables à ignorer d’une URI */
-		define('_CONTEXTE_IGNORE_LISTE_VARIABLES', ['^var_', '^PHPSESSID$', '^fbclid$', '^utm_']);
-	}
-	if (empty($preg_nettoyer)) {
-		$preg_nettoyer_vars = _CONTEXTE_IGNORE_LISTE_VARIABLES;
-		foreach ($preg_nettoyer_vars as &$var) {
-			if (str_starts_with($var, '^')) {
-				$var = substr($var, 1);
-			} else {
-				$var = '[^=&]*' . $var;
-			}
-			if (str_ends_with($var, '$')) {
-				$var = substr($var, 0, -1);
-			} else {
-				$var .= '[^=&]*';
-			}
-		}
-		$preg_nettoyer = ',([?&])(' . implode('|', $preg_nettoyer_vars) . ')=[^&]*(&|$),i';
-	}
-	if (empty($request_uri)) {
-		return $request_uri;
-	}
-	$uri1 = $request_uri;
-	do {
-		$uri = $uri1;
-		$uri1 = preg_replace($preg_nettoyer, '\1', $uri);
-	} while ($uri <> $uri1);
-	return rtrim($uri1, '?&');
+    static $preg_nettoyer;
+    if (!defined('_CONTEXTE_IGNORE_LISTE_VARIABLES')) {
+        /** @var array<string> Liste (regexp) de noms de variables à ignorer d’une URI */
+        define('_CONTEXTE_IGNORE_LISTE_VARIABLES', ['^var_', '^PHPSESSID$', '^fbclid$', '^utm_']);
+    }
+    if (empty($preg_nettoyer)) {
+        $preg_nettoyer_vars = _CONTEXTE_IGNORE_LISTE_VARIABLES;
+        foreach ($preg_nettoyer_vars as &$var) {
+            if (str_starts_with($var, '^')) {
+                $var = substr($var, 1);
+            } else {
+                $var = '[^=&]*' . $var;
+            }
+            if (str_ends_with($var, '$')) {
+                $var = substr($var, 0, -1);
+            } else {
+                $var .= '[^=&]*';
+            }
+        }
+        $preg_nettoyer = ',([?&])(' . implode('|', $preg_nettoyer_vars) . ')=[^&]*(&|$),i';
+    }
+    if (empty($request_uri)) {
+        return $request_uri;
+    }
+    $uri1 = $request_uri;
+    do {
+        $uri = $uri1;
+        $uri1 = preg_replace($preg_nettoyer, '\1', $uri);
+    } while ($uri <> $uri1);
+    return rtrim($uri1, '?&');
 }
 
 
@@ -258,49 +257,49 @@ 
  *    URL vers soi-même
  **/
 function self($amp = '&amp;', $root = false) {
-	$url = nettoyer_uri();
-	if (
-		!$root
-		&& (
-			// si pas de profondeur on peut tronquer
-			$GLOBALS['profondeur_url'] < (_DIR_RESTREINT ? 1 : 2)
-			// sinon c'est OK si _SET_HTML_BASE a ete force a false
-			|| defined('_SET_HTML_BASE') && !_SET_HTML_BASE
-		)
-	) {
-		$url = preg_replace(',^[^?]*/,', '', $url);
-	}
-	// ajouter le cas echeant les variables _POST['id_...']
-	foreach ($_POST as $v => $c) {
-		if (str_starts_with($v, 'id_')) {
-			$url = parametre_url($url, $v, $c, '&');
-		}
-	}
-
-	// supprimer les variables sans interet
-	if (test_espace_prive()) {
-		$url = preg_replace(',([?&])('
-			. 'lang|show_docs|'
-			. 'changer_lang|var_lang|action)=[^&]*,i', '\1', $url);
-		$url = preg_replace(',([?&])[&]+,', '\1', $url);
-		$url = preg_replace(',[&]$,', '\1', $url);
-	}
-
-	// eviter les hacks
-	include_spip('inc/filtres_mini');
-	$url = spip_htmlspecialchars($url);
-
-	$url = str_replace(["'", '"', '<', '[', ']', ':'], ['%27', '%22', '%3C', '%5B', '%5D', '%3A'], $url);
-
-	// &amp; ?
-	if ($amp != '&amp;') {
-		$url = str_replace('&amp;', $amp, $url);
-	}
-
-	// Si ca demarre par ? ou vide, donner './'
-	$url = preg_replace(',^([?].*)?$,', './\1', $url);
-
-	return $url;
+    $url = nettoyer_uri();
+    if (
+        !$root
+        && (
+            // si pas de profondeur on peut tronquer
+            $GLOBALS['profondeur_url'] < (_DIR_RESTREINT ? 1 : 2)
+            // sinon c'est OK si _SET_HTML_BASE a ete force a false
+            || defined('_SET_HTML_BASE') && !_SET_HTML_BASE
+        )
+    ) {
+        $url = preg_replace(',^[^?]*/,', '', $url);
+    }
+    // ajouter le cas echeant les variables _POST['id_...']
+    foreach ($_POST as $v => $c) {
+        if (str_starts_with($v, 'id_')) {
+            $url = parametre_url($url, $v, $c, '&');
+        }
+    }
+
+    // supprimer les variables sans interet
+    if (test_espace_prive()) {
+        $url = preg_replace(',([?&])('
+            . 'lang|show_docs|'
+            . 'changer_lang|var_lang|action)=[^&]*,i', '\1', $url);
+        $url = preg_replace(',([?&])[&]+,', '\1', $url);
+        $url = preg_replace(',[&]$,', '\1', $url);
+    }
+
+    // eviter les hacks
+    include_spip('inc/filtres_mini');
+    $url = spip_htmlspecialchars($url);
+
+    $url = str_replace(["'", '"', '<', '[', ']', ':'], ['%27', '%22', '%3C', '%5B', '%5D', '%3A'], $url);
+
+    // &amp; ?
+    if ($amp != '&amp;') {
+        $url = str_replace('&amp;', $amp, $url);
+    }
+
+    // Si ca demarre par ? ou vide, donner './'
+    $url = preg_replace(',^([?].*)?$,', './\1', $url);
+
+    return $url;
 }
 
 /**
@@ -325,48 +324,48 @@ 
  *   url codee ou fonction de decodage
  */
 function generer_objet_url($id, string $entite, string $args = '', string $ancre = '', ?bool $public = null, string $type = '', string $connect = ''): string {
-	if ($public === null) {
-		$public = !test_espace_prive();
-	}
-	$id = intval($id);
-	$entite = objet_type($entite); // cas particulier d'appels sur objet/id_objet...
-
-	if (!$public) {
-		if (!$entite) {
-			return '';
-		}
-		if (!function_exists('generer_objet_url_ecrire')) {
-			include_spip('inc/urls');
-		}
-		$res = generer_objet_url_ecrire($id, $entite, $args, $ancre, false, $connect);
-	} else {
-		$f = charger_fonction_url('objet', $type ?? '');
-
-		// @deprecated si $entite='', on veut la fonction de passage URL ==> id
-		// @see charger_fonction_url
-		if (!$entite) {
-			return $f;
-		}
-
-		// mais d'abord il faut tester le cas des urls sur une
-		// base distante
-		if (
-			$connect
-			&& ($g = charger_fonction('connect', 'urls', true))
-		) {
-			$f = $g;
-		}
-
-		$res = $f(intval($id), $entite, $args ?: '', $ancre ?: '', $connect);
-	}
-	if ($res) {
-		return $res;
-	}
-
-	// On a ete gentil mais la ....
-	spip_logger()->error("generer_objet_url: entite $entite " . ($public ? "($f)" : '') . " inconnue $type $public $connect");
-
-	return '';
+    if ($public === null) {
+        $public = !test_espace_prive();
+    }
+    $id = intval($id);
+    $entite = objet_type($entite); // cas particulier d'appels sur objet/id_objet...
+
+    if (!$public) {
+        if (!$entite) {
+            return '';
+        }
+        if (!function_exists('generer_objet_url_ecrire')) {
+            include_spip('inc/urls');
+        }
+        $res = generer_objet_url_ecrire($id, $entite, $args, $ancre, false, $connect);
+    } else {
+        $f = charger_fonction_url('objet', $type ?? '');
+
+        // @deprecated si $entite='', on veut la fonction de passage URL ==> id
+        // @see charger_fonction_url
+        if (!$entite) {
+            return $f;
+        }
+
+        // mais d'abord il faut tester le cas des urls sur une
+        // base distante
+        if (
+            $connect
+            && ($g = charger_fonction('connect', 'urls', true))
+        ) {
+            $f = $g;
+        }
+
+        $res = $f(intval($id), $entite, $args ?: '', $ancre ?: '', $connect);
+    }
+    if ($res) {
+        return $res;
+    }
+
+    // On a ete gentil mais la ....
+    spip_logger()->error("generer_objet_url: entite $entite " . ($public ? "($f)" : '') . " inconnue $type $public $connect");
+
+    return '';
 }
 
 /**
@@ -374,11 +373,11 @@ 
  * @see generer_objet_url
  */
 function generer_url_entite($id = 0, $entite = '', $args = '', $ancre = '', $public = null, $type = null) {
-	trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url');
-	if ($public && is_string($public)) {
-		return generer_objet_url(intval($id), $entite, $args ?: '', $ancre ?: '', true, $type ?? '', $public);
-	}
-	return generer_objet_url(intval($id), $entite, $args ?: '', $ancre ?: '', $public, $type ?? '');
+    trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url');
+    if ($public && is_string($public)) {
+        return generer_objet_url(intval($id), $entite, $args ?: '', $ancre ?: '', true, $type ?? '', $public);
+    }
+    return generer_objet_url(intval($id), $entite, $args ?: '', $ancre ?: '', $public, $type ?? '');
 }
 
 /**
@@ -386,19 +385,19 @@ 
  * @param int|string|null $id
  */
 function generer_objet_url_ecrire_edit($id, string $entite, string $args = '', string $ancre = ''): string {
-	$id = intval($id);
-	$exec = objet_info($entite, 'url_edit');
-	$url = generer_url_ecrire($exec, $args);
-	if (intval($id)) {
-		$url = parametre_url($url, id_table_objet($entite), $id);
-	} else {
-		$url = parametre_url($url, 'new', 'oui');
-	}
-	if ($ancre) {
-		$url = ancre_url($url, $ancre);
-	}
-
-	return $url;
+    $id = intval($id);
+    $exec = objet_info($entite, 'url_edit');
+    $url = generer_url_ecrire($exec, $args);
+    if (intval($id)) {
+        $url = parametre_url($url, id_table_objet($entite), $id);
+    } else {
+        $url = parametre_url($url, 'new', 'oui');
+    }
+    if ($ancre) {
+        $url = ancre_url($url, $ancre);
+    }
+
+    return $url;
 }
 
 /**
@@ -406,19 +405,19 @@ 
  * @see generer_objet_url_ecrire_edit
  */
 function generer_url_ecrire_entite_edit($id, $entite, $args = '', $ancre = '') {
-	trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url_ecrire_edit');
-	return generer_objet_url_ecrire_edit(intval($id), $entite, $args, $ancre);
+    trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url_ecrire_edit');
+    return generer_objet_url_ecrire_edit(intval($id), $entite, $args, $ancre);
 }
 
 
 function urls_connect_dist($i, &$entite, $args = '', $ancre = '', $public = null) {
-	include_spip('base/connect_sql');
-	$id_type = id_table_objet($entite, $public);
+    include_spip('base/connect_sql');
+    $id_type = id_table_objet($entite, $public);
 
-	return _DIR_RACINE . get_spip_script('./')
-	. '?' . _SPIP_PAGE . "=$entite&$id_type=$i&connect=$public"
-	. (!$args ? '' : "&$args")
-	. (!$ancre ? '' : "#$ancre");
+    return _DIR_RACINE . get_spip_script('./')
+    . '?' . _SPIP_PAGE . "=$entite&$id_type=$i&connect=$public"
+    . (!$args ? '' : "&$args")
+    . (!$ancre ? '' : "#$ancre");
 }
 
 
@@ -429,18 +428,18 @@ 
  * @return string
  */
 function urlencode_1738($url) {
-	if (preg_match(',[^\x00-\x7E],sS', $url)) {
-		$uri = '';
-		for ($i = 0; $i < strlen($url); $i++) {
-			if (ord($a = $url[$i]) > 127) {
-				$a = rawurlencode($a);
-			}
-			$uri .= $a;
-		}
-		$url = $uri;
-	}
-
-	return quote_amp($url);
+    if (preg_match(',[^\x00-\x7E],sS', $url)) {
+        $uri = '';
+        for ($i = 0; $i < strlen($url); $i++) {
+            if (ord($a = $url[$i]) > 127) {
+                $a = rawurlencode($a);
+            }
+            $uri .= $a;
+        }
+        $url = $uri;
+    }
+
+    return quote_amp($url);
 }
 
 /**
@@ -449,14 +448,14 @@ 
  * @param int|string|null $id
  */
 function generer_objet_url_absolue($id = 0, string $entite = '', string $args = '', string $ancre = '', ?bool $public = null, string $type = '', string $connect = ''): string {
-	$id = intval($id);
-	$h = generer_objet_url($id, $entite, $args, $ancre, $public, $type, $connect);
-	if (!preg_match(',^\w+:,', $h)) {
-		include_spip('inc/filtres_mini');
-		$h = url_absolue($h);
-	}
-
-	return $h;
+    $id = intval($id);
+    $h = generer_objet_url($id, $entite, $args, $ancre, $public, $type, $connect);
+    if (!preg_match(',^\w+:,', $h)) {
+        include_spip('inc/filtres_mini');
+        $h = url_absolue($h);
+    }
+
+    return $h;
 }
 
 /**
@@ -464,8 +463,8 @@ 
  * @see  generer_objet_url_absolue
  */
 function generer_url_entite_absolue($id = 0, $entite = '', $args = '', $ancre = '', $connect = null) {
-	trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url_absolue');
-	return generer_objet_url_absolue(intval($id), $entite, $args, $ancre, true, '', $connect ?? '');
+    trigger_deprecation('spip', '4.1', 'Using "%s" is deprecated, use "%s" instead', __FUNCTION__, 'generer_objet_url_absolue');
+    return generer_objet_url_absolue(intval($id), $entite, $args, $ancre, true, '', $connect ?? '');
 }
 
 
@@ -494,89 +493,89 @@ 
  */
 function url_de_base($profondeur = null) {
 
-	static $url = [];
-	if (is_array($profondeur)) {
-		return $url = $profondeur;
-	}
-	if ($profondeur === false) {
-		return $url;
-	}
-
-	if (is_null($profondeur)) {
-		$profondeur = $GLOBALS['profondeur_url'] ?? (_DIR_RESTREINT ? 0 : 1);
-	}
-
-	if (isset($url[$profondeur])) {
-		return $url[$profondeur];
-	}
-
-	$http = 'http';
-
-	if (
-		isset($_SERVER['SCRIPT_URI'])
-		&& str_starts_with($_SERVER['SCRIPT_URI'], 'https')
-	) {
-		$http = 'https';
-	} elseif (
-		isset($_SERVER['HTTPS'])
-		&& test_valeur_serveur($_SERVER['HTTPS'])
-	) {
-		$http = 'https';
-	}
-
-	// note : HTTP_HOST contient le :port si necessaire
-	if ($host = $_SERVER['HTTP_HOST'] ?? null) {
-		// Filtrer $host pour proteger d'attaques d'entete HTTP
-		$host = (filter_var($host, FILTER_SANITIZE_URL) ?: null);
-	}
-
-	// si on n'a pas trouvé d'hôte du tout, en dernier recours on utilise adresse_site comme fallback
-	if (is_null($host) && isset($GLOBALS['meta']['adresse_site'])) {
-		$host = $GLOBALS['meta']['adresse_site'];
-		if ($scheme = parse_url($host, PHP_URL_SCHEME)) {
-			$http = $scheme;
-			$host = str_replace("{$scheme}://", '', $host);
-		}
-	}
-	if (
-		isset($_SERVER['SERVER_PORT'])
-		&& ($port = $_SERVER['SERVER_PORT'])
-		&& !str_contains($host, ':')
-	) {
-		if (!defined('_PORT_HTTP_STANDARD')) {
-			define('_PORT_HTTP_STANDARD', '80');
-		}
-		if (!defined('_PORT_HTTPS_STANDARD')) {
-			define('_PORT_HTTPS_STANDARD', '443');
-		}
-		if ($http == 'http' && !in_array($port, explode(',', _PORT_HTTP_STANDARD))) {
-			$host .= ":$port";
-		}
-		if ($http == 'https' && !in_array($port, explode(',', _PORT_HTTPS_STANDARD))) {
-			$host .= ":$port";
-		}
-	}
-
-	if (!$GLOBALS['REQUEST_URI']) {
-		if (isset($_SERVER['REQUEST_URI'])) {
-			$GLOBALS['REQUEST_URI'] = $_SERVER['REQUEST_URI'];
-		} else {
-			$GLOBALS['REQUEST_URI'] = (php_sapi_name() !== 'cli') ? $_SERVER['PHP_SELF'] : '';
-			if (
-				!empty($_SERVER['QUERY_STRING'])
-				&& !str_contains($_SERVER['REQUEST_URI'], '?')
-			) {
-				$GLOBALS['REQUEST_URI'] .= '?' . $_SERVER['QUERY_STRING'];
-			}
-		}
-	}
-
-	// Et nettoyer l'url
-	$GLOBALS['REQUEST_URI'] = (filter_var($GLOBALS['REQUEST_URI'], FILTER_SANITIZE_URL) ?: '');
-
-	$url[$profondeur] = url_de_($http, $host, $GLOBALS['REQUEST_URI'], $profondeur);
-
-	return $url[$profondeur];
+    static $url = [];
+    if (is_array($profondeur)) {
+        return $url = $profondeur;
+    }
+    if ($profondeur === false) {
+        return $url;
+    }
+
+    if (is_null($profondeur)) {
+        $profondeur = $GLOBALS['profondeur_url'] ?? (_DIR_RESTREINT ? 0 : 1);
+    }
+
+    if (isset($url[$profondeur])) {
+        return $url[$profondeur];
+    }
+
+    $http = 'http';
+
+    if (
+        isset($_SERVER['SCRIPT_URI'])
+        && str_starts_with($_SERVER['SCRIPT_URI'], 'https')
+    ) {
+        $http = 'https';
+    } elseif (
+        isset($_SERVER['HTTPS'])
+        && test_valeur_serveur($_SERVER['HTTPS'])
+    ) {
+        $http = 'https';
+    }
+
+    // note : HTTP_HOST contient le :port si necessaire
+    if ($host = $_SERVER['HTTP_HOST'] ?? null) {
+        // Filtrer $host pour proteger d'attaques d'entete HTTP
+        $host = (filter_var($host, FILTER_SANITIZE_URL) ?: null);
+    }
+
+    // si on n'a pas trouvé d'hôte du tout, en dernier recours on utilise adresse_site comme fallback
+    if (is_null($host) && isset($GLOBALS['meta']['adresse_site'])) {
+        $host = $GLOBALS['meta']['adresse_site'];
+        if ($scheme = parse_url($host, PHP_URL_SCHEME)) {
+            $http = $scheme;
+            $host = str_replace("{$scheme}://", '', $host);
+        }
+    }
+    if (
+        isset($_SERVER['SERVER_PORT'])
+        && ($port = $_SERVER['SERVER_PORT'])
+        && !str_contains($host, ':')
+    ) {
+        if (!defined('_PORT_HTTP_STANDARD')) {
+            define('_PORT_HTTP_STANDARD', '80');
+        }
+        if (!defined('_PORT_HTTPS_STANDARD')) {
+            define('_PORT_HTTPS_STANDARD', '443');
+        }
+        if ($http == 'http' && !in_array($port, explode(',', _PORT_HTTP_STANDARD))) {
+            $host .= ":$port";
+        }
+        if ($http == 'https' && !in_array($port, explode(',', _PORT_HTTPS_STANDARD))) {
+            $host .= ":$port";
+        }
+    }
+
+    if (!$GLOBALS['REQUEST_URI']) {
+        if (isset($_SERVER['REQUEST_URI'])) {
+            $GLOBALS['REQUEST_URI'] = $_SERVER['REQUEST_URI'];
+        } else {
+            $GLOBALS['REQUEST_URI'] = (php_sapi_name() !== 'cli') ? $_SERVER['PHP_SELF'] : '';
+            if (
+                !empty($_SERVER['QUERY_STRING'])
+                && !str_contains($_SERVER['REQUEST_URI'], '?')
+            ) {
+                $GLOBALS['REQUEST_URI'] .= '?' . $_SERVER['QUERY_STRING'];
+            }
+        }
+    }
+
+    // Et nettoyer l'url
+    $GLOBALS['REQUEST_URI'] = (filter_var($GLOBALS['REQUEST_URI'], FILTER_SANITIZE_URL) ?: '');
+
+    $url[$profondeur] = url_de_($http, $host, $GLOBALS['REQUEST_URI'], $profondeur);
+
+    return $url[$profondeur];
 }
 
 /**
@@ -589,26 +588,26 @@ 
  * @return string
  */
 function url_de_($http, $host, $request, $prof = 0) {
-	$prof = max($prof, 0);
-
-	$myself = ltrim($request, '/');
-	# supprimer la chaine de GET
-	[$myself] = explode('?', $myself);
-	// vieux mode HTTP qui envoie après le nom de la methode l'URL compléte
-	// protocole, "://", nom du serveur avant le path dans _SERVER["REQUEST_URI"]
-	if (str_contains($myself, '://')) {
-		$myself = explode('://', $myself);
-		array_shift($myself);
-		$myself = implode('://', $myself);
-		$myself = explode('/', $myself);
-		array_shift($myself);
-		$myself = implode('/', $myself);
-	}
-	$url = join('/', array_slice(explode('/', $myself), 0, -1 - $prof)) . '/';
-
-	$url = $http . '://' . rtrim($host, '/') . '/' . ltrim($url, '/');
-
-	return $url;
+    $prof = max($prof, 0);
+
+    $myself = ltrim($request, '/');
+    # supprimer la chaine de GET
+    [$myself] = explode('?', $myself);
+    // vieux mode HTTP qui envoie après le nom de la methode l'URL compléte
+    // protocole, "://", nom du serveur avant le path dans _SERVER["REQUEST_URI"]
+    if (str_contains($myself, '://')) {
+        $myself = explode('://', $myself);
+        array_shift($myself);
+        $myself = implode('://', $myself);
+        $myself = explode('/', $myself);
+        array_shift($myself);
+        $myself = implode('/', $myself);
+    }
+    $url = join('/', array_slice(explode('/', $myself), 0, -1 - $prof)) . '/';
+
+    $url = $http . '://' . rtrim($host, '/') . '/' . ltrim($url, '/');
+
+    return $url;
 }
 
 
@@ -643,26 +642,26 @@ 
  * @return string URL
  **/
 function generer_url_ecrire(?string $script = '', $args = '', $no_entities = false, $rel = false) {
-	$script ??= '';
-	if (!$rel) {
-		$rel = url_de_base() . _DIR_RESTREINT_ABS . _SPIP_ECRIRE_SCRIPT;
-	} else {
-		if (!is_string($rel)) {
-			$rel = _DIR_RESTREINT ?: './' . _SPIP_ECRIRE_SCRIPT;
-		}
-	}
-
-	[$script, $ancre] = array_pad(explode('#', $script), 2, null);
-	if ($script && ($script <> 'accueil' || $rel)) {
-		$args = "?exec=$script" . (!$args ? '' : "&$args");
-	} elseif ($args) {
-		$args = "?$args";
-	}
-	if ($ancre) {
-		$args .= "#$ancre";
-	}
-
-	return $rel . ($no_entities ? $args : str_replace('&', '&amp;', $args));
+    $script ??= '';
+    if (!$rel) {
+        $rel = url_de_base() . _DIR_RESTREINT_ABS . _SPIP_ECRIRE_SCRIPT;
+    } else {
+        if (!is_string($rel)) {
+            $rel = _DIR_RESTREINT ?: './' . _SPIP_ECRIRE_SCRIPT;
+        }
+    }
+
+    [$script, $ancre] = array_pad(explode('#', $script), 2, null);
+    if ($script && ($script <> 'accueil' || $rel)) {
+        $args = "?exec=$script" . (!$args ? '' : "&$args");
+    } elseif ($args) {
+        $args = "?$args";
+    }
+    if ($ancre) {
+        $args .= "#$ancre";
+    }
+
+    return $rel . ($no_entities ? $args : str_replace('&', '&amp;', $args));
 }
 
 //
@@ -684,15 +683,15 @@ 
  *     Nom du fichier (constante _SPIP_SCRIPT), sinon nom par défaut
  **/
 function get_spip_script($default = '') {
-	if (!defined('_SPIP_SCRIPT')) {
-		return 'spip.php';
-	}
-	# cas define('_SPIP_SCRIPT', '');
-	if (_SPIP_SCRIPT) {
-		return _SPIP_SCRIPT;
-	} else {
-		return $default;
-	}
+    if (!defined('_SPIP_SCRIPT')) {
+        return 'spip.php';
+    }
+    # cas define('_SPIP_SCRIPT', '');
+    if (_SPIP_SCRIPT) {
+        return _SPIP_SCRIPT;
+    } else {
+        return $default;
+    }
 }
 
 /**
@@ -721,45 +720,45 @@ 
  * @return string URL
  **/
 function generer_url_public($script = '', $args = '', $no_entities = false, $rel = true, $action = '') {
-	// si le script est une action (spip_pass, spip_inscription),
-	// standardiser vers la nouvelle API
-
-	if (is_array($args)) {
-		$args = http_build_query($args);
-	}
-
-	$url = '';
-	if ($f = charger_fonction_url('page')) {
-		$url = $f($script, $args);
-		if ($url && !$rel) {
-			include_spip('inc/filtres_mini');
-			$url = url_absolue($url);
-		}
-	}
-	if (!$url) {
-		if (!$action) {
-			$action = get_spip_script();
-		}
-		if ($script) {
-			$action = parametre_url($action, _SPIP_PAGE, $script, '&');
-		}
-		if ($args) {
-			$action .= (str_contains($action, '?') ? '&' : '?') . $args;
-		}
-		// ne pas generer une url avec /./?page= en cas d'url absolue et de _SPIP_SCRIPT vide
-		$url = ($rel ? _DIR_RACINE . $action : rtrim(url_de_base(), '/') . preg_replace(',^/[.]/,', '/', "/$action"));
-	}
-
-	if (!$no_entities) {
-		$url = quote_amp($url);
-	}
-
-	return $url;
+    // si le script est une action (spip_pass, spip_inscription),
+    // standardiser vers la nouvelle API
+
+    if (is_array($args)) {
+        $args = http_build_query($args);
+    }
+
+    $url = '';
+    if ($f = charger_fonction_url('page')) {
+        $url = $f($script, $args);
+        if ($url && !$rel) {
+            include_spip('inc/filtres_mini');
+            $url = url_absolue($url);
+        }
+    }
+    if (!$url) {
+        if (!$action) {
+            $action = get_spip_script();
+        }
+        if ($script) {
+            $action = parametre_url($action, _SPIP_PAGE, $script, '&');
+        }
+        if ($args) {
+            $action .= (str_contains($action, '?') ? '&' : '?') . $args;
+        }
+        // ne pas generer une url avec /./?page= en cas d'url absolue et de _SPIP_SCRIPT vide
+        $url = ($rel ? _DIR_RACINE . $action : rtrim(url_de_base(), '/') . preg_replace(',^/[.]/,', '/', "/$action"));
+    }
+
+    if (!$no_entities) {
+        $url = quote_amp($url);
+    }
+
+    return $url;
 }
 
 function generer_url_prive($script, $args = '', $no_entities = false) {
 
-	return generer_url_public($script, $args, $no_entities, false, _DIR_RESTREINT_ABS . 'prive.php');
+    return generer_url_public($script, $args, $no_entities, false, _DIR_RESTREINT_ABS . 'prive.php');
 }
 
 
@@ -779,22 +778,22 @@ 
  *     URL
  */
 function generer_url_action($script, $args = '', $no_entities = false, $public = false) {
-	// si l'on est dans l'espace prive, on garde dans l'url
-	// l'exec a l'origine de l'action, qui permet de savoir si il est necessaire
-	// ou non de proceder a l'authentification (cas typique de l'install par exemple)
-	$url = (_DIR_RACINE && !$public)
-		? generer_url_ecrire(_request('exec'))
-		: generer_url_public('', '', false, false);
-	$url = parametre_url($url, 'action', $script);
-	if ($args) {
-		$url .= quote_amp('&' . $args);
-	}
-
-	if ($no_entities) {
-		$url = str_replace('&amp;', '&', $url);
-	}
-
-	return $url;
+    // si l'on est dans l'espace prive, on garde dans l'url
+    // l'exec a l'origine de l'action, qui permet de savoir si il est necessaire
+    // ou non de proceder a l'authentification (cas typique de l'install par exemple)
+    $url = (_DIR_RACINE && !$public)
+        ? generer_url_ecrire(_request('exec'))
+        : generer_url_public('', '', false, false);
+    $url = parametre_url($url, 'action', $script);
+    if ($args) {
+        $url .= quote_amp('&' . $args);
+    }
+
+    if ($no_entities) {
+        $url = str_replace('&amp;', '&', $url);
+    }
+
+    return $url;
 }
 
 
@@ -813,21 +812,21 @@ 
  *     URL
  */
 function generer_url_api(string $script, string $path, string $args, bool $no_entities = false, ?bool $public = null) {
-	if (is_null($public)) {
-		$public = (_DIR_RACINE ? false : true);
-	}
-	if (!str_ends_with($script, '.api')) {
-		$script .= '.api';
-	}
-	$url =
-		(($public ? _DIR_RACINE : _DIR_RESTREINT) ?: './')
-	. $script . '/'
-	. ($path ? trim($path, '/') : '')
-	. ($args ? '?' . quote_amp($args) : '');
-
-	if ($no_entities) {
-		$url = str_replace('&amp;', '&', $url);
-	}
-
-	return $url;
+    if (is_null($public)) {
+        $public = (_DIR_RACINE ? false : true);
+    }
+    if (!str_ends_with($script, '.api')) {
+        $script .= '.api';
+    }
+    $url =
+        (($public ? _DIR_RACINE : _DIR_RESTREINT) ?: './')
+    . $script . '/'
+    . ($path ? trim($path, '/') : '')
+    . ($args ? '?' . quote_amp($args) : '');
+
+    if ($no_entities) {
+        $url = str_replace('&amp;', '&', $url);
+    }
+
+    return $url;
 }

Spacing +26 added lines, -26 removed lines

@@ -85,7 +85,7 @@ 
 	foreach ($regexp as $r => $e) {
 		$regexp[$r] = str_replace('[]', '\[\]', preg_replace(',[^\w\d\[\]-],', '', $e));
 	}
-	$regexp = ',^(' . implode('|', $regexp) . '[[]?[]]?)(=.*)?$,';
+	$regexp = ',^('.implode('|', $regexp).'[[]?[]]?)(=.*)?$,';
 	$ajouts = array_flip(explode('|', $c));
 	$u = is_array($v) ? $v : rawurlencode((string) $v);
 	$testv = (is_array($v) ? count($v) : strlen((string) $v));
@@ -112,7 +112,7 @@ 
 			// Ajout. Pour une variable, remplacer au meme endroit,
 			// pour un tableau ce sera fait dans la prochaine boucle
 			elseif (!str_ends_with($r[1], '[]')) {
-				$url[$n] = $r[1] . '=' . $u;
+				$url[$n] = $r[1].'='.$u;
 				unset($ajouts[$r[1]]);
 			}
 			// Pour les tableaux on laisse tomber les valeurs de
@@ -133,11 +133,11 @@ 
 	} elseif ($testv) {
 		foreach ($ajouts as $k => $n) {
 			if (!is_array($v)) {
-				$url[] = $k . '=' . $u;
+				$url[] = $k.'='.$u;
 			} else {
-				$id = (str_ends_with($k, '[]')) ? $k : ($k . '[]');
+				$id = (str_ends_with($k, '[]')) ? $k : ($k.'[]');
 				foreach ($v as $w) {
-					$url[] = $id . '=' . (is_array($w) ? 'Array' : rawurlencode($w));
+					$url[] = $id.'='.(is_array($w) ? 'Array' : rawurlencode($w));
 				}
 			}
 		}
@@ -148,10 +148,10 @@ 
 
 	// recomposer l'adresse
 	if ($url) {
-		$a .= '?' . join($sep, $url);
+		$a .= '?'.join($sep, $url);
 	}
 
-	return $a . $ancre;
+	return $a.$ancre;
 }
 
 /**
@@ -181,7 +181,7 @@ 
 			translitteration($ancre)
 		);
 	}
-	return $url . (strlen($ancre) ? '#' . $ancre : '');
+	return $url.(strlen($ancre) ? '#'.$ancre : '');
 }
 
 /**
@@ -226,7 +226,7 @@ 
 			if (str_starts_with($var, '^')) {
 				$var = substr($var, 1);
 			} else {
-				$var = '[^=&]*' . $var;
+				$var = '[^=&]*'.$var;
 			}
 			if (str_ends_with($var, '$')) {
 				$var = substr($var, 0, -1);
@@ -234,7 +234,7 @@ 
 				$var .= '[^=&]*';
 			}
 		}
-		$preg_nettoyer = ',([?&])(' . implode('|', $preg_nettoyer_vars) . ')=[^&]*(&|$),i';
+		$preg_nettoyer = ',([?&])('.implode('|', $preg_nettoyer_vars).')=[^&]*(&|$),i';
 	}
 	if (empty($request_uri)) {
 		return $request_uri;
@@ -364,7 +364,7 @@ 
 	}
 
 	// On a ete gentil mais la ....
-	spip_logger()->error("generer_objet_url: entite $entite " . ($public ? "($f)" : '') . " inconnue $type $public $connect");
+	spip_logger()->error("generer_objet_url: entite $entite ".($public ? "($f)" : '')." inconnue $type $public $connect");
 
 	return '';
 }
@@ -415,8 +415,8 @@ 
 	include_spip('base/connect_sql');
 	$id_type = id_table_objet($entite, $public);
 
-	return _DIR_RACINE . get_spip_script('./')
-	. '?' . _SPIP_PAGE . "=$entite&$id_type=$i&connect=$public"
+	return _DIR_RACINE.get_spip_script('./')
+	. '?'._SPIP_PAGE."=$entite&$id_type=$i&connect=$public"
 	. (!$args ? '' : "&$args")
 	. (!$ancre ? '' : "#$ancre");
 }
@@ -566,7 +566,7 @@ 
 				!empty($_SERVER['QUERY_STRING'])
 				&& !str_contains($_SERVER['REQUEST_URI'], '?')
 			) {
-				$GLOBALS['REQUEST_URI'] .= '?' . $_SERVER['QUERY_STRING'];
+				$GLOBALS['REQUEST_URI'] .= '?'.$_SERVER['QUERY_STRING'];
 			}
 		}
 	}
@@ -604,9 +604,9 @@ 
 		array_shift($myself);
 		$myself = implode('/', $myself);
 	}
-	$url = join('/', array_slice(explode('/', $myself), 0, -1 - $prof)) . '/';
+	$url = join('/', array_slice(explode('/', $myself), 0, -1 - $prof)).'/';
 
-	$url = $http . '://' . rtrim($host, '/') . '/' . ltrim($url, '/');
+	$url = $http.'://'.rtrim($host, '/').'/'.ltrim($url, '/');
 
 	return $url;
 }
@@ -645,16 +645,16 @@ 
 function generer_url_ecrire(?string $script = '', $args = '', $no_entities = false, $rel = false) {
 	$script ??= '';
 	if (!$rel) {
-		$rel = url_de_base() . _DIR_RESTREINT_ABS . _SPIP_ECRIRE_SCRIPT;
+		$rel = url_de_base()._DIR_RESTREINT_ABS._SPIP_ECRIRE_SCRIPT;
 	} else {
 		if (!is_string($rel)) {
-			$rel = _DIR_RESTREINT ?: './' . _SPIP_ECRIRE_SCRIPT;
+			$rel = _DIR_RESTREINT ?: './'._SPIP_ECRIRE_SCRIPT;
 		}
 	}
 
 	[$script, $ancre] = array_pad(explode('#', $script), 2, null);
 	if ($script && ($script <> 'accueil' || $rel)) {
-		$args = "?exec=$script" . (!$args ? '' : "&$args");
+		$args = "?exec=$script".(!$args ? '' : "&$args");
 	} elseif ($args) {
 		$args = "?$args";
 	}
@@ -662,7 +662,7 @@ 
 		$args .= "#$ancre";
 	}
 
-	return $rel . ($no_entities ? $args : str_replace('&', '&amp;', $args));
+	return $rel.($no_entities ? $args : str_replace('&', '&amp;', $args));
 }
 
 //
@@ -744,10 +744,10 @@ 
 			$action = parametre_url($action, _SPIP_PAGE, $script, '&');
 		}
 		if ($args) {
-			$action .= (str_contains($action, '?') ? '&' : '?') . $args;
+			$action .= (str_contains($action, '?') ? '&' : '?').$args;
 		}
 		// ne pas generer une url avec /./?page= en cas d'url absolue et de _SPIP_SCRIPT vide
-		$url = ($rel ? _DIR_RACINE . $action : rtrim(url_de_base(), '/') . preg_replace(',^/[.]/,', '/', "/$action"));
+		$url = ($rel ? _DIR_RACINE . $action : rtrim(url_de_base(), '/').preg_replace(',^/[.]/,', '/', "/$action"));
 	}
 
 	if (!$no_entities) {
@@ -759,7 +759,7 @@ 
 
 function generer_url_prive($script, $args = '', $no_entities = false) {
 
-	return generer_url_public($script, $args, $no_entities, false, _DIR_RESTREINT_ABS . 'prive.php');
+	return generer_url_public($script, $args, $no_entities, false, _DIR_RESTREINT_ABS.'prive.php');
 }
 
 
@@ -787,7 +787,7 @@ 
 		: generer_url_public('', '', false, false);
 	$url = parametre_url($url, 'action', $script);
 	if ($args) {
-		$url .= quote_amp('&' . $args);
+		$url .= quote_amp('&'.$args);
 	}
 
 	if ($no_entities) {
@@ -821,9 +821,9 @@ 
 	}
 	$url =
 		(($public ? _DIR_RACINE : _DIR_RESTREINT) ?: './')
-	. $script . '/'
+	. $script.'/'
 	. ($path ? trim($path, '/') : '')
-	. ($args ? '?' . quote_amp($args) : '');
+	. ($args ? '?'.quote_amp($args) : '');
 
 	if ($no_entities) {
 		$url = str_replace('&amp;', '&', $url);

ecrire/genie/optimiser.php

Indentation +112 added lines, -112 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,29 +85,29 @@ 
  **/
 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);
-	}
-
-	$logger = spip_logger('genie');
-	$logger->debug('optimiser_base_une_table ' . json_encode($tables, JSON_THROW_ON_ERROR));
-	if ($tables) {
-		$table_op = (int) (lire_config('optimiser_table', 0) + 1) % count($tables);
-		ecrire_config('optimiser_table', $table_op);
-		$q = $tables[$table_op];
-		$logger->debug("optimiser_base_une_table : debut d'optimisation de la table $q");
-		if (sql_optimize($q)) {
-			$logger->debug("optimiser_base_une_table : fin d'optimisation de la table $q");
-		} else {
-			$logger->debug("optimiser_base_une_table : Pas d'optimiseur necessaire");
-		}
-	}
+    $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);
+    }
+
+    $logger = spip_logger('genie');
+    $logger->debug('optimiser_base_une_table ' . json_encode($tables, JSON_THROW_ON_ERROR));
+    if ($tables) {
+        $table_op = (int) (lire_config('optimiser_table', 0) + 1) % count($tables);
+        ecrire_config('optimiser_table', $table_op);
+        $q = $tables[$table_op];
+        $logger->debug("optimiser_base_une_table : debut d'optimisation de la table $q");
+        if (sql_optimize($q)) {
+            $logger->debug("optimiser_base_une_table : fin d'optimisation de la table $q");
+        } else {
+            $logger->debug("optimiser_base_une_table : Pas d'optimiseur necessaire");
+        }
+    }
 }
 
 
@@ -133,18 +133,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_logger('genie')->debug("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)));
-	}
-
-	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_logger('genie')->debug("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)));
+    }
+
+    return count($in);
 }
 
 
@@ -166,81 +166,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_logger('genie')->debug("optimiser_base_disparus : {$n} lien(s) mort(s)");
+    );
+
+    $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_logger('genie')->debug("optimiser_base_disparus : {$n} lien(s) mort(s)");
 }

Spacing +5 added lines, -5 removed lines

@@ -50,7 +50,7 @@ 
  */
 function optimiser_caches_contextes() {
 	sous_repertoire(_DIR_CACHE, 'contextes');
-	if (is_dir($d = _DIR_CACHE . 'contextes')) {
+	if (is_dir($d = _DIR_CACHE.'contextes')) {
 		include_spip('inc/invalideur');
 		purger_repertoire($d, ['mtime' => time() - 48 * 3600, 'limit' => 10000]);
 	}
@@ -96,7 +96,7 @@ 
 	}
 
 	$logger = spip_logger('genie');
-	$logger->debug('optimiser_base_une_table ' . json_encode($tables, JSON_THROW_ON_ERROR));
+	$logger->debug('optimiser_base_une_table '.json_encode($tables, JSON_THROW_ON_ERROR));
 	if ($tables) {
 		$table_op = (int) (lire_config('optimiser_table', 0) + 1) % count($tables);
 		ecrire_config('optimiser_table', $table_op);
@@ -140,8 +140,8 @@ 
 	sql_free($sel);
 
 	if ($in) {
-		sql_delete($table, sql_in($id, array_keys($in)) . ($and ? " AND $and" : ''));
-		spip_logger('genie')->debug("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)));
+		sql_delete($table, sql_in($id, array_keys($in)).($and ? " AND $and" : ''));
+		spip_logger('genie')->debug("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: ".implode(', ', array_keys($in)));
 	}
 
 	return count($in);
@@ -221,7 +221,7 @@ 
 	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)));
+	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

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_logger('verifie_maj')->info('Verification version SPIP : ' . ($maj ?: 'version a jour'));
+    spip_logger('verifie_maj')->info('Verification version SPIP : ' . ($maj ?: 'version a jour'));
 
-	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_logger('verifie_maj')->info('Failed to parse Json data : ' . $e->getMessage());
-		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_logger('verifie_maj')->info('Failed to parse Json data : ' . $e->getMessage());
+        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;
 }

Spacing +10 added lines, -10 removed lines

@@ -28,11 +28,11 @@ 
 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');
+	ecrire_meta('info_maj_spip', $maj ? ($GLOBALS['spip_version_branche']."|$maj") : '', 'non');
 
 	mise_a_jour_ecran_securite();
 
-	spip_logger('verifie_maj')->info('Verification version SPIP : ' . ($maj ?: 'version a jour'));
+	spip_logger('verifie_maj')->info('Verification version SPIP : '.($maj ?: 'version a jour'));
 
 	return 1;
 }
@@ -57,7 +57,7 @@ 
 	// si l'ecran n'est pas deja present ou pas updatable, sortir
 	if (
 		!_URL_ECRAN_SECURITE
-		|| !file_exists($filename = _DIR_ETC . 'ecran_securite.php')
+		|| !file_exists($filename = _DIR_ETC.'ecran_securite.php')
 		|| !is_writable($filename)
 		|| !($last_modified = filemtime($filename))
 		|| !($md5 = md5_file($filename))
@@ -66,7 +66,7 @@ 
 	}
 
 	include_spip('inc/distant');
-	$tmp_file = _DIR_TMP . 'ecran_securite.php';
+	$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, [
@@ -85,7 +85,7 @@ 
 			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));
+			@copy($filename, $filename.'-bck-'.date('Y-m-d-His', $last_modified));
 			@rename($tmp_file, $filename);
 		} else {
 			@unlink($tmp_file);
@@ -127,7 +127,7 @@ 
 		$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>';
+	return '<a class="info_maj_spip" href="https://www.spip.net/fr_update" title="'.$maj['mineure'].'">'.implode(' | ', $message).'</a>';
 }
 
 /**
@@ -144,7 +144,7 @@ 
 function info_maj_cache(): ?array {
 	$contenu = '';
 	$options = [];
-	$nom = _DIR_CACHE . _VERSIONS_LISTE;
+	$nom = _DIR_CACHE._VERSIONS_LISTE;
 	if (file_exists($nom)) {
 		$contenu = file_get_contents($nom);
 		$options['if_modified_since'] = filemtime($nom);
@@ -165,7 +165,7 @@ 
 	try {
 		$json = json_decode((string) $contenu, true, 512, JSON_THROW_ON_ERROR);
 	} catch (JsonException $e) {
-		spip_logger('verifie_maj')->info('Failed to parse Json data : ' . $e->getMessage());
+		spip_logger('verifie_maj')->info('Failed to parse Json data : '.$e->getMessage());
 		return null;
 	}
 
@@ -197,8 +197,8 @@ 
 
 	foreach ($versions as $v) {
 		[$maj2, $min2, $rev2] = explode('.', $v);
-		$branche_maj = $maj2 . '.' . $min2;
-		$version_maj = $maj2 . '.' . $min2 . '.' . $rev2;
+		$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 (

ecrire/genie/maintenance.php

Indentation +50 added lines, -50 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,34 +63,34 @@ 
  *     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));
-			$logger = spip_logger('err');
-			$logger->info('crash des tables');
-			$logger->info($crash);
-		} 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));
+            $logger = spip_logger('err');
+            $logger->info('crash des tables');
+            $logger->info($crash);
+        } else {
+            effacer_meta('message_crash_tables');
+        }
 
-		return $crash;
-	}
+        return $crash;
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -106,16 +106,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_logger()->info("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_logger()->info("mail nouveautes : rien de neuf depuis $jours_neuf jours");
+    }
 
-	return 1;
+    return 1;
 }

ecrire/balise/id_logo_.php

Indentation +51 added lines, -51 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -48,38 +48,38 @@ 
  */
 function balise_ID_LOGO__dist($p) {
 
-	preg_match(',^ID_LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
-	$type = strtolower($regs[1]);
-	$suite_logo = $regs[2];
-
-	// cas de #ID_LOGO_SITE_SPIP
-	if ($type == 'site_spip') {
-		$type = 'site';
-		$_id_objet = "\"'0'\"";
-	}
-
-	$id_objet = id_table_objet($type);
-	if (!isset($_id_objet)) {
-		$_id_objet = champ_sql($id_objet, $p);
-	}
-
-	$connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
-	if ($type == 'document') {
-		$qconnect = _q($connect);
-		$doc = "quete_document($_id_objet, $qconnect)";
-		$code = "table_valeur($doc, 'id_vignette')";
-	} elseif ($connect) {
-		$code = "''";
-		spip_logger()->info('Les logos distants ne sont pas prevus');
-	} else {
-		$champ_logo = 'id';
-		$code = generer_code_logo($id_objet, $_id_objet, $type, '', "''", $p, $suite_logo, $champ_logo);
-	}
-
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    preg_match(',^ID_LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
+    $type = strtolower($regs[1]);
+    $suite_logo = $regs[2];
+
+    // cas de #ID_LOGO_SITE_SPIP
+    if ($type == 'site_spip') {
+        $type = 'site';
+        $_id_objet = "\"'0'\"";
+    }
+
+    $id_objet = id_table_objet($type);
+    if (!isset($_id_objet)) {
+        $_id_objet = champ_sql($id_objet, $p);
+    }
+
+    $connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
+    if ($type == 'document') {
+        $qconnect = _q($connect);
+        $doc = "quete_document($_id_objet, $qconnect)";
+        $code = "table_valeur($doc, 'id_vignette')";
+    } elseif ($connect) {
+        $code = "''";
+        spip_logger()->info('Les logos distants ne sont pas prevus');
+    } else {
+        $champ_logo = 'id';
+        $code = generer_code_logo($id_objet, $_id_objet, $type, '', "''", $p, $suite_logo, $champ_logo);
+    }
+
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 /**
@@ -108,28 +108,28 @@ 
  *     Code compilé retournant le chemin du logo ou le code HTML du logo.
  **/
 function generer_code_logo($id_objet, $_id_objet, $type, $align, $_lien, $p, $suite, string $champ = ''): string {
-	$onoff = 'ON';
-	$_id_rubrique = "''";
+    $onoff = 'ON';
+    $_id_rubrique = "''";
 
-	if ($type === 'rubrique') {
-		$_id_rubrique = "quete_parent($_id_objet)";
-	}
+    if ($type === 'rubrique') {
+        $_id_rubrique = "quete_parent($_id_objet)";
+    }
 
-	if ($suite === '_SURVOL') {
-		$onoff = 'off';
-	} elseif ($suite === '_NORMAL') {
-		$onoff = 'on';
-	} elseif ($suite === '_RUBRIQUE') {
-		$_id_rubrique = champ_sql('id_rubrique', $p);
-	}
+    if ($suite === '_SURVOL') {
+        $onoff = 'off';
+    } elseif ($suite === '_NORMAL') {
+        $onoff = 'on';
+    } elseif ($suite === '_RUBRIQUE') {
+        $_id_rubrique = champ_sql('id_rubrique', $p);
+    }
 
-	$code = "quete_logo('$id_objet', '$onoff', $_id_objet, $_id_rubrique)";
+    $code = "quete_logo('$id_objet', '$onoff', $_id_objet, $_id_rubrique)";
 
-	if ($champ) {
-		return "table_valeur($code, '" . addslashes($champ) . "')";
-	}
+    if ($champ) {
+        return "table_valeur($code, '" . addslashes($champ) . "')";
+    }
 
-	$align = preg_replace(',\W,', '', $align);
+    $align = preg_replace(',\W,', '', $align);
 
-	return "quete_html_logo($code, '$align', " . ($_lien ?: "''") . ')';
+    return "quete_html_logo($code, '$align', " . ($_lien ?: "''") . ')';
 }

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_logger()->info("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args");
-
-	#$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_logger()->info("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args");
+
+    #$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;
 }

Spacing +11 added lines, -11 removed lines

@@ -74,7 +74,7 @@ 
 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)) {
+		if (function_exists($f = 'generer_generer_url_'.$s)) {
 			return $f($type, $_id, $s);
 		}
 		if (!$GLOBALS['connexions'][strtolower((string) $s)]['spip_connect_version']) {
@@ -84,8 +84,8 @@ 
 		# 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_meta('adresse_site', $s) . '/' .\n\t".
+				"quete_meta('dir_img', $s) . \n\t".
 				"quete_fichier($_id,$s)";
 		}
 		$s = ", '', '', $s, quete_meta('type_urls', $s)";
@@ -225,7 +225,7 @@ 
  */
 function balise_URL_SITE_SPIP_dist($p) {
 	$p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
-	$p->code = 'spip_htmlspecialchars(' . $p->code . ')';
+	$p->code = 'spip_htmlspecialchars('.$p->code.')';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -266,7 +266,7 @@ 
 	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 (function_exists($f = 'generer_generer_url_'.$s)) {
 			if ($args && $args !== "''") {
 				$code .= ", $args";
 			}
@@ -274,7 +274,7 @@ 
 			$p->code = $code;
 			return $p;
 		}
-		$s = 'connect=' . addslashes((string) $s);
+		$s = 'connect='.addslashes((string) $s);
 		$args = (($args && $args !== "''") ? "$args . '&$s'" : "'$s'");
 	}
 
@@ -289,7 +289,7 @@ 
 		$code = "generer_url_public($code, $args$noentities)";
 	}
 	$p->code = $code;
-	spip_logger()->info("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args");
+	spip_logger()->info("Calcul url page : connect vaut $s ca donne :".$p->code." args $args");
 
 	#$p->interdire_scripts = true;
 	return $p;
@@ -333,7 +333,7 @@ 
 			$fonc .= ",$args$noentities";
 		}
 	}
-	$p->code = 'generer_url_ecrire(' . $fonc . ')';
+	$p->code = 'generer_url_ecrire('.$fonc.')';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -368,17 +368,17 @@ 
 
 	$args = interprete_argument_balise(2, $p);
 	if ($args != "''" && $args !== null) {
-		$p->code .= ',' . $args;
+		$p->code .= ','.$args;
 	}
 	$redirect = interprete_argument_balise(3, $p);
 	if ($redirect != "''" && $redirect !== null) {
 		if ($args == "''" || $args === null) {
 			$p->code .= ",''";
 		}
-		$p->code .= ',' . $redirect;
+		$p->code .= ','.$redirect;
 	}
 
-	$p->code = 'generer_action_auteur(' . $p->code . ')';
+	$p->code = 'generer_action_auteur('.$p->code.')';
 	$p->interdire_scripts = false;
 
 	return $p;

ecrire/balise/logo_.php

Indentation +85 added lines, -85 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -55,88 +55,88 @@ 
  */
 function balise_LOGO__dist($p) {
 
-	preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
-	$type = strtolower($regs[1]);
-	$suite_logo = $regs[2];
-
-	// cas de #LOGO_SITE_SPIP
-	if ($type == 'site_spip') {
-		$type = 'site';
-		$_id_objet = "\"'0'\"";
-	}
-
-	$id_objet = id_table_objet($type);
-	if (!isset($_id_objet)) {
-		$_id_objet = champ_sql($id_objet, $p);
-	}
-
-	$fichier = ($p->etoile === '**') ? -1 : 0;
-	$coord = [];
-	$align = $lien = '';
-	$mode_logo = '';
-
-	if ($p->param && !$p->param[0][0]) {
-		$params = $p->param[0];
-		array_shift($params);
-		foreach ($params as $a) {
-			if ($a[0]->type === 'texte') {
-				$n = $a[0]->texte;
-				if (is_numeric($n)) {
-					$coord[] = $n;
-				} elseif (in_array($n, ['top', 'left', 'right', 'center', 'bottom'])) {
-					$align = $n;
-				} elseif (in_array($n, ['auto', 'icone', 'apercu', 'vignette'])) {
-					$mode_logo = $n;
-				}
-			} else {
-				$lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
-			}
-		}
-	}
-
-	$coord_x = $coord ? (int) array_shift($coord) : 0;
-	$coord_y = $coord ? (int) array_shift($coord) : 0;
-
-	if ($p->etoile === '*') {
-		include_spip('balise/url_');
-		$lien = generer_generer_url_arg($type, $p, $_id_objet);
-	}
-
-	$connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
-	if ($type == 'document') {
-		$qconnect = _q($connect);
-		$doc = "quete_document($_id_objet, $qconnect)";
-		if ($fichier) {
-			$code = "quete_logo_file($doc, $qconnect)";
-		} else {
-			$code = "quete_logo_document($doc, " . ($lien ?: "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
-		}
-		// (x=non-faux ? y : '') pour affecter x en retournant y
-		if ($p->descr['documents']) {
-			$code = '(($doublons["documents"] .= ",". '
-				. $_id_objet
-				. ") ? $code : '')";
-		}
-	} elseif ($connect) {
-		$code = "''";
-		spip_logger()->info('Les logos distants ne sont pas prevus');
-	} else {
-		// pour generer_code_logo
-		include_spip('balise/id_logo_');
-		$champ_logo = '';
-		if ($fichier) {
-			$champ_logo = 'fichier';
-		}
-		$code = generer_code_logo($id_objet, $_id_objet, $type, $align, $lien, $p, $suite_logo, $champ_logo);
-	}
-
-	// demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
-	if ($coord_x || $coord_y) {
-		$code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
-	}
-
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
+    $type = strtolower($regs[1]);
+    $suite_logo = $regs[2];
+
+    // cas de #LOGO_SITE_SPIP
+    if ($type == 'site_spip') {
+        $type = 'site';
+        $_id_objet = "\"'0'\"";
+    }
+
+    $id_objet = id_table_objet($type);
+    if (!isset($_id_objet)) {
+        $_id_objet = champ_sql($id_objet, $p);
+    }
+
+    $fichier = ($p->etoile === '**') ? -1 : 0;
+    $coord = [];
+    $align = $lien = '';
+    $mode_logo = '';
+
+    if ($p->param && !$p->param[0][0]) {
+        $params = $p->param[0];
+        array_shift($params);
+        foreach ($params as $a) {
+            if ($a[0]->type === 'texte') {
+                $n = $a[0]->texte;
+                if (is_numeric($n)) {
+                    $coord[] = $n;
+                } elseif (in_array($n, ['top', 'left', 'right', 'center', 'bottom'])) {
+                    $align = $n;
+                } elseif (in_array($n, ['auto', 'icone', 'apercu', 'vignette'])) {
+                    $mode_logo = $n;
+                }
+            } else {
+                $lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
+            }
+        }
+    }
+
+    $coord_x = $coord ? (int) array_shift($coord) : 0;
+    $coord_y = $coord ? (int) array_shift($coord) : 0;
+
+    if ($p->etoile === '*') {
+        include_spip('balise/url_');
+        $lien = generer_generer_url_arg($type, $p, $_id_objet);
+    }
+
+    $connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
+    if ($type == 'document') {
+        $qconnect = _q($connect);
+        $doc = "quete_document($_id_objet, $qconnect)";
+        if ($fichier) {
+            $code = "quete_logo_file($doc, $qconnect)";
+        } else {
+            $code = "quete_logo_document($doc, " . ($lien ?: "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
+        }
+        // (x=non-faux ? y : '') pour affecter x en retournant y
+        if ($p->descr['documents']) {
+            $code = '(($doublons["documents"] .= ",". '
+                . $_id_objet
+                . ") ? $code : '')";
+        }
+    } elseif ($connect) {
+        $code = "''";
+        spip_logger()->info('Les logos distants ne sont pas prevus');
+    } else {
+        // pour generer_code_logo
+        include_spip('balise/id_logo_');
+        $champ_logo = '';
+        if ($fichier) {
+            $champ_logo = 'fichier';
+        }
+        $code = generer_code_logo($id_objet, $_id_objet, $type, $align, $lien, $p, $suite_logo, $champ_logo);
+    }
+
+    // demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
+    if ($coord_x || $coord_y) {
+        $code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
+    }
+
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }