mirror of
https://github.com/moodle/moodle.git
synced 2025-02-13 20:36:42 +01:00
338 lines
14 KiB
PHP
338 lines
14 KiB
PHP
<?php
|
|
|
|
// This file is part of Moodle - http://moodle.org/
|
|
//
|
|
// Moodle is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Moodle is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU General Public License
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* Resource module upgrade related helper functions
|
|
*
|
|
* @package mod-resource
|
|
* @copyright 2009 Petr Skoda (http://skodak.org)
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
|
*/
|
|
|
|
/**
|
|
* Try on demand migration of file from old course files
|
|
* @param string $filepath old file path
|
|
* @param int $cmid migrated course module if
|
|
* @param int $courseid
|
|
* @param string $filearea new file area
|
|
* @param int $itemid migrated file item id
|
|
* @return mixed, false if not found, stored_file instance if migrated to new area
|
|
*/
|
|
function resource_try_file_migration($filepath, $cmid, $courseid, $filearea, $itemid) {
|
|
$fs = get_file_storage();
|
|
|
|
if (stripos($filepath, '/backupdata/') === 0 or stripos($filepath, '/moddata/') === 0) {
|
|
// do not steal protected files!
|
|
return false;
|
|
}
|
|
|
|
if (!$context = get_context_instance(CONTEXT_MODULE, $cmid)) {
|
|
return false;
|
|
}
|
|
if (!$coursecontext = get_context_instance(CONTEXT_COURSE, $courseid)) {
|
|
return false;
|
|
}
|
|
|
|
$pathnamehash = sha1($coursecontext->id.'course_content0'.$filepath);
|
|
if (!$file = $fs->get_file_by_hash($pathnamehash)) {
|
|
return false;
|
|
}
|
|
|
|
// copy and keep the same path, name, etc.
|
|
$file_record = array('contextid'=>$context->id, 'filearea'=>$filearea, 'itemid'=>$itemid);
|
|
try {
|
|
return $fs->create_file_from_storedfile($file_record, $file);
|
|
} catch (Exception $e) {
|
|
// file may exist - highly unlikely, we do not want upgrades to stop here
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Migrate resource module data from 1.9 resource_old table to new resource table
|
|
* @return void
|
|
*/
|
|
function resource_20_migrate() {
|
|
global $CFG, $DB;
|
|
|
|
require_once("$CFG->libdir/filelib.php");
|
|
require_once("$CFG->libdir/resourcelib.php");
|
|
require_once("$CFG->dirroot/course/lib.php");
|
|
|
|
$fs = get_file_storage();
|
|
|
|
$withrelativelinks = array('text/html', 'text/xml', 'application/xhtml+xml', 'application/x-shockwave-flash');
|
|
// note: pdf doc and other types may contain links too, but we do not support relative links there
|
|
|
|
if (!$candidates = $DB->get_recordset('resource_old', array('type'=>'file', 'migrated'=>0))) {
|
|
return;
|
|
}
|
|
|
|
foreach ($candidates as $candidate) {
|
|
upgrade_set_timeout();
|
|
|
|
$path = $candidate->reference;
|
|
$siteid = get_site()->id;
|
|
$fs = get_file_storage();
|
|
|
|
if (strpos($path, 'LOCALPATH') === 0) {
|
|
// ignore not maintained local files - sorry
|
|
continue;
|
|
|
|
} else if (preg_match("|$CFG->wwwroot/file.php(\?file=)?/$siteid(/[^\s'\"&\?#]+)|", $path, $matches)) {
|
|
// public site files
|
|
$path = $matches[2];
|
|
|
|
$resource = new object();
|
|
$resource->id = $candidate->oldid;
|
|
$resource->tobemigrated = 0;
|
|
$resource->mainfile = $path;
|
|
$resource->filterfiles = $CFG->filteruploadedfiles;
|
|
$resource->legacyfiles = RESOURCELIB_LEGACYFILES_NO; // on-demand-migration not possible for site files, sorry
|
|
|
|
$context = get_context_instance(CONTEXT_MODULE, $candidate->cmid);
|
|
$sitecontext = get_context_instance(CONTEXT_COURSE, $siteid);
|
|
$file_record = array('contextid'=>$context->id, 'filearea'=>'resource_content', 'itemid'=>0);
|
|
if ($file = $fs->get_file_by_hash(sha1($sitecontext->id.'course_content0'.$path))) {
|
|
try {
|
|
$fs->create_file_from_storedfile($file_record, $file);
|
|
} catch (Exception $x) {
|
|
}
|
|
$resource->mainfile = $file->get_filepath().$file->get_filename();
|
|
}
|
|
|
|
} else if (preg_match("|$CFG->wwwroot/file.php(\?file=)?/$candidate->course(/[^\s'\"&\?#]+)|", $path, $matches)) {
|
|
// current course files
|
|
$path = $matches[2];
|
|
|
|
$resource = new object();
|
|
$resource->id = $candidate->oldid;
|
|
$resource->tobemigrated = 0;
|
|
$resource->mainfile = $path;
|
|
$resource->filterfiles = $CFG->filteruploadedfiles;
|
|
$mimetype = mimeinfo('type', $resource->mainfile);
|
|
if (in_array($mimetype, $withrelativelinks)) {
|
|
$resource->legacyfiles = RESOURCELIB_LEGACYFILES_ACTIVE;
|
|
} else {
|
|
$resource->legacyfiles = RESOURCELIB_LEGACYFILES_NO;
|
|
}
|
|
|
|
// try migration of main file - ignore if does not exist
|
|
if ($file = resource_try_file_migration($resource->mainfile, $candidate->cmid, $candidate->course, 'resource_content', 0)) {
|
|
$resource->mainfile = $file->get_filepath().$file->get_filename();
|
|
}
|
|
|
|
} else if (strpos($path, '://') or strpos($path, '/') === 0) {
|
|
// http:// https:// ftp:// OR starts with slash - to be converted to link resource
|
|
continue;
|
|
|
|
} else {
|
|
// current course files
|
|
// cleanup old path first
|
|
$path = '/'.trim(trim($path), '/');
|
|
if (strpos($path, '?forcedownload=1') !== false) {
|
|
// eliminate old force download tricks
|
|
$candidate->options = 'forcedownload';
|
|
$path = str_replace('?forcedownload=1', '', $path);
|
|
}
|
|
// get rid of any extra url parameters, sorry we can not support these
|
|
preg_match("/^[^?#]+/", $path, $matches);
|
|
$parts = $matches[0];
|
|
|
|
$resource = new object();
|
|
$resource->id = $candidate->oldid;
|
|
$resource->tobemigrated = 0;
|
|
$resource->mainfile = $path;
|
|
$resource->filterfiles = $CFG->filteruploadedfiles;
|
|
$mimetype = mimeinfo('type', $resource->mainfile);
|
|
if (in_array($mimetype, $withrelativelinks)) {
|
|
$resource->legacyfiles = RESOURCELIB_LEGACYFILES_ACTIVE;
|
|
} else {
|
|
$resource->legacyfiles = RESOURCELIB_LEGACYFILES_NO;
|
|
}
|
|
|
|
// try migration of main file - ignore if does not exist
|
|
if ($file = resource_try_file_migration($resource->mainfile, $candidate->cmid, $candidate->course, 'resource_content', 0)) {
|
|
$resource->mainfile = $file->get_filepath().$file->get_filename();
|
|
}
|
|
}
|
|
|
|
$options = array('printheading'=>0, 'printintro'=>1);
|
|
if ($candidate->options == 'frame') {
|
|
$resource->display = RESOURCELIB_DISPLAY_FRAME;
|
|
|
|
} else if ($candidate->options == 'objectframe') {
|
|
$resource->display = RESOURCELIB_DISPLAY_EMBED;
|
|
|
|
} else if ($candidate->options == 'forcedownload') {
|
|
$resource->display = RESOURCELIB_DISPLAY_DOWNLOAD;
|
|
|
|
} else if ($candidate->popup) {
|
|
$resource->display = RESOURCELIB_DISPLAY_POPUP;
|
|
if ($candidate->popup) {
|
|
$rawoptions = explode(',', $candidate->popup);
|
|
foreach ($rawoptions as $rawoption) {
|
|
list($name, $value) = explode('=', trim($rawoption), 2);
|
|
if ($value > 0 and ($name == 'width' or $name == 'height')) {
|
|
$options['popup'.$name] = $value;
|
|
continue;
|
|
}
|
|
}
|
|
}
|
|
|
|
} else {
|
|
$resource->display = RESOURCELIB_DISPLAY_AUTO;
|
|
}
|
|
$resource->displayoptions = serialize($options);
|
|
|
|
// update resource instance and mark as migrated
|
|
$DB->update_record('resource', $resource);
|
|
$candidate->newmodule = 'resource';
|
|
$candidate->newid = $candidate->oldid;
|
|
$candidate->migrated = time();
|
|
$DB->update_record('resource_old', $candidate);
|
|
}
|
|
|
|
$candidates->close();
|
|
|
|
// clear all course modinfo caches
|
|
rebuild_course_cache(0, true);
|
|
}
|
|
|
|
/**
|
|
* This function creates resource_old table adn copies all data
|
|
* from resource table, this functions has to be called from
|
|
* all modules that are sucessors of old resource module types.
|
|
* @return bool true if migration required, false if not
|
|
*/
|
|
function resource_20_prepare_migration() {
|
|
global $DB;
|
|
|
|
$dbman = $DB->get_manager();
|
|
|
|
// If tresource not created yet, this is probably a new install
|
|
$table = new xmldb_table('resource');
|
|
if (!$dbman->table_exists($table)) {
|
|
return false;
|
|
}
|
|
|
|
// Define table resource_old to be created
|
|
$table = new xmldb_table('resource_old');
|
|
|
|
if ($dbman->table_exists($table)) {
|
|
//already executed
|
|
return true;
|
|
}
|
|
|
|
// Adding fields to table resource_old
|
|
$table->add_field('id', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, XMLDB_SEQUENCE, null);
|
|
$table->add_field('course', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0');
|
|
$table->add_field('name', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('type', XMLDB_TYPE_CHAR, '30', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('reference', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('intro', XMLDB_TYPE_TEXT, 'small', null, null, null, null);
|
|
$table->add_field('introformat', XMLDB_TYPE_INTEGER, '4', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0');
|
|
$table->add_field('alltext', XMLDB_TYPE_TEXT, 'medium', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('popup', XMLDB_TYPE_TEXT, 'small', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('options', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('timemodified', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0');
|
|
$table->add_field('oldid', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, null);
|
|
$table->add_field('cmid', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, null, null, null);
|
|
$table->add_field('newmodule', XMLDB_TYPE_CHAR, '50', null, null, null, null);
|
|
$table->add_field('newid', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, null, null, null);
|
|
$table->add_field('migrated', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0');
|
|
|
|
// Adding keys to table resource_old
|
|
$table->add_key('primary', XMLDB_KEY_PRIMARY, array('id'));
|
|
|
|
// Adding indexes to table resource_old
|
|
$table->add_index('oldid', XMLDB_INDEX_UNIQUE, array('oldid'));
|
|
$table->add_index('cmid', XMLDB_INDEX_NOTUNIQUE, array('cmid'));
|
|
|
|
// Launch create table for resource_old
|
|
$dbman->create_table($table);
|
|
|
|
$module = $DB->get_field('modules', 'id', array('name'=>'resource'));
|
|
|
|
if (!$DB->count_records('resource')) {
|
|
// upgrade of fresh new server from 1.9 - no upgrade needed
|
|
return false;
|
|
}
|
|
|
|
// find out if resource contains new 2.0dev fields already
|
|
$table = new xmldb_table('resource');
|
|
$field = new xmldb_field('introformat', XMLDB_TYPE_INTEGER, '4', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0', 'intro');
|
|
if ($dbman->field_exists($table, $field)) {
|
|
$sql = "INSERT INTO {resource_old} (oldid, course, name, type, reference, intro, introformat, alltext, popup, options, timemodified, cmid)
|
|
SELECT r.id, r.course, r.name, r.type, r.reference, r.intro, r.introformat, r.alltext, r.popup, r.options, r.timemodified, cm.id
|
|
FROM {resource} r
|
|
LEFT JOIN {course_modules} cm ON (r.id = cm.instance AND cm.module = :module)";
|
|
} else {
|
|
$sql = "INSERT INTO {resource_old} (oldid, course, name, type, reference, intro, introformat, alltext, popup, options, timemodified, cmid)
|
|
SELECT r.id, r.course, r.name, r.type, r.reference, r.summary, 0, r.alltext, r.popup, r.options, r.timemodified, cm.id
|
|
FROM {resource} r
|
|
LEFT JOIN {course_modules} cm ON (r.id = cm.instance AND cm.module = :module)";
|
|
}
|
|
|
|
$DB->execute($sql, array('module'=>$module));
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Migrate old resource type to new module, updates all related info, keeps the context id.
|
|
* @param string $modname name of new module
|
|
* @param object $candidate old instance from resource_old
|
|
* @param object $newinstance new module instance to be insterted into db
|
|
* @return mixed false if error, object new instance with id if success
|
|
*/
|
|
function resource_migrate_to_module($modname, $candidate, $newinstance) {
|
|
global $DB;
|
|
|
|
if (!$cm = get_coursemodule_from_id('resource', $candidate->cmid)) {
|
|
return false;
|
|
}
|
|
|
|
if (!$module = $DB->get_record('modules', array('name'=>$modname))) {
|
|
return false;
|
|
}
|
|
|
|
if (!$resource = $DB->get_record('resource', array('id'=>$candidate->oldid))) {
|
|
return false;
|
|
}
|
|
|
|
// insert new instance
|
|
$newinstance->id = $DB->insert_record($modname, $newinstance);
|
|
|
|
// update course modules
|
|
$cm->module = $module->id;
|
|
$cm->instance = $newinstance->id;
|
|
$DB->update_record('course_modules', $cm);
|
|
|
|
//delete old record
|
|
$DB->delete_records('resource', array('id'=>$resource->id));
|
|
|
|
//mark as migrated
|
|
$candidate->newmodule = $modname;
|
|
$candidate->newid = $newinstance->id;
|
|
$candidate->migrated = time();
|
|
$DB->update_record('resource_old', $candidate);
|
|
|
|
//no need to upgrade data in logs because resource module is able to redirect to migrated instances
|
|
return $newinstance;
|
|
}
|