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

var winW;

function getObj(objID)
{
    if (document.getElementById) {return document.getElementById(objID);}
    else if (document.all) {return document.all[objID];}
    else if (document.layers) {return document.layers[objID];}
}

function grouik(){// :)
	updobj.value="01/"+month+"/"+year;
	getObj('fc').style.display='none';
}

function checkClick(e) {
	e?evt=e:evt=event;
	CSE=evt.target?evt.target:evt.srcElement;
	if (getObj('fc'))
		if (!isChild(CSE,getObj('fc')))
			getObj('fc').style.display='none';
}

function isChild(s,d) {
	while(s) {
		if (s==d) 
			return true;
		  s=s.parentNode;
	}
	return false;
}

function Left(obj)
{
	var curleft = 0;

	switch(navigator.appName){
		case "Microsoft Internet Explorer":
			var maxw=document.body.offsetWidth-140;
			break;

		case "Netscape":
		default:
			var maxw=window.innerWidth-140;
			break;
	
	}
	
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			curleft += obj.offsetLeft
			obj = obj.offsetParent;
		}
	}
	else if (obj.x)
		curleft += obj.x;

	if(curleft>maxw)return maxw;
	return curleft;
}

function Top(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;
}
	
document.write('<table id="fc" style="position:absolute;border-collapse:collapse;background:#FFFFFF;border:1px solid #ABABAB;display:none;z-index:999" WIDTH=140 cellpadding=2>');

document.write('<tr>');
document.write('<td style="cursor:pointer" onclick="csubm()"><img src="gif/arrowleftmonth.gif"></td>');
document.write('<td colspan=5 id="mns" align="center" style="font:bold 13px Arial"></td>');
document.write('<td align="right" style="cursor:pointer" onclick="caddm()"><img src="gif/arrowrightmonth.gif"></td></tr>');

document.write('<tr>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">s</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">m</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">t</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">w</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">t</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">f</td>');
document.write('<td WIDTH=20 align=center style="background:#ABABAB;font:12px Arial;width:20">s</td>');
document.write('</tr>');


for(var kk=1;kk<=6;kk++) {
	document.write('<tr>');
	for(var tt=1;tt<=7;tt++) {
		num=7 * (kk-1) - (-tt);		
		document.write('<TD WIDTH=20 ID="v' + num + '" style="width:20px;height:18px">&nbsp;</TD>');
	}
	document.write('</TR>');
}
document.write('</TABLE>');

document.all?document.attachEvent('onclick',checkClick):document.addEventListener('click',checkClick,false);


// Calendar script
var now = new Date;

var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccm=now.getMonth();
var ccy=now.getFullYear();

var updobj;

function lcs(ielem) 
{

	updobj = ielem;	
	getObj('fc').style.left=Left(ielem);
	getObj('fc').style.top=Top(ielem)+ielem.offsetHeight;
	getObj('fc').style.display='';
	
	// First check date is valid
	curdt=ielem.value;
	curdtarr=curdt.split('/');
	isdt=true;
	for(var k=0;k<curdtarr.length;k++){
		if (isNaN(curdtarr[k]))
			isdt=false;
	}
	if (isdt&(curdtarr.length==3)){
		ccm=curdtarr[1]-1;
		ccy=curdtarr[2];
		prepcalendar(curdtarr[0],curdtarr[1]-1,curdtarr[2]);
	}
	
}

function evtTgt(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;
}
function EvtObj(e){if(!e)e=window.event;return e;}

function cs_over(e) {
	evtTgt(EvtObj(e)).style.background='#FFCC66';
}
function cs_out(e) {
	evtTgt(EvtObj(e)).style.background='#C4D3EA';
}

function cs_click(e) 
{
	updobj.value = calvalarr[evtTgt(EvtObj(e)).id.substring( 1 , evtTgt(EvtObj(e)).id.length ) ];
	getObj('fc').style.display = 'none';
	//alert('cs_click(e)' + updobj.id );
	switch( updobj.id )// calc //
	{
		case "departure":
			calcDates(false);//
			break;
		
		case "arrival":
			calcDates(true);
			break;
					
	}
}

