spip / SPIP

ecrire/tests/Squelettes/Cache/data/squelettes/inc/maj_invalideurs.php

Indentation +13 added lines, -13 removed lines

@@ -8,19 +8,19 @@
  * @param string $cache_key
  * @param array $page
  */
- function inc_maj_invalideurs($cache_key, $page): void {
-	if (!isset($page['contexte']['assert_session'])) {
-		return;
-	}
+    function inc_maj_invalideurs($cache_key, $page): void {
+    if (!isset($page['contexte']['assert_session'])) {
+        return;
+    }
 
-	$expected_session = (bool) $page['contexte']['assert_session'];
-	$has_session = $page['invalideurs']['session'] ?? false;
+    $expected_session = (bool) $page['contexte']['assert_session'];
+    $has_session = $page['invalideurs']['session'] ?? false;
 
-	if ($expected_session) {
-		if (!$has_session) {
-			CacheSessionTest::addError('PAS de session', $page);
-		}
-	} elseif ($has_session) {
-		CacheSessionTest::addError(sprintf('SESSION %s', $has_session), $page);
-	}
+    if ($expected_session) {
+        if (!$has_session) {
+            CacheSessionTest::addError('PAS de session', $page);
+        }
+    } elseif ($has_session) {
+        CacheSessionTest::addError(sprintf('SESSION %s', $has_session), $page);
+    }
 }

ecrire/inc/invalideur.php

Indentation +127 added lines, -127 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/serial');
@@ -26,7 +26,7 @@ 
  * en droit de l'éliminer
  */
 if (!defined('_AGE_CACHE_ATIME')) {
-	define('_AGE_CACHE_ATIME', 3600);
+    define('_AGE_CACHE_ATIME', 3600);
 }
 
 
@@ -39,31 +39,31 @@ 
  * @return int Taille approximative en octets
  **/
 function taille_du_cache() {
-	# check dirs until we reach > 500 files
-	$t = 0;
-	$n = 0;
-	$time = $GLOBALS['meta']['cache_mark'] ?? 0;
-	for ($i = 0; $i < 256; $i++) {
-		$dir = _DIR_CACHE . sprintf('%02s', dechex($i));
-		if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
-			while (($f = readdir($d)) !== false) {
-				if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) && ($a = stat("$dir/$f"))) {
-					$n++;
-					if ($a['mtime'] >= $time) {
-						if ($a['blocks'] > 0) {
-							$t += 512 * $a['blocks'];
-						} else {
-							$t += $a['size'];
-						}
-					}
-				}
-			}
-		}
-		if ($n > 500) {
-			return (int) (256 * $t / (1 + $i));
-		}
-	}
-	return $t;
+    # check dirs until we reach > 500 files
+    $t = 0;
+    $n = 0;
+    $time = $GLOBALS['meta']['cache_mark'] ?? 0;
+    for ($i = 0; $i < 256; $i++) {
+        $dir = _DIR_CACHE . sprintf('%02s', dechex($i));
+        if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
+            while (($f = readdir($d)) !== false) {
+                if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) && ($a = stat("$dir/$f"))) {
+                    $n++;
+                    if ($a['mtime'] >= $time) {
+                        if ($a['blocks'] > 0) {
+                            $t += 512 * $a['blocks'];
+                        } else {
+                            $t += $a['size'];
+                        }
+                    }
+                }
+            }
+        }
+        if ($n > 500) {
+            return (int) (256 * $t / (1 + $i));
+        }
+    }
+    return $t;
 }
 
 
@@ -90,30 +90,30 @@ 
  *     Inutilisé
  **/
 function inc_suivre_invalideur_dist($cond, $modif = true) {
-	if (!$modif) {
-		return;
-	}
-
-	// determiner l'objet modifie : forum, article, etc
-	if (preg_match(',["\']([a-z_]+)[/"\'],', $cond, $r)) {
-		$objet = objet_type($r[1]);
-	}
-
-	// stocker la date_modif_$objet (ne sert a rien pour le moment)
-	if (isset($objet)) {
-		ecrire_meta('derniere_modif_' . $objet, time());
-	}
-
-	// si $derniere_modif_invalide est un array('article', 'rubrique')
-	// n'affecter la meta que si un de ces objets est modifie
-	if (is_array($GLOBALS['derniere_modif_invalide'])) {
-		if (in_array($objet, $GLOBALS['derniere_modif_invalide'])) {
-			ecrire_meta('derniere_modif', time());
-		}
-	} // sinon, cas standard, toujours affecter la meta
-	else {
-		ecrire_meta('derniere_modif', time());
-	}
+    if (!$modif) {
+        return;
+    }
+
+    // determiner l'objet modifie : forum, article, etc
+    if (preg_match(',["\']([a-z_]+)[/"\'],', $cond, $r)) {
+        $objet = objet_type($r[1]);
+    }
+
+    // stocker la date_modif_$objet (ne sert a rien pour le moment)
+    if (isset($objet)) {
+        ecrire_meta('derniere_modif_' . $objet, time());
+    }
+
+    // si $derniere_modif_invalide est un array('article', 'rubrique')
+    // n'affecter la meta que si un de ces objets est modifie
+    if (is_array($GLOBALS['derniere_modif_invalide'])) {
+        if (in_array($objet, $GLOBALS['derniere_modif_invalide'])) {
+            ecrire_meta('derniere_modif', time());
+        }
+    } // sinon, cas standard, toujours affecter la meta
+    else {
+        ecrire_meta('derniere_modif', time());
+    }
 }
 
 
@@ -138,56 +138,56 @@ 
  *     Nombre de fichiers supprimés
  **/
 function purger_repertoire($dir, $options = []) {
-	if (!is_dir($dir) || !is_readable($dir)) {
-		return 0;
-	}
-
-	// sur certains sites on veut absolument garder certains caches référencés dans un CDN
-	// on peut donc inhiber la purge de ces répertoires pour eviter tout probleme
-	if (file_exists(rtrim($dir, '/') . '/inhib_purger_repertoire.txt')) {
-		return 0;
-	}
-
-	$handle = opendir($dir);
-	if (!$handle) {
-		return 0;
-	}
-
-	$total = 0;
-
-	while (($fichier = @readdir($handle)) !== false) {
-		// Eviter ".", "..", ".htaccess", ".svn" etc & CACHEDIR.TAG
-		if ($fichier[0] == '.' || $fichier == 'CACHEDIR.TAG') {
-			continue;
-		}
-		$chemin = "$dir/$fichier";
-		if (is_file($chemin)) {
-			if (
-				(!isset($options['atime']) || @fileatime($chemin) < $options['atime']) && (!isset($options['mtime']) || @filemtime($chemin) < $options['mtime'])
-			) {
-				supprimer_fichier($chemin);
-				$total++;
-			}
-		} else {
-			if (is_dir($chemin)) {
-				$opts = $options;
-				if (isset($options['limit'])) {
-					$opts['limit'] = $options['limit'] - $total;
-				}
-				$total += purger_repertoire($chemin, $opts);
-				if (isset($options['subdir']) && $options['subdir']) {
-					spip_unlink($chemin);
-				}
-			}
-		}
-
-		if (isset($options['limit']) && $total >= $options['limit']) {
-			break;
-		}
-	}
-	closedir($handle);
-
-	return $total;
+    if (!is_dir($dir) || !is_readable($dir)) {
+        return 0;
+    }
+
+    // sur certains sites on veut absolument garder certains caches référencés dans un CDN
+    // on peut donc inhiber la purge de ces répertoires pour eviter tout probleme
+    if (file_exists(rtrim($dir, '/') . '/inhib_purger_repertoire.txt')) {
+        return 0;
+    }
+
+    $handle = opendir($dir);
+    if (!$handle) {
+        return 0;
+    }
+
+    $total = 0;
+
+    while (($fichier = @readdir($handle)) !== false) {
+        // Eviter ".", "..", ".htaccess", ".svn" etc & CACHEDIR.TAG
+        if ($fichier[0] == '.' || $fichier == 'CACHEDIR.TAG') {
+            continue;
+        }
+        $chemin = "$dir/$fichier";
+        if (is_file($chemin)) {
+            if (
+                (!isset($options['atime']) || @fileatime($chemin) < $options['atime']) && (!isset($options['mtime']) || @filemtime($chemin) < $options['mtime'])
+            ) {
+                supprimer_fichier($chemin);
+                $total++;
+            }
+        } else {
+            if (is_dir($chemin)) {
+                $opts = $options;
+                if (isset($options['limit'])) {
+                    $opts['limit'] = $options['limit'] - $total;
+                }
+                $total += purger_repertoire($chemin, $opts);
+                if (isset($options['subdir']) && $options['subdir']) {
+                    spip_unlink($chemin);
+                }
+            }
+        }
+
+        if (isset($options['limit']) && $total >= $options['limit']) {
+            break;
+        }
+    }
+    closedir($handle);
+
+    return $total;
 }
 
 
@@ -199,10 +199,10 @@ 
 // A priori dans cette version la fonction ne sera pas appelee, car
 // la meta est toujours false ; mais evitons un bug si elle est appellee
 function inc_retire_caches_dist($chemin = '') {
-	if (isset($GLOBALS['meta']['invalider_caches'])) {
-		# concurrence
-		effacer_meta('invalider_caches');
-	}
+    if (isset($GLOBALS['meta']['invalider_caches'])) {
+        # concurrence
+        effacer_meta('invalider_caches');
+    }
 }
 
 #######################################################################
@@ -213,9 +213,9 @@ 
 ##
 
 function retire_caches($chemin = '') {
-	if ($retire_caches = charger_fonction('retire_caches', 'inc', true)) {
-		return $retire_caches($chemin);
-	}
+    if ($retire_caches = charger_fonction('retire_caches', 'inc', true)) {
+        return $retire_caches($chemin);
+    }
 }
 
 
@@ -223,10 +223,10 @@ 
 // (note: si absente, n'est pas appellee)
 
 function calcul_invalideurs($corps, $primary, &$boucles, $id_boucle) {
-	if ($calcul_invalideurs = charger_fonction('calcul_invalideurs', 'inc', true)) {
-		return $calcul_invalideurs($corps, $primary, $boucles, $id_boucle);
-	}
-	return $corps;
+    if ($calcul_invalideurs = charger_fonction('calcul_invalideurs', 'inc', true)) {
+        return $calcul_invalideurs($corps, $primary, $boucles, $id_boucle);
+    }
+    return $corps;
 }
 
 
@@ -235,41 +235,41 @@ 
 // invoquee quand on vide tout le cache en bloc (action/purger)
 //
 function supprime_invalideurs() {
-	if ($supprime_invalideurs = charger_fonction('supprime_invalideurs', 'inc', true)) {
-		return $supprime_invalideurs();
-	}
+    if ($supprime_invalideurs = charger_fonction('supprime_invalideurs', 'inc', true)) {
+        return $supprime_invalideurs();
+    }
 }
 
 
 // Calcul des pages : noter dans la base les liens d'invalidation
 function maj_invalideurs($fichier, &$page) {
-	if ($maj_invalideurs = charger_fonction('maj_invalideurs', 'inc', true)) {
-		return $maj_invalideurs($fichier, $page);
-	}
+    if ($maj_invalideurs = charger_fonction('maj_invalideurs', 'inc', true)) {
+        return $maj_invalideurs($fichier, $page);
+    }
 }
 
 
 // les invalideurs sont de la forme "objet/id_objet"
 function insere_invalideur($inval, $fichier) {
-	if ($insere_invalideur = charger_fonction('insere_invalideur', 'inc', true)) {
-		return $insere_invalideur($inval, $fichier);
-	}
+    if ($insere_invalideur = charger_fonction('insere_invalideur', 'inc', true)) {
+        return $insere_invalideur($inval, $fichier);
+    }
 }
 
 //
 // Marquer les fichiers caches invalides comme etant a supprimer
 //
 function applique_invalideur($depart) {
-	if ($applique_invalideur = charger_fonction('applique_invalideur', 'inc', true)) {
-		return $applique_invalideur($depart);
-	}
+    if ($applique_invalideur = charger_fonction('applique_invalideur', 'inc', true)) {
+        return $applique_invalideur($depart);
+    }
 }
 
 //
 // Invalider les caches liés à telle condition
 //
 function suivre_invalideur($cond, $modif = true) {
-	if ($suivre_invalideur = charger_fonction('suivre_invalideur', 'inc', true)) {
-		return $suivre_invalideur($cond, $modif);
-	}
+    if ($suivre_invalideur = charger_fonction('suivre_invalideur', 'inc', true)) {
+        return $suivre_invalideur($cond, $modif);
+    }
 }

