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 Fisharebest\Webtrees\Http\ViewResponseTrait; 23use Fisharebest\Webtrees\I18N; 24use Fisharebest\Webtrees\Registry; 25use Fisharebest\Webtrees\Services\TreeService; 26use League\Flysystem\Filesystem; 27use League\Flysystem\StorageAttributes; 28use Psr\Http\Message\ResponseInterface; 29use Psr\Http\Message\ServerRequestInterface; 30use Psr\Http\Server\RequestHandlerInterface; 31 32use function explode; 33 34/** 35 * Show old files that could be deleted. 36 */ 37class CleanDataFolder implements RequestHandlerInterface 38{ 39 use ViewResponseTrait; 40 41 /** @var TreeService */ 42 private $tree_service; 43 44 /** 45 * CleanDataFolder constructor. 46 * 47 * @param TreeService $tree_service 48 */ 49 public function __construct(TreeService $tree_service) 50 { 51 $this->tree_service = $tree_service; 52 } 53 54 /** 55 * @param ServerRequestInterface $request 56 * 57 * @return ResponseInterface 58 */ 59 public function handle(ServerRequestInterface $request): ResponseInterface 60 { 61 $data_filesystem = Registry::filesystem()->data(); 62 63 $this->layout = 'layouts/administration'; 64 65 $protected = [ 66 '.htaccess', 67 '.gitignore', 68 'index.php', 69 'config.ini.php', 70 ]; 71 72 if ($request->getAttribute('dbtype') === 'sqlite') { 73 $protected[] = $request->getAttribute('dbname') . '.sqlite'; 74 } 75 76 // Protect the media folders 77 foreach ($this->tree_service->all() as $tree) { 78 $media_directory = $tree->getPreference('MEDIA_DIRECTORY'); 79 [$folder] = explode('/', $media_directory); 80 81 $protected[] = $folder . '/'; 82 } 83 84 // List the top-level contents of the data folder 85 $entries = $data_filesystem->listContents('', Filesystem::LIST_SHALLOW) 86 ->map(static function (StorageAttributes $attributes): string { 87 if ($attributes->isDir()) { 88 return $attributes->path() . '/'; 89 } 90 91 return $attributes->path(); 92 }); 93 94 return $this->viewResponse('admin/clean-data', [ 95 'title' => I18N::translate('Clean up data folder'), 96 'entries' => $entries, 97 'protected' => $protected, 98 ]); 99 } 100} 101