MDL-62880 qtype_ddwtos: drop support for legacy import format
[moodle.git] / question / type / ddwtos / questiontype.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/>.
17 /**
18  * Question type class for the drag-and-drop words into sentences question type.
19  *
20  * @package   qtype_ddwtos
21  * @copyright 2009 The Open University
22  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23  */
26 defined('MOODLE_INTERNAL') || die();
28 require_once($CFG->libdir . '/questionlib.php');
29 require_once($CFG->dirroot . '/question/engine/lib.php');
30 require_once($CFG->dirroot . '/question/format/xml/format.php');
31 require_once($CFG->dirroot . '/question/type/gapselect/questiontypebase.php');
34 /**
35  * The drag-and-drop words into sentences question type class.
36  *
37  * @copyright  2009 The Open University
38  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
39  */
40 class qtype_ddwtos extends qtype_gapselect_base {
41     protected function choice_group_key() {
42         return 'draggroup';
43     }
45     protected function choice_options_to_feedback($choice) {
46         $output = new stdClass();
47         $output->draggroup = $choice['choicegroup'];
48         $output->infinite = !empty($choice['infinite']);
49         return serialize($output);
50     }
52     protected function feedback_to_choice_options($feedback) {
53         $feedbackobj = unserialize($feedback);
54         return array('draggroup' => $feedbackobj->draggroup, 'infinite' => $feedbackobj->infinite);
55     }
57     protected function make_choice($choicedata) {
58         $options = unserialize($choicedata->feedback);
59         return new qtype_ddwtos_choice(
60                 $choicedata->answer, $options->draggroup, $options->infinite);
61     }
63     public function import_from_xml($data, $question, qformat_xml $format, $extra=null) {
64         if (!isset($data['@']['type']) || $data['@']['type'] != 'ddwtos') {
65             return false;
66         }
68         $question = $format->import_headers($data);
69         $question->qtype = 'ddwtos';
71         $question->shuffleanswers = $format->trans_single(
72                 $format->getpath($data, array('#', 'shuffleanswers', 0, '#'), 1));
74         // Import the choices.
75         $question->answer = array();
76         $question->draggroup = array();
77         $question->infinite = array();
79         foreach ($data['#']['dragbox'] as $dragboxxml) {
80             $question->choices[] = array(
81                 'answer' => $format->getpath($dragboxxml, array('#', 'text', 0, '#'), '', true),
82                 'choicegroup' => $format->getpath($dragboxxml, array('#', 'group', 0, '#'), 1),
83                 'infinite' => array_key_exists('infinite', $dragboxxml['#']),
84             );
85         }
87         $format->import_combined_feedback($question, $data, true);
88         $format->import_hints($question, $data, true, false,
89                 $format->get_format($question->questiontextformat));
91         return $question;
92     }
94     public function export_to_xml($question, qformat_xml $format, $extra = null) {
95         $output = '';
97         $output .= '    <shuffleanswers>' . $question->options->shuffleanswers .
98                 "</shuffleanswers>\n";
100         $output .= $format->write_combined_feedback($question->options,
101                                                     $question->id,
102                                                     $question->contextid);
104         foreach ($question->options->answers as $answer) {
105             $options = unserialize($answer->feedback);
107             $output .= "    <dragbox>\n";
108             $output .= $format->writetext($answer->answer, 3);
109             $output .= "      <group>{$options->draggroup}</group>\n";
110             if ($options->infinite) {
111                 $output .= "      <infinite/>\n";
112             }
113             $output .= "    </dragbox>\n";
114         }
116         return $output;
117     }