xref: /webtrees/app/Schema/Migration22.php (revision bba27599b02e0b6f90f62348bb4fa32bd74056d0)
1<?php
2/**
3 * webtrees: online genealogy
4 * Copyright (C) 2018 webtrees development team
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 * You should have received a copy of the GNU General Public License
14 * along with this program. If not, see <http://www.gnu.org/licenses/>.
15 */
16namespace Fisharebest\Webtrees\Schema;
17
18use Fisharebest\Webtrees\Database;
19use Fisharebest\Webtrees\DebugBar;
20use Fisharebest\Webtrees\File;
21use Throwable;
22
23/**
24 * Upgrade the database schema from version 22 to version 23.
25 */
26class Migration22 implements MigrationInterface {
27	/**
28	 * Upgrade to to the next version
29	 */
30	public function upgrade() {
31		// - data update for 1.4.0 media changes
32		$_cfgs = Database::prepare(
33			"SELECT gs1.gedcom_id AS gedcom_id, gs1.setting_value AS media_directory, gs2.setting_value AS use_media_firewall, gs3.setting_value AS media_firewall_thumbs, gs4.setting_value AS media_firewall_rootdir" .
34			" FROM `##gedcom_setting` gs1" .
35			" LEFT JOIN `##gedcom_setting` gs2 ON (gs1.gedcom_id = gs2.gedcom_id AND gs2.setting_name='USE_MEDIA_FIREWALL')" .
36			" LEFT JOIN `##gedcom_setting` gs3 ON (gs1.gedcom_id = gs3.gedcom_id AND gs3.setting_name='MEDIA_FIREWALL_THUMBS')" .
37			" LEFT JOIN `##gedcom_setting` gs4 ON (gs1.gedcom_id = gs4.gedcom_id AND gs4.setting_name='MEDIA_FIREWALL_ROOTDIR')" .
38			" WHERE gs1.setting_name = 'MEDIA_DIRECTORY'"
39		)->fetchAll();
40
41		// The constant WT_DATA_DIR is not defined yet (although it was when this script was originally written).
42		$WT_DATA_DIR = realpath('data');
43
44		// Check the config for each tree
45		foreach ($_cfgs as $_cfg) {
46			if ($_cfg->use_media_firewall) {
47				// We’re using the media firewall.
48				$_mf_dir = realpath($_cfg->media_firewall_rootdir) . DIRECTORY_SEPARATOR;
49				if ($_mf_dir == $WT_DATA_DIR) {
50					// We’re already storing our media in the data folder - nothing to do.
51				} else {
52					// We’ve chosen a custom location for our media folder - need to update our media-folder to point to it.
53					// We have, for example,
54					// $_mf_dir = /home/fisharebest/my_pictures/
55					// $WT_DATA_DIR = /home/fisharebest/public_html/webtrees/data/
56					// Therefore we need to calculate ../../../my_pictures/
57					$_media_dir = '';
58					$_tmp_dir   = $WT_DATA_DIR;
59					while (strpos($_mf_dir, $_tmp_dir) !== 0) {
60						$_media_dir .= '../';
61						$_tmp_dir = preg_replace('~[^/\\\\]+[/\\\\]$~', '', $_tmp_dir);
62						if ($_tmp_dir == '') {
63							// Shouldn't get here - but this script is not allowed to fail...
64							continue 2;
65						}
66					}
67					$_media_dir .= $_cfg->media_directory;
68					Database::prepare(
69						"UPDATE `##gedcom_setting`" .
70						" SET setting_value=?" .
71						" WHERE gedcom_id=? AND setting_name='MEDIA_DIRECTORY'"
72					)->execute([$_media_dir, $_cfg->gedcom_id]);
73				}
74			} else {
75				// Not using the media firewall - just move the public folder to the new location (if we can).
76				if (
77					file_exists(WT_ROOT . $_cfg->media_directory) &&
78					is_dir(WT_ROOT . $_cfg->media_directory) &&
79					!file_exists($WT_DATA_DIR . $_cfg->media_directory)
80				) {
81					try {
82						rename(WT_ROOT . $_cfg->media_directory, $WT_DATA_DIR . $_cfg->media_directory);
83					} catch (Throwable $ex) {
84						DebugBar::addThrowable($ex);
85
86						// Cannot move the folder?
87					}
88					File::delete($WT_DATA_DIR . $_cfg->media_directory . '.htaccess');
89					File::delete($WT_DATA_DIR . $_cfg->media_directory . 'index.php');
90					File::delete($WT_DATA_DIR . $_cfg->media_directory . 'Mediainfo.txt');
91					File::delete($WT_DATA_DIR . $_cfg->media_directory . 'thumbs/Thumbsinfo.txt');
92				}
93			}
94		}
95
96		// Delete old settings
97		Database::exec("DELETE FROM `##gedcom_setting` WHERE setting_name IN ('USE_MEDIA_FIREWALL', 'MEDIA_FIREWALL_THUMBS', 'MEDIA_FIREWALL_ROOTDIR')");
98	}
99}
100