/*	ValidateForm.js - Validates form fields on CLient Side
* Author: Greg Brunet - www.SemperSoft.com, April 2000
* Copyright (c) 2000 Semper Software, Inc. All Rights Reserved.
* This script is a work-in-progress.
* It is released for testing purposes only, and not
* recommended for general use.
* Contact Tools@SemperSoft.com with feedback.
*/

function ValidateForm(objForm) {	// as boolean
// USAGE:
//	- add REQUIRED to any form elements to require them to be entered
//		(for 'selects' it will require an item > element 0 to be selected)
// - ALL OTHER items only apply of REQUIRED is TRUE (*** change this later!?)
//	- add ErrMsg="message" to display a message for all validation failures
//	- add MATCH="fieldname" to force entry to match another field's entry
//		(good to force passwords to match)
//	- add RANGE="lo,hi" to check for a text entry within a range
//	- add FORMAT="item" to check format of the text entry (** not implemented yet)

	// Sources include:
	//	http://www.fellowship.net/JerryNixon/vbscript/demos-script/demo_formRequiredFields.htm (JerryNixon@fellowship.net)
	//	http://developer.netscape.com/docs/examples/javascript/regexp/overview.html
	
	var ret = true;			// AS boolean;
	var bHiLite = true;		// AS boolean;
	var nRadioLen;			// AS integer;	// can't get true length from elements array!
	var sVError = "#FF6666";	// AS string;	"red"
	var sVOkay = "white";	// AS string;
	var bChecked;			// AS boolean;
	var nElement;			// AS integer;
	var sErrText = "";		// AS string;

//	alert("Got here 1 - Elements:" + objForm.elements.length);
	for (nElement=0; nElement <= objForm.elements.length-1; nElement++) {
		obj = objForm.elements[nElement];
//		alert("Processing " + obj.name + " [" + obj.type + "]: " + obj.length + " getAttr(Required): " + obj.getAttribute("Required"));
		if (obj.getAttribute("Required") != null) { 
			switch (obj.type.toLowerCase()) {		// needed cause NN uses mixed case, IE uses lower
			case "radio":
			case "checkbox":
				eval("nRadioLen=objForm." + obj.name + ".length");
//				alert("RADIO-Length: [" + obj.length + "," + nRadioLen + "] Checked: " + obj.checked);
				if (nRadioLen > 1) {
//					alert("RL>1");
					okay = false;
			        for (i=0; i < nRadioLen; i++) {
						eval("bChecked=objForm." + obj.name + "[" + i + "].checked");
						if (bChecked) { okay = true; break; }
					}
					if (okay) 
				        for (i=0; i < nRadioLen; i++) {eval("objForm." + obj.name + "[" + i + "].style.background= sVOkay"); }
					else {
						ret = false; 
						if (obj.getAttribute("ErrNsg") != null) sErrText += obj.ErrMsg + " is not selected.\n"; 
						if (bHiLite) {for (i=0; i < nRadioLen; i++) {eval("objForm." + obj.name + "[" + i + "].style.background= sVError;");};}};
				} else {
//					alert("RL ! >1");
					if (! obj.checked ) {
						ret = false;  
						if (obj.getAttribute("ErrName") != null) sErrText += obj.ErrName + " is not selected.\n"; 
						if (bHiLite) obj.style.background= sVError;
					} else obj.style.background= sVOkay;
				}
				break;
			case "text":
			case "password":
			case "textarea":
			case "":					// needed cuz NN doesn't set Type for default INPUT's (to TEXT)
//				alert("TEXT-" + obj.name + " Range: [" + obj.getAttribute("Range") + "]");
				if (obj.value == "") {
					ret = false;  
					if (obj.getAttribute("ErrMsg") != null) sErrText += obj.ErrMsg + " is required.\n"; 
					if (bHiLite) obj.style.background = sVError;
				} else obj.style.background= sVOkay;
				if (obj.getAttribute("Range") != null) {
					aRange = obj.getAttribute("Range").split(",");
					alert("Value:" + parseFloat(0+obj.value) + (parseFloat(0+obj.value) < aRange[0]) + (parseFloat(0+obj.value) > aRange[1]));
					if (parseFloat(0+obj.value) < aRange[0]) {
						ret = false;  
						if (obj.getAttribute("ErrMsg") != null) sErrText += obj.ErrMsg + " is less than the minimum allowed value (" + aRange[0] + ").\n"; 
						if (bHiLite) obj.style.background = sVError;
					} else if (parseFloat(0+obj.value) > aRange[1]) {
						ret = false;  
						if (obj.getAttribute("ErrMsg") != null) sErrText += obj.ErrMsg + " is greater than the maximum allowed value (" + aRange[1] + ").\n"; 
						if (bHiLite) obj.style.background = sVError;
					}
				};
				if (obj.getAttribute("Match") != null) {
					sMatch = obj.getAttribute("Match");
					if (obj.value != objForm.elements[sMatch].value) {
						ret = false;  
						sErrText += obj.ErrMsg + " must match " + objForm.elements[sMatch].ErrMsg + "\n";
						if (bHiLite) obj.style.background = sVError;
					}					
				};
				break;
			case "select-one":
			case "select-multiple":
//				alert("SELECT-Length: [" + obj.length + "] SI: " + obj.selectedIndex);
				if (obj.selectedIndex < 1) {
					ret = false;  
					if (obj.getAttribute("ErrMsg") != null) sErrText += obj.ErrMsg + " is not selected.\n"; 
					if (bHiLite) obj.style.background= sVError;
				} else obj.style.background= sVOkay;
				break;
			case "button":
			case "submit":
			case "reset":
				break;
			}
		}
	}

	if (! ret) alert(sErrText);	
	return ret;
}