/* auteur: Bernard Martin-Rabaud */

/* Date de création: 18/12/2003 */



/***********************************************************************************************************/

/*                                             CALENDRIER EN JAVASCRIPT                                    */

/***********************************************************************************************************/

var duree_jour = 24 * 60 * 60 * 1000;

// ----------------------------------------------------------------------------------------------

//
// Fonction de
       //
function getStyle(el,styleProp)
{
	var x = el;
	if (window.getComputedStyle)
		var y = window.getComputedStyle(x,null).getPropertyValue(styleProp);
	else if (x.currentStyle)
		var y = eval('x.currentStyle.' + styleProp);
	return y;
}




//change la bgcolor d'un element
function swColoFond(element,couleur)
{
        document.getElementById(element).style.background=couleur;
}

//change la couleur de police d'un element
function swColoPolice(element,couleur)
{
        document.getElementById(element).style.color=couleur;
}

//change la police d'un élément
function swPolice(element,police)
{
        document.getElementById(element).style.font=police;
}

//change la taille d'écriture d'un élément
function swPoliceSize(element,taille)
{
        document.getElementById(element).style.size=taille;
}

//permet d'ecrire texte dans un element(div,span,td)
function printIn(element,texte)
{
        document.getElementById(element).innerHTML=texte;
}

//permet d'ecrire texte dans un element(input text ou text area)
function printInForm(element,texte)
{
        document.getElementById(element).value=texte;
}

//permet d'ecrire texte dans un element(div,span,td) du parent
function printInParent(element,texte)
{
        window.opener.document.getElementById(element).innerHTML=texte;
}

//permet d'ecrire texte dans un element(input text ou text area) du parent
function printInFormParent(element,texte)
{
	window.opener.document.getElementById(element).value=texte;
}

//modifie la largueur d'un element
function chWidth(element,width)
{
        document.getElementById(element).style.width=width;
}

//modifie la hauteur d'un element
function chHeight(element,height)
{
        document.getElementById(element).style.height=height;
}

//modifie la taille d'un element
function chSize(element,width,height)
{
        chWidth(element,width);
        chHeight(element,height);
}

//change la position d'un element
function chPos(element,x,y)
{
        var elem=document.getElementById(element);
        elem.style.top=y;
        elem.style.left=x;
}


//
// Change la couleur du fond de la cellule
//
function switchCF(cell,es)
{
	if(es=="in")
	{
		colprecedente=getStyle(cell,'backgroundColor');
		cell.style.background="#93c494";
	}
	if(es=="out")
	{
		cell.style.background=colprecedente;
	}
}





function Calendrier() {

	this.date_jour = dateAMidi();
	this.date_temp = dateAMidi();

	this.feries = null;

	this.span_date = "span_date";
	this.inp_date = "inp_date";

}


var calendrier = new Calendrier();

// Définition
//	- des jours fériés
//	- des noms des jours de la semaine
//
var ferie=new Array("01/01","01/05","08/05","14/07","15/08","01/11","11/11","25/12");
var tabDays = new Array ("Lundi","Mardi","Mercredi","Jeudi","Vendredi","Samedi","Dimanche");
nommois=new Array();
nommois[0]="Janvier";
nommois[1]="Février";
nommois[2]="Mars";
nommois[3]="Avril";
nommois[4]="Mai";
nommois[5]="Juin";
nommois[6]="Juillet";
nommois[7]="Août";
nommois[8]="Septembre";
nommois[9]="Octobre";
nommois[10]="Novembre";
nommois[11]="Decembre";

nomjour=new Array();
nomjour[0]="Lundi";
nomjour[1]="Mardi";
nomjour[2]="Mercredi";
nomjour[3]="Jeudi";
nomjour[4]="Vendredi";
nomjour[5]="Samedi";
nomjour[6]="Dimanche";

// Définitions de constantes
//	- de gestion affichage
//	- de gestion de dates
//
var colprecedente = "";
//
var nbMonYea = 12;                      // 12 mois par an
var nbDayWek = 7;                       // nb de jours par semaine


