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.

Differences Between: [Versions 311 and 401]

   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/>.
  16  
  17  namespace qtype_random;
  18  
  19  use qtype_random;
  20  use question_bank;
  21  
  22  defined('MOODLE_INTERNAL') || die();
  23  
  24  global $CFG;
  25  require_once($CFG->dirroot . '/question/engine/tests/helpers.php');
  26  require_once($CFG->dirroot . '/question/type/random/questiontype.php');
  27  
  28  
  29  /**
  30   * Unit tests for the random question type class.
  31   *
  32   * @package    qtype_random
  33   * @copyright  2010 The Open University
  34   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  35   */
  36  class question_type_test extends \advanced_testcase {
  37      protected $qtype;
  38  
  39      protected function setUp(): void {
  40          $this->qtype = new qtype_random();
  41      }
  42  
  43      protected function tearDown(): void {
  44          $this->qtype = null;
  45      }
  46  
  47      public function test_name() {
  48          $this->assertEquals($this->qtype->name(), 'random');
  49      }
  50  
  51      public function test_can_analyse_responses() {
  52          $this->assertFalse($this->qtype->can_analyse_responses());
  53      }
  54  
  55      public function test_get_random_guess_score() {
  56          $this->assertNull($this->qtype->get_random_guess_score(null));
  57      }
  58  
  59      public function test_load_question() {
  60          $this->resetAfterTest();
  61  
  62          $syscontext = \context_system::instance();
  63          /** @var core_question_generator $generator */
  64          $generator = $this->getDataGenerator()->get_plugin_generator('core_question');
  65          $category = $generator->create_question_category(['contextid' => $syscontext->id]);
  66  
  67          $fromform = \test_question_maker::get_question_form_data('random');
  68          $fromform->category = $category->id . ',' . $syscontext->id;
  69  
  70          $question = new \stdClass();
  71          $question->category = $category->id;
  72          $question->qtype = 'random';
  73          $question->createdby = 0;
  74  
  75          $this->qtype->save_question($question, $fromform);
  76          $questiondata = question_bank::load_question_data($question->id);
  77  
  78          $this->assertEquals(['id', 'category', 'parent', 'name', 'questiontext', 'questiontextformat',
  79                  'generalfeedback', 'generalfeedbackformat', 'defaultmark', 'penalty', 'qtype',
  80                  'length', 'stamp', 'timecreated', 'timemodified', 'createdby', 'modifiedby', 'idnumber', 'contextid',
  81                  'status', 'versionid', 'version', 'questionbankentryid', 'categoryobject', 'options', 'hints'],
  82                  array_keys(get_object_vars($questiondata)));
  83          $this->assertEquals($category->id, $questiondata->category);
  84  
  85          // Random questions are not real questions. This is signaled by parent
  86          // being non-zero - and in fact equal to question id.
  87          $this->assertEquals($questiondata->id, $questiondata->parent);
  88          $this->assertEquals('Random (' . $category->name . ')', $questiondata->name);
  89          $this->assertEquals(0, $questiondata->questiontext); // Used to store 'Select from subcategories'.
  90          $this->assertEquals('random', $questiondata->qtype);
  91          $this->assertEquals(1, $questiondata->length);
  92          $this->assertEquals(\core_question\local\bank\question_version_status::QUESTION_STATUS_READY, $questiondata->status);
  93          $this->assertEquals($category->contextid, $questiondata->contextid);
  94  
  95          // Options - not used.
  96          $this->assertEquals(['answers'], array_keys(get_object_vars($questiondata->options)));
  97          $this->assertEquals([], $questiondata->options->answers);
  98  
  99          // Hints - not used.
 100          $this->assertEquals([], $questiondata->hints);
 101      }
 102  
 103      public function test_get_possible_responses() {
 104          $this->assertEquals(array(), $this->qtype->get_possible_responses(null));
 105      }
 106  
 107      public function test_question_creation() {
 108          $this->resetAfterTest();
 109          question_bank::get_qtype('random')->clear_caches_before_testing();
 110  
 111          $generator = $this->getDataGenerator()->get_plugin_generator('core_question');
 112          $cat = $generator->create_question_category();
 113          $question1 = $generator->create_question('shortanswer', null, array('category' => $cat->id));
 114          $question2 = $generator->create_question('numerical', null, array('category' => $cat->id));
 115  
 116          $randomquestion = $generator->create_question('random', null, array('category' => $cat->id));
 117  
 118          $expectedids = array($question1->id, $question2->id);
 119          $actualids = question_bank::get_qtype('random')->get_available_questions_from_category($cat->id, 0);
 120          sort($expectedids);
 121          sort($actualids);
 122          $this->assertEquals($expectedids, $actualids);
 123  
 124          $q = question_bank::load_question($randomquestion->id);
 125  
 126          $this->assertContainsEquals($q->id, array($question1->id, $question2->id));
 127      }
 128  }