var ds_format='fr'; /// fr: jj/mm/aaaa; en: yyyy-mm-dd
var ds_c_month='';
var ds_c_year='';
var ds_monthnames = ['Janvier', 'Février', 'Mars', 'Avril', 'Mai', 'Juin', 'Juillet', 'Aout', 'Septembre', 'Octobre', 'Novembre', 'Décembre']; 
var ds_daynames = ['Dim', 'Lun', 'Mar', 'Me', 'Jeu', 'Ven', 'Sam']; 
var ds_ob = ''; 
var ds_element;
var ds_oe;
var ds_ce;

ds_callback=function(){}

// Get Element By Id
function ds_getel(id) {
	return document.getElementById(id);
}

// Get Element By class
function ds_getelclass(clsName,htmltag){
	if(htmltag==undefined) {
		var htmltag='*';
	}
	var arr = new Array(); 
	var elems = document.getElementsByTagName(htmltag);
	for ( var cls, i = 0; ( elem = elems[i] ); i++ ){
		if ( elem.className == clsName ){
			arr[arr.length] = elem;
		}
	}
	return arr;
}

function ds_init(classNam, element) {
	if(classNam==undefined) classNam="ds_click_element";
	if(element==undefined) element="input";
	/************************************* code pour générer : 
	<table class="ds_box" cellpadding="0" cellspacing="0" id="ds_conclass" style="display: none;">
		<tr>
			<td id="ds_calclass"></td>
		</tr>
	</table>
	*/
	if(document.all){ //// ie sucks
		document.getElementsByTagName("body")[0].innerHTML='<table class="ds_box" cellpadding="0" cellspacing="0" id="ds_conclass" style="display: none;"><tr><td id="ds_calclass">hello world</td></tr></table>'+document.getElementsByTagName("body")[0].innerHTML;
	}
	else{	
		var nouveauTab = document.createElement("table");
		var nouveauTr = document.createElement("tr");
		var nouveauTd = document.createElement("td");
	
		document.getElementsByTagName("body")[0].insertBefore(nouveauTab, document.getElementsByTagName("body")[0].firstChild);
		
		nouveauTab.appendChild(nouveauTr);
		nouveauTr.appendChild(nouveauTd);
		nouveauTab.setAttribute("cellpadding", 0);
		nouveauTab.setAttribute("cellspacing", 0);
		nouveauTab.className="ds_box";
		nouveauTab.id="ds_conclass";
		nouveauTd.id="ds_calclass";
		nouveauTab.style.display='none';
		
		/*nouveauTab.setAttribute("class", "ds_box");
		nouveauTab.setAttribute("id", "ds_conclass");
		nouveauTd.setAttribute("id", "ds_calclass");*/
	}
	/**************************** fin code ******************************************************************/
	
	ds_oe = ds_getel('ds_calclass');
	ds_ce = ds_getel('ds_conclass');
	
	var tab = new Array();
	tab=ds_getelclass(classNam,element);
	for(var i=0;i<tab.length; i++){
		var temp_elem=tab[0];
		temp_elem.onclick=function(){
			ds_sh(this);
		}
		
		temp_elem.onfocus=function(){
			ds_sh(this);
		}
				
		var elems = document.getElementsByTagName(element);
		for ( var cls, i = 0; ( elem = elems[i] ); i++ ){
			if ( elem!=temp_elem){
				elem.onfocus=function(){
					ds_hi();
				}
			}
		}
	}
}



function ds_getmonthnumber(m) {
var i=0;
var month_number=0;
	while(i<ds_monthnames.length && month_number==0){
		if(m==ds_monthnames[i]){
			month_number=i+1;
		}
		i++;
	}
	return month_number;
}


// Get the left and the top of the element.
function ds_getleft(el) {
	var tmp = el.offsetLeft;
	el = el.offsetParent
	while(el) {
		tmp += el.offsetLeft;
		el = el.offsetParent;
	}
	var maxW=tmp+ds_ce.offsetWidth;
	var ecran=document.documentElement.clientWidth;
	if(ecran==undefined){ecran=document.body.offsetWidth;}

	var diffW=maxW-ecran;
	if(diffW>0){tmp=tmp-diffW;}

	return tmp;
}
function ds_gettop(el) {
	var tmp = el.offsetTop;
	el = el.offsetParent
	while(el) {
		tmp += el.offsetTop;
		el = el.offsetParent;
	}
	return tmp;
}

function ds_ob_clean() {
	ds_ob = '';
}
function ds_ob_flush() {
	ds_oe.innerHTML = ds_ob;
	ds_ob_clean();
}
function ds_echo(t) {
	ds_ob += t;
}

