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 in_array; 30 31/** 32 * Process a form to create a new source. 33 */ 34class CreateSourceAction implements RequestHandlerInterface 35{ 36 /** 37 * @param ServerRequestInterface $request 38 * 39 * @return ResponseInterface 40 */ 41 public function handle(ServerRequestInterface $request): ResponseInterface 42 { 43 $tree = Validator::attributes($request)->tree(); 44 45 $params = (array) $request->getParsedBody(); 46 $title = $params['source-title']; 47 $abbreviation = $params['source-abbreviation']; 48 $author = $params['source-author']; 49 $publication = $params['source-publication']; 50 $repository = $params['source-repository']; 51 $call_number = $params['source-call-number']; 52 $text = $params['source-text']; 53 $restriction = $params['restriction']; 54 55 // Fix non-printing characters 56 $title = trim(preg_replace('/\s+/', ' ', $title)); 57 $abbreviation = trim(preg_replace('/\s+/', ' ', $abbreviation)); 58 $author = trim(preg_replace('/\s+/', ' ', $author)); 59 $publication = trim(preg_replace('/\s+/', ' ', $publication)); 60 $repository = trim(preg_replace('/\s+/', ' ', $repository)); 61 $call_number = trim(preg_replace('/\s+/', ' ', $call_number)); 62 63 // Convert HTML line endings to GEDCOM continuations 64 $text = strtr($text, ["\r\n" => "\n2 CONT "]); 65 66 $gedcom = "0 @@ SOUR\n\n1 TITL " . $title; 67 68 if ($abbreviation !== '') { 69 $gedcom .= "\n1 ABBR " . $abbreviation; 70 } 71 72 if ($author !== '') { 73 $gedcom .= "\n1 AUTH " . $author; 74 } 75 76 if ($publication !== '') { 77 $gedcom .= "\n1 PUBL " . $publication; 78 } 79 80 if ($text !== '') { 81 $gedcom .= "\n1 TEXT " . $text; 82 } 83 84 if ($repository !== '') { 85 $gedcom .= "\n1 REPO @" . $repository . '@'; 86 87 if ($call_number !== '') { 88 $gedcom .= "\n2 CALN " . $call_number; 89 } 90 } 91 92 if (in_array($restriction, ['none', 'privacy', 'confidential', 'locked'], true)) { 93 $gedcom .= "\n1 RESN " . $restriction; 94 } 95 96 $record = $tree->createRecord($gedcom); 97 $record = Registry::sourceFactory()->new($record->xref(), $record->gedcom(), null, $tree); 98 99 // value and text are for autocomplete 100 // html is for interactive modals 101 return response([ 102 'value' => '@' . $record->xref() . '@', 103 'text' => view('selects/source', ['source' => $record]), 104 'html' => view('modals/record-created', [ 105 'title' => I18N::translate('The source has been created'), 106 'name' => $record->fullName(), 107 'url' => $record->url(), 108 ]), 109 ]); 110 } 111} 112