18c2e8227SGreg Roach<?php 28c2e8227SGreg Roach/** 38c2e8227SGreg Roach * webtrees: online genealogy 41062a142SGreg Roach * Copyright (C) 2018 webtrees development team 58c2e8227SGreg Roach * This program is free software: you can redistribute it and/or modify 68c2e8227SGreg Roach * it under the terms of the GNU General Public License as published by 78c2e8227SGreg Roach * the Free Software Foundation, either version 3 of the License, or 88c2e8227SGreg Roach * (at your option) any later version. 98c2e8227SGreg Roach * This program is distributed in the hope that it will be useful, 108c2e8227SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 118c2e8227SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 128c2e8227SGreg Roach * GNU General Public License for more details. 138c2e8227SGreg Roach * You should have received a copy of the GNU General Public License 148c2e8227SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 158c2e8227SGreg Roach */ 1676692c8bSGreg Roachnamespace Fisharebest\Webtrees\Module; 1776692c8bSGreg Roach 180e62c4b8SGreg Roachuse Fisharebest\Webtrees\Auth; 1915d603e7SGreg Roachuse Fisharebest\Webtrees\Bootstrap4; 200e62c4b8SGreg Roachuse Fisharebest\Webtrees\Database; 210e62c4b8SGreg Roachuse Fisharebest\Webtrees\Filter; 223d7a8a4cSGreg Roachuse Fisharebest\Webtrees\Functions\FunctionsDate; 233d7a8a4cSGreg Roachuse Fisharebest\Webtrees\Functions\FunctionsEdit; 240e62c4b8SGreg Roachuse Fisharebest\Webtrees\GedcomRecord; 25f7f4b984SGreg Roachuse Fisharebest\Webtrees\Html; 260e62c4b8SGreg Roachuse Fisharebest\Webtrees\I18N; 270e62c4b8SGreg Roachuse Fisharebest\Webtrees\Mail; 280e62c4b8SGreg Roachuse Fisharebest\Webtrees\Site; 290e62c4b8SGreg Roachuse Fisharebest\Webtrees\Tree; 300e62c4b8SGreg Roachuse Fisharebest\Webtrees\User; 318c2e8227SGreg Roach 328c2e8227SGreg Roach/** 338c2e8227SGreg Roach * Class ReviewChangesModule 348c2e8227SGreg Roach */ 35e2a378d3SGreg Roachclass ReviewChangesModule extends AbstractModule implements ModuleBlockInterface { 368c2e8227SGreg Roach /** {@inheritdoc} */ 378c2e8227SGreg Roach public function getTitle() { 388c2e8227SGreg Roach return /* I18N: Name of a module */ I18N::translate('Pending changes'); 398c2e8227SGreg Roach } 408c2e8227SGreg Roach 418c2e8227SGreg Roach /** {@inheritdoc} */ 428c2e8227SGreg Roach public function getDescription() { 4374dc1ba0SGreg Roach return /* I18N: Description of the “Pending changes” module */ I18N::translate('A list of changes that need to be reviewed by a moderator, and email notifications.'); 448c2e8227SGreg Roach } 458c2e8227SGreg Roach 4676692c8bSGreg Roach /** 4776692c8bSGreg Roach * Generate the HTML content of this block. 4876692c8bSGreg Roach * 4976692c8bSGreg Roach * @param int $block_id 5076692c8bSGreg Roach * @param bool $template 51727f238cSGreg Roach * @param string[] $cfg 5276692c8bSGreg Roach * 5376692c8bSGreg Roach * @return string 5476692c8bSGreg Roach */ 55a9430be8SGreg Roach public function getBlock($block_id, $template = true, $cfg = []): string { 568c2e8227SGreg Roach global $ctype, $WT_TREE; 578c2e8227SGreg Roach 58e2a378d3SGreg Roach $sendmail = $this->getBlockSetting($block_id, 'sendmail', '1'); 59e2a378d3SGreg Roach $days = $this->getBlockSetting($block_id, 'days', '1'); 608c2e8227SGreg Roach 6115d603e7SGreg Roach foreach (['days', 'sendmail'] as $name) { 628c2e8227SGreg Roach if (array_key_exists($name, $cfg)) { 638c2e8227SGreg Roach $$name = $cfg[$name]; 648c2e8227SGreg Roach } 658c2e8227SGreg Roach } 668c2e8227SGreg Roach 678c2e8227SGreg Roach $changes = Database::prepare( 688c2e8227SGreg Roach "SELECT 1" . 698c2e8227SGreg Roach " FROM `##change`" . 708c2e8227SGreg Roach " WHERE status='pending'" . 718c2e8227SGreg Roach " LIMIT 1" 728c2e8227SGreg Roach )->fetchOne(); 738c2e8227SGreg Roach 748ae466efSGreg Roach if ($changes === '1' && $sendmail === '1') { 758c2e8227SGreg Roach // There are pending changes - tell moderators/managers/administrators about them. 7615d603e7SGreg Roach if (WT_TIMESTAMP - (int) Site::getPreference('LAST_CHANGE_EMAIL') > (60 * 60 * 24 * $days)) { 778c2e8227SGreg Roach // Which users have pending changes? 788c2e8227SGreg Roach foreach (User::all() as $user) { 798c2e8227SGreg Roach if ($user->getPreference('contactmethod') !== 'none') { 808c2e8227SGreg Roach foreach (Tree::getAll() as $tree) { 818c2e8227SGreg Roach if ($tree->hasPendingEdit() && Auth::isManager($tree, $user)) { 828c2e8227SGreg Roach I18N::init($user->getPreference('language')); 838857be8bSGreg Roach 848857be8bSGreg Roach $sender = new User( 858857be8bSGreg Roach (object) [ 868857be8bSGreg Roach 'user_id' => null, 878857be8bSGreg Roach 'user_name' => '', 888857be8bSGreg Roach 'real_name' => $WT_TREE->getTitle(), 898857be8bSGreg Roach 'email' => $WT_TREE->getPreference('WEBTREES_EMAIL'), 908857be8bSGreg Roach ] 918857be8bSGreg Roach ); 928857be8bSGreg Roach 938857be8bSGreg Roach Mail::send( 948857be8bSGreg Roach $sender, 958c2e8227SGreg Roach $user, 968857be8bSGreg Roach $sender, 978c2e8227SGreg Roach I18N::translate('Pending changes'), 98225e381fSGreg Roach view('emails/pending-changes-text', ['tree' => $tree, 'user' => $user]), 99225e381fSGreg Roach view('emails/pending-changes-html', ['tree' => $tree, 'user' => $user]) 1008c2e8227SGreg Roach ); 1018c2e8227SGreg Roach I18N::init(WT_LOCALE); 1028c2e8227SGreg Roach } 1038c2e8227SGreg Roach } 1048c2e8227SGreg Roach } 1058c2e8227SGreg Roach } 1068c2e8227SGreg Roach Site::setPreference('LAST_CHANGE_EMAIL', WT_TIMESTAMP); 1078c2e8227SGreg Roach } 1088c2e8227SGreg Roach } 1098c2e8227SGreg Roach if (Auth::isEditor($WT_TREE) && $WT_TREE->hasPendingEdit()) { 1108c2e8227SGreg Roach $content = ''; 1118c2e8227SGreg Roach if (Auth::isModerator($WT_TREE)) { 11215d603e7SGreg Roach $content .= '<a href="edit_changes.php">' . I18N::translate('There are pending changes for you to moderate.') . '</a><br>'; 1138c2e8227SGreg Roach } 1148ae466efSGreg Roach if ($sendmail === '1') { 1157a6ee1acSGreg Roach $content .= I18N::translate('Last email reminder was sent ') . FunctionsDate::formatTimestamp(Site::getPreference('LAST_CHANGE_EMAIL')) . '<br>'; 116f7f4b984SGreg Roach $content .= I18N::translate('Next email reminder will be sent after ') . FunctionsDate::formatTimestamp((int) Site::getPreference('LAST_CHANGE_EMAIL') + (60 * 60 * 24 * $days)) . '<br><br>'; 1178c2e8227SGreg Roach } 1188c2e8227SGreg Roach $content .= '<ul>'; 1198c2e8227SGreg Roach $changes = Database::prepare( 1208c2e8227SGreg Roach "SELECT xref" . 1218c2e8227SGreg Roach " FROM `##change`" . 1228c2e8227SGreg Roach " WHERE status='pending'" . 1238c2e8227SGreg Roach " AND gedcom_id=?" . 1248c2e8227SGreg Roach " GROUP BY xref" 12513abd6f3SGreg Roach )->execute([$WT_TREE->getTreeId()])->fetchAll(); 1268c2e8227SGreg Roach foreach ($changes as $change) { 12724ec66ceSGreg Roach $record = GedcomRecord::getInstance($change->xref, $WT_TREE); 1288c2e8227SGreg Roach if ($record->canShow()) { 129b1f1e4efSGreg Roach $content .= '<li><a href="' . e($record->url()) . '">' . $record->getFullName() . '</a></li>'; 1308c2e8227SGreg Roach } 1318c2e8227SGreg Roach } 1328c2e8227SGreg Roach $content .= '</ul>'; 1338c2e8227SGreg Roach 1348c2e8227SGreg Roach if ($template) { 135*397e599aSGreg Roach if ($ctype === 'gedcom' && Auth::isManager($WT_TREE)) { 136*397e599aSGreg Roach $config_url = route('tree-page-block-edit', ['block_id' => $block_id, 'ged' => $WT_TREE->getName()]); 137*397e599aSGreg Roach } elseif ($ctype === 'user' && Auth::check()) { 138*397e599aSGreg Roach $config_url = route('user-page-block-edit', ['block_id' => $block_id, 'ged' => $WT_TREE->getName()]); 1398cbbfdceSGreg Roach } else { 1408cbbfdceSGreg Roach $config_url = ''; 1418cbbfdceSGreg Roach } 1428cbbfdceSGreg Roach 143225e381fSGreg Roach return view('blocks/template', [ 1449c6524dcSGreg Roach 'block' => str_replace('_', '-', $this->getName()), 1459c6524dcSGreg Roach 'id' => $block_id, 1468cbbfdceSGreg Roach 'config_url' => $config_url, 1479c6524dcSGreg Roach 'title' => $this->getTitle(), 1489c6524dcSGreg Roach 'content' => $content, 1499c6524dcSGreg Roach ]); 1508c2e8227SGreg Roach } else { 1518c2e8227SGreg Roach return $content; 1528c2e8227SGreg Roach } 1538c2e8227SGreg Roach } 15415d603e7SGreg Roach 15515d603e7SGreg Roach return ''; 1568c2e8227SGreg Roach } 1578c2e8227SGreg Roach 1588c2e8227SGreg Roach /** {@inheritdoc} */ 159a9430be8SGreg Roach public function loadAjax(): bool { 1608c2e8227SGreg Roach return false; 1618c2e8227SGreg Roach } 1628c2e8227SGreg Roach 1638c2e8227SGreg Roach /** {@inheritdoc} */ 164a9430be8SGreg Roach public function isUserBlock(): bool { 1658c2e8227SGreg Roach return true; 1668c2e8227SGreg Roach } 1678c2e8227SGreg Roach 1688c2e8227SGreg Roach /** {@inheritdoc} */ 169a9430be8SGreg Roach public function isGedcomBlock(): bool { 1708c2e8227SGreg Roach return true; 1718c2e8227SGreg Roach } 1728c2e8227SGreg Roach 17376692c8bSGreg Roach /** 17476692c8bSGreg Roach * An HTML form to edit block settings 17576692c8bSGreg Roach * 17676692c8bSGreg Roach * @param int $block_id 177a9430be8SGreg Roach * 178a9430be8SGreg Roach * @return void 17976692c8bSGreg Roach */ 180be9a728cSGreg Roach public function configureBlock($block_id) { 1818c2e8227SGreg Roach if (Filter::postBool('save') && Filter::checkCsrf()) { 182e2a378d3SGreg Roach $this->setBlockSetting($block_id, 'days', Filter::postInteger('num', 1, 180, 1)); 183e2a378d3SGreg Roach $this->setBlockSetting($block_id, 'sendmail', Filter::postBool('sendmail')); 1848c2e8227SGreg Roach } 1858c2e8227SGreg Roach 186e2a378d3SGreg Roach $sendmail = $this->getBlockSetting($block_id, 'sendmail', '1'); 187e2a378d3SGreg Roach $days = $this->getBlockSetting($block_id, 'days', '1'); 1888c2e8227SGreg Roach 1898c2e8227SGreg Roach ?> 19015d603e7SGreg Roach <p> 19115d603e7SGreg Roach <?= I18N::translate('This block will show editors a list of records with pending changes that need to be reviewed by a moderator. It also generates daily emails to moderators whenever pending changes exist.') ?> 19215d603e7SGreg Roach </p> 1938c2e8227SGreg Roach 19415d603e7SGreg Roach <fieldset class="form-group"> 19515d603e7SGreg Roach <div class="row"> 196fff20713SGreg Roach <legend class="col-form-label col-sm-3"> 19715d603e7SGreg Roach <?= /* I18N: Label for a configuration option */ I18N::translate('Send out reminder emails') ?> 19815d603e7SGreg Roach </legend> 19915d603e7SGreg Roach <div class="col-sm-9"> 20015d603e7SGreg Roach <?= Bootstrap4::radioButtons('sendmail', FunctionsEdit::optionsNoYes(), $sendmail, true) ?> 20115d603e7SGreg Roach </div> 20215d603e7SGreg Roach </div> 20315d603e7SGreg Roach </fieldset> 20415d603e7SGreg Roach 20515d603e7SGreg Roach <div class="form-group row"> 20615d603e7SGreg Roach <label class="col-sm-3 col-form-label" for="days"> 20715d603e7SGreg Roach <?= I18N::translate('Reminder email frequency (days)') ?> 20815d603e7SGreg Roach </label> 20915d603e7SGreg Roach <div class="col-sm-9"> 21015d603e7SGreg Roach <input class="form-control" type="text" name="days" id="days" value="<?= $days ?>"> 21115d603e7SGreg Roach </div> 21215d603e7SGreg Roach </div> 2138c2e8227SGreg Roach <?php 2148c2e8227SGreg Roach } 2158c2e8227SGreg Roach} 216