/****************************** Funcion Accounts *******************************/
   /* Funcion que devuelve en ID de cuenta perteneciente a cada pais */
   function Accounts(code_pais)
   {
           AR_ACCOUNT = "DM50101810BE";
           BR_ACCOUNT = "DM5009284DES";
           CL_ACCOUNT = "DM500928EAMA";
           CO_ACCOUNT = "DM5009283LBB";
           GL_ACCOUNT = "DM5009280NCV";
           MX_ACCOUNT = "DM500928FNAF";
           MXMTY_ACCOUNT = "DM500928FNAF";
           US_ACCOUNT = "DM500928NMZA";
           UY_ACCOUNT = "DM5009286NDS";
           VE_ACCOUNT = "DM5009283LBB";
           UNKNOWN_ACCOUNT = "DM501013E9ED";

           if(code_pais == "AR")
                   return(AR_ACCOUNT);
           if(code_pais == "BR")
                   return(BR_ACCOUNT);
           if(code_pais == "CL")
                   return(CL_ACCOUNT);
           if(code_pais == "CO")
                   return(CO_ACCOUNT);
           if(code_pais == "GL")
                   return(GL_ACCOUNT);
           if(code_pais == "undefined")
                   return(UNKNOWN_ACCOUNT);
           if(code_pais == "MX")
                   return(MX_ACCOUNT);
           if(code_pais == "US")
                   return(US_ACCOUNT);
           if(code_pais == "UY")
                   return(UY_ACCOUNT);
           if(code_pais == "VE")
                   return(VE_ACCOUNT);
           if(code_pais == "MX-MTY")
                   return(MXMTY_ACCOUNT);
   }
   /******************************** Fin de la funcion Accounts *******************************/

   /********************************** Funcion CodeProducto ***********************************/
   /* Funcion que devuelve codigo de un producto en particular */
   function CodeProducto(producto)
   {
           temp = new String(producto);
           producto = temp.valueOf().toLowerCase();
           if(producto == "canal")
                   return("CH");
           if(producto == "cobrand")
                   return("CB");
           if(producto == "servicios")
                   return("SE");
           if(producto == "promocion")
                   return("PR");
           if(producto == "tapas")
                   return("HP");
   }
   /****************************** Fin de la funcion CodeProducto******************************/
   function f_rac_Capitaliza(vstring){
      vchar=vstring.charAt(0);
      vchar=vchar.toUpperCase();
      return vchar+vstring.substr(1,vstring.length);
   }
   function f_rac_DoMeter(pais_d, page_name, producto, contenido){
           var rac_site_values=f_rac_ValuexSite();
           //var rac_site=f_rac_GiveSite();
           //var rac_domain=f_rac_GiveMeterDomain(rac_site);     //"http://metricas.elsitio.com/";
           var rac_domain=rac_site_values[2];     //"http://metricas.elsitio.com/";
           var rac_query="?";
           var rac_ext=".html";
           var rac_pais_file=pais_d.toUpperCase();
           //var rac_pais_cook=f_rac_getcode(f_rac_GiveCookieSite(rac_site));
           var rac_pais_cook=f_rac_getcode(rac_site_values[1]);
           var rac_page=page_name.toLowerCase();
           var rac_producto=producto.toLowerCase();
           var rac_contenido=contenido.toLowerCase();
           var rac_producto_code=CodeProducto(rac_producto);
           /*
           //Agregado temporal para distinguir venus
           if(f_rac_ComparaPatron("venus",rac_contenido)){
              rac_domain=rac_domain+"venus/";
           }
           */

           rac_pais_cook=rac_pais_cook.toUpperCase();
           rac_contenido=f_rac_Capitaliza(rac_contenido);
           rac_page=f_rac_Capitaliza(rac_page);
           rac_producto_code=rac_producto_code.toUpperCase();
           var rac_unique=f_rac_giveUnique();
           var rac_referer="";
           if(document.referrer){
              rac_referer=document.referrer;
           }
           var rac_filename=f_rac_getpaisname(rac_pais_cook);          //queda mas formal reconvertirlo no basandose en el valor de la cookie
           //var rac_querystring="content="+rac_pais_file+"-"+rac_contenido+"-"+rac_producto_code+"&page="+rac_pais_file+"-"+rac_page+"&totalcontent="+rac_contenido+"&site="+rac_site_values[0]+"&referer="+rac_referer+"&unique="+rac_unique;
           var rac_querystring="content="+rac_pais_file+"-"+rac_contenido+"-"+rac_producto_code+"&page="+rac_pais_file+"-"+rac_page+"&totalcontent="+rac_contenido+"&site="+rac_site_values[0]+"&unique="+rac_unique;

           var rac_final=rac_domain+rac_filename+rac_ext+rac_query+rac_querystring;
           f_rac_PrintMeter(rac_final);
   }

   function f_rac_getpaisname(vpaiscode){
      var vreturn;
      switch(vpaiscode.toLowerCase()){
         case "ar":
            vreturn="argentina";
            break;
         case "cl":
            vreturn="chile";
            break;
         case "co":
            vreturn="colombia";
            break;
         case "mx":
            vreturn="mexico";
            break;
         case "mx-mty":
            vreturn="mexico";
            break;
         case "gl":
            vreturn="global";
            break;
         case "uy":
            vreturn="uruguay";
            break;
         case "us":
            vreturn="usa";
            break;
         case "br":
            vreturn="brasil";
            break;                    //
         case "ve":
            vreturn="venezuela";
            break;
         case "sr":
            vreturn="surinam";
            break;
         case "pr":
            vreturn="puertorico";
            break;
         case "pe":
            vreturn="peru";
            break;
         case "py":
            vreturn="paraguay";
            break;
         case "pa":
            vreturn="panama";
            break;
         case "ni":
            vreturn="nicaragua";
            break;
         case "jm":
            vreturn="jamaica";
            break;
         case "hn":
            vreturn="honduras";
            break;
         case "gy":
            vreturn="guyana";
            break;
         case "gf":
            vreturn="guyanafrancesa";
            break;
         case "gt":
            vreturn="guatemala";
            break;
         case "sv":
            vreturn="elsalvador";
            break;
         case "ec":
            vreturn="ecuador";
            break;
         case "cr":
            vreturn="costarica";
            break;
         case "bo":
            vreturn="bolivia";
            break;
         case "bz":
            vreturn="belize";
            break;
         default:
            vreturn="global";
      }
      return vreturn;
   }

   function f_rac_PrintMeter(vpais){
      document.write("<script language=\"JavaScript\" src=\""+vpais+"\"></script>");
      //alert(vpais);
      //var vtemp=new Image();
      //vtemp.src=vpais;
      //vtemp=null;
   }

   function f_rac_giveUnique(){
      var v_value= Math.random();
      var v_a=1;
      var v_b=1000000;
      return (v_a+((v_b-v_a)*v_value));
   }

   function f_rac_CondicionesDoMeter(valor){
      var v_return=1;
      //if(!f_ISHTML())
      //   return 0;
      /*
      if(f_rac_ComparaPatron("tecnologia",valor))
         v_return=1;
      if(f_rac_ComparaPatron("venus",valor))
         v_return=1;
      */
      return v_return;
   }

   function f_rac_ComparaPatron(qstring, value){
      var v_rac_return=0;
      if(value==qstring)
         v_rac_return=1;
      return v_rac_return;
   }

   function f_rac_Concat(pais_d, page_name, producto, contenido){
      return contenido.toLowerCase();
   }

   function f_ISHTML(){
      var vname=document.URL;
      var ve;
      var vreturn;
      if(((ve=vname.indexOf("?"))!=-1))
         vname=vname.substr(0,ve)
      vname=vname.substr(vname.length-5,5)
      if(vname==".html")
         vreturn=1;
      else
         vreturn=0;
      return vreturn;
   }
   function IsInvalidCountry(twolast){
      var vreturn;
      switch(twolast){
         case ".tv":
            vreturn=1;
            break;
         default:
            vreturn=0;
     }
     return vreturn;
   }
   function f_rac_StripDomain(vhost){
      var vname=vhost;
      if((vname.charAt(vname.length-3))=='.'){
              var va=vname.lastIndexOf(".");
              var v1=vname.substr(va);
        if(IsInvalidCountry(v1)){
            va=vname.lastIndexOf(".");
            ve=vname.lastIndexOf(".",va-1);
            vdomain=vname.substr(ve);
            vmethod="1";
        }else{
            va=vname.lastIndexOf(".");
            ve=vname.lastIndexOf(".",va-1);
            vc=vname.lastIndexOf(".",ve-1);
            vdomain=vname.substring(vc,va);
            vmethod="2";
        }
      }else{
         va=vname.lastIndexOf(".");
         ve=vname.lastIndexOf(".",va-1);
         vdomain=vname.substr(ve);
         vmethod="3";
      }
      return vdomain;
   }
   function f_rac_ValuexSite(){
      var vname=document.location.host;
      var vdomain=f_rac_StripDomain(vname);
      var vreturn= new Array();
      switch(vdomain.toLowerCase()){
         case ".elsitio.com":
            vreturn[0]="ElSitio";
            vreturn[1]="elsitio%5Finfo";
            vreturn[2]="http://metricas.elsitio.com/";
            break;
         case ".infinito.com":
         case ".infinito.tv":
            vreturn[0]="Infinito";
            vreturn[1]="infinitoinfo";
            vreturn[2]="http://metricas.infinito.com.ar/";
            break;
         case ".venus.com":
         case ".venus.tv":
            vreturn[0]="Venus";
            vreturn[1]="venusinfo";
            vreturn[2]="http://metricas.venus.com.ar/";
            break;
         case ".space.com":
         case ".space.tv":
            vreturn[0]="Space";
            vreturn[1]="spaceinfo";
            vreturn[2]="http://metricas.space.com.ar/";
            break;
         case ".osite.com":
            vreturn[0]="OSite";
            vreturn[1]="elsitio%5Finfo";
            vreturn[2]="http://metricas.osite.com.br/";
            break;
         case ".uniseries.com":
         case ".uniseries.tv":
            vreturn[0]="Uniseries";
            vreturn[1]="uniseriesinfo";
            vreturn[2]="http://metricas.uniseries.com.ar/";
            break;
         case ".retro.com":
	 case ".retro.tv":
	    vreturn[0]="Retrochannel";
	    vreturn[1]="uniseriesinfo";
	    vreturn[2]="http://metricas.retro.tv/";
            break;
         case ".muchmusic.com":
         case ".muchmusic.tv":
            vreturn[0]="MuchMusic";
            vreturn[1]="muchmusicinfo";
            vreturn[2]="http://metricas.muchmusic.com.ar/";
            break;
         case ".i-sat.com":
            vreturn[0]="I-Sat";
            vreturn[1]="isatinfo";
            vreturn[2]="http://metricas.i-sat.com/";
            break;
         case ".isat.tv":
            vreturn[0]="I-Sat";
            vreturn[1]="isatinfo";
            vreturn[2]="http://metricas.isat.tv/";
            break;
         case ".htv.com":
	 case "htv.com":
	    vreturn[0]="HTV";
	    vreturn[1]="htvinfo";
	    vreturn[2]="http://metricas.htv.com/";
            break;
         case ".clase.net":
	 case "clase.net":
	    vreturn[0]="Clase";
	    vreturn[1]="claseinfo";
	    vreturn[2]="http://metricas.clase.net/";
            break;
         case ".playboytvla.com":
	 case "playboytvla.com":
	    vreturn[0]="Playboytvla";
	    vreturn[1]="playboytvlainfo";
	    vreturn[2]="http://metricas.playboytvla.com/";
            break;
         case ".ftvla.com":
	 case "ftvla.com":
	    vreturn[0]="FTVLA";
	    vreturn[1]="ftvlainfo";
	    vreturn[2]="http://metricas.ftvla.com/";
            break;           
         case ".cupido.net":
            vreturn[0]="Cupido";
            vreturn[1]="cupidoinfo";
            vreturn[2]="http://metricas.cupido.net/";
            break;
         case ".gchannel.com":
	    vreturn[0]="Gchannel";
	    vreturn[1]="gchannelinfo";
	    vreturn[2]="http://metricas.gchannel.com.ar/";
            break;
	case ".elsitiodc.com":
	    vreturn[0]="ESDC";
	    vreturn[1]="esdcinfo";
	    vreturn[2]="http://metricas.elsitiodc.com/";
            break;
         default:
           vreturn[0]="ElSitio";
           vreturn[1]="elsitio%5Finfo";
           vreturn[2]="http://metricas.elsitio.com/";

      }
      return vreturn;

   }

   //Copy-Paste: solamente se modifico, el parametro, etc.
   function f_rac_getcode(cookiename)
   {
        p = getCookieKey(cookiename,"PAIS");
        switch(p){
           case "argentina":
              vc="ar";
              break;
           case "chile":
              vc="cl";
              break;
           case "mexico":
              vc="mx";
              break;
           case "uruguay":
              vc="uy";
              break;
           case "usa":
              vc="us";
              break;
           case "brasil":
              vc="br";
              break;
           case "colombia":
              vc="co";
              break;
           case "venezuela":
              vc="ve";
              break;
           case "espania":
              vc="es";
              break;
           case "mx_monterrey":
              vc="mx-mty";
              break;                                  //
           case "surinam":
              vc="sr";
              break;
           case "puertorico":
              vc="pr";
              break;
           case "peru":
              vc="pe";
              break;
           case "paraguay":
              vc="py";
              break;
           case "panama":
              vc="pa";
              break;
           case "nicaragua":
              vc="ni";
              break;
           case "jamaica":
              vc="jm";
              break;
           case "honduras":
              vc="hn";
              break;
           case "guyana":
              vc="gy";
              break;
           case "guyanafrancesa":
              vc="gf";
              break;
           case "guatemala":
              vc="gt";
              break;
           case "elsalvador":
              vc="sv";
              break;
           case "ecuador":
              vc="ec";
              break;
           case "costarica":
              vc="cr";
              break;
           case "bolivia":
              vc="bo";
              break;
           case "belize":
              vc="bz";
              break;
           case "":
              vc="gl";
              p="global";
              break;
           default:
              vc="gl";
              p="global";
        }
      return vc;
   }
