/***********************************************/
/* Gestion des visiteurs par Y.Quéméré d'après */
/*   les exemples de http://www.actulab.com    */
/***********************************************/

/*************** mes initialisations *************/

var NomCookie = "Keroz";	//nom du cookie
var MonCookie = "";		//buffer de cookie
var Dexp = new Date;		//date d'expiration du cookie
var PreV = "visiteur inconnu";	//prénom par défaut
var NomV = "visiteur inconnu";	//nom par défaut
var NbVi = 0;		//nombre de visites par défaut
var DaVi = new Date;	//date de la visite lue dans le cookie
var Dauj = new Date;	//maintenant aujourd'hui
var Dmin = 5;	//nb de minutes minimum pour incrémenter compteur de visites
var Dmax = 30;	//nb de jours maximum avant d'afficher "longtemps"
var Salut = "Bonjour";
if (Dauj.getHours() > 17) Salut = "Bonsoir";

Dexp.setFullYear(Dexp.getFullYear()+1);//expiration du cookie : un an
DaVi.setFullYear(DaVi.getFullYear()-1);//vieille date par défaut

courrier=true;//envoi d'un courrier par défaut
accueil = new String(location);
var i = accueil.indexOf ("index");
accueil = accueil.substring(0,i) + "accueil.html";

/******* routines de http://www.actulab.com ******/ 

function EcrireCookie(nom, valeur)
{
   var argv=EcrireCookie.arguments;
   var argc=EcrireCookie.arguments.length;
   var expires=(argc > 2) ? argv[2] : null;
   var path=(argc > 3) ? argv[3] : null;
   var domain=(argc > 4) ? argv[4] : null;
   var secure=(argc > 5) ? argv[5] : false;
   document.cookie=nom+"="+escape(valeur)+
      ((expires==null) ? "" : ("; expires="+expires.toGMTString()))+
      ((path==null) ? "" : ("; path="+path))+
      ((domain==null) ? "" : ("; domain="+domain))+
      ((secure==true) ? "; secure" : "");
}

//--------------------------------------------
function getCookieVal(offset)
{
   var endstr=document.cookie.indexOf (";", offset);
   if (endstr==-1) endstr=document.cookie.length;
   return unescape(document.cookie.substring(offset, endstr));
}

//--------------------------------------------
function LireCookie(nom)
{
   var arg=nom+"=";
   var alen=arg.length;
   var clen=document.cookie.length;
   var i=0;
   while (i<clen)
   {
      var j=i+alen;
      if (document.cookie.substring(i, j)==arg) return getCookieVal(j);
      i=document.cookie.indexOf(" ",i)+1;
      if (i==0) break;
   }
   return null;
}

//--------------------------------------------
/*function EffaceCookie(nom)
{
   date=new Date;
   date.setFullYear(date.getFullYear()-1);
   EcrireCookie(nom,null,date); 
}*/

/******************* mes fonctions **************/

//--------------------------------------------

function CreeCookie()	//construit le buffer local
{
   MonCookie+="";
   MonCookie+=PreV;	//prénom
   MonCookie+="!";
   MonCookie+=NomV;	//nom
   MonCookie+="!";
   MonCookie+=NbVi;	//nombre de visites
   MonCookie+="!";
   MonCookie+=Dauj.getTime();	//aujourd'hui
   MonCookie+="!";
   EcrireCookie(NomCookie,MonCookie,Dexp)	//et écrit le cookie
   if (courrier) document.forms[0].submit();	//envoie le formulaire
}

//--------------------------------------------
function TrieCookie()	//lit le cookie et isole les valeurs
{
   if (LireCookie(NomCookie) == null) return;//pas de cookie, garder valeurs par défaut
   MonCookie = LireCookie(NomCookie); 
   var ip;
   ip = MonCookie.indexOf("!");
   PreV = MonCookie.substring(0,ip);
   if (PreV == "null" || PreV == null || PreV == "") PreV ="visiteur inconnu";
   MonCookie = MonCookie.substring(ip+1,MonCookie.length);
   ip = MonCookie.indexOf("!");
   NomV = MonCookie.substring(0,ip);
   if (NomV == "null" || NomV == null || NomV == "") NomV ="visiteur inconnu";
   if (PreV == "visiteur inconnu") PreV = NomV;//pas de prénom, on prend le nom
   MonCookie = MonCookie.substring(ip+1,MonCookie.length);
   ip = MonCookie.indexOf("!");
   NbVi = MonCookie.substring(0,ip);
   if (NbVi == "NaN") NbVi = 0;
   MonCookie = MonCookie.substring(ip+1,MonCookie.length);
   ip = MonCookie.indexOf("!");
   DaVi = MonCookie.substring(0,ip);
   MonCookie = MonCookie.substring(ip+1,MonCookie.length);
}

//--------------------------------------------
function qui_es_tu()
{
   PreV = prompt ("Votre prénom :",PreV);
   NomV = prompt ("Votre nom :",NomV);
//enlever les éventuels !
   while (PreV.indexOf("!") > -1)
   {
      ip = PreV.indexOf("!");
      PreV = PreV.substring(0,ip) + PreV.substring(ip+1,PreV.length);
   }
   while (NomV.indexOf("!") > -1)
   {
      ip = NomV.indexOf("!");
      NomV = NomV.substring(0,ip) + NomV.substring(ip+1,NomV.length);
   }
}

//--------------------------------------------
function Bienvenue()//incrément compteur et message
{
   debli = "<p align='center'><font color='#FFFFFF'>"
   finli = "</font></p>"

   d = Dauj.getTime() - DaVi;	//millisecondes depuis dernière visite
   d/= 60000;			//minutes depuis dernière visite

   if (d < Dmin)	//passage récent et cookie existe : nb de visites inchangé
   {
      courrier = false;//pas d'envoi de courrier
   }
   else			//plus longtemps, on compte
   {
      NbVi++;	//incrément nombre de visites
   }
   param = "<b>" + Salut + " " + PreV + ", bienvenue";
   document.write (debli + param + finli);
   if (NbVi == 1)	//première visite
   {
      param = "pour votre 1<sup>ère</sup> visite</b>";
      document.write (debli + param + finli);
   }
   else
   {
      param = "pour votre " + NbVi + "<sup>ème</sup> visite</b>";
      document.write (debli + param + finli);
      if (NbVi > 20)
      {
         param = "Vous venez souvent, on pourrait peut-être se tutoyer ?";
         document.write (debli + param + finli);
      }
      d/=60*24;		//jours depuis dernière visite
      if (d > Dmax)
      {
         param = "<i>Hou... mais ça fait au moins " + Math.round(d-.5);
         param+= " jours que vous n'êtes pas venu(e) !</i>";
         document.write (debli + param + finli);
      }
   }
}

TrieCookie();