// Write a cookie value
function setCookie(name, value, expires, path, domain, secure) {
  document.cookie = name + "=" + escape(value) + 
  ((expires == null) ? "" : "; expires=" + expires.toGMTString()) +
  ((path == null) ? "" : "; path=" + path) +
  ((domain == null) ? "" : "; domain=" + domain) +
  ((secure == null) ? "" : "; secure");
}


// Retrieve A Named Cookie Value
function getCookie(name){
  var cname = name + "=";               
  var dc = document.cookie;             
  if (dc.length > 0) {              
    begin = dc.indexOf(cname);       
    if (begin != -1) {           
      begin += cname.length;       
      end = dc.indexOf(";", begin);
      if (end == -1) end = dc.length;
        return unescape(dc.substring(begin, end));
    } 
  }
  return null;
}


// Delete a named cookie value
function deleteCookie(name, path, domain) {
   var value = getCookie(name);
   if (value != null) document.cookie = name + '=' + ((path) ? '; path=' + path : '') + ((domain) ? '; domain=' + domain : '') + '; expires=Thu, 01-Jan-70 00:00:01 GMT';
   return value;
}


// Fix Netscape 2.x Date bug
function fixDate(date) {
   var workingDate = date;
   var base = new Date(0);
   var skew = base.getTime();
   if (skew > 0) workingDate.setTime(workingDate.getTime() - skew);
   return workingDate;
}


// Test for cookie support
function supportsCookies(rootPath) {
   setCookie('checking_for_cookie_support', 'testing123', '', (rootPath != null ? rootPath : ''));
   if (getCookie('checking_for_cookie_support')) return true;
   else return false;
}
function checkEmail(emailIn, errorInfo) {
    var RegEmail = /^[_.0-9a-z-&]+@([0-9a-z][0-9a-z-]+.)+[a-z]{2,3}$/;
    if ( emailIn == '' || RegEmail.test(emailIn) ) {
      return true;
    }
    else {
      //Alert(errorInfo);
      return false;
    }
  } // checkNotEmail
 
function reloj(){
	var hoy=new Date();
	var h=hoy.getHours();
	var m=hoy.getMinutes();
	var s=hoy.getSeconds();
	m=checkTime(m);
	s=checkTime(s);
	$('hora').innerHTML=h+":"+m+":"+s;
	t=setTimeout('reloj()',500);
}

function checkTime(i){
	if (i<10) 
	{i="0" + i};
	return i;
}
	
function CompruebaAcceso(usuario,cont){
	var surl = 'AccesoUser.asp';
	var pars = 'usuario=' + usuario + '&Password=' + cont;
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'get', 
			parameters: pars, 
			onComplete: LoginOK,
			onFailure: LoginKO
		});		
}

function LoginOK(originalRequest){
	if (originalRequest.responseText=='OK'){
		var userc=$('loginx').value;
		var txt = '<span title="Desconectar este usuario" style="cursor:pointer" onclick="CambiaUser()">'+'Usuario: ' + userc + '</span>';
		document.getElementById('login').innerHTML=txt;
		document.getElementById('LoginFrom').style.visibility='hidden';
		var validez = 30;
		var caduca = new Date(); 
		caduca.setTime(caduca.getTime() + (validez*24*60*60*1000));		
		setCookie('usuario',userc,caduca);
	}else{
		var msg ='Usuario desconocido o bien el Nombre o la contraseña son incorrectas';
		alert(msg);
	}
}

function LoginKO(originalRequest){
	var msg ='La peticion ha fallado, inténtelo de nuevo';
	alert(msg);
}
function ErrorAjax(){
	var msg ='Error en la petición. Inténtelo una vez más';
	alert(msg);
	$('wait').style.visibility='hidden';	
}

