Search moodle.org's
Developer Documentation

See Release Notes
Long Term Support Release

  • Bug fixes for general core bugs in 4.1.x will end 13 November 2023 (12 months).
  • Bug fixes for security issues in 4.1.x will end 10 November 2025 (36 months).
  • PHP version: minimum PHP 7.4.0 Note: minimum PHP version has increased since Moodle 4.0. PHP 8.0.x is supported too.
<?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 Moodle Aiken format.
 *
 * @package    qformat_aiken
 * @copyright  2018 Eric Merrill (eric.a.merrill@gmail.com)
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */


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

global $CFG;
require_once($CFG->libdir . '/questionlib.php');
require_once($CFG->dirroot . '/question/format.php');
require_once($CFG->dirroot . '/question/format/aiken/format.php');
require_once($CFG->dirroot . '/question/engine/tests/helpers.php');


/**
 * Unit tests for the matching question definition class.
 *
 * @copyright  2018 Eric Merrill (eric.a.merrill@gmail.com)
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */
class aikenformat_test extends question_testcase {
    public function test_readquestions() {
        global $CFG;

        $lines = file($CFG->dirroot.'/question/format/aiken/tests/fixtures/aiken_errors.txt');
        $importer = new qformat_aiken($lines);

        // The importer echos some errors, so we need to capture and check that.
        ob_start();
        $questions = $importer->readquestions($lines);
        $output = ob_get_contents();
        ob_end_clean();

        // Check that there were some expected errors.
        $this->assertStringContainsString('Error importing question A question with too few answers', $output);
        $this->assertStringContainsString('Question must have at least 2 answers on line 3', $output);
        $this->assertStringContainsString('Question not started on line 5', $output);
        $this->assertStringContainsString('Question not started on line 7', $output);
        $this->assertStringContainsString('Error importing question A question started but not finished', $output);
        $this->assertStringContainsString('Question not completed before next question start on line 18', $output);

< // There are two expected questions. < $this->assertCount(2, $questions);
> // There are three expected questions. > $this->assertCount(3, $questions);
$q1 = null; $q2 = null;
> $q3 = null;
foreach ($questions as $question) { if ($question->name === 'A good question') { $q1 = $question; } else if ($question->name === 'A second good question') { $q2 = $question;
> } else if ($question->name === 'A third good question with HTML chars such as > < &') { } > $q3 = $question;
} // Check the first good question. $this->assertCount(2, $q1->answer); $this->assertEquals(1, $q1->fraction[0]); $this->assertEquals('Correct', $q1->answer[0]['text']); $this->assertEquals('Incorrect', $q1->answer[1]['text']); // Check the second good question. $this->assertCount(2, $q2->answer); $this->assertEquals(1, $q2->fraction[1]); $this->assertEquals('Incorrect (No space)', $q2->answer[0]['text']); $this->assertEquals('Correct (No space)', $q2->answer[1]['text']);
> } > // Check the third good question that has anwsers with special HTML chars such as <, >, and &. } > $this->assertCount(2, $q3->answer); > $this->assertEquals(1, $q3->fraction[0]); > $this->assertEquals('Correct (&lt; &gt; &amp;)', $q3->answer[0]['text']); > $this->assertEquals('Incorrect (&lt; &gt; &amp;)', $q3->answer[1]['text']);