function wily_computeFrameName(name)
{
	if (window.top != window.self) {
		if ((window.name) && (window.name.length > 0)) {
			name=name+"_"+wily_crc32_hex(window.name);
		} else {
			name=name+"_"+wily_crc32_hex(window.self.document.URL);
		}
	}
	return name;
}

function wily_createCookie(name,value,days)
{
	wily_createCookie0(wily_computeFrameName(name),value,days);
}

function wily_createCookie0(name,value,days)
{
	if (days)
	{
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	document.cookie = name+"="+value+expires+"; path=/";
}

function wily_readCookie(name)
{
	return wily_readCookie0(wily_computeFrameName(name));
}

function wily_readCookie0(name)
{
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++)
	{
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
			if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function wily_eraseCookie(name)
{
	wily_eraseCookie0(wily_computeFrameName(name));
}

function wily_eraseCookie0(name)
{
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++)
	{
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(name) == 0) {
			cn = c.split('=')[0];
			wily_createCookie0(cn,0,-1);
		}
	}
}

function wily_eraseTopWilyCookies()
{
	wily_eraseCookie0("wily_unloadTime");
	wily_eraseCookie0("wily_clickTime");
	wily_eraseCookie0("wily_altClickTime");
	wily_eraseCookie0("wily_clickLink");
}

function wily_URLencode(sStr)
{
	return escape(sStr).replace(/\+/g, '%2C').replace(/\"/g,'%22').replace(/\'/g, '%27');
}

function wily_now()
{
	return new Date().getTime();
}

function wily_eraseStaleClick()
{
	var altClickTime = wily_readCookie0("wily_altClickTime");
	wily_eraseCookie0("wily_altClickTime");
}

function wily_record_clickTime(event)
{
	if (!event) var event = window.event;
	var targ;
	if (event.target) targ = event.target;
	else if (event.srcElement) targ = event.srcElement;
	if (targ.nodeType == 3) targ = targ.parentNode; // for safari
	if (targ.href) {
		wily_createCookie0("wily_clickTime", wily_now());
		wily_createCookie0("wily_clickLink", wily_URLencode(targ.href));
	} else {
		wily_createCookie0("wily_altClickTime", wily_now());
		window.setTimeout('wily_eraseStaleClick();', 500);
	}
	wily_eraseCookie("wily_unloadTime");
}

function wily_onclick(event)
{
	if (!event) var event = window.event;
	var targ;
	if (event.target) targ = event.target;
	else if (event.srcElement) targ = event.srcElement;
	if (targ.nodeType == 3) targ = targ.parentNode; // for safari

	wily_createCookie0("wily_clickTime", wily_now());
	wily_eraseCookie("wily_unloadTime");

	if (targ.href) {
		wily_createCookie0("wily_clickLink", wily_URLencode(targ.href));
	} else if (targ.action) {
		wily_createCookie0("wily_clickLink", wily_URLencode(targ.action));
	} else {
		wily_createCookie0("wily_clickLink", "undetermined");
	}
}

function wily_attachEventToLinks()
{
	for (i = 0; i < document.links.length; i++)
	{
		var link = document.links[i];
        if (link.addEventListener) {
            link.addEventListener('click',wily_onclick,true)
        } else if (document.attachEvent) {
            link.attachEvent('onclick',wily_onclick)
        }
	}
}

function wily_attachEventToForms()
{
	for (i = 0; i < document.forms.length; i++)
	{
		var link = document.forms[i];
        if (link.addEventListener) {
            link.addEventListener('submit',wily_onclick,true);
        } else if (document.attachEvent) {
            link.attachEvent('onsubmit',wily_onclick);
        }
	}
}

function wily_attachEventToPopups()
{
    if (window.createPopup) {
        var prevFunc = window.createPopup;
        window.createPopup = function (vArgs) {
            var result = prevFunc(vArgs);
            if (document.attachEvent) {
                result.document.attachEvent('onclick', wily_record_clickTime);
            }
            return result;
        }
    }
}

function wily_attachEventToDocument()
{
    if (window.wily_record_clickTime) {
        if (document.addEventListener) {
            document.addEventListener('click',wily_record_clickTime,true)
            document.addEventListener('submit',wily_record_clickTime,true);
        } else if (document.attachEvent) {
            document.attachEvent('onclick',wily_record_clickTime)
            document.attachEvent('onsubmit',wily_record_clickTime);
        }
    }
}

function wily_window_imageSentinel(browserDoneUrl)
{
	wilyImage = new Image();
	wilyImage.src = browserDoneUrl;
}

function wily_window_onunload()
{
	try {
		wily_createCookie("wily_unloadTime", wily_now());
		if (window.top != window.self) {
			var loadCounter = 0;
			if (window.top.wily_loadCounter) {
				loadCounter = window.top.wily_loadCounter;
			}
			loadCounter++;
			window.top.wily_loadCounter = loadCounter;
		}
	} catch (e) {
	}
}

function wily_attachEventToWindow() {
    if (window.addEventListener) {
        window.addEventListener('load',wily_window_onload,false);
        window.addEventListener('unload',wily_window_onunload,false);
    } else if (window.attachEvent) {
        window.attachEvent('onload',wily_window_onload);
        window.attachEvent('onunload',wily_window_onunload);
    }
}

function wily_attachEventToFrameset() {
    if (window.top != window.self) {
        var fsTags = top.document.getElementsByTagName("frameset");
        if (fsTags.length > 0) {
            if (window.wily_record_clickTime) {
                if (top.addEventListener) {
                    top.addEventListener('load',wily_eraseTopWilyCookies,false);
                } else if (document.attachEvent) {
                    top.attachEvent('onload',wily_eraseTopWilyCookies);
                }
            }
        }
    }
}