//
// Retourne la date dans un ou trois champs selon que fm et fa ont une valeur ou pas
//
function returnDate(day, mois, annee , a_span, a_input)
{

	// Construction de l'objet date qui doit permettre la récup du nom de jour
	//
//	alert (annee+"#"+mois+"#"+day)
	var str_inp = annee+"-"+ (parseInt(mois)+1)+"-"+day;
	printInFormParent(a_input, str_inp);

	d = new Date(annee, mois, day);
	var indday = (d.getDay() + (nbDayWek-1)) % nbDayWek;	// gestion décallage indice jour: 0 = dimanche
	var theday = tabDays[indday];
	theday = theday.substring (0, 3);
	printInParent(a_span, theday+" "+day+" "+nommois[mois]+" "+annee);
	window.close();
}



Calendrier.prototype.afficher = function(a_spandate, a_inpdate, a_yeardate, a_monthdate, a_daydate) {

	// affiche le mois concernant la date demandée (en argument, facultative)

	this.joursFeries();

	//
	this.span_date = a_spandate;
	this.inp_date = a_inpdate;

	
	
	html = "<table id='calendrier' cellspacing='0' cellpadding='0' border='0' summary='calendrier'>";

	html += "<tr><td>";

	html += "<table id='calendrier-haut' cellspacing='0' cellpadding='0' border='0' summary='mois et année du calendrier'>";

	html += this.afficherEntete();

	html += "</table>";

	html += "</td></tr>";

	html += "<tr><td>";

	html += "<table id='calendrier-jours' cellspacing='0' cellpadding='0' border='0' summary='jour du mois'>";

	html += this.afficherJoursSemaine();

	html += this.afficherJoursMois();

	html += "</table>";

	html += "</td></tr>";

	html += "</table>";
	
	document.write(html);

}



Calendrier.prototype.joursFeries = function() {

	// indique les jours fériés en fonction de l'année du calendrier

	var feries = this.date_jour.joursFeriesMobiles();

	this.feries = "|" + feries.join("|") + "|";

}



Calendrier.prototype.afficherEntete = function() {

	// affiche le mois (en lettres) et l'année avec des flèches pour les incrémenter ou les décrémenter

	// affichage de 2 flèches prec 

	var html = "<tr><td class='calendrier-fleche'>";

	html += "<a href='javascript:calendrier.anneePrecedente()' title='année précédente'>";

	html += "<img src='images/an_prec.gif' border='0' width='11' height='11' alt='année précédente' onmouseover='this.src=\"images/an_preca.gif\"' onmouseout='this.src=\"images/an_prec.gif\"'></a>";

	html += "</td>";

	html += "<td class='calendrier-fleche'>";

	html += "<a href='javascript:calendrier.moisPrecedent()' title='mois précédent'>";

	html += "<img src='images/mois_prec.gif' border='0' width='6' height='11' alt='mois précédent' onmouseover='this.src=\"images/mois_preca.gif\"' onmouseout='this.src=\"images/mois_prec.gif\"'></a>";

	// affichage du mois avec son id qui permettra de modifier le contenu du <td>

	html += "<td id='calendrier-mois-an'>" + this.date_jour.moisLitteral() + " " + this.date_jour.getFullYear() + "</td>";

	// affichage de 2 flèches suiv 

	html += "</td>";

	html += "<td class='calendrier-fleche'>";

	html += "<a href='javascript:calendrier.moisSuivant()' title='mois suivant'>";

	html += "<img src='images/mois_suiv.gif' border='0' width='6' height='11' alt='mois suivant' onmouseover='this.src=\"images/mois_suiva.gif\"' onmouseout='this.src=\"images/mois_suiv.gif\"'></a>";

	html += "</td>";

	html += "<td class='calendrier-fleche'>";

	html += "<a href='javascript:calendrier.anneeSuivante()' title='année suivante'>";

	html += "<img src='images/an_suiv.gif' border='0' width='11' height='11' alt='année suivante' onmouseover='this.src=\"images/an_suiva.gif\"' onmouseout='this.src=\"images/an_suiv.gif\"'></a>";

	html += "</td></tr>";

	return html;

}



Calendrier.prototype.afficherJoursSemaine = function() {

	// affiche les jours de la semaine sur une ligne

	var jours_sem = new Array("lun", "mar", "mer", "jeu", "ven", "sam", "dim");

	var html = "<tr>";

	for (var i=0;i<jours_sem.length;i++) {

		if (i < 5) html += "<td class='calendrier-sem'>" + jours_sem[i] + "</td>";

		else html += "<td class='calendrier-fin-sem'>" + jours_sem[i] + "</td>";

	}

	html += "</tr>";

	return html;

}



