xref: /webtrees/app/Module/HourglassChartModule.php (revision 982e6c5587f167a514f0634a1e3d44fc2835f003)
1168ff6f3Sric2016<?php
23976b470SGreg Roach
3168ff6f3Sric2016/**
4168ff6f3Sric2016 * webtrees: online genealogy
58fcd0d32SGreg Roach * Copyright (C) 2019 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
15168ff6f3Sric2016 * along with this program. If not, see <http://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;
295229eadeSGreg Roachuse Fisharebest\Webtrees\Tree;
30cb0eb4a9SGreg Roachuse Illuminate\Support\Collection;
315229eadeSGreg Roachuse InvalidArgumentException;
326ccdf4f0SGreg Roachuse Psr\Http\Message\ResponseInterface;
336ccdf4f0SGreg Roachuse Psr\Http\Message\ServerRequestInterface;
3471378461SGreg Roachuse Psr\Http\Server\RequestHandlerInterface;
353976b470SGreg Roach
365229eadeSGreg Roachuse function assert;
37cb0eb4a9SGreg Roachuse function response;
38f4ba05e3SGreg Roachuse function view;
39168ff6f3Sric2016
40168ff6f3Sric2016/**
41168ff6f3Sric2016 * Class HourglassChartModule
42168ff6f3Sric2016 */
4371378461SGreg Roachclass HourglassChartModule extends AbstractModule implements ModuleChartInterface, RequestHandlerInterface
44c1010edaSGreg Roach{
4549a243cbSGreg Roach    use ModuleChartTrait;
4649a243cbSGreg Roach
4771378461SGreg Roach    private const ROUTE_NAME = 'hourglass-chart';
4871378461SGreg Roach    private 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     *
6571378461SGreg Roach     * @param RouterContainer $router_container
6671378461SGreg Roach     */
67*982e6c55SGreg Roach    public function boot(RouterContainer $router_container): void
6871378461SGreg Roach    {
6971378461SGreg Roach        $router_container->getMap()
7071378461SGreg Roach            ->get(self::ROUTE_NAME, self::ROUTE_URL, self::class)
7171378461SGreg Roach            ->allows(RequestMethodInterface::METHOD_POST)
7271378461SGreg Roach            ->tokens([
7371378461SGreg Roach                'generations' => '\d+',
7471378461SGreg Roach                'spouses'     => '1?',
7571378461SGreg Roach            ]);
7671378461SGreg Roach    }
7726684e68SGreg Roach
78168ff6f3Sric2016    /**
790cfd6963SGreg Roach     * How should this module be identified in the control panel, etc.?
80168ff6f3Sric2016     *
81168ff6f3Sric2016     * @return string
82168ff6f3Sric2016     */
8349a243cbSGreg Roach    public function title(): string
84c1010edaSGreg Roach    {
85bbb76c12SGreg Roach        /* I18N: Name of a module/chart */
86bbb76c12SGreg Roach        return I18N::translate('Hourglass chart');
87168ff6f3Sric2016    }
88168ff6f3Sric2016
89168ff6f3Sric2016    /**
90168ff6f3Sric2016     * A sentence describing what this module does.
91168ff6f3Sric2016     *
92168ff6f3Sric2016     * @return string
93168ff6f3Sric2016     */
9449a243cbSGreg Roach    public function description(): string
95c1010edaSGreg Roach    {
96bbb76c12SGreg Roach        /* I18N: Description of the “HourglassChart” module */
97bbb76c12SGreg Roach        return I18N::translate('An hourglass chart of an individual’s ancestors and descendants.');
98168ff6f3Sric2016    }
99168ff6f3Sric2016
100168ff6f3Sric2016    /**
101377a2979SGreg Roach     * CSS class for the URL.
102377a2979SGreg Roach     *
103377a2979SGreg Roach     * @return string
104377a2979SGreg Roach     */
105377a2979SGreg Roach    public function chartMenuClass(): string
106377a2979SGreg Roach    {
107377a2979SGreg Roach        return 'menu-chart-hourglass';
108377a2979SGreg Roach    }
109377a2979SGreg Roach
110377a2979SGreg Roach    /**
1114eb71cfaSGreg Roach     * Return a menu item for this chart - for use in individual boxes.
1124eb71cfaSGreg Roach     *
11360bc3e3fSGreg Roach     * @param Individual $individual
11460bc3e3fSGreg Roach     *
1154eb71cfaSGreg Roach     * @return Menu|null
1164eb71cfaSGreg Roach     */
117377a2979SGreg Roach    public function chartBoxMenu(Individual $individual): ?Menu
118c1010edaSGreg Roach    {
119e6562982SGreg Roach        return $this->chartMenu($individual);
120e6562982SGreg Roach    }
121e6562982SGreg Roach
122e6562982SGreg Roach    /**
12371378461SGreg Roach     * The title for a specific instance of this chart.
124e6562982SGreg Roach     *
12571378461SGreg Roach     * @param Individual $individual
12671378461SGreg Roach     *
12771378461SGreg Roach     * @return string
12871378461SGreg Roach     */
12971378461SGreg Roach    public function chartTitle(Individual $individual): string
13071378461SGreg Roach    {
13171378461SGreg Roach        /* I18N: %s is an individual’s name */
13271378461SGreg Roach        return I18N::translate('Hourglass chart of %s', $individual->fullName());
13371378461SGreg Roach    }
13471378461SGreg Roach
13571378461SGreg Roach    /**
13671378461SGreg Roach     * The URL for a page showing chart options.
13771378461SGreg Roach     *
13871378461SGreg Roach     * @param Individual $individual
13959597b37SGreg Roach     * @param mixed[]    $parameters
14071378461SGreg Roach     *
14171378461SGreg Roach     * @return string
14271378461SGreg Roach     */
14371378461SGreg Roach    public function chartUrl(Individual $individual, array $parameters = []): string
14471378461SGreg Roach    {
14571378461SGreg Roach        return route(self::ROUTE_NAME, [
14671378461SGreg Roach                'xref' => $individual->xref(),
14771378461SGreg Roach                'tree' => $individual->tree()->name(),
14871378461SGreg Roach            ] + $parameters + self::DEFAULT_PARAMETERS);
14971378461SGreg Roach    }
15071378461SGreg Roach
15171378461SGreg Roach    /**
1526ccdf4f0SGreg Roach     * @param ServerRequestInterface $request
153e6562982SGreg Roach     *
1546ccdf4f0SGreg Roach     * @return ResponseInterface
155e6562982SGreg Roach     */
15671378461SGreg Roach    public function handle(ServerRequestInterface $request): ResponseInterface
157e6562982SGreg Roach    {
15857ab2231SGreg Roach        $tree        = $request->getAttribute('tree');
15957ab2231SGreg Roach        $user        = $request->getAttribute('user');
16071378461SGreg Roach        $xref        = $request->getAttribute('xref');
16171378461SGreg Roach        $generations = (int) $request->getAttribute('generations');
16271378461SGreg Roach        $spouses     = (bool) $request->getAttribute('spouses');
1630b93976aSGreg Roach        $ajax        = $request->getQueryParams()['ajax'] ?? '';
16426684e68SGreg Roach        $individual  = Individual::getInstance($xref, $tree);
16526684e68SGreg Roach
16671378461SGreg Roach        // Convert POST requests into GET requests for pretty URLs.
16771378461SGreg Roach        if ($request->getMethod() === RequestMethodInterface::METHOD_POST) {
16871378461SGreg Roach            return redirect(route(self::ROUTE_NAME, [
16971378461SGreg Roach                'tree'        => $request->getAttribute('tree')->name(),
17071378461SGreg Roach                'xref'        => $request->getParsedBody()['xref'],
17171378461SGreg Roach                'generations' => $request->getParsedBody()['generations'],
17271378461SGreg Roach                'spouses'     => $request->getParsedBody()['spouses'] ?? false,
17371378461SGreg Roach            ]));
17471378461SGreg Roach        }
17571378461SGreg Roach
17626684e68SGreg Roach        Auth::checkIndividualAccess($individual);
1779867b2f0SGreg Roach        Auth::checkComponentAccess($this, 'chart', $tree, $user);
17826684e68SGreg Roach
179e759aebbSGreg Roach        $generations = min($generations, self::MAXIMUM_GENERATIONS);
18026684e68SGreg Roach        $generations = max($generations, self::MINIMUM_GENERATIONS);
18126684e68SGreg Roach
1820b93976aSGreg Roach        if ($ajax === '1') {
18371378461SGreg Roach            $this->layout = 'layouts/ajax';
18471378461SGreg Roach
18571378461SGreg Roach            return $this->viewResponse('modules/hourglass-chart/chart', [
18671378461SGreg Roach                'generations' => $generations,
18771378461SGreg Roach                'individual'  => $individual,
18871378461SGreg Roach                'spouses'     => $spouses,
18971378461SGreg Roach            ]);
19026684e68SGreg Roach        }
19126684e68SGreg Roach
19226684e68SGreg Roach        $ajax_url = $this->chartUrl($individual, [
1939b5537c3SGreg Roach            'ajax'        => true,
1942b29a33eSmakitso            'generations' => $generations,
19571378461SGreg Roach            'spouses'     => $spouses,
19626684e68SGreg Roach        ]);
19726684e68SGreg Roach
1989b5537c3SGreg Roach        return $this->viewResponse('modules/hourglass-chart/page', [
19926684e68SGreg Roach            'ajax_url'            => $ajax_url,
20026684e68SGreg Roach            'generations'         => $generations,
20126684e68SGreg Roach            'individual'          => $individual,
202e759aebbSGreg Roach            'maximum_generations' => self::MAXIMUM_GENERATIONS,
20326684e68SGreg Roach            'minimum_generations' => self::MINIMUM_GENERATIONS,
20471378461SGreg Roach            'module'              => $this->name(),
20571378461SGreg Roach            'spouses'             => $spouses,
20626684e68SGreg Roach            'title'               => $this->chartTitle($individual),
20726684e68SGreg Roach        ]);
20826684e68SGreg Roach    }
20926684e68SGreg Roach
21026684e68SGreg Roach    /**
211cb0eb4a9SGreg Roach     * Generate an extension to the chart
212cb0eb4a9SGreg Roach     *
213cb0eb4a9SGreg Roach     * @param ServerRequestInterface $request
214cb0eb4a9SGreg Roach     *
215cb0eb4a9SGreg Roach     * @return ResponseInterface
216cb0eb4a9SGreg Roach     */
217cb0eb4a9SGreg Roach    public function getAncestorsAction(ServerRequestInterface $request): ResponseInterface
218cb0eb4a9SGreg Roach    {
219f1d4b4a2SGreg Roach        $tree = $request->getAttribute('tree');
2205229eadeSGreg Roach        assert($tree instanceof Tree, new InvalidArgumentException());
2215229eadeSGreg Roach
222cb0eb4a9SGreg Roach        $xref = $request->getQueryParams()['xref'] ?? '';
223cb0eb4a9SGreg Roach
224cb0eb4a9SGreg Roach        $family = Family::getInstance($xref, $tree);
225cb0eb4a9SGreg Roach        Auth::checkFamilyAccess($family);
226cb0eb4a9SGreg Roach
227cb0eb4a9SGreg Roach        return response(view('modules/hourglass-chart/parents', [
228cb0eb4a9SGreg Roach            'family'      => $family,
229cb0eb4a9SGreg Roach            'generations' => 1,
23026684e68SGreg Roach        ]));
23126684e68SGreg Roach    }
23226684e68SGreg Roach
23326684e68SGreg Roach    /**
234cb0eb4a9SGreg Roach     * Generate an extension to the chart
235cb0eb4a9SGreg Roach     *
2366ccdf4f0SGreg Roach     * @param ServerRequestInterface $request
23726684e68SGreg Roach     *
2386ccdf4f0SGreg Roach     * @return ResponseInterface
23926684e68SGreg Roach     */
240cb0eb4a9SGreg Roach    public function getDescendantsAction(ServerRequestInterface $request): ResponseInterface
24126684e68SGreg Roach    {
242f1d4b4a2SGreg Roach        $tree = $request->getAttribute('tree');
2435229eadeSGreg Roach        assert($tree instanceof Tree, new InvalidArgumentException());
2445229eadeSGreg Roach
245cb0eb4a9SGreg Roach        $xref = $request->getQueryParams()['xref'] ?? '';
24626684e68SGreg Roach
24771378461SGreg Roach        $spouses    = (bool) ($request->getQueryParams()['spouses'] ?? false);
248cb0eb4a9SGreg Roach        $individual = Individual::getInstance($xref, $tree);
249a21e5374SGreg Roach
25026684e68SGreg Roach        Auth::checkIndividualAccess($individual);
251a21e5374SGreg Roach
252a21e5374SGreg Roach        $children = $individual->spouseFamilies()->map(static function (Family $family): Collection {
253a21e5374SGreg Roach            return $family->children();
254a21e5374SGreg Roach        })->flatten();
25526684e68SGreg Roach
256cb0eb4a9SGreg Roach        return response(view('modules/hourglass-chart/children', [
257cb0eb4a9SGreg Roach            'children'    => $children,
258cb0eb4a9SGreg Roach            'generations' => 1,
25971378461SGreg Roach            'spouses'     => $spouses,
260cb0eb4a9SGreg Roach        ]));
261e6562982SGreg Roach    }
262168ff6f3Sric2016}
263