// Title: Tigra Form Validator
// URL: http://www.softcomplex.com/products/tigra_form_validator/
// Version: 1.2
// Date: 02/17/2005 (mm/dd/yyyy)
// Notes: Registration needed to use this script legally. Visit official site for details.
// Modified by Scott Chapman (schapman@mischko.com). My mods have "// SEC" on the relevant lines.:
// id of HTML element to highlight does not have to be specified.
//   It will check to see if an element with an id matching the input element, preceeded by "l_" is in the form.
// Modified alpha format to include a space. 
// Added letter format for letters only.
// Modified it to use AddClassName and RemoveClassName from sorttable.js.
// Modified it so that disable element ID is passed in, not NAME. 
//   This way I don't have to have a Name on the Submit input and it won't show up in my form variables.
// Modified it to automatically add a form value when submitted so that javascript-enabled can be tested on the server.
// Changed date checker to use mm-dd-yyyy rather than dd-mm-yyyy.

// regular expressions or function to validate the format
var re_dt = /^(\d{4})\-(\d{1,2})\-(\d{1,2})$/,
re_tm = /^(\d{1,2})\:(\d{1,2})\:(\d{1,2})$/,
a_formats = {
	'alpha'   : /^[a-zA-Z\.\-\,\'\ ]*$/,         // SEC
	'alphanum': /^[\w\.\-\ ]+$/,
	'alnumdashunder': /^[\w\-]+$/,               // SEC
	'alnumdashunderdot': /^[\w\-\.]+$/,          // SEC
	'unsigned': /^\d+$/,
	'integer' : /^[\+\-]?\d*$/,
	'letters' : /^[a-zA-Z]*$/,                   // SEC
	'real'    : /^[\+\-]?\d*\.?\d*$/,
	'email'   : /^[\w-\.]+\@[\w\.-]+\.[a-zA-Z]{2,4}$/,
	'phone'   : /(\d{3})\D*(\d{3})\D*(\d{4})\D*(\d*)$/,
	'date'    : function (s_date) {
		// check format
		if (!re_dt.test(s_date))
			return false;
		// check allowed ranges	
		if (RegExp.$2 > 12 || RegExp.$3 > 31)    // SEC
			return false;
		// check number of day in month
//		var dt_test = new Date(RegExp.$1, Number(RegExp.$2-1), RegExp.$3); // SEC
//		if (dt_test.getMonth() != Number(RegExp.$2-1)) // SEC
//			return false;
		return true;
	},
	'time'    : function validate_time(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 = [
	'No form name passed to validator construction routine',
	'No array of "%form%" form fields passed to validator construction routine',
	'Form "%form%" can not be found in this document',
	'Incomplete "%n%" form field descriptor entry. "l" attribute is missing',
	'Can not find form field "%n%" in the form "%form%"',
	'Can not find label tag (id="%t%")',
	'Can not verify match. Field "%m%" was not found',
	'"%l%" is a required field',
	'Value for "%l%" must be %mn% characters or more',
	'Value for "%l%" must be no longer than %mx% characters',
	'"%v%" is not valid value for "%l%"',
	'"%l%" must match "%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;
		if (!this.a_fields[n_key]['t']) {                     // SEC
		    if (get_element('l_' + n_key))                    // SEC
		        this.a_fields[n_key]['t'] = 'l_' + n_key;     // SEC
		}                                                     // SEC
	}

	// 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
				addClassName (e_labeltag,'tfvNormal');        // SEC
				removeClassName (e_labeltag,'tfvHighlight');  // SEC
			} 

	// 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
				: '';
		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'] && 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){
    				removeClassName (this.a_fields[n_key].o_tag,'tfvNormal');  // SEC
    				addClassName (this.a_fields[n_key].o_tag,'tfvHighlight');  // SEC
				}
			}
		}
		alert(s_alert_message.replace(/&nbsp;/g," "));
		// set focus to first errorneous field
// SEC Commented these out becuase they throw an exception in FF.
// SEC Error: uncaught exception: [Exception... "Component returned failure code: 0x80004005 (NS_ERROR_FAILURE) [nsIDOMXULElement.boxObject]"  nsresult: "0x80004005 (NS_ERROR_FAILURE)"  location: "JS frame :: chrome://global/content/bindings/browser.xml :: get_docShell :: line 0"  data: no]
// SEC try uncommonting these after next FF upgrade but leave it commented for production? Error was harmless.
// SEC UNCOMMENTED THE FOLLOWING TWO LINES.
		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;
	}
	//alert (this.a_2disable);
	for (n_key in this.a_2disable) {
	    //alert(this.a_2disable[n_key]);
	    dis_e = document.getElementById(this.a_2disable[n_key]);
	    //dis_e = get_element(this.a_2disable[n_key]); // SEC
		if (dis_e)                                   // SEC
		    //alert('disabling')
			dis_e.disabled = true;                   // SEC
		}
    //alert('done in a_2disable')
	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) {
   ////alert (s_id);
   //if (document.all) {
   //    //alert ('document.all');
   //    return document.all[s_id];
   //} else {
   //    if (document.getElementById) {
   //        //alert ('document.getElementById');
   //        return document.getElementById(s_id);
   //    } else {
   //        //alert ('returning null');
   //        return null
   //    };
   //}

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