questiontype.php 4.39 KB
Newer Older
1
<?php
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

17
/**
18
19
 * Question type class for the short answer question type.
 *
20
21
22
23
 * @package    qtype
 * @subpackage shortanswer
 * @copyright  1999 onwards Martin Dougiamas  {@link http://moodle.com}
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
tjhunt's avatar
tjhunt committed
24
 */
25
26


27
28
defined('MOODLE_INTERNAL') || die();

29
30
31
require_once($CFG->libdir . '/questionlib.php');
require_once($CFG->dirroot . '/question/engine/lib.php');
require_once($CFG->dirroot . '/question/type/shortanswer/question.php');
32

33

34
35
36
/**
 * The short answer question type.
 *
37
38
 * @copyright  1999 onwards Martin Dougiamas  {@link http://moodle.com}
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
39
40
41
 */
class qtype_shortanswer extends question_type {
    public function extra_question_fields() {
42
        return array('qtype_shortanswer_options', 'usecase');
43
44
    }

45
    public function move_files($questionid, $oldcontextid, $newcontextid) {
46
47
        parent::move_files($questionid, $oldcontextid, $newcontextid);
        $this->move_files_in_answers($questionid, $oldcontextid, $newcontextid);
48
        $this->move_files_in_hints($questionid, $oldcontextid, $newcontextid);
49
50
    }

51
52
53
    protected function delete_files($questionid, $contextid) {
        parent::delete_files($questionid, $contextid);
        $this->delete_files_in_answers($questionid, $contextid);
54
        $this->delete_files_in_hints($questionid, $contextid);
55
56
    }

57
58
59
60
61
    public function save_defaults_for_new_questions(stdClass $fromform): void {
        parent::save_defaults_for_new_questions($fromform);
        $this->set_default_value('usecase', $fromform->usecase);
    }

62
    public function save_question_options($question) {
63
        global $DB;
64
        $result = new stdClass();
65

66
        // Perform sanity checks on fractional grades.
67
        $maxfraction = -1;
68
        foreach ($question->answer as $key => $answerdata) {
69
70
71
            if ($question->fraction[$key] > $maxfraction) {
                $maxfraction = $question->fraction[$key];
            }
72
73
        }

74
75
76
        if ($maxfraction != 1) {
            $result->error = get_string('fractionsnomax', 'question', $maxfraction * 100);
            return $result;
77
78
        }

79
        parent::save_question_options($question);
80

81
        $this->save_question_answers($question);
82

83
        $this->save_hints($question);
84
85
    }

86
87
88
89
90
91
    protected function fill_answer_fields($answer, $questiondata, $key, $context) {
        $answer = parent::fill_answer_fields($answer, $questiondata, $key, $context);
        $answer->answer = trim($answer->answer);
        return $answer;
    }

92
93
94
    protected function initialise_question_instance(question_definition $question, $questiondata) {
        parent::initialise_question_instance($question, $questiondata);
        $this->initialise_question_answers($question, $questiondata);
95
    }
96

97
98
99
    public function get_random_guess_score($questiondata) {
        foreach ($questiondata->options->answers as $aid => $answer) {
            if ('*' == trim($answer->answer)) {
100
101
102
103
104
                return $answer->fraction;
            }
        }
        return 0;
    }
105

106
107
    public function get_possible_responses($questiondata) {
        $responses = array();
108

109
        $starfound = false;
110
111
112
        foreach ($questiondata->options->answers as $aid => $answer) {
            $responses[$aid] = new question_possible_response($answer->answer,
                    $answer->fraction);
113
114
115
116
117
118
119
120
            if ($answer->answer === '*') {
                $starfound = true;
            }
        }

        if (!$starfound) {
            $responses[0] = new question_possible_response(
                    get_string('didnotmatchanyanswer', 'question'), 0);
121
        }
122

123
        $responses[null] = question_possible_response::no_response();
124

125
        return array($questiondata->id => $responses);
126
    }
127
}