function get_events_list($jd1, $jd2, $events = '')
{
$found_facts = array();
for ($jd = $jd1; $jd <= $jd2; ++$jd) {
$found_facts = array_merge($found_facts, get_anniversary_events($jd, $events));
}
return $found_facts;
}
// Fetch data for day/month/year views
switch ($action) {
case 'today':
$found_facts = apply_filter(get_anniversary_events($cal_date->minJD, $events), $filterof, $filtersx);
break;
case 'calendar':
$cal_date->d = 0;
$cal_date->setJdFromYmd();
// Make a separate list for each day. Unspecified/invalid days go in day 0.
$found_facts = array();
for ($d = 0; $d <= $days_in_month; ++$d) {
$found_facts[$d] = array();
}
// Fetch events for each day
for ($jd = $cal_date->minJD; $jd <= $cal_date->maxJD; ++$jd) {
foreach (apply_filter(get_anniversary_events($jd, $events), $filterof, $filtersx) as $fact) {
$tmp = $fact->getDate()->MinDate();
if ($tmp->d >= 1 && $tmp->d <= $tmp->DaysInMonth()) {
$d = $jd - $cal_date->minJD + 1;
} else {
$d = 0;
}
$found_facts[$d][] = $fact;
}
}
break;
case 'year':
$cal_date->m = 0;
$cal_date->setJdFromYmd();
$found_facts = apply_filter(get_calendar_events($ged_date->MinJD(), $ged_date->MaxJD(), $events), $filterof, $filtersx);
// Eliminate duplicates (e.g. BET JUL 1900 AND SEP 1900 will appear twice in 1900)
function print_yahrzeit($block = true, $config = '', $side, $index)
{
global $pgv_lang, $factarray, $SHOW_ID_NUMBERS, $ctype, $TEXT_DIRECTION;
global $PGV_IMAGE_DIR, $PGV_IMAGES, $PGV_BLOCKS;
global $DAYS_TO_SHOW_LIMIT, $SHOW_MARRIED_NAMES, $SERVER_URL;
$block = true;
// Always restrict this block's height
if (empty($config)) {
$config = $PGV_BLOCKS['print_yahrzeit']['config'];
}
if (empty($config['infoStyle'])) {
$config['infoStyle'] = 'style2';
}
if (empty($config['allowDownload'])) {
$config['allowDownload'] = 'yes';
}
if (empty($config['days'])) {
$config['days'] = $DAYS_TO_SHOW_LIMIT;
}
if ($config['days'] < 1) {
$config['days'] = 1;
}
if ($config['days'] > $DAYS_TO_SHOW_LIMIT) {
$config['days'] = $DAYS_TO_SHOW_LIMIT;
}
$startjd = server_jd();
$endjd = $startjd + max(min($config['days'], 1), $DAYS_TO_SHOW_LIMIT) - 1;
if (!PGV_USER_ID) {
$allowDownload = "no";
}
$id = "yahrzeit";
$title = print_help_link('yahrzeit_help', 'qm', '', false, true);
if ($PGV_BLOCKS['print_yahrzeit']['canconfig']) {
if ($ctype == "gedcom" && PGV_USER_GEDCOM_ADMIN || $ctype == "user" && PGV_USER_ID) {
if ($ctype == "gedcom") {
$name = PGV_GEDCOM;
} else {
$name = PGV_USER_NAME;
}
$title .= "<a href=\"javascript: configure block\" onclick=\"window.open('" . encode_url("index_edit.php?name={$name}&ctype={$ctype}&action=configure&side={$side}&index={$index}") . "', '_blank', 'top=50,left=50,width=600,height=350,scrollbars=1,resizable=1'); return false;\">";
$title .= "<img class=\"adminicon\" src=\"{$PGV_IMAGE_DIR}/{$PGV_IMAGES['admin']['small']}\" width=\"15\" height=\"15\" border=\"0\" alt=\"{$pgv_lang['config_block']}\" /></a>";
}
}
$title .= $pgv_lang['yahrzeit_block'];
$content = "";
// The standard anniversary rules cover most of the Yahrzeit rules, we just
// need to handle a few special cases.
// Fetch normal anniversaries...
$yahrzeits = array();
$hidden = 0;
for ($jd = $startjd - 1; $jd <= $endjd + 30; ++$jd) {
foreach (get_anniversary_events($jd, 'DEAT _YART') as $fact) {
// Extract hebrew dates only
if ($fact['date']->date1->CALENDAR_ESCAPE() == '@#DHEBREW@' && $fact['date']->MinJD() == $fact['date']->MaxJD()) {
// Apply privacy
if (displayDetailsById($fact['id']) && showFactDetails($fact['fact'], $fact['id']) && !FactViewRestricted($fact['id'], $fact['factrec'])) {
$yahrzeits[] = $fact;
} else {
++$hidden;
}
}
}
}
// ...then adjust dates
foreach ($yahrzeits as $key => $yahrzeit) {
if (strpos('1 DEAT', $yahrzeit['factrec']) !== false) {
// Just DEAT, not _YART
$today = new JewishDate($yahrzeit['jd']);
$hd = $yahrzeit['date']->MinDate();
$hd1 = new JewishDate($hd);
$hd1->y += 1;
$hd1->SetJDFromYMD();
// Special rules. See http://www.hebcal.com/help/anniv.html
// Everything else is taken care of by our standard anniversary rules.
if ($hd->d == 30 && $hd->m == 2 && $hd->y != 0 && $hd1->DaysInMonth() < 30) {
// 30 CSH
// Last day in CSH
$yahrzeit[$key]['jd'] = JewishDate::YMDtoJD($today->y, 3, 1) - 1;
}
if ($hd->d == 30 && $hd->m == 3 && $hd->y != 0 && $hd1->DaysInMonth() < 30) {
// 30 KSL
// Last day in KSL
$yahrzeit[$key]['jd'] = JewishDate::YMDtoJD($today->y, 4, 1) - 1;
}
if ($hd->d == 30 && $hd->m == 6 && $hd->y != 0 && $today->DaysInMonth() < 30 && !$today->IsLeapYear()) {
// 30 ADR
// Last day in SHV
$yahrzeit[$key]['jd'] = JewishDate::YMDtoJD($today->y, 6, 1) - 1;
}
}
}
switch ($config['infoStyle']) {
case "style1":
// List style
foreach ($yahrzeits as $yahrzeit) {
if ($yahrzeit['jd'] >= $startjd && $yahrzeit['jd'] < $startjd + $config['days']) {
$ind = person::GetInstance($yahrzeit['id']);
//@@ $content .= "<a href=\"".encode_url($ind->getLinkUrl())."\" class=\"list_item name2\">".$ind->getFullName()."</a>".$ind->getSexImage();
$content .= "<a href=\"" . encode_url($ind->getLinkUrl()) . "\" class=\"list_item name2\">" . PrintReady($ind->getFullName()) . "</a>" . $ind->getSexImage();
$content .= "<div class=\"indent\">";
$content .= $yahrzeit['date']->Display(true);
$content .= ', ' . str_replace("#year_var#", $yahrzeit['anniv'], $pgv_lang["year_anniversary"]);
$content .= "</div>";
}
}
break;
case "style2":
// Table style
require_once PGV_ROOT . 'js/sorttable.js.htm';
require_once PGV_ROOT . 'includes/classes/class_gedcomrecord.php';
$table_id = "ID" . floor(microtime() * 1000000);
// sorttable requires a unique ID
$content .= "<table id=\"{$table_id}\" class=\"sortable list_table center\">";
$content .= "<tr>";
$content .= "<th class=\"list_label\">{$factarray['NAME']}</th>";
$content .= "<th style=\"display:none\">GIVN</th>";
$content .= "<th class=\"list_label\">{$factarray['DATE']}</th>";
$content .= "<th class=\"list_label\"><img src=\"./images/reminder.gif\" alt=\"{$pgv_lang['anniversary']}\" title=\"{$pgv_lang['anniversary']}\" border=\"0\" /></th>";
$content .= "<th class=\"list_label\">{$factarray['_YART']}</th>";
$content .= "</tr>";
$count = 0;
foreach ($yahrzeits as $yahrzeit) {
if ($yahrzeit['jd'] >= $startjd && $yahrzeit['jd'] < $startjd + $config['days']) {
++$count;
$ind = person::GetInstance($yahrzeit['id']);
$content .= "<tr class=\"vevent\">";
// hCalendar:vevent
// Record name(s)
$name = $ind->getFullName();
$url = $ind->getLinkUrl();
$content .= "<td class=\"list_value_wrap\" align=\"" . get_align($name) . "\">";
$content .= "<a href=\"" . encode_url($ind->getLinkUrl()) . "\" class=\"list_item name2\" dir=\"" . $TEXT_DIRECTION . "\">" . PrintReady($name) . "</a>";
$content .= $ind->getSexImage();
$addname = $ind->getAddName();
if ($addname) {
$content .= "<br /><a href=\"" . encode_url($url) . "\" class=\"list_item\">" . PrintReady($addname) . "</a>";
}
$content .= "</td>";
// GIVN for sorting
$content .= "<td style=\"display:none\">";
$exp = explode(",", str_replace('<', ',', $name) . ",");
$content .= $exp[1];
$content .= "</td>";
$today = new JewishDate($yahrzeit['jd']);
$td = new GedcomDate($today->Format('@ A O E'));
// death/yahrzeit event date
$content .= "<td class=\"list_value_wrap\">";
$content .= "<a name='{$yahrzeit['jd']}'>" . $yahrzeit['date']->Display(true, NULL, array()) . "</a>";
$content .= "</td>";
// Anniversary
$content .= "<td class=\"list_value_wrap rela\">";
$anniv = $yahrzeit['anniv'];
if ($anniv == 0) {
$content .= '<a name="0"> </a>';
} else {
$content .= "<a name=\"{$anniv}\">{$anniv}</a>";
}
if ($config['allowDownload'] == 'yes') {
// hCalendar:dtstart and hCalendar:summary
//TODO does this work??
$content .= "<abbr class=\"dtstart\" title=\"" . strip_tags($yahrzeit['date']->Display(false, 'Ymd', array())) . "\"></abbr>";
$content .= "<abbr class=\"summary\" title=\"" . $pgv_lang["anniversary"] . " #{$anniv} " . $factarray[$yahrzeit['fact']] . " : " . PrintReady(strip_tags($ind->getFullName())) . "\"></abbr>";
}
// upcomming yahrzeit dates
$content .= "<td class=\"list_value_wrap\">";
$content .= "<a href=\"" . $url . "\" class=\"list_item url\">" . $td->Display(true, NULL, array('gregorian')) . "</a>";
// hCalendar:url
$content .= " </td>";
$content .= "</tr>";
}
}
// table footer
$content .= "<tr class=\"sortbottom\">";
$content .= "<td class=\"list_label\">";
$content .= '<a href="javascript:;" onclick="sortByOtherCol(this,1)"><img src="images/topdown.gif" alt="" border="0" /> ' . $factarray["GIVN"] . '</a><br />';
$content .= $pgv_lang["total_names"] . ": " . $count;
if ($hidden) {
$content .= "<br /><span class=\"warning\">{$pgv_lang['hidden']} : {$hidden}</span>";
}
$content .= "</td>";
$content .= "<td style=\"display:none\">GIVN</td>";
$content .= "<td>";
if ($config['allowDownload'] == 'yes') {
$uri = $SERVER_URL . basename($_SERVER['REQUEST_URI']);
global $whichFile;
$whichFile = 'hCal-events.ics';
$alt = print_text('download_file', 0, 1);
if (count($yahrzeits)) {
$content .= "<a href=\"http://feeds.technorati.com/events/{$uri}\"><img src=\"images/hcal.png\" border=\"0\" alt=\"{$alt}\" title=\"{$alt}\" /></a>";
}
}
$content .= '</td><td> </td><td> </td></tr>';
$content .= '</table>';
break;
}
global $THEME_DIR;
if ($block) {
require $THEME_DIR . 'templates/block_small_temp.php';
} else {
require $THEME_DIR . 'templates/block_main_temp.php';
}
}
public function getBlock($block_id, $template = true, $cfg = null)
{
global $ctype, $controller;
$days = get_block_setting($block_id, 'days', 7);
$infoStyle = get_block_setting($block_id, 'infoStyle', 'table');
$calendar = get_block_setting($block_id, 'calendar', 'jewish');
$block = get_block_setting($block_id, 'block', true);
if ($cfg) {
foreach (array('days', 'infoStyle', 'block') as $name) {
if (array_key_exists($name, $cfg)) {
${$name} = $cfg[$name];
}
}
}
$startjd = WT_CLIENT_JD;
$endjd = WT_CLIENT_JD + $days - 1;
$id = $this->getName() . $block_id;
$class = $this->getName() . '_block';
if ($ctype == 'gedcom' && WT_USER_GEDCOM_ADMIN || $ctype == 'user' && WT_USER_ID) {
$title = '<i class="icon-admin" title="' . WT_I18N::translate('Configure') . '" onclick="modalDialog(\'block_edit.php?block_id=' . $block_id . '\', \'' . $this->getTitle() . '\');"></i>';
} else {
$title = '';
}
$title .= $this->getTitle();
$content = '';
// The standard anniversary rules cover most of the Yahrzeit rules, we just
// need to handle a few special cases.
// Fetch normal anniversaries...
$yahrzeits = array();
for ($jd = $startjd - 1; $jd <= $endjd + $days; ++$jd) {
foreach (get_anniversary_events($jd, 'DEAT _YART') as $fact) {
// Exact hebrew dates only
$date = $fact->getDate();
if ($date->MinDate() instanceof WT_Date_Jewish && $date->MinJD() == $date->MaxJD()) {
$fact->jd = $jd;
$yahrzeits[] = $fact;
}
}
}
// ...then adjust dates
$jewish_calendar = new JewishCalendar();
foreach ($yahrzeits as $yahrzeit) {
if ($yahrzeit->getTag() == 'DEAT') {
// Just DEAT, not _YART
$today = new WT_Date_Jewish($yahrzeit->jd);
$hd = $yahrzeit->getDate()->MinDate();
$hd1 = new WT_Date_Jewish($hd);
$hd1->y += 1;
$hd1->setJdFromYmd();
// Special rules. See http://www.hebcal.com/help/anniv.html
// Everything else is taken care of by our standard anniversary rules.
if ($hd->d == 30 && $hd->m == 2 && $hd->y != 0 && $hd1->daysInMonth() < 30) {
// 30 CSH
// Last day in CSH
$yahrzeit->jd = $jewish_calendar->ymdToJd($today->y, 3, 1) - 1;
} elseif ($hd->d == 30 && $hd->m == 3 && $hd->y != 0 && $hd1->daysInMonth() < 30) {
// 30 KSL
// Last day in KSL
$yahrzeit->jd = $jewish_calendar->ymdToJd($today->y, 4, 1) - 1;
} elseif ($hd->d == 30 && $hd->m == 6 && $hd->y != 0 && $today->daysInMonth() < 30 && !$today->isLeapYear()) {
// 30 ADR
// Last day in SHV
$yahrzeit->jd = $jewish_calendar->ymdToJd($today->y, 6, 1) - 1;
}
}
}
switch ($infoStyle) {
case 'list':
foreach ($yahrzeits as $yahrzeit) {
if ($yahrzeit->jd >= $startjd && $yahrzeit->jd < $startjd + $days) {
$ind = $yahrzeit->getParent();
$content .= "<a href=\"" . $ind->getHtmlUrl() . "\" class=\"list_item name2\">" . $ind->getFullName() . "</a>" . $ind->getSexImage();
$content .= "<div class=\"indent\">";
$content .= $yahrzeit->getDate()->Display(true);
$content .= ', ' . WT_I18N::translate('%s year anniversary', $yahrzeit->anniv);
$content .= "</div>";
}
}
break;
case 'table':
default:
$table_id = Uuid::uuid4();
// table requires a unique ID
$controller->addExternalJavascript(WT_JQUERY_DATATABLES_URL)->addInlineJavascript('
jQuery("#' . $table_id . '").dataTable({
dom: \'t\',
' . WT_I18N::datatablesI18N() . ',
autoWidth: false,
paginate: false,
lengthChange: false,
filter: false,
info: true,
jQueryUI: true,
sorting: [[5,"asc"]],
columns: [
/* 0-name */ { dataSort: 1 },
/* 1-NAME */ { visible: false },
/* 2-date */ { dataSort: 3 },
/* 3-DATE */ { visible: false },
/* 4-Aniv */ { class: "center"},
/* 5-yart */ { dataSort: 6 },
/* 6-YART */ { visible: false }
]
});
jQuery("#' . $table_id . '").css("visibility", "visible");
jQuery(".loading-image").css("display", "none");
');
$content = '';
$content .= '<div class="loading-image"> </div>';
$content .= '<table id="' . $table_id . '" class="width100" style="visibility:hidden;">';
$content .= '<thead><tr>';
$content .= '<th>' . WT_Gedcom_Tag::getLabel('NAME') . '</th>';
$content .= '<th>' . WT_Gedcom_Tag::getLabel('NAME') . '</th>';
$content .= '<th>' . WT_Gedcom_Tag::getLabel('DEAT') . '</th>';
$content .= '<th>DEAT</th>';
$content .= '<th><i class="icon-reminder" title="' . WT_I18N::translate('Anniversary') . '"></i></th>';
$content .= '<th>' . WT_Gedcom_Tag::getLabel('_YART') . '</th>';
$content .= '<th>_YART</th>';
$content .= '</tr></thead><tbody>';
foreach ($yahrzeits as $yahrzeit) {
if ($yahrzeit->jd >= $startjd && $yahrzeit->jd < $startjd + $days) {
$content .= '<tr>';
$ind = $yahrzeit->getParent();
// Individual name(s)
$name = $ind->getFullName();
$url = $ind->getHtmlUrl();
$content .= '<td>';
$content .= '<a href="' . $url . '">' . $name . '</a>';
$content .= $ind->getSexImage();
$addname = $ind->getAddName();
if ($addname) {
$content .= '<br><a href="' . $url . '">' . $addname . '</a>';
}
$content .= '</td>';
$content .= '<td>' . $ind->getSortName() . '</td>';
// death/yahrzeit event date
$content .= '<td>' . $yahrzeit->getDate()->Display() . '</td>';
$content .= '<td>' . $yahrzeit->getDate()->minJD() . '</td>';
// sortable date
// Anniversary
$content .= '<td>' . $yahrzeit->anniv . '</td>';
// upcomming yahrzeit dates
switch ($calendar) {
case 'gregorian':
$today = new WT_Date_Gregorian($yahrzeit->jd);
break;
case 'jewish':
default:
$today = new WT_Date_Jewish($yahrzeit->jd);
break;
}
$td = new WT_Date($today->format('%@ %A %O %E'));
$content .= '<td>' . $td->Display() . '</td>';
$content .= '<td>' . $td->minJD() . '</td>';
// sortable date
$content .= '</tr>';
}
}
$content .= '</tbody></table>';
break;
}
if ($template) {
if ($block) {
require WT_THEME_DIR . 'templates/block_small_temp.php';
} else {
require WT_THEME_DIR . 'templates/block_main_temp.php';
}
} else {
return $content;
}
}
