/*----------------------------------------------------------------------------------

 File            : XLibrary.js

 Use             : Library of JavaScript functions for general use

 Description     : Date manipulation routines.

 Functions		 :
 					function DateFormat( s, format_string )
					function IsStringDate(val,format)
					function String2Date(val,format)
					function Date2String(date,format)

 Dependants      : CharterRequest.js

 Depends On      : none

 Modfications    : 2002/01/15 JPE Created (routines downloaded from 'net
 				                  and modified very slightly.

-------------------------------------------------------------------------------------*/

//global constants;
DATE_FORMAT 				= "yyyy/MM/dd";
DATE_BLANK					= "yyyy/MM/dd";
TIME_FORMAT					= "HH:mm";
TIME_BLANK					= "HH:mm";
TBA_FORMAT					= "TBA";   //if there is a null string in a date/time field it is "To Be Announced"
TBA_DATE					= -9999;

//global constant arrays
var FORMAT_YEAR				= new Array("yyyy", "yy");
var FORMAT_MONTH			= new Array("MM", "M", "MMM");
var FORMAT_DAY				= new Array("dd", "d");
var FORMAT_HOUR				= new Array("HH", "H");
var FORMAT_MINUTE			= new Array("mm", "m");

var MONTHNAMES  			= new Array('January','February','March','April','May',
										'June','July','August','September','October',
										'November','December','Jan','Feb','Mar','Apr',
										'May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');



//  Description: return a formatted date string; return TBA_FORMAT if s is blank or TBA_FORMAT;
//  Arguments:   a date in ANY format, ooutput format string; (see String2Date()for details)
//  Examples:    DateFormat("Jan 6","yyyy/MM/dd") returns "2002/01/06; DateFormat("","yyyy/MM/dd") returns "TBA"
function DateFormat(s,f) {
	var delimiter_set = new Array("/", "\\", " ", "");
	var y,m,d,x;
	var format_candidate = new Array(5)
	//if the user has not entered anything (i.e. s = the format string) return TBA
	if (s==f) {
		return TBA_FORMAT;
	}
	for (y=0; y < FORMAT_YEAR.length; y++) {
		for (m=0; m < FORMAT_MONTH.length; m++) {
			for (d=0; d < FORMAT_DAY.length; d++) {
				for (x=0; x < delimiter_set.length; x++) {
					format_candidate[0] = FORMAT_YEAR[y]  + delimiter_set[x] + FORMAT_MONTH[m] + delimiter_set[x] + FORMAT_DAY[d];
					format_candidate[1] = FORMAT_YEAR[y]  + delimiter_set[x] + FORMAT_DAY[d]   + delimiter_set[x] + FORMAT_MONTH[m];
					format_candidate[2] = FORMAT_MONTH[m] + delimiter_set[x] + FORMAT_DAY[d]   + delimiter_set[x] + FORMAT_YEAR[y];
					format_candidate[3] = FORMAT_DAY[d]   + delimiter_set[x] + FORMAT_MONTH[m] + delimiter_set[x] + FORMAT_YEAR[y];
					format_candidate[4] = FORMAT_MONTH[m] + delimiter_set[x] + FORMAT_DAY[d];
					for (k=0; k < format_candidate.length; k++)	{
						if (IsStringDate(s, format_candidate[k])) {
							return Date2String( String2Date(s, format_candidate[k]),f);
						}
					}
				}
			}
		}
	}
	return s;
}




//  Description:  return a formatted time string; return TBA_FORMAT if s is blank or TBA_FORMAT;
//  Arguments:    a date in ANY format, output format string; (see String2Date()for details)
function TimeFormat(s,f) {
	var delimiter_set = new Array(":", " ", "");
	var h,m,x;
	var format_candidate;
	var sout;
	//if the user has not entered anything (i.e. s = the format string) return TBA
	if (s==f) {
		return TBA_FORMAT;
	}
	//add a zero to 3 digit times
	if (s.length == 3 && _isInteger(s)) {
		sout = "0" + s;
	} else {
		sout = s;
	}
	for (h=0; h < FORMAT_HOUR.length; h++) {
		for (m=0; m < FORMAT_MINUTE.length; m++) {
			for (x=0; x < delimiter_set.length; x++) {
				format_candidate = FORMAT_HOUR[h] + delimiter_set[x] + FORMAT_MINUTE[m];
				if (IsStringDate(sout, format_candidate)) {
					return Date2String( String2Date(sout, format_candidate),f);
				}
			}
		}
	}
	return s;
}




