// ----------------------------------------------------------------------
// Javascript form validation routines.
// Author: Stephen Poley
//
// Simple routines to quickly pick up obvious typos.
// All validation routines return true if executed by an older browser:
// in this case validation must be left to the server.
//
// Update Aug 2004: have tested that IE 5.0 and IE 5.5 both support DOM model
// sufficiently well, so innerHTML option removed (redundant).
//
// Update Jun 2005: discovered that reason IE wasn't setting focus was
// due to an IE timing bug. Added 0.1 sec delay to fix.
// ----------------------------------------------------------------------

var nbsp = 160;    // non-breaking space char
var node_text = 3; // DOM text node-type
var emptyString = /^\s*$/
var glb_vfld;      // retain vfld for timer thread

// -----------------------------------------
//                  trim
// Trim leading/trailing whitespace off string
// -----------------------------------------

function trim(str)
{
  return str.replace(/^\s+|\s+$/g, '')
};


// -----------------------------------------
//                  setfocus
// Delayed focus setting to get around IE bug
// -----------------------------------------

function setFocusDelayed(vfld)
{
  glb_vfld.focus()
}

function setfocus(vfld)
{
  glb_vfld = vfld;
  setTimeout( 'setFocusDelayed()', 100 );
}


// -----------------------------------------
//                  msg
// Display warn/error message in HTML element
// commonCheck routine must have previously been called
// -----------------------------------------

function msg(fld,     // id of element to display message in
             msgtype, // class to give element ("warn" or "error")
             message) // string to display
{
  // setting an empty string can give problems if later set to a
  // non-empty string, so ensure a space present. (For Mozilla and Opera one could
  // simply use a space, but IE demands something more, like a non-breaking space.)
  var dispmessage;
  if (emptyString.test(message))
    dispmessage = String.fromCharCode(nbsp);
  else
    dispmessage = message;

  var elem = document.getElementById(fld);
  elem.firstChild.nodeValue = dispmessage;

  elem.className = msgtype;   // set the CSS class to adjust appearance of message
};

// -----------------------------------------
//            commonCheck
// Common code for all validation routines to:
// (a) check for older / less-equipped browsers
// (b) check if empty fields are required
// Returns true (validation passed),
//         false (validation failed) or
//         proceed (don't know yet)
// -----------------------------------------

var proceed = 2;

function commonCheck    (vfld,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         reqd)   // true if required
{
  if (!document.getElementById)
    return true;  // not available on this browser - leave validation to the server
  var elem = document.getElementById(ifld);
  if (!elem.firstChild)
    return true;  // not available on this browser
  if (elem.firstChild.nodeType != node_text)
    return true;  // ifld is wrong type of node

  if (emptyString.test(vfld.value)) {
    if (reqd) {
      msg (ifld, "error", "ERROR: required");
      setfocus(vfld);
      return false;
    }
    else {
      msg (ifld, "warn", "");   // OK
      return true;
    }
  }
  return proceed;
}

// -----------------------------------------
//            validatePresent
// Validate if something has been entered
// Returns true if so
// -----------------------------------------

function validatePresent(vfld,   // element to be validated
                         ifld )  // id of element to receive info/error msg
{
  var stat = commonCheck (vfld, ifld, true);
  if (stat != proceed) return stat;

  msg (ifld, "warn", "");
  return true;
};

// -----------------------------------------
//               validateEmail
// Validate if e-mail address
// Returns true if so (and also if could not be executed because of old browser)
// -----------------------------------------

function validateEmail  (vfld,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         reqd)   // true if required
{
  var stat = commonCheck (vfld, ifld, reqd);
  if (stat != proceed) return stat;

  var tfld = trim(vfld.value);  // value of field with whitespace trimmed off
  var email = /^[^@]+@[^@.]+\.[^@]*\w\w$/
  if (!email.test(tfld)) {
    msg (ifld, "error", "ERROR: not a valid e-mail address");
    setfocus(vfld);
    return false;
  }

  var email2 = /^[A-Za-z][\w.-]+@\w[\w.-]+\.[\w.-]*[A-Za-z][A-Za-z]$/
  if (!email2.test(tfld))
    msg (ifld, "warn", "Unusual e-mail address - check if correct");
  else
    msg (ifld, "warn", "");
  return true;
};


// -----------------------------------------
//            validateTelnr
// Validate telephone number
// Returns true if so (and also if could not be executed because of old browser)
// Permits spaces, hyphens, brackets and leading +
// -----------------------------------------


