// Author: 			??
// Created:			June 30, 2000
// Last modified:	July 10, 2000

var defaultEmptyOK = false;
var whitespace = " \t\n\r\f\v ";
var digits = "0123456789";
var decimalPointDelimiter = "."
var provinceCodeDelimiter = "|";
var provinceCodes = "AB|BC|MB|NB|NF|NT|NS|ON|PE|QC|SK|YT";
var lowercaseLetters = "abcdefghijklmnopqrstuvwxyz";
var uppercaseLetters = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
var monthCodeDelimiter = "|";
var monthCodes = "jan|feb|mar|apr|may|jun|jul|aug|sep|oct|nov|dec";

var cOK					= 1;
var cInvalidDelimiter 	= 2;
var cInvalidMonth 		= 3;
var cInvalidDay			= 4;
var cInvalidYear		= 5;
var cNull				= 6;

function isEmpty(s){
	var i;
	var c;
	
	s += "";

    if ((s == null) || (s.length == 0)) {
		return true;
	} else {
	    for (i = 0; i < s.length; i++) {   
    	    c = s.charAt(i);
        	if (whitespace.indexOf(c) == -1) {
				return false;
			}
    	}
	}

    return true;
}

function isDigit (c){
	return ((c >= "0") && (c <= "9"))
}

function isLetter (c) {
	c += "";
	return ( ((c >= "a") && (c <= "z")) || ((c >= "A") && (c <= "Z")) )
}

function isInteger (s, eok) {
	var c;
	
	s += "";
	if (isEmpty(s)) {
		if (isInteger.arguments.length == 1) {
	   		return defaultEmptyOK;
		}
		else {
			return (eok == true);
		}
	}
	else {
        var startPos = 0;

        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") ) {
			s = s.substring(1, s.length);
		}
		
		for (i = 0; i < s.length; i++) {
    	    c = s.charAt(i);
        	if (!isDigit(c)) {
				return false;
			}
		}

		return true;
    }
}

function isNumeric (s, eok) {
	var c;

	s += "";
	
	if (isEmpty(s)) {
		if (isNumeric.arguments.length == 1) {
			return defaultEmptyOK;
		} else {
			return (eok == true);
		}
	} else {
        var startPos = 0;
		var seenDecimalPoint = false;

        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") ) {
			s = s.substring(1, s.length);
		}
		
		if (s == decimalPointDelimiter) {
			return false;
		}

	    for (i = 0; i < s.length; i++) {   
			c = s.charAt(i);
	
	        if ((c == decimalPointDelimiter) && !seenDecimalPoint) {
				seenDecimalPoint = true;
			}
	        else if (!isDigit(c)) {
				return false;
			}
	    }
	
	    return true;
	
	}
}

function isNumberInRange (s, a, b, EQok, eok) {
	var num;

	if (isEmpty(s)) {
		if (isNumberInRange.arguments.length < 5) {
			return defaultEmptyOK;
		}
		else {
			return (eok == true);
		}
	}
	else {
		num = parseFloat (s);
	    if (!isNumeric(num, false) || !isNumeric(a, false) || !isNumeric(b, false)) {
			return false;
		}
		else {    
			if (EQok == false) {
				return ((s > a) && (s < b));
			}
			else {
	    		return ((s >= a) && (s <= b));
			}
		}
	}
}

function isEmail (s, eok) {
	if (isEmpty(s)) {
		if (isEmail.arguments.length == 1) {
	   		return defaultEmptyOK;
		}
		else {
			return (eok == true);
		}
   	}
	else {
	
		s = trim(s);
    
	    var i = 1;
    	var sLength = s.length;

	    while ((i < sLength) && (s.charAt(i) != "@")) {
			i++
	    }

    	if ((i >= sLength) || (s.charAt(i) != "@")) {
			return false;
		}
	    else {
			i += 2;
		}

	    while ((i < sLength) && (s.charAt(i) != ".")) {
			i++
	    }

    	if ((i >= sLength - 1) || (s.charAt(i) != ".")) {
			return false;
		}
	    else {
			return true;
		}
	}
}

