1<?php 2/** 3 * webtrees: online genealogy 4 * Copyright (C) 2018 webtrees development team 5 * This program is free software: you can redistribute it and/or modify 6 * it under the terms of the GNU General Public License as published by 7 * the Free Software Foundation, either version 3 of the License, or 8 * (at your option) any later version. 9 * This program is distributed in the hope that it will be useful, 10 * but WITHOUT ANY WARRANTY; without even the implied warranty of 11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 * GNU General Public License for more details. 13 * You should have received a copy of the GNU General Public License 14 * along with this program. If not, see <http://www.gnu.org/licenses/>. 15 */ 16namespace Fisharebest\Webtrees\Module; 17 18use Fisharebest\Webtrees\Auth; 19use Fisharebest\Webtrees\Filter; 20use Fisharebest\Webtrees\Functions\FunctionsDb; 21use Fisharebest\Webtrees\GedcomTag; 22use Fisharebest\Webtrees\I18N; 23use Fisharebest\Webtrees\Tree; 24 25/** 26 * Class UpcomingAnniversariesModule 27 */ 28class UpcomingAnniversariesModule extends AbstractModule implements ModuleBlockInterface 29{ 30 // Default values for new blocks. 31 const DEFAULT_DAYS = 7; 32 const DEFAULT_FILTER = '1'; 33 const DEFAULT_SORT = 'alpha'; 34 const DEFAULT_STYLE = 'table'; 35 36 // Can show this number of days into the future. 37 const MIN_DAYS = 1; 38 const MAX_DAYS = 30; 39 40 // All standard GEDCOM 5.5.1 events except CENS, RESI and EVEN 41 const ALL_EVENTS = [ 42 'ADOP', 43 'ANUL', 44 'BAPM', 45 'BARM', 46 'BASM', 47 'BIRT', 48 'BLES', 49 'BURI', 50 'CHR', 51 'CHRA', 52 'CONF', 53 'CREM', 54 'DEAT', 55 'DIV', 56 'DIVF', 57 'EMIG', 58 'ENGA', 59 'FCOM', 60 'GRAD', 61 'IMMI', 62 'MARB', 63 'MARC', 64 'MARL', 65 'MARR', 66 'MARS', 67 'NATU', 68 'ORDN', 69 'PROB', 70 'RETI', 71 'WILL', 72 ]; 73 74 const DEFAULT_EVENTS = [ 75 'BIRT', 76 'MARR', 77 'DEAT', 78 ]; 79 80 /** 81 * How should this module be labelled on tabs, menus, etc.? 82 * 83 * @return string 84 */ 85 public function getTitle() 86 { 87 return /* I18N: Name of a module */ 88 I18N::translate('Upcoming events'); 89 } 90 91 /** 92 * A sentence describing what this module does. 93 * 94 * @return string 95 */ 96 public function getDescription() 97 { 98 return /* I18N: Description of the “Upcoming events” module */ 99 I18N::translate('A list of the anniversaries that will occur in the near future.'); 100 } 101 102 /** 103 * Generate the HTML content of this block. 104 * 105 * @param Tree $tree 106 * @param int $block_id 107 * @param bool $template 108 * @param string[] $cfg 109 * 110 * @return string 111 */ 112 public function getBlock(Tree $tree, int $block_id, bool $template = true, array $cfg = []): string 113 { 114 global $ctype; 115 116 $default_events = implode(',', self::DEFAULT_EVENTS); 117 118 $days = $this->getBlockSetting($block_id, 'days', self::DEFAULT_DAYS); 119 $filter = (bool)$this->getBlockSetting($block_id, 'filter', self::DEFAULT_FILTER); 120 $infoStyle = $this->getBlockSetting($block_id, 'infoStyle', self::DEFAULT_STYLE); 121 $sortStyle = $this->getBlockSetting($block_id, 'sortStyle', self::DEFAULT_SORT); 122 $events = $this->getBlockSetting($block_id, 'events', $default_events); 123 124 extract($cfg, EXTR_OVERWRITE); 125 126 $event_array = explode(',', $events); 127 128 // If we are only showing living individuals, then we don't need to search for DEAT events. 129 if ($filter) { 130 $death_events = explode('|', WT_EVENTS_DEAT); 131 $event_array = array_diff($event_array, $death_events); 132 } 133 134 $events_filter = implode('|', $event_array); 135 136 $startjd = WT_CLIENT_JD + 1; 137 $endjd = WT_CLIENT_JD + (int)$days; 138 139 $facts = FunctionsDb::getEventsList($startjd, $endjd, $events_filter, $filter, $sortStyle, $tree); 140 141 if (empty($facts)) { 142 if ($endjd == $startjd) { 143 $content = view('modules/upcoming_events/empty', [ 144 'message' => I18N::translate('No events exist for tomorrow.'), 145 ]); 146 } else { 147 $content = view('modules/upcoming_events/empty', [ 148 'message' => /* I18N: translation for %s==1 is unused; it is translated separately as “tomorrow” */ 149 I18N::plural('No events exist for the next %s day.', 'No events exist for the next %s days.', $endjd - $startjd + 1, I18N::number($endjd - $startjd + 1)), 150 ]); 151 } 152 } elseif ($infoStyle === 'list') { 153 $content = view('modules/upcoming_events/list', [ 154 'facts' => $facts, 155 ]); 156 } else { 157 $content = view('modules/upcoming_events/table', [ 158 'facts' => $facts, 159 ]); 160 } 161 162 if ($template) { 163 if ($ctype === 'gedcom' && Auth::isManager($tree)) { 164 $config_url = route('tree-page-block-edit', [ 165 'block_id' => $block_id, 166 'ged' => $tree->getName(), 167 ]); 168 } elseif ($ctype === 'user' && Auth::check()) { 169 $config_url = route('user-page-block-edit', [ 170 'block_id' => $block_id, 171 'ged' => $tree->getName(), 172 ]); 173 } else { 174 $config_url = ''; 175 } 176 177 return view('modules/block-template', [ 178 'block' => str_replace('_', '-', $this->getName()), 179 'id' => $block_id, 180 'config_url' => $config_url, 181 'title' => $this->getTitle(), 182 'content' => $content, 183 ]); 184 } else { 185 return $content; 186 } 187 } 188 189 /** {@inheritdoc} */ 190 public function loadAjax(): bool 191 { 192 return true; 193 } 194 195 /** {@inheritdoc} */ 196 public function isUserBlock(): bool 197 { 198 return true; 199 } 200 201 /** {@inheritdoc} */ 202 public function isGedcomBlock(): bool 203 { 204 return true; 205 } 206 207 /** 208 * An HTML form to edit block settings 209 * 210 * @param Tree $tree 211 * @param int $block_id 212 * 213 * @return void 214 */ 215 public function configureBlock(Tree $tree, int $block_id) 216 { 217 if ($_SERVER['REQUEST_METHOD'] === 'POST') { 218 $this->setBlockSetting($block_id, 'days', Filter::postInteger('days', self::MIN_DAYS, self::MAX_DAYS, self::DEFAULT_DAYS)); 219 $this->setBlockSetting($block_id, 'filter', Filter::postBool('filter')); 220 $this->setBlockSetting($block_id, 'infoStyle', Filter::post('infoStyle', 'list|table', self::DEFAULT_STYLE)); 221 $this->setBlockSetting($block_id, 'sortStyle', Filter::post('sortStyle', 'alpha|anniv', self::DEFAULT_SORT)); 222 $this->setBlockSetting($block_id, 'events', implode(',', Filter::postArray('events'))); 223 224 return; 225 } 226 227 $default_events = implode(',', self::DEFAULT_EVENTS); 228 229 $days = $this->getBlockSetting($block_id, 'days', self::DEFAULT_DAYS); 230 $filter = $this->getBlockSetting($block_id, 'filter', self::DEFAULT_FILTER); 231 $infoStyle = $this->getBlockSetting($block_id, 'infoStyle', self::DEFAULT_STYLE); 232 $sortStyle = $this->getBlockSetting($block_id, 'sortStyle', self::DEFAULT_SORT); 233 $events = $this->getBlockSetting($block_id, 'events', $default_events); 234 235 $event_array = explode(',', $events); 236 237 $all_events = []; 238 foreach (self::ALL_EVENTS as $event) { 239 $all_events[$event] = GedcomTag::getLabel($event); 240 } 241 242 $info_styles = [ 243 'list' => /* I18N: An option in a list-box */ 244 I18N::translate('list'), 245 'table' => /* I18N: An option in a list-box */ 246 I18N::translate('table'), 247 ]; 248 249 $sort_styles = [ 250 'alpha' => /* I18N: An option in a list-box */ 251 I18N::translate('sort by name'), 252 'anniv' => /* I18N: An option in a list-box */ 253 I18N::translate('sort by date'), 254 ]; 255 256 echo view('modules/upcoming_events/config', [ 257 'all_events' => $all_events, 258 'days' => $days, 259 'event_array' => $event_array, 260 'filter' => $filter, 261 'infoStyle' => $infoStyle, 262 'info_styles' => $info_styles, 263 'max_days' => self::MAX_DAYS, 264 'sortStyle' => $sortStyle, 265 'sort_styles' => $sort_styles, 266 ]); 267 } 268} 269