Search moodle.org's
Developer Documentation

See Release Notes

  • Bug fixes for general core bugs in 3.11.x will end 14 Nov 2022 (12 months plus 6 months extension).
  • Bug fixes for security issues in 3.11.x will end 13 Nov 2023 (18 months plus 12 months extension).
  • PHP version: minimum PHP 7.3.0 Note: minimum PHP version has increased since Moodle 3.10. PHP 7.4.x is supported too.
   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   * Script for importing questions into the question bank.
  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/export_form.php');
  30  require_once($CFG->dirroot . '/question/format.php');
  31  
  32  list($thispageurl, $contexts, $cmid, $cm, $module, $pagevars) =
  33          question_edit_setup('export', '/question/export.php');
  34  
  35  // get display strings
  36  $strexportquestions = get_string('exportquestions', 'question');
  37  
  38  list($catid, $catcontext) = explode(',', $pagevars['cat']);
  39  $category = $DB->get_record('question_categories', array("id" => $catid, 'contextid' => $catcontext), '*', MUST_EXIST);
  40  
  41  /// Header
  42  $PAGE->set_url($thispageurl);
  43  $PAGE->set_title($strexportquestions);
  44  $PAGE->set_heading($COURSE->fullname);
  45  echo $OUTPUT->header();
  46  
  47  // Print horizontal nav if needed.
  48  $renderer = $PAGE->get_renderer('core_question', 'bank');
  49  echo $renderer->extra_horizontal_navigation();
  50  
  51  $export_form = new question_export_form($thispageurl,
  52          array('contexts' => $contexts->having_one_edit_tab_cap('export'), 'defaultcategory' => $pagevars['cat']));
  53  
  54  
  55  if ($from_form = $export_form->get_data()) {
  56      $thiscontext = $contexts->lowest();
  57      if (!is_readable("format/{$from_form->format}/format.php")) {
  58          print_error('unknowformat', '', '', $from_form->format);
  59      }
  60      $withcategories = 'nocategories';
  61      if (!empty($from_form->cattofile)) {
  62          $withcategories = 'withcategories';
  63      }
  64      $withcontexts = 'nocontexts';
  65      if (!empty($from_form->contexttofile)) {
  66          $withcontexts = 'withcontexts';
  67      }
  68  
  69      $classname = 'qformat_' . $from_form->format;
  70      $qformat = new $classname();
  71      $filename = question_default_export_filename($COURSE, $category) .
  72              $qformat->export_file_extension();
  73      $export_url = question_make_export_url($thiscontext->id, $category->id,
  74              $from_form->format, $withcategories, $withcontexts, $filename);
  75  
  76      echo $OUTPUT->box_start();
  77      echo get_string('yourfileshoulddownload', 'question', $export_url->out());
  78      echo $OUTPUT->box_end();
  79  
  80      // Log the export of these questions.
  81      $eventparams = [
  82              'contextid' => $category->contextid,
  83              'other' => ['format' => $from_form->format, 'categoryid' => $category->id],
  84      ];
  85      $event = \core\event\questions_exported::create($eventparams);
  86      $event->trigger();
  87  
  88      // Don't allow force download for behat site, as pop-up can't be handled by selenium.
  89      if (!defined('BEHAT_SITE_RUNNING')) {
  90          $PAGE->requires->js_function_call('document.location.replace', array($export_url->out(false)), false, 1);
  91      }
  92  
  93      echo $OUTPUT->continue_button(new moodle_url('edit.php', $thispageurl->params()));
  94      echo $OUTPUT->footer();
  95      exit;
  96  }
  97  
  98  /// Display export form
  99  echo $OUTPUT->heading_with_help($strexportquestions, 'exportquestions', 'question');
 100  
 101  $export_form->display();
 102  
 103  echo $OUTPUT->footer();