// Title: Tigra Calendar
// URL: http://www.softcomplex.com/products/tigra_calendar/
// Version: 3.2 (European date format)
// Date: 10/14/2002 (mm/dd/yyyy)
// Note: Permission given to use this script in ANY kind of applications if
//    header lines are left unchanged.
// Note: Script consists of two files: calendar?.js and calendar.html

// if two digit year input dates after this year considered 20 century.
var NUM_CENTYEAR = 30;
// is time input control required by default
var BUL_TIMECOMPONENT = false;
// are year scrolling buttons required by default
var BUL_YEARSCROLL = true;

var calendars = [];
var RE_NUM = /^\-?\d+$/;

var lang = "fr";
var lang_fr = "fr";
var lang_en = "en";
var lang_de = "de";

var error_1_en = "Error calling the calendar: no target control specified";
var error_1_fr = "Erreur lors de l'appel du calendrier : pas de cible de control spécifiée";

var error_2_en = "Error calling the calendar: parameter specified is not valid target control";
var error_2_fr = "Erreur lors de l'appel du calendrier : le paramètre spécifié n'est pas valid";

var error_date_message_1_1_en = "Invalid date format : '";
var error_date_message_1_2_en = "'.\nFormat accepted is dd-mm-yyyy.";
var error_date_message_1_1_fr = "Format de date invalid : '";
var error_date_message_1_2_fr = "'.\nLe format de date accepté est jj-mm-aaaa.";

var error_date_message_2_1_en = "'.\nNo day of month value can be found.";
var error_date_message_2_1_fr = "'.\nLe jour du mois n'a pas été trouvé.";

var error_date_message_3_1_en = "Invalid day of month value: '";
var error_date_message_3_2_en = "'.\nAllowed values are unsigned integers.";
var error_date_message_3_1_fr = "Valeur invalide pour le jour du mois : '";
var error_date_message_3_2_fr = "'.\nSeule les nombres entiers positifs sont autorisés.";

var error_date_message_4_1_en = "'.\nNo month value can be found.";
var error_date_message_4_1_fr = "'.\nLe mois n'a pas été trouvé.";

var error_date_message_5_1_en = "Invalid month value: '";
var error_date_message_5_1_fr = "Valeur du mois invalide : '";

var error_date_message_6_1_en = "'.\nNo year value can be found.";
var error_date_message_6_1_fr = "'.\nL'année n'a pas été trouvée.";

var error_date_message_7_1_en = "Invalid year value: '";
var error_date_message_7_1_fr= "Valeur de l'année invalide : '";

var error_date_message_8_1_en = "'.\nAllowed range is 01-12.";
var error_date_message_8_1_fr = "'.\nValeur autorisée entre 01 et 12."

var error_date_message_9_1_en = "'.\nAllowed range is 01-";
var error_date_message_9_1_fr = "'.\n Valeur autorisée entre 01 et ";

var error_hour_message_1_1_en = "Invalid hours value : '";
var error_hour_message_1_2_en = "'.\nAllowed range is 00-23.";
var error_hour_message_1_3_en = "'.\nAllowed values are unsigned integers.";
var error_hour_message_1_1_fr = "Heures invalides : '";
var error_hour_message_1_2_fr = "'.\nValeurs autorisées entre 00 et 23.";
var error_hour_message_1_3_fr = "'.\nNombre entier autorisé.";

var error_minute_message_1_1_en = "Invalid minutes value : '";
var error_minute_message_1_2_en = "'.\nAllowed range is 00-59.";
var error_minute_message_1_1_fr = "Minutes invalides : '";
var error_minute_message_1_2_fr = "'.\nValeurs autorisées entre 00 et 59.";

var error_second_message_1_1_en = "Invalid seconds value : '";
var error_second_message_1_2_en = "'.\nAllowed range is 00-59.";
var error_second_message_1_1_fr = "Secondes invalides : '";
var error_second_message_1_2_fr = "'.\nValeurs autorisées entre 00 et 59.";

function webCalendar(obj_target_id, local_lang) {
	lang = local_lang;
	var obj_target = document.getElementById(obj_target_id);
	var webcal = new calendar1(obj_target);
	webcal.year_scroll = true;
	webcal.time_comp = false;
	webcal.popup();
}

