First phpunit tests

2 files changed, 263 insertions, 0 deletions

diff --git a/tests/helper.php b/tests/helper.php
new file mode 100644
index 0000000..98f5dd6
--- /dev/null
+++ b/tests/helper.php
@@ -0,0 +1,153 @@
+<?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 algebra question type.
+ *
+ * @package    qtype_algebra
+ * @copyright  2017 Jean-Michel Vedrine
+ * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+
+defined('MOODLE_INTERNAL') || die();
+
+/**
+ * Test helper class for the algebra question type.
+ *
+ * @copyright  2017 Jean-Michel Vedrine
+ * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class qtype_algebra_test_helper extends question_test_helper {
+    public function get_test_questions() {
+        return array('simplemath', 'derive');
+    }
+
+    /**
+     * Makes a algebra question with correct ansewer 7 and defaultmark 1.
+     * This question also has no variables.
+     * @return qtype_algebra_question
+     */
+    public function make_algebra_question_simplemath() {
+        question_bank::load_question_definition_classes('algebra');
+        $q = new qtype_algebra_question();
+        test_question_maker::initialise_a_question($q);
+        $q->name = 'Algebra question';
+        $q->questiontext = 'Calculate 4 + 3';
+        $q->generalfeedback = 'Generalfeedback: 4 + 3 = 7.';
+        $q->compareby = 'eval';
+        $q->nchecks = 10;
+        $q->tolerance = 0.001;
+        $q->usecase = false;
+        $q->answers = array(
+            13 => new question_answer(13, '7', 1.0, '7 is a very good answer.', FORMAT_HTML),
+        );
+        $q->variables = array();
+        $q->qtype = question_bank::get_qtype('algebra');
+        return $q;
+    }
+
+    /**
+     * Gets the question data for a algebra question with with correct
+     * ansewer 7 and defaultmark 1.
+     * This question also has no variables.
+     * @return stdClass
+     */
+    public function get_algebra_question_data_simplemath() {
+        $qdata = new stdClass();
+        test_question_maker::initialise_question_data($qdata);
+
+        $qdata->qtype = 'algebra';
+        $qdata->name = 'Algebra question';
+        $qdata->questiontext = 'Calculate 4 + 3';
+        $qdata->generalfeedback = 'Generalfeedback: 4 + 3 = 7.';
+
+        $qdata->options = new stdClass();
+        $qdata->options->compareby = 'eval';
+        $qdata->options->nchecks = 10;
+        $qdata->options->tolerance = 0.001;
+        $qdata->options->answers = array(
+            13 => new question_answer(13, '7', 1.0, '7 is a very good answer.', FORMAT_HTML),
+        );
+        $qdata->options->variables = array();
+
+        return $qdata;
+    }
+
+    /**
+     * Gets the question form data for a algebra question with with correct
+     * answer 'frog', partially correct answer 'toad' and defaultmark 1.
+     * This question also has a '*' match anything answer.
+     * @return stdClass
+     */
+    public function get_algebra_question_form_data_simplemath() {
+        $form = new stdClass();
+
+        $form->name = 'Algebra question';
+        $form->questiontext = array('text' => 'Calculate 4 + 3', 'format' => FORMAT_HTML);
+        $form->defaultmark = 1.0;
+        $form->generalfeedback = array('text' => 'Generalfeedback: 4 + 3 = 7.', 'format' => FORMAT_HTML);
+        $form->answer = array('7');
+        $form->fraction = array('1.0');
+        $form->feedback = array(
+            array('text' => '7 is a very good answer.', 'format' => FORMAT_HTML),
+        );
+
+        return $form;
+    }
+
+    /**
+     * Makes a algebra question with just the correct ansewer 'frog', and
+     * no other answer matching.
+     * @return qtype_algebra_question
+     */
+    public function make_algebra_question_derive() {
+        question_bank::load_question_definition_classes('algebra');
+        $q = new qtype_algebra_question();
+        test_question_maker::initialise_a_question($q);
+        $q->name = 'Algebra question';
+        $q->questiontext = 'What is the derivative of the function \(f(x) = x^2\) ?';
+        $q->generalfeedback = 'Generalfeedback: 2*x is the correct answer.';
+        $q->answers = array(
+            13 => new question_answer(13, '2*x', 1.0, 'Correct.', FORMAT_HTML),
+        );
+        $q->qtype = question_bank::get_qtype('algebra');
+
+        return $q;
+    }
+
+    /**
+     * Gets the question data for a algebra questionwith just the correct
+     * ansewer 'frog', and no other answer matching.
+     * @return stdClass
+     */
+    public function get_algebra_question_data_derive() {
+        $qdata = new stdClass();
+        test_question_maker::initialise_question_data($qdata);
+
+        $qdata->qtype = 'algebra';
+        $qdata->name = 'Algebra question';
+        $qdata->questiontext = 'Name the best amphibian: __________';
+        $qdata->generalfeedback = 'Generalfeedback: you should have said frog.';
+
+        $qdata->options = new stdClass();
+        $qdata->options->usecase = false;
+        $qdata->options->answers = array(
+            13 => new question_answer(13, 'frog', 1.0, 'Frog is right.', FORMAT_HTML),
+        );
+
+        return $qdata;
+    }
+}
diff --git a/tests/question_test.php b/tests/question_test.php
new file mode 100644
index 0000000..264b24a
--- /dev/null
+++ b/tests/question_test.php
@@ -0,0 +1,110 @@
+<?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/>.
+
+/**
+ * Unit tests for the short answer question definition class.
+ *
+ * @package    qtype_algebra
+ * @copyright  2017 Jean-Michel Vedrine
+ * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+
+
+defined('MOODLE_INTERNAL') || die();
+
+global $CFG;
+require_once($CFG->dirroot . '/question/engine/tests/helpers.php');
+require_once($CFG->dirroot . '/question/type/algebra/tests/helper.php');
+
+
+/**
+ * Unit tests for the algebra question definition class.
+ *
+ * @copyright  2017 Jean-Michel Vedrine
+ * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+
+class qtype_algebra_question_test extends advanced_testcase {
+    public function test_is_gradable_response() {
+        $question = test_question_maker::make_question('simplemath');
+
+        $this->assertFalse($question->is_gradable_response(array()));
+        $this->assertFalse($question->is_gradable_response(array('answer' => '')));
+        $this->assertTrue($question->is_gradable_response(array('answer' => '0')));
+        $this->assertTrue($question->is_gradable_response(array('answer' => '0.0')));
+        $this->assertTrue($question->is_gradable_response(array('answer' => 'x')));
+    }
+
+    public function test_grading_test0() {
+        $question = test_question_maker::make_question('simplemath');
+
+        $this->assertEquals(array(0, question_state::$gradedwrong),
+                $question->grade_response(array('answer' => 'x')));
+        $this->assertEquals(array(0, question_state::$gradedwrong),
+                $question->grade_response(array('answer' => '0')));
+        $this->assertEquals(array(0, question_state::$gradedwrong),
+                $question->grade_response(array('answer' => '5')));
+        $this->assertEquals(array(1, question_state::$gradedright),
+                $question->grade_response(array('answer' => '7')));
+    }
+
+    public function test_grading_test1() {
+        $question = test_question_maker::make_question('derive');
+
+        $this->assertEquals(array(0, question_state::$gradedwrong),
+                $question->grade_response(array('answer' => 'x')));
+        $this->assertEquals(array(0, question_state::$gradedwrong),
+                $question->grade_response(array('answer' => '0')));
+        $this->assertEquals(array(1, question_state::$gradedright),
+                $question->grade_response(array('answer' => '2*x')));
+        $this->assertEquals(array(1, question_state::$gradedright),
+                $question->grade_response(array('answer' => 'x+x')));
+    }
+    public function test_get_correct_response() {
+        $question = test_question_maker::make_question('simplemath');
+
+        $this->assertEquals(array('answer' => '2*x'),
+                $question->get_correct_response());
+    }
+
+    public function test_get_question_summary() {
+        $sa = test_question_maker::make_question('algebra');
+        $qsummary = $sa->get_question_summary();
+        $this->assertEquals('What is the derivative of the function \(f(x) = x^2\) ?', $qsummary);
+    }
+
+    public function test_summarise_response() {
+        $sa = test_question_maker::make_question('derive');
+        $summary = $sa->summarise_response(array('answer' => '2*x'));
+        $this->assertEquals('2*x', $summary);
+    }
+
+    public function test_classify_response() {
+        $sa = test_question_maker::make_question('derive');
+        $sa->start_attempt(new question_attempt_step(), 1);
+
+        $this->assertEquals(array(
+                new question_classified_response(13, '2*x', 1.0)),
+                $sa->classify_response(array('answer' => '2*x')));
+        $this->assertEquals(array(
+                new question_classified_response(15, '5*x', 0.0)),
+                $sa->classify_response(array('answer' => '5*x')));
+        $this->assertEquals(array(
+                question_classified_response::no_response()),
+                $sa->classify_response(array('answer' => '')));
+    }
+
+}