Changeset 112506 in spip-zone

Timestamp:

Nov 22, 2018, 12:22:29 PM (3 weeks ago)

Author:

jluc@…

Message:

nouveau filtre de cache : assertsession pour mise au point avec macrosession + debug + plus grande souplesse dans les arguments de #CACHE

Location:

_plugins_/cachelab/trunk

Files:

• inc/cachelab_invalideur.php (modified) (3 diffs)
• paquet.xml (modified) (1 diff)
• public/cachelab_balises.php (modified) (6 diffs)

_plugins_/cachelab/trunk/inc/cachelab_invalideur.php

@@ -88 +88 @@
 }
 
+//
+// Surcharge de maj_invalideurs
 // le core indique : "Calcul des pages : noter dans la base les liens d'invalidation"
 //
@@ -96 +98 @@
 // http://code.spip.net/@maj_invalideurs
 //
-// S'il y a une entete X-Spip-Methode-Duree-Cache, on récupère la méthode
-// et on appelle la fonction cachelab_calcule_duree_cache_lamethode avec le paramètre $page
-// On corrige alors la durée du cache avec la valeur retournée
+// S'il y a une entete X-Spip-Methode-Duree-Cache on récupère la méthode
+// et on appelle la fonction cachelab_calcule_duree_cache_lamethode 
+// avec en argument la valeur de l'argument dans l'envt ou de date_creation par défaut
+// On corrige alors la durée du cache avec la valeur retournée.
 //
+// S'il y a une entete X-Spip-Filtre-Cache on récupère le filtre
+// et on l'appelle avec le cache entier en argument
+// Le filtre peut modifier n'importe quelle partie du cache, métadonnée ou résultat de compilation.
+//
+
+define ('LOG_INVALIDATION_CORE', true);
 function maj_invalideurs($fichier, &$page) {
 global $Memoization;
@@ -107 +116 @@
                 // Abondamment appelé. À part pour pas noyer les autres
                 spip_log ("maj_invalideurs($fichier, &page)", "invalideur_core_maj_invalideurs");
+                spip_log ("maj_invalideurs($fichier, &page)\n".print_r($page,1), "invalideur_core_maj_invalideurs_details");
         }
 

_plugins_/cachelab/trunk/paquet.xml

@@ -2 +2 @@
         prefix="cachelab"
         categorie="outil"
-        version="0.5.0"
+        version="0.5.1"
         etat="dev"
         compatibilite="[3.0.0;3.2.*]"

_plugins_/cachelab/trunk/public/cachelab_balises.php

@@ -43 +43 @@
 
                 $t = trim($p->param[0][1][0]->texte);
-                if (_request('debug')) echo "t=$t<br>";
                 if (preg_match(',^[0-9],', $t)) {
+                        ++$i;
                         $duree = valeur_numerique($pd = $p->param[0][1][0]->texte);
 
@@ -61 +61 @@
                                         . "'.'>'";
                         }
-                        ++$i;
-                }
-                elseif (_request('debug')) 
-                        echo "t=$t<br>";
+                }
 
                 // recuperer les parametres suivants
+                // C'est analyse_resultat_skel qui transforme les headers du code en tableau $headers
+                // S'il y a plusieurs fois la mm entete, seule la dernière valeur est retenue
+                //
                 while (isset($p->param[0][++$i])) {
                         $pa = ($p->param[0][$i][0]->texte);
@@ -73 +73 @@
                                 and $duree > 0
                         ) {
-                                $code .= ".'<'.'" . '?php header("Cache-Control: max-age='
+                                $code = ".'<'.'" . '?php header("Cache-Control: max-age='
                                         . $duree
                                         . '"); ?' . "'.'>'";
@@ -86 +86 @@
                         }
 
