<?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 mod_quiz;


< use question_bank;



> defined('MOODLE_INTERNAL') || die();
> 
> use mod_quiz\question\bank\qbank_helper;
> 
> global $CFG;
> require_once($CFG->dirroot . '/question/engine/tests/helpers.php');
> require_once($CFG->dirroot . '/mod/quiz/tests/quiz_question_helper_test_trait.php');



/**
 * Class mod_quiz_local_structure_slot_random_test
 * Class for tests related to the {@link \mod_quiz\local\structure\slot_random} class.
 *
 * @package    mod_quiz
 * @category   test
 * @copyright  2018 Shamim Rezaie <shamim@moodle.com>
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later

>  * @covers     \mod_quiz\local\structure\slot_random


 */
class local_structure_slot_random_test extends \advanced_testcase {

> 
    /**
>     use \quiz_question_helper_test_trait;
     * Constructor test.
> 


     */
    public function test_constructor() {
        global $SITE;

        $this->resetAfterTest();
        $this->setAdminUser();

        // Create a quiz.
        $quizgenerator = $this->getDataGenerator()->get_plugin_generator('mod_quiz');

<         $quiz = $quizgenerator->create_instance(array('course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0));



>         $quiz = $quizgenerator->create_instance(['course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0]);



        // Create a question category in the system context.
        $questiongenerator = $this->getDataGenerator()->get_plugin_generator('core_question');
        $category = $questiongenerator->create_question_category();

        // Create a random question without adding it to a quiz.
        // We don't want to use quiz_add_random_questions because that itself, instantiates an object from the slot_random class.
        $form = new \stdClass();
        $form->category = $category->id . ',' . $category->contextid;
        $form->includesubcategories = true;
        $form->fromtags = [];
        $form->defaultmark = 1;

<         $form->hidden = 1;



>         $form->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_HIDDEN;


        $form->stamp = make_unique_id_code();

<         $question = new \stdClass();
<         $question->qtype = 'random';
<         $question = question_bank::get_qtype('random')->save_question($question, $form);




<         $randomslotdata = new \stdClass();



>         // Set the filter conditions.
>         $filtercondition = new \stdClass();
>         $filtercondition->filters = \question_filter_test_helper::create_filters([$category->id], true);




>         // Slot data.
        $randomslotdata->quizid = $quiz->id;
>         $randomslotdata = new \stdClass();



<         $randomslotdata->questionid = $question->id;
<         $randomslotdata->questioncategoryid = $category->id;
<         $randomslotdata->includingsubcategories = 1;


        $randomslotdata->maxmark = 1;
        $randomslotdata->usingcontextid = \context_module::instance($quiz->cmid)->id;
        $randomslotdata->questionscontextid = $category->contextid;


>         // Insert the random question to the quiz.


        $randomslot = new \mod_quiz\local\structure\slot_random($randomslotdata);

>         $randomslot->set_filter_condition(json_encode($filtercondition));



        $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');

>         $rcp = $rc->getProperty('filtercondition');
        $rcp = $rc->getProperty('record');
>         $rcp->setAccessible(true);
        $rcp->setAccessible(true);
>         $record = json_decode($rcp->getValue($randomslot));
        $record = $rcp->getValue($randomslot);
> 

>         $this->assertEquals($quiz->id, $randomslot->get_quiz()->id);
        $this->assertEquals($quiz->id, $record->quizid);
>         $this->assertEquals($category->id, $record->filters->category->values[0]);
        $this->assertEquals($question->id, $record->questionid);
>         $this->assertTrue($record->filters->category->filteroptions->includesubcategories);
        $this->assertEquals($category->id, $record->questioncategoryid);
> 



< 
<         $this->assertEquals($quiz->id, $record->quizid);
<         $this->assertEquals($question->id, $record->questionid);
<         $this->assertEquals($category->id, $record->questioncategoryid);
<         $this->assertEquals(1, $record->includingsubcategories);


        global $SITE, $DB;

        $this->resetAfterTest();
        $this->setAdminUser();

        // Create a quiz.
        $quizgenerator = $this->getDataGenerator()->get_plugin_generator('mod_quiz');

<         $quiz = $quizgenerator->create_instance(array('course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0));



>         $quiz = $quizgenerator->create_instance(['course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0]);



        // Create a question category in the system context.
        $questiongenerator = $this->getDataGenerator()->get_plugin_generator('core_question');
        $category = $questiongenerator->create_question_category();


<         quiz_add_random_questions($quiz, 0, $category->id, 1, false);



>         $this->add_random_questions($quiz->id, 0, $category->id, 1);




<         // Get the random question's id. It is at the first slot.
<         $questionid = $DB->get_field('quiz_slots', 'questionid', array('quizid' => $quiz->id, 'slot' => 1));



>         // Set the filter conditions.
>         $filtercondition = new \stdClass();
>         $filtercondition->filters = \question_filter_test_helper::create_filters([$category->id], 1);




>         // Slot data.


        $randomslotdata = new \stdClass();
        $randomslotdata->quizid = $quiz->id;

<         $randomslotdata->questionid = $questionid;
<         $randomslotdata->questioncategoryid = $category->id;
<         $randomslotdata->includingsubcategories = 1;


        $randomslotdata->maxmark = 1;

>         $randomslotdata->usingcontextid = \context_module::instance($quiz->cmid)->id;

>         $randomslotdata->questionscontextid = $category->contextid;


        $randomslot = new \mod_quiz\local\structure\slot_random($randomslotdata);

>         $randomslot->set_filter_condition(json_encode($filtercondition));



        // The create_instance had injected an additional cmid propery to the quiz. Let's remove that.
        unset($quiz->cmid);

        $this->assertEquals($quiz, $randomslot->get_quiz());
    }

    public function test_set_quiz() {
        global $SITE, $DB;

        $this->resetAfterTest();
        $this->setAdminUser();

        // Create a quiz.
        $quizgenerator = $this->getDataGenerator()->get_plugin_generator('mod_quiz');

<         $quiz = $quizgenerator->create_instance(array('course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0));



>         $quiz = $quizgenerator->create_instance(['course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0]);



        // Create a question category in the system context.
        $questiongenerator = $this->getDataGenerator()->get_plugin_generator('core_question');
        $category = $questiongenerator->create_question_category();


<         quiz_add_random_questions($quiz, 0, $category->id, 1, false);



>         $this->add_random_questions($quiz->id, 0, $category->id, 1);




<         // Get the random question's id. It is at the first slot.
<         $questionid = $DB->get_field('quiz_slots', 'questionid', array('quizid' => $quiz->id, 'slot' => 1));



>         // Set the filter conditions.
>         $filtercondition = new \stdClass();
>         $filtercondition->filters = \question_filter_test_helper::create_filters([$category->id], 1);




>         // Slot data.


        $randomslotdata = new \stdClass();
        $randomslotdata->quizid = $quiz->id;

<         $randomslotdata->questionid = $questionid;
<         $randomslotdata->questioncategoryid = $category->id;
<         $randomslotdata->includingsubcategories = 1;


        $randomslotdata->maxmark = 1;

>         $randomslotdata->usingcontextid = \context_module::instance($quiz->cmid)->id;

>         $randomslotdata->questionscontextid = $category->contextid;


        $randomslot = new \mod_quiz\local\structure\slot_random($randomslotdata);

>         $randomslot->set_filter_condition(json_encode($filtercondition));



        // The create_instance had injected an additional cmid propery to the quiz. Let's remove that.
        unset($quiz->cmid);

        $randomslot->set_quiz($quiz);

        $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
        $rcp = $rc->getProperty('quiz');
        $rcp->setAccessible(true);
        $quizpropery = $rcp->getValue($randomslot);

        $this->assertEquals($quiz, $quizpropery);
    }

    private function setup_for_test_tags($tagnames) {
        global $SITE, $DB;

        // Create a quiz.
        $quizgenerator = $this->getDataGenerator()->get_plugin_generator('mod_quiz');

<         $quiz = $quizgenerator->create_instance(array('course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0));



>         $quiz = $quizgenerator->create_instance(['course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0]);



        // Create a question category in the system context.
        $questiongenerator = $this->getDataGenerator()->get_plugin_generator('core_question');
        $category = $questiongenerator->create_question_category();


<         quiz_add_random_questions($quiz, 0, $category->id, 1, false);
< 
<         // Get the random question's id. It is at the first slot.
<         $questionid = $DB->get_field('quiz_slots', 'questionid', array('quizid' => $quiz->id, 'slot' => 1));



>         $this->add_random_questions($quiz->id, 0, $category->id, 1);




>         // Slot data.


        $randomslotdata = new \stdClass();
        $randomslotdata->quizid = $quiz->id;

<         $randomslotdata->questionid = $questionid;
<         $randomslotdata->questioncategoryid = $category->id;
<         $randomslotdata->includingsubcategories = 1;


        $randomslotdata->maxmark = 1;

>         $randomslotdata->usingcontextid = \context_module::instance($quiz->cmid)->id;

>         $randomslotdata->questionscontextid = $category->contextid;


        $randomslot = new \mod_quiz\local\structure\slot_random($randomslotdata);

        // Create tags.
        foreach ($tagnames as $tagname) {

<             $tagrecord = array(



>             $tagrecord = [


                'isstandard' => 1,
                'flag' => 0,
                'rawname' => $tagname,
                'description' => $tagname . ' desc'

<             );



>             ];


            $tags[$tagname] = $this->getDataGenerator()->create_tag($tagrecord);
        }


<         return array($randomslot, $tags);



>         return [$randomslot, $tags];


    }


<     public function test_set_tags() {



>     public function test_set_tags_filter() {


        $this->resetAfterTest();
        $this->setAdminUser();

        list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar']);

<         $randomslot->set_tags([$tags['foo'], $tags['bar']]);
< 
<         $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
<         $rcp = $rc->getProperty('tags');
<         $rcp->setAccessible(true);
<         $tagspropery = $rcp->getValue($randomslot);
< 
<         $this->assertEquals([
<             $tags['foo']->id => $tags['foo'],
<             $tags['bar']->id => $tags['bar'],
<         ], $tagspropery);
<     }
< 
<     public function test_set_tags_twice() {
<         $this->resetAfterTest();
<         $this->setAdminUser();
< 
<         list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar', 'baz']);
< 
<         // Set tags for the first time.
<         $randomslot->set_tags([$tags['foo'], $tags['bar']]);
<         // Now set the tags again.
<         $randomslot->set_tags([$tags['baz']]);
< 
<         $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
<         $rcp = $rc->getProperty('tags');
<         $rcp->setAccessible(true);
<         $tagspropery = $rcp->getValue($randomslot);
< 
<         $this->assertEquals([
<             $tags['baz']->id => $tags['baz'],
<         ], $tagspropery);
<     }




<     public function test_set_tags_duplicates() {
<         $this->resetAfterTest();
<         $this->setAdminUser();
< 
<         list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar', 'baz']);
< 
<         $randomslot->set_tags([$tags['foo'], $tags['bar'], $tags['foo']]);



>         $qtagids = [$tags['foo']->id, $tags['bar']->id];
>         $filtercondition = new \stdClass();
>         $filtercondition->filters = \question_filter_test_helper::create_filters([], 0, $qtagids);
>         $randomslot->set_filter_condition(json_encode($filtercondition));



        $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');

<         $rcp = $rc->getProperty('tags');



>         $rcp = $rc->getProperty('filtercondition');


        $rcp->setAccessible(true);
        $tagspropery = $rcp->getValue($randomslot);


<         $this->assertEquals([
<             $tags['foo']->id => $tags['foo'],
<             $tags['bar']->id => $tags['bar'],
<         ], $tagspropery);
<     }
< 
<     public function test_set_tags_by_id() {
<         $this->resetAfterTest();
<         $this->setAdminUser();
< 
<         list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar', 'baz']);
< 
<         $randomslot->set_tags_by_id([$tags['foo']->id, $tags['bar']->id]);
< 
<         $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
<         $rcp = $rc->getProperty('tags');
<         $rcp->setAccessible(true);
<         $tagspropery = $rcp->getValue($randomslot);
< 
<         // The set_tags_by_id function only retrieves id and name fields of the tag object.
<         $this->assertCount(2, $tagspropery);
<         $this->assertArrayHasKey($tags['foo']->id, $tagspropery);
<         $this->assertArrayHasKey($tags['bar']->id, $tagspropery);
<         $this->assertEquals(
<                 (object)['id' => $tags['foo']->id, 'name' => $tags['foo']->name],
<                 $tagspropery[$tags['foo']->id]->to_object()
<         );
<         $this->assertEquals(
<                 (object)['id' => $tags['bar']->id, 'name' => $tags['bar']->name],
<                 $tagspropery[$tags['bar']->id]->to_object()
<         );
<     }
< 
<     public function test_set_tags_by_id_twice() {
<         $this->resetAfterTest();
<         $this->setAdminUser();
< 
<         list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar', 'baz']);
< 
<         // Set tags for the first time.
<         $randomslot->set_tags_by_id([$tags['foo']->id, $tags['bar']->id]);
<         // Now set the tags again.
<         $randomslot->set_tags_by_id([$tags['baz']->id]);
< 
<         $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
<         $rcp = $rc->getProperty('tags');
<         $rcp->setAccessible(true);
<         $tagspropery = $rcp->getValue($randomslot);
< 
<         // The set_tags_by_id function only retrieves id and name fields of the tag object.
<         $this->assertCount(1, $tagspropery);
<         $this->assertArrayHasKey($tags['baz']->id, $tagspropery);
<         $this->assertEquals(
<                 (object)['id' => $tags['baz']->id, 'name' => $tags['baz']->name],
<                 $tagspropery[$tags['baz']->id]->to_object()
<         );
<     }
< 
<     public function test_set_tags_by_id_duplicates() {
<         $this->resetAfterTest();
<         $this->setAdminUser();
< 
<         list($randomslot, $tags) = $this->setup_for_test_tags(['foo', 'bar', 'baz']);
< 
<         $randomslot->set_tags_by_id([$tags['foo']->id, $tags['bar']->id], $tags['foo']->id);
< 
<         $rc = new \ReflectionClass('\mod_quiz\local\structure\slot_random');
<         $rcp = $rc->getProperty('tags');
<         $rcp->setAccessible(true);
<         $tagspropery = $rcp->getValue($randomslot);
< 
<         // The set_tags_by_id function only retrieves id and name fields of the tag object.
<         $this->assertCount(2, $tagspropery);
<         $this->assertArrayHasKey($tags['foo']->id, $tagspropery);
<         $this->assertArrayHasKey($tags['bar']->id, $tagspropery);
<         $this->assertEquals(
<                 (object)['id' => $tags['foo']->id, 'name' => $tags['foo']->name],
<                 $tagspropery[$tags['foo']->id]->to_object()
<         );
<         $this->assertEquals(
<                 (object)['id' => $tags['bar']->id, 'name' => $tags['bar']->name],
<                 $tagspropery[$tags['bar']->id]->to_object()
<         );



>         $this->assertEquals([$tags['foo']->id, $tags['bar']->id],
>             (array)json_decode($tagspropery)->filters->qtagids->values);


    }

    public function test_insert() {

<         global $SITE, $DB;



>         global $SITE;



        $this->resetAfterTest();
        $this->setAdminUser();

        // Create a quiz.
        $quizgenerator = $this->getDataGenerator()->get_plugin_generator('mod_quiz');

<         $quiz = $quizgenerator->create_instance(array('course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0));



>         $quiz = $quizgenerator->create_instance(['course' => $SITE->id, 'questionsperpage' => 3, 'grade' => 100.0]);
>         $quizcontext = \context_module::instance($quiz->cmid);



        // Create a question category in the system context.
        $questiongenerator = $this->getDataGenerator()->get_plugin_generator('core_question');
        $category = $questiongenerator->create_question_category();

        // Create a random question without adding it to a quiz.
        $form = new \stdClass();
        $form->category = $category->id . ',' . $category->contextid;
        $form->includesubcategories = true;
        $form->fromtags = [];
        $form->defaultmark = 1;

<         $form->hidden = 1;



>         $form->status = \core_question\local\bank\question_version_status::QUESTION_STATUS_HIDDEN;


        $form->stamp = make_unique_id_code();

<         $question = new \stdClass();
<         $question->qtype = 'random';
<         $question = question_bank::get_qtype('random')->save_question($question, $form);



        // Prepare 2 tags.

<         $tagrecord = array(



>         $tagrecord = [


            'isstandard' => 1,
            'flag' => 0,
            'rawname' => 'foo',
            'description' => 'foo desc'

<         );



>         ];


        $footag = $this->getDataGenerator()->create_tag($tagrecord);

<         $tagrecord = array(



>         $tagrecord = [


            'isstandard' => 1,
            'flag' => 0,
            'rawname' => 'bar',
            'description' => 'bar desc'

<         );



>         ];


        $bartag = $this->getDataGenerator()->create_tag($tagrecord);


> 
        $randomslotdata = new \stdClass();
>         // Set the filter conditions.
        $randomslotdata->quizid = $quiz->id;
>         $filtercondition = new \stdClass();
        $randomslotdata->questionid = $question->id;
>         $filtercondition->filter = \question_filter_test_helper::create_filters([$category->id], true, [$footag->id, $bartag->id]);
        $randomslotdata->questioncategoryid = $category->id;
> 
        $randomslotdata->includingsubcategories = 1;
>         // Slot data.



<         $randomslotdata->questionid = $question->id;
<         $randomslotdata->questioncategoryid = $category->id;
<         $randomslotdata->includingsubcategories = 1;


        $randomslot = new \mod_quiz\local\structure\slot_random($randomslotdata);

>         $randomslotdata->usingcontextid = $quizcontext->id;
        $randomslot->set_tags([$footag, $bartag]);
>         $randomslotdata->questionscontextid = $category->contextid;



<         $randomslot->set_tags([$footag, $bartag]);



>         $randomslot->set_filter_condition(json_encode($filtercondition));




<         // Get the random question's quiz_slot. It is at the first slot.
<         $quizslot = $DB->get_record('quiz_slots', array('quizid' => $quiz->id, 'slot' => 1));
<         // Get the random question's tags from quiz_slot_tags. It is at the first slot.
<         $quizslottags = $DB->get_records('quiz_slot_tags', array('slotid' => $quizslot->id));
< 
<         $this->assertEquals($question->id, $quizslot->questionid);
<         $this->assertEquals($category->id, $quizslot->questioncategoryid);
<         $this->assertEquals(1, $quizslot->includingsubcategories);



>         $slots = qbank_helper::get_question_structure($quiz->id, $quizcontext);
>         $quizslot = reset($slots);
> 
>         $filter = $quizslot->filtercondition['filter'];
> 
>         $this->assertEquals($category->id, $filter['category']['values'][0]);
>         $this->assertTrue($filter['category']['filteroptions']['includesubcategories']);


        $this->assertEquals(1, $quizslot->maxmark);


<         $this->assertCount(2, $quizslottags);



>         $this->assertCount(2, $filter['qtagids']['values']);


        $this->assertEqualsCanonicalizing(
                [

<                     ['tagid' => $footag->id, 'tagname' => $footag->name],
<                     ['tagid' => $bartag->id, 'tagname' => $bartag->name]



>                     ['tagid' => $footag->id],
>                     ['tagid' => $bartag->id]


                ],

<                 array_map(function($slottag) {
<                     return ['tagid' => $slottag->tagid, 'tagname' => $slottag->tagname];
<                 }, $quizslottags));



>                 array_map(function($tagid) {
>                     return ['tagid' => $tagid];
>                 }, $filter['qtagids']['values']));


    }
}