var mn=new Array('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
var mon=new Array('01', '02', '03', '04', '05', '06', '07', '08', '09', '10', '11', '12');
var mnn=new Array('31','28','31','30','31','30','31','31','30','31','30','31');
var mnl=new Array('31','29','31','30','31','30','31','31','30','31','30','31');
var calvalarr=new Array(42);

function f_cps(obj) {
	obj.style.background='#C4D3EA';
	obj.style.font='10px Arial';
	obj.style.color='#333333';
	obj.style.textAlign='center';
	obj.style.textDecoration='none';
	obj.style.border='1px solid #6487AE';
	obj.style.cursor='pointer';
}

function f_cpps(obj) {
	obj.style.background='#C4D3EA';
	obj.style.font='10px Arial';
	obj.style.color='#ABABAB';
	obj.style.textAlign='center';
	obj.style.textDecoration='line-through';
	obj.style.border='1px solid #6487AE';
	obj.style.cursor='default';
}

function f_hds(obj) {
	obj.style.background='#FFF799';
	obj.style.font='bold 10px Arial';
	obj.style.color='#333333';
	obj.style.textAlign='center';
	obj.style.border='1px solid #6487AE';
	obj.style.cursor='pointer';
}

// day selected
var month="";
var year;

function prepcalendar(hd,cm,cy){
	now=new Date();
	sd=now.getDate();
	td=new Date();
	td.setDate(1);
	td.setFullYear(cy);
	td.setMonth(cm);
	cd=td.getDay();
	
	month=mon[cm];
	year=cy;

	getObj('mns').innerHTML="<A HREF=# ONCLICK=grouik()>"+mn[cm]+ ' ' + cy+"</A>";
	marr=((cy%4)==0)?mnl:mnn;
	for(var d=1;d<=42;d++) {
		f_cps(getObj('v'+parseInt(d)));
		if ((d >= (cd -(-1))) && (d<=cd-(-marr[cm]))) {
		  /// modif
			dip=false;//((d-cd < sd)&&(cm==sccm)&&(cy==sccy));
			htd=((hd!='')&&(d-cd==hd));
			if (dip)
				f_cpps(getObj('v'+parseInt(d)));
			else if (htd)
				f_hds(getObj('v'+parseInt(d)));
			else
				f_cps(getObj('v'+parseInt(d)));

			getObj('v'+parseInt(d)).onmouseover=(dip)?null:cs_over;
			getObj('v'+parseInt(d)).onmouseout=(dip)?null:cs_out;
			getObj('v'+parseInt(d)).onclick=(dip)?null:cs_click;
			
			getObj('v'+parseInt(d)).innerHTML=d-cd;	
			//calvalarr[d]=''+(d-cd)+'/'+(cm-(-1))+'/'+cy;
			///  ajouter
			var jour = (d-cd);
			var mois = (cm-(-1));
			if(parseInt(d-cd)<=9){
        jour = "0"+jour;
      }
      if(parseInt(cm-(-1))<=9){
        mois = "0"+mois;
      }      
      calvalarr[d]=''+jour+'/'+mois+'/'+cy;
      ///  fin
		}
		else {
			getObj('v'+d).innerHTML='&nbsp;';
			getObj('v'+parseInt(d)).onmouseover=null;
			getObj('v'+parseInt(d)).onmouseout=null;
			
			getObj('v'+parseInt(d)).style.cursor='default';
			}
	}
}

prepcalendar('',ccm,ccy);
//getObj('fc'+cc).style.visibility='hidden';
/// navig
function caddm() {
	marr=((ccy%4)==0)?mnl:mnn;
	
	ccm+=1;
	if (ccm>=12) {
		ccm=0;
		ccy++;
	}
	cdayf();
	prepcalendar('',ccm,ccy);
}

function csubm() {
	marr=((ccy%4)==0)?mnl:mnn;
	
	ccm-=1;
	if (ccm<0) {
		ccm=11;
		ccy--;
	}
	cdayf();
	prepcalendar('',ccm,ccy);
}

function cdayf() {
  return;
if ((ccy>sccy)|((ccy==sccy)&&(ccm>=sccm)))
	return;
else {
	ccy=sccy;
	ccm=sccm;
	cfd=scfd;
	}
}


// USAGE : <INPUT ONBLUR=sdate(this)>
var MINUTE = 60 * 1000
var HOUR = MINUTE * 60
var DAY = HOUR * 24
var WEEK = DAY * 7

var last_day_of_month=new Array(0,31,29,31,30,31,30,31,31,30,31,30,31);

function isBissextile(year) { // Return if the year is a leap-year
	return (year%4==0&&year%100!=0||year%400==0);
}


function sdate(that,mode){

	datestr=that.value.toLowerCase();
	if(datestr.length==10)return;

	if(datestr.substr(0,1)=="a"){//arrangement
		that.value="Arrangement";
		return;
	}

	if(datestr.substr(0,1)=="s"){//spot
		that.value="Spot";
		return;
	}

	if(datestr.substr(0,1)=="p"){//prompt
		that.value="Prompt";
		return;
	}

	if(datestr=="")return;

	arrd=datestr.split("/");	
	aln=arrd.length;

	var d2;
	d2=datestr.substring(0,2);	
	d2*=1;
	//d2=parseInt(d2);
	if(d2==0)d2=1;
	if(d2>31){that.value="";that.focus();validate=false;return;}
	if(parseInt(arrd[1],10)==2&&!isBissextile(arrd[2])&&d2>28){that.value="";that.focus();validate=false;return;}
	if(d2>last_day_of_month[parseInt(arrd[1],10)]){that.value="";that.focus();validate=false;return;}
	
	if(mode && aln==1 && datestr.length<3){//Récupère la date from si existe, et si la date to est 'jour seul'

		v=document.getElementById(mode).value;//date from
		farrd=v.split("/");//date from
		
		d=farrd[0];//day from

		if(d2>=d){//meme mois (mois from)
			tm=farrd[1];
		}
		
		if(d2<d){//mois+1 (mois from+1)
			tm=farrd[1];tm++;
			if(tm<10)tm="0"+tm;
			if(tm>12){
				tm="01";
				farrd[2]++;
			}
		}
		


		//alert(tm);
		var narr=new Array();
		d2=parseInt(d2);
		if(d2==0)d2=1;
		if(d2<10)d2="0"+d2;
		narr[0]=d2;
		narr[1]=tm;
		narr[2]=farrd[2];
		v=narr.join("/");
		that.value=v;
		validate=true;
		setTimeout("getObj('fc').style.display='none';",200);//getObj('fc').style.display='none';//hide calendar !
		return;
	}//fin calcul en fonction du datefrom
	

	
	
	//// GET THE TODAY'S DATE
	jd = new Date();
	td=jd.getDate();td=parseInt(td);
	if(td<10)td="0"+td;
	tm=jd.getMonth();tm++;tm=parseInt(tm);
	if(tm<10)tm="0"+tm;
	ty=jd.getFullYear();
	today=td+"/"+tm+"/"+ty;

	if(arrd.length!=3){//la date saisie est incomplète...
		/////////////////////////// TRY TO RESOLVE THE DATE :
		if(!datestr.match("/")){
			d=datestr.substring(0,2);
			m=datestr.substring(2,4);
			y=datestr.substring(4,8);
		}else{
			d=arrd[0];
			m=arrd[1];
			y=arrd[2];
		}
		// le jour
		if(d=="")d=td;
		if(d==0)d=1;
		if(d*1<td*1)nm=1; else nm=0;
		d=d*1;
		if(d<10)d="0"+d;
		if(d>31){that.value="";that.focus();validate=false;return;}
		
		// le mois
		if(m==""){

			m=tm;if(nm==1)m++;
			if(m>12){
//				alert('pouet'+m+"/"+tm);
				m=1;//ty++;
			}

		}

		if(m==0)m=1;
		var m=m*1;
		if(m<10)m="0"+m;
		if(m>12){that.value="";that.focus();validate=false;return;}
		if(m<tm)ty++;
		if(m>12)m=1;
		v=d+"/"+m+"/"+ty;

	}else{// SEEMS TO BE COMPLETE, LETS CHECK :
		//DAY
		if(arrd[0].length!=2)window.status="Date Day ?";
		if(arrd[0]=="00")arrd[0]=td;
		if(arrd[0]>31)arrd[0]="31";
		//MON
		if(arrd[1].length==1)arrd[1]="0"+arrd[1];
		if(arrd[1].length!=2)window.status="Date Month ?";
		if(arrd[1]=="00")arrd[1]=tm;	
		if(arrd[1]>12)arrd[1]="12";
		//YEAR
		if(arrd[2].length!=4)window.status="Date Year ?";
		if(arrd[2]=="0000")arrd[2]=ty;
//		if(arrd[2]<ty)arrd[2]=ty;//Année dans le passé !!!
		v=arrd.join("/");
	}
	that.value=v;
	validate=true;
	setTimeout("getObj('fc').style.display='none';",200);//getObj('fc').style.display='none';//hide calendar !
}

function getfrom(that,id){
	v=document.getElementById(id).value;//date from
	that.value=v;
	that.select();
	return;
}
