1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2021 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\Auth; 23use Fisharebest\Webtrees\Fact; 24use Fisharebest\Webtrees\Http\ViewResponseTrait; 25use Fisharebest\Webtrees\I18N; 26use Fisharebest\Webtrees\Registry; 27use Fisharebest\Webtrees\SurnameTradition; 28use Fisharebest\Webtrees\Tree; 29use Psr\Http\Message\ResponseInterface; 30use Psr\Http\Message\ServerRequestInterface; 31use Psr\Http\Server\RequestHandlerInterface; 32 33use function array_map; 34use function assert; 35use function is_string; 36use function route; 37 38/** 39 * Add a new child to an individual, creating a one-parent family. 40 */ 41class AddChildToIndividualPage implements RequestHandlerInterface 42{ 43 use ViewResponseTrait; 44 45 /** 46 * @param ServerRequestInterface $request 47 * 48 * @return ResponseInterface 49 */ 50 public function handle(ServerRequestInterface $request): ResponseInterface 51 { 52 $tree = $request->getAttribute('tree'); 53 assert($tree instanceof Tree); 54 55 $xref = $request->getAttribute('xref'); 56 assert(is_string($xref)); 57 58 $individual = Registry::individualFactory()->make($xref, $tree); 59 $individual = Auth::checkIndividualAccess($individual, true); 60 61 // Create a dummy individual, so that we can create new/empty facts. 62 $dummy = Registry::individualFactory()->new('', '0 @@ INDI', null, $tree); 63 64 // Default names facts. 65 $surname_tradition = SurnameTradition::create($tree->getPreference('SURNAME_TRADITION')); 66 67 switch ($individual->sex()) { 68 case 'M': 69 $names = $surname_tradition->newChildNames($individual, null, 'U'); 70 break; 71 72 case 'F': 73 $names = $surname_tradition->newChildNames(null, $individual, 'U'); 74 break; 75 76 default: 77 $names = $surname_tradition->newChildNames(null, null, 'U'); 78 break; 79 } 80 81 $name_facts = array_map(fn (string $gedcom): Fact => new Fact($gedcom, $dummy, ''), $names); 82 83 $facts = [ 84 'i' => [ 85 new Fact('1 SEX ', $dummy, ''), 86 ...$name_facts, 87 new Fact('1 BIRT', $dummy, ''), 88 new Fact('1 DEAT', $dummy, ''), 89 ], 90 ]; 91 92 $title = I18N::translate('Add a child to create a one-parent family'); 93 94 return $this->viewResponse('edit/new-individual', [ 95 'cancel_url' => $individual->url(), 96 'facts' => $facts, 97 'post_url' => route(AddChildToIndividualAction::class, ['tree' => $tree->name(), 'xref' => $xref]), 98 'title' => $individual->fullName() . ' - ' . $title, 99 'tree' => $tree, 100 'url' => $request->getQueryParams()['url'] ?? $individual->url(), 101 ]); 102 } 103} 104