Proyectos de Subversion Moodle

<?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/>.

namespace qtype_truefalse;

use question_state;

use question_display_options;

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

global $CFG;

require_once($CFG->dirroot . '/question/engine/tests/helpers.php');

/**

 * Walkthrough tests for the truefalse question type.

 *

 * @package    qtype_truefalse

 * @copyright  2011 The Open University

 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later

 * @covers     \qtype_truefalse_question

 */

final class walkthrough_test extends \qbehaviour_walkthrough_test_base {

    public function test_false_right_does_not_show_feedback_when_not_answered(): void {

        // Create a true-false question with correct answer false.

        $tf = \test_question_maker::make_question('truefalse', 'false');

        $this->start_attempt_at_question($tf, 'deferredfeedback', 1);

        // Check the initial state.

        $this->check_current_state(question_state::$todo);

        $this->check_current_mark(null);

        $this->check_current_output(

                $this->get_contains_question_text_expectation($tf),

                $this->get_does_not_contain_feedback_expectation(),

                new \question_contains_tag_with_contents('h4',

                        get_string('questiontext', 'question')));

        $this->assertEquals(get_string('false', 'qtype_truefalse'),

                $this->quba->get_right_answer_summary($this->slot));

        $this->assertMatchesRegularExpression('/' . preg_quote($tf->questiontext, '/') . '/',

                $this->quba->get_question_summary($this->slot));

        $this->assertNull($this->quba->get_response_summary($this->slot));

        // Finish the attempt without answering.

        $this->quba->finish_all_questions();

        // Verify.

        $this->check_current_state(question_state::$gaveup);

        $this->check_current_mark(null);

        $this->check_current_output(

                $this->get_contains_tf_true_radio_expectation(false, false),

                $this->get_contains_tf_false_radio_expectation(false, false),

                // In particular, check that the false feedback is not displayed.

                new \question_no_pattern_expectation('/' . preg_quote($tf->falsefeedback, '/') . '/'));

    }

    public function test_each_attempt_builds_on_last_and_regrade(): void {

        // Create a true-false question with correct answer false.

        $tf = \test_question_maker::make_question('truefalse', 'false');

        $this->start_attempt_at_question(clone($tf), 'deferredfeedback', 1);

        // Submit the answer false (correct).

        $this->process_submission(['answer' => 0]);

        // Finish the attempt.

        $this->quba->finish_all_questions();

        // Check the state.

        $this->check_current_state(question_state::$gradedright);

        $this->check_current_mark(1);

        $this->check_current_output(

                $this->get_contains_tf_true_radio_expectation(false, false),

                $this->get_contains_tf_false_radio_expectation(false, true));

        // Start a new attempt based on the first one.

        $firstattemptqa = $this->quba->get_question_attempt($this->slot);

        $this->quba = \question_engine::make_questions_usage_by_activity('unit_test',

                \context_system::instance());

        $this->quba->set_preferred_behaviour('deferredfeedback');

        $this->slot = $this->quba->add_question(clone($tf), 1);

        $this->quba->start_question_based_on($this->slot, $firstattemptqa);

        // Verify.

        $this->check_current_state(question_state::$complete);

        $this->check_current_mark(null);

        $this->check_current_output(

                $this->get_contains_tf_true_radio_expectation(true, false),

                $this->get_contains_tf_false_radio_expectation(true, true));

        // Finish the attempt without changing the answer.

        $this->quba->finish_all_questions();

        // Check the state.

        $this->check_current_state(question_state::$gradedright);

        $this->check_current_mark(1);

        $this->check_current_output(

                $this->get_contains_tf_true_radio_expectation(false, false),

                $this->get_contains_tf_false_radio_expectation(false, true));

        // Regrade the attempt - code based on question_usage_by_activity::regrade_question.

        $oldqa = $this->quba->get_question_attempt($this->slot);

        $newqa = new \question_attempt(clone($tf),

                $oldqa->get_usage_id(), $this->quba->get_observer());

        $newqa->set_database_id($oldqa->get_database_id());

        $newqa->set_slot($oldqa->get_slot());

        $newqa->regrade($oldqa, true);

        // Check the state.

        $this->assertEquals(question_state::$gradedright, $newqa->get_state());

        $this->assertEquals(1, $newqa->get_mark());

    }

    /**

     * @covers \qtype_truefalse_renderer::formulation_and_controls

     */

    public function test_deferredfeedback_feedback_multichoice_single_showstandardinstruction_yes(): void {

        // Create a true-false question with correct answer false.

        $tf = \test_question_maker::make_question('truefalse', 'false');

        $tf->showstandardinstruction = true;

        $this->start_attempt_at_question($tf, 'deferredfeedback', 1);

        $this->render();

        // Check for 'Show standard instruction'.

        $standardinstruction = get_string('selectone', 'qtype_truefalse');

        $this->assertStringContainsString($standardinstruction, $this->currentoutput);

    }

    /**

     * @covers \qtype_truefalse_renderer::formulation_and_controls

     */

    public function test_deferredfeedback_feedback_multichoice_single_showstandardinstruction_no(): void {

        // Create a true-false question with correct answer false.

        $tf = \test_question_maker::make_question('truefalse', 'false');

        $tf->showstandardinstruction = false;

        $this->start_attempt_at_question($tf, 'deferredfeedback', 1);

        $this->render();

        // Check for 'Show standard instruction'.

        $standardinstruction = \html_writer::tag('legend', get_string('answer'), [

            'class' => 'prompt h6 fw-normal visually-hidden',

        ]);

        $this->assertStringContainsString($standardinstruction, $this->currentoutput);

    }

    /**

     * Tests that the general feedback box is not displayed when it is empty for a false answer.

     *

     * @covers ::format_generalfeedback

     */

    public function test_false_right_does_not_show_empty_general_feedback_when_answer(): void {

        $tf = \test_question_maker::make_question('truefalse', 'false');

        $this->start_attempt_at_question($tf, 'deferredfeedback', 1);

        $this->process_submission(data: ['answer' => 0]);

        $this->quba->finish_all_questions();

        $displayoptions = new question_display_options();

        $html = $this->quba->render_question(1, $displayoptions);

        $pattern = "/<div class=\"generalfeedback\">\s*<div class=\"clearfix\">\s*{$tf->generalfeedback}\s*<\/div>\s*<\/div>/";

        $this->assertMatchesRegularExpression($pattern, $html);

        $tf->generalfeedback = "";

        $this->start_attempt_at_question($tf, 'deferredfeedback', 1);

        $this->process_submission(data: ['answer' => 0]);

        $this->quba->finish_all_questions();

        $html = $this->quba->render_question(1, $displayoptions);

        $pattern = "/<div class=\"generalfeedback\">\s*<div class=\"clearfix\"><\/div>\s*<\/div>/";

        $this->assertDoesNotMatchRegularExpression($pattern, $html);

    }

}