xref: /webtrees/app/Http/RequestHandlers/AddChildToIndividualAction.php (revision 5bfc689774bb9a6401271c4ed15a6d50652c991b)
17c7d1e03SGreg Roach<?php
27c7d1e03SGreg Roach
37c7d1e03SGreg Roach/**
47c7d1e03SGreg Roach * webtrees: online genealogy
5*5bfc6897SGreg Roach * Copyright (C) 2022 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');
841e60ebf4SGreg Roach        $url      = Validator::parsedBody($request)->isLocalUrl($base_url)->string('url', $child->url());
85551ad4afSGreg Roach
86551ad4afSGreg Roach        return redirect($url);
877c7d1e03SGreg Roach    }
887c7d1e03SGreg Roach}
89