function validateTelnr  (vfld,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         reqd)   // true if required
{
  var stat = commonCheck (vfld, ifld, reqd);
  if (stat != proceed) return stat;

  var tfld = trim(vfld.value);  // value of field with whitespace trimmed off
  var telnr = /^\+?[0-9 ()-]+[0-9]$/
  if (!telnr.test(tfld)) {
    msg (ifld, "error", "ERROR: not a valid telephone number. Characters permitted are digits, space ()- and leading +");
    setfocus(vfld);
    return false;
  }

  var numdigits = 0;
  for (var j=0; j<tfld.length; j++)
    if (tfld.charAt(j)>='0' && tfld.charAt(j)<='9') numdigits++;

  if (numdigits<6) {
    msg (ifld, "error", "ERROR: " + numdigits + " digits - too short");
    setfocus(vfld);
    return false;
  }

  if (numdigits>14)
    msg (ifld, "warn", numdigits + " digits - check if correct");
  else {
    if (numdigits<10)
      msg (ifld, "warn", "Only " + numdigits + " digits - check if correct");
    else
      msg (ifld, "warn", "");
  }
  return true;
};

// -----------------------------------------
//             validateAge
// Validate person's age
// Returns true if OK
// -----------------------------------------

function validateAge    (vfld,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         reqd)   // true if required
{
  var stat = commonCheck (vfld, ifld, reqd);
  if (stat != proceed) return stat;

  var tfld = trim(vfld.value);
  var ageRE = /^[0-9]{1,3}$/
  if (!ageRE.test(tfld)) {
    msg (ifld, "error", "ERROR: not a valid age");
    setfocus(vfld);
    return false;
  }

  if (tfld>=200) {
    msg (ifld, "error", "ERROR: not a valid age");
    setfocus(vfld);
    return false;
  }

  if (tfld>110) msg (ifld, "warn", "Older than 110: check correct");
  else {
    if (tfld<7) msg (ifld, "warn", "Bit young for this, aren't you?");
    else        msg (ifld, "warn", "");
  }
  return true;
};

// -----------------------------------------
//            commonCheck2
// Common code for checkbox validation routines to
// check for older / less-equipped browsers
// Returns true (validation passed) or
//         proceed (don't know yet)
// -----------------------------------------

var proceed = 2;

function commonCheck2   (vfld,   // element to be validated
                         ifld)   // id of element to receive info/error msg
{
  if (!document.getElementById)
    return true;  // not available on this browser - leave validation to the server
  var elem = document.getElementById(ifld);
  if (!elem.firstChild)
    return true;  // not available on this browser
  if (elem.firstChild.nodeType != node_text)
    return true;  // ifld is wrong type of node

  msg (ifld, "warn", "");  // clear any previous error message
  return proceed;
}



// -----------------------------------------
//            validateCheckbox
// Validate that the correct number of checkboxes has been checked.
// Returns true if valid (and also if could not be executed because
// of old browser)
// -----------------------------------------

function validateCheckbox  (vfld,   // checkboxes to be validated
                            ifld,   // id of element to receive info/error msg
                            nr,     // number of checkboxes to be checked. >=2
                            cond)   // condition: -1 = less than or equal to nr
                                    //             0 = equal to nr (default)
                                    //             1 = greater than or equal to nr
{
  if (!nr || nr<2) {
    alert('Programming error in validateCheckbox: nr<2');
       // for nr=1 use radio buttons or validateConfirm
    return true;
  }
  if (!cond) cond = 0;

  var stat = commonCheck2(vfld, ifld);
  if (stat != proceed) return stat;

  // count how many boxes have been checked by the reader
  var count = 0;
  for (var j=0; j<vfld.length; j++)
     if (vfld[j].checked) count++;

  if (count==nr) return true;
  if (count<nr && cond==-1) return true;
  if (count>nr && cond==1)  return true;

  // if we get here then the validation has failed

  var suffix='';
  if (count>1) suffix='es';

  var errorMsg;

  if (count<nr) errorMsg = 'Only ' + count + ' box' + suffix + ' checked: ' + nr + ' required';
  if (count>nr) errorMsg = '' + count + ' boxes checked: maximum ' + nr + ' allowed';
  if (count==0) errorMsg = 'No boxes checked: ' + nr + ' required';

  msg (ifld, "error", errorMsg);
  vfld[0].focus();
  return false;
}


// -----------------------------------------
//            validateConfirm
// Usually one doesn't want to validate if 1 checkbox of a set has been
// checked, because in this case one would use radio buttons instead.
// But sometimes one wants a reader to check a single box to confirm that
// he or she agrees to something. That is covered by this routine.
//
// Returns true if valid (and also if could not be executed because
// of old browser)
// -----------------------------------------

function validateConfirm   (vfld,   // checkbox to be validated
                            ifld)   // id of element to receive info/error msg
{
  var stat = commonCheck2(vfld, ifld);
  if (stat != proceed) return stat;

  if (vfld.checked) return true;

  // if we get here then the validation has failed

  var errorMsg = 'Please read the above message and confirm you agree to it';

  msg (ifld, "error", errorMsg);
  vfld.focus();
  return false;
}

function validateRadioTrue  (vfld,  // radio button to be validated
                             ifld)  // id of element to receive info/error msg
{
    if (getRadioValue(vfld) == "TRUE") {
        msg (ifld,"nowok", "");
        return true;
    }
    
    var errorMsg = "You must select yes to continue:  ";
    
    msg (ifld, "error", errorMsg);
    return false;
}

