// ----------------------------------------------------------------------
// 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.
//
// Update Oct 2005: minor tidy-up: unused parameter removed
// Adapted by HN for use with Urania Reservation form
// ----------------------------------------------------------------------

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 warning or 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", "Fejl: Feltet må ikke være tomt!");  
      setfocus(vfld);
      return false;
    }
    else {
      msg (ifld, "warn", "");   // OK
      return true;  
    }
  }
  return proceed;
}


// -----------------------------------------
//            reset_advice
// Resets advice messages to default values
// -----------------------------------------

function reset_advice() {
    msg("InfInstNavn" , "warn", "Udfyld!");
    msg("InfInstAdr1" , "warn", "Udfyld!");
    msg("InfInstEAN"  , "warn", "Udfyld! 13 cifre");
    msg("InfGrpNavn"  , "warn", "Udfyld! Vælg selv");
    msg("InfGrpAntal" , "warn", "Udfyld! 6-20!");
    msg("InfGrpPerson", "warn", "Udfyld!");
    msg("InfGrpAdr1"  , "warn", "Udfyld!");
    msg("InfGrpEmail" , "warn", "Udfyld!");
    msg("InfGrpTlfnr" , "warn", "Udfyld!");
}


// -----------------------------------------
//            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;
};

// -----------------------------------------
//            validateEAN
// Validate the EAN number
// Permits digits and spaces, requires 13 digits
// -----------------------------------------

function validateEAN    (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 eannr = /^[0-9 ()]+$/
  if (!eannr.test(tfld)) {
    msg (ifld, "error", "Fejl i EAN-nummeret! Gyldige tegn er cifre og mellemrum.");
    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 != 13) {
    msg (ifld, "error", "Fejl: Der er " + numdigits + " cifre, men der skal være 13!");
    setfocus(vfld);
    return false;
  }
  else
  msg (ifld, "warn", "OK!");
  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 email1 = /^[^@]+@[^@.]+\.[^@]*\w\w$/
  if (!email1.test(tfld)) {
    msg (ifld, "error", "Fejl! E-mail adressen er ugyldig!");
    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", "Usandsynlig e-mail adresse - kontrollér venligst!");
  else
    msg (ifld, "warn", "OK!");
  return true;
};


// -----------------------------------------
//            validateTlfNr
// 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 validateTlfNr  (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", "Fejl i telefonnummeret! Gyldige tegn er cifre og mellemrum.");
    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 < 8) {
    msg (ifld, "error", "Fejl: " + numdigits + " cifre er for få!");
    setfocus(vfld);
    return false;
  }

  if (numdigits > 8)
    msg (ifld, "warn", numdigits + " cifre - er det korrekt?");
  else { 
    msg (ifld, "warn", "OK!");
  }
  return true;
};

// -----------------------------------------
//             validateVisitors
// Validate number of visitors
// Returns true if OK
// -----------------------------------------

function validateVisitors (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 allowed = /^[0-9]{1,2}$/
  if (!allowed.test(tfld)) {
    msg (ifld, "error", "Fejl: Brug kun cifre!");
    setfocus(vfld);
    return false;
  }

  if (tfld>25) {
    msg (ifld, "error", "Fejl: Højst 20!");
    setfocus(vfld);
    return false;
  }

  if (tfld<6) {
    msg (ifld, "error", "Fejl: Mindst 6!");
    setfocus(vfld);
    return false;
  }
  if (tfld>20)
    msg (ifld, "warn", "I overkanten!");
  else  {
    msg (ifld, "warn", "OK!");
  }
  return true;
};

// -----------------------------------------
//             validateCity
// Validate postal code, space and name
// Returns true if OK
// -----------------------------------------

function validateCity (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 allowed = /^[1-9][0-9][0-9][0-9]\s[A-Z,Æ,Ø,Å][A-Z,Æ,Ø,Å,a-z,æ,ø,å\s]+$/
//  var allowed = /^[1-9][0-9][0-9][0-9][()]$/
  if (!allowed.test(tfld)) {
    msg (ifld, "error", "Fejl: 4 cifre, mellemrum, navn!");
    setfocus(vfld);
    return false;
  }

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