// ----------------------------------------------------------------------
// $Id: formval.js,v 1.12 2007/01/24 22:19:20 rnewman Exp rnewman $
// ----------------------------------------------------------------------
// Javascript form validation routines.
// Source: http://www.xs4all.nl/~sbpoley/webmatters/formval.html
// Author: Stephen Poley
// Modified by: Rob Newman <rlnewman@ucsd.edu>
//
// 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.
//
// Update Oct 2005: minor tidy-up: unused parameter removed
//
// Update Feb 2006: add validateRadio(), validateSelect() functions
// 
// Update July 2006: fix/extend validateDate(), validateSelect() functions
// ----------------------------------------------------------------------

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() {
	glb_vfld.focus()
}

function setfocus(vfld) {
	// save vfld in global variable so value retained when routine exits
	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");  
      vfld.style.background = "#FFC" ;
      setfocus(vfld);
      return false;
    }
    else {
      msg (ifld, "warn", "");   // OK
      vfld.style.background = "#FFF" ;
      return true;  
    }
  }
  vfld.style.background = "#FFF" ;
  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;
};


// -----------------------------------------
//               validateRadio
// Validate if a radio button has been selected
// Returns true if so 
// -----------------------------------------

function validateRadio(vfld,  // element to be validated
                       ifld ) // id of element to receive info/error msg
{
	// msg( ifld, "error", 'Radio value is '+vfld.value+' Length is '+vfld.length+' Checked is: '+vfld.checked ) ;
	// return false;
	if ( vfld.checked != true || vfld.value == 'undefined') {
		for( counter = 0; counter < vfld.length; counter++ ) {
			if( vfld[counter].checked == true ) var radio_choice = true ;
		}
	} else {
		var radio_choice = true ;
	}

	if( !radio_choice ) {
		msg (ifld, "error", "ERROR: required");
		setfocus(vfld);
		return false;
	}

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


// -----------------------------------------
//               validateMultiCheck
// Validate if multiple radio button has been selected
// Returns true if so 
// -----------------------------------------

function validateMultiCheck(vfld,  // element to be validated
                       ifld ) // id of element to receive info/error msg
{
	// alert('Select value is '+vfld.value+' Length is '+vfld.length+' Checked is: '+vfld.checked ) ;
	// if ( vfld.checked != true || vfld.value == 'undefined') {
	for( counter = 0; counter < vfld.length; counter++ ) {
		if( vfld[counter].checked == true ) var check_choice = true ;
	}
	if( !check_choice ) {
		msg (ifld, "error", "ERROR: at least one required");
		setfocus(vfld);
		return false;
	}
	msg (ifld, "warn", "");
	return true;
};

// -----------------------------------------
//               validateSelect
// Validate if a valid select option has been selected
// Returns true if so 
// -----------------------------------------

function validateSelect(vfld,  // element to be validated
                        ifld ) // id of element to receive info/error msg
{
	// alert( 'Value is '+vfld.value ) ;
	if( vfld.value == "-1" ) {
		msg (ifld, "error", "ERROR: required");
		setfocus(vfld);
		return false;
	}
	if( vfld.value == "Please_Select" ) {
		msg (ifld, "error", "ERROR: select email");
		setfocus(vfld);
		return false;
	}
	msg (ifld, "warn", "");
	return true;
};

// -----------------------------------------
//               validateMultiSelect
// Validate if a valid multiple select option has been selected
// Returns true if so 
// -----------------------------------------
/*
function validateMultiSelect( vfld, 
                              ifld )
{
	if( vfld.selectedIndex == -1 ) {
		msg (ifld, "error", "ERROR: required");
		setfocus(vfld);
		return false;
	}
};
*/

// -----------------------------------------
//               addComment
// Validate if a comment has been added
// Returns true if so 
// -----------------------------------------

function addComment(vfld,   // 1st element to be validated
                    ifld,   // id of first element to receive info/error msg
                    v2fld,  // 2nd element to be validated
                    i2fld) // id of second element to receive info/error msg
{
	for( counter = 0; counter < vfld.length; counter++ ) {
		if( vfld[counter].checked ) {
			radio_choice = true ;
		} else {
			radio_choice = false ;
		}
	}
	if( radio_choice == false || radio_choice == "no" ) {
		// if( v2fld.value ) {
		// 	msg (ifld, "error", "NOTE: selecting 'no' means a comment is not required");
		// 	msg (i2fld, "error", "ERROR: please remove comment");
		// 	v2fld.style.background = "#FFC" ;
		// 	return false ;
		// } else {
			msg (ifld, "warn", "");
			msg (i2fld, "warn", "");
			v2fld.style.background = "#FFF" ;
			return true;
		// }
	} else {
		if( !v2fld.value ) {
			msg (ifld, "error", "NOTE: selecting 'yes' means a comment is required below");
			msg (i2fld, "error", "ERROR: please enter a comment");
			v2fld.style.background = "#FFC" ;
			return false ;
		} else {
			msg (ifld, "warn", "");
			msg (i2fld, "warn", "");
			v2fld.style.background = "#FFF" ;
			return true;
		}
	} 
};

// -----------------------------------------
//               validatePhone
// Validate phone format
// Returns true if so (and also if could not be executed because of old browser)
// -----------------------------------------

function validatePhone  (vfld,  // element to be validated
                        ifld)  // id of element to receive info/error msg
{

	if( !vfld.value ) {
		msg (ifld, "error", "ERROR: enter a phone number");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	var validformat = /^\d{3}\-\d{3}\-\d{4}$/ // Basic check for format validity

	if( !validformat.test( vfld.value ) ) {
		msg (ifld, "error", "ERROR: invalid format");
		vfld.style.background = "#FFC" ;
		return false ;
	} 
	msg (ifld, "warn", "");
	vfld.style.background = "#FFF" ;
	return true;
};

// -----------------------------------------
//               validateDate
// Validate date format
// Returns true if so (and also if could not be executed because of old browser)
// -----------------------------------------

function validateDate  (vfld,  // element to be validated
                        ifld)  // id of element to receive info/error msg
{

	if( !vfld.value ) {
		msg (ifld, "error", "ERROR: enter a date");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	var validformat = /^\d{2}\/\d{2}\/\d{4}$/ ; // Basic check for format validity

	if( !validformat.test( vfld.value ) ) {
		msg (ifld, "error", "ERROR: enter valid date");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	var mysplit = vfld.value.split("/") ;

	// var monthfield = vfld.value.split("/")[0] ;
	var monthfield = mysplit[0] ;
	// var dayfield = vfld.value.split("/")[1] ;
	var dayfield = mysplit[1] ;
	// var yearfield = vfld.value.split("/")[2] ;
	var yearfield = mysplit[2] ;

	var monthLength = new Array( 31,28,31,30,31,30,31,31,30,31,30,31 ) ;

	if( monthfield > 12 ) {
		msg (ifld, "error", "ERROR: month wrong");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	if( dayfield > 31 ) {
		msg (ifld, "error", "ERROR: day wrong");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	if( yearfield/4 == parseInt( yearfield/4 ) ) monthLength[1] = 29 ;

	if( dayfield > monthLength[monthfield-1] ) {
		msg (ifld, "error", "ERROR: day count wrong");
		vfld.style.background = "#FFC" ;
		return false ;
	}

	var dateToCheck = new Date() ;
	dateToCheck.setYear( yearfield ) ;
	dateToCheck.setMonth( monthfield-1 ) ;
	dateToCheck.setDate( dayfield ) ;

	msg (ifld, "warn", "");
	vfld.style.background = "#FFF" ;
	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: invalid address");
    vfld.style.background = "#FFC" ;
    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", "WARNING: Unusual address - 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;
};