// A generic form validator  
// (©) Brian Lalonde http://webcoder.info/downloads/validate.html
// License: http://creativecommons.org/licenses/by-sa/2.0/
// Adapted by Víncolo 

var vsmlang;				// Define el idioma en que se muestran los mensajes de error
var vsmsubmit = false;		// Usado para resaltar el campo solo cuando el onblur es llamado por el submit del form
var status = '';			// y no cuando se produce realmente el evento

function vsmFormFocus() {
  if(!document.forms.length) return;
  var els= document.forms[0].elements;
  for(var i= 0; i < els.length; i++)
    if(els[i].type != 'hidden') { els[i].focus(); return; }
}

function vsmSubmit(frm, lang) { 
  lang = lang.toLowerCase();
  if (lang != 'en' && lang !='pt' && lang !='es') {
  	 vsmlang='en';
  } else {
  	 vsmlang=lang;
  }
 // if (canCheckByBlur(frm)) return checkByBlur(frm);
 return checkByBlur(frm);
}

function canCheckByBlur(frm) { 
  for(var index= 0; index < frm.elements.length; index++) {
    var el= frm.elements[index];
    if(!el.type) continue;
    if(el.type != 'hidden' && el.name && typeof(el.onblur)=='function') return true;
  }
  return false;
}

function checkByBlur(frm) {
	status= '';
	vsmsubmit = true;
	for(var index= 0; index < frm.elements.length; index++)
		if(frm.elements[index].type == 'submit' || frm.elements[index].type == 'image') frm.elements[index].disabled= true;

	for(var index= 0; index < frm.elements.length; index++) {
		var el= frm.elements[index];
		if(!el.type) continue;
		if(el.type != 'hidden' && el.name && el.onblur) {
			el.onblur();
			if(status) {
				alert(status);
				el.focus(); 
				vsmsubmit = false;
				for(var index= 0; index < frm.elements.length; index++)
					if(frm.elements[index].type == 'submit' || frm.elements[index].type == 'image') frm.elements[index].disabled= false;
				return false; 
			}
		}
	}
	return true;
}

function vsmGetFieldDescription(fld) { 
  if(fld.title) return fld.title;
  if(fld.id && document.getElementsByTagName) {
    for(var i= 0, lbl= document.getElementsByTagName('LABEL'); i < lbl.length; i++)
      if(lbl[i].htmlFor==fld.id) return lbl[i].nodeValue||lbl[i].textContent||lbl[i].innerText;
    for(var i= 0, lbl= document.getElementsByTagName('label'); i < lbl.length; i++)
      if(lbl[i].htmlFor==fld.id) return lbl[i].nodeValue||lbl[i].textContent||lbl[i].innerText;
  }
  return fld.name;
}

/* Funciones de validación */

function vsmRequired(fld) {
	if(fld.disabled) return true;
	var ok= false;
	switch(fld.type) {
		case 'checkbox':
			if(fld.checked) ok= true;
			break;
		case 'radio':
			var radios = fld.form[fld.name];
			ok = false;
			for(var i= 0; i < radios.length; i++) {
				if (radios[i].checked) ok=true;
			}
			break;
		default:
			if(fld.value.length) ok= true;
			break;
	}
	if (ok) {
		return true;
	} else {
		switch (vsmlang) {
		case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' no puede ser omitido.'; break; 
		case 'pt': status= 'Deve preencher o campo '+vsmGetFieldDescription(fld)+'.'; break; 
		default:   status= 'The '+vsmGetFieldDescription(fld)+' field cannot be left blank.'; break; 
		}
		if (vsmsubmit && fld.type != 'checkbox' && fld.type != 'radio') fld.className = 'vsmformerror';
		return false;
	}
}

