17c7d1e03SGreg Roach<?php 27c7d1e03SGreg Roach 37c7d1e03SGreg Roach/** 47c7d1e03SGreg Roach * webtrees: online genealogy 589f7189bSGreg Roach * Copyright (C) 2021 webtrees development team 67c7d1e03SGreg Roach * This program is free software: you can redistribute it and/or modify 77c7d1e03SGreg Roach * it under the terms of the GNU General Public License as published by 87c7d1e03SGreg Roach * the Free Software Foundation, either version 3 of the License, or 97c7d1e03SGreg Roach * (at your option) any later version. 107c7d1e03SGreg Roach * This program is distributed in the hope that it will be useful, 117c7d1e03SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 127c7d1e03SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 137c7d1e03SGreg Roach * GNU General Public License for more details. 147c7d1e03SGreg Roach * You should have received a copy of the GNU General Public License 1589f7189bSGreg Roach * along with this program. If not, see <https://www.gnu.org/licenses/>. 167c7d1e03SGreg Roach */ 177c7d1e03SGreg Roach 187c7d1e03SGreg Roachdeclare(strict_types=1); 197c7d1e03SGreg Roach 207c7d1e03SGreg Roachnamespace Fisharebest\Webtrees\Http\RequestHandlers; 217c7d1e03SGreg Roach 227c7d1e03SGreg Roachuse Fisharebest\Webtrees\Auth; 23efd4768bSGreg Roachuse Fisharebest\Webtrees\Fact; 247c7d1e03SGreg Roachuse Fisharebest\Webtrees\Http\ViewResponseTrait; 257c7d1e03SGreg Roachuse Fisharebest\Webtrees\I18N; 266b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry; 279ba2a180SGreg Roachuse Fisharebest\Webtrees\Services\GedcomEditService; 28cb7a42eaSGreg Roachuse Fisharebest\Webtrees\SurnameTradition; 297c7d1e03SGreg Roachuse Fisharebest\Webtrees\Tree; 307c7d1e03SGreg Roachuse Psr\Http\Message\ResponseInterface; 317c7d1e03SGreg Roachuse Psr\Http\Message\ServerRequestInterface; 327c7d1e03SGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 337c7d1e03SGreg Roach 34cb7a42eaSGreg Roachuse function array_map; 357c7d1e03SGreg Roachuse function assert; 36efd4768bSGreg Roachuse function is_string; 37efd4768bSGreg Roachuse function route; 387c7d1e03SGreg Roach 397c7d1e03SGreg Roach/** 407c7d1e03SGreg Roach * Add a new spouse to an individual, creating a new family. 417c7d1e03SGreg Roach */ 427c7d1e03SGreg Roachclass AddSpouseToIndividualPage implements RequestHandlerInterface 437c7d1e03SGreg Roach{ 447c7d1e03SGreg Roach use ViewResponseTrait; 457c7d1e03SGreg Roach 46efd4768bSGreg Roach // Create mixed-sex couples by default 47efd4768bSGreg Roach private const OPPOSITE_SEX = [ 48efd4768bSGreg Roach 'F' => 'M', 49efd4768bSGreg Roach 'M' => 'F', 5080b86810SGreg Roach 'U' => 'U', 51*e73150afSGreg Roach 'X' => 'U', 52efd4768bSGreg Roach ]; 53efd4768bSGreg Roach 549ba2a180SGreg Roach private GedcomEditService $gedcom_edit_service; 559ba2a180SGreg Roach 569ba2a180SGreg Roach /** 579ba2a180SGreg Roach * LinkSpouseToIndividualPage constructor. 589ba2a180SGreg Roach * 599ba2a180SGreg Roach * @param GedcomEditService $gedcom_edit_service 609ba2a180SGreg Roach */ 619ba2a180SGreg Roach public function __construct(GedcomEditService $gedcom_edit_service) 629ba2a180SGreg Roach { 639ba2a180SGreg Roach $this->gedcom_edit_service = $gedcom_edit_service; 649ba2a180SGreg Roach } 659ba2a180SGreg Roach 667c7d1e03SGreg Roach /** 677c7d1e03SGreg Roach * @param ServerRequestInterface $request 687c7d1e03SGreg Roach * 697c7d1e03SGreg Roach * @return ResponseInterface 707c7d1e03SGreg Roach */ 717c7d1e03SGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 727c7d1e03SGreg Roach { 737c7d1e03SGreg Roach $tree = $request->getAttribute('tree'); 747c7d1e03SGreg Roach assert($tree instanceof Tree); 757c7d1e03SGreg Roach 76efd4768bSGreg Roach $xref = $request->getAttribute('xref'); 77efd4768bSGreg Roach assert(is_string($xref)); 787c7d1e03SGreg Roach 796b9cb339SGreg Roach $individual = Registry::individualFactory()->make($xref, $tree); 807c7d1e03SGreg Roach $individual = Auth::checkIndividualAccess($individual, true); 817c7d1e03SGreg Roach 8280b86810SGreg Roach $sex = self::OPPOSITE_SEX[$individual->sex()]; 83cb7a42eaSGreg Roach 843a1e3ba4SGreg Roach // Name facts. 85cb7a42eaSGreg Roach $surname_tradition = SurnameTradition::create($tree->getPreference('SURNAME_TRADITION')); 86cb7a42eaSGreg Roach $names = $surname_tradition->newSpouseNames($individual, $sex); 87cb7a42eaSGreg Roach 88efd4768bSGreg Roach $facts = [ 89*e73150afSGreg Roach 'i' => $this->gedcom_edit_service->newIndividualFacts($tree, $sex, $names), 906102047cSGreg Roach 'f' => $this->gedcom_edit_service->newFamilyFacts($tree), 91efd4768bSGreg Roach ]; 92efd4768bSGreg Roach 93efd4768bSGreg Roach $titles = [ 94efd4768bSGreg Roach 'F' => I18N::translate('Add a wife'), 9580b86810SGreg Roach 'M' => I18N::translate('Add a husband'), 96efd4768bSGreg Roach 'U' => I18N::translate('Add a spouse'), 97efd4768bSGreg Roach ]; 98efd4768bSGreg Roach 99d8809d62SGreg Roach $title = $titles[$sex]; 1007c7d1e03SGreg Roach 1017c7d1e03SGreg Roach return $this->viewResponse('edit/new-individual', [ 102efd4768bSGreg Roach 'cancel_url' => $individual->url(), 103efd4768bSGreg Roach 'facts' => $facts, 1049ba2a180SGreg Roach 'gedcom_edit_service' => $this->gedcom_edit_service, 105efd4768bSGreg Roach 'post_url' => route(AddSpouseToIndividualAction::class, ['tree' => $tree->name(), 'xref' => $xref]), 106efd4768bSGreg Roach 'title' => $individual->fullName() . ' - ' . $title, 1077c7d1e03SGreg Roach 'tree' => $tree, 108efd4768bSGreg Roach 'url' => $request->getQueryParams()['url'] ?? $individual->url(), 1097c7d1e03SGreg Roach ]); 1107c7d1e03SGreg Roach } 1117c7d1e03SGreg Roach} 112