﻿var BASE64={
    /**
     * 此变量为编码的key，每个字符的下标相对应于它所代表的编码。
     */
    enKey: 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/',
    /**
     * 此变量为解码的key，是一个数组，BASE64的字符的ASCII值做下标，所对应的就是该字符所代表的编码值。
     */
    deKey: new Array(
        -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
        -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
        -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, -1, -1, 63,
        52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
        -1,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14,
        15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, -1,
        -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
        41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1
    ),
    /**
     * 编码
     */
    encode: function(src){
        //用一个数组来存放编码后的字符，效率比用字符串相加高很多。
        var str=new Array();
        var ch1, ch2, ch3;
        var pos=0;
       //每三个字符进行编码。
        while(pos+3<=src.length){
            ch1=src.charCodeAt(pos++);
            ch2=src.charCodeAt(pos++);
            ch3=src.charCodeAt(pos++);
            str.push(this.enKey.charAt(ch1>>2), this.enKey.charAt(((ch1<<4)+(ch2>>4))&0x3f));
            str.push(this.enKey.charAt(((ch2<<2)+(ch3>>6))&0x3f), this.enKey.charAt(ch3&0x3f));
        }
        //给剩下的字符进行编码。
        if(pos<src.length){
            ch1=src.charCodeAt(pos++);
            str.push(this.enKey.charAt(ch1>>2));
            if(pos<src.length){
                ch2=src.charCodeAt(pos);
                str.push(this.enKey.charAt(((ch1<<4)+(ch2>>4))&0x3f));
                str.push(this.enKey.charAt(ch2<<2&0x3f), '=');
            }else{
                str.push(this.enKey.charAt(ch1<<4&0x3f), '==');
            }
        }
       //组合各编码后的字符，连成一个字符串。
        return str.join('');
    },
    /**
     * 解码。
     */
    decode: function(src){
        //用一个数组来存放解码后的字符。
        var str=new Array();
        var ch1, ch2, ch3, ch4;
        var pos=0;
       //过滤非法字符，并去掉'='。
        src=src.replace(/[^A-Za-z0-9\+\/]/g, '');
        //decode the source string in partition of per four characters.
        while(pos+4<=src.length){
            ch1=this.deKey[src.charCodeAt(pos++)];
            ch2=this.deKey[src.charCodeAt(pos++)];
            ch3=this.deKey[src.charCodeAt(pos++)];
            ch4=this.deKey[src.charCodeAt(pos++)];
            str.push(String.fromCharCode(
                (ch1<<2&0xff)+(ch2>>4), (ch2<<4&0xff)+(ch3>>2), (ch3<<6&0xff)+ch4));
        }
        //给剩下的字符进行解码。
        if(pos+1<src.length){
            ch1=this.deKey[src.charCodeAt(pos++)];
            ch2=this.deKey[src.charCodeAt(pos++)];
            if(pos<src.length){
                ch3=this.deKey[src.charCodeAt(pos)];
                str.push(String.fromCharCode((ch1<<2&0xff)+(ch2>>4), (ch2<<4&0xff)+(ch3>>2)));
            }else{
                str.push(String.fromCharCode((ch1<<2&0xff)+(ch2>>4)));
            }
        }
       //组合各解码后的字符，连成一个字符串。
        return str.join('');
    }
};

//------------------ Main loop ---------------------

//var str='answers.yahoo.com;
//var enstr=BASE64.encode(str);
//alert(enstr);
//var destr=BASE64.decode(enstr);
//alert(destr);

var this_url = window.location.href;
var visitid = '';

/*
var pos = this_url.indexOf("#");
if (pos > -1)
{
	linkid = this_url.substr(pos + 1);
	if (linkid){
		linkid = BASE64.encode(linkid);
		setCookie('sp_refid', linkid, 10 * 365 * 24 * 3600 * 1000, '/', null, false);
	}
}
*/

if (visitid == '')
{
	visitid = getCookie('sp_visitid');
}

if (visitid == '')
{
	visitid = MakeVisitID();
	if (visitid){
		setCookie('sp_visitid', visitid, 10 * 365 * 24 * 3600 * 1000, '/', null, false);
	}	
}

// ---------------------
var ref_url = document.referrer;
// If ref from our site, return
if ( (ref_url != "") && (ref_url.indexOf("simpopdf.com") == -1) ) {
	var url = "http://www.simpopdf.com/phptools/simpo/visit.php?";
	var ss_url = url + "visit_id=" + visitid + "&visit_url=" + encodeURIComponent(document.referrer);
	document.write("<div style='display:none'><iframe id='track_frame' src='"+ss_url+"'></iframe></div>");
}

