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