1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2022 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\Validator; 26use Psr\Http\Message\ResponseInterface; 27use Psr\Http\Message\ServerRequestInterface; 28use Psr\Http\Server\RequestHandlerInterface; 29 30use function redirect; 31 32/** 33 * Add a new parent to an individual, creating a one-parent family. 34 */ 35class AddParentToIndividualAction implements RequestHandlerInterface 36{ 37 private GedcomEditService $gedcom_edit_service; 38 39 /** 40 * AddChildToFamilyAction constructor. 41 * 42 * @param GedcomEditService $gedcom_edit_service 43 */ 44 public function __construct(GedcomEditService $gedcom_edit_service) 45 { 46 $this->gedcom_edit_service = $gedcom_edit_service; 47 } 48 49 /** 50 * @param ServerRequestInterface $request 51 * 52 * @return ResponseInterface 53 */ 54 public function handle(ServerRequestInterface $request): ResponseInterface 55 { 56 $tree = Validator::attributes($request)->tree(); 57 $xref = Validator::attributes($request)->isXref()->string('xref'); 58 $params = (array) $request->getParsedBody(); 59 $individual = Registry::individualFactory()->make($xref, $tree); 60 $individual = Auth::checkIndividualAccess($individual, true); 61 62 $levels = $params['ilevels'] ?? []; 63 $tags = $params['itags'] ?? []; 64 $values = $params['ivalues'] ?? []; 65 66 // Create the new parent 67 $gedcom = "0 @@ INDI\n" . $this->gedcom_edit_service->editLinesToGedcom('INDI', $levels, $tags, $values); 68 $parent = $tree->createIndividual($gedcom); 69 70 // Create a new family 71 $link = $parent->sex() === 'F' ? 'WIFE' : 'HUSB'; 72 $gedcom = "0 @@ FAM\n1 CHIL @" . $individual->xref() . "@\n1 " . $link . ' @' . $parent->xref() . '@'; 73 $family = $tree->createFamily($gedcom); 74 75 // Link the individual to the family 76 $individual->createFact('1 FAMC @' . $family->xref() . '@', false); 77 78 // Link the parent to the family 79 $parent->createFact('1 FAMS @' . $family->xref() . '@', false); 80 81 $url = Validator::parsedBody($request)->isLocalUrl()->string('url', $parent->url()); 82 83 return redirect($url); 84 } 85} 86