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