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; 236b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry; 247c7d1e03SGreg Roachuse Fisharebest\Webtrees\Services\GedcomEditService; 258d9c2b68SGreg Roachuse Fisharebest\Webtrees\Validator; 267c7d1e03SGreg Roachuse Psr\Http\Message\ResponseInterface; 277c7d1e03SGreg Roachuse Psr\Http\Message\ServerRequestInterface; 287c7d1e03SGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 297c7d1e03SGreg Roach 307c7d1e03SGreg Roachuse function assert; 31efd4768bSGreg Roachuse function is_string; 327c7d1e03SGreg Roachuse function redirect; 337c7d1e03SGreg Roach 347c7d1e03SGreg Roach/** 357c7d1e03SGreg Roach * Add a new child to an individual, creating a one-parent family. 367c7d1e03SGreg Roach */ 377c7d1e03SGreg Roachclass AddChildToIndividualAction implements RequestHandlerInterface 387c7d1e03SGreg Roach{ 39c4943cffSGreg Roach private GedcomEditService $gedcom_edit_service; 407c7d1e03SGreg Roach 417c7d1e03SGreg Roach /** 427c7d1e03SGreg Roach * AddChildToFamilyAction constructor. 437c7d1e03SGreg Roach * 447c7d1e03SGreg Roach * @param GedcomEditService $gedcom_edit_service 457c7d1e03SGreg Roach */ 467c7d1e03SGreg Roach public function __construct(GedcomEditService $gedcom_edit_service) 477c7d1e03SGreg Roach { 487c7d1e03SGreg Roach $this->gedcom_edit_service = $gedcom_edit_service; 497c7d1e03SGreg Roach } 507c7d1e03SGreg Roach 517c7d1e03SGreg Roach /** 527c7d1e03SGreg Roach * @param ServerRequestInterface $request 537c7d1e03SGreg Roach * 547c7d1e03SGreg Roach * @return ResponseInterface 557c7d1e03SGreg Roach */ 567c7d1e03SGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 577c7d1e03SGreg Roach { 58b55cbc6bSGreg Roach $tree = Validator::attributes($request)->tree(); 59b55cbc6bSGreg Roach $xref = Validator::attributes($request)->isXref()->string('xref'); 60efd4768bSGreg Roach $params = (array) $request->getParsedBody(); 616b9cb339SGreg Roach $individual = Registry::individualFactory()->make($xref, $tree); 627c7d1e03SGreg Roach $individual = Auth::checkIndividualAccess($individual, true); 637c7d1e03SGreg Roach 64efd4768bSGreg Roach $levels = $params['ilevels'] ?? []; 65efd4768bSGreg Roach $tags = $params['itags'] ?? []; 66efd4768bSGreg Roach $values = $params['ivalues'] ?? []; 677c7d1e03SGreg Roach 68efd4768bSGreg Roach // Create the new child 69efd4768bSGreg Roach $gedcom = "0 @@ INDI\n" . $this->gedcom_edit_service->editLinesToGedcom('INDI', $levels, $tags, $values); 707c7d1e03SGreg Roach $child = $tree->createIndividual($gedcom); 717c7d1e03SGreg Roach 72efd4768bSGreg Roach // Create a new family 73efd4768bSGreg Roach $link = $child->sex() === 'F' ? 'WIFE' : 'HUSB'; 74efd4768bSGreg Roach $gedcom = "0 @@ FAM\n1 " . $link . " @" . $individual->xref() . "@\n1 CHIL @" . $child->xref() . '@'; 75efd4768bSGreg Roach $family = $tree->createFamily($gedcom); 767c7d1e03SGreg Roach 77efd4768bSGreg Roach // Link the individual to the family 78efd4768bSGreg Roach $individual->createFact('1 FAMS @' . $family->xref() . '@', false); 797c7d1e03SGreg Roach 80efd4768bSGreg Roach // Link the child to the family 81efd4768bSGreg Roach $child->createFact('1 FAMC @' . $family->xref() . '@', false); 82efd4768bSGreg Roach 83b55cbc6bSGreg Roach $base_url = Validator::attributes($request)->string('base_url'); 84*1e60ebf4SGreg Roach $url = Validator::parsedBody($request)->isLocalUrl($base_url)->string('url', $child->url()); 85551ad4afSGreg Roach 86551ad4afSGreg Roach return redirect($url); 877c7d1e03SGreg Roach } 887c7d1e03SGreg Roach} 89