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\Individual; 27use Fisharebest\Webtrees\Registry; 28use Fisharebest\Webtrees\Services\GedcomEditService; 29use Fisharebest\Webtrees\SurnameTradition; 30use Fisharebest\Webtrees\Tree; 31use Psr\Http\Message\ResponseInterface; 32use Psr\Http\Message\ServerRequestInterface; 33use Psr\Http\Server\RequestHandlerInterface; 34 35use function array_map; 36use function assert; 37use function is_string; 38use function route; 39 40/** 41 * Add a new spouse to a family. 42 */ 43class AddSpouseToFamilyPage implements RequestHandlerInterface 44{ 45 use ViewResponseTrait; 46 47 private GedcomEditService $gedcom_edit_service; 48 49 /** 50 * LinkSpouseToIndividualPage constructor. 51 * 52 * @param GedcomEditService $gedcom_edit_service 53 */ 54 public function __construct(GedcomEditService $gedcom_edit_service) 55 { 56 $this->gedcom_edit_service = $gedcom_edit_service; 57 } 58 59 /** 60 * @param ServerRequestInterface $request 61 * 62 * @return ResponseInterface 63 */ 64 public function handle(ServerRequestInterface $request): ResponseInterface 65 { 66 $tree = $request->getAttribute('tree'); 67 assert($tree instanceof Tree); 68 69 $xref = $request->getAttribute('xref'); 70 assert(is_string($xref)); 71 72 $sex = $request->getAttribute('sex'); 73 assert(is_string($sex)); 74 75 $family = Registry::familyFactory()->make($xref, $tree); 76 $family = Auth::checkFamilyAccess($family, true); 77 78 // Create a dummy individual, so that we can create new/empty facts. 79 $dummyi = Registry::individualFactory()->new('', '0 @@ INDI', null, $tree); 80 $dummyf = Registry::familyFactory()->new('', '0 @@ FAM', null, $tree); 81 82 // Default names facts. 83 $surname_tradition = SurnameTradition::create($tree->getPreference('SURNAME_TRADITION')); 84 $spouse = $family->spouses()->first(); 85 assert($spouse instanceof Individual); 86 $names = $surname_tradition->newSpouseNames($spouse, $sex); 87 $name_facts = array_map(static fn (string $gedcom): Fact => new Fact($gedcom, $dummyi, ''), $names); 88 89 $facts = [ 90 'i' => [ 91 new Fact('1 SEX ' . $sex, $dummyi, ''), 92 ...$name_facts, 93 new Fact('1 BIRT', $dummyi, ''), 94 new Fact('1 DEAT', $dummyi, ''), 95 ], 96 'f' => [ 97 new Fact('1 MARR', $dummyf, ''), 98 ], 99 ]; 100 101 if ($sex === 'F') { 102 $title = I18N::translate('Add a wife'); 103 } else { 104 $title = I18N::translate('Add a husband'); 105 } 106 107 return $this->viewResponse('edit/new-individual', [ 108 'cancel_url' => $family->url(), 109 'facts' => $facts, 110 'gedcom_edit_service' => $this->gedcom_edit_service, 111 'post_url' => route(AddSpouseToFamilyAction::class, ['tree' => $tree->name(), 'xref' => $xref]), 112 'title' => $title, 113 'tree' => $tree, 114 'url' => $request->getQueryParams()['url'] ?? $family->url(), 115 ]); 116 } 117} 118