// ===================================================================
// Author: Matt Kruse <mkruse@netexpress.net>
// WWW: http://www.mattkruse.com/
//
// NOTICE: You may use this code for any purpose, commercial or
// private, without any further permission from the author. You may
// remove this notice from your final code if you wish, however it is
// appreciated by the author if at least my web site address is kept.
//
// You may *NOT* re-distribute this code in any way except through its
// use. That means, you can include it in your product, or your web
// site, or any other form where the code is actually being used. You
// may not put the plain javascript up on your site for download or
// include it in your javascript libraries for download. Instead,
// please just point to my URL to ensure the most up-to-date versions
// of the files. Thanks.
// ===================================================================

// ------------------------------------------------------------------
// IsStringDate ( date_string, format_string )
//
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
//
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function IsStringDate(val,format) {
	var date = String2Date(val,format);
	if (date == 0) {
		return false;
	} else {
		return true;
	}
}


// ------------------------------------------------------------------
// Date2String (date_object, format)
//
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in String2Date()
// ------------------------------------------------------------------
function Date2String(date,format) {
	format = format+"";
	var result = "";
	var i_format = 0;
	var c = "";
	var token = "";
	if (date == TBA_DATE) {
		return TBA_FORMAT
	}
	var y = date.getYear()+"";
	var M = date.getMonth()+1;
	var d = date.getDate();
	var H = date.getHours();
	var m = date.getMinutes();
	var s = date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
	//if the date is TBA_DATE
	// Convert real date parts into formatted versions
	// Year
	if (y.length < 4) {
		y = y-0+1900;
		}
	y = ""+y;
	yyyy = y;
	yy = y.substring(2,4);
	// Month
	if (M < 10) { MM = "0"+M; }
		else { MM = M; }
	MMM = MONTHNAMES[M-1];
	// Date
	if (d < 10) { dd = "0"+d; }
		else { dd = d; }
	// Hour
	h=H+1;
	K=H;
	k=H+1;
	if (h > 12) { h-=12; }
	if (h == 0) { h=12; }
	if (h < 10) { hh = "0"+h; }
		else { hh = h; }
	if (H < 10) { HH = "0"+K; }
		else { HH = H; }
	if (K > 11) { K-=12; }
	if (K < 10) { KK = "0"+K; }
		else { KK = K; }
	if (k < 10) { kk = "0"+k; }
		else { kk = k; }
	// AM/PM
	if (H > 11) { ampm="PM"; }
	else { ampm="AM"; }
	// Minute
	if (m < 10) { mm = "0"+m; }
		else { mm = m; }
	// Second
	if (s < 10) { ss = "0"+s; }
		else { ss = s; }
	// Now put them all into an object!
	var value = new Object();
	value["yyyy"] = yyyy;
	value["yy"] = yy;
	value["y"] = y;
	value["MMM"] = MMM;
	value["MM"] = MM;
	value["M"] = M;
	value["dd"] = dd;
	value["d"] = d;
	value["hh"] = hh;
	value["h"] = h;
	value["HH"] = HH;
	value["H"] = H;
	value["KK"] = KK;
	value["K"] = K;
	value["kk"] = kk;
	value["k"] = k;
	value["mm"] = mm;
	value["m"] = m;
	value["ss"] = ss;
	value["s"] = s;
	value["a"] = ampm;
	while (i_format < format.length) {
		// Get next token from format string
		c = format.charAt(i_format);
		token = "";
		while ((format.charAt(i_format) == c) && (i_format < format.length)) {
			token += format.charAt(i_format);
			i_format++;
			}
		if (value[token] != null) {
			result = result + value[token];
			}
		else {
			result = result + token;
			}
		}
	return result;
	}


// ------------------------------------------------------------------
// Utility functions for parsing in String2Date()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits = "1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i)) == -1) { return false; }
		}
	return true;
	}
function _getInt(str,i,minlength,maxlength) {
	for (x=maxlength; x>=minlength; x--) {
		var token = str.substring(i,i+x);
		if (token.length < minlength) {
			return null;
			}
		if (_isInteger(token)) {
			return token;
			}
		}
	return null;
	}
// ------------------------------------------------------------------
// END Utility Functions
// ------------------------------------------------------------------