function MuestraEspeciales(){
	$('wait').style.visibility='visible';
	var surl = 'Especiales.asp';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			onComplete: PintaMuestraEspeciales,
			onFailure: ErrorAjax
		});			
}
function PintaMuestraEspeciales(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}
function MuestraEspecial(cual){
	$('wait').style.visibility='visible';
	var surl = 'Especial.asp';
	var pars = 'id=' + cual;
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMuestraEspecial,
			onFailure: ErrorAjax
		});			
}
function PintaMuestraEspecial(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}
function MuestraAcerca(){
	$('wait').style.visibility='visible';
	var surl = 'acerca.asp';
	var pars = '';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMuestraAcerca,
			onFailure: ErrorAjax
		});	
}
function PintaMuestraAcerca(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}
function MuestraEnlaces(){
	//alert('ooo');
	$('wait').style.visibility='visible';
	var surl = 'links.asp';
	var pars = '';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMuestraEnlaces,
			onFailure: ErrorAjax
		});	
}
function PintaMuestraEnlaces(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}

function MuestraTodos(){
	//alert('ooo');
	$('wait').style.visibility='visible';
	var surl = 'todas.asp';
	var pars = '';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMuestraTodos,
			onFailure: ErrorAjax
		});	
}
function PintaMuestraTodos(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}
function MuestraBitacora(mes,anyo){
	//alert('ooo');
	$('wait').style.visibility='visible';
	var surl = 'bitacora.asp';
	if (mes==null){
		var pars = '';
	}else{
		var pars = 'm=' + mes + '&a='+anyo;
	}
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMuestraTodos,
			onFailure: ErrorAjax
		});	
}

function PintaMuestraBitacora(originalRequest){
	//alert(originalRequest.responseText);
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}


function MuestraNombresPropios(){
	//alert('ooo');
	$('wait').style.visibility='visible';
	var surl = 'NombresPropios.asp';
	var pars = '';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaNombresPropios,
			onFailure: ErrorAjax
		});	
}

function PintaNombresPropios(originalRequest){
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}

function MuestraMonografias2(){
	//alert('ooo');
	$('wait').style.visibility='visible';
	var surl = 'monografias.asp';
	var pars = '';
	var myAjax = new Ajax.Request(
		surl, 
		{ 
			method: 'post', 
			encoding: 'windows-1256',
			contentType:  'application/x-www-form-urlencoded',
			parameters: pars,
			onComplete: PintaMonografias,
			onFailure: ErrorAjax
		});	
}

function PintaMonografias(originalRequest){
	$('especiales').innerHTML = originalRequest.responseText;
	$('wait').style.visibility='hidden';
}

function EliminaComent(usuario, comentario){
	if (usuario){
		$('wait').style.visibility='visible';
		var surl = 'EliminaComent.asp?user='+usuario+'&coment='+comentario;
		//alert(surl);
		var pars = '';
		var myAjax = new Ajax.Request(
			surl, 
			{ 
				method: 'post', 
				encoding: 'windows-1256',
				contentType:  'application/x-www-form-urlencoded',
				parameters: pars,
				onComplete: EliminaComent2,
				onFailure: ErrorAjax
			});	
	}else{
		alert('Solo los usuarios registrados pueden alertar sobre comentarios inapropiados');
	}
}

function EliminaComent2(originalRequest){
	//alert('comentarioNum'+originalRequest.responseText);
	var respuesta=originalRequest.responseText;
	elementoTemp = respuesta.split("*");
	var comentarioID = elementoTemp[0];
 	var numvotos = elementoTemp[1];
 	var repe = elementoTemp[2];
	elemento= $('comentarioNum'+comentarioID);
	
	if (numvotos>2){
		comentarioTD = $('NumComent'+comentarioID);
		comentarioTD.style.visibility='hidden';
		comentarioTD2 = $('NumComent2'+comentarioID);
		comentarioTD2.style.visibility='hidden';
	}
	$('wait').style.visibility='hidden';
	if (repe==0){
		alert('El comentario ha quedado marcado según su petición');
		elemento.style.visibility='hidden';
	}
	if (repe==1){
		alert('Solo es posible alertar una vez por comentario');
	}
	if (repe==2){
		alert('No es posible alertar con tanta frecuencia');
	}	
}