![]() System : Linux absol.cf 5.4.0-198-generic #218-Ubuntu SMP Fri Sep 27 20:18:53 UTC 2024 x86_64 User : www-data ( 33) PHP Version : 7.4.33 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare, Directory : /var/www/html/webtrees/app/Http/RequestHandlers/ |
Upload File : |
<?php /** * webtrees: online genealogy * Copyright (C) 2023 webtrees development team * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * You should have received a copy of the GNU General Public License * along with this program. If not, see <https://www.gnu.org/licenses/>. */ declare(strict_types=1); namespace Fisharebest\Webtrees\Http\RequestHandlers; use Fisharebest\Webtrees\Auth; use Fisharebest\Webtrees\Elements\PedigreeLinkageType; use Fisharebest\Webtrees\Registry; use Fisharebest\Webtrees\Validator; use Psr\Http\Message\ResponseInterface; use Psr\Http\Message\ServerRequestInterface; use Psr\Http\Server\RequestHandlerInterface; use function redirect; /** * Link an existing individual as child in an existing family. */ class LinkChildToFamilyAction implements RequestHandlerInterface { /** * @param ServerRequestInterface $request * * @return ResponseInterface */ public function handle(ServerRequestInterface $request): ResponseInterface { $tree = Validator::attributes($request)->tree(); $xref = Validator::attributes($request)->isXref()->string('xref'); $individual = Registry::individualFactory()->make($xref, $tree); $individual = Auth::checkIndividualAccess($individual, true); $famid = Validator::parsedBody($request)->isXref()->string('famid'); $PEDI = Validator::parsedBody($request)->string('PEDI'); $family = Registry::familyFactory()->make($famid, $tree); $family = Auth::checkFamilyAccess($family, true); // Replace any existing child->family link (we may be changing the PEDI); $fact_id = ''; foreach ($individual->facts(['FAMC']) as $fact) { if ($family === $fact->target()) { $fact_id = $fact->id(); break; } } switch ($PEDI) { case '': $gedcom = "1 FAMC @$famid@"; break; case PedigreeLinkageType::VALUE_ADOPTED: $gedcom = "1 FAMC @$famid@\n2 PEDI $PEDI\n1 ADOP\n2 FAMC @$famid@\n3 ADOP BOTH"; break; case PedigreeLinkageType::VALUE_SEALING: $gedcom = "1 FAMC @$famid@\n2 PEDI $PEDI\n1 SLGC\n2 FAMC @$famid@"; break; case PedigreeLinkageType::VALUE_FOSTER: $gedcom = "1 FAMC @$famid@\n2 PEDI $PEDI\n1 EVEN\n2 TYPE $PEDI"; break; default: $gedcom = "1 FAMC @$famid@\n2 PEDI $PEDI"; break; } $individual->updateFact($fact_id, $gedcom, true); // Only set the family->child link if it does not already exist $chil_link_exists = false; foreach ($family->facts(['CHIL']) as $fact) { if ($individual === $fact->target()) { $chil_link_exists = true; break; } } if (!$chil_link_exists) { $family->createFact('1 CHIL @' . $individual->xref() . '@', true); } return redirect($individual->url()); } }