function vsmConfirmation(fld, confirmfld) {
	if(fld.disabled) return true;
	if(fld.value != confirmfld.value) {
		switch (vsmlang) {
			case 'es': status= 'Los campos '+vsmGetFieldDescription(fld)+' y '+vsmGetFieldDescription(confirmfld)+' deben ser idénticos.'; break; 
			case 'pt': status= 'Os campos '+vsmGetFieldDescription(fld)+' e '+vsmGetFieldDescription(confirmfld)+' devem ser iguais.'; break; 
			default: status= 'The '+vsmGetFieldDescription(fld)+' field does not match the '+vsmGetFieldDescription(confirmfld)+' field.'; break; 
		}
		if (vsmsubmit) {fld.className = 'vsmformerror'; confirmfld.className = 'vsmformerror'}
		return false;
	}
	return true;
}

function vsmLength(fld, min, max) { 
	// set minimum and/or maximum field lengths
	if(fld.disabled) return true;
	var len= fld.value.length;
	if(min > -1 && len < min) { 
		switch (vsmlang) {
			case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' debe tener al menos '+min+ ' caracteres; Actualmente tiene '+len+'.'; break;
			case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' deve conter no mínimo '+min+ ' caracteres; Atualmente contem '+len+'.'; break;
			default:   status= 'The '+vsmGetFieldDescription(fld)+' field must be at least '+min+ ' characters long; it is currently '+len+' characters long.'; break;
		}
		if (vsmsubmit) fld.className = 'vsmformerror';
		return false;
	}
  	if(max > -1 && len > max) { 
		switch (vsmlang) {
			case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' debe tener un máximo de '+max+ ' caracteres; Actualmente tiene '+len+'.'; break;
			case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' deve conter no máximo '+max+ ' caracteres; Atualmente contem '+len+'.'; break;
			default:   status= 'The '+vsmGetFieldDescription(fld)+' field must be no more than '+max+' characters long; it is currently '+len+' characters long.'; break; 
		}
		if (vsmsubmit) fld.className = 'vsmformerror';
		return false;
	}
  	return true;
}

function vsmTrim(str) {
	return str.replace(/^\s*|\s*$/g,"");
}

function vsmAllowChars(fld, chars) { 
	// provide a string of acceptable chars for a field
	if(fld.disabled) return true;
	for(var i= 0; i < fld.value.length; i++) {
		if(chars.indexOf(fld.value.charAt(i)) == -1) {
			switch (vsmlang) {
				case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' contiene caracteres no permitidos.\r\n" '+fld.value.charAt(i)+' " no es un caracter permitido.\r\nLos caracteres permitidos son:\r\n'+chars; break;
				case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' contem caracteres não permitidos.\r\n" '+fld.value.charAt(i)+' " não é um caracter permitido.\r\nOs caracteres permitidos são:\r\n'+chars; break;
				default: status= 'The '+vsmGetFieldDescription(fld)+' contain invalid characters. It may only contain the following characters:\r\n'+chars; break; 
			}
			if (vsmsubmit) fld.className = 'vsmformerror';
			return false;
		}
	}
	return true;
}

function vsmDisallowChars(fld, chars){ 
	// provide a string of unacceptable chars for a field
	if(fld.disabled) return true;
	for(var i= 0; i < fld.value.length; i++) {
    	if(chars.indexOf(fld.value.charAt(i)) != -1) {
	 		switch (vsmlang) {
				case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' no puede contener ninguno de los siguientes caracteres:\r\n'+chars; break; 
				case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' não pode conter nenhum dos seguintes caracteres:\r\n'+chars; break; 
				default: status= 'The '+vsmGetFieldDescription(fld)+' field cannot contain any of the following characteres:\r\n'+chars; break; 
			}
			if (vsmsubmit) fld.className = 'vsmformerror';
			return false;
  		}
	}
	return true;
}

function vsmEmail(fld) { 
	if(!fld.value.length||fld.disabled) return true; // blank fields are the domain of requireValue 
	fld.value = vsmTrim(fld.value.toLowerCase());
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,8})+$/;
	if (!filter.test(fld.value)) {
		switch (vsmlang) {
			case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' no es una dirección de correo válida.'; break;
			case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' não é um endereço válido'; break;
			default:   status= 'The '+vsmGetFieldDescription(fld)+' field must contain a valid email address.'; break;
		}
		if (vsmsubmit) fld.className = 'vsmformerror';
		return false;
	}
	return true;
}

