2 // This file is part of Moodle - http://moodle.org/
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.
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/>.
18 * Defines the import questions form.
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
27 require_once(__DIR__
. '/../config.php');
28 require_once($CFG->dirroot
. '/question/editlib.php');
29 require_once($CFG->dirroot
. '/question/import_form.php');
30 require_once($CFG->dirroot
. '/question/format.php');
32 list($thispageurl, $contexts, $cmid, $cm, $module, $pagevars) =
33 question_edit_setup('import', '/question/import.php');
35 // get display strings
36 $txt = new stdClass();
37 $txt->importerror
= get_string('importerror', 'question');
38 $txt->importquestions
= get_string('importquestions', 'question');
40 list($catid, $catcontext) = explode(',', $pagevars['cat']);
41 if (!$category = $DB->get_record("question_categories", array('id' => $catid))) {
42 print_error('nocategory', 'question');
45 $categorycontext = context
::instance_by_id($category->contextid
);
46 $category->context
= $categorycontext;
47 //this page can be called without courseid or cmid in which case
48 //we get the context from the category object.
49 if ($contexts === null) { // need to get the course from the chosen category
50 $contexts = new question_edit_contexts($categorycontext);
51 $thiscontext = $contexts->lowest();
52 if ($thiscontext->contextlevel
== CONTEXT_COURSE
){
53 require_login($thiscontext->instanceid
, false);
54 } elseif ($thiscontext->contextlevel
== CONTEXT_MODULE
){
55 list($module, $cm) = get_module_from_cmid($thiscontext->instanceid
);
56 require_login($cm->course
, false, $cm);
58 $contexts->require_one_edit_tab_cap($edittab);
61 $PAGE->set_url($thispageurl);
63 $import_form = new question_import_form($thispageurl, array('contexts'=>$contexts->having_one_edit_tab_cap('import'),
64 'defaultcategory'=>$pagevars['cat']));
66 if ($import_form->is_cancelled()){
67 redirect($thispageurl);
72 $PAGE->set_title($txt->importquestions
);
73 $PAGE->set_heading($COURSE->fullname
);
74 echo $OUTPUT->header();
76 // Print horizontal nav if needed.
77 $renderer = $PAGE->get_renderer('core_question', 'bank');
78 echo $renderer->extra_horizontal_navigation();
80 // file upload form sumitted
81 if ($form = $import_form->get_data()) {
86 // work out if this is an uploaded file
87 // or one from the filesarea.
88 $realfilename = $import_form->get_new_filename('newfile');
90 $importfile = "{$CFG->tempdir}/questionimport/{$realfilename}";
91 make_temp_directory('questionimport');
92 if (!$result = $import_form->save_file('newfile', $importfile, true)) {
93 throw new moodle_exception('uploadproblem');
96 $formatfile = 'format/' . $form->format
. '/format.php';
97 if (!is_readable($formatfile)) {
98 throw new moodle_exception('formatnotfound', 'question', '', $form->format
);
101 require_once($formatfile);
103 $classname = 'qformat_' . $form->format
;
104 $qformat = new $classname();
106 // load data into class
107 $qformat->setCategory($category);
108 $qformat->setContexts($contexts->having_one_edit_tab_cap('import'));
109 $qformat->setCourse($COURSE);
110 $qformat->setFilename($importfile);
111 $qformat->setRealfilename($realfilename);
112 $qformat->setMatchgrades($form->matchgrades
);
113 $qformat->setCatfromfile(!empty($form->catfromfile
));
114 $qformat->setContextfromfile(!empty($form->contextfromfile
));
115 $qformat->setStoponerror($form->stoponerror
);
117 // Do anything before that we need to
118 if (!$qformat->importpreprocess()) {
119 print_error('cannotimport', '', $thispageurl->out());
122 // Process the uploaded file
123 if (!$qformat->importprocess()) {
124 print_error('cannotimport', '', $thispageurl->out());
127 // In case anything needs to be done after
128 if (!$qformat->importpostprocess()) {
129 print_error('cannotimport', '', $thispageurl->out());
132 // Log the import into this category.
134 'contextid' => $qformat->category
->contextid
,
135 'other' => ['format' => $form->format
, 'categoryid' => $qformat->category
->id
],
137 $event = \core\event\questions_imported
::create($eventparams);
140 $params = $thispageurl->params() +
array(
141 'category' => $qformat->category
->id
. ',' . $qformat->category
->contextid
);
142 echo $OUTPUT->continue_button(new moodle_url('edit.php', $params));
143 echo $OUTPUT->footer();
147 echo $OUTPUT->heading_with_help($txt->importquestions
, 'importquestions', 'question');
149 /// Print upload form
150 $import_form->display();
151 echo $OUTPUT->footer();