#Gocha#

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

/**
 * Unit tests for the Moodle Blackboard V6+ format.
 *
 * @package    qformat_blackboard_six
 * @copyright  2012 Jean-Michel Vedrine
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */

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

global $CFG;
require_once($CFG->libdir . '/questionlib.php');
require_once($CFG->dirroot . '/question/format.php');
require_once($CFG->dirroot . '/question/format/blackboard_six/format.php');
require_once($CFG->dirroot . '/question/engine/tests/helpers.php');

/**
 * Unit tests for the blackboard question import format.
 *
 * @copyright  2012 Jean-Michel Vedrine
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */
class qformat_blackboard_six_pool_test extends question_testcase {

public function make_test_xml() {
        $xmlfile = new qformat_blackboard_six_file();
        $xmlfile->filetype = 2;
        $xmlfile->text = file_get_contents(__DIR__ . '/fixtures/sample_blackboard_pool.dat');
        return array(0 => $xmlfile);
    }

public function test_import_match() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);

$q = $questions[5];

// If qtype_ddmatch is installed, the formatter produces ddmatch
        // qtypes, not match ones.
        $ddmatchisinstalled = question_bank::is_qtype_installed('ddmatch');

$expectedq = new stdClass();
 $expectedq->qtype = $ddmatchisinstalled ? 'ddmatch' : 'match';
 $expectedq->name = 'Classify the animals.';
 $expectedq->questiontext = 'Classify the animals.';
 $expectedq->questiontextformat = FORMAT_HTML;
 $expectedq->correctfeedback = array('text' => '',
 'format' => FORMAT_HTML);
 $expectedq->partiallycorrectfeedback = array('text' => '',
 'format' => FORMAT_HTML);
 $expectedq->incorrectfeedback = array('text' => '',
 'format' => FORMAT_HTML);
 $expectedq->generalfeedback = '';
 $expectedq->generalfeedbackformat = FORMAT_HTML;
 $expectedq->defaultmark = 1;
 $expectedq->length = 1;
 $expectedq->penalty = 0.3333333;
 $expectedq->shuffleanswers = get_config('quiz', 'shuffleanswers');
 $expectedq->subquestions = array(
 array('text' => 'cat', 'format' => FORMAT_HTML),
 array('text' => '', 'format' => FORMAT_HTML),
 array('text' => 'frog', 'format' => FORMAT_HTML),
 array('text' => 'newt', 'format' => FORMAT_HTML));

if ($ddmatchisinstalled) {
            $expectedq->subanswers = array(
                array('text' => 'mammal', 'format' => FORMAT_HTML),
                array('text' => 'insect', 'format' => FORMAT_HTML),
                array('text' => 'amphibian', 'format' => FORMAT_HTML),
                array('text' => 'amphibian', 'format' => FORMAT_HTML),
            );
        } else {
            $expectedq->subanswers = array('mammal', 'insect', 'amphibian', 'amphibian');
        }
        $this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }

public function test_import_multichoice_single() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[2];

$expectedq = new stdClass();
 $expectedq->qtype = 'multichoice';
 $expectedq->single = 1;
 $expectedq->name = 'What\'s between orange and green in the spectrum?';
 $expectedq->questiontext = 'What\'s between orange and green in the spectrum?';
 $expectedq->questiontextformat = FORMAT_HTML;
 $expectedq->correctfeedback = array('text' => 'You gave the right answer.',
 'format' => FORMAT_HTML);
 $expectedq->partiallycorrectfeedback = array('text' => '',
 'format' => FORMAT_HTML);
 $expectedq->incorrectfeedback = array('text' => 'Only yellow is between orange and green in the spectrum.',
 'format' => FORMAT_HTML);
 $expectedq->generalfeedback = '';
 $expectedq->generalfeedbackformat = FORMAT_HTML;
 $expectedq->defaultmark = 1;
 $expectedq->length = 1;
 $expectedq->penalty = 0.3333333;
 $expectedq->shuffleanswers = get_config('quiz', 'shuffleanswers');
 $expectedq->answer = array(
 0 => array(
 'text' => 'red',
 'format' => FORMAT_HTML,
 ),
 1 => array(
 'text' => 'yellow',
 'format' => FORMAT_HTML,
 ),
 2 => array(
 'text' => 'blue',
 'format' => FORMAT_HTML,
 )
 );
 $expectedq->fraction = array(0, 1, 0);
 $expectedq->feedback = array(
 0 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 1 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 2 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 )
 );

$this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }

public function test_import_multichoice_multi() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[3];

