xref: /webtrees/app/Http/RequestHandlers/AddParentToIndividualAction.php (revision f507cef925e69f3dc0d47102f965899785571595)
17c7d1e03SGreg Roach<?php
27c7d1e03SGreg Roach
37c7d1e03SGreg Roach/**
47c7d1e03SGreg Roach * webtrees: online genealogy
55bfc6897SGreg 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 redirect;
317c7d1e03SGreg Roach
327c7d1e03SGreg Roach/**
337c7d1e03SGreg Roach * Add a new parent to an individual, creating a one-parent family.
347c7d1e03SGreg Roach */
357c7d1e03SGreg Roachclass AddParentToIndividualAction implements RequestHandlerInterface
367c7d1e03SGreg Roach{
37c4943cffSGreg Roach    private GedcomEditService $gedcom_edit_service;
387c7d1e03SGreg Roach
397c7d1e03SGreg Roach    /**
407c7d1e03SGreg Roach     * AddChildToFamilyAction constructor.
417c7d1e03SGreg Roach     *
427c7d1e03SGreg Roach     * @param GedcomEditService $gedcom_edit_service
437c7d1e03SGreg Roach     */
447c7d1e03SGreg Roach    public function __construct(GedcomEditService $gedcom_edit_service)
457c7d1e03SGreg Roach    {
467c7d1e03SGreg Roach        $this->gedcom_edit_service = $gedcom_edit_service;
477c7d1e03SGreg Roach    }
487c7d1e03SGreg Roach
497c7d1e03SGreg Roach    /**
507c7d1e03SGreg Roach     * @param ServerRequestInterface $request
517c7d1e03SGreg Roach     *
527c7d1e03SGreg Roach     * @return ResponseInterface
537c7d1e03SGreg Roach     */
547c7d1e03SGreg Roach    public function handle(ServerRequestInterface $request): ResponseInterface
557c7d1e03SGreg Roach    {
56b55cbc6bSGreg Roach        $tree       = Validator::attributes($request)->tree();
57b55cbc6bSGreg Roach        $xref       = Validator::attributes($request)->isXref()->string('xref');
58efd4768bSGreg Roach        $params     = (array) $request->getParsedBody();
596b9cb339SGreg Roach        $individual = Registry::individualFactory()->make($xref, $tree);
607c7d1e03SGreg Roach        $individual = Auth::checkIndividualAccess($individual, true);
617c7d1e03SGreg Roach
62efd4768bSGreg Roach        $levels = $params['ilevels'] ?? [];
63efd4768bSGreg Roach        $tags   = $params['itags'] ?? [];
64efd4768bSGreg Roach        $values = $params['ivalues'] ?? [];
657c7d1e03SGreg Roach
66efd4768bSGreg Roach        // Create the new parent
67efd4768bSGreg Roach        $gedcom = "0 @@ INDI\n" . $this->gedcom_edit_service->editLinesToGedcom('INDI', $levels, $tags, $values);
687c7d1e03SGreg Roach        $parent = $tree->createIndividual($gedcom);
697c7d1e03SGreg Roach
70efd4768bSGreg Roach        // Create a new family
71efd4768bSGreg Roach        $link   = $parent->sex() === 'F' ? 'WIFE' : 'HUSB';
72efd4768bSGreg Roach        $gedcom = "0 @@ FAM\n1 CHIL @" . $individual->xref() . "@\n1 " . $link . ' @' . $parent->xref() . '@';
73efd4768bSGreg Roach        $family = $tree->createFamily($gedcom);
747c7d1e03SGreg Roach
75efd4768bSGreg Roach        // Link the individual to the family
76efd4768bSGreg Roach        $individual->createFact('1 FAMC @' . $family->xref() . '@', false);
777c7d1e03SGreg Roach
78efd4768bSGreg Roach        // Link the parent to the family
79efd4768bSGreg Roach        $parent->createFact('1 FAMS @' . $family->xref() . '@', false);
80efd4768bSGreg Roach
81*f507cef9SGreg Roach        $url = Validator::parsedBody($request)->isLocalUrl()->string('url', $parent->url());
82551ad4afSGreg Roach
83551ad4afSGreg Roach        return redirect($url);
847c7d1e03SGreg Roach    }
857c7d1e03SGreg Roach}
86