function vsmDate(fld, format) {
	// Esta ok si el campo está vacio o disabled
	if(!fld.value.length||fld.disabled) return true; 
	// Normaliza la fecha quitando los espacios y convirtiendo cualquier separador en /
	fld.value = vsmTrim(fld.value);
	var d = fld.value.replace(/\D/g, '/');
	// Obtiene los valores separados por /
	dateArray = d.split('/');
	if (dateArray.length == 3) {
		format = format.toLowerCase();
		switch(format) {
			case 'ymd': year=dateArray[0]; month = dateArray[1]; day = dateArray[2]; break;
			case 'dmy': year=dateArray[2]; month = dateArray[1]; day = dateArray[0]; break;
			case 'mdy': year=dateArray[2]; month = dateArray[0]; day = dateArray[1]; break;
		}
		ok = vsmValidDate(year, month, day);
		if (ok) {
			fld.value = d;
			return true;
		}
		
	}
	switch (vsmlang) {
		case 'es': status= 'El campo '+vsmGetFieldDescription(fld)+' no es una fecha válida.'; break;
		case 'pt': status= 'O campo '+vsmGetFieldDescription(fld)+' não é uma data válida'; break;
		default:   status= 'The '+vsmGetFieldDescription(fld)+' field must contain a valid date.'; break;
	}
	if (vsmsubmit) fld.className = 'vsmformerror';
	return false;
}

function vsmComboDate(yearfld, monthfld, dayfld, required) {
	if (typeof(required)=='undefined') required = false;
	if (yearfld.disabled || monthfld.disabled || dayfld.disabled) return true;
	if (!yearfld.value.length && !monthfld.value.length && !dayfld.value.length) {
		if (required) {
			switch (vsmlang) {
			case 'es': status= 'El campo '+vsmGetFieldDescription(yearfld)+' no puede quedar vacío.'; break; 
			case 'pt': status= 'Deve preencher o campo '+vsmGetFieldDescription(yearfld)+'.'; break; 
			default:   status= 'The '+vsmGetFieldDescription(yearfld)+' field cannot be left blank.'; break; 
			}
			if (vsmsubmit) {yearfld.className = 'vsmformerror'; monthfld.className = 'vsmformerror'; dayfld.className = 'vsmformerror';}
			return false;
		} else {
			return true;
		}
	}
	ok =  vsmValidDate(yearfld.value, monthfld.value, dayfld.value);
	if (!ok) {
		switch (vsmlang) {
			case 'es': status= 'El campo '+vsmGetFieldDescription(yearfld)+' no es una fecha válida.'; break;
			case 'pt': status= 'O campo '+vsmGetFieldDescription(yearfld)+' não é uma data válida'; break;
			default:   status= 'The '+vsmGetFieldDescription(yearfld)+' field must contain a valid date.'; break;
		}
		if (vsmsubmit) {yearfld.className = 'vsmformerror'; monthfld.className = 'vsmformerror'; dayfld.className = 'vsmformerror';}
	}
	return ok;
}

function vsmValidDate(year, month, day) {
	if (!isNaN(day) && !isNaN(month) && !isNaN(year)) {
		month = month-1;
		var dteDate=new Date(year,month,day);
		if ((day==dteDate.getDate()) && (month==dteDate.getMonth()) && (year==dteDate.getFullYear())) return true;
	}
	return false;
}

function vsmDependants(enabled, elements) { 
	// Para Activar/Desactivar campos
	// convenience function to enable/disable dependant fields, passed in as an array 
	if(!elements.length) return true;
	for(var i= 0; i < elements.length; i++) {
    	elements[i].disabled= !enabled;
	}
}