var t_Prm_Referrer=new Array()

function c_Prm_Referrer(p_Url_Site,p_Dossier_Recherche,p_Champ_Cle,p_Separateur)
	{
	this.URL_SITE=p_Url_Site
	this.DOSSIER_RECHERCHE=p_Dossier_Recherche
	this.CHAMP_CLE=p_Champ_Cle
	this.SEPARATEUR=p_Separateur
	}

function RechercherIndiceReferrer(p_Url_Site)
	{
	var v_Boucle
	var v_Return=-1
	for (v_Boucle=0;v_Boucle<t_Prm_Referrer.length;v_Boucle++)
		{
		if (t_Prm_Referrer[v_Boucle].URL_SITE==p_Url_Site)
			{
			v_Return=v_Boucle
			return (v_Return)
			}
		}
	return (v_Return)
	}

function PreparerListeMotsCles(p_Search,p_Champ_Cle)
	{
	var t_Couples=new Array()
	var t_Prm_Val=new Array()
	var v_Boucle_1
	var v_Return=""
	
	t_Couples=p_Search.split("&")
	//Si referrer CONNU, création de la liste des mots clés 
	//à partir du paramètre égal à p_Champ_Cle
	if (p_Champ_Cle!="defaut")
		{
		for (v_Boucle_1=0;v_Boucle_1<t_Couples.length;v_Boucle_1++)
			{
			t_Prm_Val=t_Couples[v_Boucle_1].split("=")
			if (t_Prm_Val[0]==p_Champ_Cle)
				{
				v_Return=t_Prm_Val[1]
				return (v_Return)
				}
			}
		}
	//Si referrer INCONNU, création de la liste des mots clés 
	//à partir des 2 premiers paramètres
	else
		{
		for (v_Boucle_1=0;v_Boucle_1<t_Couples.length;v_Boucle_1++)
//		for (v_Boucle_1=0;v_Boucle_1<2;v_Boucle_1++)
			{
			t_Prm_Val=t_Couples[v_Boucle_1].split("=")
			v_Return=v_Return+t_Prm_Val[1]+"|"
			}
		//Suppression du dernier "|"
		v_Return=v_Return.substr(0,v_Return.length-1)
		}
	return (v_Return)
	}


t_Prm_Referrer[0]=new c_Prm_Referrer("http://www.metamoteur.net","","mots","\\+")
t_Prm_Referrer[1]=new c_Prm_Referrer("http://www.123trouve.com","","query","\\+")
t_Prm_Referrer[2]=new c_Prm_Referrer("http://www.metafrance.com","","sq","\\+")
t_Prm_Referrer[3]=new c_Prm_Referrer("http://www.metazoide.com","","qry","\\+")
t_Prm_Referrer[4]=new c_Prm_Referrer("http://www.metacherche.com","","query","\\+")
t_Prm_Referrer[5]=new c_Prm_Referrer("http://www.trouvez.com","","query","\\+")
t_Prm_Referrer[6]=new c_Prm_Referrer("http://www.infozoid.com","","q","\\+")
t_Prm_Referrer[7]=new c_Prm_Referrer("http://www.kartoo.com","","NV","\\+")
t_Prm_Referrer[8]=new c_Prm_Referrer("http://www.debriefing.com/france","france","query","\\+")
t_Prm_Referrer[9]=new c_Prm_Referrer("http://www.troover.com","","mot","\\+")
t_Prm_Referrer[10]=new c_Prm_Referrer("http://www.metacrawler.com","","general","\\+")
t_Prm_Referrer[11]=new c_Prm_Referrer("http://www.searchturtle.com","","query","\\+")
t_Prm_Referrer[12]=new c_Prm_Referrer("http://www.turbo10.com","","NV","\\+")
t_Prm_Referrer[13]=new c_Prm_Referrer("http://www.profusion.com","","queryterm","\\+")
t_Prm_Referrer[14]=new c_Prm_Referrer("http://www.megaspider.com","","Html","\\+")
t_Prm_Referrer[15]=new c_Prm_Referrer("http://www.ariane.com","","NV","\\+")
t_Prm_Referrer[16]=new c_Prm_Referrer("http://www.mamma.com","","query","\\+")
t_Prm_Referrer[17]=new c_Prm_Referrer("http://24.120.30.35","","query","\\+")
t_Prm_Referrer[18]=new c_Prm_Referrer("http://search.dogpile.com","","q","\\+")
t_Prm_Referrer[19]=new c_Prm_Referrer("http://chubba2.whatuseek.com","","arg","\\+")
t_Prm_Referrer[20]=new c_Prm_Referrer("http://www.1blink.com","","query","\\+")
t_Prm_Referrer[21]=new c_Prm_Referrer("http://fr.altavista.com","","q","\\+")
t_Prm_Referrer[22]=new c_Prm_Referrer("http://www.recherche.aol.fr","","q","\\+")
t_Prm_Referrer[23]=new c_Prm_Referrer("http://www.google.fr/s","s","q","\\+")
t_Prm_Referrer[24]=new c_Prm_Referrer("http://rechercher.nomade.tiscali.fr","","MT","\\+")
t_Prm_Referrer[25]=new c_Prm_Referrer("http://www.looksmart.fr","","key","\\+")
t_Prm_Referrer[26]=new c_Prm_Referrer("http://vachercher.lycos.fr","","query","\\+")
t_Prm_Referrer[27]=new c_Prm_Referrer("http://search.msn.fr","","q","\\+")
t_Prm_Referrer[28]=new c_Prm_Referrer("http://info.netscape.com","","keyword","\\+")
t_Prm_Referrer[29]=new c_Prm_Referrer("http://www.souany.com","","NV","\\+")
t_Prm_Referrer[30]=new c_Prm_Referrer("http://search.ke.voila.fr","","kw","\\+")
t_Prm_Referrer[31]=new c_Prm_Referrer("http://fr.search.yahoo.com","","p","\\+")
t_Prm_Referrer[32]=new c_Prm_Referrer("http://fr.web.caloga.com","","q","\\+")
t_Prm_Referrer[33]=new c_Prm_Referrer("http://search.dmoz.org","","search","\\+")
t_Prm_Referrer[34]=new c_Prm_Referrer("http://www.killou.com","","mot","\\+")
t_Prm_Referrer[35]=new c_Prm_Referrer("http://search.sli.sympatico.ca","","query","\\+")
t_Prm_Referrer[36]=new c_Prm_Referrer("http://msxml.excite.com","","qkw","\\+")
t_Prm_Referrer[37]=new c_Prm_Referrer("http://www.overture.com","","Keywords","\\+")
t_Prm_Referrer[38]=new c_Prm_Referrer("http://www.askjeeves.com","","ask","\\+")
t_Prm_Referrer[39]=new c_Prm_Referrer("http://search.about.com","","terms","\\+")
t_Prm_Referrer[40]=new c_Prm_Referrer("http://dpxml.webcrawler.com","","qkw","\\+")
t_Prm_Referrer[41]=new c_Prm_Referrer("http://www.multicrawl.com","","NV","\\+")
t_Prm_Referrer[42]=new c_Prm_Referrer("http://www.northernlight.com","","qr","\\+")
t_Prm_Referrer[43]=new c_Prm_Referrer("http://antisearch.francite.com","","KEYWORDS","\\+")
t_Prm_Referrer[44]=new c_Prm_Referrer("http://www.sharelook.fr","","keyword","\\+")
t_Prm_Referrer[45]=new c_Prm_Referrer("http://194.231.30.218","","q","\\+")
t_Prm_Referrer[46]=new c_Prm_Referrer("http://www.antisearch.net","","KEYWORDS","\\+")
t_Prm_Referrer[47]=new c_Prm_Referrer("http://www.hotbot.lycos.fr","","query","\\+")
t_Prm_Referrer[48]=new c_Prm_Referrer("http://janas.tiscalinet.fr","","query","\\+")
t_Prm_Referrer[49]=new c_Prm_Referrer("http://www.maximini.net","","NV","\\+")
t_Prm_Referrer[50]=new c_Prm_Referrer("http://www.mirago.fr","","txtSearch","\\+")
t_Prm_Referrer[51]=new c_Prm_Referrer("http://www.netscan.fr","","text","\\+")
t_Prm_Referrer[52]=new c_Prm_Referrer("http://www.recherche.fr","","q","\\+")
t_Prm_Referrer[53]=new c_Prm_Referrer("http://www.kamus.it","","search","\\+")