function isProvinceCode (s, eok) {
	if (isEmpty(s)) {
		if (isProvinceCode.arguments.length == 1) {
	   		return defaultEmptyOK;
		}
       	else {
			return (eok == true);
		}
	}
	else {
		s = trim(s);
	
    	return (provinceCodes.indexOf(s) != -1 && s.indexOf(provinceCodeDelimiter) == -1);
	}
}

function isPostalCode (s, eok) {

	var i;
	
	if (isEmpty(s)) {
		if (isPostalCode.arguments.length == 1) {
			return defaultEmptyOK;
		}
       	else {
			return (eok == true);
		}
	}
	else {
		//s = trim(s);
		if (s.length == 6) {
			for (i = 0; i <= s.length - 1; i++) {
				if (i % 2 == 0) {
					if (!isLetter(s.charAt(i))) {
						return false;
					}
				}
				else {
					if (!isDigit(s.charAt(i))) {
						return false;
					}			
				}
			}
		}
		else if (s.length == 7) {
			if (s.charAt(3) != " ") {
				return false;
			}
			else {
				for (i = 0; i <= s.length - 1; i++) {
					if (i != 3) {
						if (i == 0 || i== 2 || i == 5) {
							if (!isLetter(s.charAt(i))) {
								return false;
							}
						}
						else {
							if (!isDigit(s.charAt(i))) {
								return false;
							}			
						}
					}
				}
			}
		}
		else {
			return false;
		}
		
		return true;
	}
}

function isDate (s, eok) {
	var dateDelimiter;

	if (isEmpty(s)) {
		if (isDate.arguments.length == 1) {
			return cNull;
		}
		else {
			if (eok == true) {
				return cOK;
			}
			else {
				return cNull;
			}
		}
	}
	else {
		s = trim(s);
		
		if (isLetter(s.charAt(0)) && isLetter(s.charAt(1)) && isLetter(s.charAt(2))) {
	
			dateFormat = "alpha";
			if (s.charAt(3) == "/" && s.charAt(6) == "/") {
				dateDelimiter = "/";
			}
			else if (s.charAt(3) == "-" && s.charAt(6) == "-") {
				dateDelimiter = "-";
			}
			else if (isLetter(s.charAt(3))) {
				return cInvalidMonth;
			}
			else {
				return cInvalidDelimiter;
			}
	
		}
		else if	(isDigit(s.charAt(0)) && isDigit(s.charAt(1))) {
	
			dateFormat = "numeric";
			if (s.charAt(2) == "/" && s.charAt(5) == "/") {
				dateDelimiter = "/";
			}
			else if (s.charAt(2) == "-" && s.charAt(5) == "-") {
				dateDelimiter = "-";
			}
			else {
				return cInvalidDelimiter;
			}
		}
		else {
			return cInvalidMonth;
		}
			
	  	day = s.substring(0, s.indexOf(dateDelimiter)); 
		month = s.substring(s.indexOf(dateDelimiter) + 1, s.lastIndexOf(dateDelimiter));
		year =  s.substring(s.lastIndexOf(dateDelimiter) + 1, s.length); 
	
		iDate = new Date(s);
		
		if (year < 1900) {
			return cInvalidYear;
		}
	
		if (dateFormat == "numeric") {
		  	if (month > 12 || month < 1) {
				return cInvalidMonth;
			}
		}
		else if (dateFormat == "alpha") {
			if (monthCodes.indexOf(month.toLowerCase()) == -1 && month.indexOf(monthCodeDelimiter) == -1) {
				return cInvalidMonth;
			}
		}
	
		if (day == 29) {
			if (year % 4 != 0) {
				return cInvalidDay;
			}
		} else if (day == 31) {
			if (month == 4 || month == 6 || month == 9 || month == 11) {
				return cInvalidDay;
			}
		} else if (day > 31) {
			return cInvalidDay;
		}
	
		return cOK;
	}
}