Spacing +3 added lines, -3 removed lines

@@ -44,7 +44,7 @@ 
 	$n = 0;
 	$time = $GLOBALS['meta']['cache_mark'] ?? 0;
 	for ($i = 0; $i < 256; $i++) {
-		$dir = _DIR_CACHE . sprintf('%02s', dechex($i));
+		$dir = _DIR_CACHE.sprintf('%02s', dechex($i));
 		if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
 			while (($f = readdir($d)) !== false) {
 				if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) && ($a = stat("$dir/$f"))) {
@@ -101,7 +101,7 @@ 
 
 	// stocker la date_modif_$objet (ne sert a rien pour le moment)
 	if (isset($objet)) {
-		ecrire_meta('derniere_modif_' . $objet, time());
+		ecrire_meta('derniere_modif_'.$objet, time());
 	}
 
 	// si $derniere_modif_invalide est un array('article', 'rubrique')
@@ -144,7 +144,7 @@ 
 
 	// sur certains sites on veut absolument garder certains caches référencés dans un CDN
 	// on peut donc inhiber la purge de ces répertoires pour eviter tout probleme
-	if (file_exists(rtrim($dir, '/') . '/inhib_purger_repertoire.txt')) {
+	if (file_exists(rtrim($dir, '/').'/inhib_purger_repertoire.txt')) {
 		return 0;
 	}
 

ecrire/public/assembler.php

Indentation +664 added lines, -664 removed lines

@@ -19,170 +19,170 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function assembler($fond, string $connect = '') {
 
-	$cache_key = null;
-	$lastmodified = null;
-	$res = null;
-	// flag_preserver est modifie ici, et utilise en globale
-	// use_cache sert a informer le bouton d'admin pr savoir s'il met un *
-	// contexte est utilise en globale dans le formulaire d'admin
-
-	$GLOBALS['contexte'] = calculer_contexte();
-	$page = ['contexte_implicite' => calculer_contexte_implicite()];
-	$page['contexte_implicite']['cache'] = $fond . preg_replace(
-		',\.[a-zA-Z0-9]*$,',
-		'',
-		preg_replace('/[?].*$/', '', $GLOBALS['REQUEST_URI'])
-	);
-	// Cette fonction est utilisee deux fois
-	$cacher = charger_fonction('cacher', 'public', true);
-	// Les quatre derniers parametres sont modifies par la fonction:
-	// emplacement, validite, et, s'il est valide, contenu & age
-	if ($cacher) {
-		$res = $cacher($GLOBALS['contexte'], $GLOBALS['use_cache'], $cache_key, $page, $lastmodified);
-	} else {
-		$GLOBALS['use_cache'] = -1;
-	}
-	// Si un resultat est retourne, c'est un message d'impossibilite
-	if ($res) {
-		return ['texte' => $res];
-	}
-
-	if (!$cache_key || !$lastmodified) {
-		$lastmodified = time();
-	}
-
-	$headers_only = ($_SERVER['REQUEST_METHOD'] == 'HEAD');
-	$calculer_page = true;
-
-	// Pour les pages non-dynamiques (indiquees par #CACHE{duree,cache-client})
-	// une perennite valide a meme reponse qu'une requete HEAD (par defaut les
-	// pages sont dynamiques)
-	if (
-		isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
-		&& (!defined('_VAR_MODE') || !_VAR_MODE)
-		&& $cache_key && isset($page['entetes'])
-		&& isset($page['entetes']['Cache-Control'])
-		&& strstr($page['entetes']['Cache-Control'], 'max-age=')
-		&& !strstr($_SERVER['SERVER_SOFTWARE'], 'IIS/')
-	) {
-		$since = preg_replace(
-			'/;.*/',
-			'',
-			$_SERVER['HTTP_IF_MODIFIED_SINCE']
-		);
-		$since = str_replace('GMT', '', $since);
-		if (trim($since) == gmdate('D, d M Y H:i:s', $lastmodified)) {
-			$page['status'] = 304;
-			$headers_only = true;
-			$calculer_page = false;
-		}
-	}
-
-	// Si requete HEAD ou Last-modified compatible, ignorer le texte
-	// et pas de content-type (pour contrer le bouton admin de inc-public)
-	if (!$calculer_page) {
-		$page['texte'] = '';
-	} else {
-		// si la page est prise dans le cache
-		if (!$GLOBALS['use_cache']) {
-			// Informer les boutons d'admin du contexte
-			// (fourni par urls_decoder_url ci-dessous lors de la mise en cache)
-			$GLOBALS['contexte'] = $page['contexte'];
-
-			// vider les globales url propres qui ne doivent plus etre utilisees en cas
-			// d'inversion url => objet
-			// plus necessaire si on utilise bien la fonction urls_decoder_url
-			#unset($_SERVER['REDIRECT_url_propre']);
-			#unset($_ENV['url_propre']);
-		} else {
-			// Compat ascendante :
-			// 1. $contexte est global
-			// (a evacuer car urls_decoder_url gere ce probleme ?)
-			// et calculer la page
-			if (!test_espace_prive()) {
-				include_spip('inc/urls');
-				[$fond, $GLOBALS['contexte'], $url_redirect] = urls_decoder_url(
-					nettoyer_uri(),
-					$fond,
-					$GLOBALS['contexte'],
-					true
-				);
-			}
-			// squelette par defaut
-			if (!strlen($fond ?? '')) {
-				$fond = 'sommaire';
-			}
-
-			// produire la page : peut mettre a jour $lastmodified
-			$produire_page = charger_fonction('produire_page', 'public');
-			$page = $produire_page(
-				$fond,
-				$GLOBALS['contexte'],
-				$GLOBALS['use_cache'],
-				$cache_key,
-				null,
-				$page,
-				$lastmodified,
-				$connect
-			);
-			if ($page === '') {
-				$erreur = _T(
-					'info_erreur_squelette2',
-					['fichier' => spip_htmlspecialchars($fond) . '.' . _EXTENSION_SQUELETTES]
-				);
-				erreur_squelette($erreur);
-				// eviter des erreurs strictes ensuite sur $page['cle'] en PHP >= 5.4
-				$page = ['texte' => '', 'erreur' => $erreur];
-			}
-		}
-
-		if ($page && $cache_key) {
-			$page['cache'] = $cache_key;
-		}
-
-		auto_content_type($page);
-
-		$GLOBALS['flag_preserver'] |= headers_sent();
-
-		// Definir les entetes si ce n'est fait
-		if (!$GLOBALS['flag_preserver']) {
-			// Si la page est vide, produire l'erreur 404 ou message d'erreur pour les inclusions
-			if (
-				trim($page['texte']) === ''
-				&& _VAR_MODE !== 'debug'
-				&& !isset($page['entetes']['Location']) // cette page realise une redirection, donc pas d'erreur
-			) {
-				$GLOBALS['contexte']['fond_erreur'] = $fond;
-				$page = message_page_indisponible($page, $GLOBALS['contexte']);
-			}
-			// pas de cache client en mode 'observation'
-			if (defined('_VAR_MODE') && _VAR_MODE) {
-				$page['entetes']['Cache-Control'] = 'no-cache,must-revalidate';
-				$page['entetes']['Pragma'] = 'no-cache';
-			}
-		}
-	}
-
-	// Entete Last-Modified:
-	// eviter d'etre incoherent en envoyant un lastmodified identique
-	// a celui qu'on a refuse d'honorer plus haut (cf. #655)
-	if (
-		$lastmodified && !isset($_SERVER['HTTP_IF_MODIFIED_SINCE']) && !isset($page['entetes']['Last-Modified'])
-	) {
-		$page['entetes']['Last-Modified'] = gmdate('D, d M Y H:i:s', $lastmodified) . ' GMT';
-	}
-
-	// fermer la connexion apres les headers si requete HEAD
-	if ($headers_only) {
-		$page['entetes']['Connection'] = 'close';
-	}
-
-	return $page;
+    $cache_key = null;
+    $lastmodified = null;
+    $res = null;
+    // flag_preserver est modifie ici, et utilise en globale
+    // use_cache sert a informer le bouton d'admin pr savoir s'il met un *
+    // contexte est utilise en globale dans le formulaire d'admin
+
+    $GLOBALS['contexte'] = calculer_contexte();
+    $page = ['contexte_implicite' => calculer_contexte_implicite()];
+    $page['contexte_implicite']['cache'] = $fond . preg_replace(
+        ',\.[a-zA-Z0-9]*$,',
+        '',
+        preg_replace('/[?].*$/', '', $GLOBALS['REQUEST_URI'])
+    );
+    // Cette fonction est utilisee deux fois
+    $cacher = charger_fonction('cacher', 'public', true);
+    // Les quatre derniers parametres sont modifies par la fonction:
+    // emplacement, validite, et, s'il est valide, contenu & age
+    if ($cacher) {
+        $res = $cacher($GLOBALS['contexte'], $GLOBALS['use_cache'], $cache_key, $page, $lastmodified);
+    } else {
+        $GLOBALS['use_cache'] = -1;
+    }
+    // Si un resultat est retourne, c'est un message d'impossibilite
+    if ($res) {
+        return ['texte' => $res];
+    }
+
+    if (!$cache_key || !$lastmodified) {
+        $lastmodified = time();
+    }
+
+    $headers_only = ($_SERVER['REQUEST_METHOD'] == 'HEAD');
+    $calculer_page = true;
+
+    // Pour les pages non-dynamiques (indiquees par #CACHE{duree,cache-client})
+    // une perennite valide a meme reponse qu'une requete HEAD (par defaut les
+    // pages sont dynamiques)
+    if (
+        isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
+        && (!defined('_VAR_MODE') || !_VAR_MODE)
+        && $cache_key && isset($page['entetes'])
+        && isset($page['entetes']['Cache-Control'])
+        && strstr($page['entetes']['Cache-Control'], 'max-age=')
+        && !strstr($_SERVER['SERVER_SOFTWARE'], 'IIS/')
+    ) {
+        $since = preg_replace(
+            '/;.*/',
+            '',
+            $_SERVER['HTTP_IF_MODIFIED_SINCE']
+        );
+        $since = str_replace('GMT', '', $since);
+        if (trim($since) == gmdate('D, d M Y H:i:s', $lastmodified)) {
+            $page['status'] = 304;
+            $headers_only = true;
+            $calculer_page = false;
+        }
+    }
+
+    // Si requete HEAD ou Last-modified compatible, ignorer le texte
+    // et pas de content-type (pour contrer le bouton admin de inc-public)
+    if (!$calculer_page) {
+        $page['texte'] = '';
+    } else {
+        // si la page est prise dans le cache
+        if (!$GLOBALS['use_cache']) {
+            // Informer les boutons d'admin du contexte
+            // (fourni par urls_decoder_url ci-dessous lors de la mise en cache)
+            $GLOBALS['contexte'] = $page['contexte'];
+
+            // vider les globales url propres qui ne doivent plus etre utilisees en cas
+            // d'inversion url => objet
+            // plus necessaire si on utilise bien la fonction urls_decoder_url
+            #unset($_SERVER['REDIRECT_url_propre']);
+            #unset($_ENV['url_propre']);
+        } else {
+            // Compat ascendante :
+            // 1. $contexte est global
+            // (a evacuer car urls_decoder_url gere ce probleme ?)
+            // et calculer la page
+            if (!test_espace_prive()) {
+                include_spip('inc/urls');
+                [$fond, $GLOBALS['contexte'], $url_redirect] = urls_decoder_url(
+                    nettoyer_uri(),
+                    $fond,
+                    $GLOBALS['contexte'],
+                    true
+                );
+            }
+            // squelette par defaut
+            if (!strlen($fond ?? '')) {
+                $fond = 'sommaire';
+            }
+
+            // produire la page : peut mettre a jour $lastmodified
+            $produire_page = charger_fonction('produire_page', 'public');
+            $page = $produire_page(
+                $fond,
+                $GLOBALS['contexte'],
+                $GLOBALS['use_cache'],
+                $cache_key,
+                null,
+                $page,
+                $lastmodified,
+                $connect
+            );
+            if ($page === '') {
+                $erreur = _T(
+                    'info_erreur_squelette2',
+                    ['fichier' => spip_htmlspecialchars($fond) . '.' . _EXTENSION_SQUELETTES]
+                );
+                erreur_squelette($erreur);
+                // eviter des erreurs strictes ensuite sur $page['cle'] en PHP >= 5.4
+                $page = ['texte' => '', 'erreur' => $erreur];
+            }
+        }
+
+        if ($page && $cache_key) {
+            $page['cache'] = $cache_key;
+        }
+
+        auto_content_type($page);
+
+        $GLOBALS['flag_preserver'] |= headers_sent();
+
+        // Definir les entetes si ce n'est fait
+        if (!$GLOBALS['flag_preserver']) {
+            // Si la page est vide, produire l'erreur 404 ou message d'erreur pour les inclusions
+            if (
+                trim($page['texte']) === ''
+                && _VAR_MODE !== 'debug'
+                && !isset($page['entetes']['Location']) // cette page realise une redirection, donc pas d'erreur
+            ) {
+                $GLOBALS['contexte']['fond_erreur'] = $fond;
+                $page = message_page_indisponible($page, $GLOBALS['contexte']);
+            }
+            // pas de cache client en mode 'observation'
+            if (defined('_VAR_MODE') && _VAR_MODE) {
+                $page['entetes']['Cache-Control'] = 'no-cache,must-revalidate';
+                $page['entetes']['Pragma'] = 'no-cache';
+            }
+        }
+    }
+
+    // Entete Last-Modified:
+    // eviter d'etre incoherent en envoyant un lastmodified identique
+    // a celui qu'on a refuse d'honorer plus haut (cf. #655)
+    if (
+        $lastmodified && !isset($_SERVER['HTTP_IF_MODIFIED_SINCE']) && !isset($page['entetes']['Last-Modified'])
+    ) {
+        $page['entetes']['Last-Modified'] = gmdate('D, d M Y H:i:s', $lastmodified) . ' GMT';
+    }
+
+    // fermer la connexion apres les headers si requete HEAD
+    if ($headers_only) {
+        $page['entetes']['Connection'] = 'close';
+    }
+
+    return $page;
 }
 
 /**
@@ -201,27 +201,27 @@ 
  * @return array Un tableau du contexte de la page
  */
 function calculer_contexte() {
-	static $preg_ignore_variables;
-	if (empty($preg_ignore_variables)) {
-		if (!defined('_CONTEXTE_IGNORE_LISTE_VARIABLES')) {
-			nettoyer_uri_var('');
-		}
-		$preg_ignore_variables = '/(' . implode('|',_CONTEXTE_IGNORE_LISTE_VARIABLES) . ')/';
-	}
-
-	$contexte = [];
-	foreach ($_GET as $var => $val) {
-		if (!preg_match($preg_ignore_variables, $var)) {
-			$contexte[$var] = $val;
-		}
-	}
-	foreach ($_POST as $var => $val) {
-		if (!preg_match($preg_ignore_variables, $var)) {
-			$contexte[$var] = $val;
-		}
-	}
-
-	return $contexte;
+    static $preg_ignore_variables;
+    if (empty($preg_ignore_variables)) {
+        if (!defined('_CONTEXTE_IGNORE_LISTE_VARIABLES')) {
+            nettoyer_uri_var('');
+        }
+        $preg_ignore_variables = '/(' . implode('|',_CONTEXTE_IGNORE_LISTE_VARIABLES) . ')/';
+    }
+
+    $contexte = [];
+    foreach ($_GET as $var => $val) {
+        if (!preg_match($preg_ignore_variables, $var)) {
+            $contexte[$var] = $val;
+        }
+    }
+    foreach ($_POST as $var => $val) {
+        if (!preg_match($preg_ignore_variables, $var)) {
+            $contexte[$var] = $val;
+        }
+    }
+
+    return $contexte;
 }
 
 /**
@@ -232,25 +232,25 @@ 
  * @return array
  */
 function calculer_contexte_implicite() {
-	static $notes = null;
-	if (is_null($notes)) {
-		$notes = charger_fonction('notes', 'inc', true);
-	}
-	$contexte_implicite = [
-		'squelettes' => $GLOBALS['dossier_squelettes'], // devrait etre 'chemin' => $GLOBALS['path_sig'], ?
-		'host' => ($_SERVER['HTTP_HOST'] ?? null),
-		'https' => ($_SERVER['HTTPS'] ?? ''),
-		'espace' => test_espace_prive(),
-		'marqueur' => ($GLOBALS['marqueur'] ?? ''),
-		'marqueur_skel' => ($GLOBALS['marqueur_skel'] ?? ''),
-		'notes' => $notes ? $notes('', 'contexter_cache') : '',
-		'spip_version_code' => $GLOBALS['spip_version_code'],
-	];
-	if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-		$contexte_implicite['host'] .= '|' . $_SERVER['HTTP_X_FORWARDED_HOST'];
-	}
-
-	return $contexte_implicite;
+    static $notes = null;
+    if (is_null($notes)) {
+        $notes = charger_fonction('notes', 'inc', true);
+    }
+    $contexte_implicite = [
+        'squelettes' => $GLOBALS['dossier_squelettes'], // devrait etre 'chemin' => $GLOBALS['path_sig'], ?
+        'host' => ($_SERVER['HTTP_HOST'] ?? null),
+        'https' => ($_SERVER['HTTPS'] ?? ''),
+        'espace' => test_espace_prive(),
+        'marqueur' => ($GLOBALS['marqueur'] ?? ''),
+        'marqueur_skel' => ($GLOBALS['marqueur_skel'] ?? ''),
+        'notes' => $notes ? $notes('', 'contexter_cache') : '',
+        'spip_version_code' => $GLOBALS['spip_version_code'],
+    ];
+    if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
+        $contexte_implicite['host'] .= '|' . $_SERVER['HTTP_X_FORWARDED_HOST'];
+    }
+
+    return $contexte_implicite;
 }
 
 //
