/*
 * Nameday   ver  2.0.1  2003-11-02
 * Copyright (c) 2002-2003 by Michal Nazarewicz (mina86@tlen.pl)
 *
 * This script is free software; It is ditributed under terms of
 * GNU Lesser General Public License. Copy of the license can be found
 * at www.gnu.org/licenses/licenses.html#LGPL
 *
 * Visit www.projektcode.prv.pl for more..
 */


//
// Tuday's date :)
//
var nameday_date = new Date(),
	nameday_day = nameday_date.getDate(),
	nameday_month = nameday_date.getMonth()+1;



//
// Object representing names
//
function NamedayNames(names) {
	if (names instanceof Array) {
		this.names = names;
	} else {
		this.names = names.split('|');
	}
}

NamedayNames.prototype = {
	join: function(sep, last_sep, limit) {
		// Init args
		switch (arguments.length) {
			case  0: sep = null;
			case  1: last_sep = null;
			case  2: limit = null;
			case  3: break;
			default: return false;
		}


		// Get names
		var names = this.getNames(limit);


		// Join
		if (sep==null) {
			sep = ', ';
		}
		if (last_sep==null) {
			return names.join(sep);
		} else {
			var str = '';
			for (var i = 0; i<names.length; i++) {
				if (i==names.length-1) {
					str += last_sep;
				} else if (i) {
					str += sep;
				}
				str += names[i];
			}
			return str;
		}
	},


	//
	// Returns names as formated string
	//
	toString: function(before, after, sep, last_sep, limit) {
		// Init args
		switch (arguments.length) {
			case  0: before = null;
			case  1: after = null;
			case  2: sep = null;
			case  3: last_sep = null;
			case  4: limit = null;
			case  5: break;
			default: return false;
		}


		// Join names
		var str = this.join(sep, last_sep, limit);
		if (!str) {
			return false;
		}


		// Return
		return (before==null?'':before) + str + (after==null?'':after);
	},


	//
	// Returns names in array (maximum number of names in array is limit
	// or there's no maximum number if limit==0 || limit==null)
	//
	getNames: function(limit) {
		// Check args;
		if (arguments.length>1) {
			return false;
		}

		// All requested
		if (arguments.length==0 || limit==null || limit<1 ||
			limit>=this.names.length) {
			return this.names;

		// Limit requested
		} else {
			var arr = new Array(limit);
			for (var i = 0; i<limit; i++) {
				arr[i] = names[i];
			}
			return arr;
		}
	},


	//
	// Get name at index
	//
	get: function(index) {
		return this.names[index];
	},


	//
	// Get number of names
	//
	count: function() {
		return this.names.length;
	}
};



//
// Object representing set of names for each day of year
//
function NamedaySet(array) {
	this.array = array;
}

NamedaySet.prototype = {
	//
	// Returns NamedayNames object with names of people who have nameday
	// today or in the dth of m  If d or m is null or omitted, todays day
	// and/or month is taken.
	// Note: Months are indexed from 1 !!
	//
	getNames: function(d, m) {
		switch (arguments.length) {
			case  0: d = null;
			case  1: m = null;
			case  2: break;
			default: return false;
		}

		if (d==null) {
			d = nameday_day;
		}
		if (m==null) {
			m = nameday_month;
		}

		return new NamedayNames(this.array[m-1][d-1]);
	}
};




//
// Main object
//
function Nameday() {
	this.sets = new Array();
}


Nameday.prototype = {
	//
	// Returns specyfied set
	//
	getSet: function(lang) {
		if (arguments.length!=1) {
			return false;
		}
		return this.sets['' + lang];
	},


	//
	// Adds set
	//
	addSet: function(lang, set) {
		if (arguments.length!=2) {
			return false;
		}
		if (set instanceof NamedaySet) {
			this.sets['' + lang] = set;
		} else {
			this.sets['' + lang] = new NamedaySet(set);
		}
	}
};

var nameday = new Nameday();



