//formulario comentarios

function sacaFormulario()
{
		$("#form_coment").show("slow");
		//new Effect.BlindDown(document.getElementById('form_coment'));
		//setTimeout("document.fComenta.comentario.focus()",500);

}
function ocultaFormulario()
{
		$("#form_coment").hide();
		//new Effect.BlindUp(document.getElementById('form_coment'));
}

	function MuestraFormulario()
	{
	var URLLogin = "https://login.terra.es/amserver/UI/Login?org=ssoterra&module=LDAP&goto="+gotoP;
	cTIDA=isCookie('TIDA');
	cTIDR=isCookie('TIDR');
		if(cTIDA&&cTIDR) { k=1; /* alert('está logado'); */  }
		else{
			if(cTIDR) { k = 2/* alert('está recordado'); */ }
			else{
//				alert('no esta');
//				location.href=URLLogin;
			}
		}
	
	
		sacaFormulario();
//		document.getElementById('mostrar').style.visibility="hidden";
	}



function muestraformularioenload()
{
sURL = parent.document.URL;
var parametro='';
if (sURL.indexOf('?')!=-1){
	parametro=sURL.substring(sURL.indexOf('?')+1,sURL.length);
}
if (parametro.length!=0){
	sacaFormulario();}
}		 


//comprobar coockies

var k="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";
var cTIDR,cTIDA,dp=document,gotoP=escape(document.location.href);

function d64(i)
{
var o="";var ch1,ch2,ch3="";var en1,en2,en3,en4="";
var x=0;
var base64test=/[^A-Za-z0-9\+\/\=]/g;
i=i.replace(/[^A-Za-z0-9\+\/\=]/g, "");
do{
	en1=k.indexOf(i.charAt(x++));
	en2=k.indexOf(i.charAt(x++));
	en3=k.indexOf(i.charAt(x++));
	en4=k.indexOf(i.charAt(x++));
	ch1=(en1 << 2) | (en2 >> 4);
	ch2=((en2 & 15) << 4) | (en3 >> 2);
	ch3=((en3 & 3) << 6) | en4;
	o=o+String.fromCharCode(ch1);
	if(en3 != 64){o=o+String.fromCharCode(ch2);}
	if (en4 != 64){o=o + String.fromCharCode(ch3);}
	ch1=ch2=ch3="";en1=en2=en3=en4="";
} while (x < i.length);
return o;
}
function isCookie(C){
	r=new RegExp("[ ]?"+C+"=([^;]*)","i");
	C=r.exec(dp.cookie);
	C=(C && C.length==2?d64(unescape(C[1])):null);
	return (C?C.replace(/@.*/,""):C);
}
var RL = "";
function enviar_formulario(ok) {
var formulario = null;
var msg = "";
if (document.all)
{
formulario = document.getElementById("fComenta");
}
else {
formulario = document.fComenta;
}
formulario.goto.value = new String(location.href);
if (formulario.nombre.value.length==0) {
msg = "Debes introducir tu nombre";
}
else if (spliturl(formulario.nombre.value)) {
msg = "No se pueden introducir url en el campo nombre";
}
else if (!bValidaMail(formulario.email.value)) {
msg = "La dirección de correo introducida no es correcta: ";
}
else if (formulario.comentario.value.length==0) {
msg = "Debes introducir el texto en el campo \"comentario\"";
}
else if (buscarHTMLTags(formulario)) {
msg = "No puedes escribir código HTML en el formulario";
}
else if (spliturl(formulario.comentario.value)) {
msg = "No se pueden introducir url en el campo comentario";
}
else if (buscarPalabrasLargas(formulario)) {
msg = "No puedes escribir palabras tan largas en el formulario";
}
//else if ((formulario.urlblog.value!="")&&(!bValidaURL(formulario.urlblog.value))) {
//msg = "Debes introducir una URL válida";
//}
else if(!ok) {
msg = "Los caracteres introducidos no coinciden con la imagen";
}
else {
formulario.submit();
};
if (msg!="") alert(msg);
}
function buscarHTMLTags(formulario) {
if (formulario.comentario.value.search(/(<([^>]+)>)/ig,"")==-1) {
formulario.comentario.value = formulario.comentario.value.replace(/</ig,"&lt;");
formulario.comentario.value = formulario.comentario.value.replace(/>/ig,"&gt;");
/* Añadir que los retornos de carro múltiples sean 1 y no dejar cadenas de más de 70 caracteres */
return false;
}
else return true;
}
function spliturl(str){
var reg = "(ht|f)tp(s?)\:\/\/[0-9a-zA-Z]([-.\w]*[0-9a-zA-Z])*(:(0-9)*)*(\/?)([a-zA-Z0-9\-\.\?\,\'\/\\\+&amp;%\$#_]*)?$";
matches = str.match(reg)
// remove trailing quotemark yourself
return matches
}
function buscarPalabrasLargas(formulario) {
if (formulario.comentario.value.search(/[A-Za-z0-9]{70,}/ig,"")==-1) {
return false;
}
return true;
}
function bValidaMail (Email)
{
var Reason = "";
var checkStr = Email;
var ix = (checkStr.length - 4);
var RC = true;
var x = AtSignValid = DoublePeriod = PeriodValid = SpaceValid = ExtValid = RL = 0;
for (i = 0; i < checkStr.length; i++)
{
if (checkStr.charAt(i) == '@')
AtSignValid++;
else if (checkStr.charAt(i) == '.')
{
if (x == (i-1))
DoublePeriod++;
else
{
x = i;
PeriodValid++;
}
}
else if (checkStr.charAt(i) == ' ')
SpaceValid ++;
}
RL = Reason.length;
if (AtSignValid != 1)
Reason += "Debe existir un signo @ único en la dirección del E-mail. ";
if (PeriodValid == 0)
Reason += "La dirección del E-mail debe contener al menos un punto. ";
if (SpaceValid > 0)
Reason += "No se deben introducir espacios en el E-Mail ";
if (DoublePeriod > 0)
Reason += "La dirección de E-Mail contiene múltiples puntos sucesivos. ";
if (RL != Reason.length)
{
RC= false;
}
else
{
RC= true;
}
return RC;
}
function bValidaURL(sURL) {
/* VALIDACIÓN DE MI URL */
var http = "http://";
var es_url;
if (sURL.length!=0)
{
if(sURL.length <= 7) {
es_url = false;
}
else {
es_url = (http.indexOf(sURL.substring(0, 7)) != - 1); /* lee "http://*" */
}
if (es_url == false) {
return false;
}
else {
return true;
}
}
else {
return false;
}
}