$expectedq = new stdClass();
 $expectedq->qtype = 'multichoice';
 $expectedq->single = 0;
 $expectedq->name = 'What\'s between orange and green in the spectrum?';
 $expectedq->questiontext = 'What\'s between orange and green in the spectrum?';
 $expectedq->questiontextformat = FORMAT_HTML;
 $expectedq->correctfeedback = array(
 'text' => 'You gave the right answer.',
 'format' => FORMAT_HTML,
 );
 $expectedq->partiallycorrectfeedback = array(
 'text' => 'Only yellow and off-beige are between orange and green in the spectrum.',
 'format' => FORMAT_HTML,
 );
 $expectedq->incorrectfeedback = array(
 'text' => 'Only yellow and off-beige are between orange and green in the spectrum.',
 'format' => FORMAT_HTML,
 );
 $expectedq->generalfeedback = '';
 $expectedq->generalfeedbackformat = FORMAT_HTML;
 $expectedq->defaultmark = 1;
 $expectedq->length = 1;
 $expectedq->penalty = 0.3333333;
 $expectedq->shuffleanswers = get_config('quiz', 'shuffleanswers');
 $expectedq->answer = array(
 0 => array(
 'text' => 'yellow',
 'format' => FORMAT_HTML,
 ),
 1 => array(
 'text' => 'red',
 'format' => FORMAT_HTML,
 ),
 2 => array(
 'text' => 'off-beige',
 'format' => FORMAT_HTML,
 ),
 3 => array(
 'text' => 'blue',
 'format' => FORMAT_HTML,
 )
 );
 $expectedq->fraction = array(0.5, 0, 0.5, 0);
 $expectedq->feedback = array(
 0 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 1 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 2 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 3 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 )
 );

$this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }

public function test_import_truefalse() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[1];

$expectedq = new stdClass();
 $expectedq->qtype = 'truefalse';
 $expectedq->name = '42 is the Absolute Answer to everything.';
 $expectedq->questiontext = '42 is the Absolute Answer to everything.';
 $expectedq->questiontextformat = FORMAT_HTML;
 $expectedq->generalfeedback = '';
 $expectedq->generalfeedbackformat = FORMAT_HTML;
 $expectedq->defaultmark = 1;
 $expectedq->length = 1;
 $expectedq->correctanswer = 0;
 $expectedq->feedbacktrue = array(
 'text' => '42 is the Ultimate Answer.',
 'format' => FORMAT_HTML,
 );
 $expectedq->feedbackfalse = array(
 'text' => 'You gave the right answer.',
 'format' => FORMAT_HTML,
 );
 $this->assert(new question_check_specified_fields_expectation($expectedq), $q);
 }

public function test_import_fill_in_the_blank() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[4];

$expectedq = new stdClass();
 $expectedq->qtype = 'shortanswer';
 $expectedq->name = 'Name an amphibian: __________.';
 $expectedq->questiontext = 'Name an amphibian: __________.';
 $expectedq->questiontextformat = FORMAT_HTML;
 $expectedq->generalfeedback = '';
 $expectedq->generalfeedbackformat = FORMAT_HTML;
 $expectedq->defaultmark = 1;
 $expectedq->length = 1;
 $expectedq->usecase = 0;
 $expectedq->answer = array('frog', '*');
 $expectedq->fraction = array(1, 0);
 $expectedq->feedback = array(
 0 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 ),
 1 => array(
 'text' => '',
 'format' => FORMAT_HTML,
 )
 );

$this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }

public function test_import_essay() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[6];

$expectedq = new stdClass();
        $expectedq->qtype = 'essay';
        $expectedq->name = 'How are you?';
        $expectedq->questiontext = 'How are you?';
        $expectedq->questiontextformat = FORMAT_HTML;
        $expectedq->generalfeedback = '';
        $expectedq->generalfeedbackformat = FORMAT_HTML;
        $expectedq->defaultmark = 1;
        $expectedq->length = 1;
        $expectedq->responseformat = 'editor';
        $expectedq->responsefieldlines = 15;
        $expectedq->attachments = 0;
        $expectedq->graderinfo = array(
                'text' => 'Blackboard answer for essay questions will be imported as informations for graders.',
                'format' => FORMAT_HTML,
            );

$this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }

public function test_import_category() {

$xml = $this->make_test_xml();

$importer = new qformat_blackboard_six();
        $questions = $importer->readquestions($xml);
        $q = $questions[0];

$expectedq = new stdClass();
        $expectedq->qtype = 'category';
        $expectedq->category = 'exam 3 2008-9';

$this->assert(new question_check_specified_fields_expectation($expectedq), $q);
    }
}