|
|
Bienvenue - Nous sommes
le
.
Il y a actuellement
/* -------------------------------------------------------- */
/* Script Compteur Temps Réel */
/* Auteur: Matthieu Chevalier */
/* Web-Site: http://matthieu.chevalier.free.fr/ */
/* Email: matthieu.chevalier@free.fr */
/* */
/* -------------------------------------------------------- */
/* Valeur à modifier pour appliquer à votre site */
$tempmax = 180; // temps au bout duquel le visiteur n'est plus compté présent s'il ne racharge pas une page. (en secondes)
$userfile="data/visitonline.dat"; // nom de votre fichier de comptage(recommandé de ne pas le changer)
$tempfile="data/tempfile.dat"; //nom du fichier temporaire
/* Ne plus rien modifier en dessous de cette ligne */
$sec = time();
$expire=$sec + $tempmax;
$ipvisit="$REMOTE_ADDR";
function substrcount($haystack, $needle) {
$offset=0;
$i = 0;
$counter = 0;
while ($i==0) {
$longueur = strlen($haystack);
$position=strpos($haystack,$needle,$offset);
if ($position && ($offset + strlen($needle)) <= $longueur) {
$offset = $position+strlen($needle);
$counter++;
} else {
$i++;
}}
return $counter;
}
$cont=fopen("$userfile","r+");
$contenu="";
while (!feof($cont)) {
$suite=fgets($cont, 4096);
$contenu.="$suite";
}
fclose($cont);
$nbreligne=substrcount("$contenu","\n");
$visit = explode("\n",$contenu);
$j=0;
$ligneecrite="$ipvisit|$expire\n";
$tempfi=fopen("$tempfile","a+");
fwrite($tempfi,"$ligneecrite");
fclose($tempfi);
$nbreonline++;
while ($j < $nbreligne){
$idvisit=explode("|",chop($visit[$j]));
if ($idvisit[0] != $ipvisit){
if ($idvisit[1] >= $sec){
$ligneecrite="$idvisit[0]|$idvisit[1]\n";
$tempfi=fopen("$tempfile","a+");
fputs($tempfi,"$ligneecrite");
fclose($tempfi);
}}
$j++;
}
copy("$tempfile","$userfile");
$conte = fopen("$userfile","r");
$contenu2 = "";
$contenu="";
while (!feof($conte)) {
$suite2=fgets($conte, 4096);
$contenu2.="$suite2";
}
fclose ($conte);
$nbreligne2 = substrcount("$contenu2","\n");
$nbreonline = "$nbreligne2";
$testtemp=fopen("$tempfile","w+");
fseek($testtemp,0);
fputs($testtemp,"");
fclose($testtemp);
if ($nbreonline==1){$afficher="$nbreonline personne";}
if ($nbreonline>1){$afficher="$nbreonline personnes";}
if ($voir=="js"){
print "document.write('".$afficher."');";
}
if ($voir=="php"){
echo("$afficher");
}
if ($voir=="no"){
}
?> sur le site.
Il y a eu
include("compteur.php");
?>
pages vues. |
|
|
|
Mes nuits de solitude
On s'était dit : "Peut-être que c'est mieux
On n'est pas forcément heureux à deux
Séparons-nous, oublions si l'on peut
Ça va être dur pendant un mois ou deux"
Un mois ou deux ou bien peut-être plus
Réapprendre à vivre seul et tenir
Rompre les liens serrés par l'habitude
Tout en attendant les moments, les pires
Oh ces nuits, ces nuits de solitude
Les yeux ouverts, le plafond blanc, le bruit du temps
Qui passe et se bouscule
Des images que l'on chasse mais qui reviennent tout le temps
Le matin que l'on a vu arriver
Se lever sans réfléchir, s'habiller
Sortir dans la rue, rencontrer des gens
Sourir et oublier jusqu'au moment...
Oh ces nuits, ces nuits de solitude
Les yeux ouverts, le plafond blanc, le bruit du temps
Qui passe et se bouscule
Des images que l'on chasse mais qui reviennent tout le temps
Se rencontrer par hasard et jouer
Parler sans rien dire mais se regarder
Et puis ces heures devant le téléphone
La tête dans les mains en attendant qu'ça sonne
Et ces nuits, ces nuits de solitude
Les yeux ouverts, le plafond blanc, le bruit du temps
Qui passe et se bouscule
Des images que l'on chasse mais qui reviennent tout le temps
Ces nuits de solitude
Les yeux ouverts, le plafond blanc, le bruit du temps
Qui passe et se bouscule
Des images que l'on chasse mais qui reviennent tout le temps
|