1 | <?php |
---|
2 | |
---|
3 | /***************************************************************************\ |
---|
4 | * SPIP, Systeme de publication pour l'internet * |
---|
5 | * * |
---|
6 | * Copyright (c) 2001-2014 * |
---|
7 | * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James * |
---|
8 | * * |
---|
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 | \***************************************************************************/ |
---|
12 | |
---|
13 | /** |
---|
14 | * Gestion du calcul des popularités (cron) |
---|
15 | * |
---|
16 | * @plugin Statistiques pour SPIP |
---|
17 | * @license GNU/GPL |
---|
18 | * @package SPIP\Statistiques\Genie |
---|
19 | **/ |
---|
20 | |
---|
21 | if (!defined("_ECRIRE_INC_VERSION")) { |
---|
22 | return; |
---|
23 | } |
---|
24 | |
---|
25 | |
---|
26 | /** |
---|
27 | * Calcule des coefficients de popularité en fonction de l'intervalle |
---|
28 | * écoulé depuis le précédent calcul |
---|
29 | * |
---|
30 | * Popularite, modele logarithmique |
---|
31 | * |
---|
32 | * @param int $duree Intervalle écoulé depuis le précédent calcul |
---|
33 | * @return array { |
---|
34 | * @type float $a Coefficient d'amortissement |
---|
35 | * @type float $b Constante multiplicative |
---|
36 | * } |
---|
37 | **/ |
---|
38 | function genie_popularite_constantes($duree) { |
---|
39 | // duree de demi-vie d'une visite dans le calcul de la popularite (en jours) |
---|
40 | $demivie = 0.5; |
---|
41 | // periode de reference en jours |
---|
42 | $periode = 1; |
---|
43 | // $a est le coefficient d'amortissement depuis la derniere mesure |
---|
44 | $a = pow(2, -$duree/($demivie*24*3600)); |
---|
45 | // $b est la constante multiplicative permettant d'avoir |
---|
46 | // une visite par jour (periode de reference) = un point de popularite |
---|
47 | // (en regime stationnaire) |
---|
48 | // or, magie des maths, ca vaut log(2) * duree journee/demi-vie |
---|
49 | // si la demi-vie n'est pas trop proche de la seconde ;) |
---|
50 | $b = log(2)*$periode/$demivie; |
---|
51 | |
---|
52 | return array($a, $b); |
---|
53 | } |
---|
54 | |
---|
55 | /** |
---|
56 | * Cron de calcul des popularités des articles |
---|
57 | * |
---|
58 | * @uses genie_popularite_constantes() |
---|
59 | * |
---|
60 | * @param int $t |
---|
61 | * Timestamp de la dernière exécution de cette tâche |
---|
62 | * @return int |
---|
63 | * Positif si la tâche a été terminée, négatif pour réexécuter cette tâche |
---|
64 | **/ |
---|
65 | function genie_popularites_dist($t) { |
---|
66 | |
---|
67 | // Si c'est le premier appel, ne pas calculer |
---|
68 | $t = $GLOBALS['meta']['date_popularites']; |
---|
69 | ecrire_meta('date_popularites', time()); |
---|
70 | |
---|
71 | if (!$t) { |
---|
72 | return 1; |
---|
73 | } |
---|
74 | |
---|
75 | $duree = time()-$t; |
---|
76 | list($a, $b) = genie_popularite_constantes($duree); |
---|
77 | |
---|
78 | // du passe, faisons table (SQL) rase |
---|
79 | sql_update('spip_articles', array('maj' => 'maj', 'popularite' => "popularite * $a"), 'popularite>1'); |
---|
80 | |
---|
81 | // enregistrer les metas... |
---|
82 | $row = sql_fetsel('MAX(popularite) AS max, SUM(popularite) AS tot', "spip_articles"); |
---|
83 | ecrire_meta("popularite_max", $row['max']); |
---|
84 | ecrire_meta("popularite_total", $row['tot']); |
---|
85 | |
---|
86 | |
---|
87 | // Une fois par jour purger les referers du jour ; qui deviennent |
---|
88 | // donc ceux de la veille ; au passage on stocke une date_statistiques |
---|
89 | // dans spip_meta - cela permet au code d'etre "reentrant", ie ce cron |
---|
90 | // peut etre appele par deux bases SPIP ne partageant pas le meme |
---|
91 | // _DIR_TMP, sans tout casser... |
---|
92 | |
---|
93 | $aujourdhui = date("Y-m-d"); |
---|
94 | if (($d = $GLOBALS['meta']['date_statistiques']) != $aujourdhui) { |
---|
95 | spip_log("Popularite: purger referer depuis $d"); |
---|
96 | ecrire_meta('date_statistiques', $aujourdhui); |
---|
97 | if (strncmp($GLOBALS['connexions'][0]['type'], 'sqlite', 6) == 0) { |
---|
98 | spip_query("UPDATE spip_referers SET visites_veille=visites_jour, visites_jour=0"); |
---|
99 | } else |
---|
100 | // version 3 fois plus rapide, mais en 2 requetes |
---|
101 | #spip_query("ALTER TABLE spip_referers CHANGE visites_jour visites_veille INT( 10 ) UNSIGNED NOT NULL DEFAULT '0',CHANGE visites_veille visites_jour INT( 10 ) UNSIGNED NOT NULL DEFAULT '0'"); |
---|
102 | #spip_query("UPDATE spip_referers SET visites_jour=0"); |
---|
103 | // version 4 fois plus rapide que la premiere, en une seule requete |
---|
104 | // ATTENTION : peut poser probleme cf https://core.spip.net/issues/2505 |
---|
105 | { |
---|
106 | sql_alter("TABLE spip_referers DROP visites_veille, |
---|
107 | CHANGE visites_jour visites_veille INT(10) UNSIGNED NOT NULL DEFAULT '0', |
---|
108 | ADD visites_jour INT(10) UNSIGNED NOT NULL DEFAULT '0'"); |
---|
109 | } |
---|
110 | } |
---|
111 | |
---|
112 | // et c'est fini pour cette fois-ci |
---|
113 | return 1; |
---|
114 | |
---|
115 | } |
---|
116 | |
---|
117 | ?> |
---|