var nbsp = 160;		// non-breaking space char
var node_text = 3;	// DOM text node-type
var emptyString = /^\s*$/ ;
var global_valfield;	// retain valfield 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()
{
  global_valfield.focus();
}

function setfocus(valfield)
{
  // save valfield in global variable so value retained when routine exits
  global_valfield = valfield;
  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
{
  var dispmessage;
  if (emptyString.test(message)) 
    dispmessage = String.fromCharCode(nbsp);    
  else  
    dispmessage = message;

  var elem = document.getElementById(fld); 
  if (elem.style.display != 'none'){
	  elem.style.display = 'none';
  }
	new Effect.Appear(elem, {duration: 2});
    elem.innerHTML = dispmessage;
    elem.className = msgtype;   // set the CSS class to adjust appearance of message
}


function lbl(fld,     // id of element to display message in
             msgtype) // class to give element ("warn" or "error")
{
  var elem = document.getElementById(fld);
  
  elem.className = msgtype;   // set the CSS class to adjust appearance of message
}

function hdr(fld,     // id of element to display message in
             msgtype,
			 message ) // class to give element ("warn" or "error")
{
  var dispmessage;
  if (emptyString.test(message)) 
    dispmessage = String.fromCharCode(nbsp);    
  else  
    dispmessage = message;

  var elem = document.getElementById(fld); 
  if (elem.style.display != 'none'){
	  elem.style.display = 'none';
  }
	new Effect.Appear(elem, {duration: 2});
    elem.innerHTML = 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    (valfield,   // element to be validated
						 label,
						 infofield,  // id of element to receive info/error msg
						 required)   // true if required
{
  if (!document.getElementById) 
    return true;  // not available on this browser - leave validation to the server
  var elem = document.getElementById(infofield);
  if (!elem.firstChild) return true;  // not available on this browser 
  if (elem.firstChild.nodeType != node_text) return true;  // infofield is wrong type of node  

  if (emptyString.test(valfield.value)) {
    if (required) {
      msg (infofield, "error", "Ø");  
	  lbl (label, "dataerror");
      setfocus(valfield);
      return false;
    }
    else {
      msg (infofield, "correct", "√");   // OK
	  lbl (label, "datacorrect");
      return true;  
    }
  }
  return proceed;
}

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

function validatePresent(valfield,// element to be validated
						 label,   // label id to change color
                         infofield ) // id of element to receive info/error msg
{
  var stat = commonCheck (valfield, label, infofield, true);
  if (stat != proceed) return stat;

  msg (infofield, "correct", "√"); 
  lbl (label, "datacorrect");
  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  (valfield,   // element to be validated
						 label, //label id
                         infofield, // id of element to receive info/error msg
						 header,   //header id
                         required)   // true if required
{
  var stat = commonCheck (valfield, label, infofield, required);
  if (stat != proceed) return stat;

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

  var email2 = /^[A-Za-z][\w.-]+@\w[\w.-]+\.[\w.-]*[A-Za-z][A-Za-z]$/  ;
  if (!email2.test(tfld)) {  
    msg (infofield, "warn", "Ø");
	hdr (header, "error", "Unusual e-mail address - check if correct");
	lbl (label, "dataerror");
  } else {
    msg (infofield, "correct", "√");
	hdr (header, "correct", "");
	lbl (label, "datacorrect");
    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  (valfield,   // element to be validated
                         label, 	 // id label	
						 infofield,  // id of element to receive info/error msg
						 header,     // header id
                         required)   // true if required
{
  var stat = commonCheck (valfield, label, infofield, required);
  if (stat != proceed) return stat;

  var tfld = trim(valfield.value);  // value of field with whitespace trimmed off
  var telnr = /^\+?[0-9 ()-]+[0-9]$/  ;
  if (!telnr.test(tfld)) {
    msg (infofield, "error", "Ø");
    hdr (header, "error", "ERROR: not a valid telephone number. Characters permitted are digits, space ()- and leading +");
	lbl (label, "dataerror")
	setfocus(valfield);
    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 (infofield, "error", "&Oslash;");
    hdr (header, "error", "ERROR: " + numdigits + " digits - too short");
	lbl (label, "dataerror");
    setfocus(valfield);
    return false;
  }

  if (numdigits>14) {
    msg (infofield, "warn", "&Oslash;");
    hdr (header, "error", "WARN: " + numdigits + " digits - check if correct");
	lbl (label, "dataerror");
  }
  else  
    if (numdigits<10) {
      msg (infofield, "warn", "&Oslash;");
      hdr (header, "error", "WARN: Only " + numdigits + " digits - check if correct");
	  lbl (label, "dataerror");
  }
  else {
      msg (infofield, "correct", "&radic;");
	  hdr (header, "correct", "");
	  lbl (label, "datacorrect");
 	  return true;	
 }
 }
 
 // **** Validate Zip ***** //
 //    
 //
 
 function validateZip  (valfield,   // element to be validated
                         label, 	 // id label	
						 infofield,  // id of element to receive info/error msg
                         required)   // true if required
{
  var stat = commonCheck (valfield, label, infofield, required);
  if (stat != proceed) return stat;

  var tfld = trim(valfield.value);  // value of field with whitespace trimmed off
  var telnr = /^\+?[0-9 ()-]+[0-9]$/  ;
  if (!telnr.test(tfld)) {
    msg (infofield, "error", "&Oslash;");
	lbl (label, "dataerror")
	setfocus(valfield);
    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<5) {
    msg (infofield, "error", "&Oslash;");
	lbl (label, "dataerror");
    setfocus(valfield);
    return false;
  }

  if (numdigits>5) {
    msg (infofield, "error", "&Oslash;");
	lbl (label, "dataerror");
  }
  else {
      msg (infofield, "correct", "&radic;");
	  lbl (label, "datacorrect");
 	  return true;	
 }
 }
 
  // **** Validate Credit Card Account Number ***** //
 //    
 //
 
function validateCCAccount  (valfield,   // element to be validated
                         label, 	 // id label	
						 infofield,  // id of element to receive info/error msg
						 header,     // header id
                         required)   // true if required
{
  var stat = commonCheck (valfield, label, infofield, required);
  if (stat != proceed) return stat;

  var tfld = trim(valfield.value);  // value of field with whitespace trimmed off
  var ccnr = /^\+?[0-9 ()-]+[0-9]$/  ;
  if (!ccnr.test(tfld)) {
    msg (infofield, "error", "&Oslash;");
    hdr (header, "error", "ERROR: not a valid credit card number. Characters permitted are digits, space ()- and leading +");
	lbl (label, "dataerror")
	setfocus(valfield);
    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<16) {
    msg (infofield, "error", "&Oslash;");
    hdr (header, "error", "ERROR: " + numdigits + " digits - too short");
	lbl (label, "dataerror");
    setfocus(valfield);
    return false;
  }

  if (numdigits>16) {
    msg (infofield, "error", "&Oslash;");
    hdr (header, "error", "WARN: " + numdigits + " digits - check if correct");
	lbl (label, "dataerror");
  }
  else {
      msg (infofield, "correct", "&radic;");
      hdr (header, "correct", "");
	  lbl (label, "datacorrect");
 	  return true;	
 }
 }

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

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

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

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

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

// ----------------------------------------------------------------------
// Javascript form validation routines.
// Author: Stephen Poley
//
// File 2: checkboxes
// Uses the msg routine from formval.js
// ----------------------------------------------------------------------


// -----------------------------------------
//            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);
  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);
  return false;
}