//form.js version 1.42
//useful boolean functions for form validations
//isBlank(field, msg)
//isNotEmail(field)
//fieldValueIs(field, value)
//accumulateChecks(form, field, check_for_other)
//   combine all checkboxes into one string in <field>_all form field
//   if check_for_other=true, field_other_# will be checked and values replaced in corresponding list slots
//hideDiv(divId)
//showDiv(divId)
//flipDiv(divId)

function isBlank(field_var, msg) {
  //generic function that returns true if field is blank
  //regardless of the field type (text, radio, check, select)
  var i,focusVar;
  var blankIs = true;
  if (field_var == undefined) {
    alert('ERROR@isBlank: Form variable is not defined.\nCheck validation function.\n\nDEBUG: msg='+msg);
    return true;
  }
  var ftype = fieldType(field_var);
  switch (ftype) {
    case 'text':
    case 'textarea':
      blankIs = (field_var.value == '');
      focusVar = field_var;
      break;
    case 'radio':
    case 'checkbox':
      if (field_var.length == undefined) {
        if (field_var.checked) blankIs = false;
        focusVar = field_var;
      } else {
        for (i=0; i<field_var.length; i++) {
          if (field_var[i].checked) blankIs = false;
        }
        focusVar = field_var[0];
      }
      break;
    case 'select-one':
    case 'select':
      blankIs = (field_var.selectedIndex == 0);
      focusVar = field_var;
      break;
    default:
      alert('ERROR@isBlank: Form element type is unknown.\nCheck validation function.\n\nDEBUG: type='+ftype);
      return true;
  }
  if (blankIs) {
    alert(msg);
    focusVar.focus();
    self.scrollBy(0,-60);
    return true;
  } else {
    return false;
  }
}

function fieldType(field_var) {
  //returns type of field
  var ft = (field_var.length == undefined)? field_var.type:field_var[0].type;
  if ((ft == undefined) && (field_var.options.length != undefined)) ft = 'select';
  return ft;
}

function fieldValueIs(field_var, comp_to) {
  //generic function that compares field value to the second argument
  //regardless of the field type (text, radio, check, select)
  if (field_var == undefined) {
    alert('ERROR@fieldValueIs: Form variable is not defined.\nCheck validation function.\n\nDEBUG: compare value='+comp_to);
    return true;
  }
  var ftype = fieldType(field_var);
  switch (ftype) {
    case 'text':
    case 'textarea':
      return (field_var.value == comp_to);
      break;
    case 'radio':
    case 'checkbox':
      if (field_var.length == undefined) {
        if ((field_var.checked) && (field_var.value == comp_to)) return true;
      } else {
        for (var i=0; i<field_var.length; i++) {
          if ((field_var[i].checked) && (field_var[i].value == comp_to)) return true;
        }
      }
      break;
    case 'select':
      if (field_var.options[field_var.selectedIndex].value == comp_to) return true;
      break;
  }
  return false;
}

function accumulateChecks(form, var_name, check_for_other) {
  var accumList = '';
  var numBoxes = eval('form.'+var_name+'.length');
  if (numBoxes == undefined) {
    if (eval('form.'+var_name+'.checked')) {
      if ((check_for_other) && (eval('form.'+var_name+'_other_0 != undefined'))) {
        eval('accumList += form.'+var_name+'_other_0.value');
      } else {
        eval('accumList += form.'+var_name+'.value');
      }
      accumList += "\n";
    }
  } else {
    for (i=0; i<numBoxes; i++) {
      if (eval('form.'+var_name+'['+i+'].checked')) {
        if ((check_for_other) && (eval('form.'+var_name+'_other_'+i+' != undefined'))) {
          eval('accumList += form.'+var_name+'_other_'+i+'.value');
        } else {
          eval('accumList += form.'+var_name+'['+i+'].value');
        }
        accumList += "\n";
      }
    }
  }
  eval('form.'+var_name+'_all.value = accumList');
}

function isNotEmail(field_var) {
  if (emailCheck(field_var.value)) {
    return false;
  } else {
    field_var.focus();
    return true;
  }
}

function emailCheck(emailStr) {
  var emailPat=/^(.+)@(.+)$/
  var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]";
  var validChars="\[^\\s" + specialChars + "\]";
  var quotedUser="(\"[^\"]*\")";
  var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
  var atom=validChars + '+';
  var word="(" + atom + "|" + quotedUser + ")";
  var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
  var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
  
  //See if emailStr is not empty
  if (emailStr == '') {
    alert("Email address is missing.");
    return false;
  }
  
  //Begin with the coarse pattern to simply break up user@domain into workable pieces
  var matchArray = emailStr.match(emailPat);
  if (matchArray == null) {
  	alert("Email address seems incorrect (check @ and .'s)");
  	return false;
  }
  var user = matchArray[1];
  var domain = matchArray[2];
  
  // See if "user" is valid 
  if (user.match(userPat) == null) {
      alert("The email user name doesn't seem to be valid.");
      return false;
  }
  
  // if domain is an IP address
  var IPArray = domain.match(ipDomainPat)
  if (IPArray != null) {
      // this is an IP address
  	  for (var i=1; i<=4; i++) {
  	    if (IPArray[i]>255) {
	        alert("Email's IP address is invalid!");
		      return false;
  	    }
      }
      return true;
  }
  
  // if domain is symbolic name
  var domainArray = domain.match(domainPat)
  if (domainArray == null) {
  	alert("The domain name doesn't seem to be valid.");
    return false;
  }
  
  // make sure domain ends in a 2 to 4 letter word, and is preceded by hostname
  var atomPat = new RegExp(atom,"g");
  var domArr = domain.match(atomPat);
  var len = domArr.length;
  if (domArr[domArr.length-1].length<2 || domArr[domArr.length-1].length>4) {
     alert("The email must end in a three or four letter domain, or two letter country.");
     return false;
  }
  
  // Make sure there's a host name preceding the domain.
  if (len<2) {
     alert("This email address is missing a hostname!");
     return false;
  }
  return true;
}

function hideDiv(theDiv) {
  var the_style = getStyleObject(theDiv);
  if (the_style != false) { the_style.display = 'none'; }
}

function showDiv(theDiv) {
  var the_style = getStyleObject(theDiv);
  if (the_style != false) { the_style.display = 'block'; }
}

function flipDiv(theDiv) {
  var the_style = getStyleObject(theDiv);
  if (the_style != false) {
    if ((the_style.display == 'block') || (the_style.display == '')) {
      the_style.display = 'none';
    } else {
      the_style.display = 'block';
    }
  }
}

function getStyleObject(objectId) {
  if (document.getElementById && document.getElementById(objectId)) {
    return document.getElementById(objectId).style;
  } else if (document.all && document.all(objectId)) {
    return document.all(objectId).style;
  } else {
    return false;
  }
}