// FormChek.js
// 2. 9. 2003 - correct check date - now can be empty
// 18 Feb 97 created Eric Krock
// BUG parseInt - 27. 8. 2003
// 22 jul 03 modify by Trebla
//
// checkIsSet (field,message)
// checkDateYMD (field,message)
// checkDateDMY (field,message)
// checkEmail (field,message)
// checkDateOlderDMY (field,message)
// checkDateOlderTodayDMY (field,message)
//
var digits = "0123456789";
var lowercaseLetters = "abcdefghijklmnopqrstuvwxyz";
var uppercaseLetters = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
var whitespace = " \t\n";
var decimalPointDelimiter = ".";
var digitsInZIPCode1 = 4;
var creditCardDelimiters = " ";
var defaultEmptyOK = true;
function makeArray(n) {
   for (var i = 1; i <= n; i++) {
      this[i] = 0;
   }
   return this;
}
var daysInMonth = makeArray(12);
daysInMonth[1] = 31;
daysInMonth[2] = 29;   // must programmatically check this
daysInMonth[3] = 31;
daysInMonth[4] = 30;
daysInMonth[5] = 31;
daysInMonth[6] = 30;
daysInMonth[7] = 31;
daysInMonth[8] = 31;
daysInMonth[9] = 30;
daysInMonth[10] = 31;
daysInMonth[11] = 30;
daysInMonth[12] = 31;
function isEmpty(s)
{   return ((s == null) || (s.length == 0));
}
function isWhitespace (s)
{   var i;
    if (isEmpty(s)) return true;
    for (i = 0; i < s.length; i++)
    {
         var c = s.charAt(i);
        if (whitespace.indexOf(c) == -1) return false;
    }
    return true;
}
function stripCharsInBag (s, bag)
{   var i;
    var returnString = "";
    for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if (bag.indexOf(c) == -1) returnString += c;
    }
    return returnString;
}
function stripCharsNotInBag (s, bag)
{   var i;
    var returnString = "";
    for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if (bag.indexOf(c) != -1) returnString += c;
    }
    return returnString;
}
function stripWhitespace (s)
{   return stripCharsInBag (s, whitespace);
}
function charInString (c, s)
{   for (i = 0; i < s.length; i++)
    {   if (s.charAt(i) == c) return true;
    }
    return false;
}
function stripInitialWhitespace (s)
{   var i = 0;
    while ((i < s.length) && charInString (s.charAt(i), whitespace))
       i++;
    return s.substring (i, s.length);
}
function isLetter (c)
{   return ( ((c >= "a") && (c <= "z")) || ((c >= "A") && (c <= "Z")) );
}
function isDigit (c)
{   return ((c >= "0") && (c <= "9"));
}
function isLetterOrDigit (c)
{   return (isLetter(c) || isDigit(c));
}
function isInteger (s)
{   var i;
    if (isEmpty(s))
       if (isInteger.arguments.length == 1) return defaultEmptyOK;
       else return (isInteger.arguments[1] == true);
    for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if (!isDigit(c)) return false;
    }
     return true;
}
function isSignedInteger (s)
{   if (isEmpty(s))
       if (isSignedInteger.arguments.length == 1) return defaultEmptyOK;
       else return (isSignedInteger.arguments[1] == true);
    else {
        var startPos = 0;
        var secondArg = defaultEmptyOK;
        if (isSignedInteger.arguments.length > 1)
            secondArg = isSignedInteger.arguments[1];
        // skip leading + or -
        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") )
           startPos = 1;
        return (isInteger(s.substring(startPos, s.length), secondArg));
    }
}
function isPositiveInteger (s)
{   var secondArg = defaultEmptyOK;
    if (isPositiveInteger.arguments.length > 1)
        secondArg = isPositiveInteger.arguments[1];
    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s,10) > 0) ) );
}
function isNonnegativeInteger (s)
{   var secondArg = defaultEmptyOK;
    if (isNonnegativeInteger.arguments.length > 1)
        secondArg = isNonnegativeInteger.arguments[1];
    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s,10) >= 0) ) );
}
function isNegativeInteger (s)
{   var secondArg = defaultEmptyOK;
    if (isNegativeInteger.arguments.length > 1)
        secondArg = isNegativeInteger.arguments[1];
    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s,10) < 0) ) );
}
function isNonpositiveInteger (s)
{   var secondArg = defaultEmptyOK;
    if (isNonpositiveInteger.arguments.length > 1)
        secondArg = isNonpositiveInteger.arguments[1];
    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s,10) <= 0) ) );
}
function isFloat (s)
{   var i;
    var seenDecimalPoint = false;
    if (isEmpty(s))
       if (isFloat.arguments.length == 1) return defaultEmptyOK;
       else return (isFloat.arguments[1] == true);
    if (s == decimalPointDelimiter) return false;
     for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if ((c == decimalPointDelimiter) && !seenDecimalPoint) seenDecimalPoint = true;
        else if (!isDigit(c)) return false;
    }
    return true;
}
function isSignedFloat (s)
{   if (isEmpty(s))
       if (isSignedFloat.arguments.length == 1) return defaultEmptyOK;
       else return (isSignedFloat.arguments[1] == true);
    else {
        var startPos = 0;
        var secondArg = defaultEmptyOK;
        if (isSignedFloat.arguments.length > 1)
            secondArg = isSignedFloat.arguments[1];
        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") )
           startPos = 1;
        return (isFloat(s.substring(startPos, s.length), secondArg));
    }
}
function isAlphabetic (s)
{   var i;
    if (isEmpty(s))
       if (isAlphabetic.arguments.length == 1) return defaultEmptyOK;
       else return (isAlphabetic.arguments[1] == true);
    for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if (!isLetter(c))
        return false;
    }
    return true;
}
function isAlphanumeric (s)
{   var i;
    if (isEmpty(s))
       if (isAlphanumeric.arguments.length == 1) return defaultEmptyOK;
       else return (isAlphanumeric.arguments[1] == true);
    for (i = 0; i < s.length; i++)
    {
        var c = s.charAt(i);
        if (! (isLetter(c) || isDigit(c) ) )
        return false;
    }
    return true;
}
function reformat (s)
{   var arg;
    var sPos = 0;
    var resultString = "";
    for (var i = 1; i < reformat.arguments.length; i++) {
       arg = reformat.arguments[i];
       if (i % 2 == 1) resultString += arg;
       else {
           resultString += s.substring(sPos, sPos + arg);
           sPos += arg;
       }
    }
    return resultString;
}
function isEmail (s)
{   if (isEmpty(s))
       if (isEmail.arguments.length == 1) return defaultEmptyOK;
       else return (isEmail.arguments[1] == true);
     if (isWhitespace(s)) return false;
     var i = 1;
    var sLength = s.length;
    // look for @
    while ((i < sLength) && (s.charAt(i) != "@"))
    { i++
    }
    if ((i >= sLength) || (s.charAt(i) != "@")) return false;
    else i += 2;
    // look for .
    while ((i < sLength) && (s.charAt(i) != "."))
    { i++
    }
    // there must be at least one character after the .
    if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;
    else return true;
}
function isYear (s)
{   if (isEmpty(s))
       if (isYear.arguments.length == 1) return defaultEmptyOK;
       else return (isYear.arguments[1] == true);
    if (!isNonnegativeInteger(s)) return false;
    return ((s.length == 2) || (s.length == 4));
}
function isIntegerInRange (s, a, b)
{   if (isEmpty(s))
       if (isIntegerInRange.arguments.length == 1) return defaultEmptyOK;
       else return (isIntegerInRange.arguments[1] == true);
      if (!isInteger(s, false)) return false;
    var num = parseInt (s,10);
    return ((num >= a) && (num <= b));
}
function isMonth (s)
{   if (isEmpty(s))
       if (isMonth.arguments.length == 1) return defaultEmptyOK;
       else return (isMonth.arguments[1] == true);
    return isIntegerInRange (s, 1, 12);
}
function isDay (s)
{   if (isEmpty(s))
       if (isDay.arguments.length == 1) return defaultEmptyOK;
       else return (isDay.arguments[1] == true);
    return isIntegerInRange (s, 1, 31);
}
function daysInFebruary (year)
{
    return (  ((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0) ) ) ? 29 : 28 );
}
function isDate (year, month, day)
{
    if (! (isYear(year, false) && isMonth(month, false) && isDay(day, false))) return false;
     var intYear = parseInt(year,10);
    var intMonth = parseInt(month,10);
    var intDay = parseInt(day,10);
     if (intDay > daysInMonth[intMonth]) return false;
    if ((intMonth == 2) && (intDay > daysInFebruary(intYear))) return false;
    return true;
}
function checkDateDMY (s) {
  var secondArg = "Please enter a correct day in format dd.mm.yyy";
    if (checkDateDMY.arguments.length > 1) secondArg = checkDateDMY.arguments[1];
    var d=stripWhitespace(checkDateDMY.arguments[0].value);
    if ((d.length==0) && defaultEmptyOK) { return true; }else {
    var da=new Array(0, 0, 0);
    if (d.indexOf(".")!=-1) var da=d.split(".");
    if (d.indexOf("/")!=-1) var da=d.split("/");
    if (d.indexOf("-")!=-1) var da=d.split("-");


   if (isEmpty(d) && defaultEmptyOK )  { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}

  if (da[0]==0 || da[1]==0 ||da[2]==0 )  { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}

    if (isDate(da[2],da[1],da[0])) { return true;} else
    { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}
    }
}
function checkDateYMD (s) {
// checkDateYMD (field,message)
  var secondArg = "Please enter a correct day in format yyyy/mm/dd";
    if (checkDateYMD.arguments.length > 1) secondArg = checkDateYMD.arguments[1];
    var d=stripWhitespace(checkDateDMY.arguments[0].value);
    if ((d.length==0) && defaultEmptyOK) { return true; }else {
    var da=new Array(0, 0, 0);
    if (d.indexOf(".")!=-1) var da=d.split(".");
    if (d.indexOf("/")!=-1) var da=d.split("/");
    if (d.indexOf("-")!=-1) var da=d.split("-");


   if (isEmpty(d) && defaultEmptyOK )  { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}

  if (da[0]==0 || da[1]==0 ||da[2]==0 )  { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}

    if (isDate(da[0],da[1],da[2])) { return true;} else
    { alert(secondArg);
    checkDateDMY.arguments[0].focus();
    checkDateDMY.arguments[0].select();
    return false;}
    }
}