@@ -259,56 +259,56 @@ 
 
 function auto_content_type($page) {
 
-	if (!isset($GLOBALS['flag_preserver'])) {
-		$GLOBALS['flag_preserver'] = ($page && preg_match(
-			'/header\s*\(\s*.content\-type:/isx',
-			$page['texte']
-		) || (isset($page['entetes']['Content-Type'])));
-	}
+    if (!isset($GLOBALS['flag_preserver'])) {
+        $GLOBALS['flag_preserver'] = ($page && preg_match(
+            '/header\s*\(\s*.content\-type:/isx',
+            $page['texte']
+        ) || (isset($page['entetes']['Content-Type'])));
+    }
 }
 
 function inclure_page($fond, $contexte, string $connect = '') {
-	$use_cache = null;
-	$cache_key = null;
-	$lastinclude = null;
-	$res = null;
-	static $cacher, $produire_page;
-
-	// enlever le fond de contexte inclus car sinon il prend la main
-	// dans les sous inclusions -> boucle infinie d'inclusion identique
-	// (cette precaution n'est probablement plus utile)
-	unset($contexte['fond']);
-	$page = ['contexte_implicite' => calculer_contexte_implicite()];
-	$page['contexte_implicite']['cache'] = $fond;
-	if (is_null($cacher)) {
-		$cacher = charger_fonction('cacher', 'public', true);
-	}
-	// Les quatre derniers parametres sont modifies par la fonction:
-	// emplacement, validite, et, s'il est valide, contenu & age
-	if ($cacher) {
-		$res = $cacher($contexte, $use_cache, $cache_key, $page, $lastinclude);
-	} else {
-		$use_cache = -1;
-	}
-
-	// $res = message d'erreur : on sort de la
-	if ($res) {
-		return ['texte' => $res];
-	}
-
-	// Si use_cache ne vaut pas 0, la page doit etre calculee
-	// produire la page : peut mettre a jour $lastinclude
-	// le contexte_cache envoye a cacher() a ete conserve et est passe a produire
-	if ($use_cache) {
-		if (is_null($produire_page)) {
-			$produire_page = charger_fonction('produire_page', 'public');
-		}
-		$page = $produire_page($fond, $contexte, $use_cache, $cache_key, $contexte, $page, $lastinclude, $connect);
-	}
-	// dans tous les cas, mettre a jour $GLOBALS['lastmodified']
-	$GLOBALS['lastmodified'] = max(($GLOBALS['lastmodified'] ?? 0), $lastinclude);
-
-	return $page;
+    $use_cache = null;
+    $cache_key = null;
+    $lastinclude = null;
+    $res = null;
+    static $cacher, $produire_page;
+
+    // enlever le fond de contexte inclus car sinon il prend la main
+    // dans les sous inclusions -> boucle infinie d'inclusion identique
+    // (cette precaution n'est probablement plus utile)
+    unset($contexte['fond']);
+    $page = ['contexte_implicite' => calculer_contexte_implicite()];
+    $page['contexte_implicite']['cache'] = $fond;
+    if (is_null($cacher)) {
+        $cacher = charger_fonction('cacher', 'public', true);
+    }
+    // Les quatre derniers parametres sont modifies par la fonction:
+    // emplacement, validite, et, s'il est valide, contenu & age
+    if ($cacher) {
+        $res = $cacher($contexte, $use_cache, $cache_key, $page, $lastinclude);
+    } else {
+        $use_cache = -1;
+    }
+
+    // $res = message d'erreur : on sort de la
+    if ($res) {
+        return ['texte' => $res];
+    }
+
+    // Si use_cache ne vaut pas 0, la page doit etre calculee
+    // produire la page : peut mettre a jour $lastinclude
+    // le contexte_cache envoye a cacher() a ete conserve et est passe a produire
+    if ($use_cache) {
+        if (is_null($produire_page)) {
+            $produire_page = charger_fonction('produire_page', 'public');
+        }
+        $page = $produire_page($fond, $contexte, $use_cache, $cache_key, $contexte, $page, $lastinclude, $connect);
+    }
+    // dans tous les cas, mettre a jour $GLOBALS['lastmodified']
+    $GLOBALS['lastmodified'] = max(($GLOBALS['lastmodified'] ?? 0), $lastinclude);
+
+    return $page;
 }
 
 /**
@@ -326,41 +326,41 @@ 
  * @return array
  */
 function public_produire_page_dist(
-	$fond,
-	$contexte,
-	$use_cache,
-	$cache_key,
-	$contexte_cache,
-	&$page,
-	&$lastinclude,
-	$connect = ''
+    $fond,
+    $contexte,
+    $use_cache,
+    $cache_key,
+    $contexte_cache,
+    &$page,
+    &$lastinclude,
+    $connect = ''
 ) {
-	static $parametrer, $cacher;
-	if (!$parametrer) {
-		$parametrer = charger_fonction('parametrer', 'public');
-	}
-	$page = $parametrer($fond, $contexte, $cache_key, $connect);
-	// et on l'enregistre sur le disque
-	if (
-		$cache_key
-		&& $use_cache > -1
-		&& is_array($page)
-		&& count($page)
-		&& isset($page['entetes']['X-Spip-Cache'])
-		&& $page['entetes']['X-Spip-Cache'] > 0
-	) {
-		if (is_null($cacher)) {
-			$cacher = charger_fonction('cacher', 'public', true);
-		}
-		$lastinclude = time();
-		if ($cacher) {
-			$cacher($contexte_cache, $use_cache, $cache_key, $page, $lastinclude);
-		} else {
-			$use_cache = -1;
-		}
-	}
-
-	return $page;
+    static $parametrer, $cacher;
+    if (!$parametrer) {
+        $parametrer = charger_fonction('parametrer', 'public');
+    }
+    $page = $parametrer($fond, $contexte, $cache_key, $connect);
+    // et on l'enregistre sur le disque
+    if (
+        $cache_key
+        && $use_cache > -1
+        && is_array($page)
+        && count($page)
+        && isset($page['entetes']['X-Spip-Cache'])
+        && $page['entetes']['X-Spip-Cache'] > 0
+    ) {
+        if (is_null($cacher)) {
+            $cacher = charger_fonction('cacher', 'public', true);
+        }
+        $lastinclude = time();
+        if ($cacher) {
+            $cacher($contexte_cache, $use_cache, $cache_key, $page, $lastinclude);
+        } else {
+            $use_cache = -1;
+        }
+    }
+
+    return $page;
 }
 
 // Fonction inseree par le compilateur dans le code compile.
