question/question.php

   1 <?php
   2 /**
   3  * Page for editing questions using the new form library.
   4  *
   5  * @author T.J.Hunt@open.ac.uk
   6  * @license http://www.gnu.org/copyleft/gpl.html GNU Public License
   7  * @package questionbank
   8  *//** */
   9
  10 // Includes.
  11 require_once(dirname(__FILE__) . '/../config.php');
  12 require_once(dirname(__FILE__) . '/editlib.php');
  13 require_once($CFG->libdir . '/filelib.php');
  14 require_once($CFG->libdir . '/formslib.php');
  15
  16 // Read URL parameters telling us which question to edit.
  17 $id = optional_param('id', 0, PARAM_INT); // question id
  18 $qtype = optional_param('qtype', '', PARAM_FILE);
  19 $categoryid = optional_param('category', 0, PARAM_INT);
  20 $cmid = optional_param('cmid', 0, PARAM_INT);
  21 $courseid = optional_param('courseid', 0, PARAM_INT);
  22 $wizardnow = optional_param('wizardnow', '', PARAM_ALPHA);
  23 $movecontext = optional_param('movecontext', 0, PARAM_BOOL); // Switch to make
  24         // question uneditable - form is displayed to edit category only
  25 $originalreturnurl = optional_param('returnurl', 0, PARAM_LOCALURL);
  26 $appendqnumstring = optional_param('appendqnumstring', '', PARAM_ALPHA);
  27 $inpopup = optional_param('inpopup', 0, PARAM_BOOL);
  28
  29 $url = new moodle_url('/question/question.php');
  30 if ($id !== 0) {
  31     $url->param('id', $id);
  32 }
  33 if ($qtype !== '') {
  34     $url->param('qtype', $qtype);
  35 }
  36 if ($categoryid !== 0) {
  37     $url->param('category', $categoryid);
  38 }
  39 if ($cmid !== 0) {
  40     $url->param('cmid', $cmid);
  41 }
  42 if ($courseid !== 0) {
  43     $url->param('courseid', $courseid);
  44 }
  45 if ($wizardnow !== '') {
  46     $url->param('wizardnow', $wizardnow);
  47 }
  48 if ($movecontext !== 0) {
  49     $url->param('movecontext', $movecontext);
  50 }
  51 if ($originalreturnurl !== 0) {
  52     $url->param('returnurl', $originalreturnurl);
  53 }
  54 if ($appendqnumstring !== '') {
  55     $url->param('appendqnumstring', $appendqnumstring);
  56 }
  57 if ($inpopup !== 0) {
  58     $url->param('inpopup', $inpopup);
  59 }
  60 $PAGE->set_url($url);
  61
  62 if ($originalreturnurl) {
  63     if (strpos($originalreturnurl, '/') !== 0) {
  64         throw new coding_exception("returnurl must be a local URL starting with '/'. $originalreturnurl was given.");
  65     }
  66     $returnurl = new moodle_url($originalreturnurl);
  67 } else if ($cmid) {
  68     $returnurl = new moodle_url('/question/edit.php', array('cmid' => $cmid));
  69 } else {
  70     $returnurl = new moodle_url('/question/edit.php', array('courseid' => $courseid));
  71 }
  72
  73 if ($movecontext && !$id){
  74     print_error('questiondoesnotexist', 'question', $returnurl);
  75 }
  76
  77 if ($cmid){
  78     list($module, $cm) = get_module_from_cmid($cmid);
  79     require_login($cm->course, false, $cm);
  80     $thiscontext = get_context_instance(CONTEXT_MODULE, $cmid);
  81 } elseif ($courseid) {
  82     require_login($courseid, false);
  83     $PAGE->set_pagelayout('course');
  84     $thiscontext = get_context_instance(CONTEXT_COURSE, $courseid);
  85     $module = null;
  86     $cm = null;
  87 } else {
  88     print_error('missingcourseorcmid', 'question');
  89 }
  90 $contexts = new question_edit_contexts($thiscontext);
  91
  92 if (optional_param('addcancel', false, PARAM_BOOL)) {
  93     redirect($returnurl);
  94 }
  95
  96 if ($id) {
  97     if (!$question = $DB->get_record('question', array('id' => $id))) {
  98         print_error('questiondoesnotexist', 'question', $returnurl);
  99     }
 100     get_question_options($question, true);
 101
 102 } else if ($categoryid && $qtype) { // only for creating new questions
 103     $question = new stdClass;
 104     $question->category = $categoryid;
 105     $question->qtype = $qtype;
 106
 107     // Check that users are allowed to create this question type at the moment.
 108     $allowedtypes = question_type_menu();
 109     if (!isset($allowedtypes[$qtype])) {
 110         print_error('cannotenable', 'question', $returnurl, $qtype);
 111     }
 112
 113 } else if ($categoryid) {
 114     // Category, but no qtype. They probably came from the addquestion.php
 115     // script without choosing a question type. Send them back.
 116     $addurl = new moodle_url('/question/addquestion.php', $url->params());
 117     $addurl->param('validationerror', 1);
 118     redirect($addurl);
 119
 120 } else {
 121     print_error('notenoughdatatoeditaquestion', 'question', $returnurl);
 122 }
 123
 124 // Validate the question category.
 125 if (!$category = $DB->get_record('question_categories', array('id' => $question->category))) {
 126     print_error('categorydoesnotexist', 'question', $returnurl);
 127 }
 128
 129 // Check permissions
 130 $question->formoptions = new stdClass;
 131
 132 $categorycontext = get_context_instance_by_id($category->contextid);
 133 $addpermission = has_capability('moodle/question:add', $categorycontext);
 134
 135 if ($id) {
 136     $canview = question_has_capability_on($question, 'view');
 137     if ($movecontext){
 138         $question->formoptions->canedit = false;
 139         $question->formoptions->canmove = (question_has_capability_on($question, 'move') && $contexts->have_cap('moodle/question:add'));
 140         $question->formoptions->cansaveasnew = false;
 141         $question->formoptions->repeatelements = false;
 142         $question->formoptions->movecontext = true;
 143         $formeditable = true;
 144         question_require_capability_on($question, 'view');
 145     } else {
 146         $question->formoptions->canedit = question_has_capability_on($question, 'edit');
 147         $question->formoptions->canmove = (question_has_capability_on($question, 'move') && $addpermission);
 148         $question->formoptions->cansaveasnew = (($canview ||question_has_capability_on($question, 'edit')) && $addpermission);
 149         $question->formoptions->repeatelements = ($question->formoptions->canedit || $question->formoptions->cansaveasnew);
 150         $formeditable =  $question->formoptions->canedit || $question->formoptions->cansaveasnew || $question->formoptions->canmove;
 151         $question->formoptions->movecontext = false;
 152         if (!$formeditable){
 153             question_require_capability_on($question, 'view');
 154         }
 155     }
 156
 157 } else  { // creating a new question
 158     require_capability('moodle/question:add', $categorycontext);
 159     $formeditable = true;
 160     $question->formoptions->canedit = question_has_capability_on($question, 'edit');
 161     $question->formoptions->canmove = (question_has_capability_on($question, 'move') && $addpermission);
 162     $question->formoptions->repeatelements = true;
 163     $question->formoptions->movecontext = false;
 164 }
 165
 166 // Validate the question type.
 167 if (!isset($QTYPES[$question->qtype])) {
 168     print_error('unknownquestiontype', 'question', $returnurl, $question->qtype);
 169 }
 170 $PAGE->set_pagetype('question-type-' . $question->qtype);
 171
 172 // Create the question editing form.
 173 if ($wizardnow!=='' && !$movecontext){
 174     if (!method_exists($QTYPES[$question->qtype], 'next_wizard_form')){
 175         print_error('missingimportantcode', 'question', $returnurl, 'wizard form definition');
 176     } else {
 177         $mform = $QTYPES[$question->qtype]->next_wizard_form('question.php', $question, $wizardnow, $formeditable);
 178     }
 179 } else {
 180     $mform = $QTYPES[$question->qtype]->create_editing_form('question.php', $question, $category, $contexts, $formeditable);
 181 }
 182 if ($mform === null) {
 183     print_error('missingimportantcode', 'question', $returnurl, 'question editing form definition for "'.$question->qtype.'"');
 184 }
 185 $toform = fullclone($question); // send the question object and a few more parameters to the form
 186 $toform->category = "$category->id,$category->contextid";
 187 if ($formeditable && $id){
 188     $toform->categorymoveto = $toform->category;
 189 }
 190
 191 $toform->appendqnumstring = $appendqnumstring;
 192 $toform->returnurl = $originalreturnurl;
 193 $toform->movecontext = $movecontext;
 194 if ($cm !== null){
 195     $toform->cmid = $cm->id;
 196     $toform->courseid = $cm->course;
 197 } else {
 198     $toform->courseid = $COURSE->id;
 199 }
 200
 201 $toform->inpopup = $inpopup;
 202
 203 $mform->set_data($toform);
 204
 205 if ($mform->is_cancelled()){
 206     if ($inpopup) {
 207         close_window();
 208     } else {
 209         if (!empty($question->id)) {
 210             $returnurl->param('lastchanged', $question->id);
 211         }
 212         redirect($returnurl->out(false));
 213     }
 214 } elseif ($fromform = $mform->get_data()) {
 215     /// If we are saving as a copy, break the connection to the old question.
 216     if (!empty($fromform->makecopy)) {
 217         $question->id = 0;
 218         $question->hidden = 0; // Copies should not be hidden
 219     }
 220
 221     /// Process the combination of usecurrentcat, categorymoveto and category form
 222     /// fields, so the save_question method only has to consider $fromform->category
 223     if (!empty($fromform->usecurrentcat)) {
 224         // $fromform->category is the right category to save in.
 225     } else {
 226         if (!empty($fromform->categorymoveto)) {
 227             $fromform->category = $fromform->categorymoveto;
 228         } else {
 229             // $fromform->category is the right category to save in.
 230         }
 231     }
 232
 233     /// If we are moving a question, check we have permission to move it from
 234     /// whence it came. (Where we are moving to is validated by the form.)
 235     list($newcatid) = explode(',', $fromform->category);
 236     if (!empty($question->id) && $newcatid != $question->category) {
 237         question_require_capability_on($question, 'move');
 238     }
 239
 240     /// Ensure we redirect back to the category the question is being saved into.
 241     $returnurl->param('category', $fromform->category);
 242
 243     /// Call the appropriate method.
 244     if ($movecontext) {
 245         list($tocatid, $tocontextid) = explode(',', $fromform->categorymoveto);
 246         $tocontext = get_context_instance_by_id($tocontextid);
 247         require_capability('moodle/question:add', $tocontext);
 248         if (get_filesdir_from_context($categorycontext) != get_filesdir_from_context($tocontext)){
 249             $movecontexturl  = new moodle_url('/question/contextmoveq.php', array(
 250                     'returnurl' => str_replace($CFG->wwwroot, '', $returnurl->out(false)),
 251                     'ids' => $question->id,
 252                     'tocatid' => $tocatid));
 253             if ($cmid){
 254                 $movecontexturl->param('cmid', $cmid);
 255             } else {
 256                 $movecontexturl->param('courseid', $courseid);
 257             }
 258             redirect($movecontexturl);
 259         }
 260     }
 261
 262     $question = $QTYPES[$question->qtype]->save_question($question, $fromform, $COURSE, $wizardnow, true);
 263     // a wizardpage from multipe pages questiontype like calculated may not allow editing the question tags
 264     if (!empty($CFG->usetags) && isset($fromform->tags)) {
 265         require_once($CFG->dirroot.'/tag/lib.php');
 266         tag_set('question', $question->id, $fromform->tags);
 267     }
 268
 269     if (($QTYPES[$question->qtype]->finished_edit_wizard($fromform)) || $movecontext){
 270         if ($inpopup) {
 271             echo $OUTPUT->notification(get_string('changessaved'), '');
 272             close_window(3);
 273         } else {
 274             $returnurl->param('lastchanged', $question->id);
 275             if ($appendqnumstring) {
 276                 $returnurl->param($appendqnumstring, $question->id);
 277                 $returnurl->param('sesskey', sesskey());
 278                 $returnurl->param('cmid', $cmid);
 279             }
 280             redirect($returnurl);
 281         }
 282     } else {
 283         $nexturlparams = array(
 284                 'returnurl' => $originalreturnurl,
 285                 'appendqnumstring' => $appendqnumstring);
 286         if (isset($fromform->nextpageparam) && is_array($fromform->nextpageparam)){
 287             //useful for passing data to the next page which is not saved in the database.
 288             $nexturlparams += $fromform->nextpageparam;
 289         }
 290         $nexturlparams['id'] = $question->id;
 291         $nexturlparams['wizardnow'] = $fromform->wizard;
 292         $nexturl = new moodle_url('/question/question.php', $nexturlparams);
 293         if ($cmid){
 294             $nexturl->param('cmid', $cmid);
 295         } else {
 296             $nexturl->param('courseid', $COURSE->id);
 297         }
 298         redirect($nexturl);
 299     }
 300 } else {
 301
 302     $streditingquestion = $QTYPES[$question->qtype]->get_heading();
 303     $PAGE->set_title($streditingquestion);
 304     $PAGE->set_heading($COURSE->fullname);
 305     if ($cm !== null) {
 306         $strmodule = get_string('modulename', $cm->modname);
 307         $streditingmodule = get_string('editinga', 'moodle', $strmodule);
 308         $PAGE->navbar->add(get_string('modulenameplural', $cm->modname), new moodle_url('/mod/'.$cm->modname.'/index.php', array('id'=>$cm->course)));
 309         $PAGE->navbar->add(format_string($module->name), new moodle_url('/mod/'.$cm->modname.'/view.php', array('id'=>$cm->id)));
 310         if (stripos($returnurl, "$CFG->wwwroot/mod/{$cm->modname}/view.php")!== 0){
 311             //don't need this link if returnurl returns to view.php
 312             $PAGE->navbar->add($streditingmodule, $returnurl);
 313         }
 314         $PAGE->navbar->add($streditingquestion);
 315         echo $OUTPUT->header();
 316
 317     } else {
 318         $strediting = '<a href="edit.php?courseid='.$COURSE->id.'">'.get_string("editquestions", "quiz").'</a> -> '.$streditingquestion;
 319         $PAGE->navbar->add(get_string('editquestions', "quiz"), $returnurl);
 320         $PAGE->navbar->add($streditingquestion);
 321         echo $OUTPUT->header();
 322     }
 323
 324     // Display a heading, question editing form and possibly some extra content needed for
 325     // for this question type.
 326     $QTYPES[$question->qtype]->display_question_editing_page($mform, $question, $wizardnow);
 327     echo $OUTPUT->footer();
 328 }
 329