See Release Notes
Long Term Support Release
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. 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 17 /** 18 * Defines the import questions form. 19 * 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 26 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'); 31 32 list($thispageurl, $contexts, $cmid, $cm, $module, $pagevars) = 33 question_edit_setup('import', '/question/import.php'); 34 35 // get display strings 36 $txt = new stdClass(); 37 $txt->importerror = get_string('importerror', 'question'); 38 $txt->importquestions = get_string('importquestions', 'question'); 39 40 list($catid, $catcontext) = explode(',', $pagevars['cat']); 41 if (!$category = $DB->get_record("question_categories", array('id' => $catid))) { 42 print_error('nocategory', 'question'); 43 } 44 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); 57 } 58 $contexts->require_one_edit_tab_cap($edittab); 59 } 60 61 $PAGE->set_url($thispageurl); 62 63 $import_form = new question_import_form($thispageurl, array('contexts'=>$contexts->having_one_edit_tab_cap('import'), 64 'defaultcategory'=>$pagevars['cat'])); 65 66 if ($import_form->is_cancelled()){ 67 redirect($thispageurl); 68 } 69 //========== 70 // PAGE HEADER 71 //========== 72 $PAGE->set_title($txt->importquestions); 73 $PAGE->set_heading($COURSE->fullname); 74 echo $OUTPUT->header(); 75 76 // Print horizontal nav if needed. 77 $renderer = $PAGE->get_renderer('core_question', 'bank'); 78 echo $renderer->extra_horizontal_navigation(); 79 80 // file upload form sumitted 81 if ($form = $import_form->get_data()) { 82 83 // file checks out ok 84 $fileisgood = false; 85 86 // work out if this is an uploaded file 87 // or one from the filesarea. 88 $realfilename = $import_form->get_new_filename('newfile'); 89 $importfile = make_request_directory() . "/{$realfilename}"; 90 if (!$result = $import_form->save_file('newfile', $importfile, true)) { 91 throw new moodle_exception('uploadproblem'); 92 } 93 94 $formatfile = 'format/' . $form->format . '/format.php'; 95 if (!is_readable($formatfile)) { 96 throw new moodle_exception('formatnotfound', 'question', '', $form->format); 97 } 98 99 require_once($formatfile); 100 101 $classname = 'qformat_' . $form->format; 102 $qformat = new $classname(); 103 104 // load data into class 105 $qformat->setCategory($category); 106 $qformat->setContexts($contexts->having_one_edit_tab_cap('import')); 107 $qformat->setCourse($COURSE); 108 $qformat->setFilename($importfile); 109 $qformat->setRealfilename($realfilename); 110 $qformat->setMatchgrades($form->matchgrades); 111 $qformat->setCatfromfile(!empty($form->catfromfile)); 112 $qformat->setContextfromfile(!empty($form->contextfromfile)); 113 $qformat->setStoponerror($form->stoponerror); 114 115 // Do anything before that we need to 116 if (!$qformat->importpreprocess()) { 117 print_error('cannotimport', '', $thispageurl->out()); 118 } 119 120 // Process the uploaded file 121 if (!$qformat->importprocess()) { 122 print_error('cannotimport', '', $thispageurl->out()); 123 } 124 125 // In case anything needs to be done after 126 if (!$qformat->importpostprocess()) { 127 print_error('cannotimport', '', $thispageurl->out()); 128 } 129 130 // Log the import into this category. 131 $eventparams = [ 132 'contextid' => $qformat->category->contextid, 133 'other' => ['format' => $form->format, 'categoryid' => $qformat->category->id], 134 ]; 135 $event = \core\event\questions_imported::create($eventparams); 136 $event->trigger(); 137 138 $params = $thispageurl->params() + array( 139 'category' => $qformat->category->id . ',' . $qformat->category->contextid); 140 echo $OUTPUT->continue_button(new moodle_url('edit.php', $params)); 141 echo $OUTPUT->footer(); 142 exit; 143 } 144 145 echo $OUTPUT->heading_with_help($txt->importquestions, 'importquestions', 'question'); 146 147 /// Print upload form 148 $import_form->display(); 149 echo $OUTPUT->footer();
title
Description
Body
title
Description
Body
title
Description
Body
title
Body