@@ -374,14 +374,14 @@ 
 // 4: langue
 
 function inserer_balise_dynamique($contexte_exec, $contexte_compil) {
-	arguments_balise_dyn_depuis_modele(null, 'reset');
-
-	if (!is_array($contexte_exec)) {
-		echo $contexte_exec;
-	} // message d'erreur etc
-	else {
-		inclure_balise_dynamique($contexte_exec, true, $contexte_compil);
-	}
+    arguments_balise_dyn_depuis_modele(null, 'reset');
+
+    if (!is_array($contexte_exec)) {
+        echo $contexte_exec;
+    } // message d'erreur etc
+    else {
+        inclure_balise_dynamique($contexte_exec, true, $contexte_compil);
+    }
 }
 
 /**
@@ -394,101 +394,101 @@ 
  * @return string|void
  */
 function inclure_balise_dynamique($texte, $echo = true, $contexte_compil = []) {
-	if (is_array($texte)) {
-		[$fond, $delainc, $contexte_inclus] = $texte;
-
-		// delais a l'ancienne, c'est pratiquement mort
-		$d = $GLOBALS['delais'] ?? null;
-		$GLOBALS['delais'] = $delainc;
-
-		$page = recuperer_fond(
-			$fond,
-			$contexte_inclus,
-			['trim' => false, 'raw' => true, 'compil' => $contexte_compil]
-		);
-
-		$texte = $page['texte'];
-
-		$GLOBALS['delais'] = $d;
-		// Faire remonter les entetes
-		if (
-			isset($page['entetes'])
-			&& is_array($page['entetes'])
-		) {
-			// mais pas toutes
-			unset($page['entetes']['X-Spip-Cache']);
-			unset($page['entetes']['Content-Type']);
-			if (isset($GLOBALS['page']) && is_array($GLOBALS['page'])) {
-				if (!is_array($GLOBALS['page']['entetes'])) {
-					$GLOBALS['page']['entetes'] = [];
-				}
-				$GLOBALS['page']['entetes'] =
-					array_merge($GLOBALS['page']['entetes'], $page['entetes']);
-			}
-		}
-		// _pipelines au pluriel array('nom_pipeline' => $args...) avec une syntaxe permettant plusieurs pipelines
-		if (
-			isset($page['contexte']['_pipelines'])
-			&& is_array($page['contexte']['_pipelines'])
-			&& count($page['contexte']['_pipelines'])
-		) {
-			foreach ($page['contexte']['_pipelines'] as $pipe => $args) {
-				$args['contexte'] = $page['contexte'];
-				unset($args['contexte']['_pipelines']); // par precaution, meme si le risque de boucle infinie est a priori nul
-				$texte = pipeline(
-					$pipe,
-					[
-						'data' => $texte,
-						'args' => $args
-					]
-				);
-			}
-		}
-	}
-
-	if (defined('_VAR_MODE') && _VAR_MODE == 'debug') {
-		// compatibilite : avant on donnait le numero de ligne ou rien.
-		$ligne = intval($contexte_compil[3] ?? $contexte_compil);
-		$GLOBALS['debug_objets']['resultat'][$ligne] = $texte;
-	}
-	if ($echo) {
-		echo $texte;
-	} else {
-		return $texte;
-	}
+    if (is_array($texte)) {
+        [$fond, $delainc, $contexte_inclus] = $texte;
+
+        // delais a l'ancienne, c'est pratiquement mort
+        $d = $GLOBALS['delais'] ?? null;
+        $GLOBALS['delais'] = $delainc;
+
+        $page = recuperer_fond(
+            $fond,
+            $contexte_inclus,
+            ['trim' => false, 'raw' => true, 'compil' => $contexte_compil]
+        );
+
+        $texte = $page['texte'];
+
+        $GLOBALS['delais'] = $d;
+        // Faire remonter les entetes
+        if (
+            isset($page['entetes'])
+            && is_array($page['entetes'])
+        ) {
+            // mais pas toutes
+            unset($page['entetes']['X-Spip-Cache']);
+            unset($page['entetes']['Content-Type']);
+            if (isset($GLOBALS['page']) && is_array($GLOBALS['page'])) {
+                if (!is_array($GLOBALS['page']['entetes'])) {
+                    $GLOBALS['page']['entetes'] = [];
+                }
+                $GLOBALS['page']['entetes'] =
+                    array_merge($GLOBALS['page']['entetes'], $page['entetes']);
+            }
+        }
+        // _pipelines au pluriel array('nom_pipeline' => $args...) avec une syntaxe permettant plusieurs pipelines
+        if (
+            isset($page['contexte']['_pipelines'])
+            && is_array($page['contexte']['_pipelines'])
+            && count($page['contexte']['_pipelines'])
+        ) {
+            foreach ($page['contexte']['_pipelines'] as $pipe => $args) {
+                $args['contexte'] = $page['contexte'];
+                unset($args['contexte']['_pipelines']); // par precaution, meme si le risque de boucle infinie est a priori nul
+                $texte = pipeline(
+                    $pipe,
+                    [
+                        'data' => $texte,
+                        'args' => $args
+                    ]
+                );
+            }
+        }
+    }
+
+    if (defined('_VAR_MODE') && _VAR_MODE == 'debug') {
+        // compatibilite : avant on donnait le numero de ligne ou rien.
+        $ligne = intval($contexte_compil[3] ?? $contexte_compil);
+        $GLOBALS['debug_objets']['resultat'][$ligne] = $texte;
+    }
+    if ($echo) {
+        echo $texte;
+    } else {
+        return $texte;
+    }
 }
 
 function message_page_indisponible($page, $contexte) {
-	static $deja = false;
-	if ($deja) {
-		return 'erreur';
-	}
-	$codes = [
-		'404' => '404 Not Found',
-		'503' => '503 Service Unavailable',
-	];
-
-	$contexte['status'] = ($page !== false) ? '404' : '503';
-	$contexte['code'] = $codes[$contexte['status']];
-	$contexte['fond'] = '404'; // gere les 2 erreurs
-	if (!isset($contexte['lang'])) {
-		include_spip('inc/lang');
-		$contexte['lang'] = $GLOBALS['spip_lang'];
-	}
-
-	$deja = true;
-	// passer aux plugins qui peuvent decider d'une page d'erreur plus pertinent
-	// ex restriction d'acces => 401
-	$contexte = pipeline('page_indisponible', $contexte);
-
-	// produire la page d'erreur
-	$page = inclure_page($contexte['fond'], $contexte);
-	if (!$page) {
-		$page = inclure_page('404', $contexte);
-	}
-	$page['status'] = $contexte['status'];
-
-	return $page;
+    static $deja = false;
+    if ($deja) {
+        return 'erreur';
+    }
+    $codes = [
+        '404' => '404 Not Found',
+        '503' => '503 Service Unavailable',
+    ];
+
+    $contexte['status'] = ($page !== false) ? '404' : '503';
+    $contexte['code'] = $codes[$contexte['status']];
+    $contexte['fond'] = '404'; // gere les 2 erreurs
+    if (!isset($contexte['lang'])) {
+        include_spip('inc/lang');
+        $contexte['lang'] = $GLOBALS['spip_lang'];
+    }
+
+    $deja = true;
+    // passer aux plugins qui peuvent decider d'une page d'erreur plus pertinent
+    // ex restriction d'acces => 401
+    $contexte = pipeline('page_indisponible', $contexte);
+
+    // produire la page d'erreur
+    $page = inclure_page($contexte['fond'], $contexte);
+    if (!$page) {
+        $page = inclure_page('404', $contexte);
+    }
+    $page['status'] = $contexte['status'];
+
+    return $page;
 }
 
 /**
@@ -500,44 +500,44 @@ 
  * @return mixed
  */
 function arguments_balise_dyn_depuis_modele($arg, $operation = 'set') {
-	static $balise_dyn_appellee_par_modele = null;
-	switch ($operation) {
-		case 'read':
-			return $balise_dyn_appellee_par_modele;
-		case 'reset':
-			$balise_dyn_appellee_par_modele = null;
-			return null;
-		case 'set':
-		default:
-			$balise_dyn_appellee_par_modele = $arg;
-			return $arg;
-	}
+    static $balise_dyn_appellee_par_modele = null;
+    switch ($operation) {
+        case 'read':
+            return $balise_dyn_appellee_par_modele;
+        case 'reset':
+            $balise_dyn_appellee_par_modele = null;
+            return null;
+        case 'set':
+        default:
+            $balise_dyn_appellee_par_modele = $arg;
+            return $arg;
+    }
 }
 
 // temporairement ici : a mettre dans le futur inc/modeles
 // creer_contexte_de_modele('left', 'autostart=true', ...) renvoie un array()
 function creer_contexte_de_modele($args) {
-	$contexte = [];
-	foreach ($args as $var => $val) {
-		if (is_int($var)) { // argument pas formate
-			if (in_array($val, ['left', 'right', 'center'])) {
-				$var = 'align';
-				$contexte[$var] = $val;
-			} else {
-				$args = explode('=', $val);
-				if (count($args) >= 2) { // Flashvars=arg1=machin&arg2=truc genere plus de deux args
-				$contexte[trim($args[0])] = substr($val, strlen($args[0]) + 1);
-				} else // notation abregee
-				{
-					$contexte[trim($val)] = trim($val);
-				}
-			}
-		} else {
-			$contexte[$var] = $val;
-		}
-	}
-
-	return $contexte;
+    $contexte = [];
+    foreach ($args as $var => $val) {
+        if (is_int($var)) { // argument pas formate
+            if (in_array($val, ['left', 'right', 'center'])) {
+                $var = 'align';
+                $contexte[$var] = $val;
+            } else {
+                $args = explode('=', $val);
+                if (count($args) >= 2) { // Flashvars=arg1=machin&arg2=truc genere plus de deux args
+                $contexte[trim($args[0])] = substr($val, strlen($args[0]) + 1);
+                } else // notation abregee
+                {
+                    $contexte[trim($val)] = trim($val);
+                }
+            }
+        } else {
+            $contexte[$var] = $val;
+        }
+    }
+
+    return $contexte;
 }
 
 /**
@@ -552,45 +552,45 @@ 
  * @return string
  */
 function styliser_modele($modele, $id, $contexte = null) {
-	static $styliseurs = null;
-	if (is_null($styliseurs)) {
-		$tables_objet = lister_tables_objets_sql();
-		foreach ($tables_objet as $table => $desc) {
-			if (
-				isset($desc['modeles'])
-				&& $desc['modeles']
-				&& isset($desc['modeles_styliser'])
-				&& $desc['modeles_styliser']
-				&& function_exists($desc['modeles_styliser'])
-			) {
-				$primary = id_table_objet($table);
-				foreach ($desc['modeles'] as $m) {
-					$styliseurs[$m] = ['primary' => $primary, 'callback' => $desc['modeles_styliser']];
-				}
-			}
-		}
-	}
-
-	if (isset($styliseurs[$modele])) {
-		$styliseur = $styliseurs[$modele]['callback'];
-		$primary = $styliseurs[$modele]['primary'];
-		if (is_null($id) && $contexte) {
-			if (isset($contexte['id'])) {
-				$id = $contexte['id'];
-			} elseif (isset($contexte[$primary])) {
-				$id = $contexte[$primary];
-			}
-		}
-		if (is_null($id)) {
-			$msg = "modeles/$modele : " . _T('zbug_parametres_inclus_incorrects', ['param' => "id/$primary"]);
-			erreur_squelette($msg);
-			// on passe id=0 au routeur pour tomber sur le modele par defaut et eviter une seconde erreur sur un modele inexistant
-			$id = 0;
-		}
-		$modele = $styliseur($modele, $id);
-	}
-
-	return $modele;
+    static $styliseurs = null;
+    if (is_null($styliseurs)) {
+        $tables_objet = lister_tables_objets_sql();
+        foreach ($tables_objet as $table => $desc) {
+            if (
+                isset($desc['modeles'])
+                && $desc['modeles']
+                && isset($desc['modeles_styliser'])
+                && $desc['modeles_styliser']
+                && function_exists($desc['modeles_styliser'])
+            ) {
+                $primary = id_table_objet($table);
+                foreach ($desc['modeles'] as $m) {
+                    $styliseurs[$m] = ['primary' => $primary, 'callback' => $desc['modeles_styliser']];
+                }
+            }
+        }
+    }
+
+    if (isset($styliseurs[$modele])) {
+        $styliseur = $styliseurs[$modele]['callback'];
+        $primary = $styliseurs[$modele]['primary'];
+        if (is_null($id) && $contexte) {
+            if (isset($contexte['id'])) {
+                $id = $contexte['id'];
+            } elseif (isset($contexte[$primary])) {
+                $id = $contexte[$primary];
+            }
+        }
+        if (is_null($id)) {
+            $msg = "modeles/$modele : " . _T('zbug_parametres_inclus_incorrects', ['param' => "id/$primary"]);
+            erreur_squelette($msg);
+            // on passe id=0 au routeur pour tomber sur le modele par defaut et eviter une seconde erreur sur un modele inexistant
+            $id = 0;
+        }
+        $modele = $styliseur($modele, $id);
+    }
+
+    return $modele;
 }
 
 /**
@@ -605,116 +605,116 @@ 
  */
 function inclure_modele($type, $id, $params, $lien, string $connect = '', $env = []) {
 
-	static $compteur;
-	if (++$compteur > 10) {
-		return '';
-	} # ne pas boucler indefiniment
-
-	$type = strtolower($type);
-	$type = styliser_modele($type, $id);
-
-	$fond = $class = '';
-
-	$params = array_filter(explode('|', $params));
-	if ($params) {
-		$soustype = current($params);
-		$soustype = strtolower(trim($soustype));
-		if (in_array($soustype, ['left', 'right', 'center', 'ajax'])) {
-			$soustype = next($params);
-			$soustype = strtolower($soustype);
-		}
-
-		if (preg_match(',^[a-z0-9_]+$,', $soustype)) {
-			if (!trouve_modele($fond = ($type . '_' . $soustype))) {
-				$fond = '';
-				$class = $soustype;
-			}
-			// enlever le sous type des params
-			$params = array_diff($params, [$soustype]);
-		}
-	}
-
-	// Si ca marche pas en precisant le sous-type, prendre le type
-	if (!$fond && !trouve_modele($fond = $type)) {
-		spip_log("Modele $type introuvable", _LOG_INFO_IMPORTANTE);
-		$compteur--;
-		return false;
-	}
-	$fond = 'modeles/' . $fond;
-	// Creer le contexte
-	$contexte = $env;
-	// securiser le contexte des modèles : tout ce qui arrive de _request() doit être sanitizé
-	foreach ($contexte as $k => &$v) {
-		if (!is_null(_request($k)) && (!is_scalar($v) || (_request($k) === $v))) {
-			include_spip('inc/texte_mini');
-			if (is_scalar($v)) {
-				$v = spip_securise_valeur_env_modele($v);
-			} else {
-				array_walk_recursive($v, function (&$value, $index) {
-					$value = spip_securise_valeur_env_modele($value);
-				});
-			}
-		}
-	}
-
-	$contexte['dir_racine'] = _DIR_RACINE; # eviter de mixer un cache racine et un cache ecrire (meme si pour l'instant les modeles ne sont pas caches, le resultat etant different il faut que le contexte en tienne compte
-
-	// Le numero du modele est mis dans l'environnement
-	// d'une part sous l'identifiant "id"
-	// et d'autre part sous l'identifiant de la cle primaire
-	// par la fonction id_table_objet,
-	// (<article1> =>> article =>> id_article =>> id_article=1)
-	$_id = id_table_objet($type);
-	$contexte['id'] = $contexte[$_id] = $id;
-
-	if (isset($class)) {
-		$contexte['class'] = $class;
-	}
-
-	// Si un lien a ete passe en parametre, ex: [<modele1>->url] ou [<modele1|title_du_lien{hreflang}->url]
-	if ($lien) {
-		# un eventuel guillemet (") sera reechappe par #ENV
-		$contexte['lien'] = str_replace('&quot;', '"', $lien['href']);
-		$contexte['lien_class'] = $lien['class'];
-		$contexte['lien_mime'] = $lien['mime'];
-		$contexte['lien_title'] = $lien['title'];
-		$contexte['lien_hreflang'] = $lien['hreflang'];
-	}
-
-	// Traiter les parametres
-	// par exemple : <img1|center>, <emb12|autostart=true> ou <doc1|lang=en>
-	$arg_list = creer_contexte_de_modele($params);
-	$contexte['args'] = $arg_list; // on passe la liste des arguments du modeles dans une variable args
-	$contexte = array_merge($contexte, $arg_list);
-
-	// Appliquer le modele avec le contexte
-	$retour = recuperer_fond($fond, $contexte, [], $connect);
-
-	// Regarder si le modele tient compte des liens (il *doit* alors indiquer
-	// spip_lien_ok dans les classes de son conteneur de premier niveau ;
-	// sinon, s'il y a un lien, on l'ajoute classiquement
-	if (
-		strstr(
-			' ' . ($classes = extraire_attribut($retour, 'class')) . ' ',
-			'spip_lien_ok'
-		)
-	) {
-		$retour = inserer_attribut(
-			$retour,
-			'class',
-			trim(str_replace(' spip_lien_ok ', ' ', " $classes "))
-		);
-	} else {
-		if ($lien) {
-			$retour = '<a href="' . $lien['href'] . '" class="' . $lien['class'] . '">' . $retour . '</a>';
-		}
-	}
-
-	$compteur--;
-
-	return (isset($arg_list['ajax']) && $arg_list['ajax'] == 'ajax')
-		? encoder_contexte_ajax($contexte, '', $retour)
-		: $retour;
+    static $compteur;
+    if (++$compteur > 10) {
+        return '';
+    } # ne pas boucler indefiniment
+
+    $type = strtolower($type);
+    $type = styliser_modele($type, $id);
+
+    $fond = $class = '';
+
+    $params = array_filter(explode('|', $params));
+    if ($params) {
+        $soustype = current($params);
+        $soustype = strtolower(trim($soustype));
+        if (in_array($soustype, ['left', 'right', 'center', 'ajax'])) {
+            $soustype = next($params);
+            $soustype = strtolower($soustype);
+        }
+
+        if (preg_match(',^[a-z0-9_]+$,', $soustype)) {
+            if (!trouve_modele($fond = ($type . '_' . $soustype))) {
+                $fond = '';
+                $class = $soustype;
+            }
+            // enlever le sous type des params
+            $params = array_diff($params, [$soustype]);
+        }
+    }
+
+    // Si ca marche pas en precisant le sous-type, prendre le type
+    if (!$fond && !trouve_modele($fond = $type)) {
+        spip_log("Modele $type introuvable", _LOG_INFO_IMPORTANTE);
+        $compteur--;
+        return false;
+    }
+    $fond = 'modeles/' . $fond;
+    // Creer le contexte
+    $contexte = $env;
+    // securiser le contexte des modèles : tout ce qui arrive de _request() doit être sanitizé
+    foreach ($contexte as $k => &$v) {
+        if (!is_null(_request($k)) && (!is_scalar($v) || (_request($k) === $v))) {
+            include_spip('inc/texte_mini');
+            if (is_scalar($v)) {
+                $v = spip_securise_valeur_env_modele($v);
+            } else {
+                array_walk_recursive($v, function (&$value, $index) {
+                    $value = spip_securise_valeur_env_modele($value);
+                });
+            }
+        }
+    }
+
+    $contexte['dir_racine'] = _DIR_RACINE; # eviter de mixer un cache racine et un cache ecrire (meme si pour l'instant les modeles ne sont pas caches, le resultat etant different il faut que le contexte en tienne compte
+
+    // Le numero du modele est mis dans l'environnement
+    // d'une part sous l'identifiant "id"
+    // et d'autre part sous l'identifiant de la cle primaire
+    // par la fonction id_table_objet,
+    // (<article1> =>> article =>> id_article =>> id_article=1)
+    $_id = id_table_objet($type);
+    $contexte['id'] = $contexte[$_id] = $id;
+
+    if (isset($class)) {
+        $contexte['class'] = $class;
+    }
+
+    // Si un lien a ete passe en parametre, ex: [<modele1>->url] ou [<modele1|title_du_lien{hreflang}->url]
+    if ($lien) {
+        # un eventuel guillemet (") sera reechappe par #ENV
+        $contexte['lien'] = str_replace('&quot;', '"', $lien['href']);
+        $contexte['lien_class'] = $lien['class'];
+        $contexte['lien_mime'] = $lien['mime'];
+        $contexte['lien_title'] = $lien['title'];
+        $contexte['lien_hreflang'] = $lien['hreflang'];
+    }
+
+    // Traiter les parametres
+    // par exemple : <img1|center>, <emb12|autostart=true> ou <doc1|lang=en>
+    $arg_list = creer_contexte_de_modele($params);
+    $contexte['args'] = $arg_list; // on passe la liste des arguments du modeles dans une variable args
+    $contexte = array_merge($contexte, $arg_list);
+
+    // Appliquer le modele avec le contexte
+    $retour = recuperer_fond($fond, $contexte, [], $connect);
+
+    // Regarder si le modele tient compte des liens (il *doit* alors indiquer
+    // spip_lien_ok dans les classes de son conteneur de premier niveau ;
+    // sinon, s'il y a un lien, on l'ajoute classiquement
+    if (
+        strstr(
+            ' ' . ($classes = extraire_attribut($retour, 'class')) . ' ',
+            'spip_lien_ok'
+        )
+    ) {
+        $retour = inserer_attribut(
+            $retour,
+            'class',
+            trim(str_replace(' spip_lien_ok ', ' ', " $classes "))
+        );
+    } else {
+        if ($lien) {
+            $retour = '<a href="' . $lien['href'] . '" class="' . $lien['class'] . '">' . $retour . '</a>';
+        }
+    }
+
+    $compteur--;
+
+    return (isset($arg_list['ajax']) && $arg_list['ajax'] == 'ajax')
+        ? encoder_contexte_ajax($contexte, '', $retour)
+        : $retour;
 }
 
 /**
@@ -728,15 +728,15 @@ 
  * @return array|float|int|mixed|string|string[]|null
  */
 function spip_securise_valeur_env_modele($valeur) {
-	if (is_numeric($valeur) || is_bool($valeur) || is_null($valeur)) {
-		return $valeur;
-	}
-	$valeur = (string)$valeur;
-	if (str_starts_with($valeur, '@') && is_numeric(substr($valeur, 1))) {
-		return $valeur;
-	}
-	// on laisse passer que les \w, les espaces et les -, le reste est supprimé
-	return preg_replace(",[^\w\s-],", "", $valeur);
+    if (is_numeric($valeur) || is_bool($valeur) || is_null($valeur)) {
+        return $valeur;
+    }
+    $valeur = (string)$valeur;
+    if (str_starts_with($valeur, '@') && is_numeric(substr($valeur, 1))) {
+        return $valeur;
+    }
+    // on laisse passer que les \w, les espaces et les -, le reste est supprimé
+    return preg_replace(",[^\w\s-],", "", $valeur);
 }
 
 // Un inclure_page qui marche aussi pour l'espace prive