+                        $concat = (trim($code) ? '.' : '');
+
                         if (strpos($pa, 'duree-')===0) {
                                 $methode = substr($pa, 6);
-                                $ajout = ".'<'.'" . '?php header("X-Spip-Methode-Duree-Cache: '.$methode.'"); ?' . "'.'>'";
-                                $code .= $ajout;
-                                spip_log ("Méthode de calcul de la durée du cache : $methode", 'cachelab');
+                                $ajout = "'<'.'" . '?php header("X-Spip-Methode-Duree-Cache: '.$methode.'"); ?' . "'.'>'";
+                                $code .= $concat.$ajout;
+                                spip_log ("#CACHE avec méthode de calcul de la durée du cache : $methode", 'cachelab');
+                                spip_log ("#CACHE avec méthode de calcul de la durée du cache : $methode  donne code=$code", 'cachelab_details');
                         }
 
                         if (strpos($pa, 'filtre-')===0) {
                                 $methode = substr($pa, 7);
-                                $ajout = ".'<'.'" . '?php header("X-Spip-Filtre-Cache: '.$methode.'"); ?' . "'.'>'";
-                                $code .= $ajout;
-                                spip_log ("Filtre sur le cache APC : $methode", 'cachelab');
+                                $ajout = "'<'.'" . '?php header("X-Spip-Filtre-Cache: '.$methode.'"); ?' . "'.'>'";
+                                $code .= $concat.$ajout;
+                                spip_log ("#CACHE avec filtre sur le cache APC : $methode", 'cachelab');
+                                spip_log ("#CACHE avec filtre sur le cache APC : $methode donne code=$code", 'cachelab_details');
                         }
                 }
@@ -165 +169 @@
 //
 function cachelab_filtre_log($cache, $arg) {
-        if (!is_array($cache) or !isset($cache['source'])) {
+        if (!is_array($cache) or !isset($cache['source']) or !isset($cache['lastmodified']) or !isset($cache['invalideurs'])) {
                 spip_log ("cachelab_duree_progapprox ne reçoit pas un cache mais".print_r($cache,1), "cachelab_assert");
                 return null;
@@ -186 +190 @@
         spip_log ("cache[$arg] : ".print_r($c,1), "cachelab_".$source_file);
 }
+
+//
+// Assertions sur le fait que le cache est sessionné ou non
+// et que l'internaute est identifié ou non
+//
+// Arguments possibles : oui, non, login, anonyme, log
+// usages :
+// #CACHE{3600, filtre-assertsession non} s'assure que les emplois sont non-sessionnés
+// #CACHE{filtre-assertsession oui} s'assure que tous les emplois sont sessionnés
+// #CACHE{filtre-assertsession login} s'assure que tous les emplois sont sessionnés avec un internaute identifié
+// #CACHE{filtre-assertsession anonyme} s'assure que tous les emplois se font avec un internaute identifié
+// Dans le cas où un assert n'est pas vérifié, un log est créé dans le fichier cachelab_assertsession
+//
+// Une dernière valeur de l'argument n'induit pas une assertion mais un log :
+// #CACHE{filtre-assertsession log} crée un log avec l'état de la session pour chaque instance du cache
+//
+// Utile pour optimiser avec plugin macrosession et vérifier que ça se passe bien, et durablement, comme prévu
+//
+function cachelab_filtre_assertsession ($cache, $arg) {
+        if (!is_array($cache) or !isset($cache['source']) or !isset($cache['lastmodified']) or !isset($cache['invalideurs'])) {
+                spip_log ("cachelab_filtre_assertsession ne reçoit pas un cache mais".print_r($cache,1), "cachelab_assert");
+                return null;
+        }
+        $source = $cache['source']; 
+        $source_file = str_replace(array('/','.'), '_', $source);
+        $arg=trim($arg);
+        
+        $invalideurs = $cache['invalideurs'];
+
+        // on teste l'invalideur session
+        // On pourrait aussi tester par le nom du cache avec '/_([0-9a-f]{8}|)$/i' ?
+
+        switch ($arg) {
+        case 'login' :
+                $ok = !empty($invalideurs['session']); // def et non vide
+                break;
+        case 'anonyme' :
+                $ok = empty($invalideurs['session']);   // undef ou vide
+                break;
+        case 'oui' :
+                $ok = isset($invalideurs['session']);   // défini, mais peut être vide
+                break;
+        case 'non' :
+                $ok = !isset($invalideurs['session']);  // non défini
+                break;
+        case 'log' :
+                if (!isset($invalideurs['session']))
+                        $log = 'non';
+                elseif ($invalideurs['session'])
+                        $log = 'oui_login';
+                else
+                        $log = 'oui_anonyme';
+                $ok = true;
+                spip_log ("session ? $log", "cachelab_".$source_file);
+                break;
+        default:
+                $ok = false;
+                $arg .= " : valeur incorrecte";
+                break;
+        }
+        if (!$ok)
+                spip_log ("$source : assertsession n'est pas $arg. invalideurs=".print_r($invalideurs,1), "cachelab_assertsession");
+        else
+                spip_log ("$source : assertsession est $arg. invalideurs=".print_r($invalideurs,1), "cachelab_assertsession_ok");
+}