function ds_template_main_above(m, y) {
	var mois=ds_getmonthnumber(m);
	if((mois)<10){mois='0'+mois.toString();}
	
	
	return '<table cellpadding="3" cellspacing="1" class="ds_tbl">'
	     + '<tr>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_pd();">&lt;&lt;&lt;</td>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_py();">&lt;&lt;</td>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_pm();">&lt;</td>'
		 + '<td class="ds_head" style="cursor: pointer; font-size:10px;" onclick="ds_hi();" colspan="1">Fermer</td>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_nm();">&gt;</td>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_ny();">&gt;&gt;</td>'
		 + '<td class="ds_head" style="cursor: pointer" onclick="ds_nd();">&gt;&gt;&gt;</td>'
		 + '</tr>'
	     + '<tr>'
		 + '<td colspan="7" class="ds_head">mm/aaaa : <input id="ds_month_input" type="text" value="'+ mois + '" style="width:20px; font-weight:normal;" maxlength="2" onkeypress="if(event.keyCode==13){ds_nm_ny(document.getElementById(\'ds_month_input\').value, document.getElementById(\'ds_year_input\').value)};" /> / <input id="ds_year_input" type="text" value="'+ y + '" style="width:32px; font-weight:normal;" maxlength="4" onkeypress="if(event.keyCode==13){ds_nm_ny(document.getElementById(\'ds_month_input\').value, document.getElementById(\'ds_year_input\').value)};" /> <input class="input_submit" type="button" value="ok" onclick="ds_nm_ny(document.getElementById(\'ds_month_input\').value, document.getElementById(\'ds_year_input\').value)" /></td>'
		 + '</tr>'
		 + '<tr>'
		 + '<td colspan="7" class="ds_head">' + m + ' ' + y + '</td>'
		 + '</tr>'
		 + '<tr>';
}


function ds_template_day_row(t) {
	return '<td class="ds_subhead">' + t + '</td>';
	// Define width in CSS, XHTML 1.0 Strict doesn't have width property for it.
}

function ds_template_new_week() {
	return '</tr><tr>';
}

function ds_template_blank_cell(colspan) {
	return '<td colspan="' + colspan + '"></td>'
}

function ds_template_day(d, m, y) {
	return '<td class="ds_cell" onclick="ds_onclick(' + d + ',' + m + ',' + y + ')">' + d + '</td>';
	// Define width the day row.
}

function ds_template_main_below() {
	return '</tr>'
	     + '</table>';
}


// This one draws calendar...
function ds_draw_calendar(m, y) {
	// First clean the output buffer.
	ds_ob_clean();
	// Here we go, do the header
	ds_echo (ds_template_main_above(ds_monthnames[m - 1] , y));
	for (i = 0; i < 7; i ++) {
		ds_echo (ds_template_day_row(ds_daynames[i]));
	}
	// Make a date object.
	var ds_dc_date = new Date();
	ds_dc_date.setMonth(m - 1);
	ds_dc_date.setFullYear(y);
	ds_dc_date.setDate(1);
	if (m == 1 || m == 3 || m == 5 || m == 7 || m == 8 || m == 10 || m == 12) {
		days = 31;
	} else if (m == 4 || m == 6 || m == 9 || m == 11) {
		days = 30;
	} else {
		days = (y % 4 == 0) ? 29 : 28;
	}
	var first_day = ds_dc_date.getDay();
	var first_loop = 1;
	// Start the first week
	ds_echo (ds_template_new_week());
	// If sunday is not the first day of the month, make a blank cell...
	if (first_day != 0) {
		ds_echo (ds_template_blank_cell(first_day));
	}
	var j = first_day;
	for (i = 0; i < days; i ++) {
		// Today is sunday, make a new week.
		// If this sunday is the first day of the month,
		// we've made a new row for you already.
		if (j == 0 && !first_loop) {
			// New week!!
			ds_echo (ds_template_new_week());
		}
		// Make a row of that day!
		ds_echo (ds_template_day(i + 1, m, y));
		// This is not first loop anymore...
		first_loop = 0;
		// What is the next day?
		j ++;
		j %= 7;
	}
	// Do the footer
	ds_echo (ds_template_main_below());
	// And let's display..
	ds_ob_flush();
	// Scroll it into view.
	//ds_ce.scrollIntoView(false);
}



