app/Module/OnThisDayModule.php
<?php
/**
* webtrees: online genealogy
* Copyright (C) 2023 webtrees development team
* 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 3 of the License, or
* (at your option) any later version.
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <https://www.gnu.org/licenses/>.
*/
declare(strict_types=1);
namespace Fisharebest\Webtrees\Module;
use Fisharebest\Webtrees\Auth;
use Fisharebest\Webtrees\Gedcom;
use Fisharebest\Webtrees\I18N;
use Fisharebest\Webtrees\Registry;
use Fisharebest\Webtrees\Services\CalendarService;
use Fisharebest\Webtrees\Tree;
use Fisharebest\Webtrees\Validator;
use Illuminate\Support\Str;
use Psr\Http\Message\ServerRequestInterface;
/**
* Class OnThisDayModule
*/
class OnThisDayModule extends AbstractModule implements ModuleBlockInterface
{
use ModuleBlockTrait;
// Pagination
private const LIMIT_LOW = 10;
private const LIMIT_HIGH = 20;
// Default values for new blocks.
private const DEFAULT_SORT = 'date_desc';
private const DEFAULT_STYLE = 'date_desc';
// Initial sorting for datatables
private const DATATABLES_ORDER = [
'alpha' => [[0, 'asc']],
'date_asc' => [[2, 'asc']],
'date_desc' => [[2, 'desc']],
];
// All standard GEDCOM 5.5.1 events except CENS, RESI and EVEN
private const ALL_EVENTS = [
'ADOP' => 'INDI:ADOP',
'ANUL' => 'FAM:ANUL',
'BAPM' => 'INDI:BAPM',
'BARM' => 'INDI:BARM',
'BASM' => 'INDI:BASM',
'BIRT' => 'INDI:BIRT',
'BLES' => 'INDI:BLES',
'BURI' => 'INDI:BURI',
'CHR' => 'INDI:CHR',
'CHRA' => 'INDI:CHRA',
'CONF' => 'INDI:CONF',
'CREM' => 'INDI:CREM',
'DEAT' => 'INDI:DEAT',
'DIV' => 'FAM:DIV',
'DIVF' => 'FAM:DIVF',
'EMIG' => 'INDI:EMIG',
'ENGA' => 'FAM:ENGA',
'FCOM' => 'INDI:FCOM',
'GRAD' => 'INDI:GRAD',
'IMMI' => 'INDI:IMMI',
'MARB' => 'FAM:MARB',
'MARC' => 'FAM:MARC',
'MARL' => 'FAM:MARL',
'MARR' => 'FAM:MARR',
'MARS' => 'FAM:MARS',
'NATU' => 'INDI:NATU',
'ORDN' => 'INDI:ORDN',
'PROB' => 'INDI:PROB',
'RETI' => 'INDI:RETI',
'WILL' => 'INDI:WILL',
];
private const DEFAULT_EVENTS = [
'BIRT',
'MARR',
'DEAT',
];
/**
* How should this module be identified in the control panel, etc.?
*
* @return string
*/
public function title(): string
{
/* I18N: Name of a module */
return I18N::translate('On this day');
}
/**
* A sentence describing what this module does.
*
* @return string
*/
public function description(): string
{
/* I18N: Description of the “On this day” module */
return I18N::translate('A list of the anniversaries that occur today.');
}
/**
* Generate the HTML content of this block.
*
* @param Tree $tree
* @param int $block_id
* @param string $context
* @param array<string,string> $config
*
* @return string
*/
public function getBlock(Tree $tree, int $block_id, string $context, array $config = []): string
{
$calendar_service = new CalendarService();
$default_events = implode(',', self::DEFAULT_EVENTS);
$filter = (bool) $this->getBlockSetting($block_id, 'filter', '1');
$infoStyle = $this->getBlockSetting($block_id, 'infoStyle', self::DEFAULT_STYLE);
$sortStyle = $this->getBlockSetting($block_id, 'sortStyle', self::DEFAULT_SORT);
$events = $this->getBlockSetting($block_id, 'events', $default_events);
extract($config, EXTR_OVERWRITE);
$event_array = explode(',', $events);
// If we are only showing living individuals, then we don't need to search for DEAT events.
if ($filter) {
$event_array = array_diff($event_array, Gedcom::DEATH_EVENTS);
}
$events_filter = implode('|', $event_array);
$startjd = Registry::timestampFactory()->now()->julianDay();
$endjd = $startjd;
$facts = $calendar_service->getEventsList($startjd, $endjd, $events_filter, $filter, $sortStyle, $tree);
if ($facts->isEmpty()) {
if ($filter && Auth::check()) {
$message = I18N::translate('No events for living individuals exist for today.');
} else {
$message = I18N::translate('No events exist for today.');
}
$content = view('modules/todays_events/empty', ['message' => $message]);
} elseif ($infoStyle === 'list') {
$content = view('lists/anniversaries-list', [
'id' => $block_id,
'facts' => $facts,
'limit_low' => self::LIMIT_LOW,
'limit_high' => self::LIMIT_HIGH,
]);
} else {
$content = view('lists/anniversaries-table', [
'facts' => $facts,
'limit_low' => self::LIMIT_LOW,
'limit_high' => self::LIMIT_HIGH,
'order' => self::DATATABLES_ORDER[$sortStyle] ?? self::DATATABLES_ORDER[self::DEFAULT_SORT],
]);
}
if ($context !== self::CONTEXT_EMBED) {
return view('modules/block-template', [
'block' => Str::kebab($this->name()),
'id' => $block_id,
'config_url' => $this->configUrl($tree, $context, $block_id),
'title' => $this->title(),
'content' => $content,
]);
}
return $content;
}
/**
* Should this block load asynchronously using AJAX?
*
* Simple blocks are faster in-line, more complex ones can be loaded later.
*
* @return bool
*/
public function loadAjax(): bool
{
return true;
}
/**
* Can this block be shown on the user’s home page?
*
* @return bool
*/
public function isUserBlock(): bool
{
return true;
}
/**
* Can this block be shown on the tree’s home page?
*
* @return bool
*/
public function isTreeBlock(): bool
{
return true;
}
/**
* Update the configuration for a block.
*
* @param ServerRequestInterface $request
* @param int $block_id
*
* @return void
*/
public function saveBlockConfiguration(ServerRequestInterface $request, int $block_id): void
{
$filter = Validator::parsedBody($request)->string('filter');
$info_style = Validator::parsedBody($request)->string('infoStyle');
$sort_style = Validator::parsedBody($request)->string('sortStyle');
$events = Validator::parsedBody($request)->array('events');
$this->setBlockSetting($block_id, 'filter', $filter);
$this->setBlockSetting($block_id, 'infoStyle', $info_style);
$this->setBlockSetting($block_id, 'sortStyle', $sort_style);
$this->setBlockSetting($block_id, 'events', implode(',', $events));
}
/**
* An HTML form to edit block settings
*
* @param Tree $tree
* @param int $block_id
*
* @return string
*/
public function editBlockConfiguration(Tree $tree, int $block_id): string
{
$default_events = implode(',', self::DEFAULT_EVENTS);
$filter = $this->getBlockSetting($block_id, 'filter', '1');
$info_style = $this->getBlockSetting($block_id, 'infoStyle', self::DEFAULT_STYLE);
$sort_style = $this->getBlockSetting($block_id, 'sortStyle', self::DEFAULT_SORT);
$events = $this->getBlockSetting($block_id, 'events', $default_events);
$event_array = explode(',', $events);
$all_events = [];
foreach (self::ALL_EVENTS as $event => $tag) {
$all_events[$event] = Registry::elementFactory()->make($tag)->label();
}
$info_styles = [
/* I18N: An option in a list-box */
'list' => I18N::translate('list'),
/* I18N: An option in a list-box */
'table' => I18N::translate('table'),
];
$sort_styles = [
/* I18N: An option in a list-box */
'alpha' => I18N::translate('sort by name'),
/* I18N: An option in a list-box */
'anniv_asc' => I18N::translate('sort by date, oldest first'),
/* I18N: An option in a list-box */
'anniv_desc' => I18N::translate('sort by date, newest first'),
];
return view('modules/todays_events/config', [
'all_events' => $all_events,
'event_array' => $event_array,
'filter' => $filter,
'info_style' => $info_style,
'info_styles' => $info_styles,
'sort_style' => $sort_style,
'sort_styles' => $sort_styles,
]);
}
}