xref: /webtrees/app/Http/RequestHandlers/EditRecordAction.php (revision 090a06287954f43677f06ea778b3f67c029de8fe)
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\Http\RequestHandlers;
21
22use Fisharebest\Webtrees\Auth;
23use Fisharebest\Webtrees\Header;
24use Fisharebest\Webtrees\Registry;
25use Fisharebest\Webtrees\Services\GedcomEditService;
26use Fisharebest\Webtrees\Services\ModuleService;
27use Fisharebest\Webtrees\Tree;
28use Psr\Http\Message\ResponseInterface;
29use Psr\Http\Message\ServerRequestInterface;
30use Psr\Http\Server\RequestHandlerInterface;
31
32use function assert;
33use function is_string;
34use function redirect;
35
36/**
37 * Save an updated GEDCOM record.
38 */
39class EditRecordAction implements RequestHandlerInterface
40{
41    /** @var GedcomEditService */
42    private $gedcom_edit_service;
43
44    /**
45     * EditFactAction constructor.
46     *
47     * @param GedcomEditService $gedcom_edit_service
48     */
49    public function __construct(GedcomEditService $gedcom_edit_service)
50    {
51        $this->gedcom_edit_service = $gedcom_edit_service;
52    }
53
54    /**
55     * @param ServerRequestInterface $request
56     *
57     * @return ResponseInterface
58     */
59    public function handle(ServerRequestInterface $request): ResponseInterface
60    {
61        $tree = $request->getAttribute('tree');
62        assert($tree instanceof Tree);
63
64        $xref = $request->getAttribute('xref');
65        assert(is_string($xref));
66
67        $record = Registry::gedcomRecordFactory()->make($xref, $tree);
68        $record = Auth::checkRecordAccess($record, true);
69
70        $params    = (array) $request->getParsedBody();
71        $keep_chan = (bool) ($params['keep_chan'] ?? false);
72        $levels    = $params['levels'];
73        $tags      = $params['tags'];
74        $values    = $params['values'];
75
76        if ($record->tag() === Header::RECORD_TYPE) {
77            $gedcom = '0 ' . $record->tag() . "\n";
78        } else {
79            $gedcom = '0 @' . $record->xref() . '@ ' . $record->tag() . "\n";
80        }
81
82        $gedcom .= $this->gedcom_edit_service->editLinesToGedcom($record::RECORD_TYPE, $levels, $tags, $values);
83
84        $record->updateRecord($gedcom, !$keep_chan);
85
86        return redirect($record->url());
87    }
88}
89