function checkIsSet (s) {
// checkIsSet (field,message)
  var msg = "Please fill in this field.";
    if (checkIsSet.arguments.length > 1) msg = checkIsSet.arguments[1];
    var d=stripInitialWhitespace(checkIsSet.arguments[0].value);

     if (!isEmpty(d)) { return true;} else
    { alert(msg);
    checkIsSet.arguments[0].focus();
    checkIsSet.arguments[0].select();
    return false;}
}
function checkLengthMin (s) {
// checkIsSet (field,message)
  var msg = "Minimum length is "+checkLengthMin.arguments[1]+" characters.";
    if (checkLengthMin.arguments.length > 2) msg = checkLengthMin.arguments[2];
    var d=checkLengthMin.arguments[0].value;
    var ll=parseInt(checkLengthMin.arguments[1],10);
     if (d.length>=ll) { return true;} else
    { alert(msg);
    checkLengthMin.arguments[0].focus();
    checkLengthMin.arguments[0].select();
    return false;}
}

function checkDateOlderDMY (s) {
// checkDateOlderDMY (field,yungfield,message)
    var msg = "Please enter an older date in format dd.mm.yyy";
    if (checkDateOlderDMY.arguments.length > 2) msg = checkDateOlderDMY.arguments[2];
    var d=stripWhitespace(checkDateOlderDMY.arguments[0].value);
    var da=new Array(0, 0, 0);
    var dadv=new Array(0, 0, 0);

    if (d.indexOf(".")!=-1) var da=d.split(".");
    if (d.indexOf("/")!=-1) var da=d.split("/");
    if (d.indexOf("-")!=-1) var da=d.split("-");
    var ddv=stripWhitespace(checkDateOlderDMY.arguments[1].value);
    if (ddv.indexOf(".")!=-1) var dadv=d.split(".");
    if (ddv.indexOf("/")!=-1) var dadv=d.split("/");
    if (ddv.indexOf("-")!=-1) var dadv=d.split("-");
    var diff=(dadv[2]+33*dadv[1]+dadv[0]) - (da[2]+33*da[1]+da[0]);

    if ((isDate(da[0],da[1],da[2])) && (isDate(dadv[0],dadv[1],dadv[2])) && (diff>=0) ) { return true;} else
    { alert(msg);
    checkDateOlderDMY.arguments[0].focus();
    checkDateOlderDMY.arguments[0].select();
 return false;   }
}

