// Title: Tigra Form Validator
// URL: http://www.softcomplex.com/products/tigra_form_validator/
// Version: 1.3
// Date: 08/25/2005 (mm/dd/yyyy)
// Notes: This script is free. Visit official site for further details.
// Nova adapta��o: Fabr�cio Nogueira Magri
// Contribui��o: Andr� Sam - www.zunz.com.br


// PARA APRENDER A USAR ( caso n saiba )
// http://www.phpbrasil.com/articles/article.php/id/1117










// regular expressions or function to validate the format
var re_dt = /^(\d{1,2})\/(\d{1,2})\/(\d{4})$/,
re_tm = /^(\d{1,2})\:(\d{1,2})\:(\d{1,2})$/,
re_cpf = /^([0-9]{3}\.){2}[0-9]{3}-[0-9]{2}$/,
re_cnpj = /^[0-9]{2}\.[0-9]{3}\.[0-9]{3}\/[0-9]{4}\-[0-9]{2}$/,
a_formats = {
	'alpha'   : /^[a-zA-Z\.\-]*$/,
	'alphanum': /^\w+$/,
	'unsigned': /^\d+$/,
	'integer' : /^[\+\-]?\d*$/,
	'real'    : /^[\+\-]?\d*\.?\d*$/,
	'email'   : /^[\w-\.]+\@[\w\.-]+\.[a-z]{2,4}$/,
	'phone'   : /^[\d\.\s\-]+$/,
	'cpfcnpj' : function (s_cpfcnpj) {
	    // pega somente os numeros
        var numero = s_cpfcnpj.replace(/\D/g, "");
		var igual = true;
		
		var tipo = 0;
		// check format
		if (re_cpf.test(s_cpfcnpj) || (numero.length == 11 && s_cpfcnpj.length == numero.length))
		    tipo = 1;
		else if (re_cnpj.test(s_cpfcnpj) || (numero.length == 14 && s_cpfcnpj.length == numero.length))
		    tipo = 2;
		else
		    return false;
		
        // verifica se todos os numeros sao iguais
		for (var i = 1; i < numero.length; i++) {
		    if (numero.charAt(i-1) != numero.charAt(i)) 
			    igual = false;
		}
		if (igual)
		    return false;

        function impCalcDig11(numero) {
        	var pesos = [2,3,4,5,6,7,8,9,2,3,4,5,6,7,8,9];
        	var calc = 0, x='';
	        var numero = String(numero).split("");
	        var limite = numero.length -1;
        	var result = 0;
	        var pso = 0;
	        for (var i = limite; i >= 0; i--) {
		        x += "\npso:" + pesos[pso] + " * " + numero[i] + " = " + (pesos[pso] * parseInt(numero[i]));
		        calc += (pesos[pso++] * parseInt(numero[i]));
	        }
	        result = 11 - ((calc)%11);
	        if (result == 11) {result = 0;}
	        return result;
        }

		if (tipo == 1){
            var cpf = numero.substring(0,9);
		    var digito = numero.substring(9,11);
			var soma, mt, dg = 0;
			var dgc = "";
		    for (var j = 1; j <= 2; j++) {
			    soma = 0;
			    mt = 2;
			    for (i = 8 + j; i >= 1; i--) {
				    soma += parseInt(cpf.charAt(i - 1), 10) * mt;
				    mt++;
	    		}
		    	dg = 11 - (soma % 11);
			    if (dg > 9) 
				    dg = 0;
			    cpf += dg;
			    dgc += dg;
		    }
        } else if (tipo == 2) {
            var cnpj = numero.substring(0,12);
		    var digito = numero.substring(12,14);
			var digitoc = 0;
			var dgc = "";
		    for (var j = 1; j <= 2; j++) {
			    digitoc = impCalcDig11(cnpj);
			    if (digitoc == 10) 
				    digitoc = 0;
			    dgc  += digitoc;
			    cnpj += digitoc;
		    }
	    }
	    // digito inv�lido
	    if (dgc != digito)
		    return false;

	    return true;
	},	
	// substitua a data por isto aqui 
    'date' : function (s_date) { 
        // check format 
        if (!re_dt.test(s_date)){ 
            return false; 
        } 
        // check allowed ranges 
        if (RegExp.$1 > 31 || RegExp.$2 > 12 || RegExp.$3 < 1900){ 
            return false; 
        } 
        var dt_test = new Date(); 
        if (RegExp.$3 > dt_test.getFullYear() + 10) 
            return false;		
        // check number of day in month 
        var dt_test = new Date(RegExp.$3, Number(RegExp.$2-1), RegExp.$1); 
        if (dt_test.getMonth() != Number(RegExp.$2-1)) 
            return false; 
        return true; 
	}, 
	'time'    : function (s_time) {
		// check format
		if (!re_tm.test(s_time))
			return false;
		// check allowed ranges	
		if (RegExp.$1 > 23 || RegExp.$2 > 59 || RegExp.$3 > 59)
			return false;
		return true;
	}
},


