/*
*  The Validator
*   The class that handles all validation related issues
*    
*   pass the name of the form while constructing.
*   methods:
*    addValidation(input_item_name,validation_descriptor,error_string)
*       call this method for each input item. Single input item can have 
*       many validations
*      
*    setAddnlValidationFunction(function_name)
*             call this function to set a custom validat function, which will
*						 be called after other validations are over.
*			       The function should return 'true' or 'false' 
*
* c
*/
function Validator(frmname)
{
  this.formobj=document.forms[frmname];
	if(!this.formobj)
	{
	  alert("BUG: couldnot get Form object "+frmname);
		return;
	}
	if(this.formobj.onsubmit)
	{
	 this.formobj.old_onsubmit = this.formobj.onsubmit;
	 this.formobj.onsubmit=null;
	}
	else
	{
	 this.formobj.old_onsubmit = null;
	}
	this.formobj.onsubmit=form_submit_handler;
	this.addValidation = add_validation;
	this.setAddnlValidationFunction=set_addnl_vfunction;
	this.clearAllValidations = clear_all_validations;
}

function set_addnl_vfunction(functionname)
{
  this.formobj.addnlvalidation = functionname;
}
function clear_all_validations()
{
	for(var itr=0;itr < this.formobj.elements.length;itr++)
	{
		this.formobj.elements[itr].validationset = null;
	}
}
function form_submit_handler()
{
	for(var itr=0;itr < this.elements.length;itr++)
	{
		if(this.elements[itr].validationset &&
	   !this.elements[itr].validationset.validate())
		{
		  return false;
		}
	}
	if(this.addnlvalidation)
	{
	  str =" var ret = "+this.addnlvalidation+"()";
	  eval(str);
    if(!ret) return ret;
	}
	return true;
}

function add_validation(itemname,descriptor,errstr)
{
  if(!this.formobj)
	{
	  alert("BUG: the form object is not set properly");
		return;
	}//if
	var itemobj = this.formobj[itemname];
  if(!itemobj)
	{
	  alert("BUG: Couldnot get the input object named: "+itemname);
		return;
	}
		
	if(!itemobj.validationset)
	{
	  itemobj.validationset = new ValidationSet(itemobj);
	}
  itemobj.validationset.add(descriptor,errstr);
}
function ValidationDesc(inputitem,desc,error)
{
  this.desc=desc;
	this.error=error;
	this.itemobj = inputitem;
	this.validate=vdesc_validate;
}
function vdesc_validate()
{
 if(!V2validateData(this.desc,this.itemobj,this.error))
 {
    this.itemobj.focus();
		return false;
 }
 return true;
}


function ValidationSet(inputitem)
{
  this.vSet=new Array();
	this.add= add_validationdesc;
	this.validate= vset_validate;
	this.itemobj = inputitem;
}
function add_validationdesc(desc,error)
{
  this.vSet[this.vSet.length]= 
	  new ValidationDesc(this.itemobj,desc,error);
}
function vset_validate()
{
   for(var itr=0;itr<this.vSet.length;itr++)
	 {
	   if(!this.vSet[itr].validate())
		 {
		   return false;
		 }
	 }
	 return true;
}


//---------------------------------EMail Check ------------------------------------ 

/*  checks the validity of an email address entered 
*   returns true or false 
*   
*/ 

function validateEmailv2(email)
{
// a very simple email validation checking. 
// you can add more complex email checking if it helps 
    var splitted = email.match("^(.+)@(.+)$");
    if(splitted == null) return false;
    if(splitted[1] != null )
    {
      var regexp_user=/^\"?[\w-_\.]*\"?$/;
      if(splitted[1].match(regexp_user) == null) return false;
    }
    if(splitted[2] != null)
    {
      var regexp_domain=/^[\w-\.]*\.[A-Za-z]{2,4}$/;
      if(splitted[2].match(regexp_domain) == null) 
      {
	    var regexp_ip =/^\[\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\]$/;
	    if(splitted[2].match(regexp_ip) == null) return false;
      }// if
      return true;
    }
return false;
}

