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