/*
 * Nameday Polish Extension  ver  1.4.2  2003-11-19
 * Copyright (c) 2002-2003 by Michal Nazarewicz (mina86@tlen.pl)
 *
 * This script is free software; It is ditributed under terms of
 * GNU Lesser General Public License. Copy of the license can be found
 * at www.gnu.org/licenses/licenses.html#LGPL
 */


//
// Converts names
//
NamedayNames.prototype.pl_convert = function(method) {
	if (arguments.length!=1) {
		return false;
	}
	if (method==0) {
		return new NamedayNames(this.names);
	}
	if (method!=1) {
		return false;
	}

	var ret = new Array(), name = '';
	for (var i = 0; i<this.names.length; i++) {
		name = this.names[i];

		var len = name.length,
			last3 = name.substring(len-3),
			last2 = name.substring(len-2),
			vowel3 = "aeioóuy".indexOf(name.charAt(len-4))!=-1,
			vowel2 = "aeioóuy".indexOf(name.charAt(len-3))!=-1;

		if (last3=="ego") {
			if (name.substring(len-4, 1)=='l') {
				name = name.substring(0, len-3);
			} else {
				name = name.substring(0, len-3) + "y";
			}
		} else if (last3=="ńca") {
			name = name.substring(0, len-3) + "niec";
		} else if (last3=="tra") {
			name = name.substring(0,len-3) + (vowel3?"tr":"ter");
		} else if (last2=="ka" && !vowel2) {
			name =  name.substring(0,len-2) + "ek";
		} else if (last2=="ła" && !vowel2) {
			name = name.substring(0, len-2) + "ła";
		} else {
			name = name.substring(0, len-1) +
				(last2.substring(2,1)=='a'?'':'a');
		}

		ret[i] = name;
	}
	return new NamedayNames(ret);
};


//
// For backward compatibility
//
function WypiszImieniny(before, after, sep, last_sep, method) {
	switch (arguments.length) {
		case 0: before = null;
		case 1: after = null;
		case 2: sep = null;
		case 3: last_sep = null;
		case 3: method = null;
	}


	var names = PobierzImieniny(sep, last_sep, method);
	if (!names) {
		return false;
	}


	document.write("" + before + names + after);
	return true;
}

function PobierzImieniny(sep, last_sep, method) {
	switch (arguments.length) {
		case 0: sep = null;
		case 1: last_sep = null;
		case 2: method = null;
	}
	if (method==null) {
		method = 0;
	}

	var names;
	if (!(names = nameday.getSet('pl')) || !(names = names.getNames()) ||
		!(names = names.pl_convert(method))) {
		return false;
	}

	return names.toString('', '', sep, last_sep);
}



/*
 * Nameday Polish Names Database  v 2.1
 * Database taken from infoludek.pl/~slawek/imieniny.html
 * +some corrections
 */


