1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2021 webtrees development team 6 * This program is free software: you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation, either version 3 of the License, or 9 * (at your option) any later version. 10 * This program is distributed in the hope that it will be useful, 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * GNU General Public License for more details. 14 * You should have received a copy of the GNU General Public License 15 * along with this program. If not, see <https://www.gnu.org/licenses/>. 16 */ 17 18declare(strict_types=1); 19 20namespace Fisharebest\Webtrees\Http\RequestHandlers; 21 22use Fig\Http\Message\StatusCodeInterface; 23use Fisharebest\Webtrees\FlashMessages; 24use Fisharebest\Webtrees\I18N; 25use Fisharebest\Webtrees\Registry; 26use Fisharebest\Webtrees\Services\AdminService; 27use Fisharebest\Webtrees\Services\TimeoutService; 28use Fisharebest\Webtrees\Services\TreeService; 29use Psr\Http\Message\ResponseInterface; 30use Psr\Http\Message\ServerRequestInterface; 31use Psr\Http\Message\StreamFactoryInterface; 32use Psr\Http\Server\RequestHandlerInterface; 33 34use function app; 35use function redirect; 36use function route; 37 38/** 39 * Synchronize GEDCOM files with trees. 40 */ 41class SynchronizeTrees implements RequestHandlerInterface 42{ 43 /** @var AdminService */ 44 private $admin_service; 45 46 /** @var TimeoutService */ 47 private $timeout_service; 48 49 /** @var TreeService */ 50 private $tree_service; 51 52 /** 53 * AdminTreesController constructor. 54 * 55 * @param AdminService $admin_service 56 * @param TimeoutService $timeout_service 57 * @param TreeService $tree_service 58 */ 59 public function __construct( 60 AdminService $admin_service, 61 TimeoutService $timeout_service, 62 TreeService $tree_service 63 ) { 64 $this->admin_service = $admin_service; 65 $this->timeout_service = $timeout_service; 66 $this->tree_service = $tree_service; 67 } 68 69 /** 70 * @param ServerRequestInterface $request 71 * 72 * @return ResponseInterface 73 */ 74 public function handle(ServerRequestInterface $request): ResponseInterface 75 { 76 $data_filesystem = Registry::filesystem()->data(); 77 78 $gedcom_files = $this->admin_service->gedcomFiles($data_filesystem); 79 80 foreach ($gedcom_files as $gedcom_file) { 81 // Only import files that have changed 82 try { 83 $filemtime = (string) $data_filesystem->lastModified($gedcom_file); 84 85 $tree = $this->tree_service->all()->get($gedcom_file) ?? $this->tree_service->create($gedcom_file, $gedcom_file); 86 87 if ($tree->getPreference('filemtime') !== $filemtime) { 88 $resource = $data_filesystem->readStream($gedcom_file); 89 $stream = Registry::streamFactory()->createStreamFromResource($resource); 90 $this->tree_service->importGedcomFile($tree, $stream, $gedcom_file); 91 $stream->close(); 92 $tree->setPreference('filemtime', $filemtime); 93 94 FlashMessages::addMessage(I18N::translate('The GEDCOM file “%s” has been imported.', e($gedcom_file)), 'success'); 95 96 if ($this->timeout_service->isTimeNearlyUp(10.0)) { 97 return redirect(route(__CLASS__), StatusCodeInterface::STATUS_TEMPORARY_REDIRECT); 98 } 99 } 100 } catch (FilesystemException | UnableToRetrieveMetadata | UnableToReadFile $ex) { 101 // Can't read the file - skip it. 102 } 103 } 104 105 foreach ($this->tree_service->all() as $tree) { 106 if (!$gedcom_files->containsStrict($tree->name())) { 107 $this->tree_service->delete($tree); 108 FlashMessages::addMessage(I18N::translate('The family tree “%s” has been deleted.', e($tree->title())), 'success'); 109 110 if ($this->timeout_service->isTimeNearlyUp(10.0)) { 111 return redirect(route(__CLASS__), StatusCodeInterface::STATUS_TEMPORARY_REDIRECT); 112 } 113 } 114 } 115 116 return redirect(route(ManageTrees::class, ['tree' => $this->tree_service->all()->first()->name()])); 117 } 118} 119