xref: /webtrees/app/Http/RequestHandlers/AddChildToIndividualAction.php (revision d11be7027e34e3121be11cc025421873364403f9)
17c7d1e03SGreg Roach<?php
27c7d1e03SGreg Roach
37c7d1e03SGreg Roach/**
47c7d1e03SGreg Roach * webtrees: online genealogy
5*d11be702SGreg Roach * Copyright (C) 2023 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;
2316904038SGreg Roachuse Fisharebest\Webtrees\Individual;
246b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry;
257c7d1e03SGreg Roachuse Fisharebest\Webtrees\Services\GedcomEditService;
268d9c2b68SGreg Roachuse Fisharebest\Webtrees\Validator;
277c7d1e03SGreg Roachuse Psr\Http\Message\ResponseInterface;
287c7d1e03SGreg Roachuse Psr\Http\Message\ServerRequestInterface;
297c7d1e03SGreg Roachuse Psr\Http\Server\RequestHandlerInterface;
307c7d1e03SGreg Roach
317c7d1e03SGreg Roachuse function redirect;
327c7d1e03SGreg Roach
337c7d1e03SGreg Roach/**
347c7d1e03SGreg Roach * Add a new child to an individual, creating a one-parent family.
357c7d1e03SGreg Roach */
367c7d1e03SGreg Roachclass AddChildToIndividualAction implements RequestHandlerInterface
377c7d1e03SGreg Roach{
38c4943cffSGreg Roach    private GedcomEditService $gedcom_edit_service;
397c7d1e03SGreg Roach
407c7d1e03SGreg Roach    /**
417c7d1e03SGreg Roach     * AddChildToFamilyAction constructor.
427c7d1e03SGreg Roach     *
437c7d1e03SGreg Roach     * @param GedcomEditService $gedcom_edit_service
447c7d1e03SGreg Roach     */
457c7d1e03SGreg Roach    public function __construct(GedcomEditService $gedcom_edit_service)
467c7d1e03SGreg Roach    {
477c7d1e03SGreg Roach        $this->gedcom_edit_service = $gedcom_edit_service;
487c7d1e03SGreg Roach    }
497c7d1e03SGreg Roach
507c7d1e03SGreg Roach    /**
517c7d1e03SGreg Roach     * @param ServerRequestInterface $request
527c7d1e03SGreg Roach     *
537c7d1e03SGreg Roach     * @return ResponseInterface
547c7d1e03SGreg Roach     */
557c7d1e03SGreg Roach    public function handle(ServerRequestInterface $request): ResponseInterface
567c7d1e03SGreg Roach    {
57b55cbc6bSGreg Roach        $tree       = Validator::attributes($request)->tree();
58b55cbc6bSGreg Roach        $xref       = Validator::attributes($request)->isXref()->string('xref');
596b9cb339SGreg Roach        $individual = Registry::individualFactory()->make($xref, $tree);
607c7d1e03SGreg Roach        $individual = Auth::checkIndividualAccess($individual, true);
617c7d1e03SGreg Roach
62a92a07c7SGreg Roach        $levels = Validator::parsedBody($request)->array('ilevels');
63a92a07c7SGreg Roach        $tags   = Validator::parsedBody($request)->array('itags');
64a92a07c7SGreg Roach        $values = Validator::parsedBody($request)->array('ivalues');
65a92a07c7SGreg Roach        $gedcom = $this->gedcom_edit_service->editLinesToGedcom(Individual::RECORD_TYPE, $levels, $tags, $values);
667c7d1e03SGreg Roach
67efd4768bSGreg Roach        // Create the new child
68a92a07c7SGreg Roach        $child  = $tree->createIndividual('0 @@ INDI' . $gedcom);
697c7d1e03SGreg Roach
70efd4768bSGreg Roach        // Create a new family
71ebe863bbSGreg Roach        $link   = $individual->sex() === 'F' ? 'WIFE' : 'HUSB';
726e60786aSGreg Roach        $gedcom = "0 @@ FAM\n1 " . $link . ' @' . $individual->xref() . "@\n1 CHIL @" . $child->xref() . '@';
73efd4768bSGreg Roach        $family = $tree->createFamily($gedcom);
747c7d1e03SGreg Roach
75efd4768bSGreg Roach        // Link the individual to the family
76efd4768bSGreg Roach        $individual->createFact('1 FAMS @' . $family->xref() . '@', false);
777c7d1e03SGreg Roach
78efd4768bSGreg Roach        // Link the child to the family
79efd4768bSGreg Roach        $child->createFact('1 FAMC @' . $family->xref() . '@', false);
80efd4768bSGreg Roach
81f507cef9SGreg Roach        $url = Validator::parsedBody($request)->isLocalUrl()->string('url', $child->url());
82551ad4afSGreg Roach
83551ad4afSGreg Roach        return redirect($url);
847c7d1e03SGreg Roach    }
857c7d1e03SGreg Roach}
86