// JavaScript Document

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

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',
    '"%l%" é um campo obrigatório',
    '"%l%" precisa no mínimo %mn% caracteres ou mais',
    '"%l%" não pode ter mais que %mx% caracteres',
    '"%v%" não é um valor válido para "%l%"',
    '"%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 = 'tfvNormal';
            }

    // 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 = 'tfvHighlight';
            }
        }
        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));
} 