Calendrier.prototype.afficherJoursMois = function() {

	// affiche les jours du mois en fonction du mois et de l'année en cours

	// limites indique le début et la fin des jours visibles dans le calendrier

	// de façon à ce que le calendrier contienne le 1er du mois sur la 1ère ligne

	var limites = this.limitesMoisCalendrier();

	var jour = limites[0];

	var auj = dateAMidi();

	var col = 0;

	var ligne = 0;

	var html = "<tr>";

	while (jour <= limites[1]) {

		if (col == 7) {

			html += "</tr><tr>";

			col = 0;

			ligne++;

		}
//alert (jour.getDate()+"#"+jour.getMonth()+"#"+jour.getFullYear());

		if (jour.memeJour(auj)) html += "<td class='calendrier-jour-auj";

		else if (jour.dansLeMois(this.date_jour)) { 

			if (col < 5) html += "<td onclick=\"returnDate('"+jour.getDate()+"','"+jour.getMonth()+"','"+jour.getFullYear()+"','"+this.span_date+"', '"+this.inp_date+"')\" onmouseover=\"javascript:switchCF(this,'in')\" onmouseout=\"javascript:switchCF(this,'out')\" class='calendrier-jour";

			else html += "<td onclick=\"returnDate('"+jour.getDate()+"','"+jour.getMonth()+"','"+jour.getFullYear()+"','"+this.span_date+"', '"+this.inp_date+"')\" onmouseover=\"javascript:switchCF(this,'in')\" onmouseout=\"javascript:switchCF(this,'out')\" class='calendrier-jour-we";

		}

		else html += "<td onclick=\"returnDate('"+jour.getDate()+"','"+jour.getMonth()+"','"+jour.getFullYear()+"','"+this.span_date+"', '"+this.inp_date+"')\" onmouseover=\"javascript:switchCF(this,'in')\" onmouseout=\"javascript:switchCF(this,'out')\" class='calendrier-jour-horsmois";

		if (this.estFerie(jour)) html += " calendrier-jour-ferie";

		html += "'>" + jour.getDate() + "</td>";

		jour.jourSuivant();

		col++;

	}

	html += "</tr>";

	while (ligne < 5) {

		html += "<tr>";

		for (col=0;col<7;col++) html += "<td class=''>&nbsp;</td>";

		html += "</tr>";

		ligne++;

	}		

	return html;

}



Calendrier.prototype.limitesMoisCalendrier = function() {

	// détermine les limites du calendrier relatif au mois de la date en cours, de telle façon à ce que le 1er du mois

	// soit sur la 1ère ligne, que le dernier du mois sur la dernière ligne, 

	// et que le début du calendrier commence un lundi et la fin finisse un dimanche

	

	// on cherche la date du début du calendrier

	var jour = new Date(this.date_jour.getTime());

	jour.debutMois(); // date du 1er du mois

	var jour_semaine = jour.getDay();

	jour_semaine = jour_semaine ? jour_semaine - 1 : 6;

	var debut_cal = new Date();

	debut_cal.setTime(jour.getTime() - jour_semaine * duree_jour);

	

	// puis la date de la fin du calendrier

	jour.finMois(); 

	jour_semaine = jour.getDay();

	jour_semaine = jour_semaine ? jour_semaine - 1 : 6;

	var fin_cal = new Date();

	fin_cal.setTime(jour.getTime() + (6 - jour_semaine)  * duree_jour);

	

	var limites = new Array(debut_cal, fin_cal);

	return limites;

}



Calendrier.prototype.moisSuivant = function() {

	// fait passer le calendrier au mois suivant

	// il faut modifier le jour courant du calendrier,

	// puis modifier le mois et éventuellement l'année en haut du calendrier

	// et les jours, tout ça via la structure du DOM

	this.date_jour.moisSuivant();

	this.joursFeries();

	this.majEntete();

	this.majJoursMois();

}



Calendrier.prototype.moisPrecedent = function() {

	// fait passer le calendrier au mois suivant

	// il faut modifier le jour courant du calendrier,

	// puis modifier le mois et éventuellement l'année en haut du calendrier

	// et les jours, tout ça via la structure du DOM

	this.date_jour.moisPrecedent();

	this.joursFeries();

	this.majEntete();

	this.majJoursMois();

}



