function GetArgs () {
	var query = location.search.substring(1);
	var Args  = new Object();
	var Pairs = query.split('&');
	for (i = 0; i < Pairs.length; i++) {
		var pos = Pairs[i].indexOf('=');
		if ( pos == -1 ) continue;
		var qname   = Pairs[i].substring(0,pos);
		var qval    = Pairs[i].substring(pos + 1);
		Args[qname] = unescape(qval);
	}
	
	return Args;
}


function BakeCookie (name, val, expr, path, domain) {
	
	var aCookie = name + '=' + val + 
		'; expires=' + expr +
		'; path=' + path +
		'; domain=' + domain;
	
	document.cookie = aCookie;
	
}


function EatCookie (name) {
	var allcookies = document.cookie;
	if ( allcookies == '' ) {
		return false;
	}
	else {
		var start = allcookies.indexOf(name + '=');
		if ( start == -1 ) {
			return false;
		}
		else {
			start += name.length + 1;
			var end = allcookies.indexOf(';', start);
			if ( end == -1 ) {
				end = allcookies.length;
			}
			var cookieval = allcookies.substring(start, end);
			return cookieval;
		}
	}
}


function GetHostBase () {
	var aout = '';
	
	var h = location.hostname;
	var parts = h.split('.');
	aout = parts[parts.length - 2] + '.' + parts[parts.length - 1];
	
	return aout;
}


function GetUniqueID (id_length) {
	var aout      = '';
	var id_domain = Array(
		'0','1','2','3','4','5','6','7','8','9',
		'A','B','C','D','E','F','G','H','I','J','K','L','M',
		'N','O','P','Q','R','S','T','U','V','W','X','Y','Z'
		);
	
	for (i=0; i < id_length; i++) {
		var tmp_id = Math.round(Math.random() * (id_domain.length - 1));
		aout += id_domain[tmp_id];
	}
	
	return aout;
}

function GetGifCode (Visitor, Visit, SiteID, CampID) {
	var aout = '';
	
	COOPNow = new Date();
	COOPRandom = COOPNow.getTime() % 10000000;
	aout = 
		'<IMG SRC="http://coop.sierraweb.com' +
		'/site_' + SiteID +
		'/camp_' + CampID + 
		'/' + COOPRandom + 
		'/vis1_' + CTVisitor +
		'/vis2_'  + CTVisit +
		'/clear.gif' +
		'" WIDTH="1" HEIGHT="1">'
		;
	
	return aout;
}