weekly release 2.3dev
[moodle.git] / question / export.php
CommitLineData
aeb15530 1<?php
d3603157
TH
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
aca318e1 17/**
d3603157 18 * Script for importing questions into the question bank.
4323d029 19 *
d3603157
TH
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
4323d029 24 */
aca318e1 25
aca318e1 26
d3603157
TH
27require_once(dirname(__FILE__) . '/../config.php');
28require_once($CFG->dirroot . '/question/editlib.php');
29require_once($CFG->dirroot . '/question/export_form.php');
44a7f384 30require_once($CFG->dirroot . '/question/format.php');
56ed242b 31
d3603157
TH
32list($thispageurl, $contexts, $cmid, $cm, $module, $pagevars) =
33 question_edit_setup('export', '/question/export.php');
0c1e3a14 34
d3603157
TH
35// get display strings
36$strexportquestions = get_string('exportquestions', 'question');
aca318e1 37
d3603157 38list($catid, $catcontext) = explode(',', $pagevars['cat']);
5e8a85aa 39$category = $DB->get_record('question_categories', array("id" => $catid, 'contextid' => $catcontext), '*', MUST_EXIST);
d3603157
TH
40
41/// Header
f19ed874 42$PAGE->set_url($thispageurl);
d3603157
TH
43$PAGE->set_title($strexportquestions);
44$PAGE->set_heading($COURSE->fullname);
45echo $OUTPUT->header();
46
47$export_form = new question_export_form($thispageurl, array('contexts'=>$contexts->having_one_edit_tab_cap('export'), 'defaultcategory'=>$pagevars['cat']));
22afe6d6 48
d3603157
TH
49
50if ($from_form = $export_form->get_data()) {
51 $thiscontext = $contexts->lowest();
52 if (!is_readable("format/$from_form->format/format.php")) {
53 print_error('unknowformat', '', '', $from_form->format);
54 }
55 $withcategories = 'nocategories';
56 if (!empty($from_form->cattofile)) {
57 $withcategories = 'withcategories';
aca318e1 58 }
d3603157
TH
59 $withcontexts = 'nocontexts';
60 if (!empty($from_form->contexttofile)) {
61 $withcontexts = 'withcontexts';
62 }
63
64 $classname = 'qformat_' . $from_form->format;
65 $qformat = new $classname();
66 $filename = question_default_export_filename($COURSE, $category) .
67 $qformat->export_file_extension();
68 $export_url = question_make_export_url($thiscontext->id, $category->id,
69 $from_form->format, $withcategories, $withcontexts, $filename);
aca318e1 70
d3603157
TH
71 echo $OUTPUT->box_start();
72 echo get_string('yourfileshoulddownload', 'question', $export_url->out());
73 echo $OUTPUT->box_end();
aca318e1 74
d3603157 75 $PAGE->requires->js_function_call('document.location.replace', array($export_url->out()), false, 1);
271e6dec 76
d3603157 77 echo $OUTPUT->continue_button(new moodle_url('edit.php', $thispageurl->params()));
9b59580b 78 echo $OUTPUT->footer();
d3603157
TH
79 exit;
80}
81
82/// Display export form
83echo $OUTPUT->heading_with_help($strexportquestions, 'exportquestions', 'question');
84
85$export_form->display();
86
87echo $OUTPUT->footer();