    <div class="row">
        <div class="col-12">
            <pre class="with-hljs"><code class="lang-php">&lt;?php

/***************************************************************************\
 *  SPIP, Systeme de publication pour l&#039;internet                           *
 *                                                                         *
 *  Copyright (c) 2001-2016                                                *
 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
 *                                                                         *
 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
 *  Pour plus de details voir le fichier COPYING.txt ou l&#039;aide en ligne.   *
\***************************************************************************/

if (!defined(&#039;_ECRIRE_INC_VERSION&#039;)) return;

include_spip(&#039;inc/presentation&#039;);
include_spip(&#039;inc/statistiques&#039;);

// http://doc.spip.org/@exec_statistiques_visites_dist
function exec_statistiques_visites_dist()
{
	$id_article = intval(_request(&#039;id_article&#039;));
	$type = _request(&#039;type&#039;);
	if (!preg_match(&#039;/^\w+$/&#039;, $type)) $type = &#039;day&#039;;
	$duree = intval(_request(&#039;duree&#039;));
	if (!$duree) $duree = 105;
	$interval = intval(_request(&#039;interval&#039;));
	if (!$interval) {
	  if ($type == &#039;day&#039;)
	    $interval = 3600*24;
	  else $interval = 3600;
	}

	// nombre de referers a afficher
	$limit = intval(_request(&#039;limit&#039;));
	if ($limit == 0) $limit = 100;

	if (!autoriser(&#039;voirstats&#039;, $id_article ? &#039;article&#039;:&#039;&#039;, $id_article)) {
		include_spip(&#039;inc/minipres&#039;);
		echo minipres();
	} else exec_statistiques_visites_args($id_article, $duree, $interval, $type, $limit);
}


// http://doc.spip.org/@exec_statistiques_visites_args
function exec_statistiques_visites_args($id_article, $duree, $interval, $type, $limit,$serveur=&#039;&#039;)
{
	$titre = $pourarticle = &quot;&quot;;

	if ($id_article){
		$row = sql_fetsel(&quot;titre, visites, popularite&quot;, &quot;spip_articles&quot;, &quot;statut=&#039;publie&#039; AND id_article=$id_article&quot;,&#039;&#039;,&#039;&#039;,&#039;&#039;,&#039;&#039;,$serveur);

		if ($row) {
			$titre = typo($row[&#039;titre&#039;]);
			$total_absolu = $row[&#039;visites&#039;];
			$val_popularite = round($row[&#039;popularite&#039;]);
		}
	} else {
		$row = sql_fetsel(&quot;SUM(visites) AS total_absolu&quot;, &quot;spip_visites&quot;,&#039;&#039;,&#039;&#039;,&#039;&#039;,&#039;&#039;,&#039;&#039;,$serveur);
		$total_absolu = $row ? $row[&#039;total_absolu&#039;] : 0;
		$val_popularite = 0;
	}

	if ($titre) $pourarticle = &quot; &quot;._T(&#039;info_pour&#039;).&quot; &amp;laquo; $titre &amp;raquo;&quot;;
	if ($serveur) {
		if ($row = sql_fetsel(&#039;valeur&#039;,&#039;spip_meta&#039;,&quot;nom=&#039;nom_site&#039;&quot;,&#039;&#039;,&#039;&#039;,&#039;&#039;,&#039;&#039;,$serveur)){
			$titre = $row[&#039;valeur&#039;].($titre?&quot; / $titre&quot;:&quot;&quot;);
		}
	}

	$commencer_page = charger_fonction(&#039;commencer_page&#039;, &#039;inc&#039;);
	echo $commencer_page(_T(&#039;titre_page_statistiques_visites&#039;).$pourarticle, &quot;statistiques_visites&quot;, &quot;statistiques&quot;);
	echo gros_titre(_T(&#039;titre_evolution_visite&#039;).&quot;&lt;html&gt;&quot;.aide(&quot;confstat&quot;).&quot;&lt;/html&gt;&quot;,&#039;&#039;, false);
//	barre_onglets(&quot;statistiques&quot;, &quot;evolution&quot;);
	if ($titre) echo gros_titre($titre,&#039;&#039;, false);

	echo debut_gauche(&#039;&#039;, true);
	echo &quot;&lt;div class=&#039;cadre cadre-e&#039; style=&#039;padding: 5px;&#039;&gt;&quot;;
	echo &quot;&lt;div class=&#039;cadre_padding verdana1 spip_x-small&#039;&gt;&quot;;
	echo typo(_T(&#039;info_afficher_visites&#039;));
	echo &quot;&lt;ul&gt;&quot;;

	if ($id_article&gt;0) {
		echo &quot;&lt;li&gt;&lt;b&gt;&lt;a href=&#039;&quot; . generer_url_ecrire(&quot;statistiques_visites&quot;,&quot;&quot;) . &quot;&#039;&gt;&quot;._T(&#039;info_tout_site&#039;).&quot;&lt;/a&gt;&lt;/b&gt;&lt;/li&gt;&quot;;
	} else {
		echo &quot;&lt;li&gt;&lt;b&gt;&quot;._T(&#039;titre_page_articles_tous&#039;).&quot;&lt;/b&gt;&lt;/li&gt;&quot;;
	}

	echo &quot;&lt;/ul&gt;&quot;;
	echo &quot;&lt;/div&gt;&quot;;
	echo &quot;&lt;/div&gt;&quot;;
	
	$classement = array();
	$liste = 0;
	echo aff_statistique_visites_popularite($serveur, $id_article, $classement, $liste);

	// Par visites depuis le debut
	$result = aff_statistique_visites_par_visites($serveur, $id_article, $classement);

	if ($result OR $id_article)
		echo creer_colonne_droite(&#039;&#039;, true);

	if ($id_article) {
		echo bloc_des_raccourcis(icone_horizontale(_T(&#039;icone_retour_article&#039;), generer_url_ecrire(&quot;articles&quot;,&quot;id_article=$id_article&quot;), &quot;article-24.gif&quot;,&quot;rien.gif&quot;, false));
	}
	echo $result;

	echo debut_droite(&#039;&#039;, true);

	if ($id_article) {
			$table = &quot;spip_visites_articles&quot;;
			$table_ref = &quot;spip_referers_articles&quot;;
			$where = &quot;id_article=$id_article&quot;;
			  
	} else {
			$table = &quot;spip_visites&quot;;
			$table_ref = &quot;spip_referers&quot;;
			$where = &quot;&quot;;
	}

	$order = &quot;date&quot;;

	$where2 = $duree ? &quot;$order &gt; DATE_SUB(&quot;.sql_quote(date(&#039;Y-m-d H:i:s&#039;)).&quot;,INTERVAL $duree $type)&quot;: &#039;&#039;;
	if ($where) $where2 = $where2 ?  &quot;$where2 AND $where&quot; : $where;

	// sur certains SQL, la division produit un entier tronque a la valeur inferieure
	// on ne peut donc faire un CEIL, il faut faire un FLOOR
	$log = statistiques_collecte_date(&#039;visites&#039;, &quot;(FLOOR((UNIX_TIMESTAMP($order)+$interval-1) / $interval) *  $interval)&quot;, $table, $where2, $serveur);

	if ($log)
	  $res = statistiques_tous($log, $id_article, $table, $where, $order, $serveur, $duree, $interval, $total_absolu, $val_popularite,  $classement, $liste);
	  
	$mois = statistiques_collecte_date(&quot;SUM(visites)&quot;,
		&quot;DATE_FORMAT($order,&#039;%Y%m&#039;)&quot;, 
		$table,
		&quot;$order &gt; DATE_SUB(NOW(),INTERVAL 2700 DAY)&quot;
		. ($where ? &quot; AND $where&quot; : &#039;&#039;),
		$serveur);

	if (count($mois)&gt;1)  {
		$res[] = &quot;&lt;br /&gt;&lt;span class=&#039;verdana1 spip_small&#039;&gt;&lt;b&gt;&quot;
			. _T(&#039;info_visites_par_mois&#039;)
			. &quot;&lt;/b&gt;&lt;/span&gt;&quot;
			. statistiques_par_mois($mois, &#039;&#039;);
	}
  echo cadre_stat($res, $table, $id_article);

	if ($id_article) {
		$signatures = charger_fonction(&#039;signatures&#039;, &#039;statistiques&#039;);
		echo $signatures($duree, $interval, $type, $id_article, $serveur);
		/*
  Il faudra optimiser les requetes de ces stats c&#039;est vraiment trop horrible :
  plusieurs secondes d&#039;attente sur un site comme contrib.
  par ailleurs, l&#039;affichage presente des defauts :
  cf http://trac.rezo.net/trac/spip/ticket/1598
		$forums = charger_fonction(&#039;forums&#039;, &#039;statistiques&#039;);
		echo $forums($duree, $interval, $type, $id_article, $serveur);
		*/
	}


	$referenceurs = charger_fonction(&#039;referenceurs&#039;, &#039;inc&#039;);
	$res = $referenceurs($id_article, &quot;visites&quot;, $table_ref, $where, &#039;&#039;, $limit);

	if ($res) {

		// Le lien pour en afficher &quot;plus&quot;
		$args = ($id_article?&quot;id_article=$id_article&amp;&quot; : &#039;&#039;) . &quot;limit=&quot; . strval($limit+200);
		$n =  count($res);
		$plus = generer_url_ecrire(&#039;statistiques_visites&#039;, $args);
		if ($plus) {
			$plus = &quot;&lt;div style=&#039;text-align:right;&#039;&gt;&lt;b&gt;&lt;a href=&#039;$plus&#039;&gt;+++&lt;/a&gt;&lt;/b&gt;&lt;/div&gt;&quot;;
		}
		$titre = _T(&quot;onglet_origine_visites&quot;)
		. &quot; ($n &quot; 
		. ($n == 1 ?  _T(&#039;info_site&#039;) :  _T(&#039;info_sites&#039;))
		  . &quot;)&quot;;
		echo &#039;&lt;br /&gt;&#039;, gros_titre($titre,&#039;&#039;, false);
		echo &quot;&lt;div style=&#039;overflow:hidden;&#039; class=&#039;verdana1 spip_small&#039;&gt;&lt;br /&gt;&quot;;
		echo &quot;&lt;ul class=&#039;referers&#039;&gt;&lt;li&gt;&quot;;
		echo join(&quot;&lt;/li&gt;&lt;li&gt;\n&quot;,$res);
		echo &quot;&lt;/li&gt;&lt;/ul&gt;&quot;;
		echo $plus;
		echo &quot;&lt;br /&gt;&lt;/div&gt;&quot;;	
	}

	echo fin_gauche(), fin_page();	
}
?&gt;
</code></pre>        </div>
    </div>