var gImages=new Array;
var gIndex=0;
var DCS=new Object();
var WT=new Object();
var DCSext=new Object();

var gDomain="wt.raileurope.com";		
var gDcsId="dcsc5k5xlu8pojd61rfl2h1bf_8q9o";

function dcsVar(uri, query){	// optional parameters for use with PDFs
  var dCurrent=new Date();
  WT.tz= dCurrent.getTimezoneOffset() / 60 * -1;
  if (WT.tz == 0){
    WT.tz= "0";
  }
  WT.bh= dCurrent.getHours();
  WT.ul= 
    navigator.appName=="Netscape"?navigator.language:navigator.userLanguage;
  if (typeof(screen)=="object"){
    WT.cd=screen.colorDepth;
    WT.sr=screen.width+"x"+screen.height;
  }
  if (typeof(navigator.javaEnabled())=="boolean"){
    WT.jo=navigator.javaEnabled()?"Yes":"No";
  }
  if (document.title){				
    WT.ti=document.title;
  }
  WT.js="Yes";
  if (typeof(gVersion)!="undefined"){
    WT.jv=gVersion;
  }

  if (window.location.pathname.indexOf('/us') != -1) {
    WT.sp= window.location.hostname + "-" + "us";
  }  
  else if (window.location.pathname.indexOf('/canada') != -1) {
    WT.sp=window.location.hostname + "-" + "canada";
  }
  else {
    WT.sp=window.location.hostname + "-" + "us;" 
        + window.location.hostname + "-" + "canada";
  }

  DCS.dcsdat=dCurrent.getTime();
  DCS.dcssip=window.location.hostname;		
  if (typeof(uri)!="undefined") {
    DCS.dcsuri=uri;
    DCS.dcsqry=query;
    DCS.dcsref=window.location.pathname; 
      // make the pdfs referrer the uri of the page of its link
    }
  else {
    DCS.dcsuri=window.location.pathname;
    DCS.dcsqry=window.location.search;
    if ((window.document.referrer!="")&&(window.document.referrer!="-")){
      if (!(navigator.appName=="Microsoft Internet Explorer"&&
           parseInt(navigator.appVersion)<4)){
        DCS.dcsref=window.document.referrer;
      }
    }

    if (typeof(window.location.search)!="undefined") {
      var pairs= window.location.search.substring(1).split("&");
      for (var i=0; i < pairs.length; i++) {
        var pair= pairs[i].split("=");
        if (pair[0] == "source") {
          WT.mc_id= pair[1]
          WT.srch= 1;           
        }
        if (pair[0] == "ref") {
          DCS.dcsref= pair[1];
        }        
      }   
    } 
  }
}

function A(N,V){
  return "&"+N+"="+escape(V);
}

function dcsCreateImage(dcsSrc){
//  document.write(dcsSrc);
  if (document.images){
    gImages[gIndex]=new Image;
    gImages[gIndex].src=dcsSrc;
    gIndex++;
  }
  else{
    document.write(
      '<IMG BORDER="0" NAME="DCSIMG" WIDTH="1" HEIGHT="1" SRC="'+dcsSrc+'">');
  }
}

function dcsMeta(){
  var myDocumentElements;
  if (document.all){
    myDocumentElements=document.all.tags("meta");
  }
  else if (document.documentElement){
    myDocumentElements=document.getElementsByTagName("meta");
  }
  if (typeof(myDocumentElements)!="undefined"){
    for (var i=1;i<=myDocumentElements.length;i++){
      myMeta=myDocumentElements.item(i-1);
      if (myMeta.name){
        if (myMeta.name.indexOf('WT.')==0){
          WT[myMeta.name.substring(3)]=myMeta.content;
        }
        else if (myMeta.name.indexOf('DCSext.')==0){
          DCSext[myMeta.name.substring(7)]=myMeta.content;
        }
        else if (myMeta.name.indexOf('DCS.')==0){
          DCS[myMeta.name.substring(4)]=myMeta.content;
        }
      }
    }
  }
}

function dcsTag(){
  // A call for the old server
  //dcsTagOrg();
  // A call to the new server
  gDomain="statse.webtrendslive.com";
  gDcsId="dcsx8kr3i00000wszzcluesb5_7x1y";
  dcsTagOrg()
}
  
function dcsTagOrg(){
  if (document.ProductForm!=null && typeof(document.ProductForm)!="undefined") {
    WT.pn=window.location.pathname + window.location.search;
    WT.si_n="ConversionFunnel";
    WT.si_p="LandingPage";
  }

  var P="http"+(window.location.protocol.indexOf('https:')==0?'s':'') +
            "://"+gDomain+(gDcsId==""?'':'/'+gDcsId)+"/dcs.gif?";

  //  FOR TESTING WITHOUT CERTIFICATE	
  //  var P="http://"+gDomain+(gDcsId==""?'':'/'+gDcsId)+"/dcs.gif?";	 
  for (N in DCS){
    if (DCS[N]) {
      P+=A(N,DCS[N]);
    }
  }
  for (N in WT){
    if (WT[N]) {
      P+=A("WT."+N,WT[N]);
    }
  }
  for (N in DCSext){
    if (DCSext[N]) {
      P+=A(N,DCSext[N]);
    }
  }
  if (P.length>2048&&navigator.userAgent.indexOf('MSIE')>=0){
    P=P.substring(0,2040)+"&WT.tu=1";
  }
  dcsCreateImage(P);
}

dcsVar();
dcsMeta();
