3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 // --------------------------
16 // Gestion des taches de fond
17 // --------------------------
20 // - la plupart des hebergeurs ne fournissent pas le Cron d'Unix
21 // - les scripts usuels standard sont limites a 30 secondes
24 // Toute connexion a SPIP s'acheve par un appel a la fonction cron()
25 // qui appelle la fonction surchargeable genie dans inc/
26 // Sa definition standard ci-dessous prend dans une liste de taches
27 // la plus prioritaire, leurs dates etant donnees par leur fichier-verrou.
28 // Une fonction executant une tache doit retourner un nombre:
29 // - nul, si la tache n'a pas a etre effecutee
30 // - positif, si la tache a ete effectuee
31 // - negatif, si la tache doit etre poursuivie ou recommencee
32 // Elle recoit en argument la date de la derniere execution de la tache.
34 // On peut appeler cette fonction avec d'autres taches (pour etendre Spip)
35 // specifiee par des fonctions respectant le protocole ci-dessus
36 // On peut modifier la frequence de chaque tache et leur ordre d'analyse
37 // en modifiant les variables ci-dessous.
41 // Les taches sont dans un tableau ('nom de la tache' => periodicite)
42 // Cette fonction execute la tache la plus urgente
43 // (celle dont la date de derniere execution + la periodicite est minimale)
44 // La date de la derniere intervention est donnee par un fichier homonyme,
45 // de suffixe ".lock", modifie a chaque intervention et des le debut
46 // de celle-ci afin qu'un processus concurrent ne la demarre pas aussi.
47 // Les taches les plus longues sont tronconnees, ce qui impose d'antidater
48 // le fichier de verrouillage (avec la valeur absolue du code de retour).
49 // La fonction executant la tache est un homonyme de prefixe "genie_".
50 // Le fichier homonyme du repertoire "genie/" est automatiquement lu
51 // et il est suppose definir cette fonction.
53 // http://doc.spip.org/@inc_genie_dist
54 function inc_genie_dist($taches = array()) {
57 $taches = taches_generales();
59 // Quelle est la tache la plus urgente ?
62 foreach ($taches as $nom => $periode) {
63 $celock = _DIR_TMP
. $nom . '.lock';
64 $date_lock = @filemtime
($celock);
65 if ($date_lock +
$periode < $tmin) {
66 $tmin = $date_lock +
$periode;
71 // debug : si la date du fichier est superieure a l'heure actuelle,
72 // c'est que les serveurs Http et de fichiers sont desynchro.
73 // Ca peut mettre en peril les taches cron : signaler dans le log
74 // (On laisse toutefois flotter sur une heure, pas la peine de s'exciter
76 else if ($date_lock > $t +
3600)
77 spip_log("Erreur de date du fichier $lock : $date_lock > $t !");
81 spip_log('cron: debut '.$tache, 'genie');
83 $cron = charger_fonction($tache, 'genie');
84 $retour = $cron($last);
85 // si la tache a eu un effet : log
87 spip_log("cron: $tache (" . spip_timer('tache') . ") $retour", 'genie');
89 @touch
($lock, 0 - $retour);
95 // Construction de la liste des taches.
96 // la cle est la tache,
97 // la valeur le temps minimal, en secondes, entre deux memes taches
98 // NE PAS METTRE UNE VALEUR INFERIEURE A 30
99 // les serveurs Http n'accordant en general pas plus de 30 secondes
100 // a leur sous-processus
102 // http://doc.spip.org/@taches_generales
103 function taches_generales($taches_generales = array()) {
105 // MAJ des rubriques publiques (cas de la publication post-datee)
106 // est fait au coup par coup a present
107 // $taches_generales['rubriques'] = 3600;
109 // Optimisation de la base
110 $taches_generales['optimiser'] = 3600*48;
112 // cache (chaque 20 minutes => 1/16eme du repertoire cache)
113 $taches_generales['invalideur'] = 1200;
116 if ($GLOBALS['meta']['adresse_neuf'] AND $GLOBALS['meta']['jours_neuf']
117 AND ($GLOBALS['meta']['quoi_de_neuf'] == 'oui'))
118 $taches_generales['mail']= 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
120 // stats : toutes les 5 minutes on peut vider un panier de visites
121 if ($GLOBALS['meta']["activer_statistiques"] == "oui") {
122 $taches_generales['visites'] = 300;
123 $taches_generales['popularites'] = 7200; # calcul lourd
127 if ($GLOBALS['meta']["activer_syndic"] == "oui")
128 $taches_generales['syndic'] = 90;
130 // maintenance (ajax, verifications diverses)
131 $taches_generales['maintenance'] = 3600 * 2;
133 // verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
134 $taches_generales['mise_a_jour'] = 3*24*3600;
136 return pipeline('taches_generales_cron',$taches_generales);
139 // Pas de fichier a part pour une fonction aussi petite:
140 // - elle peut retirer les fichiers perimes
141 // - elle fait appliquer le quota
142 // En cas de quota sur le CACHE/, nettoyer les fichiers les plus vieux
143 // http://doc.spip.org/@genie_invalideur_dist
144 function genie_invalideur_dist($t) {
146 include_spip('inc/invalideur');
147 $encore = appliquer_quota_cache();
149 // si le cache est trop gonfle, redemander la main pour poursuivre