#CACHE{0}
[(#REM)
Afficher des stats dans l'admin avec des boucles data :
- Le nombre de visites sur la période (en ce moment | aujourd'hui | hier )
- Les articles lus sur la période, ordonnés par nombre de visites
- Les domaines affulents sur la période (éventuellement par article), ordonnés par nombre de visites

	Array
		a2192 => Array
			visites => 1557

		a58360 => Array
			visites => 787

- Les domaines affluents (éventuellement d'un article) et leurs liens entrant, ordonnés par leur nombre de visites.
	Array
		monsite => Array
			visites => 1
			sites_affluents => Array
				0 => http://www.monsite.net/Organisations.html

]
[(#ENV{objet,''}|=={article}|oui)
[(#ENV{id_objet}|setenv{id_article})]
]

[(#REM) types de sites affluents) ]

[(#SET{reg_moteurs,^([(#VAL|regexp_moteurs)])$})]
#SET{reg_reseaux_sociaux,"Facebook|^t$|Mamot|Twitter"}
#SET{reg_emails,"outlook"}

[(#REM) Régler la date (actuellement, aujourd'hui, hier) ]

[(#REM) Aujourd'hui : date du jour ]
#SET{date,#DATE|affdate{Y-m-d}}

[(#REM) Actuellement : date du fichier de visite le plus recemment modifié ]
<BOUCLE_derniere_visite(DATA){si #ENV{jour}|non}{source ls,#CHEMIN{tmp/visites}/*}{!par mtime}{0,1}>
#SET{date,#VAL{Y-m-d H:i:s}|date{#MTIME}}
#SET{maj,#GET{date}}
</BOUCLE_derniere_visite>

[(#REM) Hier : date de la veille ]
[(#ENV{jour}|=={veille}|oui) #SET{date,#VAL{Y-m-d}|date{#VAL{-1 day}|strtotime} ]

[(#REM) Peupler les tableaux de stats (articles, domaines affluents) ]

#SET{articles_lus,#ARRAY}
#SET{sites_affluents,#ARRAY}
#SET{referers_articles,#ARRAY}

#SET{reg_domaine,"^[a-zA-Z_-]+://([a-zA-Z]+\.)?([a-zA-Z]+\.)?([a-zA-Z0-9-_]+)\.((?:com|co)\.)?([a-zA-Z]{2,3})"}

[(#REM) Si la période n'est pas précisée parcourir les fichiers de visites en cours dans tmp/visites et enregistrer les données dans des tableaux (articles lus, sites affluents, et nombre de visites sur les articles) ]

<BOUCLE_visites(DATA){source ls,#EVAL{_DIR_TMP . 'visites'}/*}{si #ENV{jour}|non}> [(#REM) <hr>#FILE<hr>] <BOUCLE_visite(DATA){source file,#FILE}> <BOUCLE_pages_vues(DATA){source table,#VALEUR|unserialize}>[(#REM) #CLE -> [(#VALEUR|print)]<br>]
#SET{type,#CLE|explode{"	"}|table_valeur{0}}
#SET{id,#CLE|explode{"	"}|table_valeur{1}}
#SET{referrer,#CLE|explode{"	"}|table_valeur{2}}

[(#REM)
	Récupérer les articles lus ordonnés par nombre de visites
]
[(#GET{type}|=={article}|oui)
	#SET{valeurs_actuelles,#GET{articles_lus}|table_valeur{a#GET{id}}|sinon{#ARRAY}}
	#SET{nb_visites,#GET{articles_lus}|table_valeur{a#GET{id}}|table_valeur{visites}|plus{1}}
	#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{visites,#GET{nb_visites}}}}
	#SET{ajout,#ARRAY{a#GET{id},#GET{valeurs_actuelles}}}

	[(#ENV{id_article}|non)
		#SET{articles_lus,#GET{articles_lus}|array_merge{#GET{ajout}}}
	]
	[(#ENV{id_article}|oui)
		[(#ENV{id_article}|=={#GET{id}}|oui)
			#SET{articles_lus,#GET{articles_lus}|array_merge{#GET{ajout}}}
		]
	]
]

[(#REM)
	Récupérer les sites affluents ordonnés par leur nombre de visites, et garder les referrers.
]
[(#GET{referrer}|oui)

	#SET{domaine,#GET{referrer}|url2domaine}
	#SET{valeurs_actuelles,#GET{sites_affluents}|table_valeur{#GET{domaine}}|sinon{#ARRAY}}

	#SET{nb_visites,#GET{valeurs_actuelles}|table_valeur{visites}|plus{1}}
	#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{visites,#GET{nb_visites}}}}

	#SET{referers_actuels,#GET{valeurs_actuelles}|table_valeur{referers}|sinon{#ARRAY}}
	#SET{referers,#GET{referers_actuels}|push{#GET{referrer}}}
	#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{referers,#GET{referers}}}}

	#SET{ajout,#ARRAY{#GET{domaine},#GET{valeurs_actuelles}}}

	[(#ENV{id_article}|non)
		#SET{sites_affluents,#GET{sites_affluents}|array_merge{#GET{ajout}}}
	]
	[(#ENV{id_article}|=={#GET{id}}|oui)
		#SET{sites_affluents,#GET{sites_affluents}|array_merge{#GET{ajout}}}
	]
]
</BOUCLE_pages_vues></BOUCLE_visite></BOUCLE_visites>
#SET{visites,#TOTAL_BOUCLE}
</B_visites>

	[(#REM)
		Cas alternatif avec période précisée : on regarde non pas dans les fichiers de session mais dans la BDD.
		A refaire avec la boucle date stats_referers_to_array du plugin statistiques ?
	]

	[(#REM) Aujourd'hui / hier = boucle data sql pour obtenir les infos à la date demandée. ]

	#SET{reqd,#VAL{"select * from spip_visites where date='LADATE' order by maj desc limit 0,1"}|replace{LADATE,#GET{date}}}

	<BOUCLE_visites_jour(DATA){si #ENV{jour}}{source sql,#GET{reqd}}>
	#SET{visites,#VISITES}
	#SET{maj,#MAJ}

	[(#SET{req,select * from spip_visites_articles where date=[(#DATE|affdate{Y-m-d}|_q)] order by visites desc})]

	#SET{demain,#VAL{Y-m-d}|date{#VAL{+1 day}|strtotime{#DATE|strtotime}}
	[(#SET{select,[(#VAL{"select visites_JOUR visites, referer"}|replace{JOUR,[(#ENV{jour})]})]})]
	[(#SET{periode,[(#VAL{"visites_JOUR"}|replace{JOUR,[(#ENV{jour})]})]})]

	[(#SET{req_affluents,[(#GET{select})] from spip_referers where [(#GET{periode})] > 0 order by [(#GET{periode})] desc })]

	[(#REM) si article dans le contexte on précise ]
	#SET{lendemain,#VAL{Y-m-d}|date{#VAL{+1 day}|strtotime{#GET{date}|strtotime}}}
	[(#ENV{id_article}|oui)
		[(#SET{req,select * from spip_visites_articles where date=[(#GET{date}|affdate{Y-m-d}|_q)] and id_article=[(#ENV{id_article})] order by visites desc})]
		[(#SET{req_affluents,[(#GET{select})] from spip_referers_articles where [(#GET{periode})] > 0 and id_article=[(#ENV{id_article})] order by [(#GET{periode})] desc })]
	]
	</BOUCLE_visites_jour>
	[(#REM)
		<hr>
		[(#GET{req})]
		<hr>
		[(#GET{req_affluents})]
		<hr>
	]
	<BOUCLE_articles_jour(DATA){source sql,#GET{req}}>

		#SET{valeurs_actuelles,#GET{articles_lus}|table_valeur{a#ID_ARTICLE}|sinon{#ARRAY}}

		#SET{nb_visites,#GET{articles_lus}|table_valeur{a#ID_ARTICLE}|table_valeur{visites}|plus{#VISITES}}
		#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{visites,#GET{nb_visites}}}}

		#SET{ajout,#ARRAY{a#ID_ARTICLE,#GET{valeurs_actuelles}}}
		#SET{articles_lus,#GET{articles_lus}|array_merge{#GET{ajout}}}

	</BOUCLE_articles_jour>

	#SET{domaines,#ARRAY}
	#SET{valeurs_actuelles,#ARRAY}
	[(#REM) Referers qui ont envoyé des visites dans la période ]
	<BOUCLE_affluents_jour_(DATA){source sql,#GET{req_affluents}}>

		#SET{domaine,#REFERER|url2domaine}
		#SET{valeurs_actuelles,#GET{sites_affluents}|table_valeur{#GET{domaine}}|sinon{#ARRAY}}

		#SET{nb_visites,#GET{valeurs_actuelles}|table_valeur{visites}|plus{#VISITES}}
		#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{visites,#GET{nb_visites}}}}

		#SET{referers_actuels,#GET{valeurs_actuelles}|table_valeur{referers}|sinon{#ARRAY}}
		#SET{referers,#GET{referers_actuels}|push{#REFERER}}
		#SET{valeurs_actuelles,#GET{valeurs_actuelles}|array_merge{#ARRAY{referers,#GET{referers}}}}

		#SET{ajout,#ARRAY{#GET{domaine},#GET{valeurs_actuelles}}}

		#SET{sites_affluents,#GET{sites_affluents}|array_merge{#GET{ajout}}}

	</BOUCLE_affluents_jour_>
<//B_visites>

[(#ENV{id_article}|oui) #SET{visites,#GET{articles_lus}|table_valeur{a#ENV{id_article}}|table_valeur{visites}} ]

[(#REM)
	Affichage final des données enregistrées dans les tableaux.
]

<style type="text/css">
#data_stats{
	margin:0 0 40px 0;
}
#data_stats li > p{
	margin-left:10px;
}
#data_stats > li {
	float:left;
	width:33%;
	list-style-type:none;
}
#data_stats ul{
	margin:0;
	padding:0;
	list-style-type:none;
}
.statistique{
	text-align:center;
	height:8em;
}
.statistique > .valeur{
	margin-top: 0.3em;
	font-size:3.8em;
	font-weight:bold;
	line-height: 1em;
	text-align:center;
}
.onglets_simple ul li{
	display:inline;
}
ul.valeur{
	max-height:15em;
	overflow:auto;
	text-align:left;
}
.stats_visites .valeur{
	max-height:40em;
}
.stats_contenu p{
	margin:0 0 20px 0;
}
.queue.leu-leu{
	margin-top:1em;
}
.queue.leu-leu > div{
	float:left;
	margin-right:3em;
}
#conteneur_stats{
	clear: both;
}
.queue.leu-leu .onglets_simple{
	margin:0;
}
.marge{
	margin:0.4em 0;
}
.domaines.connus{
	text-align:left;
}
.affluents dt{
	font-weight:bold;
}
.affluents dd{
	height:200px;
	overflow:auto;
}
.stats_contenu > h3 {
	margin-top:20px;
}
.stats_contenu > h3.premier {
	margin-top:0;
}

dl.liste_affluents {
	max-height:15em;
	overflow:auto;
	margin: 0.75em 0;
	padding: 0 1em;
}

dl.liste_affluents > dt:before {
	content: "";
	border-color: transparent #111;
	border-style: solid;
	border-width: 0.35em 0 0.35em 0.45em;
	display: block;
	height: 0;
	width: 0;
	left: -0.8em;
	top: 0.8em;
	position: relative;
}

dl.liste_affluents > dt {
	line-height:0.9em;
	cursor:pointer;
}

dl.liste_affluents > dd {
	display:none;
}

</style>

[(#REM) Menu date ]

<div class="queue leu-leu">
	<div>
		<div class="onglets_simple clearfix">
			<ul>
				<li>[(#SELF|parametre_url{jour,''}|lien_ou_expose{En ce moment,[(#ENV{jour,''}|non)],ajax})]</li>
				<li>[(#SELF|parametre_url{jour,jour}|lien_ou_expose{<:date_aujourdhui|ucfirst:>,#ENV{jour,''}|=={jour},ajax})]</li>
				<li>[(#SELF|parametre_url{jour,veille}|lien_ou_expose{<:date_hier|ucfirst:>,#ENV{jour,''}|=={veille},ajax})]</li>
			</ul>
		</div>
	</div>
	<div>
		<div class="marge">
			[<h2><a href="[(#SELF|parametre_url{id_article,''})]" class="ajax">(#GET{date}|affdate)</a><small title="Dernière mise à jour le [(#GET{maj}|affdate)] [ (#GET{maj}|affdate{H\hi s})s]"> — [ (#GET{maj}|affdate{H\hi}|sinon{/na})</small>]</h2>]
		</div>
	</div>
	<div>
		<div class="marge">
			<h3><BOUCLE_titre(ARTICLES){id_article=#ENV{id_article}}><a href="#URL_ARTICLE">[(#TITRE|couper{25})]</a></BOUCLE_titre>Tous les articles lus<//B_titre></h3>
		</div>
	</div>
</div>

[(#REM) Afficher les tableaux ]

[(#REM)
[<pre><code>(#GET{articles_lus}|print_r{1})</code></pre>]
[<pre><code>(#GET{reg_moteurs})</code></pre>]
[<pre><code>(#GET{sites_affluents}|print_r{1})</code></pre>]
]

#SET{reg_site,#URL_SITE_SPIP|match{#GET{reg_domaine},"i",3}}
[(#SET{reg_domaines_connus,[(#GET{reg_moteurs})]|[(#GET{reg_reseaux_sociaux})]|[(#GET{reg_site})]})]

<BOUCLE_total_visites_domaine(DATA){source table,#GET{sites_affluents}}>
	#SET{total,#GET{total}|plus{#VISITES}}
	[(#CLE|match{#GET{reg_moteurs},"i"}|oui) #SET{total_moteurs,#GET{total_moteurs}|plus{#VISITES}} ]
	[(#CLE|match{#GET{reg_reseaux_sociaux}}|oui) #SET{total_reseaux_sociaux,#GET{total_reseaux_sociaux}|plus{#VISITES}} ]
	[(#CLE|match{#GET{reg_domaines_connus}}|non) #SET{total_autres_affluents,#GET{total_autres_affluents}|plus{#VISITES}} ]
</BOUCLE_total_visites_domaine>
#SET{domaines_connus,#ARRAY{Moteurs de recherche,#GET{total_moteurs},Réseaux sociaux,#GET{total_reseaux_sociaux},Autres affluents,#GET{total_autres_affluents}}}

<div id="conteneur_stats">

	[(#REM) Afficher les données du tableau ]

	<ul id="data_stats">

		#SET{stat,#GET{visites}|number_format{0,""," "}}
		#SET{milliers,#GET{stat}|match{(\d+ )(\d)\d\d,u,1}}
		#SET{centaines,#GET{stat}|match{(\d+) (\d)\d\d,u,2}}

		[(#GET{milliers}|oui)
			#SET{stat_court,#GET{milliers}|trim|concat{","}|concat{#GET{centaines}&nbsp;K}|replace{",0"}}
		]
		[(#GET{milliers}|non)
			#SET{stat_court,#GET{stat}}
		]
		<li>
			<div class="stats_contenu" style="padding-right:20px;">

				<div class="statistique">
					<div class="valeur" title="[(#GET{stat})] visites">[(#GET{stat_court})]</div>
					<div class="description">
						<strong>visite[(#GET{stat}|>{1}|?{s})]</strong>
						<BOUCLE_plus_vielle_visite_en_cours(DATA){si #ENV{jour}|non}{source ls,#CHEMIN{tmp/visites}/*}{par mtime}{0,1}>
							<br><small title="[Visite inactive vue (#VAL{Y-m-d H:i:s}|date{#MTIME}|date_interface)]">en&nbsp;cours</small>
						</BOUCLE_plus_vielle_visite_en_cours>
					</div>
				</div>

				<h3 class="premier">Origine des visites</h3>
				<ul>
					<BOUCLE_domaines_connus(DATA){source table,#GET{domaines_connus}}{!par valeur}>
					<li>#CLE : [(#VALEUR|number_format{0,""," "})] visite[(#VALEUR|>{1}|?{s})] <small>([(#VALEUR|div{#GET{visites}}|mult{100}|floor)%])</small></li>
					</BOUCLE_domaines_connus>
				</ul>
				#SET{reg_recherche,^.*recherche=}
				<BOUCLE_recherches(DATA){source table,#GET{sites_affluents}}{cle==#GET{reg_site}}>
					<B_recherche>
					#ANCRE_PAGINATION
					<h3>[(#VISITES|number_format{0,""," "})] terme[(#VISITES|>{1}|?{s})] recherché[(#VISITES|>{1}|?{s})]</h3>
					<ul style="margin-bottom:10px;height:30em;overflow:auto;">
					<BOUCLE_recherche(DATA){source termes_recherches,#REFERERS|array_unique}{pagination 50}>
						<li>[<a href="#URL_PAGE{recherche,recherche=#CLE}">(#CLE|urldecode)]</a> <small>(#VALEUR)</small></li>
					</BOUCLE_recherche>
					</ul>
					[<nav class="pagination">(#PAGINATION{prive})</nav>]
					</B_recherche>
				</BOUCLE_recherches>
			</div>
		</li>

		#SET{stat,#GET{articles_lus}|sizeof||number_format{0,""," "}}
		#SET{milliers,#GET{stat}|match{(\d+ )(\d)\d\d,u,1}}
		#SET{centaines,#GET{stat}|match{(\d+) (\d)\d\d,u,2}}

		[(#GET{milliers}|oui)
			#SET{stat_court,#GET{milliers}|trim|concat{","}|concat{#GET{centaines}&nbsp;K}|replace{",0"}}
		]

		[(#GET{milliers}|non)
			#SET{stat_court,#GET{stat}}
		]

		<li>
			<BOUCLE_compte_articles(DATA){source table,#GET{articles_lus}} /> #SET{nb_articles_lus,#TOTAL_BOUCLE}<//B_compte_articles>
			<div class="stats_contenu" style="padding-right:20px;">
				[(#GET{nb_articles_lus}|>{1}|oui)
				<div class="statistique">
					<div class="valeur" title="[(#GET{stat})] articles lus">[(#GET{stat_court})]</div>
					<div class="description">
						<strong>articles lu[(#GET{stat}|>{1}|?{s})]</strong>
					</div>
				</div>
				]
				<B_articles>
				#ANCRE_PAGINATION
				<ul class="valeur">
					<BOUCLE_articles(DATA){source table,#GET{articles_lus}}{!par visites}{pagination 50}>
					<li>
					<BOUCLE_article(ARTICLES){id_article=#CLE|replace{^a}}>
						[(#GET{nb_articles_lus}|>{1}|oui)
						<small>
							<a href="[(#SELF|parametre_url{id_article,#ID_ARTICLE})]" class="ajax">[(#_articles:VISITES|number_format{0,"","&nbsp;"})] visite[(#_articles:VISITES|>{1}|?{s})]</a>
						</small> -
						]
						<a href="[(#URL_ARTICLE)]">#TITRE</a>
					</BOUCLE_article>
					</li>
					</BOUCLE_articles>
				</ul>
				[<nav class="pagination">(#PAGINATION{prive})</nav>]
				</B_articles>
			</div>
		</li>

		<li>
			#SET{stat,#GET{total}|number_format{0,""," "}}
			#SET{milliers,#GET{stat}|match{(\d+ )(\d)\d\d,u,1}}
			#SET{centaines,#GET{stat}|match{(\d+) (\d)\d\d,u,2}}
			[(#GET{milliers}|oui)
				#SET{stat_court,#GET{milliers}|trim|concat{","}|concat{#GET{centaines}&nbsp;K}|replace{",0"}}
			]
			[(#GET{milliers}|non)
				#SET{stat_court,#GET{stat}}
			]
			<B_affluents>
			<div class="stats_contenu">

				<div class="statistique">
					<div class="valeur" title="[(#GET{stat})] visites">[(#GET{stat_court})]</div>
					<div class="description">
						<strong>visite[(#GET{stat}|>{1}|?{s})]<br><small>par&nbsp;[(#GRAND_TOTAL|number_format{0,"","&nbsp;"})]&nbsp;domaine[(#GRAND_TOTAL|>{1}|?{s})] affluent[(#GRAND_TOTAL|>{0}|?{s})]</small></strong>
					</div>
				</div>

				<h3 class="premier" title="[(#GET{total_moteurs})] visites">Moteurs de recherche</h3>

				<dl class="liste_affluents">
				<BOUCLE_moteurs_recherche(DATA){source table,#GET{sites_affluents}}{cle==#GET{reg_moteurs}}{!par visites}>
				<dt>[(#CLE|ucfirst)] <small>([(#VISITES|number_format{0,""," "}) visite[(#VISITES|>{1}|?{s})]])</small></dt>
				<dd>
					<ul>
						<BOUCLE_pagesm(DATA){source table,#REFERERS|compter_referers}{!par visites}>
						<li><a href="#URL" title="#CLE">[(#PATH|sinon{#CLE}|couper{25})]</a> <small>(#VISITES)</small></li>
						</BOUCLE_pagesm>
					</ul>
				</dd>
				</BOUCLE_moteurs_recherche>
				</dl>

				<B_reseaux_sociaux>
				<h3 title="[(#GET{total_reseaux_sociaux})] visites">Réseaux sociaux</h3>
				<dl class="liste_affluents">
				<BOUCLE_reseaux_sociaux(DATA){source table,#GET{sites_affluents}}{cle==#GET{reg_reseaux_sociaux}}{!par visites}>
				<dt>[(#CLE|replace{^t$,twitter}|ucfirst)] <small>([(#VISITES|number_format{0,""," "}) visite[(#VISITES|>{1}|?{s})]])</small></dt>
				<dd>
					<ul>
						<BOUCLE_pagesr(DATA){source table,#REFERERS|compter_referers}{!par visites}>
						<li><a href="#URL" title="#CLE">[(#PATH|sinon{#CLE}|couper{25})]</a> <small>(#VISITES)</small></li>
						</BOUCLE_pagesr>
					</ul>
				</dd>
				</BOUCLE_reseaux_sociaux>
				</dl>

				#ANCRE_PAGINATION
				<h3 title="[(#GET{total_autres_affluents})] visites">
					Autres affluents
				</h3>

				<dl class="liste_affluents">
				<BOUCLE_affluents(DATA){source table,#GET{sites_affluents}}{cle!==#GET{reg_domaines_connus}}{!par visites}{pagination 50}>
				<dt>[(#CLE|ucfirst)] <small>([(#VISITES|number_format{0,""," "}) visite[(#VISITES|>{1}|?{s})]])</small></dt>
				<dd>
					<ul>
						<BOUCLE_pages(DATA){source table,#REFERERS|compter_referers}{!par visites}>
						<li><a href="#URL" title="#CLE">[(#PATH|sinon{#CLE}|couper{25})]</a> <small>(#VISITES)</small></li>
						</BOUCLE_pages>
					</ul>
				</dd>
				</BOUCLE_affluents>
				</dl>
				<p style="margin:10px">#PAGINATION</p>
			</div>

			</B_affluents>
		</li>
	</ul>

</div>
<p style="text-align:center;clear:both;">...</p>
<div class="debug">
	<small>stats_data version #PLUGIN{stats_data, version}.</small>
</div>

<script>
$(document).ready(function(){
	$(".liste_affluents > dt").click(function(){
		console.log("hop");
		$(this).next("dd").toggle();
	});
});
</script>