function whareyf_Set(param,value){
        document.cookie = param + "=" + escape(value);
        }

	function whareyf_Conf(param,value,delay){
        var expDate = new Date();
        expDate.setTime(expDate.getTime() + (delay * 24 * 3600 * 1000));
        document.cookie = param + "=" + escape(value) + ";expires=" + expDate.toGMTString();
        }

	function whareyf_Del(param) {
		whareyf_Conf(param,"",-1);
		}

	function whareyf_Get(param) {
        deb = document.cookie.indexOf(param + "=")
        if (deb >= 0) {
            deb += param.length + 1;
            fin = document.cookie.indexOf(";",deb);
            if (fin < 0){
				fin = document.cookie.length;
				}
            return unescape(document.cookie.substring(deb,fin));
            }
        return "";
        }
	
	function whareyf_CheckUri(url, param) {
		var query = url.search.substring(1);
		var vars = query.split("&");
		for (var i=0;i<vars.length;i++) {
			var pair = vars[i].split("=");
			if (pair[0] == param) {
				return true;
			}
		}
		return false;
	}
	
	function whareyf_ExtractParamUri(url, param) {
		var query = url.split("?");
		var vars = query[1].split("&");
		for (var i=0;i<vars.length;i++) {
			var pair = vars[i].split("=");
			if (pair[0] == param) {
				return pair[1];
			}
		}
		return "Extraction impossible";
	}
	
	function whareyf_Parser(param){
		if(whareyf_Get("whareyf_origins") == ""){
		ref = document.referrer;
		acturl = window.location;
			if(ref.indexOf(param) > -1){

			}else{
				if(ref != ""){
				domainref = ref.substring(7,ref.indexOf("/",7));
		
					if(domainref.indexOf("google") > -1 || domainref.indexOf("bing") > -1){
						key = whareyf_ExtractParamUri(ref, "q");
						key = key.replace(/\+/g," ");
						whareyf_Set("whareyf_origins",domainref+" - MotCle : "+unescape(key));
					}
					else if(domainref.indexOf("yahoo") > -1){
						key = whareyf_ExtractParamUri(ref, "p");
						key = key.replace(/\+/g," ");
						whareyf_Set("whareyf_origins",domainref+" - MotCle : "+unescape(key));
					}
					else{
						whareyf_Set("whareyf_origins",domainref);
					}
				
				}else{
				whareyf_Set("whareyf_origins","inconnu");
				}
				if(whareyf_CheckUri(acturl,"gclid")){
					if(ref != ""){
						key = whareyf_ExtractParamUri(ref, "q");
						key = key.replace(/\+/g," ");
					}else{
						key = "inconnu";
					}
					whareyf_Set("whareyf_origins","Google AdWords - MotCle : " + unescape(key));
				}
				if(whareyf_CheckUri(acturl,"utm_campaign")){
					exturl = acturl.search.substring();
					camp = whareyf_ExtractParamUri(exturl,"utm_campaign");
					whareyf_Set("whareyf_origins","Newsletter - Campagne : " + camp);
				}
			}
		}
	}
	
	function whareyf_Init(){
		whareyf_Domain = "climax.fr";
		whareyf_Set("whareyf",whareyf_Domain);
		whareyf_Conf("whareyf",whareyf_Domain,10);
		whareyf_Parser(whareyf_Domain);
	}
	
	function whareyf_Form(){
		document.write('<input type="hidden" name="origine" value="'+whareyf_Get("whareyf_origins")+'" />');
	}