// A function to show the calendar.
// When user click on the date, it will set the content of t.
function ds_sh(t) {
	// Set the element to set...
	ds_element = t;
	// Make a new date, and set the current month and year.
	//var ds_sh_date = new Date();
	//ds_c_month = ds_sh_date.getMonth() + 1;
	//ds_c_year = ds_sh_date.getFullYear();
	// ds_format= 'fr'; //fr: jj/mm/aaaa; en: yyyy-mm-dd
	var temp_date='';
	if (typeof(ds_element.value) != 'undefined') {
		temp_date=ds_element.value;
	// Maybe we want to set the HTML in it.
	} else if (typeof(ds_element.innerHTML) != 'undefined') {
		temp_date=ds_element.innerHTML;
	// I don't know how should we display it, just alert it to user.
	}
	
	////// si valeur dans l'element, on en extrait le mois et l'année pr caler le calendrier dessus
	if(temp_date!=''){
		var a = new Array;
		if(ds_format=='fr'){
			a=temp_date.split('/');
			var temp_month=a[1];
			var temp_year=a[2];
			if(temp_month!='' && temp_month!='undefined' && parseInt(temp_month,10)!=0 && isNaN(temp_month)==false){ds_c_month=temp_month;}
			if(temp_year!='' && temp_year!='undefined' && parseInt(temp_year,10)!=0 && isNaN(temp_year)==false){ds_c_year=temp_year;}
		}
		else if(ds_format=='en'){
			a=temp_date.split('-');
			var temp_month=a[1];
			var temp_year=a[0];
			if(temp_month!='' && temp_month!='undefined' && parseInt(temp_month,10)!=0 && isNaN(temp_month)==false){ds_c_month=temp_month;}
			if(temp_year!='' && temp_year!='undefined' && parseInt(temp_year,10)!=0 && isNaN(temp_year)==false){ds_c_year=temp_year;}
		}
	}
	
	
	if(ds_c_month=='' || ds_c_year==''){
		var ds_i_date = new Date();
		ds_c_month = ds_i_date.getMonth()+1 ;
		ds_c_year = ds_i_date.getFullYear();
	}
	
	// Draw the calendar
	ds_draw_calendar(ds_c_month, ds_c_year);
	// To change the position properly, we must show it first.
	ds_ce.style.display = '';
	// Move the calendar container!
	the_left = ds_getleft(t);
	the_top = ds_gettop(t) + t.offsetHeight;
	ds_ce.style.left = the_left + 'px';
	ds_ce.style.top = the_top + 'px';
	// Scroll it into view.
	//ds_ce.scrollIntoView(false);
}


// Hide the calendar.
function ds_hi() {
	ds_ce.style.display = 'none';
}

// Moves to the next month...
function ds_nm(new_month) {
	// Increase the current month.
	if(new_month==undefined){ds_c_month++;}
	else{
		if(new_month!='' && isNaN(new_month)==false) {ds_c_month=new_month;}
	}
	
	// We have passed December, let's go to the next year.
	// Increase the current year, and set the current month to January.
	if (ds_c_month > 12) {
		ds_c_month = 1; 
		ds_c_year++;
	}
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}


// Moves to the previous month...
function ds_pm() {
	ds_c_month = ds_c_month - 1; // Can't use dash-dash here, it will make the page invalid.
	// We have passed January, let's go back to the previous year.
	// Decrease the current year, and set the current month to December.
	if (ds_c_month < 1) {
		ds_c_month = 12; 
		ds_c_year = ds_c_year - 1; // Can't use dash-dash here, it will make the page invalid.
	}
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}


// Moves to the next year...
function ds_ny(new_year) {
	// Increase the current year.
	if(new_year==undefined){ds_c_year++;}
	else{
		if(new_year!='' && isNaN(new_year)==false) {ds_c_year=new_year;}
	}
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}


// Moves to the previous decennie...
function ds_pd() {
	// Decrease the current year.
	ds_c_year = ds_c_year - 10; // Can't use dash-dash here, it will make the page invalid.
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}

// Moves to the next decennie...
function ds_nd() {
	// Increase the current year.
	ds_c_year=parseInt(ds_c_year) + 10;
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}


// Moves to the previous year...
function ds_py() {
	// Decrease the current year.
	ds_c_year = ds_c_year - 1; // Can't use dash-dash here, it will make the page invalid.
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
}


function ds_nm_ny(new_month, new_year) {
	if(new_month==undefined){ds_c_month++;}
	else{
		if(new_month!='' && isNaN(new_month)==false) {ds_c_month=new_month;}
	}
	// We have passed December, let's go to the next year.
	// Increase the current year, and set the current month to January.
	if (ds_c_month > 12) {
		ds_c_month = 1; 
		ds_c_year++;
	}
	
	if(new_year==undefined){ds_c_year++;}
	else{
		if(new_year!='' && isNaN(new_year)==false) {ds_c_year=new_year;}
	}
	
	// Redraw the calendar.
	ds_draw_calendar(ds_c_month, ds_c_year);
	
}


// Format the date to output.
function ds_format_date(d, m, y) {
	// 2 digits month.
	m2 = '00' + m;
	m2 = m2.substr(m2.length - 2);
	// 2 digits day.
	d2 = '00' + d;
	d2 = d2.substr(d2.length - 2);
	// YYYY-MM-DD
	return d2 + '/' + m2 + '/' + y;
}

// When the user clicks the day.
function ds_onclick(d, m, y) {
	// Set the value of it, if we can.
	if (typeof(ds_element.value) != 'undefined') {
		ds_element.value = ds_format_date(d, m, y);
		ds_element.select();
	// Maybe we want to set the HTML in it.
	} else if (typeof(ds_element.innerHTML) != 'undefined') {
		ds_element.innerHTML = ds_format_date(d, m, y);
	// I don't know how should we display it, just alert it to user.
	} else {
		alert (ds_format_date(d, m, y));
	}
	if(ds_callback) ds_callback();

	// Hide the calendar.
	window.setTimeout("ds_hi();", 10);
}