xref: /webtrees/app/Http/RequestHandlers/EditRecordAction.php (revision 0d047a8c74753c7558a60f4789c838996d6fae8b)
1c2ed51d1SGreg Roach<?php
2c2ed51d1SGreg Roach
3c2ed51d1SGreg Roach/**
4c2ed51d1SGreg Roach * webtrees: online genealogy
5c2ed51d1SGreg Roach * Copyright (C) 2021 webtrees development team
6c2ed51d1SGreg Roach * This program is free software: you can redistribute it and/or modify
7c2ed51d1SGreg Roach * it under the terms of the GNU General Public License as published by
8c2ed51d1SGreg Roach * the Free Software Foundation, either version 3 of the License, or
9c2ed51d1SGreg Roach * (at your option) any later version.
10c2ed51d1SGreg Roach * This program is distributed in the hope that it will be useful,
11c2ed51d1SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of
12c2ed51d1SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13c2ed51d1SGreg Roach * GNU General Public License for more details.
14c2ed51d1SGreg Roach * You should have received a copy of the GNU General Public License
15c2ed51d1SGreg Roach * along with this program. If not, see <https://www.gnu.org/licenses/>.
16c2ed51d1SGreg Roach */
17c2ed51d1SGreg Roach
18c2ed51d1SGreg Roachdeclare(strict_types=1);
19c2ed51d1SGreg Roach
20c2ed51d1SGreg Roachnamespace Fisharebest\Webtrees\Http\RequestHandlers;
21c2ed51d1SGreg Roach
22c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Auth;
23e7e5b015SGreg Roachuse Fisharebest\Webtrees\Header;
24c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Registry;
25c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Services\GedcomEditService;
26c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Services\ModuleService;
27c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Tree;
28c2ed51d1SGreg Roachuse Psr\Http\Message\ResponseInterface;
29c2ed51d1SGreg Roachuse Psr\Http\Message\ServerRequestInterface;
30c2ed51d1SGreg Roachuse Psr\Http\Server\RequestHandlerInterface;
31c2ed51d1SGreg Roach
32c2ed51d1SGreg Roachuse function assert;
33c2ed51d1SGreg Roachuse function is_string;
34c2ed51d1SGreg Roachuse function redirect;
35c2ed51d1SGreg Roach
36c2ed51d1SGreg Roach/**
37c2ed51d1SGreg Roach * Save an updated GEDCOM record.
38c2ed51d1SGreg Roach */
39c2ed51d1SGreg Roachclass EditRecordAction implements RequestHandlerInterface
40c2ed51d1SGreg Roach{
41c2ed51d1SGreg Roach    /** @var GedcomEditService */
42c2ed51d1SGreg Roach    private $gedcom_edit_service;
43c2ed51d1SGreg Roach
44c2ed51d1SGreg Roach    /**
45c2ed51d1SGreg Roach     * EditFactAction constructor.
46c2ed51d1SGreg Roach     *
47c2ed51d1SGreg Roach     * @param GedcomEditService $gedcom_edit_service
48c2ed51d1SGreg Roach     */
49*0d047a8cSGreg Roach    public function __construct(GedcomEditService $gedcom_edit_service)
50c2ed51d1SGreg Roach    {
51c2ed51d1SGreg Roach        $this->gedcom_edit_service = $gedcom_edit_service;
52c2ed51d1SGreg Roach    }
53c2ed51d1SGreg Roach
54c2ed51d1SGreg Roach    /**
55c2ed51d1SGreg Roach     * @param ServerRequestInterface $request
56c2ed51d1SGreg Roach     *
57c2ed51d1SGreg Roach     * @return ResponseInterface
58c2ed51d1SGreg Roach     */
59c2ed51d1SGreg Roach    public function handle(ServerRequestInterface $request): ResponseInterface
60c2ed51d1SGreg Roach    {
61c2ed51d1SGreg Roach        $tree = $request->getAttribute('tree');
62c2ed51d1SGreg Roach        assert($tree instanceof Tree);
63c2ed51d1SGreg Roach
64c2ed51d1SGreg Roach        $xref = $request->getAttribute('xref');
65c2ed51d1SGreg Roach        assert(is_string($xref));
66c2ed51d1SGreg Roach
67c2ed51d1SGreg Roach        $record = Registry::gedcomRecordFactory()->make($xref, $tree);
68c2ed51d1SGreg Roach        $record = Auth::checkRecordAccess($record, true);
69c2ed51d1SGreg Roach
70c2ed51d1SGreg Roach        $params    = (array) $request->getParsedBody();
71c2ed51d1SGreg Roach        $keep_chan = (bool) ($params['keep_chan'] ?? false);
72c2ed51d1SGreg Roach        $levels    = $params['levels'];
73c2ed51d1SGreg Roach        $tags      = $params['tags'];
74c2ed51d1SGreg Roach        $values    = $params['values'];
75c2ed51d1SGreg Roach
76e7e5b015SGreg Roach        if ($record->tag() === Header::RECORD_TYPE) {
77e7e5b015SGreg Roach            $gedcom = '0 ' . $record->tag() . "\n";
78e7e5b015SGreg Roach        } else {
79c2ed51d1SGreg Roach            $gedcom = '0 @' . $record->xref() . '@ ' . $record->tag() . "\n";
80e7e5b015SGreg Roach        }
81e7e5b015SGreg Roach
82c2ed51d1SGreg Roach        $gedcom .= $this->gedcom_edit_service->editLinesToGedcom($record::RECORD_TYPE, $levels, $tags, $values);
83c2ed51d1SGreg Roach
84c2ed51d1SGreg Roach        $record->updateRecord($gedcom, !$keep_chan);
85c2ed51d1SGreg Roach
86c2ed51d1SGreg Roach        return redirect($record->url());
87c2ed51d1SGreg Roach    }
88c2ed51d1SGreg Roach}
89