MDL-26189 protect imsenterprise enrol file
[moodle.git] / enrol / imsenterprise / db / install.php
1 <?php
2 // This file is part of Moodle - http://moodle.org/
3 //
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
8 //
9 // Moodle 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 //
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
17 /**
18  * imsenterprise enrolment plugin installation.
19  *
20  * @package    enrol
21  * @subpackage imsenterprise
22  * @copyright  2011 Petr Skoda {@link http://skodak.org}
23  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24  */
26 defined('MOODLE_INTERNAL') || die();
28 function xmldb_enrol_imsenterprise_install() {
29     global $CFG, $DB;
31     // NOTE: this file is executed during upgrade from 1.9.x!
34     // this plugin does not use the new file api - lets undo the migration
35     $fs = get_file_storage();
37     if ($DB->record_exists('course', array('id'=>1))) { //course 1 is hardcoded here intentionally!
38         if ($context = get_context_instance(CONTEXT_COURSE, 1)) {
39             if ($file = $fs->get_file($context->id, 'course', 'legacy', 0, '/', 'imsenterprise-enrol.xml')) {
40                 if (!file_exists("$CFG->dataroot/1/imsenterprise-enrol.xml")) {
41                     check_dir_exists($CFG->dataroot.'/');
42                     $file->copy_content_to("$CFG->dataroot/1/imsenterprise-enrol.xml");
43                 }
44                 $file->delete();
45             }
46         }
47     }
49     if (!empty($CFG->enrol_imsfilelocation)) {
50         if (strpos($CFG->enrol_imsfilelocation, "$CFG->dataroot/") === 0) {
51             $location = str_replace("$CFG->dataroot/", '', $CFG->enrol_imsfilelocation);
52             $location = str_replace('\\', '/', $location);
53             $parts = explode('/', $location);
54             $courseid = array_shift($parts);
55             if (is_number($courseid) and $DB->record_exists('course', array('id'=>$courseid))) {
56                 if ($context = get_context_instance(CONTEXT_COURSE, $courseid)) {
57                     $file = array_pop($parts);
58                     if ($parts) {
59                         $dir = '/'.implode('/', $parts).'/';
60                     } else {
61                         $dir = '/';
62                     }
63                     if ($file = $fs->get_file($context->id, 'course', 'legacy', 0, $dir, $file)) {
64                         if (!file_exists($CFG->enrol_imsfilelocation)) {
65                             check_dir_exists($CFG->dataroot.'/'.$courseid.$dir);
66                             $file->copy_content_to($CFG->enrol_imsfilelocation);
67                         }
68                         $file->delete();
69                     }
70                 }
71             }
72         }
73     }
76     // TODO: migrate old config settings
78 }