1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2021 webtrees development team 6 * This program is free software: you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation, either version 3 of the License, or 9 * (at your option) any later version. 10 * This program is distributed in the hope that it will be useful, 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * GNU General Public License for more details. 14 * You should have received a copy of the GNU General Public License 15 * along with this program. If not, see <https://www.gnu.org/licenses/>. 16 */ 17 18declare(strict_types=1); 19 20namespace Fisharebest\Webtrees\Module; 21 22use Aura\Router\RouterContainer; 23use Fisharebest\Webtrees\Contracts\UserInterface; 24use Fisharebest\Webtrees\Registry; 25use Fisharebest\Webtrees\GedcomRecord; 26use Fisharebest\Webtrees\I18N; 27use Fisharebest\Webtrees\Repository; 28use Fisharebest\Webtrees\Tree; 29use Fisharebest\Webtrees\Auth; 30use Illuminate\Database\Capsule\Manager as DB; 31use Psr\Http\Message\ResponseInterface; 32use Psr\Http\Message\ServerRequestInterface; 33use Psr\Http\Server\RequestHandlerInterface; 34 35use function app; 36use function assert; 37use function redirect; 38 39/** 40 * Class RepositoryListModule 41 */ 42class RepositoryListModule extends AbstractModule implements ModuleListInterface, RequestHandlerInterface 43{ 44 use ModuleListTrait; 45 46 protected const ROUTE_URL = '/tree/{tree}/repository-list'; 47 48 /** @var int The default access level for this module. It can be changed in the control panel. */ 49 protected $access_level = Auth::PRIV_USER; 50 51 /** 52 * Initialization. 53 * 54 * @return void 55 */ 56 public function boot(): void 57 { 58 $router_container = app(RouterContainer::class); 59 assert($router_container instanceof RouterContainer); 60 61 $router_container->getMap() 62 ->get(static::class, static::ROUTE_URL, $this); 63 } 64 65 /** 66 * How should this module be identified in the control panel, etc.? 67 * 68 * @return string 69 */ 70 public function title(): string 71 { 72 /* I18N: Name of a module/list */ 73 return I18N::translate('Repositories'); 74 } 75 76 /** 77 * A sentence describing what this module does. 78 * 79 * @return string 80 */ 81 public function description(): string 82 { 83 /* I18N: Description of the “Repositories” module */ 84 return I18N::translate('A list of repositories.'); 85 } 86 87 /** 88 * CSS class for the URL. 89 * 90 * @return string 91 */ 92 public function listMenuClass(): string 93 { 94 return 'menu-list-repo'; 95 } 96 97 /** 98 * @param Tree $tree 99 * @param array<bool|int|string|array|null> $parameters 100 * 101 * @return string 102 */ 103 public function listUrl(Tree $tree, array $parameters = []): string 104 { 105 $parameters['tree'] = $tree->name(); 106 107 return route(static::class, $parameters); 108 } 109 110 /** 111 * @return array<string> 112 */ 113 public function listUrlAttributes(): array 114 { 115 return []; 116 } 117 118 /** 119 * @param Tree $tree 120 * 121 * @return bool 122 */ 123 public function listIsEmpty(Tree $tree): bool 124 { 125 return !DB::table('other') 126 ->where('o_file', '=', $tree->id()) 127 ->where('o_type', '=', Repository::RECORD_TYPE) 128 ->exists(); 129 } 130 131 /** 132 * Handle URLs generated by older versions of webtrees 133 * 134 * @param ServerRequestInterface $request 135 * 136 * @return ResponseInterface 137 */ 138 public function getListAction(ServerRequestInterface $request): ResponseInterface 139 { 140 return redirect($this->listUrl($request->getAttribute('tree'), $request->getQueryParams())); 141 } 142 143 /** 144 * @param ServerRequestInterface $request 145 * 146 * @return ResponseInterface 147 */ 148 public function handle(ServerRequestInterface $request): ResponseInterface 149 { 150 $tree = $request->getAttribute('tree'); 151 assert($tree instanceof Tree); 152 153 $user = $request->getAttribute('user'); 154 assert($user instanceof UserInterface); 155 156 Auth::checkComponentAccess($this, ModuleListInterface::class, $tree, $user); 157 158 $repositories = DB::table('other') 159 ->where('o_file', '=', $tree->id()) 160 ->where('o_type', '=', Repository::RECORD_TYPE) 161 ->get() 162 ->map(Registry::repositoryFactory()->mapper($tree)) 163 ->filter(GedcomRecord::accessFilter()); 164 165 return $this->viewResponse('modules/repository-list/page', [ 166 'repositories' => $repositories, 167 'title' => I18N::translate('Repositories'), 168 'tree' => $tree, 169 ]); 170 } 171} 172