function checkDateOlderTodayDMY (s) {
// checkDateOlderTodayDMY (field,message)
    var msg = "Please enter an older date in format dd.mm.yyy";
    if (checkDateOlderTodayDMY.arguments.length > 1) msg = checkDateOlderTodayDMY.arguments[1];
    var d=stripWhitespace(checkDateOlderTodayDMY.arguments[0].value);
        var da=new Array(0, 0, 0);

    if (d.indexOf(".")!=-1) var da=d.split(".");
    if (d.indexOf("/")!=-1) var da=d.split("/");
    if (d.indexOf("-")!=-1) var da=d.split("-");
    var today=new Date();
    var ddv=today.getDay()+"."+today.getMonth()+"."+today.getFullYear();
    var dadv=d.split(".");
    var diff=(dadv[2]+33*dadv[1]+dadv[0]) - (da[2]+33*da[1]+da[0]);

    if (isDate(da[0],da[1],da[2]) && isDate(dadv[0],dadv[1],dadv[2]) && (diff>=0) ) { return true;} else
    { alert(msg);
    checkDateOlderDMY.arguments[0].focus();
    checkDateOlderDMY.arguments[0].select();
 return false;}
}

function prompt (s)
{   window.status = s;
}
function promptEntry (s)
{   window.status = pEntryPrompt + s;
}
function warnEmpty (theField, s)
{   theField.focus();
    alert(mPrefix + s + mSuffix);
    return false;
}
function warnInvalid (theField, s)
{   theField.focus();
    theField.select();
    alert(s);
    return false;
}

