1168ff6f3Sric2016<?php 23976b470SGreg Roach 3168ff6f3Sric2016/** 4168ff6f3Sric2016 * webtrees: online genealogy 589f7189bSGreg Roach * Copyright (C) 2021 webtrees development team 6168ff6f3Sric2016 * This program is free software: you can redistribute it and/or modify 7168ff6f3Sric2016 * it under the terms of the GNU General Public License as published by 8168ff6f3Sric2016 * the Free Software Foundation, either version 3 of the License, or 9168ff6f3Sric2016 * (at your option) any later version. 10168ff6f3Sric2016 * This program is distributed in the hope that it will be useful, 11168ff6f3Sric2016 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12168ff6f3Sric2016 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13168ff6f3Sric2016 * GNU General Public License for more details. 14168ff6f3Sric2016 * You should have received a copy of the GNU General Public License 1589f7189bSGreg Roach * along with this program. If not, see <https://www.gnu.org/licenses/>. 16168ff6f3Sric2016 */ 17fcfa147eSGreg Roach 18e7f56f2aSGreg Roachdeclare(strict_types=1); 19e7f56f2aSGreg Roach 20168ff6f3Sric2016namespace Fisharebest\Webtrees\Module; 21168ff6f3Sric2016 2271378461SGreg Roachuse Aura\Router\RouterContainer; 2371378461SGreg Roachuse Fig\Http\Message\RequestMethodInterface; 2426684e68SGreg Roachuse Fisharebest\Webtrees\Auth; 25cb0eb4a9SGreg Roachuse Fisharebest\Webtrees\Family; 26168ff6f3Sric2016use Fisharebest\Webtrees\I18N; 27168ff6f3Sric2016use Fisharebest\Webtrees\Individual; 28e46b0479SScrutinizer Auto-Fixeruse Fisharebest\Webtrees\Menu; 29*b55cbc6bSGreg Roachuse Fisharebest\Webtrees\Registry; 30*b55cbc6bSGreg Roachuse Fisharebest\Webtrees\Validator; 31cb0eb4a9SGreg Roachuse Illuminate\Support\Collection; 326ccdf4f0SGreg Roachuse Psr\Http\Message\ResponseInterface; 336ccdf4f0SGreg Roachuse Psr\Http\Message\ServerRequestInterface; 3471378461SGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 353976b470SGreg Roach 369e18e23bSGreg Roachuse function app; 375229eadeSGreg Roachuse function assert; 38cb0eb4a9SGreg Roachuse function response; 39f4ba05e3SGreg Roachuse function view; 40168ff6f3Sric2016 41168ff6f3Sric2016/** 42168ff6f3Sric2016 * Class HourglassChartModule 43168ff6f3Sric2016 */ 4471378461SGreg Roachclass HourglassChartModule extends AbstractModule implements ModuleChartInterface, RequestHandlerInterface 45c1010edaSGreg Roach{ 4649a243cbSGreg Roach use ModuleChartTrait; 4749a243cbSGreg Roach 4872f04adfSGreg Roach protected const ROUTE_URL = '/tree/{tree}/hourglass-{generations}-{spouses}/{xref}'; 4971378461SGreg Roach 5026684e68SGreg Roach // Defaults 5126684e68SGreg Roach private const DEFAULT_GENERATIONS = '3'; 5271378461SGreg Roach private const DEFAULT_SPOUSES = false; 5371378461SGreg Roach protected const DEFAULT_PARAMETERS = [ 5471378461SGreg Roach 'generations' => self::DEFAULT_GENERATIONS, 5571378461SGreg Roach 'spouses' => self::DEFAULT_SPOUSES, 5671378461SGreg Roach ]; 5726684e68SGreg Roach 5826684e68SGreg Roach // Limits 5971378461SGreg Roach protected const MINIMUM_GENERATIONS = 2; 6071378461SGreg Roach protected const MAXIMUM_GENERATIONS = 10; 6171378461SGreg Roach 6271378461SGreg Roach /** 6371378461SGreg Roach * Initialization. 6471378461SGreg Roach * 659e18e23bSGreg Roach * @return void 6671378461SGreg Roach */ 679e18e23bSGreg Roach public function boot(): void 6871378461SGreg Roach { 699e18e23bSGreg Roach $router_container = app(RouterContainer::class); 709e18e23bSGreg Roach assert($router_container instanceof RouterContainer); 719e18e23bSGreg Roach 7271378461SGreg Roach $router_container->getMap() 7372f04adfSGreg Roach ->get(static::class, static::ROUTE_URL, $this) 7471378461SGreg Roach ->allows(RequestMethodInterface::METHOD_POST) 7571378461SGreg Roach ->tokens([ 7671378461SGreg Roach 'generations' => '\d+', 7771378461SGreg Roach 'spouses' => '1?', 7871378461SGreg Roach ]); 7971378461SGreg Roach } 8026684e68SGreg Roach 81168ff6f3Sric2016 /** 820cfd6963SGreg Roach * How should this module be identified in the control panel, etc.? 83168ff6f3Sric2016 * 84168ff6f3Sric2016 * @return string 85168ff6f3Sric2016 */ 8649a243cbSGreg Roach public function title(): string 87c1010edaSGreg Roach { 88bbb76c12SGreg Roach /* I18N: Name of a module/chart */ 89bbb76c12SGreg Roach return I18N::translate('Hourglass chart'); 90168ff6f3Sric2016 } 91168ff6f3Sric2016 92168ff6f3Sric2016 /** 93168ff6f3Sric2016 * A sentence describing what this module does. 94168ff6f3Sric2016 * 95168ff6f3Sric2016 * @return string 96168ff6f3Sric2016 */ 9749a243cbSGreg Roach public function description(): string 98c1010edaSGreg Roach { 99bbb76c12SGreg Roach /* I18N: Description of the “HourglassChart” module */ 100bbb76c12SGreg Roach return I18N::translate('An hourglass chart of an individual’s ancestors and descendants.'); 101168ff6f3Sric2016 } 102168ff6f3Sric2016 103168ff6f3Sric2016 /** 104377a2979SGreg Roach * CSS class for the URL. 105377a2979SGreg Roach * 106377a2979SGreg Roach * @return string 107377a2979SGreg Roach */ 108377a2979SGreg Roach public function chartMenuClass(): string 109377a2979SGreg Roach { 110377a2979SGreg Roach return 'menu-chart-hourglass'; 111377a2979SGreg Roach } 112377a2979SGreg Roach 113377a2979SGreg Roach /** 1144eb71cfaSGreg Roach * Return a menu item for this chart - for use in individual boxes. 1154eb71cfaSGreg Roach * 11660bc3e3fSGreg Roach * @param Individual $individual 11760bc3e3fSGreg Roach * 1184eb71cfaSGreg Roach * @return Menu|null 1194eb71cfaSGreg Roach */ 120377a2979SGreg Roach public function chartBoxMenu(Individual $individual): ?Menu 121c1010edaSGreg Roach { 122e6562982SGreg Roach return $this->chartMenu($individual); 123e6562982SGreg Roach } 124e6562982SGreg Roach 125e6562982SGreg Roach /** 12671378461SGreg Roach * The title for a specific instance of this chart. 127e6562982SGreg Roach * 12871378461SGreg Roach * @param Individual $individual 12971378461SGreg Roach * 13071378461SGreg Roach * @return string 13171378461SGreg Roach */ 13271378461SGreg Roach public function chartTitle(Individual $individual): string 13371378461SGreg Roach { 13471378461SGreg Roach /* I18N: %s is an individual’s name */ 13571378461SGreg Roach return I18N::translate('Hourglass chart of %s', $individual->fullName()); 13671378461SGreg Roach } 13771378461SGreg Roach 13871378461SGreg Roach /** 13971378461SGreg Roach * The URL for a page showing chart options. 14071378461SGreg Roach * 14171378461SGreg Roach * @param Individual $individual 14276d39c55SGreg Roach * @param array<bool|int|string|array<string>|null> $parameters 14371378461SGreg Roach * 14471378461SGreg Roach * @return string 14571378461SGreg Roach */ 14671378461SGreg Roach public function chartUrl(Individual $individual, array $parameters = []): string 14771378461SGreg Roach { 14872f04adfSGreg Roach return route(static::class, [ 14971378461SGreg Roach 'xref' => $individual->xref(), 15071378461SGreg Roach 'tree' => $individual->tree()->name(), 15171378461SGreg Roach ] + $parameters + self::DEFAULT_PARAMETERS); 15271378461SGreg Roach } 15371378461SGreg Roach 15471378461SGreg Roach /** 1556ccdf4f0SGreg Roach * @param ServerRequestInterface $request 156e6562982SGreg Roach * 1576ccdf4f0SGreg Roach * @return ResponseInterface 158e6562982SGreg Roach */ 15971378461SGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 160e6562982SGreg Roach { 161*b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 162*b55cbc6bSGreg Roach $xref = Validator::attributes($request)->isXref()->string('xref'); 163*b55cbc6bSGreg Roach $user = Validator::attributes($request)->user(); 164*b55cbc6bSGreg Roach $generations = Validator::attributes($request)->isBetween(self::MINIMUM_GENERATIONS, self::MAXIMUM_GENERATIONS)->integer('generations'); 165*b55cbc6bSGreg Roach $spouses = Validator::attributes($request)->boolean('spouses'); 166*b55cbc6bSGreg Roach $ajax = Validator::queryParams($request)->boolean('ajax', false); 16726684e68SGreg Roach 16871378461SGreg Roach // Convert POST requests into GET requests for pretty URLs. 16971378461SGreg Roach if ($request->getMethod() === RequestMethodInterface::METHOD_POST) { 17072f04adfSGreg Roach return redirect(route(static::class, [ 1714ea62551SGreg Roach 'tree' => $tree->name(), 172*b55cbc6bSGreg Roach 'xref' => Validator::parsedBody($request)->string('xref', ''), 173*b55cbc6bSGreg Roach 'generations' => Validator::parsedBody($request)->string('generations', ''), 174*b55cbc6bSGreg Roach 'spouses' => Validator::parsedBody($request)->string('spouses', ''), 17571378461SGreg Roach ])); 17671378461SGreg Roach } 17771378461SGreg Roach 178ef483801SGreg Roach Auth::checkComponentAccess($this, ModuleChartInterface::class, $tree, $user); 17926684e68SGreg Roach 180*b55cbc6bSGreg Roach $individual = Registry::individualFactory()->make($xref, $tree); 181*b55cbc6bSGreg Roach $individual = Auth::checkIndividualAccess($individual, false, true); 18226684e68SGreg Roach 183*b55cbc6bSGreg Roach if ($ajax) { 18471378461SGreg Roach $this->layout = 'layouts/ajax'; 18571378461SGreg Roach 18671378461SGreg Roach return $this->viewResponse('modules/hourglass-chart/chart', [ 18771378461SGreg Roach 'generations' => $generations, 18871378461SGreg Roach 'individual' => $individual, 18971378461SGreg Roach 'spouses' => $spouses, 19071378461SGreg Roach ]); 19126684e68SGreg Roach } 19226684e68SGreg Roach 19326684e68SGreg Roach $ajax_url = $this->chartUrl($individual, [ 1949b5537c3SGreg Roach 'ajax' => true, 1952b29a33eSmakitso 'generations' => $generations, 19671378461SGreg Roach 'spouses' => $spouses, 19726684e68SGreg Roach ]); 19826684e68SGreg Roach 1999b5537c3SGreg Roach return $this->viewResponse('modules/hourglass-chart/page', [ 20026684e68SGreg Roach 'ajax_url' => $ajax_url, 20126684e68SGreg Roach 'generations' => $generations, 20226684e68SGreg Roach 'individual' => $individual, 203e759aebbSGreg Roach 'maximum_generations' => self::MAXIMUM_GENERATIONS, 20426684e68SGreg Roach 'minimum_generations' => self::MINIMUM_GENERATIONS, 20571378461SGreg Roach 'module' => $this->name(), 20671378461SGreg Roach 'spouses' => $spouses, 20726684e68SGreg Roach 'title' => $this->chartTitle($individual), 208ef5d23f1SGreg Roach 'tree' => $tree, 20926684e68SGreg Roach ]); 21026684e68SGreg Roach } 21126684e68SGreg Roach 21226684e68SGreg Roach /** 213cb0eb4a9SGreg Roach * Generate an extension to the chart 214cb0eb4a9SGreg Roach * 215cb0eb4a9SGreg Roach * @param ServerRequestInterface $request 216cb0eb4a9SGreg Roach * 217cb0eb4a9SGreg Roach * @return ResponseInterface 218cb0eb4a9SGreg Roach */ 219cb0eb4a9SGreg Roach public function getAncestorsAction(ServerRequestInterface $request): ResponseInterface 220cb0eb4a9SGreg Roach { 221*b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 2225229eadeSGreg Roach 223cb0eb4a9SGreg Roach $xref = $request->getQueryParams()['xref'] ?? ''; 224cb0eb4a9SGreg Roach 2256b9cb339SGreg Roach $family = Registry::familyFactory()->make($xref, $tree); 226ddeb3354SGreg Roach $family = Auth::checkFamilyAccess($family); 227cb0eb4a9SGreg Roach 228cb0eb4a9SGreg Roach return response(view('modules/hourglass-chart/parents', [ 229cb0eb4a9SGreg Roach 'family' => $family, 230cb0eb4a9SGreg Roach 'generations' => 1, 23126684e68SGreg Roach ])); 23226684e68SGreg Roach } 23326684e68SGreg Roach 23426684e68SGreg Roach /** 235cb0eb4a9SGreg Roach * Generate an extension to the chart 236cb0eb4a9SGreg Roach * 2376ccdf4f0SGreg Roach * @param ServerRequestInterface $request 23826684e68SGreg Roach * 2396ccdf4f0SGreg Roach * @return ResponseInterface 24026684e68SGreg Roach */ 241cb0eb4a9SGreg Roach public function getDescendantsAction(ServerRequestInterface $request): ResponseInterface 24226684e68SGreg Roach { 243*b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 2445229eadeSGreg Roach 245cb0eb4a9SGreg Roach $xref = $request->getQueryParams()['xref'] ?? ''; 24626684e68SGreg Roach 24771378461SGreg Roach $spouses = (bool) ($request->getQueryParams()['spouses'] ?? false); 2486b9cb339SGreg Roach $individual = Registry::individualFactory()->make($xref, $tree); 2493c3fd0a5SGreg Roach $individual = Auth::checkIndividualAccess($individual, false, true); 250a21e5374SGreg Roach 251a21e5374SGreg Roach $children = $individual->spouseFamilies()->map(static function (Family $family): Collection { 252a21e5374SGreg Roach return $family->children(); 253a21e5374SGreg Roach })->flatten(); 25426684e68SGreg Roach 255cb0eb4a9SGreg Roach return response(view('modules/hourglass-chart/children', [ 256cb0eb4a9SGreg Roach 'children' => $children, 257cb0eb4a9SGreg Roach 'generations' => 1, 25871378461SGreg Roach 'spouses' => $spouses, 259cb0eb4a9SGreg Roach ])); 260e6562982SGreg Roach } 261168ff6f3Sric2016} 262