a_messages = [ 
    'Nenhum nome do formul�rio passou � rotina do Validator', 
    'Nenhum array do campo %form% passou � rotina do Validator', 
    'O formul�rio %form% n�o pode ser encontrado no documento', 
    'Entrada imcompleta no campo de formul�rio %n%. Atributo "l" n�o encontrado', 
    'N�o encontrado o campo %n% no formul�rio %form%', 
    'N�o encontrada a label tag (id=%t%)', 
    'N�o � poss�vel validar. Campo %m% n�o encontrado', 
    'Preencha o campo %l%', 
    'O campo %l% precisa de no m�nimo %mn% caracteres ou mais', 
    'O campo %l% n�o pode ter mais que %mx% caracteres', 
    '%v% n�o � um valor v�lido para %l%', 
    'O campo %l% deve ser %ml%' 
] 


// validator counstruction routine
function validator(s_form, a_fields, o_cfg) {
	this.f_error = validator_error;
	this.f_alert = o_cfg && o_cfg.alert
		? function(s_msg) { alert(s_msg); return false }
		: function() { return false };
		
	// check required parameters
	if (!s_form)	
		return this.f_alert(this.f_error(0));
	this.s_form = s_form;
	
	if (!a_fields || typeof(a_fields) != 'object')
		return this.f_alert(this.f_error(1));
	this.a_fields = a_fields;

	this.a_2disable = o_cfg && o_cfg['to_disable'] && typeof(o_cfg['to_disable']) == 'object'
		? o_cfg['to_disable']
		: [];
		
	this.exec = validator_exec;
}

