question/export.php

   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(dirname(__FILE__) . '/../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 $export_form = new question_export_form($thispageurl,
  48         array('contexts' => $contexts->having_one_edit_tab_cap('export'), 'defaultcategory' => $pagevars['cat']));
  49
  50
  51 if ($from_form = $export_form->get_data()) {
  52     $thiscontext = $contexts->lowest();
  53     if (!is_readable("format/$from_form->format/format.php")) {
  54         print_error('unknowformat', '', '', $from_form->format);
  55     }
  56     $withcategories = 'nocategories';
  57     if (!empty($from_form->cattofile)) {
  58         $withcategories = 'withcategories';
  59     }
  60     $withcontexts = 'nocontexts';
  61     if (!empty($from_form->contexttofile)) {
  62         $withcontexts = 'withcontexts';
  63     }
  64
  65     $classname = 'qformat_' . $from_form->format;
  66     $qformat = new $classname();
  67     $filename = question_default_export_filename($COURSE, $category) .
  68             $qformat->export_file_extension();
  69     $export_url = question_make_export_url($thiscontext->id, $category->id,
  70             $from_form->format, $withcategories, $withcontexts, $filename);
  71
  72     echo $OUTPUT->box_start();
  73     echo get_string('yourfileshoulddownload', 'question', $export_url->out());
  74     echo $OUTPUT->box_end();
  75
  76     $PAGE->requires->js_function_call('document.location.replace', array($export_url->out(false)), false, 1);
  77
  78     echo $OUTPUT->continue_button(new moodle_url('edit.php', $thispageurl->params()));
  79     echo $OUTPUT->footer();
  80     exit;
  81 }
  82
  83 /// Display export form
  84 echo $OUTPUT->heading_with_help($strexportquestions, 'exportquestions', 'question');
  85
  86 $export_form->display();
  87
  88 echo $OUTPUT->footer();