/*
   function f_rac_GiveSite(){
      var vname="cupido.elsitio.com";//document.location.host;
      var va=vname.lastIndexOf(".");
      var ve=vname.lastIndexOf(".",va-1);
      var vdomain=vname.substr(ve);        //Si ve es -1 igual funciona ya que la retorna completa como deberia ser
      var vreturn;
      switch(vdomain.toLowerCase()){
         case ".elsitio.com":
            vreturn="elsitio";
            break;
         case ".infinito.com":
            vreturn="infinito";
            break;
         case ".venus.com":
            vreturn="venus";
            break;
         case ".space.com":
            vreturn="space";
            break;
         default:
           vreturn="elsitio";
      }
      return vreturn;
   }

   function f_rac_GiveCookieSite(vsite){
      var vcookiename;
      switch(vsite){
        case "infinito":
          vcookiename="infinitoinfo";
          break;
        case "space":
          vcookiename="spaceinfo";
          break;
        case "elsitio":
          vcookiename="elsitio%5Finfo";
          break;
        case "venus":
          vcookiename="venusinfo";
          break;
        default:
          vcookiename="elsitio%5Finfo";
      }
      return vcookiename;
   }

   function f_rac_GiveMeterDomain(vsite){
      var vdomain;
      switch(vsite){
        case "infinito":
          vdomain="http://metricas.infinito.com/";
          break;
        case "space":
          vdomain="http://metricas.space.com/";
          break;
        case "elsitio":
          vdomain="http://metricas.elsitio.com/";
          break;
        case "venus":
          vdomain="http://metricas.venus.com/";
          break;
        default:
          vdomain="http://metricas.elsitio.com/";
      }
      alert("vdomain:"+vdomain);
      return vdomain;
   }
*/
   /****************************** Funcion InitHitBox ******************************/
   function InitHitBox(pais_d, page_name, producto, contenido)
   {

           pais_d = pais_d.toUpperCase();
           //
           if(f_rac_CondicionesDoMeter(f_rac_Concat(pais_d, page_name, producto, contenido))){
              f_rac_DoMeter(pais_d, page_name, producto, contenido);
           }
           //
           if(pais_d == "GL")
           {
                   var pais_o = getcode();

                   pais_o = pais_o.toUpperCase();

                   if(pais_o == "GL")
                           pais_o = "undefined";

                _acct = Accounts(pais_o)+";"+Accounts(pais_d);

                   var name_d = pais_d.toUpperCase() + "-" + page_name;
                   _pn = name_d+";"+name_d;

                   var content_name_d =  pais_d.toUpperCase() + "-" + contenido + "-" + CodeProducto(producto);
                   _mlc = "/" + content_name_d+";/" + content_name_d;
           }
           else{
				   var pais_o = getcode();
                   pais_o = pais_o.toUpperCase();

                   var name = pais_d.toUpperCase() + "-" + page_name;
                   var name_o = pais_o.toUpperCase() + "_" + pais_d.toUpperCase() + "-COUNTDOBLE_" + page_name;

                   var content_name = pais_d.toUpperCase() + "-" + contenido + "-" + CodeProducto(producto);
                   var content_name_o = pais_o.toUpperCase() + "_" + pais_d.toUpperCase() + "-COUNTDOBLE_" + contenido + "-" + CodeProducto(producto);

                   if(pais_o != pais_d.toUpperCase()){
					   _acct = Accounts(pais_d) + ";" + Accounts("GL");
					   _pn = name + ";" + name_o;
					   _mlc = "/" + content_name + ";/" + content_name_o;
				   }
				   else{
				   	   _acct = Accounts(pais_d);
                   	   _pn = name;
                   	   _mlc = "/" + content_name;
				   }
           }
      //Js-Added by Rcelestino

   }
   /****************************** Fin de la funcion InitHitBox ******************************/