// JavaScript Document
/*
Indice de funciones:
-getcookie(name)
-iscookie(name)
-makecookie(name,value,expire)
-killcookie(name)
-ordenar(a,b)
-getarray()
-topfive(array)
-lanbar(idioma)
*/
function topfive(array){
//Función para verificar que si no hay favoritos o hay menos de 5, poga los default	
/*
1-bio fortuny
2-members
3-podea fisicas
4-poder morales
5-invenciones
*/
	reemplazo = new Array({html:'miembros/biografias/rafaelbeltranfortuny.html',espanol:'Currículum de Rafael Beltrán Fortuny',ingles:'Rafael Beltran-Fortuny´s CV',contador:0},{html:'miembros/miembros.html',espanol:'Miembros',ingles:'Members',contador:0},{html:'_pdfs/pdfreader.php?archivo=nacional_espanol_poderfisicas',espanol:'Poder Personas Físicas Español Nacional',ingles:'Poder Personas Físicas Español Nacional',contador:0},{html:'_pdfs/pdfreader.php?archivo=nacional_espanol_podermorales',espanol:'Poder Personas Morales Español Nacional',ingles:'Poder Personas Morales Español Nacional',contador:0},{html:'_pdfs/pdfreader.php?archivo=nacional_espanol_cesioninvenciones',espanol:'Cesión Invenciones Español Nacional',ingles:'Cesión Invenciones Español Nacional',contador:0});
	var j=0;
	for(i=0;i<5;i++){
		if(array[i].contador==0){
			array[i] = reemplazo[j];
			j++;
		}
	}
	return array;
}
function ordenar(a,b){
//Función de apoyo para el Array.sort con valores numéricos
	return a.contador == b.contador ? 0 : (a.contador > b.contador ? -1 : 1);
}
function killcookie(name){
//Elimina una cookie dado su nombre y regresa confirmación
	makecookie(name,"Deleted", -1);
	return !(iscookie(name));
}
function getcookie(name) {
//Obtiene el valor de una cookie dado su nombre
	var dc = document.cookie;
	var prefix = name + "=";
	var begin = dc.indexOf("; " + prefix);
	if (begin == -1) {
		begin = dc.indexOf(prefix);
		if (begin != 0) return null;
	} else
		begin += 2;
	var end = document.cookie.indexOf(";", begin);
		if (end == -1)
			end = dc.length;
	return unescape(dc.substring(begin + prefix.length, end));
}
function iscookie(name){
//Verifica la existencia de una cookie dado su nombre
	return getcookie(name)!=null ? true: false;
}
function makecookie(name,value,expire){
//Crea una cookie dados su nombre, su valor y la fecha de expiración (En años)
	var cookietext = name + "=" + escape(value);
	var today=new Date();
    var expiredate = new Date();
    expiredate.setTime(today.getTime() + 1000 * 60 * 60 * 24 * 365 * expire);
    cookietext += "; expires=" + expiredate.toGMTString();
	//cookietext +="; path=/";
	//cookietext +="; domain=www.beltran.com.mx";
	//cookietext +="; secure=yes";
	document.cookie = cookietext;
	return iscookie(name);	
}
function getarray(){
//Datos para el array
	return "new Array({html:'areasdepractica/areasdepractica.html',espanol:'Áreas de Práctica',ingles:'Areas of Expertise',contador:0},{html:'buscador/buscador.html',espanol:'Buscador',ingles:'Search',contador:0},{html:'contacto/contacto.html',espanol:'Contacto',ingles:'Contact',contador:0},{html:'documentos/documentos.html',espanol:'Documentos Legales',ingles:'Legal Documents',contador:0},{html:'domicilio/domicilio.html',espanol:'Domicilio',ingles:'Domicile',contador:0},{html:'miembros/miembros.html',espanol:'Miembros',ingles:'Members',contador:0},{html:'miembros/biografias/rafaelbeltranfortuny.html',espanol:'Currículum de Rafael Beltrán Fortuny',ingles:'Rafael Beltran-Fortuny´s CV',contador:0},{html:'perfil/perfil.html',espanol:'Perfil',ingles:'Profile',contador:0},{html:'requisitos/requisitos.html',espanol:'Requisitos Legales',ingles:'Filing Requirements',contador:0},{html:'requisitos/requisitos/avisocomercial.html',espanol:'Aviso Comercial',ingles:'Commercial Slogan',contador:0},{html:'requisitos/requisitos/disenoindustrial.html',espanol:'Diseño Industrial',ingles:'Industrial Drawing',contador:0},{html:'requisitos/requisitos/marca.html',espanol:'Marca',ingles:'Trademark',contador:0},{html:'requisitos/requisitos/nombrecomercial.html',espanol:'Nombre Comercial',ingles:'Commercial Name',contador:0},{html:'requisitos/requisitos/patente.html',espanol:'Patente',ingles:'Patent or Utility Model',contador:0},{html:'requisitos/requisitos/patente_fasenacional.html',espanol:'Patente Fase Nacional',ingles:'Patent or Utility Model (National Phase)',contador:0})";
}
function interna(){
	elarray = eval(getcookie("elarray"));
	killcookie("elarray");
	for(i in elarray){
		if(elarray[i].html==((location.pathname+location.search).slice(4))){
			elarray[i].contador+=1;
			break;
		}
	}
	var output = "new Array(";
	for(j in elarray){
	  output = output + "{";
	  output = output + "html:'" + elarray[j].html +"',";
	  output = output + "espanol:'" + elarray[j].espanol +"',";
	  output = output + "ingles:'" + elarray[j].ingles+"',";
	  output = output + "contador:" + elarray[j].contador;
	  output = output + "}";
	  if(j!=26)output = output + ",";
	}
	output = output + ")";
	makecookie("elarray", output,1);
	return output;
}
function lanbar_DoFSCommand(command, args){
	cadena = location.pathname;
	subdir = "";
	if(cadena.indexOf("/beltran/")!=-1){
		cadena = cadena.substr(8);
		subdir = "/beltran";
	}
	cadena = cadena.substr(3);
	location.href = subdir + "/" + command + cadena + location.hash;
}
//Windows lanbar_DoFSCommand
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && 
  navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
  document.write('<SCRIPT LANGUAGE=VBScript\> \n');
  document.write('on error resume next \n');
  document.write('Sub lanbar_FSCommand(ByVal command, ByVal args)\n');
  document.write(' call lanbar_DoFSCommand(command, args)\n');
  document.write('end sub\n');
  document.write('</SCRIPT\> \n');
}
/*
var InternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
function myFlash_DoFSCommand(command, args)                {
  var myFlashObj = InternetExplorer ? myFlash : document.myFlash;
  alert (args);
}
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && 
  navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
  document.write('<SCRIPT LANGUAGE=VBScript\> \n');
  document.write('on error resume next \n');
  document.write('Sub myFlash_FSCommand(ByVal command, ByVal args)\n');
  document.write(' call myFlash_DoFSCommand(command, args)\n');
  document.write('end sub\n');
  document.write('</SCRIPT\> \n');
} 
*/