Moodle release 3.10.4
[moodle.git] / mod / quiz / addrandom.php
blob155945626f55e87596a447b7444e4cc133da1d71
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 * Fallback page of /mod/quiz/edit.php add random question dialog,
19 * for users who do not use javascript.
21 * @package mod_quiz
22 * @copyright 2008 Olli Savolainen
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
27 require_once(__DIR__ . '/../../config.php');
28 require_once($CFG->dirroot . '/mod/quiz/locallib.php');
29 require_once($CFG->dirroot . '/mod/quiz/addrandomform.php');
30 require_once($CFG->dirroot . '/question/editlib.php');
31 require_once($CFG->dirroot . '/question/category_class.php');
33 list($thispageurl, $contexts, $cmid, $cm, $quiz, $pagevars) =
34 question_edit_setup('editq', '/mod/quiz/addrandom.php', true);
36 // These params are only passed from page request to request while we stay on
37 // this page otherwise they would go in question_edit_setup.
38 $returnurl = optional_param('returnurl', '', PARAM_LOCALURL);
39 $addonpage = optional_param('addonpage', 0, PARAM_INT);
40 $category = optional_param('category', 0, PARAM_INT);
41 $scrollpos = optional_param('scrollpos', 0, PARAM_INT);
43 // Get the course object and related bits.
44 if (!$course = $DB->get_record('course', array('id' => $quiz->course))) {
45 print_error('invalidcourseid');
47 // You need mod/quiz:manage in addition to question capabilities to access this page.
48 // You also need the moodle/question:useall capability somewhere.
49 require_capability('mod/quiz:manage', $contexts->lowest());
50 if (!$contexts->having_cap('moodle/question:useall')) {
51 print_error('nopermissions', '', '', 'use');
54 $PAGE->set_url($thispageurl);
56 if ($returnurl) {
57 $returnurl = new moodle_url($returnurl);
58 } else {
59 $returnurl = new moodle_url('/mod/quiz/edit.php', array('cmid' => $cmid));
61 if ($scrollpos) {
62 $returnurl->param('scrollpos', $scrollpos);
65 $defaultcategoryobj = question_make_default_categories($contexts->all());
66 $defaultcategory = $defaultcategoryobj->id . ',' . $defaultcategoryobj->contextid;
68 $qcobject = new question_category_object(
69 $pagevars['cpage'],
70 $thispageurl,
71 $contexts->having_one_edit_tab_cap('categories'),
72 $defaultcategoryobj->id,
73 $defaultcategory,
74 null,
75 $contexts->having_cap('moodle/question:add'));
77 $mform = new quiz_add_random_form(new moodle_url('/mod/quiz/addrandom.php'),
78 array('contexts' => $contexts, 'cat' => $pagevars['cat']));
80 if ($mform->is_cancelled()) {
81 redirect($returnurl);
84 if ($data = $mform->get_data()) {
85 if (!empty($data->existingcategory)) {
86 list($categoryid) = explode(',', $data->category);
87 $includesubcategories = !empty($data->includesubcategories);
88 if (!$includesubcategories) {
89 // If the chosen category is a top category.
90 $includesubcategories = $DB->record_exists('question_categories', ['id' => $categoryid, 'parent' => 0]);
92 $returnurl->param('cat', $data->category);
94 } else if (!empty($data->newcategory)) {
95 list($parentid, $contextid) = explode(',', $data->parent);
96 $categoryid = $qcobject->add_category($data->parent, $data->name, '', true);
97 $includesubcategories = 0;
99 $returnurl->param('cat', $categoryid . ',' . $contextid);
100 } else {
101 throw new coding_exception(
102 'It seems a form was submitted without any button being pressed???');
105 if (empty($data->fromtags)) {
106 $data->fromtags = [];
109 $tagids = array_map(function($tagstrings) {
110 return (int)explode(',', $tagstrings)[0];
111 }, $data->fromtags);
113 quiz_add_random_questions($quiz, $addonpage, $categoryid, $data->numbertoadd, $includesubcategories, $tagids);
114 quiz_delete_previews($quiz);
115 quiz_update_sumgrades($quiz);
116 redirect($returnurl);
119 $mform->set_data(array(
120 'addonpage' => $addonpage,
121 'returnurl' => $returnurl,
122 'cmid' => $cm->id,
123 'category' => $category,
126 // Setup $PAGE.
127 $streditingquiz = get_string('editinga', 'moodle', get_string('modulename', 'quiz'));
128 $PAGE->navbar->add($streditingquiz);
129 $PAGE->set_title($streditingquiz);
130 $PAGE->set_heading($course->fullname);
131 echo $OUTPUT->header();
133 if (!$quizname = $DB->get_field($cm->modname, 'name', array('id' => $cm->instance))) {
134 print_error('invalidcoursemodule');
137 echo $OUTPUT->heading(get_string('addrandomquestiontoquiz', 'quiz', $quizname), 2);
138 $mform->display();
139 echo $OUTPUT->footer();