@@ -745,99 +745,99 @@ 
 // 	recuperer_fond($fond,$contexte,array('raw'=>true))
 function evaluer_fond($fond, $contexte = [], string $connect = '') {
 
-	$page = inclure_page($fond, $contexte, $connect);
-
-	if (!$page) {
-		return $page;
-	}
-	// eval $page et affecte $res
-	include _ROOT_RESTREINT . 'public/evaluer_page.php';
-
-	// Lever un drapeau (global) si le fond utilise #SESSION
-	// a destination de public/parametrer
-	// pour remonter vers les inclusions appelantes
-	// il faut bien lever ce drapeau apres avoir evalue le fond
-	// pour ne pas faire descendre le flag vers les inclusions appelees
-	if (
-		isset($page['invalideurs'])
-		&& isset($page['invalideurs']['session'])
-	) {
-		$GLOBALS['cache_utilise_session'] = $page['invalideurs']['session'];
-	}
-
-	return $page;
+    $page = inclure_page($fond, $contexte, $connect);
+
+    if (!$page) {
+        return $page;
+    }
+    // eval $page et affecte $res
+    include _ROOT_RESTREINT . 'public/evaluer_page.php';
+
+    // Lever un drapeau (global) si le fond utilise #SESSION
+    // a destination de public/parametrer
+    // pour remonter vers les inclusions appelantes
+    // il faut bien lever ce drapeau apres avoir evalue le fond
+    // pour ne pas faire descendre le flag vers les inclusions appelees
+    if (
+        isset($page['invalideurs'])
+        && isset($page['invalideurs']['session'])
+    ) {
+        $GLOBALS['cache_utilise_session'] = $page['invalideurs']['session'];
+    }
+
+    return $page;
 }
 
 
 function page_base_href(&$texte) {
-	static $set_html_base = null;
-	if (is_null($set_html_base)) {
-		if (!defined('_SET_HTML_BASE')) {
-			// si la profondeur est superieure a 1
-			// est que ce n'est pas une url page ni une url action
-			// activer par defaut
-			$set_html_base =
-				$GLOBALS['profondeur_url'] >= (_DIR_RESTREINT ? 1 : 2)
-				&& _request(_SPIP_PAGE) !== 'login'
-				&& !_request('action');
-		} else {
-			$set_html_base = _SET_HTML_BASE;
-		}
-	}
-
-	if (
-		$set_html_base
-		&& isset($GLOBALS['html'])
-		&& $GLOBALS['html']
-		&& $GLOBALS['profondeur_url'] > 0
-		&& ($poshead = strpos($texte, '</head>')) !== false
-	) {
-		$head = substr($texte, 0, $poshead);
-		$insert = false;
-		$href_base = false;
-		if (!str_contains($head, '<base')) {
-			$insert = true;
-		} else {
-			// si aucun <base ...> n'a de href il faut en inserer un
-			// sinon juste re-ecrire les ancres si besoin
-			$insert = true;
-			include_spip('inc/filtres');
-			$bases = extraire_balises($head, 'base');
-			foreach ($bases as $base) {
-				if ($href_base = extraire_attribut($base, 'href')) {
-					$insert = false;
-					break;
-				}
-			}
-		}
-
-		if ($insert) {
-			include_spip('inc/filtres_mini');
-			// ajouter un base qui reglera tous les liens relatifs
-			$href_base = url_absolue('./');
-			$base = "\n<base href=\"$href_base\" />";
-			if (($pos = strpos($head, '<head>')) !== false) {
-				$head = substr_replace($head, $base, $pos + 6, 0);
-			} elseif (preg_match(',<head[^>]*>,i', $head, $r)) {
-				$head = str_replace($r[0], $r[0] . $base, $head);
-			}
-			$texte = $head . substr($texte, $poshead);
-		}
-		if ($href_base) {
-			// gerer les ancres
-			$base = $_SERVER['REQUEST_URI'];
-			// pas de guillemets ni < dans l'URL qu'on insere dans le HTML
-			if (str_contains($base, "'") || str_contains($base, '"') || str_contains($base, '<')) {
-				$base = str_replace(["'",'"','<'], ['%27','%22','%3C'], $base);
-			}
-			if (str_contains($texte, "href='#")) {
-				$texte = str_replace("href='#", "href='$base#", $texte);
-			}
-			if (str_contains($texte, 'href="#')) {
-				$texte = str_replace('href="#', "href=\"$base#", $texte);
-			}
-		}
-	}
+    static $set_html_base = null;
+    if (is_null($set_html_base)) {
+        if (!defined('_SET_HTML_BASE')) {
+            // si la profondeur est superieure a 1
+            // est que ce n'est pas une url page ni une url action
+            // activer par defaut
+            $set_html_base =
+                $GLOBALS['profondeur_url'] >= (_DIR_RESTREINT ? 1 : 2)
+                && _request(_SPIP_PAGE) !== 'login'
+                && !_request('action');
+        } else {
+            $set_html_base = _SET_HTML_BASE;
+        }
+    }
+
+    if (
+        $set_html_base
+        && isset($GLOBALS['html'])
+        && $GLOBALS['html']
+        && $GLOBALS['profondeur_url'] > 0
+        && ($poshead = strpos($texte, '</head>')) !== false
+    ) {
+        $head = substr($texte, 0, $poshead);
+        $insert = false;
+        $href_base = false;
+        if (!str_contains($head, '<base')) {
+            $insert = true;
+        } else {
+            // si aucun <base ...> n'a de href il faut en inserer un
+            // sinon juste re-ecrire les ancres si besoin
+            $insert = true;
+            include_spip('inc/filtres');
+            $bases = extraire_balises($head, 'base');
+            foreach ($bases as $base) {
+                if ($href_base = extraire_attribut($base, 'href')) {
+                    $insert = false;
+                    break;
+                }
+            }
+        }
+
+        if ($insert) {
+            include_spip('inc/filtres_mini');
+            // ajouter un base qui reglera tous les liens relatifs
+            $href_base = url_absolue('./');
+            $base = "\n<base href=\"$href_base\" />";
+            if (($pos = strpos($head, '<head>')) !== false) {
+                $head = substr_replace($head, $base, $pos + 6, 0);
+            } elseif (preg_match(',<head[^>]*>,i', $head, $r)) {
+                $head = str_replace($r[0], $r[0] . $base, $head);
+            }
+            $texte = $head . substr($texte, $poshead);
+        }
+        if ($href_base) {
+            // gerer les ancres
+            $base = $_SERVER['REQUEST_URI'];
+            // pas de guillemets ni < dans l'URL qu'on insere dans le HTML
+            if (str_contains($base, "'") || str_contains($base, '"') || str_contains($base, '<')) {
+                $base = str_replace(["'",'"','<'], ['%27','%22','%3C'], $base);
+            }
+            if (str_contains($texte, "href='#")) {
+                $texte = str_replace("href='#", "href='$base#", $texte);
+            }
+            if (str_contains($texte, 'href="#')) {
+                $texte = str_replace('href="#', "href=\"$base#", $texte);
+            }
+        }
+    }
 }
 
 