nameday.addSet('pl', new Array(
	new Array(
		"Marii|Mieczysława",
		"Izydora|Makarego",
		"Genowefy|Danuty",
		"Anieli|Eugeniusza",
		"Edwarda|Hanny",
		"Kacpra|Melchiora|Baltazara",
		"Juliana|Lucjana",
		"Seweryna|Mścisława",
		"Marceliny|Juliana",
		"Wilhelma|Dobrosława",
		"Honoraty|Matyldy",
		"Czesławy|Arkadiusza",
		"Bogumiły|Weroniki",
		"Feliksa|Hilarego",
		"Pawła|Izydora",
		"Włodzimierza|Marcelego",
		"Antoniego|Rościsława",
		"Piotra|Małgorzaty",
		"Henryka|Mariusza",
		"Sebastiana|Fabiana",
		"Agnieszki|Jarosława",
		"Wincentego|Anastazego",
		"Ildefonsa|Rajmunda",
		"Felicji|Rafała",
		"Miłosza|Pawła",
		"Tymoteusza|Tytusa",
		"Anieli|Przybysława",
		"Tomasza|Walerego",
		"Franciszka|Zdzisława",
		"Martyny|Macieja",
		"Ludwika|Marceli"
	),
	new Array(
		"Brygidy|Ignacego",
		"Marii|Mirosława",
		"Błażeja|Oskara",
		"Andrzeja|Weroniki",
		"Agaty|Adelajdy",
		"Bohdana|Doroty",
		"Ryszarda|Romualda",
		"Piotra|Hieronima",
		"Eryki|Apolonii",
		"Elwiry|Jacka",
		"Marii|Lucjana",
		"Eulalii|Nory",
		"Grzegorza|Katarzyny",
		"Walentego|Cyryla|Metodego",
		"Jowity|Faustyna",
		"Danuty|Juliany",
		"Donata|Łukasza",
		"Konstancji|Szymona",
		"Konrada|Arnolda",
		"Leona|Ludomiła",
		"Eleonory|Kiejstuta",
		"Małgorzaty|Marty",
		"Damiana|Romany",
		"Bogusza|Macieja",
		"Cezarego|Wiktora",
		"Mirosława|Aleksandra",
		"Gabriela|Anastazji",
		"Romana|Makarego",
		"Lecha|Wiktora"
	),
	new Array(
		"Antoniego|Radosława",
		"Heleny|Henryka",
		"Martyny|Kunegundy",
		"Kazimierza|Łucji",
		"Fryderyka|Adriana",
		"Jordana|Róży",
		"Pawła|Tomasza",
		"Beaty|Wincentego",
		"Franciszki|Katarzyny",
		"Cypriana|Marcelego",
		"Konstantyna|Benedykta",
		"Grzegorza|Bernarda",
		"Bożeny|Krystyny",
		"Leona|Matyldy",
		"Ludwiki|Klemensa",
		"Izabeli|Oktawii",
		"Zbigniewa|Patryka",
		"Edwarda|Cyryla",
		"Józefa|Bogdana",
		"Sebastiana|Klaudii",
		"Benedykta|Lubomira",
		"Bogusława|Katarzyny",
		"Feliksa|Pelagii",
		"Gabriela|Marka",
		"Wieńczysława|Marioli",
		"Emanuela|Larysy",
		"Lidii|Ernesta",
		"Anieli|Sykstusa",
		"Wiktora|Bertolda",
		"Amelii|Jana",
		"Beniamina|Balbiny"
	),
	new Array(
		"Grażyny|Teodory",
		"Franciszka|Władysława",
		"Ryszarda|Antoniego",
		"Izodora|Wacława",
		"Ireny|Wincentego",
		"Celestyny|Izoldy",
		"Donata|Jana",
		"Cezarego|Dionizego",
		"Dymitra|Marii",
		"Michała|Makarego",
		"Filipa|Leona",
		"Juliusza|Zenona",
		"Przemysława|Hermenegildy",
		"Justyny|Bereniki",
		"Anastazji|Teodora",
		"Kseni|Bernadetty",
		"Roberta|Rudolfa",
		"Cyryla|Bogusławy",
		"Tymona|Adolfa",
		"Agnieszki|Czesława",
		"Feliksa|Anzelma",
		"Łukasza|Leona",
		"Jerzego|Wojciecha",
		"Grzegorza|Aleksandra",
		"Marka|Jarosława",
		"Marzeny|Klaudiusza",
		"Lidii|Teofila",
		"Anieli|Pawła",
		"Bogusława|Roberta",
		"Mariana|Kaatarzyny"
	),
	new Array(
		"Józefa",
		"Zygmunta|Anastazego",
		"Marii|Antoniny",
		"Floriana|Moniki",
		"Ireny|Waldemara",
		"Filipa|Jakuba",
		"Ludmiły|Benedykta",
		"Stanisława|Wiktora",
		"Grzegorza|Karoliny",
		"Antoniego|Izydora",
		"Igi|Jakuba",
		"Dominika|Pankracego",
		"Roberta|Serwacego",
		"Bonifacego|Macieja",
		"Zofii|Izydora",
		"Andrzeja|Jędrzeja",
		"Sławomira|Weroniki",
		"Eryka|Aleksandry",
		"Piotra|Iwa",
		"Bazylego|Bernardyna",
		"Wiktora|Kryspina",
		"Heleny|Wiesławy",
		"Iwony|Emilii",
		"Joanny|Zuzanny",
		"Grzegorza|Magdaleny",
		"Filipa|Pauliny",
		"Augustyna|Juliusza",
		"Justyny|Jaromira",
		"Magdaleny|Teodozji",
		"Ferdynanda|Feliksa",
		"Anieli|Petroneli"
	),
	new Array(
		"Justyna|Konrada",
		"Marianny|Piotra",
		"Leszka|Tamary",
		"Franciszka|Karola",
		"Bonifacego|Waltera",
		"Norberta|Dominiki",
		"Wiesława|Roberta",
		"Maksyma|Wilhelma",
		"Pelagii|Felicjana",
		"Bogumiła|Małgorzaty",
		"Barnaby|Feliksa",
		"Janiny|Leona",
		"Antoniego|Lucjana",
		"Elizy|Michała",
		"Jolanty|Wita",
		"Aliny|Justyny",
		"Laury|Alberta",
		"Elżbiety|Marka",
		"Gerwazego|Protazego",
		"Bogny|Bożeny",
		"Alicji|Alojzego",
		"Pauliny|Flawiusza",
		"Wandy|Zenona",
		"Jana|Danuty",
		"Łucji|Wilhelma",
		"Jana|Pawła",
		"Maryli|Władysława",
		"Leona|Ireneusza",
		"Piotra|Pawła",
		"Emilii|Lucyny"
	),
	new Array(
		"Haliny|Mariana",
		"Marii|Urbana",
		"Jacka|Tomasza",
		"Malwiny|Izabeli",
		"Antoniego|Karoliny",
		"Dominiki|Łucji",
		"Cyryla|Metodego",
		"Edgara|Elżbiety",
		"Sylwii|Weroniki",
		"Amelii|Filipa",
		"Benedykta|Olgi",
		"Brunona|Jana",
		"Kingi|Andrzeja",
		"Feliksa|Kamila",
		"Henryka|Włodzimierza",
		"Marii|Benedykta",
		"Anety|Aleksego",
		"Kamila|Szymona",
		"Marcina|Alfreda",
		"Czesława|Hieronima",
		"Andrzeja|Daniela",
		"Marii|Magdaleny",
		"Brygidy|Bogny",
		"Kingi|Krystyny",
		"Jakuba|Krzysztofa",
		"Anny|Mirosławy",
		"Julii|Natalii",
		"Wiktora|Innocentego",
		"Marty|Olafa",
		"Piotra|Julity",
		"Heleny|Ignacego"
	),
	new Array(
		"Justyny|Piotra",
		"Gustawa|Alfonsa",
		"Augustyna|Lidii",
		"Franciszka|Dominika",
		"Stanisława|Marii",
		"Jakuba|Sławy",
		"Doroty|Kajetana",
		"Dominika|Cypriana",
		"Romana|Ireny",
		"Bogdana|Borysa",
		"Włodzmierza|Zuzanny",
		"Klary|Lecha",
		"Diany|Hipolita",
		"Alfreda|Maksymiliana",
		"Marii||Steli",
		"Rocha|Stefana",
		"Jacka|Anity",
		"Heleny|Bronisława",
		"Bolesława|Juliana",
		"Bernarda|Sobiesława",
		"Joanna|Kazimiery",
		"Cezarego|Zygfryda",
		"Róży|Filipa",
		"Bartłomieja|Jerzego",
		"Ludwika|Luizy",
		"Marii|Natalii",
		"Cezarego|Moniki",
		"Patrycji|Augustyna",
		"Jana|Sabiny",
		"Róży|Szczęsnego",
		"Bohdana|Rajmunda"
	),
	new Array(
		"Bronisławy|Idziego",
		"Stefana|Juliana",
		"Izabeli|Szymona",
		"Rozalii|Liliany",
		"Doroty|Wawrzyńca",
		"Beaty|Eugeniusza",
		"Reginy|Rafała",
		"Marii|Adrianny",
		"Piotra|Sergiusza",
		"Łukasza|Mikołaja",
		"Jacka|Dagny",
		"Marii|Gwidona",
		"Eugenii|Aureliusza",
		"Wiktora|Bernarda",
		"Albina|Nikodema",
		"Edyty|Kornela",
		"Roberta|Franciszka",
		"Ireny|Stanisława",
		"Konstantego|Teodora",
		"Filipa|Eustachego",
		"Mateusza|Jonasza",
		"Tomasza|Maurycego",
		"Bogusława|Tekli",
		"Daniela|Gerarda",
		"Aureli|Kleofasa",
		"Kosmy|Damiana",
		"Sabiny|Wincentego",
		"Wacława|Marka",
		"Michała|Gabriela",
		"Zofii|Hieronima"
	),
	new Array(
		"Danuty|Romana",
		"Teofila|Dionizego",
		"Teresy|Gerarda",
		"Franciszka|Rozalii",
		"Igora|Marcelego",
		"Artura|Brunona",
		"Marka|Marii",
		"Sergiusza|Bogdana",
		"Arnolda|Dionizego",
		"Franciszka|Daniela",
		"Aldony|Emila",
		"Eustachego|Serafina",
		"Edwarda|Teofila",
		"Bernarda|Kaliksta",
		"Jadwigi|Teresy",
		"Ambrożego|Gawła",
		"Małgorzaty|Wiktora",
		"Juliana|Łukasza",
		"Laury|Piotra",
		"Ireny|Kleopatry",
		"Celiny|Urszuli",
		"Józefiny|Kordiana",
		"Marleny|Seweryna",
		"Rafała|Marcina",
		"Krystyny|Darii",
		"Lucjana|Ewarysta",
		"Iwony|Sabiny",
		"Tadeusza|Szymona",
		"Teodora|Euzebii",
		"Przemysława|Zenobii",
		"Krzysztofa|Augusta"
	),
	new Array(
		"Wszystkich Świętych",
		"Jerzego|Tobiasza",
		"Huberta|Sylwii",
		"Karola|Olgierda",
		"Elżbiety|Sławomira",
		"Feliksa|Leonarda",
		"Antoniego|Ernesta",
		"Wiktora|Seweryna",
		"Teodora|Genowefy",
		"Leona|Leny",
		"Bartłomieja|Marcina",
		"Renaty|Witolda",
		"Mikołaja|Mateusza",
		"Serafina|Agaty",
		"Alberta|Leopolda",
		"Małgorzaty|Edmunda",
		"Grzegorza|Salomei",
		"Klaudyny|Agnieszki",
		"Elżbiety|Seweryny",
		"Rafała|Anatola",
		"Janusza|Konrada",
		"Cecylii|Marka",
		"Adeli|Klemensa",
		"Emmy|Aleksandra",
		"Katarzyny|Erazma",
		"Konrada|Lechosława",
		"Franciszka|Waleriana",
		"Zdzisława|Lesława",
		"Filemona|Błażeja",
		"Andrzeja|Justyny"
	),
	new Array(
		"Natalii|Eligiusza",
		"Balbiny|Pauliny",
		"Franciszka|Ksawerego",
		"Barbary|Krystiana",
		"Edyty|Saby",
		"Mikołaja|Jeremy",
		"Marcina|Ambrożego",
		"Marii|Zenona",
		"Wieslawa|Leokadii",
		"Bohdana|Julii",
		"Damazego|Waldemara",
		"Joanna|Aleksandra",
		"Łucji|Otylii",
		"Alfreda|Izydora",
		"Celiny|Niny",
		"Alicji|Albiny",
		"Jolanty|Floriana",
		"Bogusława|Gracjana",
		"Dariusza|Gabriela",
		"Bogumiły|Dominika",
		"Tomasza|Seweryna",
		"Honoraty|Zenona",
		"Wiktorii|Sławomira",
		"Adama|Ewy|",
		"Anastazjii|Eugenii",
		"Szczepana|Dionizego",
		"Jana|Żanety",
		"Antoniego|Teofilii",
		"Dominika|Tomasza",
		"Eugeniusza|Seweryna",
		"Sylewstra|Melanii"
	)
));