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 PDOException; 21 22/** 23 * Upgrade the database schema from version 20 to version 21. 24 */ 25class Migration20 implements MigrationInterface 26{ 27 /** 28 * Upgrade to to the next version 29 */ 30 public function upgrade() 31 { 32 // Delete some old/unused configuration settings 33 Database::exec("DELETE FROM `##gedcom_setting` WHERE setting_name IN ('MEDIA_EXTERNAL')"); 34 35 // Delete old table 36 Database::exec("DROP TABLE IF EXISTS `##media_mapping`"); 37 38 // Make this table look like all the others 39 try { 40 Database::exec( 41 "ALTER TABLE `##media`" . 42 " DROP m_id," . 43 " CHANGE m_media m_id VARCHAR(20) COLLATE utf8_unicode_ci NOT NULL," . 44 " CHANGE m_file m_filename VARCHAR(512) COLLATE utf8_unicode_ci DEFAULT NULL," . 45 " CHANGE m_gedfile m_file INTEGER NOT NULL," . 46 " CHANGE m_gedrec m_gedcom MEDIUMTEXT COLLATE utf8_unicode_ci DEFAULT NULL," . 47 " ADD m_type VARCHAR(20) COLLATE utf8_unicode_ci NULL AFTER m_ext," . 48 " ADD PRIMARY KEY (m_file, m_id)," . 49 " ADD KEY ix2 (m_ext, m_type)," . 50 " ADD KEY ix3 (m_titl)" 51 ); 52 } catch (PDOException $ex) { 53 DebugBar::addThrowable($ex); 54 55 // Assume we've already done this 56 } 57 58 // Populate the new column 59 Database::exec("UPDATE `##media` SET m_type = SUBSTRING_INDEX(SUBSTRING_INDEX(m_gedcom, '\n3 TYPE ', -1), '\n', 1) WHERE m_gedcom LIKE '%\n3 TYPE %'"); 60 } 61} 62