function getRadioValue(radioobj) {
	var value=null;
	for(var i = 0; i< radioobj.length; i++) {
	    if(radioobj[i].checked) {
		value = radioobj[i].value;
		break;
	    }
	}
	return value;
}
function roundit(obj,multi) {
    obj.value = Math.round(Number(numsOnly(obj.value)) * multi) / multi;
}
function validdecnumber(vfld,ifld,multi,reqd) {
  var stat = commonCheck (vfld, ifld, reqd);
  if (stat != proceed) return stat;

    if (multi == 1) { multi = 10;           }
    if (multi == 2) { multi = 100;          }
    if (multi == 3) { multi = 1000;         }
    if (multi == 4) { multi = 10000;        }
    if (multi == 5) { multi = 100000;       }
    if (multi == 6) { multi = 1000000;      }
    if (multi == 7) { multi = 10000000;     }
    if (multi == 8) { multi = 100000000;    }
    if (multi == 9) { multi = 1000000000;   }
    if (multi == 0) { multi = 1;            }
    roundit(vfld,multi);
    var s = vfld.value;
    if (reqd == true) {
        if (Number(s) == 0) {
            msg (ifld, "error", "ERROR: Must be a positive number");
            setfocus(vfld);
            return false;
        } else if (Number(s) < 0) {
            msg (ifld, "error", "ERROR: Must be a positive number");
            setfocus(vfld);
            return false;
        }
    }
    msg (ifld, "warn", "");
    return true;
}

function numsOnly (inString) {
    // Removes all non-numeric chars
    var s = inString
    var nVals = "1234567890.";     // acceptable chars; add + - . if floating values desired
    var i;
    var tmp = "";
    // Search through string and append to unfiltered values to tmp.
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1){
            tmp += c;
        }
    }
    return tmp;
}
function intOnly (obj) {
    // Removes all non-numeric chars
    var s = obj.value;
    var nVals = "1234567890";     // acceptable chars; add + - . if floating values desired
    var i;
    var tmp = "";
    // Search through string and append to unfiltered values to tmp.
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1){
            tmp += c;
        }
    }
    obj.value = tmp;
}
function validatereqint (vfld,ifld) {
  var stat = commonCheck (vfld, ifld, true);
  if (stat != proceed) return stat;

    // Removes all non-numeric chars
    var s = vfld.value;
    var nVals = "1234567890";     // acceptable chars; add + - . if floating values desired
    var i;
    var tmp = "";
    // Search through string and append to unfiltered values to tmp.
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1){
            tmp += c;
        }
    }
    vfld.value = tmp;
    return validatePresent(vfld,ifld);
}
function validaterouting (vfld,ifld) {
  var stat = commonCheck (vfld, ifld, true);
  if (stat != proceed) return stat;

    var s = vfld.value;
    var nVals = "1234567890";
    var i;
    var tmp = "";
    var numdigits = 0;
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1) {
            tmp += c;
            numdigits++;
        }
    }
    if (numdigits < 9) {
        msg(ifld, "error", "ERROR: not a valid routing number.  Must be 9 digits");
        setfocus(vfld);
        return false;
    }
    // Run through each digit and calculate the total.

    n = 0;
    for (i = 0; i < s.length; i += 3) {
        n += parseInt(s.charAt(i),     10) * 3
          +  parseInt(s.charAt(i + 1), 10) * 7
          +  parseInt(s.charAt(i + 2), 10);
    }

    // If the resulting sum is an even multiple of ten (but not zero),
    // the aba routing number is good.

    if (n != 0 && n % 10 == 0) {
       msg (ifld, "nowok", "*");
        return true;
    } else {
        msg(ifld, "error", "ERROR: not a valid routing number.  Checksum invalid.");
        setfocus(vfld);
        return false;
    }
}

function validatessn (vfld,ifld,reqd) {
  var stat = commonCheck (vfld, ifld, true);
  if (stat != proceed) return stat;

    var s = vfld.value;
    var nVals = "1234567890";
    var i;
    var tmp = "";
    var numdigits = 0;
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1) {
            tmp += c;
            numdigits++;
        }
    }
    if (numdigits < 9) {
        msg (ifld, "error", "ERROR: not a valid social security number.  Must be exactly 9 digits");
        setfocus(vfld);
        return false;
    }
    msg (ifld, "nowok", "*");
    return true;
}
function nonreqssn (vfld,ifld,reqd) {
  var stat = commonCheck (vfld, ifld, false);
  if (stat != proceed) return stat;

    var s = vfld.value;
    var nVals = "1234567890";
    var i;
    var tmp = "";
    var numdigits = 0;
    for (i = 0; i < s.length; i++) {
        var c = s.charAt(i);
        if (nVals.indexOf(c) != -1) {
            tmp += c;
            numdigits++;
        }
    }
    if ((numdigits > 0) && (numdigits < 9)) {
        msg (ifld, "error", "ERROR: not a valid social security number.  Must be exactly 9 digits");
        setfocus(vfld);
        return false;
    }
    msg (ifld, "nowok", "");
    return true;
}