@@ -847,7 +847,7 @@ 
  * Ceux spécifiques à SPIP commencent par X-Spip
  */
 function envoyer_entetes($entetes) {
-	foreach ($entetes as $k => $v) {
-		@header(strlen((string) $v) ? "$k: $v" : $k);
-	}
+    foreach ($entetes as $k => $v) {
+        @header(strlen((string) $v) ? "$k: $v" : $k);
+    }
 }

ecrire/public/cacher.php

Indentation +276 added lines, -276 removed lines

@@ -14,7 +14,7 @@ 
 use Spip\Component\Hasher\Hash32;
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -23,24 +23,24 @@ 
  * @internal Temporary fonction until DI in SPIP
  */
 function cache_instance(): CacheInterface {
-	static $cache = null;
-	return $cache ??= new LimitedFilesystem('calcul', _DIR_CACHE);
+    static $cache = null;
+    return $cache ??= new LimitedFilesystem('calcul', _DIR_CACHE);
 }
 
 /**
  * Returns a key cache (id) for this data
  */
 function cache_key(array $contexte, array $page): string {
-	static $hasher = null;
-	$hasher ??= new Hash32();
-	return $hasher->hash([$contexte, $page]) . '.cache';
+    static $hasher = null;
+    $hasher ??= new Hash32();
+    return $hasher->hash([$contexte, $page]) . '.cache';
 }
 
 /**
  * Écrire le cache dans un casier
  */
 function ecrire_cache(string $cache_key, array $valeur): bool {
-	return cache_instance()->set($cache_key, ['cache_key' => $cache_key, 'valeur' => $valeur]);
+    return cache_instance()->set($cache_key, ['cache_key' => $cache_key, 'valeur' => $valeur]);
 }
 
 /**
@@ -49,7 +49,7 @@ 
  * @return null|mixed null: probably cache miss
  */
 function lire_cache(string $cache_key): mixed {
-	return cache_instance()->get($cache_key)['valeur'] ?? null;
+    return cache_instance()->get($cache_key)['valeur'] ?? null;
 }
 
 /**
@@ -58,16 +58,16 @@ 
  * Parano : on signe le cache, afin d'interdire un hack d'injection dans notre memcache
  */
 function cache_signature(&$page): string {
-	if (!isset($GLOBALS['meta']['cache_signature'])) {
-		include_spip('inc/acces');
-		ecrire_meta(
-			'cache_signature',
-			hash('sha256', $_SERVER['DOCUMENT_ROOT'] . ($_SERVER['SERVER_SIGNATURE'] ?? '') . creer_uniqid()),
-			'non'
-		);
-	}
-
-	return (new Hash32())->hash($GLOBALS['meta']['cache_signature'] . $page['texte']);
+    if (!isset($GLOBALS['meta']['cache_signature'])) {
+        include_spip('inc/acces');
+        ecrire_meta(
+            'cache_signature',
+            hash('sha256', $_SERVER['DOCUMENT_ROOT'] . ($_SERVER['SERVER_SIGNATURE'] ?? '') . creer_uniqid()),
+            'non'
+        );
+    }
+
+    return (new Hash32())->hash($GLOBALS['meta']['cache_signature'] . $page['texte']);
 }
 
 /**
@@ -79,14 +79,14 @@ 
  * on positionne un flag gz si on comprime, pour savoir si on doit decompresser ou pas
  */
 function gzip_page(array $page): array {
-	if (function_exists('gzcompress') && strlen((string) $page['texte']) > 16 * 1024) {
-		$page['gz'] = true;
-		$page['texte'] = gzcompress((string) $page['texte']);
-	} else {
-		$page['gz'] = false;
-	}
-
-	return $page;
+    if (function_exists('gzcompress') && strlen((string) $page['texte']) > 16 * 1024) {
+        $page['gz'] = true;
+        $page['texte'] = gzcompress((string) $page['texte']);
+    } else {
+        $page['gz'] = false;
+    }
+
+    return $page;
 }
 
 /**
@@ -97,10 +97,10 @@ 
  * de decompresser deux fois de suite un cache (ce qui echoue)
  */
 function gunzip_page(array &$page): void {
-	if ($page['gz']) {
-		$page['texte'] = gzuncompress($page['texte']);
-		$page['gz'] = false; // ne pas gzuncompress deux fois une meme page
-	}
+    if ($page['gz']) {
+        $page['texte'] = gzuncompress($page['texte']);
+        $page['gz'] = false; // ne pas gzuncompress deux fois une meme page
+    }
 }
 
 /**
@@ -114,72 +114,72 @@ 
  *  - -1 si il faut calculer sans stocker en cache
  */
 function cache_valide(array &$page, int $date): int {
-	$now = $_SERVER['REQUEST_TIME'];
-
-	// Apparition d'un nouvel article post-date ?
-	if (
-		isset($GLOBALS['meta']['post_dates'])
-		&& $GLOBALS['meta']['post_dates'] == 'non'
-		&& isset($GLOBALS['meta']['date_prochain_postdate'])
-		&& $now > $GLOBALS['meta']['date_prochain_postdate']
-	) {
-		spip_log('Un article post-date invalide le cache');
-		include_spip('inc/rubriques');
-		calculer_prochain_postdate(true);
-	}
-
-	if (defined('_VAR_NOCACHE') && _VAR_NOCACHE) {
-		return -1;
-	}
-	if (isset($GLOBALS['meta']['cache_inhib']) && $_SERVER['REQUEST_TIME'] < $GLOBALS['meta']['cache_inhib']) {
-		return -1;
-	}
-	if (defined('_NO_CACHE')) {
-		return (_NO_CACHE == 0 && !isset($page['texte'])) ? 1 : _NO_CACHE;
-	}
-
-	// pas de cache ? on le met a jour, sauf pour les bots (on leur calcule la page sans mise en cache)
-	if (!$page || !isset($page['texte']) || !isset($page['entetes']['X-Spip-Cache'])) {
-		return _IS_BOT ? -1 : 1;
-	}
-
-	// controle de la signature
-	if ($page['sig'] !== cache_signature($page)) {
-		return _IS_BOT ? -1 : 1;
-	}
-
-	// #CACHE{n,statique} => on n'invalide pas avec derniere_modif
-	// cf. ecrire/public/balises.php, balise_CACHE_dist()
-	// Cache invalide par la meta 'derniere_modif'
-	// sauf pour les bots, qui utilisent toujours le cache
-	if (
-		(!isset($page['entetes']['X-Spip-Statique']) || $page['entetes']['X-Spip-Statique'] !== 'oui')
-		&& (
-			!_IS_BOT
-			&& $GLOBALS['derniere_modif_invalide']
-			&& isset($GLOBALS['meta']['derniere_modif'])
-			&& $date < $GLOBALS['meta']['derniere_modif']
-		)
-	) {
-		return 1;
-	}
-
-	// Sinon comparer l'age du fichier a sa duree de cache
-	$duree = (int) $page['entetes']['X-Spip-Cache'];
-	$cache_mark = ($GLOBALS['meta']['cache_mark'] ?? 0);
-	if ($duree == 0) {  #CACHE{0}
-	return -1;
-	} // sauf pour les bots, qui utilisent toujours le cache
-	else {
-		if (
-			!_IS_BOT && $date + $duree < $now
-			|| $date < $cache_mark
-		) {
-			return _IS_BOT ? -1 : 1;
-		} else {
-			return 0;
-		}
-	}
+    $now = $_SERVER['REQUEST_TIME'];
+
+    // Apparition d'un nouvel article post-date ?
+    if (
+        isset($GLOBALS['meta']['post_dates'])
+        && $GLOBALS['meta']['post_dates'] == 'non'
+        && isset($GLOBALS['meta']['date_prochain_postdate'])
+        && $now > $GLOBALS['meta']['date_prochain_postdate']
+    ) {
+        spip_log('Un article post-date invalide le cache');
+        include_spip('inc/rubriques');
+        calculer_prochain_postdate(true);
+    }
+
+    if (defined('_VAR_NOCACHE') && _VAR_NOCACHE) {
+        return -1;
+    }
+    if (isset($GLOBALS['meta']['cache_inhib']) && $_SERVER['REQUEST_TIME'] < $GLOBALS['meta']['cache_inhib']) {
+        return -1;
+    }
+    if (defined('_NO_CACHE')) {
+        return (_NO_CACHE == 0 && !isset($page['texte'])) ? 1 : _NO_CACHE;
+    }
+
+    // pas de cache ? on le met a jour, sauf pour les bots (on leur calcule la page sans mise en cache)
+    if (!$page || !isset($page['texte']) || !isset($page['entetes']['X-Spip-Cache'])) {
+        return _IS_BOT ? -1 : 1;
+    }
+
+    // controle de la signature
+    if ($page['sig'] !== cache_signature($page)) {
+        return _IS_BOT ? -1 : 1;
+    }
+
+    // #CACHE{n,statique} => on n'invalide pas avec derniere_modif
+    // cf. ecrire/public/balises.php, balise_CACHE_dist()
+    // Cache invalide par la meta 'derniere_modif'
+    // sauf pour les bots, qui utilisent toujours le cache
+    if (
+        (!isset($page['entetes']['X-Spip-Statique']) || $page['entetes']['X-Spip-Statique'] !== 'oui')
+        && (
+            !_IS_BOT
+            && $GLOBALS['derniere_modif_invalide']
+            && isset($GLOBALS['meta']['derniere_modif'])
+            && $date < $GLOBALS['meta']['derniere_modif']
+        )
+    ) {
+        return 1;
+    }
+
+    // Sinon comparer l'age du fichier a sa duree de cache
+    $duree = (int) $page['entetes']['X-Spip-Cache'];
+    $cache_mark = ($GLOBALS['meta']['cache_mark'] ?? 0);
+    if ($duree == 0) {  #CACHE{0}
+    return -1;
+    } // sauf pour les bots, qui utilisent toujours le cache
+    else {
+        if (
+            !_IS_BOT && $date + $duree < $now
+            || $date < $cache_mark
+        ) {
+            return _IS_BOT ? -1 : 1;
+        } else {
+            return 0;
+        }
+    }
 }
 
 /**
@@ -193,58 +193,58 @@ 
  */
 function creer_cache(&$page, &$cache_key) {
 
-	// Ne rien faire si on est en preview, debug, ou si une erreur
-	// grave s'est presentee (compilation du squelette, MySQL, etc)
-	// le cas var_nocache ne devrait jamais arriver ici (securite)
-	// le cas spip_interdire_cache correspond a une ereur SQL grave non anticipable
-	if (
-		defined('_VAR_NOCACHE') && _VAR_NOCACHE
-		|| defined('spip_interdire_cache')
-	) {
-		return;
-	}
-
-	// Si la page a un invalideur de session, utiliser un cache_key spécifique
-	if (
-		isset($page['invalideurs'])
-		&& isset($page['invalideurs']['session'])
-	) {
-		// on verifie que le contenu du chemin cache indique seulement
-		// "cache sessionne" ; sa date indique la date de validite
-		// des caches sessionnes
-		if (!$tmp = lire_cache($cache_key)) {
-			spip_log('Creation cache sessionne ' . $cache_key);
-			$tmp = [
-				'invalideurs' => ['session' => ''],
-				'lastmodified' => $_SERVER['REQUEST_TIME']
-			];
-			ecrire_cache($cache_key, $tmp);
-		}
-		$cache_key = cache_key(
-			['cache_key' => $cache_key],
-			['session' => $page['invalideurs']['session']]
-		);
-	}
-
-	// ajouter la date de production dans le cache lui meme
-	// (qui contient deja sa duree de validite)
-	$page['lastmodified'] = $_SERVER['REQUEST_TIME'];
-
-	// compresser le contenu si besoin
-	$pagez = gzip_page($page);
-
-	// signer le contenu
-	$pagez['sig'] = cache_signature($pagez);
-
-	// l'enregistrer, compresse ou non...
-	$ok = ecrire_cache($cache_key, $pagez);
-
-	spip_log((_IS_BOT ? 'Bot:' : '') . "Creation du cache $cache_key pour "
-		. $page['entetes']['X-Spip-Cache'] . ' secondes' . ($ok ? '' : ' (erreur!)'), _LOG_INFO);
-
-	// Inserer ses invalideurs
-	include_spip('inc/invalideur');
-	maj_invalideurs($cache_key, $page);
+    // Ne rien faire si on est en preview, debug, ou si une erreur
+    // grave s'est presentee (compilation du squelette, MySQL, etc)
+    // le cas var_nocache ne devrait jamais arriver ici (securite)
+    // le cas spip_interdire_cache correspond a une ereur SQL grave non anticipable
+    if (
+        defined('_VAR_NOCACHE') && _VAR_NOCACHE
+        || defined('spip_interdire_cache')
+    ) {
+        return;
+    }
+
+    // Si la page a un invalideur de session, utiliser un cache_key spécifique
+    if (
+        isset($page['invalideurs'])
+        && isset($page['invalideurs']['session'])
+    ) {
+        // on verifie que le contenu du chemin cache indique seulement
+        // "cache sessionne" ; sa date indique la date de validite
+        // des caches sessionnes
+        if (!$tmp = lire_cache($cache_key)) {
+            spip_log('Creation cache sessionne ' . $cache_key);
+            $tmp = [
+                'invalideurs' => ['session' => ''],
+                'lastmodified' => $_SERVER['REQUEST_TIME']
+            ];
+            ecrire_cache($cache_key, $tmp);
+        }
+        $cache_key = cache_key(
+            ['cache_key' => $cache_key],
+            ['session' => $page['invalideurs']['session']]
+        );
+    }
+
+    // ajouter la date de production dans le cache lui meme
+    // (qui contient deja sa duree de validite)
+    $page['lastmodified'] = $_SERVER['REQUEST_TIME'];
+
+    // compresser le contenu si besoin
+    $pagez = gzip_page($page);
+
+    // signer le contenu
+    $pagez['sig'] = cache_signature($pagez);
+
+    // l'enregistrer, compresse ou non...
+    $ok = ecrire_cache($cache_key, $pagez);
+
+    spip_log((_IS_BOT ? 'Bot:' : '') . "Creation du cache $cache_key pour "
+        . $page['entetes']['X-Spip-Cache'] . ' secondes' . ($ok ? '' : ' (erreur!)'), _LOG_INFO);
+
+    // Inserer ses invalideurs
+    include_spip('inc/invalideur');
+    maj_invalideurs($cache_key, $page);
 }
 
 /**
@@ -272,132 +272,132 @@ 
  */
 function public_cacher_dist($contexte, &$use_cache, &$cache_key, &$page, &$lastmodified) {
 
-	# fonction de cache minimale : dire "non on ne met rien en cache"
-	# $use_cache = -1; return;
-
-	// Second appel, destine a l'enregistrement du cache sur le disque
-	if (isset($cache_key)) {
-		creer_cache($page, $cache_key);
-		return;
-	}
-
-	// Toute la suite correspond au premier appel
-	$contexte_implicite = $page['contexte_implicite'];
-
-	// Cas ignorant le cache car completement dynamique
-	if (
-		!empty($_SERVER['REQUEST_METHOD']) && $_SERVER['REQUEST_METHOD'] === 'POST'
-		|| _request('connect')
-	) {
-		$use_cache = -1;
-		$lastmodified = 0;
-		$cache_key = '';
-		$page = [];
-
-		return;
-	}
-
-	// Controler l'existence d'un cache nous correspondant
-	$cache_key = cache_key($contexte, $page);
-	$lastmodified = 0;
-
-	// charger le cache s'il existe (et si il a bien le bon hash = anticollision)
-	if (!$page = lire_cache($cache_key)) {
-		$page = [];
-	}
-
-	// s'il est sessionne, charger celui correspondant a notre session
-	if (
-		isset($page['invalideurs'])
-		&& isset($page['invalideurs']['session'])
-	) {
-		$cache_key_session = cache_key(
-			['cache_key' => $cache_key],
-			['session' => spip_session()]
-		);
-		if (
-			($page_session = lire_cache($cache_key_session)) && $page_session['lastmodified'] >= $page['lastmodified']
-		) {
-			$page = $page_session;
-		} else {
-			$page = [];
-		}
-	}
-
-
-	// Faut-il effacer des pages invalidees (en particulier ce cache-ci) ?
-	// ne le faire que si la base est disponible
-	$invalider = false;
-	if (isset($GLOBALS['meta']['invalider']) && spip_connect()) {
-		$invalider = true;
-	}
-
-	// Si un calcul, recalcul [ou preview, mais c'est recalcul] est demande,
-	// on supprime le cache
-	if (
-		defined('_VAR_MODE')
-		&& _VAR_MODE
-		&& (
-			isset($_COOKIE['spip_session'])
-			|| isset($_COOKIE['spip_admin'])
-			|| @file_exists(_ACCESS_FILE_NAME)
-		)
-	) {
-		$page = ['contexte_implicite' => $contexte_implicite]; // ignorer le cache deja lu
-		$invalider = true;
-	}
-	if ($invalider) {
-		include_spip('inc/invalideur');
-		retire_caches($cache_key); # API invalideur inutile
-		cache_instance()->delete($cache_key);
-		if (isset($cache_key_session) && $cache_key_session) {
-			cache_instance()->delete($cache_key_session);
-		}
-	}
-
-	// $delais par defaut
-	// pour toutes les pages sans #CACHE{} hors modeles/ et espace privé
-	// qui sont a cache nul par defaut
-	if (!isset($GLOBALS['delais'])) {
-		if (!defined('_DUREE_CACHE_DEFAUT')) {
-			define('_DUREE_CACHE_DEFAUT', 24 * 3600);
-		}
-		$GLOBALS['delais'] = _DUREE_CACHE_DEFAUT;
-	}
-
-	// determiner la validite de la page
-	if ($page) {
-		$use_cache = cache_valide($page, $page['lastmodified'] ?? 0);
-		// le contexte implicite n'est pas stocke dans le cache, mais il y a equivalence
-		// par le nom du cache. On le reinjecte donc ici pour utilisation eventuelle au calcul
-		$page['contexte_implicite'] = $contexte_implicite;
-		if (!$use_cache) {
-			// $page est un cache utilisable
-			gunzip_page($page);
-
-			return;
-		}
-	} else {
-		$page = ['contexte_implicite' => $contexte_implicite];
-		$use_cache = cache_valide($page, 0); // fichier cache absent : provoque le calcul
-	}
-
-	// Si pas valide mais pas de connexion a la base, le garder quand meme
-	if (!spip_connect()) {
-		if (isset($page['texte'])) {
-			gunzip_page($page);
-			$use_cache = 0;
-		} else {
-			spip_log("Erreur base de donnees, impossible utiliser $cache_key");
-			include_spip('inc/minipres');
-
-			return minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'), ['status' => 503]);
-		}
-	}
-
-	if ($use_cache < 0) {
-		$cache_key = '';
-	}
-
-	return;
+    # fonction de cache minimale : dire "non on ne met rien en cache"
+    # $use_cache = -1; return;
+
+    // Second appel, destine a l'enregistrement du cache sur le disque
+    if (isset($cache_key)) {
+        creer_cache($page, $cache_key);
+        return;
+    }
+
+    // Toute la suite correspond au premier appel
+    $contexte_implicite = $page['contexte_implicite'];
+
+    // Cas ignorant le cache car completement dynamique
+    if (
+        !empty($_SERVER['REQUEST_METHOD']) && $_SERVER['REQUEST_METHOD'] === 'POST'
+        || _request('connect')
+    ) {
+        $use_cache = -1;
+        $lastmodified = 0;
+        $cache_key = '';
+        $page = [];
+
+        return;
+    }
+
+    // Controler l'existence d'un cache nous correspondant
+    $cache_key = cache_key($contexte, $page);
+    $lastmodified = 0;
+
+    // charger le cache s'il existe (et si il a bien le bon hash = anticollision)
+    if (!$page = lire_cache($cache_key)) {
+        $page = [];
+    }
+
+    // s'il est sessionne, charger celui correspondant a notre session
+    if (
+        isset($page['invalideurs'])
+        && isset($page['invalideurs']['session'])
+    ) {
+        $cache_key_session = cache_key(
+            ['cache_key' => $cache_key],
+            ['session' => spip_session()]
+        );
+        if (
+            ($page_session = lire_cache($cache_key_session)) && $page_session['lastmodified'] >= $page['lastmodified']
+        ) {
+            $page = $page_session;
+        } else {
+            $page = [];
+        }
+    }
+
+
+    // Faut-il effacer des pages invalidees (en particulier ce cache-ci) ?
+    // ne le faire que si la base est disponible
+    $invalider = false;
+    if (isset($GLOBALS['meta']['invalider']) && spip_connect()) {
+        $invalider = true;
+    }
+
+    // Si un calcul, recalcul [ou preview, mais c'est recalcul] est demande,
+    // on supprime le cache
+    if (
+        defined('_VAR_MODE')
+        && _VAR_MODE
+        && (
+            isset($_COOKIE['spip_session'])
+            || isset($_COOKIE['spip_admin'])
+            || @file_exists(_ACCESS_FILE_NAME)
+        )
+    ) {
+        $page = ['contexte_implicite' => $contexte_implicite]; // ignorer le cache deja lu
+        $invalider = true;
+    }
+    if ($invalider) {
+        include_spip('inc/invalideur');
+        retire_caches($cache_key); # API invalideur inutile
+        cache_instance()->delete($cache_key);
+        if (isset($cache_key_session) && $cache_key_session) {
+            cache_instance()->delete($cache_key_session);
+        }
+    }
+
+    // $delais par defaut
+    // pour toutes les pages sans #CACHE{} hors modeles/ et espace privé
+    // qui sont a cache nul par defaut
+    if (!isset($GLOBALS['delais'])) {
+        if (!defined('_DUREE_CACHE_DEFAUT')) {
+            define('_DUREE_CACHE_DEFAUT', 24 * 3600);
+        }
+        $GLOBALS['delais'] = _DUREE_CACHE_DEFAUT;
+    }
+
+    // determiner la validite de la page
+    if ($page) {
+        $use_cache = cache_valide($page, $page['lastmodified'] ?? 0);
+        // le contexte implicite n'est pas stocke dans le cache, mais il y a equivalence
+        // par le nom du cache. On le reinjecte donc ici pour utilisation eventuelle au calcul
+        $page['contexte_implicite'] = $contexte_implicite;
+        if (!$use_cache) {
+            // $page est un cache utilisable
+            gunzip_page($page);
+
+            return;
+        }
+    } else {
+        $page = ['contexte_implicite' => $contexte_implicite];
+        $use_cache = cache_valide($page, 0); // fichier cache absent : provoque le calcul
+    }
+
+    // Si pas valide mais pas de connexion a la base, le garder quand meme
+    if (!spip_connect()) {
+        if (isset($page['texte'])) {
+            gunzip_page($page);
+            $use_cache = 0;
+        } else {
+            spip_log("Erreur base de donnees, impossible utiliser $cache_key");
+            include_spip('inc/minipres');
+
+            return minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'), ['status' => 503]);
+        }
+    }
+
+    if ($use_cache < 0) {
+        $cache_key = '';
+    }
+
+    return;
 }