// validator execution method
function validator_exec() {
	var o_form = document.forms[this.s_form];
	if (!o_form)	
		return this.f_alert(this.f_error(2));
		
	b_dom = document.body && document.body.innerHTML;
	
	// check integrity of the form fields description structure
	for (var n_key in this.a_fields) {
		// check input description entry
		this.a_fields[n_key]['n'] = n_key;
		if (!this.a_fields[n_key]['l'])
			return this.f_alert(this.f_error(3, this.a_fields[n_key]));
		o_input = o_form.elements[n_key];
		if (!o_input)
			return this.f_alert(this.f_error(4, this.a_fields[n_key]));
		this.a_fields[n_key].o_input = o_input;
	}

	// reset labels highlight
	if (b_dom)
		for (var n_key in this.a_fields) 
			if (this.a_fields[n_key]['t']) {
				var s_labeltag = this.a_fields[n_key]['t'], e_labeltag = get_element(s_labeltag);
				if (!e_labeltag)
					return this.f_alert(this.f_error(5, this.a_fields[n_key]));
				this.a_fields[n_key].o_tag = e_labeltag;
				
				// normal state parameters assigned here
				e_labeltag.className = 'for';
			}

	// collect values depending on the type of the input
	for (var n_key in this.a_fields) {
		var s_value = '';
		o_input = this.a_fields[n_key].o_input;
		if (o_input.type == 'checkbox') // checkbox
			s_value = o_input.checked ? o_input.value : '';
		else if (o_input.value) // text, password, hidden
			s_value = o_input.value;
		else if (o_input.options) // select
			s_value = o_input.selectedIndex > -1
				? o_input.options[o_input.selectedIndex].value
				: null;
		else if (o_input.length > 0) // radiobuton
			for (var n_index = 0; n_index < o_input.length; n_index++)
				if (o_input[n_index].checked) {
					s_value = o_input[n_index].value;
					break;
				}
		this.a_fields[n_key]['v'] = s_value.replace(/(^\s+)|(\s+$)/g, '');
	}
	
	// check for errors
	var n_errors_count = 0,
		n_another, o_format_check;
	for (var n_key in this.a_fields) {
		o_format_check = this.a_fields[n_key]['f'] && a_formats[this.a_fields[n_key]['f']]
			? a_formats[this.a_fields[n_key]['f']]
			: null;

		// reset previous error if any
		this.a_fields[n_key].n_error = null;

		// check reqired fields
		if (this.a_fields[n_key]['r'] && !this.a_fields[n_key]['v']) {
			this.a_fields[n_key].n_error = 1;
			n_errors_count++;
		}
		// check length
		else if (this.a_fields[n_key]['mn'] && this.a_fields[n_key]['v'] != '' && String(this.a_fields[n_key]['v']).length < this.a_fields[n_key]['mn']) {
			this.a_fields[n_key].n_error = 2;
			n_errors_count++;
		}
		else if (this.a_fields[n_key]['mx'] && String(this.a_fields[n_key]['v']).length > this.a_fields[n_key]['mx']) {
			this.a_fields[n_key].n_error = 3;
			n_errors_count++;
		}
		// check format
		else if (this.a_fields[n_key]['v'] && this.a_fields[n_key]['f'] && (
			(typeof(o_format_check) == 'function'
			&& !o_format_check(this.a_fields[n_key]['v']))
			|| (typeof(o_format_check) != 'function'
			&& !o_format_check.test(this.a_fields[n_key]['v'])))
			) {
			this.a_fields[n_key].n_error = 4;
			n_errors_count++;
		}
		// check match	
		else if (this.a_fields[n_key]['m']) {
			for (var n_key2 in this.a_fields)
				if (n_key2 == this.a_fields[n_key]['m']) {
					n_another = n_key2;
					break;
				}
			if (n_another == null)
				return this.f_alert(this.f_error(6, this.a_fields[n_key]));
			if (this.a_fields[n_another]['v'] != this.a_fields[n_key]['v']) {
				this.a_fields[n_key]['ml'] = this.a_fields[n_another]['l'];
				this.a_fields[n_key].n_error = 5;
				n_errors_count++;
			}
		}
		
	}

	// collect error messages and highlight captions for errorneous fields
	var s_alert_message = '',
		e_first_error;

	if (n_errors_count) {
		for (var n_key in this.a_fields) {
			var n_error_type = this.a_fields[n_key].n_error,
				s_message = '';
				
			if (n_error_type)
				s_message = this.f_error(n_error_type + 6, this.a_fields[n_key]);

			if (s_message) {
				if (!e_first_error)
					e_first_error = o_form.elements[n_key];
				s_alert_message += s_message + "\n";
				// highlighted state parameters assigned here
				if (b_dom && this.a_fields[n_key].o_tag)
					this.a_fields[n_key].o_tag.className = 'vazio';
			}
		}
		alert(s_alert_message);
		// set focus to first errorneous field
		if (e_first_error.focus && e_first_error.type != 'hidden'  && !e_first_error.disabled)
			eval("e_first_error.focus()");
		// cancel form submission if errors detected
		return false;
	}
	
	for (n_key in this.a_2disable)
		if (o_form.elements[this.a_2disable[n_key]])
			o_form.elements[this.a_2disable[n_key]].disabled = true;

	return true;
}

function validator_error(n_index) {
	var s_ = a_messages[n_index], n_i = 1, s_key;
	for (; n_i < arguments.length; n_i ++)
		for (s_key in arguments[n_i])
			s_ = s_.replace('%' + s_key + '%', arguments[n_i][s_key]);
	s_ = s_.replace('%form%', this.s_form);
	return s_
}

function get_element (s_id) {
	return (document.all ? document.all[s_id] : (document.getElementById ? document.getElementById(s_id) : null));
}