Calendrier.prototype.anneeSuivante = function() {

	// fait passer le calendrier au mois suivant

	// il faut modifier le jour courant du calendrier,

	// puis modifier le mois et éventuellement l'année en haut du calendrier

	// et les jours, tout ça via la structure du DOM

	this.date_jour.anneeSuivante();

	this.joursFeries();

	this.majEntete();

	this.majJoursMois();

}



Calendrier.prototype.anneePrecedente = function() {

	// fait passer le calendrier au mois suivant

	// il faut modifier le jour courant du calendrier,

	// puis modifier le mois et éventuellement l'année en haut du calendrier

	// et les jours, tout ça via la structure du DOM

	this.date_jour.anneePrecedente();

	this.majEntete();

	this.majJoursMois();

}



Calendrier.prototype.majEntete = function() {

	// met à jour le mois et l'année en-tête du calendrier

	document.getElementById("calendrier-mois-an").lastChild.nodeValue = this.date_jour.moisLitteral() + " " + this.date_jour.getFullYear();

}



Calendrier.prototype.majJoursMois = function() {

	// met à jour les jours du mois

	// racine est le noeud TBODY dont les lignes du tableau sont les childNodes

	var racine = document.getElementById("calendrier-jours").lastChild;

//	alert("fils 1 de racine = " + racine.childNodes[1].nodeName);

	var limites = this.limitesMoisCalendrier();

// alert("limites du calendrier = " + limites[0].afficher() + ", " + limites[1].afficher() + " date du calendrier = " + this.date_jour.afficher());

	var jour = limites[0];

	var auj = dateAMidi();

	var iligne = 1;

	var ligne = racine.childNodes[iligne];

	var cell = ligne.firstChild;

	var col = 0;

	do {

		if (col == 7) {

			ligne = racine.childNodes[++iligne];

			cell = ligne.firstChild;

			col = 0;

		}

		else cell = ligne.childNodes[col];

		if (jour.memeJour(auj)) cell.attributes["class"].nodeValue = "calendrier-jour-auj";

		else if (jour.dansLeMois(this.date_jour)) { 

			if (col < 5) cell.attributes["class"].nodeValue = "calendrier-jour";

			else cell.attributes["class"].nodeValue = "calendrier-jour-we";

		}

		else cell.attributes["class"].nodeValue = "calendrier-jour-horsmois";

		if (this.estFerie(jour)) cell.attributes["class"].nodeValue += " calendrier-jour-ferie";


		
		cell.firstChild.nodeValue = jour.getDate();
		cell.id = jour.toGMTString();
		//
		cell.onclick = function(jour)
		{
//			alert(this.id);
			l_jour = new Date(this.id);
			returnDate(l_jour.getDate() , l_jour.getMonth() , l_jour.getFullYear() , calendrier.span_date , calendrier.inp_date);
		}
		cell.onmouseover = function()
		{
			switchCF(this,'in');
		}
		cell.onmouseout = function()
		{
			switchCF(this,'out');
		}

		
		
		jour.jourSuivant();

// alert("jour en cours = " + jour.afficher() + " diff = " + (limites[1].getTime() - jour.getTime()) / duree_jour);

		col++;

	} while ((limites[1].getTime() - jour.getTime()) >= 0);

	// cas où les jours s'affichent sur moins de 6 lignes

	while (iligne < 6) {

		ligne = racine.childNodes[++iligne];

		for (col=0;col<7;col++) {

			cell = ligne.childNodes[col];

			cell.attributes["class"].nodeValue = "";

			cell.firstChild.nodeValue = " ";

		}

	}

}



Calendrier.prototype.estFerie = function(jour) {

	// détermine si un jour est férié (rajouter la date de Pâques plus tard)

	var ch_date = rajoute0(jour.getDate()) + "/" + rajoute0(jour.getMonth()+1);

 	if (this.feries.indexOf("|" + ch_date + "|") == -1) return false;

 	else return true;

}





// FONCTIONS UTILITAIRES





Date.prototype.dansLeMois = function(date_ref) {

	// indique si la date en cours et date_ref sont du même mois et de la même année

	if ((this.getMonth() == date_ref.getMonth()) && (this.getFullYear() == date_ref.getFullYear()))

		return true;

	else return false;

}



