Un peu plus de verifications avant de calculer les statistiques du site :

- ne pas calculer les stats sur perte du fichier .lock (typiquement lors d'un upgrade... qui a dit "trop tard" ?)
- bloquer les cron via un lock SQL, afin de permettre d'exploiter une meme base MySQL avec des installations de SPIP différentes (ne règle pas entièrement la question, il reste le cache)

ecrire/inc_cron.php3

@@ -25,7 +25,7 @@ define("_ECRIRE_INC_CRON", "1");
 
 // Solution:
 // les scripts usuels les plus brefs, en plus de livrer la page demandee,
-// s'achevent  par un appel à la fonction spip_cron.
+// s'achevent  par un appel a la fonction spip_cron.
 // Celle-ci prend dans la liste des taches a effectuer la plus prioritaire.
 // Une seule tache est executee pour eviter la guillotine des 30 secondes.
 // Une fonction executant une tache doit retourner un nombre:
@@ -78,7 +78,12 @@ function spip_cron($taches=array()) {
 		clearstatcache();
 		$last = @filemtime($lock);
 
-		if (spip_touch($lock, $frequence_taches[$tache])) {
+		// On opere un double lock : un dans _DIR_SESSIONS, pour les hits
+		// (en parallele sur le meme site) ; et un autre dans la base de
+		// donnees, de maniere a eviter toute concurrence entre deux SPIP
+		// differents partageant la meme base (replication de serveurs Web)
+		if (spip_touch($lock, $frequence_taches[$tache])
+		AND spip_get_lock('cron'.$tache)) {
 			spip_timer('tache');
 			include_ecrire('inc_' . $tache . _EXTENSION_PHP);
 			$fonction = 'cron_' . $tache;
@@ -89,12 +94,12 @@ function spip_cron($taches=array()) {
 					# modifier la date du fichier
 					@touch($lock, (0 - $code_de_retour));
 					spip_log($msg . " (en cours, " . spip_timer('tache') .")");
-					spip_timer('tache');
 				}
 				else
 					spip_log($msg . " (" . spip_timer('tache') . ")");
 				break;
 			}
+			spip_release_lock('cron'.$tache);
 		}
 	}
 }
@@ -205,10 +210,13 @@ function cron_popularites($t) {
 }
 
 function cron_visites($t) {
-	calculer_visites();
+	// Si le fichier .lock est absent, ne pas calculer (mais reparer la date
+	// du .lock de maniere a commencer a 00:00:01 demain).
+	if ($t) calculer_visites();
+
 	// il vaut mieux le lancer peu apres minuit, 
-	// donc on retourne "aujourd'hui a 0h 0m 1s 
-	// pour etre appele demain a cette heure
+	// donc on pretend avoir ete execute precisement "ce matin a 00:00:01"
+	// pour etre appele demain a la meme heure
 	return 0 - (strtotime(date("d F Y", time()))+60);
 }
 

ecrire/inc_visites.php3

@@ -15,55 +15,70 @@
 if (defined("_ECRIRE_INC_VISITES")) return;
 define("_ECRIRE_INC_VISITES", "1");
 
-function calculer_visites($date = "") {
+function calculer_visites($t) {
 
-	// Date par defaut = hier
-	if (!$date) $date = date("Y-m-d", time() - 24 * 3600);
+	// La date des enregistrements de spip_visites_temp correspond a la veille
+	// du calcul.
+	$hier = date("Y-m-d", time() - 24*3600);
 
-	// Sur tout le site, nombre de visiteurs uniques pendant la journee
+	// Sur tout le site, nombre de visiteurs uniques pendant la periode
+	// qui precede (normalement, une journee)
 	$query = "SELECT COUNT(DISTINCT ip) AS total_visites FROM spip_visites_temp";
 	$result = spip_query($query);
 	if ($row = @spip_fetch_array($result))
 		$total_visites = $row['total_visites'];
 	else
 		$total_visites = 0;
-	$query_insert = "INSERT INTO spip_visites (date, visites) VALUES ('$date', $total_visites)";
-	$result_insert = spip_query($query_insert);
+	spip_query("INSERT IGNORE INTO spip_visites
+		(date, visites) VALUES ('$hier', 0)");
+	spip_query("UPDATE spip_visites SET visites = visites+$total_visites
+		WHERE date='$hier'");
 
 	// Nombre de visiteurs uniques par article
-	$query = "SELECT COUNT(DISTINCT ip) AS visites, id_objet FROM spip_visites_temp ".
-		"WHERE type='article' GROUP BY id_objet";
+	$query = "SELECT COUNT(DISTINCT ip) AS visites, id_objet
+		FROM spip_visites_temp WHERE type='article' GROUP BY id_objet";
 	$result = spip_query($query);
 
-	$visites_insert = "";
-	$visites_update = "";
+	$visites_insert = array();
+	$visites_update = array();
 
 	while ($row = @spip_fetch_array($result)) {
 		$id_article = $row['id_objet'];
 		$visites = $row['visites'];
-
 		$visites_update[$visites][] = $id_article;
-		$visites_insert[] = "('$date', $id_article, $visites)";
 	}
 
 	$query_effacer = "DELETE FROM spip_visites_temp";
 	$result_effacer = spip_query($query_effacer);
 
 	// Mise a jour de la base
-	if (is_array($visites_update)) {
-		while (list($visites, $articles) = each($visites_update)) {
-			$query = "UPDATE spip_articles SET maj=maj, visites = visites + $visites ".
-				"WHERE id_article IN (".join(', ', $articles).")";
-			$result = spip_query($query);
-		}
+	foreach ($visites_update as $visites => $articles) {
+		// Augmenter les stats totales des articles
+		spip_query("UPDATE spip_articles SET maj=maj,
+			visites = visites + $visites
+			WHERE id_article IN (".join(',', $articles).")");
+		// Inserer des visites pour la journee (si pas deja fait)
+		$insert = "('$hier',0,". join ("),('$hier',0,", $articles) . ')';
+		spip_query("INSERT IGNORE INTO spip_visites_articles
+			(date, visites, id_article) VALUES $insert");
+		// Augmenter les stats des visites de la journee
+		spip_query("UPDATE spip_visites_articles
+			SET visites=visites+$visites WHERE date='$hier'
+			AND id_article IN (".join(',', $articles).")");
 	}
-	if (is_array($visites_insert)) {
-		$query_insert = "INSERT IGNORE INTO spip_visites_articles (date, id_article, visites) ".
-				"VALUES ".join(', ', $visites_insert);
-		$result_insert = spip_query($query_insert);
+
+	// Une fois par jour purger les referers du jour ; qui deviennent
+	// donc ceux de la veille ; au passage on stocke une date_statistiques
+	// dans spip_meta - cela permet au code d'etre "reentrant", ie ce cron
+	// peut etre appele par deux bases SPIP ne partageant pas le meme
+	// _DIR_SESSIONS, sans tout casser...
+	$aujourdhui = date("Y-m-d");
+	if ($date_referers = lire_meta('date_statistiques')
+	AND $date_referers != $aujourdhui) {
+		spip_query("UPDATE spip_referers SET visites_veille=visites_jour, visites_jour=0");
 	}
-		# purger les referers du jour qui deviennent ceux de la veille
-	spip_query("UPDATE spip_referers SET visites_veille=visites_jour, visites_jour=0");
+	ecrire_meta('date_statistiques', $aujourdhui);
+	ecrire_metas();
 	return 1;
 }