// Traveller Javascript utility functions

//
//	Multi-browser attach function
//
attach = document.getElementById ?
	        function (id) { return document.getElementById(id); } :
	        document.all ?
	            function (id) { return document.all[id]; } :
	            document.layers ?
	                function (id) { return document.layers[id]; } :
	                function (id) { return null; }

function findPosX(obj)
{
	var curleft = 0;
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			curleft += obj.offsetLeft
			obj = obj.offsetParent;
		}
	}
	else if (obj.x)
		curleft += obj.x;
	return curleft;
}

function findPosY(obj)
{
	var curtop = 0;
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			curtop += obj.offsetTop
			obj = obj.offsetParent;
		}
	}
	else if (obj.y)
		curtop += obj.y;
	return curtop;
}

	
	function selectKeyBS(objSelect) 
	{
		return  function() 
		        {
			        if (event.keyCode == 8) 
			        {
				        return selectKey(objSelect)();
			        } 
			        else if ((event.keyCode == 38) || (event.keyCode == 40)) 
			        {
				        // Clear original index to prevent onchange event firing
				        objSelect.setAttribute("originalIndex",null);
				        clearKeyTip(objSelect);
				        return true;
			        }
			        return true;
		        };
	}
	
	function clearKeyTip(objSelect) 
	{
		// Wipe on arrow key presses, as these change index
		objSelect.setAttribute("keybuffer","");
		var tooltip;
		var tooltipID;
		var iframe;
		if (((tooltipID = objSelect.getAttribute("tooltipDIVID")) != null) &&
			(tooltipID != "") &&
			((tooltip = attach(tooltipID)) != null) &&
			(tooltip.tagName == "DIV") &&
			(tooltip.className == "tooltip")) 
		{
			// Remove tooltip
			objSelect.document.body.removeChild(tooltip);
			objSelect.setAttribute("tooltipDIVID","");
			if ((iframe=attach("IF"+tooltipID))!=null) 
			{
				objSelect.document.body.removeChild(iframe);
			}
		}
	}

	function selectKey(objSelect) // keydown event for select boxes
	{       
		return  function() 
		        {
			        var buffer;
			        var keycount;
			        // Get key buffer
			        if ((buffer = objSelect.getAttribute("keybuffer")) == null) buffer="";
			        // Get key counter
			        if (((keycount = objSelect.getAttribute("keycount")) == null) ||
				        ((keycount = parseInt(keycount)) == NaN)) 
				    {
				        keycount=0;
				        objSelect.setAttribute("keycount",0);
			        }
			
			        if ((event.keyCode >= 32 && event.keyCode <= 127) ||
				        (event.keyCode == 8 && buffer.length > 0)) 
				    {
				        var originalIndex;
				        if (((originalIndex = objSelect.getAttribute("originalIndex")) == null) ||
					        ((originalIndex = parseInt(originalIndex)) == NaN)) 
					    {
					        originalIndex=objSelect.selectedIndex;
					        objSelect.setAttribute("originalIndex",originalIndex);
				        }
				        keycount++;
				        objSelect.setAttribute("keycount",keycount);
				        var tooltip;
				        var iframe;
				        var tooltipID;
				        var matches=null;
				        var matchCount=0;
				        var objY=findPosY(objSelect);
				        var maxitems=Math.floor((objY+objSelect.offsetHeight)/14-2);
				
				        if (maxitems > 10) maxitems=10;
				        else if (maxitems < 1) maxitems=0; // In this case we don't show the tooltip
							
				        // Get tooltip
				        if ((maxitems>0) &&
					        (((tooltipID = objSelect.getAttribute("tooltipDIVID")) == null) ||
					        (tooltipID == "") ||
					        ((tooltip = attach(tooltipID)) == null) ||
					        ((iframe = attach("IF"+tooltipID)) == null) ||
					        (tooltip.tagName != "DIV") ||
					        (tooltip.className != "tooltip"))) 
					    {
					        // Create new tooltipID
					        tooltipID = "selectKeyTooltip" + selectKeyTooltipCnt;
					        selectKeyTooltipCnt++;
					        // IE HACK:
					        // Divs will not appear above select boxes, etc, but you can
					        // add an iframe below it to overcome this!
					        iframe = document.createElement("iframe");
					        iframe.display="none";
					        iframe.setAttribute("id", "IF"+tooltipID);
					        iframe.className="tooltip";
					        // Create new tooltip
					        tooltip = document.createElement("div");
					        tooltip.className = "tooltip";
					        tooltip.setAttribute("id", tooltipID);
					        objSelect.setAttribute("tooltipDIVID", tooltipID);
					        tooltip.style.left=findPosX(objSelect)+4;
					        iframe.style.left=tooltip.style.left;
					        objSelect.document.body.appendChild(iframe);
					        objSelect.document.body.appendChild(tooltip);
				        }
				        if (event.keyCode == 8) 
				        {
					        buffer = buffer.substr(0,buffer.length-1);
				        } 
				        else 
				        {
					        buffer = buffer+String.fromCharCode(event.keyCode).toUpperCase();
				        }
				        objSelect.setAttribute("keybuffer", buffer);
				        if (buffer.length==0) 
				        {
					        if (maxitems>0) 
					        {
						        objSelect.document.body.removeChild(tooltip);
						        objSelect.setAttribute("tooltipDIVID","");
						        objSelect.document.body.removeChild(iframe);
					        }
					        return false;
				        }
				        
				        setTimeout(clearBuffer(objSelect, keycount), 1500);  // clear input buffer after 1 second if unchanged
				        for (idx = 0 ; idx < objSelect.length ; idx++) 
				        {
					        if (objSelect.options(idx).text.toUpperCase().indexOf(buffer) == 0) 
					        {
						        if (matchCount==0) 
						        {
							        if (objSelect.selectedIndex != idx) 
							        {
								        objSelect.selectedIndex = idx;      // switch to first item matching input buffer
							        }
							        if (maxitems<1) break;
							        matches = "<P style='padding:0px;margin:0px;background-color:yellow;'><B>"+
								    objSelect.options(idx).text.substr(0,buffer.length).replace(/\s/g,"_")+"</B>"+
								    objSelect.options(idx).text.substr(buffer.length)+"</P>";
						        } 
						        else if (matchCount < maxitems) 
						        {
							        matches += (matchCount>1?"<BR>":"") +
								    objSelect.options(idx).text.substr(0,buffer.length).replace(/\s/g,"_")+"</B>"+
								    objSelect.options(idx).text.substr(buffer.length);
						        }
						        matchCount++;
					        }
				        }
				        if (maxitems>0) 
				        {
					        if (matchCount == 1) 
					        {
						        tooltip.style.backgroundColor="lightgreen";
						        matches="<U>Matched</U><BR>"+matches
					        } 
					        else if (matchCount == 0) 
					        {
						        tooltip.style.backgroundColor="pink";
						        matches="<U>No Match!</U><BR>"+buffer.toLowerCase().replace(/\s/g,"_")+
							    "<BR>nearest:<I>"+objSelect.options(objSelect.selectedIndex).text+"</I>";
					        } 
					        else 
					        {
						        tooltip.style.backgroundColor="lightyellow";
						        matches="<U>Matches</U><BR>"+matches+
							    (maxitems>1?"<BR>":"") +
							    (matchCount > maxitems?"<I>... ("+matchCount+" matches)<I>":"");
					        }
					        tooltip.innerHTML = matches
					        var ttop=objY-tooltip.offsetHeight;
					        if (ttop<0) ttop=0;
					        if (ttop>document.body.offsetHeight-tooltip.offsetHeigh-2) ttop=document.body.offsetHeight-tooltip.offsetHeigh-2;
					        tooltip.style.top=ttop;
					        iframe.style.top=ttop;
					        iframe.width=tooltip.offsetWidth;
					        iframe.height=tooltip.offsetHeight;
				        }
				        return false;
			        }
			        return false;
			
			        function clearBuffer(objSelect, count) 
			        {
				        // Must return a function which uses the object reference passed in
				        return  (function() 
				                {
					                var keycount;
					                var originalIndex;
					                if (((keycount = objSelect.getAttribute("keycount")) != null) &&
						                ((keycount = parseInt(keycount)) != NaN) &&
						                (count==keycount)) 
						            {
				                        // no keypresses so wipe
				                        clearKeyTip(objSelect);
				                        if (((originalIndex = objSelect.getAttribute("originalIndex")) != null) &&
					                        ((originalIndex = parseInt(originalIndex)) != NaN) &&
					                        (originalIndex != objSelect.selectedIndex)) 
					                    {
					                        // HACK: Have to blur before firing onchange to prevent IE crashes
					                        objSelect.blur();
					                        objSelect.fireEvent("onchange");
					                        // Only give the focus back if it had it originally...
					                        if (objSelect.getAttribute("hasfocus")=="true")
						                        objSelect.focus();
						                }
					                }
				                }
				                );
			        }
		        }
	};