/* function V2validateData 
*  Checks each field in a form 

*/ 
function V2validateData(strValidateStr,objValue,strError) 
{ 
    var epos = strValidateStr.search("="); 
    var  command  = ""; 
    var  cmdvalue = ""; 
    
    if(epos >= 0) 
    { 
     command  = strValidateStr.substring(0,epos); 
     cmdvalue = strValidateStr.substr(epos+1); 
    } 
    else 
    { 
     command = strValidateStr; 
    } 

    switch(command) 
    { 
        case "req": 
        case "required": 
         { 
           if(eval(objValue.value.length) == 0) 
           { 
	      // hack to allow conditional requirements on field for mortality in eFarm
	      if ( objValue.name == 'comment' && dataForm.mortality_cd.value != 'Other') {
 		 dataForm.comment.value = '' ;
		 break;
	      }
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " : Required Field"; 
              }//if 
              alert(strError); 
              return false; 
           }//if 
           break;             
         }//case required

	

        	
	case "val_date":
       	{
	   var date_value = objValue.value;

           if (date_value.length > 0) {
	   var debug=false;
	   strParts = date_value;
	   bWrongDate=false;
	   var intLoop;
	   var iSlashCounter=0;
	   var sDay = "";
	   var sMonth="";
	   var sYear="";

	   for (intLoop = 0; intLoop < strParts.length; intLoop++){
              var c=strParts.charAt(intLoop);
              c=c.toString();
              if ((c == "/") ) {
                 iSlashCounter=iSlashCounter+1;
              }
              if ((iSlashCounter==0) && (c !="/") ) {
               sMonth=sMonth + c;     
              }
          
              if ((iSlashCounter==1) && (c !="/")){
               sDay=sDay + c;
              }
              if ((iSlashCounter==2) && (c !="/")){
               sYear=sYear + c;
              }
          
              if (intLoop > 9) {
               bWrongDate=true;
	       strError = "Date: " + date_value + " has incorrect format.  Please use MM/DD/YYYY";
              }
           }
     
     	   var iday=Math.abs(sDay);
     	   var imonth=Math.abs(sMonth);
     	   var iyear=Math.abs(sYear);
     
     	   if (debug){
           alert('Month:' + sMonth);
     	   }
     	   if (debug){
           alert('Day:' + sDay);
     	   }
     
     	   if (debug){
           alert('Year:' + sYear);
     	   }
     
     	   if ((iday <= 0 ) || (iday > 31)){
               bWrongDate=true;
	       strError = "Date: " + date_value + " has incorrect day.  Please use MM/DD/YYYY";
               if (debug){
                    alert('Incorrect Day:' + iday);
               }
     	   }
     	   if ((imonth <= 0 ) || (imonth > 12)){
               bWrongDate=true;
	       strError = "Date: " + date_value + " has incorrect month.  Please use MM/DD/YYYY";
               if (debug){
                    alert('Incorrect Month:' + imonth);
               }
     	   }
     	   if (((iyear < 1900 ) || (iyear > 2099)) ){
               bWrongDate=true;
	       strError = "Date: " + date_value + " has incorrect year.  Please use MM/DD/YYYY";
               if (debug){
                    alert('Incorrect Year:' + iyear);
               }
     	   }
     	   if (bWrongDate) {
		alert(strError);
 		return false;
     	   }
	   }
	   break;
	}

	case "val_date2":
       	{
		
	   var date_value = objValue.value;
	   var debug=false;
	   bWrongDate=false;
	   var sDay = "";
	   var sMonth="";
	   var sYear="";
	   
	   if (date_value.length != 8) {
	       bWrongDate=true;
	       strError = "Date: " + date_value + " must have 8 characters.  Please use YYYYMMDD";
	   }
	   else {	   
	      var sDay = date_value.substring(6,8);
		  var iday=Math.abs(sDay);
		  if ((iday <= 0 ) || (iday > 31)){
             bWrongDate=true;
	         strError = "Date: " + date_value + " has incorrect day.  Please use YYYYMMDD";
		  }
		   
		  var sMonth = date_value.substring(4,6);
		  var imonth=Math.abs(sMonth);
		  if ((imonth <= 0 ) || (imonth > 12)){
             bWrongDate=true;
	         strError = "Date: " + date_value + " has incorrect month.  Please use YYYYMMDD";
		  }

		  var sYear = date_value.substring(0,4);
		  var iyear=Math.abs(sYear);
		  if (((iyear < 1900 ) || (iyear > 2099)) ){
             bWrongDate=true;
	         strError = "Date: " + date_value + " has incorrect year.  Please use YYYYMMDD";
		  }
		  
		  if (debug) {
		     alert('Syear:' + sYear);
			 alert('Smonth' + sMonth);
			 alert('SDay' + sDay);
		  }

	   }
	   
	   if (bWrongDate) {
		  alert(strError);
 	 	  return false;
       }
		   
	   break;
	}

        case "confirm_":
 
        {
           if (!strError || strError.length == 0)
           {
              strError = "Are you sure?";
           }
           else
           {
              strError = strError + "Are you sure?";
           }
           return confirm(strError);
        }
		
		case "contain":
		{   
		   var contains = cmdvalue.split(",");  
		   for (var i = 0; i < contains.length; i++) {
		      if (contains[i] == objValue.value) {
			  
			     if(!strError || strError.length ==0) {
				    strError = objValue.value + " already exists.  Please choose something different.";
				 }
				 alert(strError);
				 return false;
		      }
		   }
		   break;
		}
        case "maxlength": 
        case "maxlen": 
          { 
             if(eval(objValue.value.length) >  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : "+cmdvalue+" characters maximum "; 
               }//if 
               alert(strError + "\n[Current length = " + objValue.value.length + " ]"); 
               return false; 
             }//if 
             break; 
          }//case maxlen 
        case "minlength": 
        case "minlen": 
           { 
             if(eval(objValue.value.length) <  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : " + cmdvalue + " characters minimum  "; 
               }//if               
               alert(strError + "\n[Current length = " + objValue.value.length + " ]"); 
               return false;                 
             }//if 
             break; 
            }//case minlen 
        case "alnum": 
        case "alphanumeric": 
           { 
              var charpos = objValue.value.search("[^A-Za-z0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
               if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only alpha-numeric characters allowed "; 
                }//if 
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//case alphanumeric 
        case "num": 
        case "numeric": 
           { 
              var charpos = objValue.value.search("[^0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only digits allowed "; 
                }//if               
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break;               
           }//numeric 
        case "alphabetic": 
        case "alpha": 
           { 
              var charpos = objValue.value.search("[^A-Za-z]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only alphabetic characters allowed "; 
                }//if                             
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//alpha 
		case "numericp": 
           { 
              var charpos = objValue.value.search("[^0-9.]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only numeric characters allowed "; 
                }//if                             
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//numericp 
	   case "filename":
			{
	
              var charpos = objValue.value.search("[,]"); 


              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": commas are not allowed"; 
                }//if                             
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 			
			break;
	   }
		case "alnumhyphen":
			{
              var charpos = objValue.value.search("[^A-Za-z0-9\-_]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": characters allowed are A-Z,a-z,0-9,- and _"; 
                }//if                             
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 			
			break;
			}
        case "email": 
          { 
               if(!validateEmailv2(objValue.value)) 
               { 
                 if(!strError || strError.length ==0) 
                 { 
                    strError = objValue.name+": Enter a valid Email address "; 
                 }//if                                               
                 alert(strError); 
                 return false; 
               }//if 
           break; 
          }//case email 
        case "lt": 
        case "lessthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": Should be a number "); 
              return false; 
            }//if 
            if(eval(objValue.value) >=  eval(cmdvalue)) 
            { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " : value should be less than "+ cmdvalue; 
              }//if               
              alert(strError); 
              return false;                 
             }//if             
            break; 
         }//case lessthan 
        case "gt": 
        case "greaterthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": Should be a number "); 
              return false; 
            }//if 
             if(eval(objValue.value) <=  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : value should be greater than "+ cmdvalue; 
               }//if               
               alert(strError); 
               return false;                 
             }//if             
            break; 
         }//case greaterthan 
        case "regexp": 
         { 
            if(!objValue.value.match(cmdvalue)) 
            { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name+": Invalid characters found "; 
              }//if       
	                                                       
              alert(strError); 
			  
              return false;                   
            }//if 
           break; 
         }//case regexp 
        case "dontselect": 
         { 
            if(objValue.selectedIndex == null) 
            { 
              alert("BUG: dontselect command for non-select Item"); 
              return false; 
            } 
			alert(cmdvalue);
            if(objValue.selectedIndex == eval(cmdvalue)) 
            { 
             if(!strError || strError.length ==0) 
              { 
              strError = objValue.name+": Please Select one option "; 
              }//if                                                               
              alert(strError); 
              return false;                                   
             } 
             break; 
         }//case dontselect 
    }//switch 
    return true; 
}