Date.prototype.jourSuivant = function() {

	// incrémente le jour de la date en fonction du nombre de jours en argument (si pas d'argument, l'incrément = 1)

	// p. ex. var jour = new Date(2004, 0, 1) (soit 01/01/2004), jour.jourSuivant() donnera le 02/01/2004

	// et jour.jourSuivant(31) donnera le 01/02/2004

	if (arguments.length) var increment = parseInt(arguments[0]);

	else var increment = 1;

	this.setDate(this.getDate() + increment);

}



Date.prototype.moisSuivant = function() {

	// passe le jour au mois suivant

	if (this.getMonth() < 11) this.setMonth(this.getMonth() + 1);

	else {

   		this.setMonth(0);

   		this.setFullYear(this.getFullYear() + 1);

 	}

}



Date.prototype.moisPrecedent = function() {

	// passe le jour au mois précédent

	if (this.getMonth()) this.setMonth(this.getMonth() - 1);

	else {

   		this.setMonth(11);

   		this.setFullYear(this.getFullYear() - 1);

 	}

}



Date.prototype.anneeSuivante = function() {

	// passe le jour à l'année suivante

	this.setFullYear(this.getFullYear() + 1);

}



Date.prototype.anneePrecedente = function() {

	// passe le jour à l'année précédente

	this.setFullYear(this.getFullYear() - 1);

}



Date.prototype.debutMois = function() {

	// met la date en cours au premier du mois

	this.setTime(this.getTime() - (this.getDate() - 1) * duree_jour); 

}



Date.prototype.finMois = function() {

	// met la date en cours à la fin du mois

	this.moisSuivant();

 	this.setDate(1);

 	this.setTime(this.getTime() - duree_jour);

}



Date.prototype.memeJour = function(une_date) {

	// si la date courante est le même jour que une_date, retourne "true", sinon retourne "false"

	var diff = Math.abs(this.getTime() - une_date.getTime());

	if (diff < 60*60*1000) return true;

	else return false;

}



Date.prototype.moisLitteral = function() {

	var nom_mois = new Array("janvier", "février", "mars", "avril", "mai", "juin", "juillet", "août", "septembre", "octobre", "novembre", "décembre");

	return nom_mois[this.getMonth()];

}



Date.prototype.joursFeriesMobiles = function() {

	// ajoute aux jours fériés fixes les jours fériés mobiles : lundi de Pâques, Ascension et lundi de Pentecôte

	var jours_feries = new Array("01/01", "01/05", "14/07", "15/08", "01/11", "11/11", "25/12");

	var jour = paques(this.getFullYear());

	// lundi de Pâques

	jour.jourSuivant();

	jours_feries.splice(1, 0, jour.afficherJourMois());

	// ascension

	jour.jourSuivant(38);

	if (jour.getMonth() > 3) jours_feries.splice(3, 0, jour.afficherJourMois());

	else jours_feries.splice(2, 0, jour.afficherJourMois());

	// lundi de Pentecôte

	jour.jourSuivant(11);

	jours_feries.splice(4, 0, jour.afficherJourMois());

	return jours_feries;

}

	

Date.prototype.afficherJourMois = function() {

	return rajoute0(this.getDate()) + "/" + rajoute0(eval(this.getMonth() + 1));

}



function dateAMidi() {

	// crée une date à midi (12h 0mn 0sec)

	if (arguments.length) ladate = arguments[0];

	else ladate = new Date();

	ladate.setHours(12);

	ladate.setMinutes(0);

	ladate.setSeconds(0);

	return ladate;

}

	

function rajoute0(valeur) {

	return (valeur < 10) ? "0" + valeur : valeur;

}



function paques(annee) {

    // retourne une date Javascript, qui est la date de Pâques en fonction de l'année

    annee = parseInt(annee);

    var date_paques = null;

    var b = annee - 1900;

    var c = annee % 19;

    var d = Math.floor((7*c+1)/19);

    var e = (11*c+4-d) % 29;

    var f = Math.floor(b/4);

    var g = (b+f+31-e) % 7;

    var avril = 25-e-g;

    if (avril > 0) date_paques = new Date(annee, 3, avril);

    else date_paques = new Date(annee, 2, avril + 31);

    return date_paques;

}