document.domain="binarycanarias.com";function CargaIFRAME(Id,Ruta){var NuevoFRAME;try{NuevoFRAME=document.createElement('<IFRAME name="idSUB'+Id+'">')}catch(e){NuevoFRAME=document.createElement("IFRAME")}NuevoFRAME.setAttribute("src",Ruta);NuevoFRAME.setAttribute("id","idSUB"+Id);NuevoFRAME.setAttribute("name","idSUB"+Id);NuevoFRAME.id="idSUB"+Id;NuevoFRAME.name="idSUB"+Id;NuevoFRAME.setAttribute("style","display:none;position: relative;left:0px;top:0px;");NuevoFRAME.style.width="0%";document.body.appendChild(NuevoFRAME)}function CargarPagina(Ruta){try{top.location.replace(Ruta)}catch(e){top.location.href=Ruta}}function CargaBeta(Ruta){try{top.location.replace(Ruta)}catch(e){top.location.href=Ruta}}function PreguntaBeta(Ruta){var divMapa=document.getElementById("divBeta");var divBuscando=document.getElementById("divBuscando");var SelV2=document.getElementById("SelV2");var SelV3=document.getElementById("SelV3");SelV2.parentNode.href=Ruta;SelV2.parentNode.onclick=function(){CargaBeta(this)};SelV3.parentNode.href="http://www-r.binarycanarias.com";SelV3.parentNode.onclick=function(){CargaBeta(this)};divBuscando.style.visibility="hidden";divMapa.style.visibility="visible"}function PreguntaAlmacen(){var divMapa=document.getElementById("divMapa");var divBuscando=document.getElementById("divBuscando");var SelLP=document.getElementById("SelLP");if(AlmacenLP>0){SelLP.onmouseover=function(){this.src=this.src.replace(/OFF\./,"ON.")};SelLP.onmouseout=function(){this.src=this.src.replace(/ON\./,"OFF.")};SelLP.onclick=function(){Sel("LP")}}else{SelLP.onclick=function(){alert("En este momento no hay servidor disponible para este almacen.\nPruebe en unos minutos, o póngase en contacto con nosotros.")}}var SelTF=document.getElementById("SelTF");if(AlmacenTF>0){SelTF.onmouseover=function(){this.src=this.src.replace(/OFF\./,"ON.")};SelTF.onmouseout=function(){this.src=this.src.replace(/ON\./,"OFF.")};SelTF.onclick=function(){Sel("TF")}}else{SelTF.onclick=function(){alert("En este momento no hay servidor disponible para este almacen.\nPruebe en unos minutos, o póngase en contacto con nosotros.")}}divBuscando.style.visibility="hidden";divMapa.style.visibility="visible"}function ResultadoJS(RecomendadoURL,MalMenorURL,SoloParciales,Servidores,SoloInfo,conError,SinRecomendacion){alert(RecomendadoURL)}function Resultado(){if(top.Servlet.RecomendadoURL){CargarPagina(top.Servlet.RecomendadoURL);return}if(top.Servlet.MalMenorURL){CargarPagina(top.Servlet.MalMenorURL);return}if(top.Servlet.SoloParciales){var Doc=document;Doc.ImgCache=new Array();Doc.ImgCache[0]=new Image;Doc.ImgCache[1]=new Image;Doc.ImgCache[0].src="Imagenes/AlmacenTF-ON.gif";Doc.ImgCache[1].src="Imagenes/AlmacenLP-ON.gif";var conLP=false;var conTF=false;for(var Servidor in top.Servlet.Servidores){var Estado=top.Servlet.Servidores[Servidor].split("/");if(Estado[1]==0){var Islas=Estado[0].split(".");if(Islas[0]!="-1"){ServParciales[Servidor]="LP";AlmacenLP++}if(Islas[1]!="-1"){ServParciales[Servidor]="TF";AlmacenTF++}}}if(!top.Servlet.SoloInfo){PreguntaAlmacen();return}}if((top.Servlet.conError)||(top.Servlet.SinRecomendacion)){document.getElementById("divMapa").style.visibility="hidden";document.getElementById("divBuscando").style.visibility="hidden";document.getElementById("divError").style.visibility="visible";return}if(top.Servlet.SoloInfo){MostrarInfo()}}function VerLog(){document.getElementById("divSoloInfo").style.visibility="hidden";document.getElementById("divLog").style.visibility="visible"}function VerInfo(){document.getElementById("divSoloInfo").style.visibility="visible";document.getElementById("divLog").style.visibility="hidden"}function MostrarInfo(){var divSoloInfo=document.getElementById("divSoloInfo");var divBuscando=document.getElementById("divBuscando");var divLog=document.getElementById("divLog");var servletLog=top.Servlet.document.getElementById("Log");var Seleccion="";if(!top.Servlet.SoloParciales){Seleccion=((top.Servlet.Recomendado)?top.Servlet.Recomendado:top.Servlet.MalMenor).split("/")[0]}var Buffer="";for(var Servidor in top.Servlet.Servidores){Buffer+="<tr>";var Estado=top.Servlet.Servidores[Servidor].split("/");var Islas=Estado[0].split(".");Buffer+='<td width="50%" style="border:1px solid #C0C0C0; ">{Link}</td>';if(Seleccion==Servidor){Buffer=Buffer.replace("{Link}",'<a href="http://www'+Servidor+'.binarycanarias.com">www'+Servidor+".binarycanarias.com</a>")}else{Buffer=Buffer.replace("{Link}","www"+Servidor+".binarycanarias.com")}Buffer+='<td align="center" width="10%" style="border:1px solid #C0C0C0; ">';if(Estado[0]==-1){Buffer+="<a href=\"javascript:alert('"+Estado[1]+"');\">Error</a>"}else{if(Islas[0]!="-1"){Buffer+="Ok"}else{Buffer+="<a href=\"javascript:alert('Sin conexión');\">-.-</a>"}}Buffer+="</td>";Buffer+='<td align="center" width="10%" style="border:1px solid #C0C0C0; ">';if(Estado[0]==-1){Buffer+="<a href=\"javascript:alert('"+Estado[1]+"');\">Error</a>"}else{if(Islas[1]!="-1"){Buffer+="Ok"}else{Buffer+="<a href=\"javascript:alert('Sin conexión');\">-.-</a>"}}Buffer+="</td>";var Conx=Islas[0].split("|");var DispLP=0;var TotLP=0;var DispTF=0;var TotTF=0;if(Conx[0]){DispLP=Conx[0]}if(Conx[1]){TotLP=Conx[1]}if(Islas[1]){Conx=Islas[1].split("|");DispTF=Conx[0];TotTF=Conx[1]}Buffer+='<td align="right" width="15%" style="border:1px solid #C0C0C0; ">';if(Estado[0]==-1){Buffer+="-.-"}else{if(Estado[0].indexOf(".")==-1){Buffer+=Estado[1]}else{var SumaT=0;if(TotLP){SumaT=SumaT+parseInt(TotLP)}if(TotTF){SumaT=SumaT+parseInt(TotTF)}Buffer+=(""+SumaT)}}Buffer+="</td>";Buffer+='<td align="right" width="15%" style="border:1px solid #C0C0C0; ">';if(Estado[0]==-1){Buffer+="-.-"}else{if(Estado[0].indexOf(".")==-1){Buffer+=Estado[0]}else{var SumaT=0;if(DispLP){SumaT=SumaT+parseInt(DispLP)}if(DispTF){SumaT=SumaT+parseInt(DispTF)}Buffer+=(""+SumaT)}}Buffer+="</td></tr>"}divSoloInfo.innerHTML=divSoloInfo.innerHTML.replace(/<\/table>/i,Buffer);var tmpLOG=(servletLog)?servletLog.innerHTML:"";divLog.innerHTML="<font face='Verdana' size='1'><a href='javascript:VerInfo();'>Volver a la información</a></font><br><pre>"+tmpLOG+"</pre>";divBuscando.style.visibility="hidden";divSoloInfo.style.visibility="visible"}function Sel(Almacen){var Ruta;for(var Servidor in ServParciales){if(ServParciales[Servidor]==Almacen){Ruta="http://www"+Servidor+".binarycanarias.com";break}}if(Ruta){var QueryString=window.location.search;if(QueryString){Ruta+=QueryString}CargarPagina(Ruta)}else{alert("No se ha podido encontrar un servidor para el almacen seleccionado.\nPor favor, recarge la página e inténtelo de nuevo.\nGracias.")}}function pS(){if(enServidor){return}enServidor=true;var Servlet=document.getElementById("Servlet");var QueryString=window.location.search;var Ruta="/Seleccion.jsp";if(QueryString){Ruta+=QueryString}Servlet.src=Ruta}function e(id,Disp){if(Hecho){return}d=Disp.split(":");idL=id.substring(1);Libres=0;for(c=0;c<Lista.length;c++){f=Lista[c].split("|");if(idL==f[2]){Libres=(1*f[1])-(1*d[1]);break}}if((Libres>0)&&(d[0]=="OKOK")){Hecho=true;clearTimeout(idTimeout);Query=(Query)?"?"+Query:"";CargarPagina("http://www"+id+".binarycanarias.com"+Query)}else{Contador++;Resp[Math.abs(id)]=Disp;if(Contador==Lista.length){Hecho=true;pS()}}}function Buscar(){if(Query.length!=0){pS()}else{for(c=0;c<Lista.length;c++){d=Lista[c].split("|");CargaIFRAME("e"+d[2],"http://www-"+d[2]+".binarycanarias.com/estV2/")}idTimeout=setTimeout("pS()",5000)}}var Resp=new Array();var enServidor=false;var ServParciales=new Object();var AlmacenLP=0;var AlmacenTF=0;var Contador=0;var Query=window.location.search.substring(1);var idTimeout;var Hecho=false;var Lista=["1|10|3","2|15|2","3|10|5","4|100|4","5|100|1","6|100|6"];