//
//				DATE FUNCTIONS
//
// ------------------------------------------------------------------
// These functions use 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)
//              | NNN (abbr.)        |
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Day of Week  | EE (name)          | E (abbr)
// 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                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// 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"
// ------------------------------------------------------------------

var MONTH_NAMES=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');
var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
function LZ(x) {return(x<0||x>9?"":"0")+x}

function describeDuration(secs, abbrev) {
	var str='';
	if (secs > 604800) {
		str=Math.floor(secs/604800).toString() + (!abbrev?' week' + (secs>1209599?'s':''):'w');
		secs=secs%604800;
	}
	if ((secs > 86400) || (str.length>0)) {
		str+=(!abbrev&&str.length>0?' ':'')+Math.floor(secs/86400).toString() + (!abbrev?' day' + (secs>172799?'s':''):'d');
		secs=secs%86400;
	}
	if ((secs > 3600) || (str.length>0)) {
		str+=(!abbrev&&str.length>0?' ':'')+Math.floor(secs/3600).toString() + (!abbrev?' hour' + (secs>7199?'s':''):'h');
		secs=secs%3600;
	}
	if ((secs > 60) || (str.length>0)) {
		str+=(!abbrev&&str.length>0?' ':'')+Math.floor(secs/60).toString() + (!abbrev?' minute' + (secs>119?'s':''):'m');
		secs=secs%60;
	}
	str+=(!abbrev&&str.length>0?' ':'')+secs.toString() + (!abbrev?' second' + (secs>1?'s':''):'s');
	return str;
}

