https://www.jjstl.com/cp/resources/tigra/tcal.js

1// Tigra Calendar v5.2 (11/20/2011)
2// http://www.softcomplex.com/products/tigra_calendar/
3// License: Public Domain... You're welcome.
4
5// default settins - this structure can be moved in separate file in multilangual applications
6var A_TCALCONF = {
7	'cssprefix'  : 'tcal',
8	'months'     : ['January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December'],
9	'weekdays'   : ['Su', 'Mo', 'Tu', 'We', 'Th', 'Fr', 'Sa'],
10	'longwdays'  : ['Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday'],
11	'yearscroll' : true, // show year scroller
12	'weekstart'  : 0, // first day of week: 0-Su or 1-Mo
13	'prevyear'   : 'Previous Year',
14	'nextyear'   : 'Next Year',
15	'prevmonth'  : 'Previous Month',
16	'nextmonth'  : 'Next Month',
17	'format'     : 'm/d/Y' // 'd-m-Y', Y-m-d', 'l, F jS Y'
18};
19
20var A_TCALTOKENS = [
21	 // A full numeric representation of a year, 4 digits
22	{'t': 'Y', 'r': '19\\d{2}|20\\d{2}', 'p': function (d_date, n_value) { d_date.setFullYear(Number(n_value)); return d_date; }, 'g': function (d_date) { var n_year = d_date.getFullYear(); return n_year; }},
23	 // Numeric representation of a month, with leading zeros
24	{'t': 'm', 'r': '0?[1-9]|1[0-2]', 'p': function (d_date, n_value) { d_date.setMonth(Number(n_value) - 1); return d_date; }, 'g': function (d_date) { var n_month = d_date.getMonth() + 1; return (n_month < 10 ? '0' : '') + n_month }},
25	 // A full textual representation of a month, such as January or March
26	{'t': 'F', 'r': A_TCALCONF.months.join('|'), 'p': function (d_date, s_value) { for (var m = 0; m < 12; m++) if (A_TCALCONF.months[m] == s_value) { d_date.setMonth(m); return d_date; }}, 'g': function (d_date) { return A_TCALCONF.months[d_date.getMonth()]; }},
27	 // Day of the month, 2 digits with leading zeros
28	{'t': 'd', 'r': '0?[1-9]|[12][0-9]|3[01]', 'p': function (d_date, n_value) { d_date.setDate(Number(n_value)); if (d_date.getDate() != n_value) d_date.setDate(0); return d_date }, 'g': function (d_date) { var n_date = d_date.getDate(); return (n_date < 10 ? '0' : '') + n_date; }},
29	// Day of the month without leading zeros
30	{'t': 'j', 'r': '0?[1-9]|[12][0-9]|3[01]', 'p': function (d_date, n_value) { d_date.setDate(Number(n_value)); if (d_date.getDate() != n_value) d_date.setDate(0); return d_date }, 'g': function (d_date) { var n_date = d_date.getDate(); return n_date; }},
31	 // A full textual representation of the day of the week
32	{'t': 'l', 'r': A_TCALCONF.longwdays.join('|'), 'p': function (d_date, s_value) { return d_date }, 'g': function (d_date) { return A_TCALCONF.longwdays[d_date.getDay()]; }},
33	// English ordinal suffix for the day of the month, 2 characters
34	{'t': 'S', 'r': 'st|nd|rd|th', 'p': function (d_date, s_value) { return d_date }, 'g': function (d_date) { n_date = d_date.getDate(); if (n_date % 10 == 1 && n_date != 11) return 'st'; if (n_date % 10 == 2 && n_date != 12) return 'nd'; if (n_date % 10 == 3 && n_date != 13) return 'rd'; return 'th'; }}
35	
36];
37
38function f_tcalGetHTML (d_date) {
39
40	var e_input = f_tcalGetInputs(true);
41	if (!e_input) return;
42
43	var s_pfx = A_TCALCONF.cssprefix,
44		s_format = A_TCALCONF.format;
45
46	// today from config or client date
47	var d_today = f_tcalParseDate(A_TCALCONF.today, A_TCALCONF.format);
48	if (!d_today)
49		d_today = f_tcalResetTime(new Date());
50
51	// selected date from input or config or today 
52	var d_selected = f_tcalParseDate(e_input.value, s_format);
53	if (!d_selected)
54		d_selected = f_tcalParseDate(A_TCALCONF.selected, A_TCALCONF.format);
55	if (!d_selected)
56		d_selected = new Date(d_today);
57	
58	// show calendar for passed or selected date
59	d_date = d_date ? f_tcalResetTime(d_date) : new Date(d_selected);
60
61	var d_firstDay = new Date(d_date);
62	d_firstDay.setDate(1);
63	d_firstDay.setDate(1 - (7 + d_firstDay.getDay() - A_TCALCONF.weekstart) % 7);
64
65	var a_class, s_html = '<table id="' + s_pfx + 'Controls"><tbody><tr>'
66		+ (A_TCALCONF.yearscroll ? '<td id="' + s_pfx + 'PrevYear" ' + f_tcalRelDate(d_date, -1, 'y') + ' title="' + A_TCALCONF.prevyear + '"></td>' : '')
67		+ '<td id="' + s_pfx + 'PrevMonth"' + f_tcalRelDate(d_date, -1) + ' title="' + A_TCALCONF.prevmonth + '"></td><th>'
68		+ A_TCALCONF.months[d_date.getMonth()] + ' ' + d_date.getFullYear()
69		+ '</th><td id="' + s_pfx + 'NextMonth"' + f_tcalRelDate(d_date, 1) + ' title="' + A_TCALCONF.nextmonth + '"></td>'
70		+ (A_TCALCONF.yearscroll ? '<td id="' + s_pfx + 'NextYear"' + f_tcalRelDate(d_date, 1, 'y') + ' title="' + A_TCALCONF.nextyear + '"></td>' : '')
71		+ '</tr></tbody></table><table id="' + s_pfx + 'Grid"><tbody><tr>';
72
73	// print weekdays titles
74	for (var i = 0; i < 7; i++)
75		s_html += '<th>' + A_TCALCONF.weekdays[(A_TCALCONF.weekstart + i) % 7] + '</th>';
76	s_html += '</tr>' ;
77
78	// print calendar table
79	var n_date, n_month, d_current = new Date(d_firstDay);
80	while (d_current.getMonth() == d_date.getMonth() ||
81		d_current.getMonth() == d_firstDay.getMonth()) {
82
83		s_html +='<tr>';
84		for (var n_wday = 0; n_wday < 7; n_wday++) {
85
86			a_class = [];
87			n_date  = d_current.getDate();
88			n_month = d_current.getMonth();
89
90			if (d_current.getMonth() != d_date.getMonth())
91				a_class[a_class.length] = s_pfx + 'OtherMonth';
92			if (d_current.getDay() == 0 || d_current.getDay() == 6)
93				a_class[a_class.length] = s_pfx + 'Weekend';
94			if (d_current.valueOf() == d_today.valueOf())
95				a_class[a_class.length] = s_pfx + 'Today';
96			if (d_current.valueOf() == d_selected.valueOf())
97				a_class[a_class.length] = s_pfx + 'Selected';
98
99			s_html += '<td' + f_tcalRelDate(d_current) + (a_class.length ? ' class="' + a_class.join(' ') + '">' : '>') + n_date + '</td>';
100			d_current.setDate(++n_date);
101		}
102		s_html +='</tr>';
103	}
104	s_html +='</tbody></table>';
105
106	return s_html;
107}
108
109function f_tcalRelDate (d_date, d_diff, s_units) {
110
111	var s_units = (s_units == 'y' ? 'FullYear' : 'Month');
112	var d_result = new Date(d_date);
113	if (d_diff) {
114		d_result['set' + s_units](d_date['get' + s_units]() + d_diff);
115		if (d_result.getDate() != d_date.getDate())
116			d_result.setDate(0);
117	}
118	return ' onclick="f_tcalUpdate(' + d_result.valueOf() + (d_diff ? ',1' : '') + ')"';
119}
120
121function f_tcalResetTime (d_date) {
122	d_date.setMilliseconds(0);
123	d_date.setSeconds(0);
124	d_date.setMinutes(0);
125	d_date.setHours(12);
126	return d_date;
127}
128
129// closes calendar and returns all inputs to default state
130function f_tcalCancel () {
131	
132	var s_pfx = A_TCALCONF.cssprefix;
133	var e_cal = document.getElementById(s_pfx);
134	if (e_cal)
135		e_cal.style.visibility = '';
136	var a_inputs = f_tcalGetInputs();
137	for (var n = 0; n < a_inputs.length; n++)
138		f_tcalRemoveClass(a_inputs[n], s_pfx + 'Active');
139}
140
141function f_tcalUpdate (n_date, b_keepOpen) {
142
143	var e_input = f_tcalGetInputs(true);
144	if (!e_input) return;
145	
146	d_date = new Date(n_date);
147	var s_pfx = A_TCALCONF.cssprefix;
148
149	if (b_keepOpen) {
150		var e_cal = document.getElementById(s_pfx);
151		if (!e_cal || e_cal.style.visibility != 'visible') return;
152		e_cal.innerHTML = f_tcalGetHTML(d_date, e_input);
153	}
154	else {
155		e_input.value = f_tcalGenerateDate(d_date, A_TCALCONF.format);
156		f_tcalCancel();
157			
158		d_year = d_date.getFullYear();
159		d_month = (d_date.getMonth()) * 1 + 1;
160		d_day = d_date.getDate();
161		if(d_month < 10) d_month = "0" + (d_month * 1);
162		if(d_day < 10) d_day = "0" + (d_day * 1);
163		datestr = d_year + "-" + d_month + "-" + d_day;
164		
165		eval("cal_select_" + e_input.name + "('" + datestr + "')");
166	}
167}
168
169function f_tcalOnClick () {
170
171	// see if already opened
172	var s_pfx = A_TCALCONF.cssprefix;
173	var s_activeClass = s_pfx + 'Active';
174	var b_close = f_tcalHasClass(this, s_activeClass);
175
176	// close all clalendars
177	f_tcalCancel();
178	if (b_close) return;
179
180	// get position of input
181	f_tcalAddClass(this, s_activeClass);
182	
183	var n_left = f_getPosition (this, 'Left'),
184		n_top  = f_getPosition (this, 'Top') + this.offsetHeight;
185
186	var e_cal = document.getElementById(s_pfx);
187	if (!e_cal) {
188		e_cal = document.createElement('div');
189		e_cal.onselectstart = function () { return false };
190		e_cal.id = s_pfx;
191		document.getElementsByTagName("body").item(0).appendChild(e_cal);
192	}
193	e_cal.innerHTML = f_tcalGetHTML(null);
194	e_cal.style.top = n_top + 'px';
195	e_cal.style.left = (n_left + this.offsetWidth - e_cal.offsetWidth) + 'px';
196	e_cal.style.visibility = 'visible';
197}
198
199function f_tcalParseDate (s_date, s_format) {
200
201	if (!s_date) return;
202
203	var s_char, s_regexp = '^', a_tokens = {}, a_options, n_token = 0;
204	for (var n = 0; n < s_format.length; n++) {
205		s_char = s_format.charAt(n);
206		if (A_TCALTOKENS_IDX[s_char]) {
207			a_tokens[s_char] = ++n_token;
208			s_regexp += '(' + A_TCALTOKENS_IDX[s_char]['r'] + ')';
209		}
210		else if (s_char == ' ')
211			s_regexp += '\\s';
212		else
213			s_regexp += (s_char.match(/[\w\d]/) ? '' : '\\') + s_char;
214	}
215	var r_date = new RegExp(s_regexp + '$');
216	if (!s_date.match(r_date)) return;
217	
218	var s_val, d_date = f_tcalResetTime(new Date());
219	d_date.setDate(1);
220
221	for (n = 0; n < A_TCALTOKENS.length; n++) {
222		s_char = A_TCALTOKENS[n]['t'];
223		if (!a_tokens[s_char])
224			continue;
225		s_val = RegExp['$' + a_tokens[s_char]];
226		d_date = A_TCALTOKENS[n]['p'](d_date, s_val);
227	}
228	
229	return d_date;
230}
231
232function f_tcalGenerateDate (d_date, s_format) {
233	
234	var s_char, s_date = '';
235	for (var n = 0; n < s_format.length; n++) {
236		s_char = s_format.charAt(n);
237		s_date += A_TCALTOKENS_IDX[s_char] ? A_TCALTOKENS_IDX[s_char]['g'](d_date) : s_char;
238	}
239	return s_date;
240}
241
242function f_tcalGetInputs (b_active) {
243
244	var a_inputs = document.getElementsByTagName('input'),
245		e_input, s_rel, a_result = [];
246	for (n = 0; n < a_inputs.length; n++) {
247
248		e_input = a_inputs[n];
249		if (!e_input.type || e_input.type != 'text')
250			continue;
251
252		if (!f_tcalHasClass(e_input, 'tcal'))
253			continue;
254
255		if (b_active && f_tcalHasClass(e_input, A_TCALCONF.cssprefix + 'Active'))
256			return e_input;
257
258		a_result[a_result.length] = e_input;
259	}
260	return b_active ? null : a_result;
261}
262
263function f_tcalHasClass (e_elem, s_class) {
264	var s_classes = e_elem.className;
265	if (!s_classes)
266		return false;

267	var a_classes = s_classes.split(' ');
268	for (var n = 0; n < a_classes.length; n++)
269		if (a_classes[n] == s_class)
270			return true;
271	return false;
272}
273
274function f_tcalAddClass (e_elem, s_class) {
275	if (f_tcalHasClass (e_elem, s_class))
276		return;
277
278	var s_classes = e_elem.className;
279	e_elem.className = (s_classes ? s_classes + ' ' : '') + s_class;
280}
281
282function f_tcalRemoveClass (e_elem, s_class) {
283	var s_classes = e_elem.className;
284	if (!s_classes || s_classes.indexOf(s_class) == -1)
285		return false;
286
287	var a_classes = s_classes.split(' '),
288		a_newClasses = [];
289
290	for (var n = 0; n < a_classes.length; n++) {
291		if (a_classes[n] == s_class)
292			continue;
293		a_newClasses[a_newClasses.length] = a_classes[n];
294	}
295	e_elem.className = a_newClasses.join(' ');
296	return true;
297}
298
299function f_getPosition (e_elemRef, s_coord) {
300	var n_pos = 0, n_offset,
301		e_elem = e_elemRef;
302
303	while (e_elem) {
304		n_offset = e_elem["offset" + s_coord];
305		n_pos += n_offset;
306		e_elem = e_elem.offsetParent;
307	}
308
309	e_elem = e_elemRef;
310	while (e_elem != document.body) {
311		n_offset = e_elem["scroll" + s_coord];
312		if (n_offset && e_elem.style.overflow == 'scroll')
313			n_pos -= n_offset;
314		e_elem = e_elem.parentNode;
315	}
316	return n_pos;
317}
318
319function f_tcalInit () {
320	
321	if (!document.getElementsByTagName)
322		return;
323
324	var e_input, a_inputs = f_tcalGetInputs();
325	for (var n = 0; n < a_inputs.length; n++) {
326		e_input = a_inputs[n];
327		e_input.onclick = f_tcalOnClick;
328		f_tcalAddClass(e_input, A_TCALCONF.cssprefix + 'Input');
329	}
330	
331	window.A_TCALTOKENS_IDX = {};
332	for (n = 0; n < A_TCALTOKENS.length; n++)
333		A_TCALTOKENS_IDX[A_TCALTOKENS[n]['t']] = A_TCALTOKENS[n];
334}
335
336function f_tcalAddOnload (f_func) {
337	if (document.addEventListener) {
338		window.addEventListener('load', f_func, false);
339	}
340	else if (window.attachEvent) {
341		window.attachEvent('onload', f_func);
342	}
343	else {
344		var f_onLoad = window.onload;
345		if (typeof window.onload != 'function') {
346			window.onload = f_func;
347		}
348		else {
349			window.onload = function() {
350				f_onLoad();
351				f_func();
352			}
353		}
354	}
355}
356
357f_tcalAddOnload (f_tcalInit);