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


< /**
<  * This file contains tests that walks a truefalse question through various
<  * behaviours.
<  *
<  * @package    qtype
<  * @subpackage truefalse
<  * @copyright  2011 The Open University
<  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
<  */



> namespace qtype_truefalse;




> use question_state;



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


 */

< class qtype_truefalse_walkthrough_test extends qbehaviour_walkthrough_test_base {



> class walkthrough_test extends \qbehaviour_walkthrough_test_base {


    public function test_false_right_does_not_show_feedback_when_not_answered() {

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

<         $tf = test_question_maker::make_question('truefalse', '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',



>                 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->assertRegExp('/' . preg_quote($tf->questiontext, '/') . '/',



>         $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, '/') . '/'));



>                 new \question_no_pattern_expectation('/' . preg_quote($tf->falsefeedback, '/') . '/'));
> 
>     }
> 
>     public function test_each_attempt_builds_on_last_and_regrade() {
> 
>         // 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() {
> 
>         // 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() {
> 
>         // 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 font-weight-normal sr-only'
>         ]);
>         $this->assertStringContainsString($standardinstruction, $this->currentoutput);