// **************************************************************************************************
// Linklok Referer V1.0
// Copyright (c) 2003-2004 Vibralogix
// www.vibralogix.com
// sales@vibralogix.com
// You are licensed to use this on one domain only. Please contact us
// if you need to use extra copies or require a server wide license.
// **************************************************************************************************
linklokReferrer(90)   // 90 is the number of days cookie data is stored
function linklokReferrer (days)
{
  var today=new Date()
  var expdate=new Date()
  today.setTime(today.getTime()+(today.getTimezoneOffset()*60*1000))
  var dategmt=twodigits(today.getMonth()+1)+twodigits(today.getDate())+twodigits(today.getYear())
  var timegmt=twodigits(today.getHours())+twodigits(today.getMinutes())+twodigits(today.getSeconds())
  var offsetgmt=(today.getTimezoneOffset()/60)*-1
  var thispage=document.location
  var referrer=document.referrer
  if (referrer=="")
    referrer="Direct page access"
  var str=dategmt+"|"+timegmt+"|"+offsetgmt+"|"+thispage+"|"+referrer
  ckval=cookieGet("REFLINKLOK")
  if (ckval==null)
  {
    expdate.setTime(expdate.getTime()+(days*24*60*60*1000))
    cookieSet("REFLINKLOK",str,expdate,"/","",false)
  }
  ckval=cookieGet("SESREFLINKLOK")
  if (ckval==null)
  {
    cookieSet("SESREFLINKLOK",str,"","/","",false)
  }
}
function cookieSet (name,data,expires,path,domain,secure)
{
  document.cookie = name + "=" + escape (data) +
      ((expires) ? "; expires=" + expires.toGMTString() : "") +
      ((path) ? "; path=" + path : "") +
      ((domain) ? "; domain=" + domain : "") +
      ((secure) ? "; secure" : "")
}
function cookieGet (name)
{
  var checkString = name + "="
  var lengthCheckString = checkString.length
  var lengthCookie = document.cookie.length
  var position1 = 0
  while (position1 < lengthCookie)
  {
    var position2 = position1 + lengthCheckString
    if (document.cookie.substring(position1, position2) == checkString)
    {
      return cookieValue (position2)
    }
    position1 = document.cookie.indexOf(" ", position1) + 1
    if (position1 == 0)
    {
      break
    }
  }
  return null
}
function cookieValue (index)
{
  var stringEnd = document.cookie.indexOf (";", index)
  if (stringEnd == -1)
    stringEnd = document.cookie.length
  return unescape(document.cookie.substring(index, stringEnd))
}
function twodigits(v)
{
  var str=v.toString(10)
  if (str.length>2)
    str=str.substring(str.length-2,str.length)
  if (str.length<2)
    str="0"+str
  return(str)
}