1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2022 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\I18N; 23use Fisharebest\Webtrees\Registry; 24use Fisharebest\Webtrees\Validator; 25use Psr\Http\Message\ResponseInterface; 26use Psr\Http\Message\ServerRequestInterface; 27use Psr\Http\Server\RequestHandlerInterface; 28 29use function preg_replace; 30use function response; 31use function trim; 32use function view; 33 34/** 35 * Process a form to create a new repository. 36 */ 37class CreateRepositoryAction implements RequestHandlerInterface 38{ 39 /** 40 * @param ServerRequestInterface $request 41 * 42 * @return ResponseInterface 43 */ 44 public function handle(ServerRequestInterface $request): ResponseInterface 45 { 46 $tree = Validator::attributes($request)->tree(); 47 $name = Validator::parsedBody($request)->string('name'); 48 $address = Validator::parsedBody($request)->string('address'); 49 $url = Validator::parsedBody($request)->string('url'); 50 $restriction = Validator::parsedBody($request)->isInArray(['', 'NONE', 'PRIVACY', 'CONFIDENTIAL', 'LOCKED'])->string('restriction'); 51 52 // Fix non-printing characters 53 $name = trim(preg_replace('/\s+/', ' ', $name)); 54 55 $gedcom = "0 @@ REPO\n1 NAME " . $name; 56 57 if ($address !== '') { 58 $gedcom .= "\n1 ADDR " . strtr($address, ["\r\n" => "\n2 CONT "]); 59 } 60 61 if ($url !== '') { 62 $gedcom .= "\n1 WWW " . $url; 63 } 64 65 if ($restriction !== '') { 66 $gedcom .= "\n1 RESN " . $restriction; 67 } 68 69 $record = $tree->createRecord($gedcom); 70 $record = Registry::repositoryFactory()->new($record->xref(), $record->gedcom(), null, $tree); 71 72 // value and text are for autocomplete 73 // html is for interactive modals 74 return response([ 75 'value' => '@' . $record->xref() . '@', 76 'text' => view('selects/repository', ['repository' => $record]), 77 'html' => view('modals/record-created', [ 78 'title' => I18N::translate('The repository has been created'), 79 'name' => $record->fullName(), 80 'url' => $record->url(), 81 ]), 82 ]); 83 } 84} 85