/********************************************************/
/*  the program stores landing page url in a cookie.    */
/*  If a page has a form with field "adkeywords"        */
/*  then records the cookie value into the field,       */
/*  and records Referring url <"HTTP_REFERER">          */
/*                            field "adrefere"          */
/********************************************************/
function get_cookie(Name) {
        var search = Name+"=";
        var returnvalue = "";
        if (document.cookie.length>0) {
                offset=document.cookie.indexOf(search);
                if (offset!=-1) {
                        offset+=search.length;
                        end=document.cookie.indexOf(";", offset);
                        if (end==-1) end=document.cookie.length;
                        returnvalue=unescape(document.cookie.substring(offset, end));
                }
        }
        return returnvalue;
}


var ad_Ref = get_cookie("adrefer");
if (ad_Ref == "") {
        ad_Ref = document.location;
        if (ad_Ref == "") { ad_Ref = "/"; }
        document.cookie = "adrefer=" + escape(ad_Ref) + ";path=/";
}
if (ad_Ref == "/") {  ad_Ref = ""; }





var ad_Refere = get_cookie("adrefere");
if (ad_Refere == "") {
        ad_Refere = document.referrer;
        if (ad_Refere == "") { ad_Refere = "/"; }
        document.cookie = "adrefere=" + escape(ad_Refere) + ";path=/";
}


// -----------------------------------------------------------
// fill field 'adkeywords' if any found
// fill field 'adrefere' if any found

if (document.forms.length) {
        num_form = document.forms.length;
        for (j=0; j < num_form; j++)  {
                for (i=0; i < document.forms[j].elements.length; i++) {

                        if (document.forms[j].elements[i].name=="adkeywords")
                                document.forms[j].elements[i].value = ad_Ref;

                        if (document.forms[j].elements[i].name=="adrefere")
                                        document.forms[j].elements[i].value = ad_Refere;
                }
        }
}