document.onmousedown=function (e)
{
	//confirm('test');
	var href_str;
	var more_download_url;
	var evt=e||event; 
	var obj=evt.srcElement || evt.target;
	var o = findA(obj);
	if(o){
		href_str = o.href;
		
		if (href_str.substr(0, 4) == "http")
		{
			if (href_str.indexOf("swreg.org") != -1) 
			{
				//confirm(href_str);
				//confirm(linkid);
				var pos = href_str.indexOf('&a=');
				if (pos > -1) {
					href_str = href_str.substring(0, pos + 3) + visitid;
				} else {
					href_str = href_str + '&a=' + visitid;
				}
				o.setAttribute('target', '_blank');
				o.setAttribute('href', href_str);
				
			} else if (href_str.indexOf("regnow.com") != -1 && href_str.indexOf('cgi') != -1) 
			{
				var pos = href_str.indexOf('&linkid=');
				if (pos > -1) {
					href_str = href_str.substring(0, pos + 8) + visitid;
				} else {
					href_str = href_str + '&linkid=' + visitid;
				}
				o.setAttribute('target', '_blank');
				o.setAttribute('href', href_str);
			} 
		}
	}
}
	
	
// ---------------------------------------------------

function findA(obj)
{ 
    if(obj == document.body || obj.tagName == "HTML" || obj.tagName == "BODY" || obj == "undefined"){
		return null;
	}else if(obj.tagName == "A"){
	 	return obj;
	} 
      obj  = obj.parentNode;
     return arguments.callee(obj);
}
	
function setCookie(name,value,time,path,domain,secure){
	var exp = new Date();
	exp.setTime(exp.getTime() + parseInt(time));
	var expiryString = time ? ";expires=" + exp.toGMTString() : '';
	var pathString = (path == null) ? "" : " ;path = "+ path;
	var domainString = (domain == null) ? "" : " ;domain = "+ domain;
	var secureString = (secure) ? ";secure" : "";
	document.cookie = name + "=" + escape(value) + expiryString + pathString + domainString + secureString;
}

function getCookie (name) {
	var CookieFound = false;
	var start = 0;
	var end = 0;
	var CookieString = document.cookie;
	var i = 0;

	while (i <= CookieString.length) {
		start = i ;
		end = start + name.length;
		if (CookieString.substring(start, end) == name){
			CookieFound = true;
			break;
		}
		i++;
	}

	if (CookieFound){
		start = end + 1;
		end = CookieString.indexOf(";",start);
		if (end < start) end = CookieString.length;
		return unescape(CookieString.substring(start, end));
	}
	return "";
}	

// Define the ref source
function FindRefSource() {
	var ref_url = document.referrer;

	// ---------------------------------------
	// If ref from our site, return
	if (ref_url.indexOf("simpopdf.com") != -1) {
		return '';}
	
	// ----------- Other domains -------------
	//alert(ref_url);
	if (ref_url.substr(0, 7) == "http://"){
		var ref_url2 = ref_url.substr(7);
		var posEnd = ref_url2.indexOf('/');
		var ref_domain = '';
		if (posEnd > -1) {
			ref_domain = ref_url2.substr(0, posEnd);
		}else {
			ref_domain = ref_url2;
		}		
		var enstr=BASE64.encode(ref_domain);
		return enstr;
	}				
	
	return '';
}

// Make visit id
function MakeVisitID() {
	var date = new Date();

	var y = date.getFullYear().toString().substr(2, 2);
	var m = date.getMonth() + 1;
	var d = date.getDate();
	var h = date.getHours();
	var i = date.getMinutes();
	var s = date.getSeconds();
	var ms = date.getMilliseconds();
	var _random = Math.round(Math.random() * Math.random() * 10000);
	var random_len = _random.toString().length;

	if (random_len == 1) {
		_random = _random + '000';
	} else if (random_len == 2) {
		_random = _random + '00';
	} else if (random_len == 3) {
		_random = _random + '0';
	}

	var visit_id = y;
	visit_id += m < 10 ? '0' + m : m;
	visit_id += d < 10 ? '0' + d : d;
	visit_id += h < 10 ? '0' + h : h;
	visit_id += i < 10 ? '0' + i : i;
	visit_id += s < 10 ? '0' + s : s;
	
	if (ms < 10) {
		visit_id += '00' + ms;
	} else if (ms < 100) {
		visit_id += '0' + ms;
	} else {
		visit_id += ms;
	}
	
	visit_id += _random;

	return visit_id;
}
