13b3db8adSGreg Roach<?php 23b3db8adSGreg Roach 33b3db8adSGreg Roach/** 43b3db8adSGreg Roach * webtrees: online genealogy 5d11be702SGreg 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; 2319aed3a1SGreg Roachuse Fisharebest\Webtrees\Fact; 243b3db8adSGreg Roachuse Fisharebest\Webtrees\Http\ViewResponseTrait; 253b3db8adSGreg Roachuse Fisharebest\Webtrees\I18N; 266b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry; 27b55cbc6bSGreg Roachuse Fisharebest\Webtrees\Validator; 283b3db8adSGreg Roachuse Psr\Http\Message\ResponseInterface; 293b3db8adSGreg Roachuse Psr\Http\Message\ServerRequestInterface; 303b3db8adSGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 313b3db8adSGreg Roach 323b3db8adSGreg Roachuse function redirect; 333b3db8adSGreg Roach 343b3db8adSGreg Roach/** 353b3db8adSGreg Roach * Edit the raw GEDCOM of a fact. 363b3db8adSGreg Roach */ 373b3db8adSGreg Roachclass EditRawFactPage implements RequestHandlerInterface 383b3db8adSGreg Roach{ 393b3db8adSGreg Roach use ViewResponseTrait; 403b3db8adSGreg Roach 413b3db8adSGreg Roach /** 423b3db8adSGreg Roach * @param ServerRequestInterface $request 433b3db8adSGreg Roach * 443b3db8adSGreg Roach * @return ResponseInterface 453b3db8adSGreg Roach */ 463b3db8adSGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 473b3db8adSGreg Roach { 48b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 49b55cbc6bSGreg Roach $xref = Validator::attributes($request)->isXref()->string('xref'); 506b9cb339SGreg Roach $record = Registry::gedcomRecordFactory()->make($xref, $tree); 51ddeb3354SGreg Roach $record = Auth::checkRecordAccess($record, true); 52b55cbc6bSGreg Roach $fact_id = Validator::attributes($request)->string('fact_id'); 533b3db8adSGreg Roach $title = I18N::translate('Edit the raw GEDCOM') . ' - ' . $record->fullName(); 543b3db8adSGreg Roach 5519aed3a1SGreg Roach $fact = $record->facts([], false, null, true) 56*f25fc0f9SGreg Roach ->first(static fn (Fact $fact): bool => $fact->id() === $fact_id); 5719aed3a1SGreg Roach 5819aed3a1SGreg Roach if ($fact instanceof Fact) { 593b3db8adSGreg Roach return $this->viewResponse('edit/raw-gedcom-fact', [ 603b3db8adSGreg Roach 'fact' => $fact, 613b3db8adSGreg Roach 'title' => $title, 62ef5d23f1SGreg Roach 'tree' => $tree, 639f0bdfcdSGreg Roach 'url' => Validator::queryParams($request)->isLocalUrl()->string('url', $fact->record()->url()), 643b3db8adSGreg Roach ]); 653b3db8adSGreg Roach } 663b3db8adSGreg Roach 673b3db8adSGreg Roach return redirect($record->url()); 683b3db8adSGreg Roach } 693b3db8adSGreg Roach} 70