function calendar1(obj_target) {
	// assigning methods
	this.gen_date = cal_gen_date1;
	this.gen_time = cal_gen_time1;
	this.gen_tsmp = cal_gen_tsmp1;
	this.prs_date = cal_prs_date1;
	this.prs_time = cal_prs_time1;
	this.prs_tsmp = cal_prs_tsmp1;
	this.popup    = cal_popup1;

	// validate input parameters
	if (!obj_target)
		if (lang == lang_fr)
			return cal_error(error_1_fr);
		else
			return cal_error(error_1_en);
	if (obj_target.value == null)
		if (lang == lang_fr)
			return cal_error(error_2_fr);
		else
			return cal_error(error_2_en);
	this.target = obj_target;
	this.time_comp = BUL_TIMECOMPONENT;
	this.year_scroll = BUL_YEARSCROLL;
	
	// register in global collections
	this.id = calendars.length;
	calendars[this.id] = this;
}

function cal_popup1 (str_datetime) {
	this.dt_current = this.prs_tsmp(str_datetime ? str_datetime : this.target.value);
	if (!this.dt_current) return;
	
	var obj_calwindow = window.open(
		'/front/front/jsp/calendarBack.html?datetime=' + this.dt_current.valueOf()+ '&id=' + this.id + '&lang=' + lang,
		'Calendar', 'width=200,height='+(this.time_comp ? 215 : 190)+
		',status=no,resizable=no,top=200,left=200,dependent=yes,alwaysRaised=yes'
	);
	obj_calwindow.opener = window;
	obj_calwindow.focus();
}

// timestamp generating function
function cal_gen_tsmp1 (dt_datetime) {
	return(this.gen_date(dt_datetime) + ' ' + this.gen_time(dt_datetime));
}

// date generating function
function cal_gen_date1 (dt_datetime) {
	return (
		(dt_datetime.getDate() < 10 ? '0' : '') + dt_datetime.getDate() + "-"
		+ (dt_datetime.getMonth() < 9 ? '0' : '') + (dt_datetime.getMonth() + 1) + "-"
		+ dt_datetime.getFullYear()
	);
}
// time generating function
function cal_gen_time1 (dt_datetime) {
	return (
		(dt_datetime.getHours() < 10 ? '0' : '') + dt_datetime.getHours() + ":"
		+ (dt_datetime.getMinutes() < 10 ? '0' : '') + (dt_datetime.getMinutes()) + ":"
		+ (dt_datetime.getSeconds() < 10 ? '0' : '') + (dt_datetime.getSeconds())
	);
}

// timestamp parsing function
function cal_prs_tsmp1 (str_datetime) {
	// if no parameter specified return current timestamp
	if (!str_datetime)
		return (new Date());

	// if positive integer treat as milliseconds from epoch
	if (RE_NUM.exec(str_datetime))
		return new Date(str_datetime);
		
	// else treat as date in string format
	var arr_datetime = str_datetime.split(' ');
	return this.prs_time(arr_datetime[1], this.prs_date(arr_datetime[0]));
}

