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\Registry; 24use Fisharebest\Webtrees\Services\GedcomEditService; 25use Fisharebest\Webtrees\Tree; 26use Psr\Http\Message\ResponseInterface; 27use Psr\Http\Message\ServerRequestInterface; 28use Psr\Http\Server\RequestHandlerInterface; 29 30use function assert; 31use function is_string; 32use function redirect; 33 34/** 35 * Add a new spouse to a family. 36 */ 37class AddSpouseToFamilyAction implements RequestHandlerInterface 38{ 39 /** @var GedcomEditService */ 40 private $gedcom_edit_service; 41 42 /** 43 * AddChildToFamilyAction constructor. 44 * 45 * @param GedcomEditService $gedcom_edit_service 46 */ 47 public function __construct(GedcomEditService $gedcom_edit_service) 48 { 49 $this->gedcom_edit_service = $gedcom_edit_service; 50 } 51 52 /** 53 * @param ServerRequestInterface $request 54 * 55 * @return ResponseInterface 56 */ 57 public function handle(ServerRequestInterface $request): ResponseInterface 58 { 59 $tree = $request->getAttribute('tree'); 60 assert($tree instanceof Tree); 61 62 $xref = $request->getAttribute('xref'); 63 assert(is_string($xref)); 64 65 $params = (array) $request->getParsedBody(); 66 67 $family = Registry::familyFactory()->make($xref, $tree); 68 $family = Auth::checkFamilyAccess($family, true); 69 70 $levels = $params['ilevels'] ?? []; 71 $tags = $params['itags'] ?? []; 72 $values = $params['ivalues'] ?? []; 73 74 // Create the new spouse 75 $gedcom = "0 @@ INDI\n1 FAMS @" . $family->xref() . "@\n" . $this->gedcom_edit_service->editLinesToGedcom('INDI', $levels, $tags, $values); 76 $spouse = $tree->createIndividual($gedcom); 77 78 // Link the spouse to the family 79 $husb = $family->facts(['HUSB'], false, null, true)->first(); 80 $wife = $family->facts(['WIFE'], false, null, true)->first(); 81 82 if ($husb === null && $spouse->sex() === 'M') { 83 $link = 'HUSB'; 84 } elseif ($wife === null && $spouse->sex() === 'F') { 85 $link = 'WIFE'; 86 } elseif ($husb === null) { 87 $link = 'HUSB'; 88 } elseif ($wife === null) { 89 $link = 'WIFE'; 90 } else { 91 // Family already has husband and wife 92 return redirect($family->url()); 93 } 94 95 // Link the spouse to the family 96 $family->createFact('1 ' . $link . ' @' . $spouse->xref() . '@', false); 97 98 return redirect($params['url'] ?? $spouse->url()); 99 } 100} 101