MDL-50851 course: use new tag API
[moodle.git] / question / question.php
CommitLineData
aeb15530 1<?php
d3603157
TH
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/>.
16
16750bcd 17/**
d3603157 18 * Page for editing questions.
16750bcd 19 *
d3603157
TH
20 * @package moodlecore
21 * @subpackage questionbank
22 * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com}
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24 */
25
87391656 26
add2d7ac 27require_once(dirname(__FILE__) . '/../config.php');
28require_once(dirname(__FILE__) . '/editlib.php');
29require_once($CFG->libdir . '/filelib.php');
30require_once($CFG->libdir . '/formslib.php');
31
add2d7ac 32// Read URL parameters telling us which question to edit.
33$id = optional_param('id', 0, PARAM_INT); // question id
8011be18 34$makecopy = optional_param('makecopy', 0, PARAM_BOOL);
add2d7ac 35$qtype = optional_param('qtype', '', PARAM_FILE);
36$categoryid = optional_param('category', 0, PARAM_INT);
271e6dec 37$cmid = optional_param('cmid', 0, PARAM_INT);
38$courseid = optional_param('courseid', 0, PARAM_INT);
24e8b9b6 39$wizardnow = optional_param('wizardnow', '', PARAM_ALPHA);
90c7912e 40$originalreturnurl = optional_param('returnurl', 0, PARAM_LOCALURL);
fa583f5f 41$appendqnumstring = optional_param('appendqnumstring', '', PARAM_ALPHA);
79bb7202 42$inpopup = optional_param('inpopup', 0, PARAM_BOOL);
a13d4fbd 43$scrollpos = optional_param('scrollpos', 0, PARAM_INT);
79bb7202 44
a6855934 45$url = new moodle_url('/question/question.php');
b0f4e4e4 46if ($id !== 0) {
47 $url->param('id', $id);
48}
8011be18 49if ($makecopy) {
e0c41591
K
50 $url->param('makecopy', $makecopy);
51}
b0f4e4e4 52if ($qtype !== '') {
53 $url->param('qtype', $qtype);
54}
55if ($categoryid !== 0) {
56 $url->param('category', $categoryid);
57}
58if ($cmid !== 0) {
59 $url->param('cmid', $cmid);
60}
61if ($courseid !== 0) {
62 $url->param('courseid', $courseid);
63}
64if ($wizardnow !== '') {
65 $url->param('wizardnow', $wizardnow);
66}
90c7912e
TH
67if ($originalreturnurl !== 0) {
68 $url->param('returnurl', $originalreturnurl);
b0f4e4e4 69}
70if ($appendqnumstring !== '') {
71 $url->param('appendqnumstring', $appendqnumstring);
72}
73if ($inpopup !== 0) {
74 $url->param('inpopup', $inpopup);
75}
a13d4fbd
TH
76if ($scrollpos) {
77 $url->param('scrollpos', $scrollpos);
78}
b0f4e4e4 79$PAGE->set_url($url);
80
04bf7ac8
TH
81if ($cmid) {
82 $questionbankurl = new moodle_url('/question/edit.php', array('cmid' => $cmid));
83} else {
84 $questionbankurl = new moodle_url('/question/edit.php', array('courseid' => $courseid));
85}
86navigation_node::override_active_url($questionbankurl);
87
fb6dcdab
TH
88if ($originalreturnurl) {
89 if (strpos($originalreturnurl, '/') !== 0) {
90 throw new coding_exception("returnurl must be a local URL starting with '/'. $originalreturnurl was given.");
91 }
92 $returnurl = new moodle_url($originalreturnurl);
fb6dcdab 93} else {
04bf7ac8 94 $returnurl = $questionbankurl;
90c7912e 95}
a13d4fbd
TH
96if ($scrollpos) {
97 $returnurl->param('scrollpos', $scrollpos);
98}
90c7912e 99
9ab75b2b 100if ($cmid){
271e6dec 101 list($module, $cm) = get_module_from_cmid($cmid);
102 require_login($cm->course, false, $cm);
21c08c63 103 $thiscontext = context_module::instance($cmid);
271e6dec 104} elseif ($courseid) {
105 require_login($courseid, false);
21c08c63 106 $thiscontext = context_course::instance($courseid);
9ab75b2b 107 $module = null;
108 $cm = null;
271e6dec 109} else {
0be2c858 110 print_error('missingcourseorcmid', 'question');
9ab75b2b 111}
271e6dec 112$contexts = new question_edit_contexts($thiscontext);
4bf1be35 113$PAGE->set_pagelayout('admin');
271e6dec 114
cd120b23 115if (optional_param('addcancel', false, PARAM_BOOL)) {
116 redirect($returnurl);
117}
118
add2d7ac 119if ($id) {
f34488b2 120 if (!$question = $DB->get_record('question', array('id' => $id))) {
add2d7ac 121 print_error('questiondoesnotexist', 'question', $returnurl);
122 }
c599a682 123 get_question_options($question, true);
a27aa5c6 124
add2d7ac 125} else if ($categoryid && $qtype) { // only for creating new questions
0ff4bd08 126 $question = new stdClass();
add2d7ac 127 $question->category = $categoryid;
128 $question->qtype = $qtype;
51c5e605 129 $question->createdby = $USER->id;
8ed358db 130
131 // Check that users are allowed to create this question type at the moment.
06f8ed54 132 if (!question_bank::qtype_enabled($qtype)) {
8ed358db 133 print_error('cannotenable', 'question', $returnurl, $qtype);
134 }
a27aa5c6
TH
135
136} else if ($categoryid) {
137 // Category, but no qtype. They probably came from the addquestion.php
fe6ce234 138 // script without choosing a question type. Send them back.
a27aa5c6
TH
139 $addurl = new moodle_url('/question/addquestion.php', $url->params());
140 $addurl->param('validationerror', 1);
141 redirect($addurl);
142
add2d7ac 143} else {
144 print_error('notenoughdatatoeditaquestion', 'question', $returnurl);
145}
146
06f8ed54
TH
147$qtypeobj = question_bank::get_qtype($question->qtype);
148
add2d7ac 149// Validate the question category.
f34488b2 150if (!$category = $DB->get_record('question_categories', array('id' => $question->category))) {
add2d7ac 151 print_error('categorydoesnotexist', 'question', $returnurl);
152}
271e6dec 153
677f62b6 154// Check permissions
0ff4bd08 155$question->formoptions = new stdClass();
271e6dec 156
d197ea43 157$categorycontext = context::instance_by_id($category->contextid);
271e6dec 158$addpermission = has_capability('moodle/question:add', $categorycontext);
159
160if ($id) {
435d3279
K
161 $question->formoptions->canedit = question_has_capability_on($question, 'edit');
162 $question->formoptions->canmove = $addpermission && question_has_capability_on($question, 'move');
163 $question->formoptions->cansaveasnew = $addpermission &&
164 (question_has_capability_on($question, 'view') || $question->formoptions->canedit);
165 $question->formoptions->repeatelements = $question->formoptions->canedit || $question->formoptions->cansaveasnew;
166 $formeditable = $question->formoptions->canedit || $question->formoptions->cansaveasnew || $question->formoptions->canmove;
167 if (!$formeditable) {
168 question_require_capability_on($question, 'view');
169 }
170 if ($makecopy) {
171 // If we are duplicating a question, add some indication to the question name.
172 $question->name = get_string('questionnamecopy', 'question', $question->name);
8011be18 173 $question->beingcopied = true;
271e6dec 174 }
175
271e6dec 176} else { // creating a new question
fe6ce234
DC
177 $question->formoptions->canedit = question_has_capability_on($question, 'edit');
178 $question->formoptions->canmove = (question_has_capability_on($question, 'move') && $addpermission);
51c5e605 179 $question->formoptions->cansaveasnew = false;
271e6dec 180 $question->formoptions->repeatelements = true;
51c5e605
TH
181 $formeditable = true;
182 require_capability('moodle/question:add', $categorycontext);
add2d7ac 183}
76cf77e4 184$question->formoptions->mustbeusable = (bool) $appendqnumstring;
add2d7ac 185
186// Validate the question type.
d529807a 187$PAGE->set_pagetype('question-type-' . $question->qtype);
add2d7ac 188
add2d7ac 189// Create the question editing form.
435d3279 190if ($wizardnow !== '') {
06f8ed54 191 $mform = $qtypeobj->next_wizard_form('question.php', $question, $wizardnow, $formeditable);
add2d7ac 192} else {
06f8ed54 193 $mform = $qtypeobj->create_editing_form('question.php', $question, $category, $contexts, $formeditable);
add2d7ac 194}
ba18b21d 195$toform = fullclone($question); // send the question object and a few more parameters to the form
f4fe3968 196$toform->category = "{$category->id},{$category->contextid}";
a13d4fbd 197$toform->scrollpos = $scrollpos;
ba18b21d 198if ($formeditable && $id){
199 $toform->categorymoveto = $toform->category;
200}
fa583f5f 201
202$toform->appendqnumstring = $appendqnumstring;
90c7912e 203$toform->returnurl = $originalreturnurl;
e0c41591 204$toform->makecopy = $makecopy;
9ab75b2b 205if ($cm !== null){
206 $toform->cmid = $cm->id;
271e6dec 207 $toform->courseid = $cm->course;
208} else {
209 $toform->courseid = $COURSE->id;
9ab75b2b 210}
fe6ce234 211
11a60967 212$toform->inpopup = $inpopup;
fe6ce234 213
add2d7ac 214$mform->set_data($toform);
215
06f8ed54 216if ($mform->is_cancelled()) {
11a60967 217 if ($inpopup) {
218 close_window();
219 } else {
a13d4fbd 220 redirect($returnurl);
11a60967 221 }
06f8ed54 222
5d548d3e 223} else if ($fromform = $mform->get_data()) {
e0c41591
K
224 // If we are saving as a copy, break the connection to the old question.
225 if ($makecopy) {
24e8b9b6 226 $question->id = 0;
e0c41591 227 $question->hidden = 0; // Copies should not be hidden.
add2d7ac 228 }
24e8b9b6 229
230 /// Process the combination of usecurrentcat, categorymoveto and category form
231 /// fields, so the save_question method only has to consider $fromform->category
232 if (!empty($fromform->usecurrentcat)) {
233 // $fromform->category is the right category to save in.
234 } else {
235 if (!empty($fromform->categorymoveto)) {
236 $fromform->category = $fromform->categorymoveto;
237 } else {
238 // $fromform->category is the right category to save in.
239 }
240 }
241
242 /// If we are moving a question, check we have permission to move it from
243 /// whence it came. (Where we are moving to is validated by the form.)
51c5e605 244 list($newcatid, $newcontextid) = explode(',', $fromform->category);
24e8b9b6 245 if (!empty($question->id) && $newcatid != $question->category) {
cc033d48 246 $contextid = $newcontextid;
24e8b9b6 247 question_require_capability_on($question, 'move');
cc033d48
MN
248 } else {
249 $contextid = $category->contextid;
24e8b9b6 250 }
251
5d548d3e 252 // Ensure we redirect back to the category the question is being saved into.
24e8b9b6 253 $returnurl->param('category', $fromform->category);
24e8b9b6 254
435d3279
K
255 // We are acutally saving the question.
256 if (!empty($question->id)) {
257 question_require_capability_on($question, 'edit');
5d548d3e 258 } else {
cc033d48 259 require_capability('moodle/question:add', context::instance_by_id($contextid));
435d3279
K
260 if (!empty($fromform->makecopy) && !$question->formoptions->cansaveasnew) {
261 print_error('nopermissions', '', '', 'edit');
5d548d3e 262 }
c599a682 263 }
435d3279
K
264 $question = $qtypeobj->save_question($question, $fromform);
265 if (!empty($CFG->usetags) && isset($fromform->tags)) {
266 // A wizardpage from multipe pages questiontype like calculated may not
267 // allow editing the question tags, hence the isset($fromform->tags) test.
268 require_once($CFG->dirroot.'/tag/lib.php');
cc033d48 269 tag_set('question', $question->id, $fromform->tags, 'core_question', $contextid);
435d3279 270 }
c599a682 271
a560d636
TH
272 // Purge this question from the cache.
273 question_bank::notify_question_edited($question->id);
274
7756e2bc
K
275 // If we are saving and continuing to edit the question.
276 if (!empty($fromform->updatebutton)) {
8011be18
TH
277 $url->param('id', $question->id);
278 $url->remove_params('makecopy');
7756e2bc
K
279 redirect($url);
280 }
281
435d3279 282 if ($qtypeobj->finished_edit_wizard($fromform)) {
79bb7202 283 if ($inpopup) {
fef8f84e 284 echo $OUTPUT->notification(get_string('changessaved'), '');
add2d7ac 285 close_window(3);
516cf3eb 286 } else {
fb6dcdab
TH
287 $returnurl->param('lastchanged', $question->id);
288 if ($appendqnumstring) {
289 $returnurl->param($appendqnumstring, $question->id);
290 $returnurl->param('sesskey', sesskey());
291 $returnurl->param('cmid', $cmid);
fa583f5f 292 }
fb6dcdab 293 redirect($returnurl);
516cf3eb 294 }
5d548d3e 295
add2d7ac 296 } else {
fb6dcdab
TH
297 $nexturlparams = array(
298 'returnurl' => $originalreturnurl,
a13d4fbd
TH
299 'appendqnumstring' => $appendqnumstring,
300 'scrollpos' => $scrollpos);
79bb7202 301 if (isset($fromform->nextpageparam) && is_array($fromform->nextpageparam)){
fb6dcdab
TH
302 //useful for passing data to the next page which is not saved in the database.
303 $nexturlparams += $fromform->nextpageparam;
add2d7ac 304 }
79bb7202 305 $nexturlparams['id'] = $question->id;
ba18b21d 306 $nexturlparams['wizardnow'] = $fromform->wizard;
fb6dcdab 307 $nexturl = new moodle_url('/question/question.php', $nexturlparams);
79bb7202 308 if ($cmid){
309 $nexturl->param('cmid', $cmid);
310 } else {
311 $nexturl->param('courseid', $COURSE->id);
312 }
7a567a92 313 redirect($nexturl);
516cf3eb 314 }
add2d7ac 315
add2d7ac 316}
50b5dde8
TH
317
318$streditingquestion = $qtypeobj->get_heading();
319$PAGE->set_title($streditingquestion);
320$PAGE->set_heading($COURSE->fullname);
321$PAGE->navbar->add($streditingquestion);
322
323// Display a heading, question editing form and possibly some extra content needed for
324// for this question type.
325echo $OUTPUT->header();
326$qtypeobj->display_question_editing_page($mform, $question, $wizardnow);
327echo $OUTPUT->footer();