// date parsing function
function cal_prs_date1 (str_date) {

	var arr_date = str_date.split('-');

	if (arr_date.length != 3) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_1_1_fr + str_date + error_date_message_1_2_fr);
		else return cal_error (error_date_message_1_1_en + str_date + error_date_message_1_2_en);
	}
	if (!arr_date[0])
	{
		if (lang == lang_fr) return cal_error (error_date_message_1_1_fr + str_date + error_date_message_2_1_fr);
		else return cal_error (error_date_message_1_1_en + str_date + error_date_message_2_1_en);
	}
	if (!RE_NUM.exec(arr_date[0])) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_3_1_fr + arr_date[0] + error_date_message_3_2_fr);
		else return cal_error (error_date_message_3_1_en + arr_date[0] + error_date_message_3_2_en);
	}
	if (!arr_date[1]) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_1_1_fr + str_date + error_date_message_4_1_fr);
		else return cal_error (error_date_message_1_1_en + str_date + error_date_message_4_1_en);
	}
	if (!RE_NUM.exec(arr_date[1])) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_5_1_fr + arr_date[1] + error_date_message_3_2_fr);
		else return cal_error (error_date_message_5_1_en + arr_date[1] + error_date_message_3_2_en);
	}
	if (!arr_date[2]) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_1_1_fr + str_date + error_date_message_6_1_fr);
		else return cal_error (error_date_message_1_1_en + str_date + error_date_message_6_1_en);
	}
	if (!RE_NUM.exec(arr_date[2])) 
	{
		if (lang == lang_fr) return cal_error (error_date_message_7_1_fr + arr_date[2] + error_date_message_3_2_fr);
		else return cal_error (error_date_message_7_1_en + arr_date[2] + error_date_message_3_2_en);
	}

	var dt_date = new Date();
	dt_date.setDate(1);

	if (arr_date[1] < 1 || arr_date[1] > 12) 
	{
		if (lang == lang_fr)
			return cal_error (error_date_message_5_1_fr + arr_date[1] + error_date_message_8_1_fr);
		else
			return cal_error (error_date_message_5_1_en + arr_date[1] + error_date_message_8_1_en);
	}
	dt_date.setMonth(arr_date[1]-1);
	 
	if (arr_date[2] < 100) arr_date[2] = Number(arr_date[2]) + (arr_date[2] < NUM_CENTYEAR ? 2000 : 1900);
	dt_date.setFullYear(arr_date[2]);

	var dt_numdays = new Date(arr_date[2], arr_date[1], 0);
	dt_date.setDate(arr_date[0]);
	if (dt_date.getMonth() != (arr_date[1]-1)) 
	{
		if (lang == lang_fr) 
			return cal_error (error_date_message_5_1_fr + arr_date[0] + error_date_message_9_1_fr+dt_numdays.getDate()+".");
		else 
			return cal_error (error_date_message_5_1_en + arr_date[0] + error_date_message_9_1_en+dt_numdays.getDate()+".");
	}
	return (dt_date)
}

// time parsing function
function cal_prs_time1 (str_time, dt_date, lang) {

	if (!dt_date) return null;
	var arr_time = String(str_time ? str_time : '').split(':');

	if (!arr_time[0]) dt_date.setHours(0);
	else if (RE_NUM.exec(arr_time[0]))
		if (arr_time[0] < 24) dt_date.setHours(arr_time[0]);
		else 
		{
			if (lang == lang_fr)
				return cal_error (error_hour_message_1_1_fr + arr_time[0] + error_hour_message_1_2_fr);
			else
				return cal_error (error_hour_message_1_1_en + arr_time[0] + error_hour_message_1_2_en);
		}
	else 
	{
		if (lang == lang_fr)
			return cal_error (error_hour_message_1_1_fr + arr_time[0] + error_hour_message_1_3_fr);
		else
			return cal_error (error_hour_message_1_1_en + arr_time[0] + error_hour_message_1_3_en);
	}
	if (!arr_time[1]) dt_date.setMinutes(0);
	else if (RE_NUM.exec(arr_time[1]))
		if (arr_time[1] < 60) dt_date.setMinutes(arr_time[1]);
		else 
		{
			if (lang == lang_fr) 
				return cal_error (error_minute_message_1_1_fr + arr_time[1] + error_minute_message_1_2_fr);
			else
				return cal_error (error_minute_message_1_1_en + arr_time[1] + error_minute_message_1_2_en);
		}
	else 
	{
		if (lang == lang_fr)
			return cal_error (error_minute_message_1_1_fr + arr_time[1] + error_hour_message_1_3_fr);
		else
			return cal_error (error_minute_message_1_1_en + arr_time[1] + error_hour_message_1_3_en);
	}

	if (!arr_time[2]) dt_date.setSeconds(0);
	else if (RE_NUM.exec(arr_time[2]))
		if (arr_time[2] < 60) dt_date.setSeconds(arr_time[2]);
		else
		{
			if (lang == lang_fr)
				return cal_error (error_second_message_1_1_fr + arr_time[2] + error_second_message_1_2_fr);
			else
				return cal_error (error_second_message_1_1_en + arr_time[2] + error_second_message_1_2_en);
		}
	else
	{
		if (lang == lang_fr) 
			return cal_error (error_second_message_1_1_fr + arr_time[2] + error_hour_message_1_3_fr);
		else
			return cal_error (error_second_message_1_1_en + arr_time[2] + error_hour_message_1_3_en);
	}

	dt_date.setMilliseconds(0);
	return dt_date;
}

function cal_error (str_message) {
	alert (str_message);
	return null;
}