function luhn_check(number){var number=number.replace(/\D/g,'');var number_length=number.length;var parity=number_length%2;var total=0;for(var i=0;i<number_length;i++){var digit=number.charAt(i);if(i%2==parity){digit=digit*2;if(digit>9)
digit=digit-9;}
total=total+parseInt(digit);}
return(total%10==0)?true:false;}
function in_array(needle,haystack,argStrict){var found=false,key,strict=!!argStrict;for(key in haystack){if((strict&&haystack[key]===needle)||(!strict&&haystack[key]==needle)){found=true;break;}}
return found;}
function Validator(fName){this.fObj=document.forms[fName];var trigger=(arguments.length>0)?arguments[1]:false;if(!this.fObj){alert("Error: could not get form object "+fName);return false;}
if(this.fObj.onsubmit){this.fObj.old_onsubmit=this.fObj.onsubmit;this.fObj.onsubmit=null;}else{this.fObj.old_onsubmit=null;}
this.vElements=new Array();if(trigger){this.fObj.trigger=form_submit_handler;}else{this.fObj.onsubmit=form_submit_handler;}
this.addValidation=add_validation;this.removeValidation=remove_validation;this.clearAllValidations=clear_all_validations;this.clearValidations=clear_validations;this.restoreValidations=restore_validations;return true;}
function clear_all_validations(){for(var i=0;i<this.fObj.elements.length;i++){this.fObj.elements[i].vSet=null;}}
function clear_validations(elementArray){start=(arguments[1])?arguments[1]:0;for(var i=start;i<this.fObj.elements.length;i++){if(this.fObj.elements[i].val){if(in_array(this.fObj.elements[i].val.vSet[0][0],elementArray)){this.fObj.elements[i].val.oldSet=this.fObj.elements[i].val.vSet;this.fObj.elements[i].val.vSet=null;}}}}
function restore_validations(elementArray){start=(arguments[1])?arguments[1]:0;for(var i=start;i<this.fObj.elements.length;i++){if(this.fObj.elements[i].val){if(this.fObj.elements[i].val.oldSet){this.fObj.elements[i].val.vSet=this.fObj.elements[i].val.oldSet;}}}}
function form_submit_handler(){for(var i=0;i<this.elements.length;i++){if(this.elements[i].val&&this.elements[i].val.vSet&&!this.elements[i].val.validate(this)){return false;}}
return true;}
function remove_validation(elementName){var elementObj=this.fObj[elementName];if(elementObj){if(elementObj.val){elementObj.val.oldSet=elementObj.val.vSet;elementObj.val.vSet=null;}}}
function add_validation(elementName,desc,err){if(!this.fObj){alert("Error: the form object is not set properly");return;}
var elementObj=this.fObj[elementName];if(!elementObj){elementArray=elementName.split("|");if(elementArray.length>1){if(!this.fObj[elementArray[0]]||!this.fObj[elementArray[1]]){alert("Error: Could not get the input objects");return;}else{if(!this.fObj[elementArray[0]].val){this.fObj[elementArray[0]].val=new Val();this.fObj[elementArray[0]].val.add(elementName,desc,err);}else{this.fObj[elementArray[0]].val.add(elementName,desc,err);}}}else{alert("Error: Could not get the input object named: "+elementName);return;}}else{if(elementObj.val){if(elementObj.val.oldSet){elementObj.val.vSet=elementObj.val.oldSet;}else{elementObj.val.add(elementName,desc,err);}}else{elementObj.val=new Val();elementObj.val.add(elementName,desc,err);}}}
function Val(elementName,desc,err){this.vSet=new Array();this.add=addVal;this.validate=validate;}
function addVal(elementName,desc,error){this.vSet[this.vSet.length]=new Array(elementName,desc,error);}
function validate(fObj){for(i=0;i<this.vSet.length;i++)
{if(!checkValidation(this.vSet[i][0],this.vSet[i][1],this.vSet[i][2],fObj)){elementArray=this.vSet[i][0].split("|");fObj[elementArray[0]].focus();return false;}}
return true;}
function checkValidation(elementName,descriptor,err,fObj){var tmpArray=descriptor.split("=");command=tmpArray[0];cmdvalue=(tmpArray.length>1)?tmpArray[1]:'';var patterns={'alnum':/[^A-Za-z0-9\ ]/,'alnumhyphen':/[^A-Za-z0-9\-_]/,'alpha':/[^A-Za-z]/,'cc':/^(3[47]|4|5[1-5]|6011)/,'csv':/[^-a-zA-Z0-9,\s]/,'custom':/[^A-Za-z0-9\042\047\055\057\ _$.,!?()]/,'date':/^[\d]{4}-[\d]{2}-[\d]{2}$/,'email':/^([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$/,'float':/[^0-9\.]/,'img':/^[0-9A-Za-z_ \-]+(.[jJ][pP][gG]|.[jJ][pP][eE][gG]|.[gG][iI][fF]|.[pP][nN][gG])$/,'num':/[^0-9]/,'phone':/[^0-9\- ()]/,'URL':/(([\w]+:)?\/\/)?(([\d\w]|%[a-fA-f\d]{2,2})+(:([\d\w]|%[a-fA-f\d]{2,2})+)?@)?([\d\w][-\d\w]{0,253}[\d\w]\.)+[\w]{2,4}(:[\d]+)?(\/([-+_~.\d\w]|%[a-fA-f\d]{2,2})*)*(\?(&?([-+_~.\d\w]|%[a-fA-f\d]{2,2})=?)*)?(#([-+_~.\d\w]|%[a-fA-f\d]{2,2})*)?/,'zip':/[^-0-9]/}
switch(command)
{case"alnum":case"alphanumeric":var charpos=fObj[elementName].value.search(patterns['alnum']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" must be alpha-numeric";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"alnumhyphen":var charpos=fObj[elementName].value.search(patterns['alnumhyphen']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only contain alpha-numeric, hyphen and underscore characters";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"alphabetic":case"alpha":var charpos=fObj[elementName].value.search(patterns['alpha']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only contain letters (no symbols or numbers)";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"cc":case"credit":case"creditcard":var ccError='The credit card number you entered is not valid. Please try again.';var objValue=fObj[elementName].value.replace(/\D/g,'');var objLength=objValue.length;var firstNum=objValue[0];if(null!=patterns['cc'].exec(objValue)){switch(firstNum){case'4':if(13!=objLength&&16!=objLength){alert(ccError);return false;}else{var cardType=1;}
break;case'5':if(16!=objLength){alert(ccError);return false;}else{var cardType=2;}
break;case'6':if(16!=objLength){alert(ccError);return false;}else{var cardType=3;}
break;case'3':if(15!=objLength){alert(ccError);return false;}else{var cardType=4;}
break;}
if(!luhn_check(objValue)){alert(ccError);return false;}else{if(typeof cardType!='undefined')
document.getElementById('sCCType').options[cardType].selected=true;}}else{alert(ccError);return false;}
break;case"csv":var charpos=fObj[elementName].value.search(patterns['csv']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only contain alpha-numeric characters, '-' and '_', separated by commas";alert(err);return false;}
break;case"custom":var charpos=fObj[elementName].value.search(patterns['custom']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only contain alpha-numeric, {'}, {,}, {.}, {&}, {/}, {-}, {\"}, {?}, {(}, {)}, {_} and {!} characters";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"date":if(fObj[elementName].value.length>0&&fObj[elementName].value!=fObj[elementName].getAttribute('tmpval')){var charpos=fObj[elementName].value.match(patterns['date']);if(charpos==null){if(!err||err.length==0)err=elementName+" must contain a valid date";alert(err);return false;}}
break;case"email":if(fObj[elementName].value.length>0){var charpos=fObj[elementName].value.match(patterns['email']);if(charpos==null){if(!err||err.length==0)err=elementName+" must contain a valid email address";alert(err);return false;}}
break;case"extension":case"ext":var accept=cmdvalue.split("|");var ext=fObj[elementName].value.split(".")[fObj[elementName].value.split(".").length-1].toLowerCase();if(accept.indexOf(ext)==-1){if(!err||err.length==0)err=elementName+" may only contain the following file types: "+accept;alert(err+"\n[Current file type: \""+ext+"\" ]");return false;}
break;case"float":var charpos=fObj[elementName].value.search(patterns['float']&&fObj[elementName].value!=fObj[elementName].getAttribute('tmpval'));if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only contain numbers and a period";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"gt":case"greaterthan":if(isNaN(fObj[elementName].value)){alert(elementName+" must be numeric");return false;}
if(eval(fObj[elementName].value)<=eval(cmdvalue)){if(!err||err.length==0)err=elementName+" must contain a number greater than "+cmdvalue;alert(err);return false;}
break;case"image":case"img":var imgfile=fObj[elementName].value.split("\\")[fObj[elementName].value.split("\\").length-1];var charpos=imgfile.match(patterns['img']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" may only hold an image with extensions jpg, jpeg, gif or png.";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"lt":case"lessthan":if(isNaN(fObj[elementName].value)){alert(elementName+" must be numeric");return false;}
if(eval(fObj[elementName].value)>=eval(cmdvalue)){if(!err||err.length==0)err=elementName+" must contain a number less than "+cmdvalue;alert(err);return false;}
break;case"match":var tmpElements=elementName.split("|");if(fObj[tmpElements[0]].value!=fObj[tmpElements[1]].value){if(!err||err.length==0)err=tmpElements[0]+" and "+tmpElements[1]+" must match";alert(err);return false;}
break;case"maxlength":case"maxlen":if(eval(fObj[elementName].value.length)>eval(cmdvalue)){if(!err||err.length==0)err=elementName+" may not be longer than "+cmdvalue+" characters";alert(err+"\n[Current length = "+fObj[elementName].value.length+" ]");return false;}
break;case"minlength":case"minlen":if(eval(fObj[elementName].value.length)<eval(cmdvalue)){if(!err||err.length==0)err=elementName+" may not be shorter than "+cmdvalue+" characters";alert(err+"\n[Current length = "+fObj[elementName].value.length+" ]");return false;}
break;case"num":case"numeric":var charpos=fObj[elementName].value.search(patterns['num']);if(fObj[elementName].value.length>0&&charpos>=0&&fObj[elementName].value!=fObj[elementName].getAttribute('tmpval')){if(!err||err.length==0)err=elementName+" must be a number";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"phone":var charpos=fObj[elementName].value.search(patterns['phone']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" must contain a valid phone number";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;case"regexp":if(fObj[elementName].value.length>0){alert(cmdvalue);if(!fObj[elementName].value.match(cmdvalue)){if(!err||err.length==0)err=elementName+" contains invalid characters";alert(err);return false;}}
break;case"req":case"required":if(eval(fObj[elementName].value.length)==0||fObj[elementName].type=="checkbox"&&fObj[elementName].checked==false){if(!err||err.length==0)err=elementName+" is a required field";alert(err);return false;}
break;case"URL":if(fObj[elementName].value.length>0){var charpos=fObj[elementName].value.match(patterns['URL']);if(charpos==null){if(!err||err.length==0)err=elementName+" must contain a valid URL";alert(err);return false;}}
break;case"val":if(fObj[elementName].value!=cmdvalue&&fObj[elementName].value.length>0){if(!err||err.length==0)err=elementName+'" must contain the following value "'+cmdvalue+'"';alert(err);return false;}
break;case"zip":var charpos=fObj[elementName].value.search(patterns['zip']);if(fObj[elementName].value.length>0&&charpos>=0){if(!err||err.length==0)err=elementName+" must contain a valid zip code";alert(err+"\n [Error character position "+eval(charpos+1)+"]");return false;}
break;default:break;}
return true;}