// ------------------------------------------------------------------
// isDate ( 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 isDate(val,format) {
	var date=getDateFromFormat(val,format);
	if (date==0) { return false; }
	return true;
	}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2) {
	var d1=getDateFromFormat(date1,dateformat1);
	var d2=getDateFromFormat(date2,dateformat2);
	if (d1==0 || d2==0) {
		return -1;
		}
	else if (d1 > d2) {
		return 1;
		}
	return 0;
	}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format) {
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getYear()+"";
	var M=date.getMonth()+1;
	var dtDate=date.getDate();
	var E=date.getDay();
	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;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["NNN"]=MONTH_NAMES[M+11];
	value["d"]=dtDate;
	value["dd"]=LZ(dtDate);
	value["E"]=DAY_NAMES[E+7];
	value["EE"]=DAY_NAMES[E];
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}
	
// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
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 (var 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;
	}
	
// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the 
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(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=1;
	var hh=0;//now.getHours();
	var mm=0;//now.getMinutes();
	var ss=0;//now.getSeconds();
	var 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++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			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"||token=="NNN"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					if (token=="MMM"||(token=="NNN"&&i>11)) {
						month=i+1;
						if (month>12) { month -= 12; }
						i_val += month_name.length;
						break;
						}
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="EE"||token=="E"){
			for (var i=0; i<DAY_NAMES.length; i++) {
				var day_name=DAY_NAMES[i];
				if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()) {
					i_val += day_name.length;
					break;
					}
				}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(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;}
			i_val+=2;}
		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 (date > lastDate(month, year)) { return 0; }
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh=hh-0+12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
	}

function lastDate(month, year) {
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			return 29;
		} else { return 28; }
	}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		return 30;
	}
	return 31;
}
	

// ------------------------------------------------------------------
// parseDate( date_string, fmt, end)
//
// This function takes a date string and tries to match it to a
// number of possible date formats to get the value.  It either
// rounds up or down depending on end, and then reformats the string
// based on the fmt string
// ------------------------------------------------------------------
function parseDateTime(val, fmt, end) {
	var checkList=new Array(
		'd/M/y', 'd/M/y H:m', 'd/M/y H:m:s',
		'd-M-y', 'd-M-y H:m', 'd-M-y H:m:s',
		'y/M/d', 'y/M/d H:m', 'y/M/d H:m:s',
		'y-M-d', 'y-M-d H:m', 'y-M-d H:m:s',
		'MMM',
		'd MMM y', 'd MMM y H:m', 'd MMM y H:m:s',
		'MMM d, y', 'MMM d, y H:m', 'MMM d, y H:m:s',
		'MMM d,y', 'MMM d,y H:m', 'MMM d,y H:m:s',
		'd-MMM-y', 'd-MMM-y H:m', 'd-MMM-y H:m:s',
		'd MMM', 'd MMM H:m', 'd MMM H:m:s',
		'MMM d', 'MMM d H:m', 'MMM d H:m:s');
	var dtDate=null;
	for (var i=0; i<checkList.length; i++) {
		dtDate=getDateFromFormat(val,checkList[i]);
		if (dtDate!=0) {
			dtDate=new Date(dtDate);
			dtDate.setMilliseconds(0);
			dtDate.setSeconds(0);
			if (checkList[i].indexOf('H') < 0) {
				if (end) {
					dtDate.setHours(23);
					dtDate.setMinutes(59);
				} else {
					dtDate.setHours(0);
					dtDate.setMinutes(0);
				}
			} 
			if (checkList[i].indexOf('d') < 0) {
				if (end) {
					dtDate.setDate(lastDate(dtDate.getMonth()+1,dtDate.getFullYear()));
				} else {
					dtDate.setDate(1);
				}
			}
			return formatDate(dtDate, fmt);
		}
	}
	return null;
}

// Adds a function to onload event for body
function addOnLoad(func) {
	/* setup onload function */
	if(typeof window.addEventListener != 'undefined')
	{
		/* .. gecko, safari, konqueror and standard */
		window.addEventListener('load', func, false);
	}
	else if(typeof document.addEventListener != 'undefined')
	{
		/* .. opera 7 */
		document.addEventListener('load', func, false);
	}
	else if(typeof window.attachEvent != 'undefined')
	{
		/* .. win/ie */
		window.attachEvent('onload', func);
	}
	/* ** remove this condition to degrade older browsers */
	else
	{
		/* .. mac/ie5 and anything else that gets this far */
		
		/* if there's an existing onload function */
		if(typeof window.onload == 'function')
		{
			/* store it */
			var existing = onload;
			
			/* add new onload handler */
			window.onload = function()
			{
				/* call existing onload function */
				existing();
				
				/* call generic onload function */
				func();
			};
		}
		else
		{
			/* setup onload function */
			window.onload = func;
		}
	}
}