t_Prm_Referrer[54]=new c_Prm_Referrer("http://serveur-blanc","","query","\\+")

var v_Origine=document.referrer
var v_Char=""
var v_Indice_Referrer
var v_Re_Separateur

var v_Re_Search=/\?/
var v_Pos_Search
var v_Page_Site=""
var v_Search=""
var v_Mots_Cles=""
var v_Url_Site=""
var v_Re_Url_Site=/[(http\:\/\/)](\S*\/)/
var v_Result=""

var v_Referrer=""

//Recherche de la position du "?"	
v_Pos_Search=v_Origine.search(v_Re_Search)

//S'il y a une chaine de paramètres
if (v_Pos_Search>0)
	{
	//Découpage de l'URL
	v_Page_Site=v_Origine.substring(0,v_Pos_Search)
	v_Search=v_Origine.substring(v_Pos_Search+1,v_Origine.length)
	v_Result=v_Re_Url_Site.exec(v_Page_Site)
	if (v_Result!=null)
		{
		v_Url_Site=v_Result[0].substring(0,v_Result[0].length-1)
		}
	//Recherche si le referrer est connu
	v_Indice_Referrer=RechercherIndiceReferrer(v_Url_Site)
	if (v_Indice_Referrer>=0)
		{
		//Si le referrer est connu
		//Identification du champ décrivant les mots clés
		//Identification du séparateur de mots clés
		v_Mots_Cles=PreparerListeMotsCles(v_Search,t_Prm_Referrer[v_Indice_Referrer].CHAMP_CLE)
		v_Char=t_Prm_Referrer[v_Indice_Referrer].SEPARATEUR
		}
	else
		{
		v_Mots_Cles=PreparerListeMotsCles(v_Search,"defaut")
		v_Char="\\+"
		}

	//Remplacement du séparateur de mots clés par "|"	
	v_Str="v_Re_Separateur=/"+v_Char+"/"
	eval(v_Str)
	v_Mots_Cles=v_Mots_Cles.replace(v_Re_Separateur,'|')
	v_Mots_Cles=v_Mots_Cles+"|"
	}

//S'il n'y pas de chaine de paramètres
else
	{
	v_Result=v_Re_Url_Site.exec(v_Origine)
	if (v_Result!=null)
		{
		v_Url_Site=v_Result[0].substring(0,v_Result[0].length-1)
		}
	}

//Création	de la chaine définitive sous la forme
//	URL | Mot clé 1 | Mot Clé 2 | ...
if (v_Url_Site!="")
	{
	v_Referrer=v_Url_Site+"|"+v_Mots_Cles
	}