//////////////////////////////////////////////////////////////////////////
//
//             Hanbiro Web Analyzer 1.0
//
//
//////////////////////////////////////////////////////////////////////////
var _hsu = "http://weblog.dajim.co.kr/dajim.co.kr";
var _hsd = "dajim.co.kr";

// Don't modify under line
var _hdt, _hdn="", _hld = null, _huq = 0, _hrf="", _hmime="";
var _hdo = document, _hdl = _hdo.location;

_hwaTracker();

function _hwaTracker()
{
    if (_hdl.protocol == "file:") return;
    var s="", trf = "", turl="", rf="", url="";

    _hwaDomain();
    var d = new Date();
    _hdt = d.getTime();
    s += "ut="+_hdt;

    _hrf = _hdo.referrer;
    eval("try{ trf = top.document.referrer; }catch(_e){}");
    eval("try{ turl = top.document.location.href; }catch(_e){}");
    if (_hrf == turl) _hrf = trf;
    _hrf = _hwaUnescape(_hrf);
    _hrf = rf.replace (/[&]/g, ';');
    s += "&rf="+_hrf;

    url = _hdl.href;
    url = url.replace (/[&]/g, ';'); 
    s += "&url="+url;
    s += _hwaCookieInit();
    s += _hwaGetConfig();

    var i=new Image(1,1);
    i.src=_hsu+"/process.php?"+s;
    i.onload=function() { return;};
}

function _hwaDomain()
{
    var d = _hdo.domain;
    if (d.substring(0,4) == "www.") {
	d = d.substring(4, d.length);
    }
    _hdn = d;
}

function _hwaUnescape(str)
{
    var re = /(\%u[A-Z0-9]{4})/g;
    var m = str.match(re);
    if (m != null) {
        var tu = m.length;
        for (var i=0; i < tu; i++) {
	    str = str.replace(m[i], unescape(m[i]));
        }
    }
    return str;
}

function _hwaGetCookie(sName)
{
    var aCookie = _hdo.cookie.split("; ");
    var cookie_len = aCookie.length;
    for (var i=0; i < cookie_len; i++) {
	var aCrumb = aCookie[i].split("=");
	if (sName == aCrumb[0]) {
	    return unescape(aCrumb[1]);
	}
    }

    return null;
}

function _hwaSetCookie (name, value, expDays, path)
{
    _hdo.cookie = name + "=" + escape(value) +
    ((expDays == null) ? "" : ("; expires=" + expDays.toGMTString())) +
    ((path    == null) ? "" : ("; path=" + path)) +
    ((_hdn    == "") ? "" : ("; domain=" + _hdn)); 
}

function _hwaRemoveCookie (name)
{
    var exp = new Date();
    exp.setTime (exp.getTime() - 1);
    var cval = _hwaGetCookie (name);
    _hdo.cookie = name + "=" + cval + "; expires=" + exp.toGMTString();
}

function _hwaSetDatetime (expDays)
{
    var expDate = new Date();
    expDate.setTime(expDate.getTime() + (86400 * 1000 * expDays));
    return expDate;
}

function _hwaCookieInit()
{
    var s="";
    var count = _hwaGetCookie('hwatime');
    var unique = _hwaGetCookie('hwaunique');

    if (unique == null) {
	_huq = 1;
	var utime = new Date();
	utime.setHours(23);
	utime.setMinutes(59);
	utime.setSeconds(59);
	utime.setMilliseconds(999);
	_hwaSetCookie('hwaunique', 1, utime, "/");
    } 

    if (count == null) {
	_hwaSetCookie('hwatime', _hdt, _hwaSetDatetime(365), "/");
    }
    else {
	var found = 0;
	var reg = new RegExp("^http[s]?:\/\/([-a-z0-9]+\.)?" + _hsd, "ig");
	if (_hrf && reg.test(_hrf)) { found = 1; }
	if (found) { _hld = -1; }
	else { _hld = _hwaGetCookie('hwatime'); }

	_hwaRemoveCookie('hwatime');
	_hwaSetCookie('hwatime', _hdt, _hwaSetDatetime(365), "/");
    }

    if (_hld == null) _hld = 0;
    s += "&lv="+_hld+"&uq="+_huq;

    return s;
}

function _hwaGetConfig()
{
    var s="";
    var n = navigator;
    var an = n.appName;
    var ua = n.userAgent;

    var ua2 = ua.toLowerCase();
    var moz = (an.indexOf("Netscape") != -1);
    var ie  = (ua2.indexOf("msie") != -1);
    var win = ((ua2.indexOf("win")!=-1) || (ua2.indexOf("32bit")!=-1));

    var jv = n.javaEnabled() ? "1" : "0";
    var ck = n.cookieEnabled ? "1" : "0";
    s+="&jv="+jv+"&ck="+ck;    

    var pdf='0', qt='0', xd='0', sf='0', rp='0', wm='0';

    if (win && ie) {
	xd = _hwaPlugIE("SWCtl.SWCtl.1") ? "1" : "0";
	sf = _hwaPlugIE("ShockwaveFlash.ShockwaveFlash.1") ? "1" : "0";

	if (_hwaPlugIE("PDF.PdfCtrl.1")) pdf = "1";
	if (_hwaPlugIE('PDF.PdfCtrl.5')) pdf = "1";
	if (_hwaPlugIE('PDF.PdfCtrl.6')) pdf = "1";

	qt = _hwaPlugIE("QuickTimeCheckObject.QuickTimeCheck.1") ? "1" : "0";
	rp  = _hwaPlugIE("rmocx.RealPlayer G2 Control.1") ? "1" : "0";
	wm = _hwaPlugIE("MediaPlayer.MediaPlayer.1") ? "1" : "0";
    } else if (!win || moz) {
	for (var i=0; i < n.mimeTypes.length; i++) 
	    _hmime += n.mimeTypes[i].type.toLowerCase();

	xd  = _hwaPlugMoz("application/x-director") ? "1" : "0";
	sf  = _hwaPlugMoz("application/x-shockwave-flash") ? "1" : "0";
	pdf = _hwaPlugMoz("application/pdf") ? "1" : "0";
	qt  = _hwaPlugMoz("video/quicktime") ? "1" : "0";
	rp  = _hwaPlugMoz("audio/x-pn-realaudio-plugin") ? "1" : "0";
	wm  = _hwaPlugMoz("application/x-mplayer2") ? "1" : "0";
    }

    s+="&pdf="+pdf+"&qt="+qt+"&xd="+xd+"&sf="+sf+"&rp="+rp+"&wm="+wm;

    var cd = window.screen.colorDepth;
    var rs = window.screen.width+"X"+window.screen.height;
    var ln = (n.language) ? n.language : n.browserLanguage;
    ln = ln.toLowerCase();
    s+="&cd="+cd+"&rs="+rs+"&ln="+ln+"&ua="+ua;    

    return s;
}

function _hwaPlugMoz(plug)
{
    find = false;
    if (_hmime.indexOf(plug) != -1) {
	if (navigator.mimeTypes[plug].enabledPlugin != null) {
	    find = true;
	}
    }
    return find;
}

function _hwaPlugIE(plug)
{
    find = false;
    _hdo.write('<SCR' + 'IPT LANGUAGE=VBScript>\n on error resume next \n find = IsObject(CreateObject("' + plug + '"))</SCR' + 'IPT>\n');
    if (find)  return true;
    else return false;
}