You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
432 lines
14 KiB
432 lines
14 KiB
/***************************************************************************
|
|
* Copyright (C) 2003 by Jonathan Singer *
|
|
* jsinger@leeta.net *
|
|
* Calendar routines from Hebrew Calendar by Frank Yellin *
|
|
* *
|
|
* This program is free software; you can redistribute it and/or modify *
|
|
* it under the terms of the GNU General Public License as published by *
|
|
* the Free Software Foundation; either version 2 of the License, or *
|
|
* (at your option) any later version. *
|
|
***************************************************************************/
|
|
#include "holiday.h"
|
|
#include <tdelocale.h>
|
|
|
|
bool Holiday::CholP;
|
|
bool Holiday::OmerP;
|
|
bool Holiday::ParshaP;
|
|
|
|
TQStringList Holiday::holidays;
|
|
int Holiday::HolidayFlags;
|
|
|
|
Holiday::Holiday()
|
|
{
|
|
|
|
}
|
|
|
|
Holiday::~Holiday()
|
|
{
|
|
}
|
|
|
|
/* Given a day of the Hebrew month, figuring out all the interesting holidays that
|
|
* correspond to that date. ParshaP, OmerP, and CholP determine whether we should
|
|
* given info about the Parsha of the week, the Sfira, or Chol Hamoed.
|
|
*
|
|
* We are also influenced by the IsraelP flag
|
|
*/
|
|
|
|
TQStringList
|
|
Holiday::FindHoliday(int month, int day, int weekday, int kvia,
|
|
bool leap_year_p, bool israel_p,
|
|
int day_number, int year)
|
|
{
|
|
|
|
enum
|
|
{ Sunday = 1, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday
|
|
};
|
|
|
|
holidays.clear();
|
|
bool shabbat_p = (weekday == Saturday); // Is it a Saturday?
|
|
|
|
// Treat Adar in a non-leap year as if it were Adar II.
|
|
if ((month == 12) && !leap_year_p)
|
|
month = 13;
|
|
switch (month)
|
|
{
|
|
case 1: /* Nissan */
|
|
switch (day)
|
|
{
|
|
case 1:
|
|
if (shabbat_p)
|
|
holidays <<
|
|
i18n
|
|
("These are Jewish holidays and mostly do not have translations. They may have different spellings in your language; otherwise, just translate the sound to your characters",
|
|
"Sh. HaHodesh");
|
|
break;
|
|
case 14:
|
|
if (!shabbat_p)
|
|
// If it's Shabbat, we have three pieces of info.
|
|
// This is the least important.
|
|
holidays << i18n("Erev Pesach");
|
|
/* Fall thru */
|
|
case 8:
|
|
case 9:
|
|
case 10:
|
|
case 11:
|
|
case 12:
|
|
case 13:
|
|
// The Saturday before Pesach (8th-14th)
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. HaGadol");
|
|
break;
|
|
case 15:
|
|
case 16:
|
|
case 21:
|
|
case 22:
|
|
if (!israel_p || (day == 15) || (day == 21))
|
|
{
|
|
holidays << i18n("Pesach");
|
|
break;
|
|
}
|
|
else if (day == 22)
|
|
break;
|
|
/* else fall through */
|
|
case 17:
|
|
case 18:
|
|
case 19:
|
|
case 20:
|
|
if (CholP)
|
|
holidays << i18n("Chol Hamoed");
|
|
break;
|
|
case 27:
|
|
// Yom HaShoah only exists since Israel was established.
|
|
if (year > 1948 + 3760)
|
|
holidays << i18n("Yom HaShoah");
|
|
break;
|
|
}
|
|
if ((day > 15) && OmerP)
|
|
// Count the Omer, starting after the first day of Pesach.
|
|
holidays << Sfirah(day - 15);
|
|
break;
|
|
|
|
case 2: /* Iyar */
|
|
switch (day)
|
|
{
|
|
case 2:
|
|
case 3:
|
|
case 4:
|
|
case 5:
|
|
// Yom HaAtzmaut is on the 5th, unless that's a Saturday, in which
|
|
// case it is moved back two days to Thursday. Yom HaZikaron is
|
|
// the day before Yom HaAtzmaut.
|
|
if (year >= 1948 + 3760)
|
|
{ // only after Israel established.
|
|
switch (weekday)
|
|
{
|
|
case Wednesday:
|
|
if (day == 5)
|
|
holidays << i18n("Yom HaAtzmaut");
|
|
else
|
|
holidays << i18n("Yom HaZikaron");
|
|
break;
|
|
case Thursday:
|
|
// This can't be 2 Iyar.
|
|
holidays << i18n("Yom HaAtzmaut");
|
|
break;
|
|
case Friday:
|
|
case Saturday:
|
|
// These are never either of them.
|
|
break;
|
|
default:
|
|
// All other days follow the normal rules.
|
|
if (day == 4)
|
|
holidays << i18n("Yom HaZikaron");
|
|
else if (day == 5)
|
|
holidays << i18n("Yom HaAtzmaut");
|
|
}
|
|
}
|
|
break;
|
|
case 28:
|
|
// only since the 1967 war
|
|
if (year > 1967 + 3760)
|
|
holidays << i18n("Yom Yerushalayim");
|
|
break;
|
|
case 18:
|
|
holidays << i18n("Lag BaOmer");
|
|
break;
|
|
}
|
|
if ((day != 18) && OmerP)
|
|
// Sfirah the whole month. But Lag BaOmer is already mentioned.
|
|
holidays << Sfirah(day + 15);
|
|
|
|
break;
|
|
|
|
case 3: /* Sivan */
|
|
switch (day)
|
|
{
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
case 4:
|
|
// Sfirah until Shavuot
|
|
if (OmerP)
|
|
holidays << Sfirah(day + 44);
|
|
break;
|
|
case 5:
|
|
// Don't need to mention Sfira(49) if there's already two other
|
|
// pieces of information
|
|
if (OmerP && !shabbat_p)
|
|
holidays << Sfirah(49);
|
|
holidays << i18n("Erev Shavuot");
|
|
break;
|
|
case 6:
|
|
case 7:
|
|
if (!israel_p || (day == 6))
|
|
holidays << i18n("Shavuot");
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 4: /* Tamuz */
|
|
// 17th of Tamuz, except Shabbat pushes it to Sunday.
|
|
if ((!shabbat_p && (day == 17))
|
|
|| ((weekday == 1) && (day == 18)))
|
|
holidays << i18n("Tzom Tammuz");
|
|
break;
|
|
|
|
case 5: /* Ab */
|
|
if (shabbat_p && (3 <= day) && (day <= 16))
|
|
// The shabbat before and after Tisha B'Av are special
|
|
if (day <= 9)
|
|
holidays << i18n("Sh. Hazon");
|
|
else
|
|
holidays << i18n("Sh. Nahamu");
|
|
else if ((!shabbat_p && (day == 9))
|
|
|| ((weekday == 1) && (day == 10)))
|
|
// 9th of Av, except Shabbat pushes it to Sunday.
|
|
holidays << i18n("Tisha B'Av");
|
|
break;
|
|
|
|
case 6: /* Elul */
|
|
if ((day >= 20) && (day <= 26) && shabbat_p)
|
|
holidays << i18n("S'lichot");
|
|
else if (day == 29)
|
|
holidays << i18n("Erev R.H.");
|
|
break;
|
|
|
|
case 7: /* Tishrei */
|
|
switch (day)
|
|
{
|
|
case 1:
|
|
case 2:
|
|
holidays << i18n("Rosh Hashana");
|
|
break;
|
|
case 3:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Shuvah");
|
|
else
|
|
holidays << i18n("Tzom Gedalia");
|
|
break;
|
|
case 4:
|
|
if (weekday == 1)
|
|
holidays << i18n("Tzom Gedalia");
|
|
/* fall through */
|
|
case 5:
|
|
case 6:
|
|
case 7:
|
|
case 8:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Shuvah");
|
|
break;
|
|
case 9:
|
|
holidays << i18n("Erev Y.K.");
|
|
break;
|
|
case 10:
|
|
holidays << i18n("Yom Kippur");
|
|
break;
|
|
case 14:
|
|
holidays << i18n("Erev Sukkot");
|
|
break;
|
|
case 15:
|
|
case 16:
|
|
if (!israel_p || (day == 15))
|
|
{
|
|
holidays << i18n("Sukkot");
|
|
break;
|
|
}
|
|
/* else fall through */
|
|
case 17:
|
|
case 18:
|
|
case 19:
|
|
case 20:
|
|
if (CholP)
|
|
holidays << i18n("Chol Hamoed");
|
|
break;
|
|
case 21:
|
|
holidays << i18n("Hoshana Rabah");
|
|
break;
|
|
case 22:
|
|
holidays << i18n("Shmini Atzeret");
|
|
break;
|
|
case 23:
|
|
if (!israel_p)
|
|
holidays << i18n("Simchat Torah");
|
|
break;
|
|
}
|
|
break;
|
|
case 8: /* Cheshvan */
|
|
break;
|
|
|
|
case 9: /* Kislev */
|
|
if (day == 24)
|
|
holidays << i18n("Erev Hanukah");
|
|
else if (day >= 25)
|
|
holidays << i18n("Hanukah");
|
|
break;
|
|
|
|
case 10: /* Tevet */
|
|
if (day <= (kvia == 0 ? 3 : 2))
|
|
// Need to know length of Kislev to determine last day of Chanukah
|
|
holidays << i18n("Hanukah");
|
|
else if (((day == 10) && !shabbat_p)
|
|
|| ((day == 11) && (weekday == 1)))
|
|
// 10th of Tevet. Shabbat pushes it to Sunday
|
|
holidays << i18n("Tzom Tevet");
|
|
break;
|
|
|
|
case 11: /* Shvat */
|
|
switch (day)
|
|
{
|
|
// The info for figuring out Shabbat Shirah is from the Gnu code. I
|
|
// assume it's correct.
|
|
// static char *song = i18n("Sh. Shirah";
|
|
case 10:
|
|
if ((kvia != 0) && shabbat_p)
|
|
holidays << i18n("Sh. Shirah");
|
|
break;
|
|
case 11:
|
|
case 12:
|
|
case 13:
|
|
case 14:
|
|
case 16:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Shirah");
|
|
break;
|
|
case 15:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Shirah");
|
|
holidays << i18n("Tu B'Shvat");
|
|
case 17:
|
|
if ((kvia == 0) && shabbat_p)
|
|
holidays << i18n("Sh. Shirah");
|
|
break;
|
|
case 25:
|
|
case 26:
|
|
case 27:
|
|
case 28:
|
|
case 29:
|
|
case 30:
|
|
// The last shabbat on or before 1 Adar or 1 AdarII
|
|
if (shabbat_p && !leap_year_p)
|
|
holidays << i18n("Sh. Shekalim");
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 12: /* Adar I */
|
|
if (day == 14)
|
|
// Eat Purim Katan Candy
|
|
holidays << i18n("Purim Katan");
|
|
else if ((day >= 25) && shabbat_p)
|
|
// The last shabbat on or before 1 Adar II.
|
|
holidays << i18n("Sh. Shekalim");
|
|
break;
|
|
|
|
case 13: /* Adar II or Adar */
|
|
switch (day)
|
|
{
|
|
case 1:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Shekalim");
|
|
break;
|
|
case 11:
|
|
case 12:
|
|
// Ta'anit ester is on the 13th. But shabbat moves it back to
|
|
// Thursday.
|
|
if (weekday == Thursday)
|
|
holidays << i18n("Ta'anit Ester");
|
|
/* Fall thru */
|
|
case 7:
|
|
case 8:
|
|
case 9:
|
|
case 10:
|
|
// The Shabbat before purim is Shabbat Zachor
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Zachor");
|
|
break;
|
|
case 13:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Zachor");
|
|
else
|
|
holidays << i18n("Erev Purim");
|
|
// It's Ta'anit Esther, unless it's a Friday or Saturday
|
|
if (weekday < Friday)
|
|
holidays << i18n("Ta'anit Ester");
|
|
break;
|
|
case 14:
|
|
holidays << i18n("Purim");
|
|
break;
|
|
case 15:
|
|
if (!shabbat_p)
|
|
holidays << i18n("Shushan Purim");
|
|
break;
|
|
case 16:
|
|
if (weekday == 1)
|
|
holidays << i18n("Shushan Purim");
|
|
break;
|
|
case 17:
|
|
case 18:
|
|
case 19:
|
|
case 20:
|
|
case 21:
|
|
case 22:
|
|
case 23:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. Parah");
|
|
break;
|
|
case 24:
|
|
case 25:
|
|
case 26:
|
|
case 27:
|
|
case 28:
|
|
case 29:
|
|
if (shabbat_p)
|
|
holidays << i18n("Sh. HaHodesh");
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
if (shabbat_p && ParshaP)
|
|
// Find the Parsha on Shabbat.
|
|
holidays << Parsha::FindParshaName(day_number, kvia, leap_year_p,
|
|
israel_p);
|
|
return holidays;
|
|
}
|
|
|
|
/* Return a string corresponding to the nth day of the Omer */
|
|
TQString Holiday::Sfirah(int day)
|
|
{
|
|
/*static char buffer[40];
|
|
char *endings[] = {"th", "st", "nd", "rd"};
|
|
int remainder = day % 10;
|
|
// 11-19 and anything not ending with 1, 2, or 3 uses -th as suffix.
|
|
if ( ((day >= 11) && (day <= 19)) || (remainder > 3)) remainder = 0;
|
|
sprintf(buffer, "%d%s day Omer", day, endings[remainder]);
|
|
return buffer; */
|
|
TQString buffer;
|
|
|
|
buffer.setNum(day);
|
|
buffer + i18n(" Omer"); // Fix this to original function
|
|
return buffer;
|
|
|
|
}
|