Spacing +6 added lines, -6 removed lines

@@ -33,7 +33,7 @@ 
 function cache_key(array $contexte, array $page): string {
 	static $hasher = null;
 	$hasher ??= new Hash32();
-	return $hasher->hash([$contexte, $page]) . '.cache';
+	return $hasher->hash([$contexte, $page]).'.cache';
 }
 
 /**
@@ -62,12 +62,12 @@ 
 		include_spip('inc/acces');
 		ecrire_meta(
 			'cache_signature',
-			hash('sha256', $_SERVER['DOCUMENT_ROOT'] . ($_SERVER['SERVER_SIGNATURE'] ?? '') . creer_uniqid()),
+			hash('sha256', $_SERVER['DOCUMENT_ROOT'].($_SERVER['SERVER_SIGNATURE'] ?? '').creer_uniqid()),
 			'non'
 		);
 	}
 
-	return (new Hash32())->hash($GLOBALS['meta']['cache_signature'] . $page['texte']);
+	return (new Hash32())->hash($GLOBALS['meta']['cache_signature'].$page['texte']);
 }
 
 /**
@@ -213,7 +213,7 @@ 
 		// "cache sessionne" ; sa date indique la date de validite
 		// des caches sessionnes
 		if (!$tmp = lire_cache($cache_key)) {
-			spip_log('Creation cache sessionne ' . $cache_key);
+			spip_log('Creation cache sessionne '.$cache_key);
 			$tmp = [
 				'invalideurs' => ['session' => ''],
 				'lastmodified' => $_SERVER['REQUEST_TIME']
@@ -239,8 +239,8 @@ 
 	// l'enregistrer, compresse ou non...
 	$ok = ecrire_cache($cache_key, $pagez);
 
-	spip_log((_IS_BOT ? 'Bot:' : '') . "Creation du cache $cache_key pour "
-		. $page['entetes']['X-Spip-Cache'] . ' secondes' . ($ok ? '' : ' (erreur!)'), _LOG_INFO);
+	spip_log((_IS_BOT ? 'Bot:' : '')."Creation du cache $cache_key pour "
+		. $page['entetes']['X-Spip-Cache'].' secondes'.($ok ? '' : ' (erreur!)'), _LOG_INFO);
 
 	// Inserer ses invalideurs
 	include_spip('inc/invalideur');