SCORM AICC MDL-30223 invalid call to update_record - very hard to test/reproduce.
[moodle.git] / enrol / instances.php
blobfe5e74b48a777bbc7d7a0771d85fe897d92c00e5
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.
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 * Main course enrolment management UI.
20 * @package core
21 * @subpackage enrol
22 * @copyright 2010 Petr Skoda {@link http://skodak.org}
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
26 require('../config.php');
28 $id = required_param('id', PARAM_INT); // course id
29 $action = optional_param('action', '', PARAM_ACTION);
30 $instanceid = optional_param('instance', 0, PARAM_INT);
31 $confirm = optional_param('confirm', 0, PARAM_BOOL);
33 $course = $DB->get_record('course', array('id'=>$id), '*', MUST_EXIST);
34 $context = get_context_instance(CONTEXT_COURSE, $course->id, MUST_EXIST);
36 if ($course->id == SITEID) {
37 redirect("$CFG->wwwroot/");
40 require_login($course);
41 require_capability('moodle/course:enrolreview', $context);
43 $canconfig = has_capability('moodle/course:enrolconfig', $context);
45 $PAGE->set_url('/enrol/instances.php', array('id'=>$course->id));
46 $PAGE->set_pagelayout('admin');
47 $PAGE->set_title(get_string('enrolmentinstances', 'enrol'));
48 $PAGE->set_heading($course->fullname);
50 $instances = enrol_get_instances($course->id, false);
51 $plugins = enrol_get_plugins(false);
53 if ($canconfig and $action and confirm_sesskey()) {
54 if (isset($instances[$instanceid]) and isset($plugins[$instances[$instanceid]->enrol])) {
55 if ($action === 'up') {
56 $order = array_keys($instances);
57 $order = array_flip($order);
58 $pos = $order[$instanceid];
59 if ($pos > 0) {
60 $switch = $pos - 1;
61 $resorted = array_values($instances);
62 $temp = $resorted[$pos];
63 $resorted[$pos] = $resorted[$switch];
64 $resorted[$switch] = $temp;
65 // now update db sortorder
66 foreach ($resorted as $sortorder=>$instance) {
67 if ($instance->sortorder != $sortorder) {
68 $instance->sortorder = $sortorder;
69 $DB->update_record('enrol', $instance);
73 redirect($PAGE->url);
75 } else if ($action === 'down') {
76 $order = array_keys($instances);
77 $order = array_flip($order);
78 $pos = $order[$instanceid];
79 if ($pos < count($instances) - 1) {
80 $switch = $pos + 1;
81 $resorted = array_values($instances);
82 $temp = $resorted[$pos];
83 $resorted[$pos] = $resorted[$switch];
84 $resorted[$switch] = $temp;
85 // now update db sortorder
86 foreach ($resorted as $sortorder=>$instance) {
87 if ($instance->sortorder != $sortorder) {
88 $instance->sortorder = $sortorder;
89 $DB->update_record('enrol', $instance);
93 redirect($PAGE->url);
95 } else if ($action === 'delete') {
96 $instance = $instances[$instanceid];
97 $plugin = $plugins[$instance->enrol];
99 if ($confirm) {
100 $plugin->delete_instance($instance);
101 $context->mark_dirty(); // invalidate all enrol caches
102 redirect($PAGE->url);
105 echo $OUTPUT->header();
106 $yesurl = new moodle_url('/enrol/instances.php', array('id'=>$course->id, 'action'=>'delete', 'instance'=>$instance->id, 'confirm'=>1,'sesskey'=>sesskey()));
107 $displayname = $plugin->get_instance_name($instance);
108 $users = $DB->count_records('user_enrolments', array('enrolid'=>$instance->id));
109 $message = get_string('deleteinstanceconfirm', 'enrol', array('name'=>$displayname, 'users'=>$users));
110 echo $OUTPUT->confirm($message, $yesurl, $PAGE->url);
111 echo $OUTPUT->footer();
112 die();
114 } else if ($action === 'disable') {
115 $instance = $instances[$instanceid];
116 if ($instance->status == ENROL_INSTANCE_ENABLED) {
117 $instance->status = ENROL_INSTANCE_DISABLED;
118 $DB->update_record('enrol', $instance);
119 $context->mark_dirty(); // invalidate all enrol caches
120 redirect($PAGE->url);
123 } else if ($action === 'enable') {
124 $instance = $instances[$instanceid];
125 if ($instance->status == ENROL_INSTANCE_DISABLED) {
126 $instance->status = ENROL_INSTANCE_ENABLED;
127 $DB->update_record('enrol', $instance);
128 $context->mark_dirty(); // invalidate all enrol caches
129 redirect($PAGE->url);
136 echo $OUTPUT->header();
137 echo $OUTPUT->heading(get_string('enrolmentinstances', 'enrol'));
139 echo $OUTPUT->box_start('generalbox boxaligncenter boxwidthnormal');
141 // display strings
142 $strup = get_string('up');
143 $strdown = get_string('down');
144 $strdelete = get_string('delete');
145 $strenable = get_string('enable');
146 $strdisable = get_string('disable');
147 $strmanage = get_string('manageinstance', 'enrol');
149 $table = new html_table();
150 $table->head = array(get_string('name'), get_string('users'), $strup.'/'.$strdown, get_string('edit'));
151 $table->align = array('left', 'center', 'center', 'center');
152 $table->width = '100%';
153 $table->data = array();
155 // iterate through enrol plugins and add to the display table
156 $updowncount = 1;
157 $icount = count($instances);
158 $url = new moodle_url('/enrol/instances.php', array('sesskey'=>sesskey(), 'id'=>$course->id));
159 foreach ($instances as $instance) {
160 if (!isset($plugins[$instance->enrol])) {
161 continue;
163 $plugin = $plugins[$instance->enrol];
165 $displayname = $plugin->get_instance_name($instance);
166 if (!enrol_is_enabled($instance->enrol) or $instance->status != ENROL_INSTANCE_ENABLED) {
167 $displayname = html_writer::tag('span', $displayname, array('class'=>'dimmed_text'));
170 $users = $DB->count_records('user_enrolments', array('enrolid'=>$instance->id));
172 $updown = array();
173 $edit = array();
175 if ($canconfig) {
176 // up/down link
177 $updown = '';
178 if ($updowncount > 1) {
179 $aurl = new moodle_url($url, array('action'=>'up', 'instance'=>$instance->id));
180 $updown[] = html_writer::link($aurl, html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/up'), 'alt'=>$strup, 'class'=>'smallicon')));
181 } else {
182 $updown[] = html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('spacer'), 'alt'=>'', 'class'=>'smallicon'));
184 if ($updowncount < $icount) {
185 $aurl = new moodle_url($url, array('action'=>'down', 'instance'=>$instance->id));
186 $updown[] = html_writer::link($aurl, html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/down'), 'alt'=>$strdown, 'class'=>'smallicon')));
187 } else {
188 $updown[] = html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('spacer'), 'alt'=>'', 'class'=>'smallicon'));
190 ++$updowncount;
192 // edit links
193 if ($plugin->instance_deleteable($instance)) {
194 $aurl = new moodle_url($url, array('action'=>'delete', 'instance'=>$instance->id));
195 $edit[] = html_writer::link($aurl, html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/delete'), 'alt'=>$strdelete, 'class'=>'smallicon')));
198 if (enrol_is_enabled($instance->enrol)) {
199 if ($instance->status == ENROL_INSTANCE_ENABLED) {
200 $aurl = new moodle_url($url, array('action'=>'disable', 'instance'=>$instance->id));
201 $edit[] = html_writer::link($aurl, html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/hide'), 'alt'=>$strdisable, 'class'=>'smallicon')));
202 } else if ($instance->status == ENROL_INSTANCE_DISABLED) {
203 $aurl = new moodle_url($url, array('action'=>'enable', 'instance'=>$instance->id));
204 $edit[] = html_writer::link($aurl, html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/show'), 'alt'=>$strenable, 'class'=>'smallicon')));
205 } else {
206 // plugin specific state - do not mess with it!
207 $edit[] = html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/show'), 'alt'=>'', 'class'=>'smallicon'));
213 // link to instance management
214 if (enrol_is_enabled($instance->enrol)) {
215 if ($icons = $plugin->get_action_icons($instance)) {
216 $edit = array_merge($edit, $icons);
220 // add a row to the table
221 $table->data[] = array($displayname, $users, implode('&nbsp;', $updown), implode('&nbsp;', $edit));
224 echo html_writer::table($table);
226 // access security is in each plugin
227 $candidates = array();
228 foreach (enrol_get_plugins(true) as $name=>$plugin) {
229 if (!$link = $plugin->get_newinstance_link($course->id)) {
230 continue;
232 $candidates[$link->out(false)] = get_string('pluginname', 'enrol_'.$name);
235 if ($candidates) {
236 $select = new url_select($candidates);
237 $select->set_label(get_string('addinstance', 'enrol'));
238 echo $OUTPUT->render($select);
241 echo $OUTPUT->box_end();
243 echo $OUTPUT->footer();