xref: /webtrees/app/Http/RequestHandlers/ReorderChildrenAction.php (revision d11be7027e34e3121be11cc025421873364403f9)
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2023 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\Http\RequestHandlers;
21
22use Fisharebest\Webtrees\Auth;
23use Fisharebest\Webtrees\Registry;
24use Fisharebest\Webtrees\Validator;
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 implode;
32use function redirect;
33use function uksort;
34
35/**
36 * Reorder the children in a family.
37 */
38class ReorderChildrenAction implements RequestHandlerInterface
39{
40    /**
41     * @param ServerRequestInterface $request
42     *
43     * @return ResponseInterface
44     */
45    public function handle(ServerRequestInterface $request): ResponseInterface
46    {
47        $tree = Validator::attributes($request)->tree();
48        $xref = Validator::attributes($request)->isXref()->string('xref');
49
50        $family = Registry::familyFactory()->make($xref, $tree);
51        $family = Auth::checkFamilyAccess($family, true);
52
53        $order = Validator::parsedBody($request)->array('order');
54        $url   = Validator::parsedBody($request)->isLocalUrl()->string('url', $family->url());
55
56        $fake_facts = ['0 @' . $family->xref() . '@ FAM'];
57        $sort_facts = [];
58        $keep_facts = [];
59
60        // Split facts into FAMS and other
61        foreach ($family->facts() as $fact) {
62            if ($fact->tag() === 'FAM:CHIL') {
63                $sort_facts[$fact->id()] = $fact->gedcom();
64            } else {
65                $keep_facts[] = $fact->gedcom();
66            }
67        }
68
69        // Sort the facts
70        $callback = static fn (string $x, string $y): int => array_search($x, $order, true) <=> array_search($y, $order, true);
71        uksort($sort_facts, $callback);
72
73        // Merge the facts
74        $gedcom = implode("\n", array_merge($fake_facts, $sort_facts, $keep_facts));
75
76        $family->updateRecord($gedcom, false);
77
78        return redirect($url);
79    }
80}
81