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

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

global $CFG;

require_once($CFG->dirroot . '/mod/quiz/report/reportlib.php');

/**

 * This class contains the test cases for the functions in reportlib.php.

 *

 * @package   mod_quiz

 * @category  test

 * @copyright 2008 Jamie Pratt me@jamiep.org

 * @license   http://www.gnu.org/copyleft/gpl.html GNU Public License

 */

final class reportlib_test extends \advanced_testcase {

    public function test_quiz_report_index_by_keys(): void {

        $datum = [];

        $object = new \stdClass();

        $object->qid = 3;

        $object->aid = 101;

        $object->response = '';

        $object->grade = 3;

        $datum[] = $object;

        $indexed = quiz_report_index_by_keys($datum, ['aid', 'qid']);

        $this->assertEquals($indexed[101][3]->qid, 3);

        $this->assertEquals($indexed[101][3]->aid, 101);

        $this->assertEquals($indexed[101][3]->response, '');

        $this->assertEquals($indexed[101][3]->grade, 3);

        $indexed = quiz_report_index_by_keys($datum, ['aid', 'qid'], false);

        $this->assertEquals($indexed[101][3][0]->qid, 3);

        $this->assertEquals($indexed[101][3][0]->aid, 101);

        $this->assertEquals($indexed[101][3][0]->response, '');

        $this->assertEquals($indexed[101][3][0]->grade, 3);

    }

    public function test_quiz_report_scale_summarks_as_percentage(): void {

        $quiz = new \stdClass();

        $quiz->sumgrades = 10;

        $quiz->decimalpoints = 2;

        $this->assertEquals('12.34567%',

            quiz_report_scale_summarks_as_percentage(1.234567, $quiz, false));

        $this->assertEquals('12.35%',

            quiz_report_scale_summarks_as_percentage(1.234567, $quiz, true));

        $this->assertEquals('-',

            quiz_report_scale_summarks_as_percentage('-', $quiz, true));

    }

    public function test_quiz_report_qm_filter_select_only_one_attempt_allowed(): void {

        $quiz = new \stdClass();

        $quiz->attempts = 1;

        $this->assertSame('', quiz_report_qm_filter_select($quiz));

    }

    public function test_quiz_report_qm_filter_select_average(): void {

        $quiz = new \stdClass();

        $quiz->attempts = 10;

        $quiz->grademethod = QUIZ_GRADEAVERAGE;

        $this->assertSame('', quiz_report_qm_filter_select($quiz));

    }