function isPhoneNumber (s, eok) {
	var i;
	
	s = trim(s);
	
	if (isEmpty(s)) {
		if (isPhoneNumber.arguments.length == 1) {
	   		return defaultEmptyOK;
		}
    	else {
			return (eok == true);
		}
	}
	else {
	
		if (s.length > 14) {
			return false;
		}
		else if (s.length == 14) {
			if (s.charAt(0) == "(" && s.charAt(4) == ")" && s.charAt(5) == " " && s.charAt(9) == "-") {
				for (i = 1; i < s.length; i++) {
					if (!isDigit(s.charAt(i))) {
						if (i != 4 && i != 5 && i != 9) {
							return false;
						}		
					}
				}
			}
			else {
				return false;
			}
		}
		else if (s.length == 13) {
			if (s.charAt(0) == "(" && s.charAt(4) == ")" && s.charAt(8) == "-") {
				for (i = 1; i < s.length; i++) {
					if (!isDigit(s.charAt(i))) {
						if (i != 4 && i != 8) {
							return false;
						}		
					}
				}
			}
			else {
				return false;
			}
		}
		else if (s.length == 12) {
			if (s.charAt(3) == "-" && s.charAt(7) == "-") {
				for (i = 1; i < s.length; i++) {
					if (!isDigit(s.charAt(i))) {
						if (i != 3 && i != 7) {
							return false;
						}		
					}
				}
			}
			else {
				return false;
			}
		}
		else if (s.length == 10) {
			for (i = 0; i < s.length; i++) {
				if (!isDigit(s.charAt(i))) {
					return false;
				}		
			}
		}
		else {
			return false;
		}
		
		return true;
	}
}

//====================================================== Begin Credit Card Functions ===============================================================//

function isCreditCard(cc, eok) {
	if (isEmpty(cc)) {
		if (isCreditCard.arguments.length == 1) {
	   		return defaultEmptyOK;
		}
    	else {
			return (eok == true);
		}
	}
	else {
		
		cc = trim(cc);
		
		if (!isValidCCNum(cc)) {
			return false;
		}
	  
		if (!isMasterCard(cc) && !isVisa(cc) && !isAmericanExpress(cc) && !isDinersClub(cc) && !isDiscover(cc) && !isEnRoute(cc) && !isJCB(cc)) {
		    return false;
		}
		
		return true;
	}
}


function isValidCCNum(st) {
  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);

}

function isVisa(cc)
{
  if (((cc.length == 16) || (cc.length == 13)) &&
      (cc.substring(0,1) == 4))
    return isValidCCNum(cc);
  return false;
}

function isMasterCard(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 16) && (firstdig == 5) &&
      ((seconddig >= 1) && (seconddig <= 5)))
    return isValidCCNum(cc);
  return false;

}

function isAmericanExpress(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 15) && (firstdig == 3) &&
      ((seconddig == 4) || (seconddig == 7)))
    return isValidCCNum(cc);
  return false;

}

function isDinersClub(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 14) && (firstdig == 3) &&
      ((seconddig == 0) || (seconddig == 6) || (seconddig == 8)))
    return isValidCCNum(cc);
  return false;
}

function isCarteBlanche(cc)
{
  return isDinersClub(cc);
}

function isDiscover(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 16) && (first4digs == "6011"))
    return isValidCCNum(cc);
  return false;

}

function isEnRoute(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 15) &&
      ((first4digs == "2014") ||
       (first4digs == "2149")))
    return isValidCCNum(cc);
  return false;
}

function isJCB(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 16) &&
      ((first4digs == "3088") ||
       (first4digs == "3096") ||
       (first4digs == "3112") ||
       (first4digs == "3158") ||
       (first4digs == "3337") ||
       (first4digs == "3528")))
    return isValidCCNum(cc);
  return false;

}

//====================================================== End Credit Card Functions ===============================================================//

function trim (s) {
	var i = 0;
	var emptyString = " ";
	
	while ((i < s.length) && (whitespace.indexOf(s.charAt(i)) != -1)) {
   		i++;
	}
	s = s.substring (i, s.length);
	
	i = s.length - 1;

	while ((i >= 0) && (whitespace.indexOf(s.charAt(i)) != -1)) {
		i--;
	}
	s = s.substring (0, i + 1);   
	
    return s;
}