13b3db8adSGreg Roach<?php 23b3db8adSGreg Roach 33b3db8adSGreg Roach/** 43b3db8adSGreg Roach * webtrees: online genealogy 5*d11be702SGreg Roach * Copyright (C) 2023 webtrees development team 63b3db8adSGreg Roach * This program is free software: you can redistribute it and/or modify 73b3db8adSGreg Roach * it under the terms of the GNU General Public License as published by 83b3db8adSGreg Roach * the Free Software Foundation, either version 3 of the License, or 93b3db8adSGreg Roach * (at your option) any later version. 103b3db8adSGreg Roach * This program is distributed in the hope that it will be useful, 113b3db8adSGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 123b3db8adSGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 133b3db8adSGreg Roach * GNU General Public License for more details. 143b3db8adSGreg Roach * You should have received a copy of the GNU General Public License 1589f7189bSGreg Roach * along with this program. If not, see <https://www.gnu.org/licenses/>. 163b3db8adSGreg Roach */ 173b3db8adSGreg Roach 183b3db8adSGreg Roachdeclare(strict_types=1); 193b3db8adSGreg Roach 203b3db8adSGreg Roachnamespace Fisharebest\Webtrees\Http\RequestHandlers; 213b3db8adSGreg Roach 223b3db8adSGreg Roachuse Fisharebest\Webtrees\Auth; 233b3db8adSGreg Roachuse Fisharebest\Webtrees\Http\ViewResponseTrait; 243b3db8adSGreg Roachuse Fisharebest\Webtrees\I18N; 256b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry; 26b55cbc6bSGreg Roachuse Fisharebest\Webtrees\Validator; 273b3db8adSGreg Roachuse Psr\Http\Message\ResponseInterface; 283b3db8adSGreg Roachuse Psr\Http\Message\ServerRequestInterface; 293b3db8adSGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 303b3db8adSGreg Roach 31ce7d84caSGreg Roachuse function explode; 323b3db8adSGreg Roach 333b3db8adSGreg Roach/** 343b3db8adSGreg Roach * Edit the raw GEDCOM of a record. 353b3db8adSGreg Roach */ 363b3db8adSGreg Roachclass EditRawRecordPage implements RequestHandlerInterface 373b3db8adSGreg Roach{ 383b3db8adSGreg Roach use ViewResponseTrait; 393b3db8adSGreg Roach 403b3db8adSGreg Roach /** 413b3db8adSGreg Roach * @param ServerRequestInterface $request 423b3db8adSGreg Roach * 433b3db8adSGreg Roach * @return ResponseInterface 443b3db8adSGreg Roach */ 453b3db8adSGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 463b3db8adSGreg Roach { 47b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 48b55cbc6bSGreg Roach $xref = Validator::attributes($request)->isXref()->string('xref'); 496b9cb339SGreg Roach $record = Registry::gedcomRecordFactory()->make($xref, $tree); 50ddeb3354SGreg Roach $record = Auth::checkRecordAccess($record, true); 513b3db8adSGreg Roach 52ce7d84caSGreg Roach // Do not allow users to edit the first line. Changing the type will break things. 53ce7d84caSGreg Roach $level0 = explode("\n", $record->gedcom(), 2)[0]; 54ce7d84caSGreg Roach 553b3db8adSGreg Roach $title = I18N::translate('Edit the raw GEDCOM') . ' - ' . $record->fullName(); 563b3db8adSGreg Roach 573b3db8adSGreg Roach return $this->viewResponse('edit/raw-gedcom-record', [ 58ce7d84caSGreg Roach 'level0' => $level0, 593b3db8adSGreg Roach 'record' => $record, 603b3db8adSGreg Roach 'title' => $title, 61ef5d23f1SGreg Roach 'tree' => $tree, 623b3db8adSGreg Roach ]); 633b3db8adSGreg Roach } 643b3db8adSGreg Roach} 65