1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2019 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 <http://www.gnu.org/licenses/>. 16 */ 17 18declare(strict_types=1); 19 20namespace Fisharebest\Webtrees\Http\RequestHandlers; 21 22use Fisharebest\Webtrees\I18N; 23use Fisharebest\Webtrees\Tree; 24use Psr\Http\Message\ResponseInterface; 25use Psr\Http\Message\ServerRequestInterface; 26use Psr\Http\Server\RequestHandlerInterface; 27 28use function assert; 29 30/** 31 * Process a form to create a new source. 32 */ 33class CreateSourceAction implements RequestHandlerInterface 34{ 35 /** 36 * @param ServerRequestInterface $request 37 * 38 * @return ResponseInterface 39 */ 40 public function handle(ServerRequestInterface $request): ResponseInterface 41 { 42 $tree = $request->getAttribute('tree'); 43 assert($tree instanceof Tree); 44 45 $params = $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 $privacy_restriction = $params['privacy-restriction']; 54 $edit_restriction = $params['edit-restriction']; 55 56 // Fix whitespace 57 $title = trim(preg_replace('/\s+/', ' ', $title)); 58 $abbreviation = trim(preg_replace('/\s+/', ' ', $abbreviation)); 59 $author = trim(preg_replace('/\s+/', ' ', $author)); 60 $publication = trim(preg_replace('/\s+/', ' ', $publication)); 61 $repository = trim(preg_replace('/\s+/', ' ', $repository)); 62 $call_number = trim(preg_replace('/\s+/', ' ', $call_number)); 63 64 // Convert line endings to GEDDCOM continuations 65 $text = str_replace([ 66 "\r\n", 67 "\r", 68 "\n", 69 ], "\n1 CONT ", $text); 70 71 $gedcom = "0 @@ SOUR\n\n1 TITL " . $title; 72 73 if ($abbreviation !== '') { 74 $gedcom .= "\n1 ABBR " . $abbreviation; 75 } 76 77 if ($author !== '') { 78 $gedcom .= "\n1 AUTH " . $author; 79 } 80 81 if ($publication !== '') { 82 $gedcom .= "\n1 PUBL " . $publication; 83 } 84 85 if ($text !== '') { 86 $gedcom .= "\n1 TEXT " . $text; 87 } 88 89 if ($repository !== '') { 90 $gedcom .= "\n1 REPO @" . $repository . '@'; 91 92 if ($call_number !== '') { 93 $gedcom .= "\n2 CALN " . $call_number; 94 } 95 } 96 97 if (in_array($privacy_restriction, ['none', 'privacy', 'confidential'], true)) { 98 $gedcom .= "\n1 RESN " . $privacy_restriction; 99 } 100 101 if ($edit_restriction === 'locked') { 102 $gedcom .= "\n1 RESN " . $edit_restriction; 103 } 104 105 $record = $tree->createRecord($gedcom); 106 107 // id and text are for select2 / autocomplete 108 // html is for interactive modals 109 return response([ 110 'id' => $record->xref(), 111 'text' => view('selects/source', [ 112 'source' => $record, 113 ]), 114 'html' => view('modals/record-created', [ 115 'title' => I18N::translate('The source has been created'), 116 'name' => $record->fullName(), 117 'url' => $record->url(), 118 ]), 119 ]); 120 } 121} 122