155134edcSGreg Roach<?php 255134edcSGreg Roach 355134edcSGreg Roach/** 455134edcSGreg Roach * webtrees: online genealogy 5d11be702SGreg Roach * Copyright (C) 2023 webtrees development team 655134edcSGreg Roach * This program is free software: you can redistribute it and/or modify 755134edcSGreg Roach * it under the terms of the GNU General Public License as published by 855134edcSGreg Roach * the Free Software Foundation, either version 3 of the License, or 955134edcSGreg Roach * (at your option) any later version. 1055134edcSGreg Roach * This program is distributed in the hope that it will be useful, 1155134edcSGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 1255134edcSGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 1355134edcSGreg Roach * GNU General Public License for more details. 1455134edcSGreg 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/>. 1655134edcSGreg Roach */ 1755134edcSGreg Roach 1855134edcSGreg Roachdeclare(strict_types=1); 1955134edcSGreg Roach 2055134edcSGreg Roachnamespace Fisharebest\Webtrees\Http\RequestHandlers; 2155134edcSGreg Roach 2255134edcSGreg Roachuse Fig\Http\Message\StatusCodeInterface; 2355134edcSGreg Roachuse Fisharebest\Webtrees\Auth; 2415c4f62cSGreg Roachuse Fisharebest\Webtrees\Http\Exceptions\HttpGoneException; 2555134edcSGreg Roachuse Fisharebest\Webtrees\Module\CompactTreeChartModule; 26*00ef1d3aSGreg Roachuse Fisharebest\Webtrees\Module\ModuleChartInterface; 276b9cb339SGreg Roachuse Fisharebest\Webtrees\Registry; 283340ecd2SGreg Roachuse Fisharebest\Webtrees\Services\ModuleService; 2955134edcSGreg Roachuse Fisharebest\Webtrees\Services\TreeService; 3055134edcSGreg Roachuse Fisharebest\Webtrees\Site; 3155134edcSGreg Roachuse Fisharebest\Webtrees\Tree; 32266e9c61SGreg Roachuse Fisharebest\Webtrees\Validator; 3355134edcSGreg Roachuse Psr\Http\Message\ResponseInterface; 3455134edcSGreg Roachuse Psr\Http\Message\ServerRequestInterface; 3555134edcSGreg Roachuse Psr\Http\Server\RequestHandlerInterface; 3655134edcSGreg Roach 3755134edcSGreg Roach/** 3855134edcSGreg Roach * Redirect URLs created by webtrees 1.x (and PhpGedView). 3955134edcSGreg Roach */ 4055134edcSGreg Roachclass RedirectCompactPhp implements RequestHandlerInterface 4155134edcSGreg Roach{ 4215c4f62cSGreg Roach public function __construct( 4315c4f62cSGreg Roach private readonly ModuleService $module_service, 4415c4f62cSGreg Roach private readonly TreeService $tree_service, 4515c4f62cSGreg Roach ) { 4655134edcSGreg Roach } 4755134edcSGreg Roach 4855134edcSGreg Roach /** 4955134edcSGreg Roach * @param ServerRequestInterface $request 5055134edcSGreg Roach * 5155134edcSGreg Roach * @return ResponseInterface 5255134edcSGreg Roach */ 5355134edcSGreg Roach public function handle(ServerRequestInterface $request): ResponseInterface 5455134edcSGreg Roach { 55266e9c61SGreg Roach $ged = Validator::queryParams($request)->string('ged', Site::getPreference('DEFAULT_GEDCOM')); 5655134edcSGreg Roach $tree = $this->tree_service->all()->get($ged); 5755134edcSGreg Roach 58*00ef1d3aSGreg Roach if ($tree instanceof Tree) { 59*00ef1d3aSGreg Roach $module = $this->module_service 60*00ef1d3aSGreg Roach ->findByComponent(ModuleChartInterface::class, $tree, Auth::user()) 61*00ef1d3aSGreg Roach ->first(static fn (ModuleChartInterface $module): bool => $module instanceof CompactTreeChartModule); 62*00ef1d3aSGreg Roach 63*00ef1d3aSGreg Roach if ($module instanceof CompactTreeChartModule) { 64*00ef1d3aSGreg Roach $root_id = Validator::queryParams($request)->string('rootid', ''); 656b9cb339SGreg Roach $individual = Registry::individualFactory()->make($root_id, $tree) ?? $tree->significantIndividual(Auth::user()); 6655134edcSGreg Roach 673340ecd2SGreg Roach $url = $module->chartUrl($individual, []); 6855134edcSGreg Roach 6915c4f62cSGreg Roach return Registry::responseFactory() 7015c4f62cSGreg Roach ->redirectUrl($url, StatusCodeInterface::STATUS_MOVED_PERMANENTLY) 7115c4f62cSGreg Roach ->withHeader('Link', '<' . $url . '>; rel="canonical"'); 7255134edcSGreg Roach } 73*00ef1d3aSGreg Roach } 7455134edcSGreg Roach 7515c4f62cSGreg Roach throw new HttpGoneException(); 7655134edcSGreg Roach } 7755134edcSGreg Roach} 78