xref: /webtrees/app/Http/RequestHandlers/ReorderFamiliesAction.php (revision e3c147d0d53873311b7c137c41b4439e01d4189e) 
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2019 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 <http://www.gnu.org/licenses/>.
16 */
17
18declare(strict_types=1);
19
20namespace Fisharebest\Webtrees\Http\RequestHandlers;
21
22use Fisharebest\Webtrees\Auth;
23use Fisharebest\Webtrees\Individual;
24use Fisharebest\Webtrees\Tree;
25use Psr\Http\Message\ResponseInterface;
26use Psr\Http\Message\ServerRequestInterface;
27use Psr\Http\Server\RequestHandlerInterface;
28
29use function array_merge;
30use function array_search;
31use function assert;
32use function implode;
33use function is_array;
34use function is_string;
35use function redirect;
36use function uksort;
37
38/**
39 * Reorder the parents and/or spouses of an individual.
40 */
41class ReorderFamiliesAction implements RequestHandlerInterface
42{
43    /**
44     * @param ServerRequestInterface $request
45     *
46     * @return ResponseInterface
47     */
48    public function handle(ServerRequestInterface $request): ResponseInterface
49    {
50        $tree = $request->getAttribute('tree');
51        assert($tree instanceof Tree);
52
53        $xref = $request->getAttribute('xref');
54        assert(is_string($xref));
55
56        $individual = Individual::getInstance($xref, $tree);
57        $individual = Auth::checkIndividualAccess($individual, true);
58
59        $params = (array) $request->getParsedBody();
60
61        $order = $params['order'];
62        assert(is_array($order));
63
64        $dummy_facts = ['0 @' . $individual->xref() . '@ INDI'];
65        $sort_facts  = [];
66        $keep_facts  = [];
67
68        // Split facts into FAMS and other
69        foreach ($individual->facts() as $fact) {
70            $tag = $fact->getTag();
71
72            if ($tag === 'FAMC' || $tag === 'FAMS') {
73                $sort_facts[$fact->id()] = $fact->gedcom();
74            } else {
75                $keep_facts[] = $fact->gedcom();
76            }
77        }
78
79        // Sort the facts
80        uksort($sort_facts, static function ($x, $y) use ($order) {
81            return array_search($x, $order, true) <=> array_search($y, $order, true);
82        });
83
84        // Merge the facts
85        $gedcom = implode("\n", array_merge($dummy_facts, $sort_facts, $keep_facts));
86
87        $individual->updateRecord($gedcom, false);
88
89        return redirect($individual->url());
90    }
91}
92