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

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


function setFocusDelayed()
{
  glb_vfld.focus()
}

function setfocus(vfld)
{

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


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);
  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", "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", "REQUIRED");
    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: check email address");
  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;
};

// -----------------------------------------
//            validateSelectBox
// Validate if state list boxes are set
// Returns true if so
// -----------------------------------------

function validateSelectBox(  vflselect,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         def)  // id of element to receive info/error msg
{

  var stat = commonCheck (vflselect, ifld, true);
  if (stat != proceed) return stat;


	if (vflselect.value == "--")
	{
		msg (ifld, "error", "REQUIRED");
		return false;
	}

    	msg (ifld, "warn", "");

  return true;
};

// -----------------------------------------
//            validateMonthYear
// Validate if year lists boxes are set
// Returns true if so
// -----------------------------------------

function validateMonthYear(  vfldmonth,   // element to be validated
						 vfldyear,   // element to be validated
                         ifld,   // id of element to receive info/error msg
                         def)  // id of element to receive info/error msg
{

  var stat = commonCheck (vfldmonth, ifld, true);
  if (stat != proceed) return stat;

  var stat = commonCheck (vfldyear, ifld, true);
  if (stat != proceed) return stat;

	var today=new Date();
	var thisYear=today.getYear();


	if (vfldyear.value == "--")
	{
		msg (ifld, "error", "REQUIRED");
		return false;
	}

	if (vfldmonth.value == "--")
	{
		msg (ifld, "error", "REQUIRED");
		return false;
	}


	if ( (vfldyear.value > thisYear || vfldyear.value == thisYear) &&  vfldmonth.value != "--")
	{
    	msg (ifld, "warn", "");
    }
    else
    {
  		msg (ifld, "error", "REQUIRED");
    }
  return true;
};

// -----------------------------------------
//            validateYesNo
// Validate if listbox is Yes or No has been entered
// Returns true if so
// -----------------------------------------

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

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

    if (vfld.value==def)
    {
    	msg (ifld, "warn", "");
    }
    else
    {
  		msg (ifld, "error", "REQUIRED");
    }
  return true;
};


// -----------------------------------------
//            validateCreditCardType
// Validates if listbox value is one of the approved CC types
// Returns true if so
// -----------------------------------------

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

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

  switch (vfld.value)
  {
  	case "Visa":
  	msg (ifld, "warn", "");
  	break;

  	case "Mastercard":
  	msg (ifld, "warn", "");
  	break;

  	//case "Amex":
  	//msg (ifld, "warn", "");
  	//break;

  	//case "Discover":
  	//msg (ifld, "warn", "");
  	//break;

  	default : msg (ifld, "error", "REQUIRED");
  }

  return true;
};

// -----------------------------------------
//            validateCreditCard
// Validate if listbox is Yes or No has been entered
// Returns true if so
// -----------------------------------------

function validateCreditCard(  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;
  var s = vfld.value

  // remove non-numerics
  var v = "0123456789";
  var w = "";
  for (i=0; i < s.length; i++) {
  x = s.charAt(i);
  if (v.indexOf(x,0) != -1)
  w += x;
  }


  if (w.length == 0)
  {
  	msg (ifld, "error", "REQUIRED");
  	return false;
  }

  // validate number
  j = w.length / 2;
  if (j < 6.5 || j > 8 || j == 7)
  {
  	msg (ifld, "error", "ERROR: Check card number");
  	return false;
  }
  k = Math.floor(j);
  m = Math.ceil(j) - k;
  c = 0;
  for (i=0; i<k; i++) {
  a = w.charAt(i*2+m) * 2;
  c += a > 9 ? Math.floor(a/10 + a%10) : a;
  }
  for (i=0; i<k+m; i++) c += w.charAt(i*2+1-m) * 1;
    if (c%10 == 0)
    {
    	msg (ifld, "warn", "");
    }
    else
    {
  		msg (ifld, "error", "REQUIRED1");
  		return false;
    }
  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 = 'Legga attentamente il seguente messaggio e confermili accosentono ad esso';

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