// ------------------------------------------------------------------
// String2Date( date_string , format_string )
//
// This function takes a date string and a format string.
// If the date string matches the format string, it returns the
// getTime() of the date. If it does not match, it returns 0.
//
// This function uses the same format strings as the
// java.text.SimpleDateFormat class, with minor exceptions.
//
// The format string consists of the following abbreviations:
//
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "m/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------
function String2Date(val,format) {
	val = val+"";
	format = format+"";
	var i_val = 0;
	var i_format = 0;
	var c = "";
	var token = "";
	var token2= "";
	var x,y;
	var now   = new Date();
	var year  = now.getYear();
	var month = now.getMonth()+1;
	var date  = now.getDate();
	var hh    = now.getHours();
	var mm    = now.getMinutes();
	var ss    = now.getSeconds();
	var ampm  = "";
	if (IsStringNull(val)
	||  val == TBA_FORMAT) {
		return TBA_DATE
	}
	while (i_format < format.length) {
		// Get next token from format string
		c = format.charAt(i_format);
		token = "";
		while ((format.charAt(i_format) == c) && (i_format < format.length)) {
			token += format.charAt(i_format);
			i_format++;
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }// 4-digit year
			if (token=="yy")   { x=2;y=2; }// 2-digit year
			if (token=="y")    { x=2;y=4; }// 2-or-4-digit year
			year = _getInt(val,i_val,x,y);
			if (year == null) { return 0; }
			i_val += year.length;
			if (year.length == 2) {
				if (year > 70) {
					year = 1900+(year-0);
					}
				else {
					year = 2000+(year-0);
					}
				}
			}
		else if (token=="MMM"){// Month name
			month = 0;
			for (var i=0; i<MONTHNAMES.length; i++) {
				var month_name = MONTHNAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase() == month_name.toLowerCase()) {
					month = i+1;
					if (month>12) { month -= 12; }
					i_val += month_name.length;
					break;
					}
				}
			if (month == 0) { return 0; }
			if ((month < 1) || (month>12)) { return 0; }
			// TODO: Process Month Name
			}
		else if (token=="MM" || token=="M") {
			x=token.length; y=2;
			month = _getInt(val,i_val,x,y);
			if (month == null) { return 0; }
			if ((month < 1) || (month > 12)) { return 0; }
			i_val += month.length;
			}
		else if (token=="dd" || token=="d") {
			x=token.length; y=2;
			date = _getInt(val,i_val,x,y);
			if (date == null) { return 0; }
			if ((date < 1) || (date>31)) { return 0; }
			i_val += date.length;
			}
		else if (token=="hh" || token=="h") {
			x=token.length; y=2;
			hh = _getInt(val,i_val,x,y);
			if (hh == null) { return 0; }
			if ((hh < 1) || (hh > 12)) { return 0; }
			i_val += hh.length;
			hh--;
			}
		else if (token=="HH" || token=="H") {
			x=token.length; y=2;
			hh = _getInt(val,i_val,x,y);
			if (hh == null) { return 0; }
			if ((hh < 0) || (hh > 23)) { return 0; }
			i_val += hh.length;
			}
		else if (token=="KK" || token=="K") {
			x=token.length; y=2;
			hh = _getInt(val,i_val,x,y);
			if (hh == null) { return 0; }
			if ((hh < 0) || (hh > 11)) { return 0; }
			i_val += hh.length;
			}
		else if (token=="kk" || token=="k") {
			x=token.length; y=2;
			hh = _getInt(val,i_val,x,y);
			if (hh == null) { return 0; }
			if ((hh < 1) || (hh > 24)) { return 0; }
			i_val += hh.length;
			h--;
			}
		else if (token=="mm" || token=="m") {
			x=token.length; y=2;
			mm = _getInt(val,i_val,x,y);
			if (mm == null) { return 0; }
			if ((mm < 0) || (mm > 59)) { return 0; }
			i_val += mm.length;
			}
		else if (token=="ss" || token=="s") {
			x=token.length; y=2;
			ss = _getInt(val,i_val,x,y);
			if (ss == null) { return 0; }
			if ((ss < 0) || (ss > 59)) { return 0; }
			i_val += ss.length;
			}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase() == "am") {
				ampm = "AM";
				}
			else if (val.substring(i_val,i_val+2).toLowerCase() == "pm") {
				ampm = "PM";
				}
			else {
				return 0;
				}
			}
		else {
			if (val.substring(i_val,i_val+token.length) != token) {
				return 0;
				}
			else {
				i_val += token.length;
				}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) {
		return 0;
		}
	// Is date valid for month?
	if (month == 2) {
		// Check for leap year
		if ( ( (year%4 == 0)&&(year%100 != 0) ) || (year%400 == 0) ) { // leap year
			if (date > 29){ return false; }
			}
		else {
			if (date > 28) { return false; }
			}
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return false; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") {
		hh+=12;
		}
	else if (hh>11 && ampm=="AM") {
		hh-=12;
		}
	var newdate = new Date(year,month-1,date,hh,mm,ss);
//	return newdate.getTime();
	return newdate;
	}