/* --- Swazz Javascript Calendar ---
/* --- v 1.0 3rd November 2006
By Oliver Bryant
http://calendar.swazz.org */

Date.prototype.getWeek = function() {
	var year = this.getFullYear();
	var newYear = new Date(year,0,1);
	var modDay = newYear.getDay();
	if (modDay == 0) modDay=6; else modDay--;
	var daynum = ((Date.UTC(year,this.getMonth(),this.getDate(),0,0,0) - Date.UTC(year,0,1,0,0,0)) /1000/60/60/24) + 1;

	if (modDay < 4 ) {
		var weeknum = Math.floor((daynum+modDay-1)/7)+1;
	} else {
		var weeknum = Math.floor((daynum+modDay-1)/7);
		if (weeknum == 0) {
			year--;
			var prevNewYear = new Date(year,0,1);
			var prevmodDay = prevNewYear.getDay();
			if (prevmodDay == 0) prevmodDay = 6; else prevmodDay--;
			if (prevmodDay < 4) weeknum = 53; else weeknum = 52;
		}
	}

	return + weeknum;
};

var swazz = {
	// Calendar script
	now: null,
	sccm: null,
	sccy: null,
	ccm: null,
	ccy: null,
	updobj: null,
	left: null,
	top: null,
	mnn: null,
	mnl: null,
	calvalarr: null,
	valobjarr: null,
	delay: null,
	minDayDiff: null,
	printWeek: null,
	dy: null,
	mn: null,
	g_PopupIFrame: null,
	activeCal: null,

	init: function() {
		this.now = new Date;
		this.sccm = this.now.getMonth();
		this.sccy = this.now.getFullYear();
		this.ccm = this.now.getMonth();
		this.ccy = this.now.getFullYear();
		this.updobj = new Array(2);
		this.updobj[0] = new Array(2);
		this.updobj[1] = new Array(2);

		/* THESE should already be set!! if not define default values */
		this.delay = window.delay?delay:3;
		this.minDayDiff = window.minDayDiff?minDayDiff:0;
		this.tripLength = window.tripLength?tripLength:7;
		this.printWeek = window.printWeek?printWeek:false;
		this.yoffset = window.yoffset?yoffset:0;
		this.dy = window.dy?dy:new Array('M', 'T', 'W', 'T', 'F', 'S', 'S');
		this.mn = window.mn?mn:new Array('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');

		this.mnn = new Array('31','28','31','30','31','30','31','31','30','31','30','31');
		this.mnl = new Array('31','29','31','30','31','30','31','31','30','31','30','31');
		this.calvalarr = new Array(42);
		this.calobjarr = new Array(42);
		this.weekobjarr = new Array(6);

		document.write('<table id="fc" class="fc_container" style="display:none">');
		document.write('<tr><td class="fc_container_td">');
		document.write('<table class="fc"><tr>');
		if ( this.printWeek ) document.write('<td class="fc_element fc_week_title"  onclick="swazz.csubm()">&nbsp;</td>');
		document.write('<td class="fc_element fc_title" onclick="swazz.csubm()"><div class="fc_element fc_subm"></div></td><td id="mns" class="fc_element fc_title" colspan=5 align="center"></td><td class="fc_element fc_title" align="right" onclick="swazz.caddm()"><div class="fc_element fc_addm"></div></td></tr><tr>');
		if ( this.printWeek ) document.write('<td class="fc_element fc_week_dayOfWeek">&nbsp;</td>');
		document.write('<td class="fc_element fc_dayOfWeek">'+this.dy[0]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[1]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[2]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[3]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[4]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[5]+'</td><td class="fc_element fc_dayOfWeek">'+this.dy[6]+'</td></tr>');

		for(var kk=1;kk<=6;kk++) {
			document.write('<tr>');
			if ( this.printWeek ) document.write('<td id="w' + kk + '" class="fc_element fc_weekNo">.</td>');
			for(var tt=1;tt<=7;tt++) {
				num=7 * (kk-1) - (-tt);
				document.write('<td id="v' + num + '" class="fc_element">&nbsp;</td>');
				this.calobjarr[num] = this.getObj("v"+num);
			}
			document.write('</tr>');
		}
		document.write('</table>');
		document.write('</td></tr>');
		document.write('</table>');

		var ptr = this;
		var chkClick = function(ev) { ptr.checkClick(ev, ptr)  };
		document.all?document.attachEvent('onclick',chkClick):document.addEventListener('click',chkClick,false);
		//this.prepcalendar('',this.ccm,this.ccy);
	}, 

	// day selected
	prepcalendar: function(hd,cm,cy) {
		var cd, sd, td, htd, dip, obj, marr;
		var calNo = this.activeCal;
		this.now=new Date();
		sd = this.now.getDate(); // sd = now
		td = new Date();
		td.setDate(1);
		td.setFullYear(cy);
		td.setMonth(cm);
		cd=(td.getDay()+6) % 7; // shift so monday is first day, not sunday
		this.getObj('mns').innerHTML=this.mn[cm]+ ' ' + cy;
		marr=((cy%4)==0)?this.mnl:this.mnn;

		if ( this.printWeek ) {
			var weekNo = td.getWeek();
			for (var d=1;d<7;d++) {
				if (this.weekobjarr[d] == null) {
					this.weekobjarr[d] = document.getElementById("w"+d);
				}
				this.weekobjarr[d].innerHTML = weekNo + d - 1;
			}
		}

		for(var d=1;d<=42;d++) { // d = counter (1-42)
			obj = this.calobjarr[d];
			if ((d >= (cd -(-1))) && (d<=cd-(-marr[cm]))) {
				obj.innerHTML=d-cd;
				this.calvalarr[d]=''+(d-cd)+'/'+(cm-(-1))+'/'+cy;
			} else {
				obj.innerHTML='&nbsp;';
				this.calvalarr[d]='';
			}
			this.setCss(obj, this);
		}
	},

	setCss: function(obj, ptr) {
		var ptr = this;
		var click0 = function(ev) { ptr.cs_click0(ev, ptr) };
		var click1 = function(ev) { ptr.cs_click1(ev, ptr) };
		var cs_over = function(ev) { ptr.cs_over(ev, ptr) };
		var cs_out = function(ev) { ptr.cs_out(ev, ptr) };

		var calNo = ptr.activeCal;

		var date1 = ptr.getElementDate(0, ptr);
		var date2 = ptr.getElementDate(1, ptr);

		var strDate = ptr.calvalarr[obj.id.substring(1,obj.id.length)];
		var arrDate = strDate.split('/');

		var date = new Date((new Date).getFullYear(), (new Date).getMonth(), (new Date).getDate());
		date.setFullYear(arrDate[2], (arrDate[1] - 1), arrDate[0]);

		var datetemp = new Date((new Date).getFullYear(), (new Date).getMonth(), ((new Date).getDate() + this.delay));
		datetemp.setFullYear((new Date).getFullYear(), (new Date).getMonth(), ((new Date).getDate() + this.delay));

		if ( calNo == 0 ) {
			obj.onclick = click0;
		} else {
			obj.onclick = click1;
		}
		obj.onmouseover = cs_over;
		obj.onmouseout = cs_out;
		if ( date < datetemp ) {
			obj.onclick = null;
			obj.onmouseover=null;
			obj.onmouseout=null;
			obj.className = 'fc_element fc_datePast';
		} else if (date.getDate() == date1.getDate() && date.getMonth() == date1.getMonth() && date.getFullYear == date1.getFullYear) {
			obj.className = 'fc_element fc_date1';
		} else if (date.getDate() == date2.getDate() && date.getMonth() == date2.getMonth() && date.getFullYear == date2.getFullYear) {
			obj.className = 'fc_element fc_date2';
		} else if ( date < date1 ) {
			obj.className = 'fc_element fc_dateBefore';
		} else if ( date > date2 ) {
			obj.className = 'fc_element fc_dateAfter';
		} else {
			obj.className = 'fc_element fc_dateRegular';
		}

		//alert("date1:" + date1 + "\ndate2:" + date2 + "\nstrdate: "+strDate+"\ndate:" + date);
	},

	lcs: function (ielem1, ielem2, calNo) {
		var curdtarr, isdt;
		this.activeCal = calNo;

		if ( this.updobj[0][0] == null ) {
			this.updobj[0][0] = this.getObj(ielem1);
			this.updobj[1][0] = this.getObj(ielem2);
		}

		// First check date is valid
		curdtarr = this.updobj[calNo][0].value.split('/');
		isdt = true;
		for(var k=0;k<curdtarr.length;k++) {
			if (isNaN(curdtarr[k]))
				isdt=false;
		}

	 //use the date from the textbox to fill the calendar
		if (isdt&(curdtarr.length==3)) {
			this.ccm=curdtarr[1]-1;
			this.ccy=curdtarr[2];
			this.prepcalendar(curdtarr[0],curdtarr[1]-1,curdtarr[2]);
		} else {
			this.prepcalendar('',this.ccm, this.ccy);
		}

		this.ShowPopupDiv('fc', this.Left(this.updobj[calNo][0]), this.Top(this.updobj[calNo][0])+this.updobj[calNo][0].offsetHeight);
	},

	// dayDD as dd, monthDD as mm/yy
	ddlcs: function (dayDD1, monthDD1, dayDD2, monthDD2, calNo) {
		var curdtarr;
		if ( this.updobj[0][0] == null ) {
			this.updobj[0][0] = this.getObj(dayDD1);
			this.updobj[0][1] = this.getObj(monthDD1);
			this.updobj[1][0] = this.getObj(dayDD2);
			this.updobj[1][1] = this.getObj(monthDD2);
		}

		this.activeCal = calNo;

		curdtarr=this.updobj[calNo][1].options[this.updobj[calNo][1].selectedIndex].value.split('/');

		if (isNaN(this.updobj[calNo][0].options[this.updobj[calNo][0].selectedIndex].value) == false && isNaN(curdtarr[0]-1) == false && isNaN(curdtarr[1]) == false) {
			this.ccm=curdtarr[0]-1;  //use date from dropdowns 1(3)
			this.ccy=curdtarr[1];  //use date from dropdowns 2(3)
			this.prepcalendar(this.updobj[calNo][0].options[this.updobj[calNo][0].selectedIndex].value,curdtarr[0]-1,curdtarr[1]);  //use date from dropdowns 3(3)
		} else {
			this.prepcalendar('',this.ccm,this.ccy);
		}

		this.ShowPopupDiv('fc', this.Left(this.updobj[calNo][0]), this.Top(this.updobj[calNo][0])+this.updobj[calNo][0].offsetHeight);
	},

	IsIE: function() {
		return ( navigator.appName=="Microsoft Internet Explorer" );
	},
	HidePopupDiv: function(divID) {
		var divPopup;
		divPopup = this.getObj(divID);
		divPopup.style.display = 'none';

		if (this.IsIE() && this.g_PopupIFrame) {
			document.body.removeChild(this.g_PopupIFrame);
			this.g_PopupIFrame = null;
		}
	},
	ShowPopupDiv: function(divID, left, top) {
		var divPopup = this.getObj(divID);
		top = top + this.yoffset;

		divPopup.style.left = left + "px"; 
		divPopup.style.top = top + "px";

		if (!this.IsIE()) {
			//Just display the div
			divPopup.style.display = '';
			return;
		}
		if (this.g_PopupIFrame) {
			this.HidePopupDiv(divID);
		}

		//Increase default zIndex of div by 1, so that DIV appears before IFrame
		divPopup.style.zIndex=divPopup.style.zIndex+1;
		divPopup.style.display = '';

		var iFrame = document.createElement("IFRAME");
		iFrame.setAttribute("src", "");
		//Match IFrame position with divPopup
		iFrame.style.position = "absolute";
		iFrame.style.left = left + 'px';
		iFrame.style.top = top + 'px';
		iFrame.style.width = divPopup.offsetWidth + 'px';
		iFrame.style.height = divPopup.offsetHeight + 'px';

		document.body.appendChild(iFrame);

		//Store iFrame in global variable, so it can get removed when divPopup is hidden 
		this.g_PopupIFrame = iFrame;
		divPopup.style.display = '';
	},

	selectValue: function(val, dd) {
		for (var i = 0; i < dd.length; i++) {
			if ( dd[i].value == val) {
				dd.selectedIndex = i;
				return 1;
			}
		}
		return 0;
	},
	isChild: function(s,d) {
		while(s) {
			if (s==d) 
				return true;
			s=s.parentNode;
		}
		return false;
	},

	caddm: function() {
		marr=((this.ccy%4)==0)?this.mnl:this.mnn;
		this.ccm+=1;
		if (this.ccm>=12) {
			this.ccm=0;
			this.ccy++;
		}
		this.cdayf();
		this.prepcalendar('',this.ccm,this.ccy);
	},
	csubm: function() {
		marr=((this.ccy%4)==0)?this.mnl:this.mnn;    	
		this.ccm-=1;
		if (this.ccm<0) {
			this.ccm=11;
			this.ccy--;
		}
		this.cdayf();
		this.prepcalendar('',this.ccm,this.ccy);
	},
	cdayf: function() {
		if ((this.ccy>this.sccy)|((this.ccy==this.sccy)&&(this.ccm>=this.sccm)))
			return;
		else {
			this.ccy=this.sccy;
			this.ccm=this.sccm;
		}
	},
	Left: function(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;
	},

	Top: function(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;
	}, 
	checkClick: function(e, ptr) {
		var obj = ptr.getObj('fc');
		e?evt=e:evt=event;
		CSE=evt.target?evt.target:evt.srcElement;
		if (obj) {
			if (!ptr.isChild(CSE,obj)){
				ptr.HidePopupDiv('fc');
			}
		}
	},
	cs_over: function(e, ptr) {
		var date = ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];

		if (ptr.evtTgt(ptr.EvtObj(e)).className == 'fc_element fc_dateHighlighted') {
			return;
		} else {
			ptr.evtTgt(ptr.EvtObj(e)).className = 'fc_element fc_mouseOver';
			//ptr.setCss( ptr.evtTgt(ptr.EvtObj(e)), ptr);
		}
	},
	cs_out: function(e, ptr) {
	   var date = ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];

		if (ptr.evtTgt(ptr.EvtObj(e)).className == 'fc_element fc_dateHighlighted') {
			return;
		} else {
			ptr.evtTgt(ptr.EvtObj(e)).className = 'fc_element fc_dateRegular';
			ptr.setCss( ptr.evtTgt(ptr.EvtObj(e)), ptr);
		}
	},
	cs_click0: function(e, ptr) {
		var curdtarr;

		if (ptr.updobj[0][0].length > 3) {
			var date = ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];

			curdtarr=date.split('/');
			ptr.selectValue((curdtarr[0]), ptr.updobj[0][0]);
			ptr.selectValue((curdtarr[1] + "/" + curdtarr[2]), ptr.updobj[0][1]);

		} else {
			ptr.updobj[0][0].value=ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];

		}
		var date1 = ptr.getElementDate(0, ptr)
		var date2 = ptr.getElementDate(1, ptr)
		if (date1 > date2) {
			date1.setDate(date1.getDate()+ptr.tripLength);
			ptr.setElementDate(1, ptr, date1);
		}

		ptr.HidePopupDiv('fc');

		if ( ptr.updobj[0][0].onchange ) {
			ptr.updobj[0][0].onchange();
		}
	},
	cs_click1: function(e, ptr) {
		var curdtarr;

		if (ptr.updobj[1][0].length > 3) {
			var date = ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];

			curdtarr=date.split('/');
			ptr.selectValue((curdtarr[0]), ptr.updobj[1][0]);
			ptr.selectValue((curdtarr[1] + "/" + curdtarr[2]), ptr.updobj[1][1]);
		} else {
			ptr.updobj[1][0].value=ptr.calvalarr[ptr.evtTgt(ptr.EvtObj(e)).id.substring(1,ptr.evtTgt(ptr.EvtObj(e)).id.length)];
		}

		var date1 = ptr.getElementDate(0, ptr)
		var date2 = ptr.getElementDate(1, ptr)
		if (date1 > date2) {
			date2.setDate(date2.getDate() - ptr.tripLength);

			date1 = new Date;
			date1.setDate(date1.getDate() + ptr.delay);
			if (date2 < date1) {
				date2 = date1;
			}
			ptr.setElementDate(0, ptr, date2)
		}

		ptr.HidePopupDiv('fc');

		if ( ptr.updobj[1][0].onchange ) {
			ptr.updobj[1][0].onchange();
		}
	},
	getElementDate: function(cal, ptr) {
		var curdtarr;
		var returnDate = null;

		if (ptr.updobj[1][0].length > 3) {
			curdtarr=ptr.updobj[cal][1].value.split('/');
			returnDate = new Date( curdtarr[1], (curdtarr[0]-1), (parseInt(ptr.updobj[cal][0].value)+parseInt(ptr.minDayDiff)) );
		} else {
			curdtarr=ptr.updobj[cal][0].value.split('/');
			returnDate = new Date( curdtarr[2], (curdtarr[1]-1), curdtarr[0] );
		}
		return returnDate;
	},
	setElementDate: function(cal, ptr, newDate) {
		if (ptr.updobj[cal][0].length > 3) {
			ptr.selectValue(newDate.getDate(), ptr.updobj[cal][0]);
			ptr.selectValue(((newDate.getMonth()+1) + "/" + newDate.getFullYear()), ptr.updobj[cal][1]);
		} else {
			ptr.updobj[cal][0].value = newDate.getDate() + "/" + (newDate.getMonth()+1) + "/" + newDate.getFullYear();
		}
	},

	EvtObj: function(e){
		if(!e)
			e=window.event;
		return e;
	}, 
	evtTgt: function(e)
	{
		var el;
		if(e.target)
			el=e.target;
		else if(e.srcElement)
			el=e.srcElement;
		if(el.nodeType==3)
			el=el.parentNode; // defeat Safari bug
		return el;
	}, 
	getObj: function(objID) {
		if (document.getElementById) {
			return document.getElementById(objID);
		} else if (document.all) {
			return document.all[objID];
		} else if (document.layers) {
			return document.layers[objID];
		}
	}
};

swazz.init();