Rev 1 | AutorÃa | Comparar con el anterior | Ultima modificación | Ver Log |
<?php// 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/>./*** Test helpers for the calculated question type.** @package qtype* @subpackage calculated* @copyright 2011 The Open University* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*/defined('MOODLE_INTERNAL') || die();global $CFG;require_once($CFG->dirroot . '/question/type/calculated/question.php');require_once($CFG->dirroot . '/question/type/numerical/question.php');require_once($CFG->dirroot . '/question/type/numerical/questiontype.php');require_once($CFG->dirroot . '/question/engine/tests/helpers.php');/*** Test helper class for the calculated question type.** @copyright 2011 The Open University* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*/class qtype_calculated_test_helper extends question_test_helper {public function get_test_questions() {return ['sum', 'mult'];}/*** Makes a calculated question about summing two numbers.* @return qtype_calculated_question*/public function make_calculated_question_sum() {question_bank::load_question_definition_classes('calculated');$q = new qtype_calculated_question();test_question_maker::initialise_a_question($q);$q->name = 'Simple sum';$q->questiontext = 'What is {a} + {b}?';$q->generalfeedback = 'Generalfeedback: {={a} + {b}} is the right answer.';$q->answers = [13 => new \qtype_calculated\qtype_calculated_answer(13, '{a} + {b}', 1.0, 'Very good.', FORMAT_HTML, 0),14 => new \qtype_calculated\qtype_calculated_answer(14, '{a} - {b}', 0.0, 'Add. not subtract!.', FORMAT_HTML, 0),17 => new \qtype_calculated\qtype_calculated_answer(17, '*', 0.0, 'Completely wrong.', FORMAT_HTML, 0),];foreach ($q->answers as $answer) {$answer->correctanswerlength = 2;$answer->correctanswerformat = 1;}$q->qtype = question_bank::get_qtype('calculated');$q->unitdisplay = qtype_numerical::UNITNONE;$q->unitgradingtype = 0;$q->unitpenalty = 0;$q->ap = new qtype_numerical_answer_processor([]);$q->synchronised = false;$q->datasetloader = new qtype_calculated_test_dataset_loader(0, [['a' => 1, 'b' => 5],['a' => 3, 'b' => 4],['a' => 3, 'b' => 0.01416],['a' => 31, 'b' => 0.01416],]);return $q;}/*** Makes a calculated question about summing two numbers.* @return qtype_calculated_question*/public function get_calculated_question_data_sum() {question_bank::load_question_definition_classes('calculated');$qdata = new stdClass();test_question_maker::initialise_question_data($qdata);$qdata->qtype = 'calculated';$qdata->name = 'Simple sum';$qdata->questiontext = 'What is {a} + {b}?';$qdata->generalfeedback = 'Generalfeedback: {={a} + {b}} is the right answer.';$qdata->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_READY;$qdata->options = new stdClass();$qdata->options->unitgradingtype = 0;$qdata->options->unitpenalty = 0.0;$qdata->options->showunits = qtype_numerical::UNITNONE;$qdata->options->unitsleft = 0;$qdata->options->synchronize = 0;$qdata->options->answers = [13 => new \qtype_calculated\qtype_calculated_answer(13, '{a} + {b}', 1.0, 'Very good.', FORMAT_HTML, 0.001),14 => new \qtype_calculated\qtype_calculated_answer(14, '{a} - {b}', 0.0, 'Add. not subtract!.', FORMAT_HTML, 0.001),17 => new \qtype_calculated\qtype_calculated_answer(17, '*', 0.0, 'Completely wrong.', FORMAT_HTML, 0),];foreach ($qdata->options->answers as $answer) {$answer->correctanswerlength = 2;$answer->correctanswerformat = 1;}$qdata->options->units = [];return $qdata;}/*** Makes a calculated question about summing two numbers.* @return qtype_calculated_question*/public function get_calculated_question_form_data_sum() {question_bank::load_question_definition_classes('calculated');$fromform = new stdClass();$fromform->name = 'Simple sum';$fromform->questiontext = 'What is {a} + {b}?';$fromform->defaultmark = 1.0;$fromform->generalfeedback = 'Generalfeedback: {={a} + {b}} is the right answer.';$fromform->unitrole = '0';$fromform->unitpenalty = 0.1;$fromform->unitgradingtypes = '1';$fromform->unitsleft = '0';$fromform->nounits = 1;$fromform->multiplier = [];$fromform->multiplier[0] = '1.0';$fromform->synchronize = 0;$fromform->answernumbering = 0;$fromform->shuffleanswers = 0;$fromform->noanswers = 6;$fromform->answer = [];$fromform->answer[0] = '{a} + {b}';$fromform->answer[1] = '{a} - {b}';$fromform->answer[2] = '*';$fromform->fraction = [];$fromform->fraction[0] = '1.0';$fromform->fraction[1] = '0.0';$fromform->fraction[2] = '0.0';$fromform->tolerance = [];$fromform->tolerance[0] = 0.001;$fromform->tolerance[1] = 0.001;$fromform->tolerance[2] = 0;$fromform->tolerancetype[0] = 1;$fromform->tolerancetype[1] = 1;$fromform->tolerancetype[2] = 1;$fromform->correctanswerlength[0] = 2;$fromform->correctanswerlength[1] = 2;$fromform->correctanswerlength[2] = 2;$fromform->correctanswerformat[0] = 1;$fromform->correctanswerformat[1] = 1;$fromform->correctanswerformat[2] = 1;$fromform->feedback = [];$fromform->feedback[0] = [];$fromform->feedback[0]['format'] = FORMAT_HTML;$fromform->feedback[0]['text'] = 'Very good.';$fromform->feedback[1] = [];$fromform->feedback[1]['format'] = FORMAT_HTML;$fromform->feedback[1]['text'] = 'Add. not subtract!';$fromform->feedback[2] = [];$fromform->feedback[2]['format'] = FORMAT_HTML;$fromform->feedback[2]['text'] = 'Completely wrong.';$fromform->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_READY;$fromform->hint = [['text' => 'Add','format' => FORMAT_HTML,],];$fromform->unit = ['x',];$fromform->multiplier = ['1.0',];return $fromform;}/*** Makes a calculated question about multiplying two numbers.** @return qtype_calculated_question* @throws coding_exception*/public function make_calculated_question_mult() {question_bank::load_question_definition_classes('calculated');$q = new qtype_calculated_question();test_question_maker::initialise_a_question($q);$q->name = 'Simple multiplication';$q->questiontext = 'What is {a} * {b}?';$q->generalfeedback = 'Generalfeedback: {={a} * {b}} is the right answer.';$q->answers = [13 => new \qtype_calculated\qtype_calculated_answer(13, '{a} * {b}', 1.0, 'Positive.', FORMAT_HTML, 0),14 => new \qtype_calculated\qtype_calculated_answer(14, '-{a} * {b}', 0.0, 'Negative.', FORMAT_HTML, 0),];foreach ($q->answers as $answer) {$answer->correctanswerlength = 2;$answer->correctanswerformat = 1;}$q->qtype = question_bank::get_qtype('calculated');$q->unitdisplay = qtype_numerical::UNITOPTIONAL;$q->unitgradingtype = 0;$q->unitpenalty = 0;$q->unit = 'cm';$q->ap = new qtype_numerical_answer_processor([]);$q->synchronised = false;$q->datasetloader = new qtype_calculated_test_dataset_loader(0, [['a' => 1, 'b' => 5],['a' => 3, 'b' => 4],['a' => 3, 'b' => 0.01416],['a' => 31, 'b' => 0.01416],]);return $q;}/*** Makes a calculated question about multiplying two numbers.** @return qtype_calculated_question* @throws coding_exception*/public function get_calculated_question_data_mult() {question_bank::load_question_definition_classes('calculated');$qdata = new stdClass();test_question_maker::initialise_question_data($qdata);$qdata->qtype = 'calculated';$qdata->name = 'Simple multiplication';$qdata->questiontext = 'What is {a} * {b}?';$qdata->generalfeedback = 'Generalfeedback: {={a} * {b}} is the right answer.';$qdata->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_READY;$qdata->options = new stdClass();$qdata->options->unitgradingtype = 0;$qdata->options->unitpenalty = 0.0;$qdata->options->showunits = qtype_numerical::UNITOPTIONAL;$qdata->unit = 'cm';$qdata->options->unitsleft = 0;$qdata->options->synchronize = 0;$qdata->options->answers = [13 => new \qtype_calculated\qtype_calculated_answer(13, '{a} * {b}', 1.0, 'Positive.', FORMAT_HTML, 0.001),14 => new \qtype_calculated\qtype_calculated_answer(14, '-{a} * {b}', 0.0, 'Negative.', FORMAT_HTML, 0.001),];foreach ($qdata->options->answers as $answer) {$answer->correctanswerlength = 2;$answer->correctanswerformat = 1;}$qdata->options->units = [];return $qdata;}/*** Makes a calculated question about multiplying two numbers.** @return qtype_calculated_question* @throws coding_exception*/public function get_calculated_question_form_data_mult() {question_bank::load_question_definition_classes('calculated');$fromform = new stdClass();$fromform->name = 'Simple multiplication';$fromform->questiontext = 'What is {a} * {b}?';$fromform->defaultmark = 1.0;$fromform->generalfeedback = 'Generalfeedback: {={a} * {b}} is the right answer.';$fromform->unitrole = '0';$fromform->unitpenalty = 0.1;$fromform->unitgradingtypes = '1';$fromform->unitsleft = '0';$fromform->nounits = 1;$fromform->multiplier = [];$fromform->multiplier[0] = '1.0';$fromform->synchronize = 0;$fromform->answernumbering = 0;$fromform->shuffleanswers = 0;$fromform->noanswers = 6;$fromform->answer = [];$fromform->answer[0] = '{a} * {b}';$fromform->answer[1] = '-{a} * {b}';$fromform->fraction = [];$fromform->fraction[0] = '1.0';$fromform->fraction[1] = '0.0';$fromform->tolerance = [];$fromform->tolerance[0] = 0.001;$fromform->tolerance[1] = 0.001;$fromform->tolerancetype[0] = 1;$fromform->tolerancetype[1] = 1;$fromform->correctanswerlength[0] = 2;$fromform->correctanswerlength[1] = 2;$fromform->correctanswerformat[0] = 1;$fromform->correctanswerformat[1] = 1;$fromform->feedback = [];$fromform->feedback[0] = [];$fromform->feedback[0]['format'] = FORMAT_HTML;$fromform->feedback[0]['text'] = 'Positive.';$fromform->feedback[1] = [];$fromform->feedback[1]['format'] = FORMAT_HTML;$fromform->feedback[1]['text'] = 'Negative.';$fromform->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_READY;return $fromform;}}/*** Test implementation of {@link qtype_calculated_dataset_loader}. Gets the values* from an array passed to the constructor, rather than querying the database.** @copyright 2011 The Open University* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*/class qtype_calculated_test_dataset_loader extends qtype_calculated_dataset_loader {protected $valuesets;protected $aresynchronised = [];public function __construct($questionid, array $valuesets) {parent::__construct($questionid);$this->valuesets = $valuesets;}public function get_number_of_items() {return count($this->valuesets);}public function load_values($itemnumber) {return $this->valuesets[$itemnumber - 1];}public function datasets_are_synchronised($category) {return !empty($this->aresynchronised[$category]);}/*** Allows the test to mock the return value of {@link datasets_are_synchronised()}.* @param int $category* @param bool $aresychronised*/public function set_are_synchronised($category, $aresychronised) {$this->aresynchronised[$category] = $aresychronised;}}