function checkEmail (s)
{// checkEmail (field,message)
    var msg = "Please enter correct email address";
    if (checkEmail.arguments.length > 1) msg = checkEmail.arguments[1];
    var d=stripWhitespace(checkEmail.arguments[0].value);

    if (isEmail(d) ) { return true;} else
    { alert(msg);
    checkEmail.arguments[0].focus();
    checkEmail.arguments[0].select();
 return false;}
}


function getRadioButtonValue (radio)
{   for (var i = 0; i < radio.length; i++)
    {   if (radio[i].checked) { break; }
    }
    return radio[i].value;
}
function checkCreditCard (radio, theField)
{   var cardType = getRadioButtonValue (radio);
    var normalizedCCN = stripCharsInBag(theField.value, creditCardDelimiters);
    if (!isCardMatch(cardType, normalizedCCN))
       return warnInvalid (theField, iCreditCardPrefix + cardType + iCreditCardSuffix);
    else
    {  theField.value = normalizedCCN;
       return true;
    }
}
function isCreditCard(st) {
  // Encoding only works on cards with less than 19 digits
  if (st.length > 19)
    return (false);
  sum = 0; mul = 1; l = st.length;
  for (i = 0; i < l; i++) {
    digit = st.substring(l-i-1,l-i);
    tproduct = parseInt(digit ,10)*mul;
    if (tproduct >= 10)
      sum += (tproduct % 10) + 1;
    else
      sum += tproduct;
    if (mul == 1)
      mul++;
    else
      mul--;
  }

  if ((sum % 10) == 0)
    return (true);
  else
    return (false);
}