    public function test_quiz_report_qm_filter_select_first_last_best(): void {

        global $DB;

        $this->resetAfterTest();

        $fakeattempt = new \stdClass();

        $fakeattempt->userid = 123;

        $fakeattempt->quiz = 456;

        $fakeattempt->layout = '1,2,0,3,4,0,5';

        $fakeattempt->state = quiz_attempt::FINISHED;

        // We intentionally insert these in a funny order, to test the SQL better.

        // The test data is:

        // id | quizid | user | attempt | sumgrades | state

        // ---------------------------------------------------

        // 4  | 456    | 123  | 1       | null      | submitted

        // 2  | 456    | 123  | 2       | 50        | finished

        // 1  | 456    | 123  | 3       | 50        | finished

        // 3  | 456    | 123  | 4       | null      | inprogress

        // 5  | 456    | 1    | 1       | 100       | finished

        // 6  | 456    | 234  | 1       | 100       | finished

        // 7  | 456    | 234  | 2       | null      | submitted

        // layout is only given because it has a not-null constraint.

        // uniqueid values are meaningless, but that column has a unique constraint.

        // user 123 will have their first attempt submitted, but not finished.

        // user 234 will have their last attempt submitted, but not finished.

        $fakeattempt->attempt = 3;

        $fakeattempt->sumgrades = 50;

        $fakeattempt->uniqueid = 13;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 2;

        $fakeattempt->sumgrades = 50;

        $fakeattempt->uniqueid = 26;

        $fakeattempt->state = quiz_attempt::FINISHED;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 4;

        $fakeattempt->sumgrades = null;

        $fakeattempt->uniqueid = 39;

        $fakeattempt->state = quiz_attempt::IN_PROGRESS;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 1;

        $fakeattempt->sumgrades = null;

        $fakeattempt->uniqueid = 52;

        $fakeattempt->state = quiz_attempt::SUBMITTED;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 1;

        $fakeattempt->userid = 1;

        $fakeattempt->sumgrades = 100;

        $fakeattempt->uniqueid = 65;

        $fakeattempt->state = quiz_attempt::FINISHED;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 1;

        $fakeattempt->userid = 234;

        $fakeattempt->sumgrades = 100;

        $fakeattempt->uniqueid = 99;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $fakeattempt->attempt = 2;

        $fakeattempt->userid = 234;

        $fakeattempt->sumgrades = null;

        $fakeattempt->uniqueid = 77;

        $fakeattempt->state = quiz_attempt::SUBMITTED;

        $DB->insert_record('quiz_attempts', $fakeattempt);

        $quiz = new \stdClass();

        $quiz->attempts = 10;

        $quiz->grademethod = QUIZ_ATTEMPTFIRST;

        $firstattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} quiza WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz), [123, 456]);

        $this->assertCount(1, $firstattempt);

        $firstattempt = reset($firstattempt);

        $this->assertEquals(1, $firstattempt->attempt);

        $this->assertEquals(quiz_attempt::SUBMITTED, $firstattempt->state);

        $firstattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} quiza WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz), [234, 456]);

        $this->assertCount(1, $firstattempt);

        $firstattempt = reset($firstattempt);

        $this->assertEquals(1, $firstattempt->attempt);

        $this->assertEquals(quiz_attempt::FINISHED, $firstattempt->state);

        $quiz->grademethod = QUIZ_ATTEMPTLAST;

        $lastattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} quiza WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz), [123, 456]);

        $this->assertCount(1, $lastattempt);

        $lastattempt = reset($lastattempt);

        $this->assertEquals(3, $lastattempt->attempt);

        $this->assertEquals(quiz_attempt::FINISHED, $lastattempt->state);

        $lastattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} quiza WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz), [234, 456]);

        $this->assertCount(1, $lastattempt);

        $lastattempt = reset($lastattempt);

        $this->assertEquals(2, $lastattempt->attempt);

        $this->assertEquals(quiz_attempt::SUBMITTED, $lastattempt->state);

        $quiz->attempts = 0;

        $quiz->grademethod = QUIZ_GRADEHIGHEST;

        $bestattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} qa_alias WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz, 'qa_alias'), [123, 456]);

        $this->assertCount(1, $bestattempt);

        $bestattempt = reset($bestattempt);

        $this->assertEquals(2, $bestattempt->attempt);

        $bestattempt = $DB->get_records_sql("

                SELECT * FROM {quiz_attempts} qa_alias WHERE userid = ? AND quiz = ? AND "

                . quiz_report_qm_filter_select($quiz, 'qa_alias'), [234, 456]);

        $this->assertCount(1, $bestattempt);

        $bestattempt = reset($bestattempt);

        $this->assertEquals(1, $bestattempt->attempt);

    }

    public function test_quiz_results_never_below_zero(): void {

        global $DB;

        $this->resetAfterTest();

        $quizid = 7;

        $fakegrade = new \stdClass();

        $fakegrade->quiz = $quizid;

        // Have 5 test grades.

        $fakegrade->userid = 10;

        $fakegrade->grade = 6.66667;

        $DB->insert_record('quiz_grades', $fakegrade);

        $fakegrade->userid = 11;

        $fakegrade->grade = -2.86;

        $DB->insert_record('quiz_grades', $fakegrade);

        $fakegrade->userid = 12;

        $fakegrade->grade = 10.0;

        $DB->insert_record('quiz_grades', $fakegrade);

        $fakegrade->userid = 13;

        $fakegrade->grade = -5.0;

        $DB->insert_record('quiz_grades', $fakegrade);

        $fakegrade->userid = 14;

        $fakegrade->grade = 33.33333;

        $DB->insert_record('quiz_grades', $fakegrade);

        $data = quiz_report_grade_bands(5, 20, $quizid);

        $this->assertGreaterThanOrEqual(0, min(array_keys($data)));

    }

}