Search moodle.org's
Developer Documentation

See Release Notes
Long Term Support Release

  • Bug fixes for general core bugs in 4.1.x will end 13 November 2023 (12 months).
  • Bug fixes for security issues in 4.1.x will end 10 November 2025 (36 months).
  • PHP version: minimum PHP 7.4.0 Note: minimum PHP version has increased since Moodle 4.0. PHP 8.0.x is supported too.
<?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/>.
/**
 * @package    backup-convert
 * @copyright  2011 Darko Miletic <dmiletic@moodlerooms.com>
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */

defined('MOODLE_INTERNAL') or die('Direct access to this script is forbidden.');

require_once('cc_utils.php');
require_once('cc_general.php');

abstract class cc_xml_namespace {
    const xml = 'http://www.w3.org/XML/1998/namespace';
}

abstract class cc_qti_metadata {
    // Assessment.
    const qmd_assessmenttype       = 'qmd_assessmenttype';
    const qmd_scoretype            = 'qmd_scoretype';
    const qmd_feedbackpermitted    = 'qmd_feedbackpermitted';
    const qmd_hintspermitted       = 'qmd_hintspermitted';
    const qmd_solutionspermitted   = 'qmd_solutionspermitted';
    const qmd_timelimit            = 'qmd_timelimit';
    const cc_allow_late_submission = 'cc_allow_late_submission';
    const cc_maxattempts           = 'cc_maxattempts';
    const cc_profile               = 'cc_profile';

    // Items.
    const cc_weighting         = 'cc_weighting';
    const qmd_scoringpermitted = 'qmd_scoringpermitted';
    const qmd_computerscored   = 'qmd_computerscored';
    const cc_question_category = 'cc_question_category';
}

abstract class cc_qti_profiletype {
    const multiple_choice   = 'cc.multiple_choice.v0p1';
    const multiple_response = 'cc.multiple_response.v0p1';
    const true_false        = 'cc.true_false.v0p1';
    const field_entry       = 'cc.fib.v0p1';
    const pattern_match     = 'cc.pattern_match.v0p1';
    const essay             = 'cc.essay.v0p1';

    /**
     *
     * validates a profile value
     * @param string $value
     * @return boolean
     */
    public static function valid($value) {
        static $verification_values = array( self::essay,
                                             self::field_entry,
                                             self::multiple_choice,
                                             self::multiple_response,
                                             self::pattern_match,
                                             self::true_false
                                           );
        return in_array($value, $verification_values);
    }

}

abstract class cc_qti_values {
    const exam_profile = 'cc.exam.v0p1';
    const Yes          = 'Yes';
    const No           = 'No';
    const Response     = 'Response';
    const Solution     = 'Solution';
    const Hint         = 'Hint';
    const Examination  = 'Examination';
    const Percentage   = 'Percentage';
    const unlimited    = 'unlimited';
    const Single       = 'Single';
    const Multiple     = 'Multiple';
    const Ordered      = 'Ordered';
    const Asterisk     = 'Asterisk';
    const Box          = 'Box';
    const Dashline     = 'Dashline';
    const Underline    = 'Underline';
    const Decimal      = 'Decimal';
    const Integer      = 'Integer';
    const Scientific   = 'Scientific';
    const String       = 'String';
    const SCORE        = 'SCORE';
    const Set          = 'Set';
    const Complete     = 'Complete';
    const texttype     = 'text/plain';
    const htmltype     = 'text/html';
}

abstract class cc_qti_tags {
    const questestinterop = 'questestinterop';
    const assessment = 'assessment';
    const qtimetadata = 'qtimetadata';
    const qtimetadatafield = 'qtimetadatafield';
    const fieldlabel = 'fieldlabel';
    const fieldentry = 'fieldentry';
    const section = 'section';
    const ident = 'ident';
    const item = 'item';
    const title = 'title';
    const itemmetadata = 'itemmetadata';
    const presentation = 'presentation';
    const material = 'material';
    const mattext = 'mattext';
    const matref = 'matref';
    const matbreak = 'matbreak';
    const texttype = 'texttype';
    const response_lid = 'response_lid';
    const render_choice = 'render_choice';
    const response_label = 'response_label';
    const resprocessing = 'resprocessing';
    const outcomes = 'outcomes';
    const decvar = 'decvar';
    const respcondition = 'respcondition';
    const conditionvar = 'conditionvar';
    const other = 'other';
    const displayfeedback = 'displayfeedback';
    const maxvalue = 'maxvalue';
    const minvalue = 'minvalue';
    const varname = 'varname';
    const vartype = 'vartype';
    const continue_ = 'continue';
    const feedbacktype = 'feedbacktype';
    const linkrefid = 'linkrefid';
    const varequal = 'varequal';
    const respident = 'respident';
    const itemfeedback = 'itemfeedback';
    const flow_mat = 'flow_mat';
    const rcardinality = 'rcardinality';
    const charset = 'charset';
    const label = 'label';
    const uri = 'uri';
    const width = 'width';
    const height = 'height';
    const x0 = 'x0';
    const y0 = 'y0';
    const xml_lang = 'lang';
    const xml_space = 'space';
    const rubric = 'rubric';
    const altmaterial = 'altmaterial';
    const presentation_material = 'presentation_material';
    const t_class = 'class';
    const material_ref = 'material_ref';
    const rtiming = 'rtiming';
    const render_fib = 'render_fib';
    const shuffle = 'shuffle';
    const minnumber = 'minnumber';
    const maxnumber = 'maxnumber';
    const encoding = 'encoding';
    const maxchars = 'maxchars';
    const prompt = 'prompt';
    const fibtype = 'fibtype';
    const rows = 'rows';
    const columns = 'columns';
    const labelrefid = 'labelrefid';
    const rshuffle = 'rshuffle';
    const match_group = 'match_group';
    const match_max = 'match_max';
    const flow = 'flow';
    const response_str = 'response_str';
    const flow_label = 'flow_label';
    const setvar = 'setvar';
    const action = 'action';
    const and_ = 'and';
    const not_ = 'not';
    const case_ = 'case';
    const varsubstring = 'varsubstring';
    const hint = 'hint';
    const solution = 'solution';
    const feedbackstyle = 'feedbackstyle';
    const solutionmaterial = 'solutionmaterial';
    const hintmaterial = 'hintmaterial';
}

class cc_question_metadata_base {
    /**
     * @var array
     */
    protected $metadata = array();

    /**
     * @param string $setting
     * @param mixed $value
     */
    protected function set_setting($setting, $value = null) {
        $this->metadata[$setting] = $value;
    }

    /**
     * @param string $setting
     * @return mixed
     */
    protected function get_setting($setting) {
        $result = null;
        if (array_key_exists($setting, $this->metadata)) {
            $result = $this->metadata[$setting];
        }
        return $result;
    }

    /**
     * @param string $setting
     * @param string $namespace
     * @param string $value
     */
    protected function set_setting_wns($setting, $namespace, $value = null) {
        $this->metadata[$setting] = array($namespace => $value);
    }

    /**
     * @param string $setting
     * @param boolean $value
     */
    protected function enable_setting_yesno($setting, $value = true) {
        $svalue = $value ? cc_qti_values::Yes : cc_qti_values::No;
        $this->set_setting($setting, $svalue);
    }

    /**
     * @param XMLGenericDocument $doc
     * @param DOMNode $item
     * @param string $namespace
     */
    public function generate_attributes(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        foreach ($this->metadata as $attribute => $value) {
            if (!is_null($value)) {
                if (!is_array($value)) {
                    $doc->append_new_attribute_ns($item, $namespace, $attribute, $value);
                } else {
                    $ns = key($value);
                    $nval = current($value);
                    if (!is_null($nval)) {
                        $doc->append_new_attribute_ns($item, $ns, $attribute, $nval);
                    }
                }
            }
        }
    }

    /**
     * @param XMLGenericDocument $doc
     * @param DOMNode $item
     * @param string $namespace
     */
    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $qtimetadata = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::qtimetadata);
        foreach ($this->metadata as $label => $entry) {
            if (!is_null($entry)) {
                $qtimetadatafield = $doc->append_new_element_ns($qtimetadata, $namespace, cc_qti_tags::qtimetadatafield);
                $doc->append_new_element_ns($qtimetadatafield, $namespace, cc_qti_tags::fieldlabel, $label);
                $doc->append_new_element_ns($qtimetadatafield, $namespace, cc_qti_tags::fieldentry, $entry);
            }
        }
    }
}

class cc_question_metadata extends cc_question_metadata_base {

    public function set_category($value) {
        $this->set_setting(cc_qti_metadata::cc_question_category, $value);
    }

    public function set_weighting($value) {
        $this->set_setting(cc_qti_metadata::cc_weighting, $value);
    }

    public function enable_scoringpermitted($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::qmd_scoringpermitted, $value);
    }

    public function enable_computerscored($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::qmd_computerscored, $value);
    }

    /**
     *
     * Constructs metadata
     * @param string $profile
     * @throws InvalidArgumentException
     */
    public function __construct($profile) {
        if (!cc_qti_profiletype::valid($profile)) {
            throw new InvalidArgumentException('Invalid profile type!');
        }
        $this->set_setting(cc_qti_metadata::cc_profile, $profile);
        $this->set_setting(cc_qti_metadata::cc_question_category);
        $this->set_setting(cc_qti_metadata::cc_weighting        );
        $this->set_setting(cc_qti_metadata::qmd_scoringpermitted);
        $this->set_setting(cc_qti_metadata::qmd_computerscored  );
    }
}


class cc_assesment_metadata extends cc_question_metadata_base {

    public function enable_hints($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::qmd_hintspermitted, $value);
    }

    public function enable_solutions($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::qmd_solutionspermitted, $value);
    }

    public function enable_latesubmissions($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::cc_allow_late_submission, $value);
    }

    public function enable_feedback($value = true) {
        $this->enable_setting_yesno(cc_qti_metadata::qmd_feedbackpermitted, $value);
    }

    public function set_timelimit($value) {
        $ivalue = (int)$value;
        if (($ivalue < 0) || ($ivalue > 527401)) {
            throw new OutOfRangeException('Time limit value out of permitted range!');
        }

        $this->set_setting(cc_qti_metadata::qmd_timelimit, $value);
    }

    public function set_maxattempts($value) {
        $valid_values = array(cc_qti_values::Examination, cc_qti_values::unlimited, 1, 2, 3, 4, 5);
        if (!in_array($value, $valid_values)) {
            throw new OutOfRangeException('Max attempts has invalid value');
        }

        $this->set_setting(cc_qti_metadata::cc_maxattempts, $value);
    }

    public function __construct() {
        //prepared default values
        $this->set_setting(cc_qti_metadata::cc_profile        , cc_qti_values::exam_profile);
        $this->set_setting(cc_qti_metadata::qmd_assessmenttype, cc_qti_values::Examination );
        $this->set_setting(cc_qti_metadata::qmd_scoretype     , cc_qti_values::Percentage  );
        //optional empty values
        $this->set_setting(cc_qti_metadata::qmd_feedbackpermitted   );
        $this->set_setting(cc_qti_metadata::qmd_hintspermitted      );
        $this->set_setting(cc_qti_metadata::qmd_solutionspermitted  );
        $this->set_setting(cc_qti_metadata::qmd_timelimit           );
        $this->set_setting(cc_qti_metadata::cc_allow_late_submission);
        $this->set_setting(cc_qti_metadata::cc_maxattempts          );
    }

}

class cc_assesment_mattext extends cc_question_metadata_base {
    protected $value = null;

    public function __construct($value = null) {
        $this->set_setting(cc_qti_tags::texttype, cc_qti_values::texttype);
        $this->set_setting(cc_qti_tags::charset);//, 'ascii-us');
        $this->set_setting(cc_qti_tags::label);
        $this->set_setting(cc_qti_tags::uri);
        $this->set_setting(cc_qti_tags::width);
        $this->set_setting(cc_qti_tags::height);
        $this->set_setting(cc_qti_tags::x0);
        $this->set_setting(cc_qti_tags::y0);
        $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml);
        $this->set_setting_wns(cc_qti_tags::xml_space, cc_xml_namespace::xml);//, 'default');
        $this->value = $value;
    }

    public function set_label($value) {
        $this->set_setting(cc_qti_tags::label, $value);
    }

    public function set_uri($value) {
        $this->set_setting(cc_qti_tags::uri, $value);
    }

    public function set_width_height($width = null, $height = null) {
        $this->set_setting(cc_qti_tags::width, $width);
        $this->set_setting(cc_qti_tags::height, $height);
    }

    public function set_coor($x = null, $y = null) {
        $this->set_setting(cc_qti_tags::x0, $x);
        $this->set_setting(cc_qti_tags::y0, $y);
    }

    public function set_lang($lang = null) {
        $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml, $lang);
    }

    public function set_content($content, $type = cc_qti_values::texttype, $charset = null) {
        $this->value = $content;
        $this->set_setting(cc_qti_tags::texttype, $type);
        $this->set_setting(cc_qti_tags::charset, $charset);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $mattext = $doc->append_new_element_ns_cdata($item, $namespace, cc_qti_tags::mattext, $this->value);
        $this->generate_attributes($doc, $mattext, $namespace);
    }
}

class cc_assesment_matref {
    protected $linkref = null;

    public function __construct($linkref) {
        $this->linkref = $linkref;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $doc->append_new_element_ns($item, $namespace, cc_qti_tags::matref, $this->linkref);
        $doc->append_new_attribute_ns($node, $namespace, cc_qti_tags::linkrefid, $this->linkref);
    }
}

class cc_assesment_response_matref extends cc_assesment_matref {
    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::material_ref);
        $doc->append_new_attribute_ns($node, $namespace, cc_qti_tags::linkrefid, $this->linkref);
    }
}

class cc_assesment_matbreak {
    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $doc->append_new_element_ns($item, $namespace, cc_qti_tags::matbreak);
    }
}

abstract class cc_assesment_material_base extends cc_question_metadata_base {
    /**
    * @var mixed
    */
    protected $mattag = null;
    protected $tagname   = null;

    protected function set_tag_value($object) {
        $this->mattag  = $object;
    }

    public function set_mattext(cc_assesment_mattext $object) {
        $this->set_tag_value($object);
    }

    public function set_matref(cc_assesment_matref $object) {
        $this->set_tag_value($object);
    }

    public function set_matbreak(cc_assesment_matbreak $object) {
        $this->set_tag_value($object);
    }

    public function set_lang($value) {
        $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml, $value);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $material = $doc->append_new_element_ns($item, $namespace, $this->tagname);
        $this->generate_attributes($doc, $material, $namespace);
        if (!empty($this->mattag)) {
            $this->mattag->generate($doc, $material, $namespace);
        }
        return $material;
    }
}

class cc_assesment_altmaterial extends cc_assesment_material_base {
    public function __construct($value = null) {
        $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml);
        $this->tagname = cc_qti_tags::altmaterial;
    }
}

class cc_assesment_material extends cc_assesment_material_base {

    protected $altmaterial = null;

    public function __construct($value = null) {
        $this->set_setting(cc_qti_tags::label);
        $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml);
        $this->tagname = cc_qti_tags::material;
    }

    public function set_label($value) {
        $this->set_setting(cc_qti_tags::label, $value);
    }

    public function set_altmaterial(cc_assesment_altmaterial $object) {
        $this->altmaterial = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $material = parent::generate($doc, $item, $namespace);
        if (!empty($this->altmaterial)) {
            $this->altmaterial->generate($doc, $material, $namespace);
        }
    }
}

class cc_assesment_rubric_base extends cc_question_metadata_base {

    protected $material = null;

    public function set_material($object) {
        $this->material = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $rubric = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::rubric);
        if (!empty($this->material)) {
            $this->material->generate($doc, $rubric, $namespace);
        }
    }
}

class cc_assesment_presentation_material_base extends cc_question_metadata_base {
    protected $flowmats = array();

    public function add_flow_mat($object) {
        $this->flowmats[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::presentation_material);
        if (!empty($this->flowmats)) {
            foreach ($this->flowmats as $flow_mat) {
                $flow_mat->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assesment_flow_mat_base extends cc_question_metadata_base {

    protected $mattag = null;

    protected function set_tag_value($object) {
        $this->mattag  = $object;
    }

    public function set_flow_mat(cc_assesment_flow_mat_base $object) {
        $this->set_tag_value($object);
    }

    public function set_material(cc_assesment_material $object) {
        $this->set_tag_value($object);
    }

    public function set_material_ref(cc_assesment_matref $object) {
        $this->set_tag_value($object);
    }

    public function __construct($value = null) {
        $this->set_setting(cc_qti_tags::t_class);
    }

    public function set_class($value) {
        $this->set_setting(cc_qti_tags::t_class, $value);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::flow_mat);
        $this->generate_attributes($doc, $node, $namespace);
        if (!empty($this->mattag)) {
            $this->mattag->generate($doc, $node, $namespace);
        }
    }

}

class cc_assesment_section extends cc_question_metadata_base {
    /**
     * @var array
     */
    protected $items = array();

    public function __construct() {
        $this->set_setting(cc_qti_tags::ident, cc_helpers::uuidgen('I_'));
        $this->set_setting(cc_qti_tags::title);
        $this->set_setting_wns(cc_qti_tags::xml_lang, cc_xml_namespace::xml);
    }

    public function set_ident($value) {
        $this->set_setting(cc_qti_tags::ident, $value);
    }

    public function set_title($value) {
        $this->set_setting(cc_qti_tags::title, $value);
    }

    public function set_lang($value) {
        $this->set_setting_wns(cc_qti_tags::xml_lang, cc_xml_namespace::xml, $value);
    }

    public function add_item(cc_assesment_section_item $object) {
        $this->items[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::section);
        $this->generate_attributes($doc, $node, $namespace);
        if (!empty($this->items)) {
            foreach ($this->items as $item) {
                $item->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assesment_itemmetadata extends cc_question_metadata_base {
    public function add_metadata($object) {
        $this->metadata[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::itemmetadata);
        if (!empty($this->metadata)) {
            foreach ($this->metadata as $metaitem) {
                $metaitem->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assesment_decvartype extends cc_question_metadata_base {

    public function __construct() {
        $this->set_setting(cc_qti_tags::varname, cc_qti_values::SCORE);
        $this->set_setting(cc_qti_tags::vartype, cc_qti_values::Integer);
        $this->set_setting(cc_qti_tags::minvalue);
        $this->set_setting(cc_qti_tags::maxvalue);
    }

    public function set_vartype($value) {
        $this->set_setting(cc_qti_tags::vartype, $value);
    }

    public function set_limits($min = null, $max = null) {
        $this->set_setting(cc_qti_tags::minvalue, $min);
        $this->set_setting(cc_qti_tags::maxvalue, $max);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::decvar);
        $this->generate_attributes($doc, $node, $namespace);
    }
}


class cc_assignment_conditionvar_othertype extends cc_question_metadata_base {
    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $doc->append_new_element_ns($item, $namespace, cc_qti_tags::other);
    }
}

class cc_assignment_conditionvar_varequaltype extends cc_question_metadata_base {
    protected $tagname = null;
    protected $answerid = null;

    public function __construct($value = null) {
        if (is_null($value)) {
            throw new InvalidArgumentException('Must not pass null!');
        }
        $this->answerid = $value;
        $this->set_setting(cc_qti_tags::respident);
        $this->set_setting(cc_qti_tags::case_);//, cc_qti_values::No  );
        $this->tagname = cc_qti_tags::varequal;
    }

    public function set_respident($value) {
        $this->set_setting(cc_qti_tags::respident, $value);
    }

    public function enable_case($value = true) {
        $this->enable_setting_yesno(cc_qti_tags::case_, $value);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, $this->tagname, $this->answerid);
        $this->generate_attributes($doc, $node, $namespace);
    }
}

class cc_assignment_conditionvar_varsubstringtype extends cc_assignment_conditionvar_varequaltype {
    public function __construct($value) {
        parent::__construct($value);
        $this->tagname = cc_qti_tags::varsubstring;
    }
}


class cc_assignment_conditionvar_andtype extends cc_question_metadata_base {
    protected $nots = array();
    protected $varequals = array();

    public function set_not(cc_assignment_conditionvar_varequaltype $object) {
        $this->nots[] = $object;
    }

    public function set_varequal(cc_assignment_conditionvar_varequaltype $object) {
        $this->varequals[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::and_);
        if (!empty($this->nots)) {
            foreach ($this->nots as $notv) {
                $not = $doc->append_new_element_ns($node, $namespace, cc_qti_tags::not_);
                $notv->generate($doc, $not, $namespace);
            }
        }

        if (!empty($this->varequals)) {
            foreach ($this->varequals as $varequal) {
                $varequal->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assignment_conditionvar extends cc_question_metadata_base {

    /**
     * @var cc_assignment_conditionvar_andtype
     */
    protected $and = null;
    /**
     * @var cc_assignment_conditionvar_othertype
     */
    protected $other = null;
    /**
     * @var array
     */
    protected $varequal = array();
    /**
     * @var cc_assignment_conditionvar_varsubstringtype
     */
    protected $varsubstring = null;

    public function set_and(cc_assignment_conditionvar_andtype $object) {
        $this->and = $object;
    }

    public function set_other(cc_assignment_conditionvar_othertype $object) {
        $this->other = $object;
    }

    public function set_varequal(cc_assignment_conditionvar_varequaltype $object) {
        $this->varequal[] = $object;
    }

    public function set_varsubstring(cc_assignment_conditionvar_varsubstringtype $object) {
        $this->varsubstring = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::conditionvar);

        if (!empty($this->and)) {
            $this->and->generate($doc, $node, $namespace);
        }

        if (!empty($this->other)) {
            $this->other->generate($doc, $node, $namespace);
        }

        if (!empty($this->varequal)) {
            foreach ($this->varequal as $varequal) {
                $varequal->generate($doc, $node, $namespace);
            }
        }

        if (!empty($this->varsubstring)) {
            $this->varsubstring->generate($doc, $node, $namespace);
        }
    }
}

class cc_assignment_displayfeedbacktype extends cc_question_metadata_base {
    public function __construct() {
        $this->set_setting(cc_qti_tags::feedbacktype);
        $this->set_setting(cc_qti_tags::linkrefid);
    }

    public function set_feedbacktype($value) {
        $this->set_setting(cc_qti_tags::feedbacktype, $value);
    }

    public function set_linkrefid($value) {
        $this->set_setting(cc_qti_tags::linkrefid, $value);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::displayfeedback);
        $this->generate_attributes($doc, $node, $namespace);
    }
}


class cc_assignment_setvartype extends cc_question_metadata_base {
    /**
     * @var integer
     */
    protected $tagvalue = null;

    public function __construct($tagvalue = 100) {
        $this->set_setting(cc_qti_tags::varname, cc_qti_values::SCORE);
        $this->set_setting(cc_qti_tags::action , cc_qti_values::Set  );
        $this->tagvalue = $tagvalue;
    }

    public function set_varname($value) {
        $this->set_setting(cc_qti_tags::varname, $value);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::setvar, $this->tagvalue);
        $this->generate_attributes($doc, $node, $namespace);
    }
}

class cc_assesment_respconditiontype extends cc_question_metadata_base {
    /**
     * @var cc_assignment_conditionvar
     */
    protected $conditionvar = null;
    protected $setvar = array();
    protected $displayfeedback = array();

    public function __construct() {
        $this->set_setting(cc_qti_tags::title);
        $this->set_setting(cc_qti_tags::continue_, cc_qti_values::No);
    }

    public function set_title($value) {
        $this->set_setting(cc_qti_tags::title, $value);
    }

    public function enable_continue($value = true) {
        $this->enable_setting_yesno(cc_qti_tags::continue_, $value);
    }

    public function set_conditionvar(cc_assignment_conditionvar $object) {
        $this->conditionvar = $object;
    }

    public function add_setvar(cc_assignment_setvartype $object) {
        $this->setvar[] = $object;
    }

    public function add_displayfeedback(cc_assignment_displayfeedbacktype $object) {
        $this->displayfeedback[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::respcondition);
        $this->generate_attributes($doc, $node, $namespace);

        if (!empty($this->conditionvar)) {
            $this->conditionvar->generate($doc, $node, $namespace);
        }

        if (!empty($this->setvar)) {
            foreach ($this->setvar as $setvar) {
                $setvar->generate($doc, $node, $namespace);
            }
        }

        if (!empty($this->displayfeedback)) {
            foreach ($this->displayfeedback as $displayfeedback) {
                $displayfeedback->generate($doc, $node, $namespace);
            }
        }
    }
}


class cc_assesment_resprocessingtype extends cc_question_metadata_base {
    /**
     * @var cc_assesment_decvartype
     */
    protected $decvar = null;
    /**
     * @var array
     */
    protected $respconditions = array();

    public function set_decvar(cc_assesment_decvartype $object) {
        $this->decvar = $object;
    }

    public function add_respcondition(cc_assesment_respconditiontype $object) {
        $this->respconditions[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::resprocessing);
        $outcomes = $doc->append_new_element_ns($node, $namespace, cc_qti_tags::outcomes);
        if (!empty($this->decvar)) {
            $this->decvar->generate($doc, $outcomes, $namespace);
        }
        if (!empty($this->respconditions)) {
            foreach ($this->respconditions as $rcond) {
                $rcond->generate($doc, $node, $namespace);
            }
        }
    }
}


class cc_assesment_itemfeedback_shintmaterial_base extends cc_question_metadata_base {
    /**
     * @var string
     */
    protected $tagname = null;
    /**
     * @var array
     */
    protected $flow_mats = array();
    /**
     * @var array
     */
    protected $materials = array();

    /**
     * @param cc_assesment_flow_mattype $object
     */
    public function add_flow_mat(cc_assesment_flow_mattype $object) {
        $this->flow_mats[] = $object;
    }

    /**
     * @param cc_assesment_material $object
     */
    public function add_material(cc_assesment_material $object) {
        $this->materials[] = $object;
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, $this->tagname);

        if (!empty($this->flow_mats)) {
            foreach ($this->flow_mats as $flow_mat) {
                $flow_mat->generate($doc, $node, $namespace);
            }
        }

        if (!empty($this->materials)) {
            foreach ($this->materials as $material) {
                $material->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assesment_itemfeedback_hintmaterial extends cc_assesment_itemfeedback_shintmaterial_base {
    public function __construct() {
        $this->tagname = cc_qti_tags::hint;
    }
}

class cc_assesment_itemfeedback_solutionmaterial extends cc_assesment_itemfeedback_shintmaterial_base {
    public function __construct() {
        $this->tagname = cc_qti_tags::solutionmaterial;
    }
}

class cc_assesment_itemfeedback_shintype_base extends cc_question_metadata_base {
    /**
     * @var string
     */
    protected $tagname = null;
    /**
     * @var array
    */
    protected $items = array();

    public function __construct() {
        $this->set_setting(cc_qti_tags::feedbackstyle, cc_qti_values::Complete);
    }

    public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) {
        $node = $doc->append_new_element_ns($item, $namespace, $this->tagname);
        $this->generate_attributes($doc, $node, $namespace);

        if (!empty($this->items)) {
            foreach ($this->items as $telement) {
                $telement->generate($doc, $node, $namespace);
            }
        }
    }
}

class cc_assesment_itemfeedback_solutiontype extends cc_assesment_itemfeedback_shintype_base {
    public function __construct() {
        parent::__construct();
        $this->tagname = cc_qti_tags::solution;
    }

    /**
     * @param cc_assesment_itemfeedback_solutionmaterial $object
     */
    public function add_solutionmaterial(cc_assesment_itemfeedback_solutionmaterial $object) {
        $this->items[] = $object;
    }
}

class cc_assesment_itemfeedbac_hinttype extends cc_assesment_itemfeedback_shintype_base {
    public function __construct() {
        parent::__construct();
        $this->tagname = cc_qti_tags::hint;
    }

    /**
     * @param cc_assesment_itemfeedback_hintmaterial $object
     */
    public function add_hintmaterial(cc_assesment_itemfeedback_hintmaterial $object) {
        $this->items[] = $object;
    }
}

class cc_assesment_itemfeedbacktype extends cc_question_metadata_base {
    /**
     * @var cc_assesment_flow_mattype
     */
    protected $flow_mat = null;
    /**
     * @var cc_assesment_material
     */
    protected $material = null;
    /**
     * @var cc_assesment_itemfeedback_solutiontype
     */
    protected $solution = null;
    protected $hint = null;

> /** @var cc_assignment_displayfeedbacktype item feedback. */ public function __construct() { > protected $itemfeedback; $this->set_setting(cc_qti_tags::ident, cc_helpers::uuidgen('I_')); >
$this->set_setting(cc_qti_tags::title); } /** * @param string $value */ public function set_ident($value) { $this->set_setting(cc_qti_tags::ident, $value); } /** * @param string $value */ public function set_title($value) { $this->set_setting(cc_qti_tags::title, $value); } /** * @param cc_assesment_flow_mattype $object */ public function set_flow_mat(cc_assesment_flow_mattype $object) { $this->flow_mat = $object; } /** * @param cc_assesment_material $object */ public function set_material(cc_assesment_material $object) { $this->material = $object; } /** * @param cc_assesment_itemfeedback_solutiontype $object */ public function set_solution(cc_assesment_itemfeedback_solutiontype $object) { $this->solution = $object; } public function set_hint($object) { $this->hint = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::itemfeedback); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->flow_mat) && empty($this->material)) { $this->flow_mat->generate($doc, $node, $namespace); } if (!empty($this->material) && empty($this->flow_mat)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->solution)) { $this->solution->generate($doc, $node, $namespace); } if (!empty($this->itemfeedback)) { $this->itemfeedback->generate($doc, $node, $namespace); } } } class cc_assesment_section_item extends cc_assesment_section { /** * @var cc_assesment_itemmetadata */ protected $itemmetadata = null; /** * @var cc_assesment_presentation */ protected $presentation = null; protected $resprocessing = array(); protected $itemfeedback = array(); public function set_itemmetadata(cc_assesment_itemmetadata $object) { $this->itemmetadata = $object; } public function set_presentation(cc_assesment_presentation $object) { $this->presentation = $object; } public function add_resprocessing(cc_assesment_resprocessingtype $object) { $this->resprocessing[] = $object; } public function add_itemfeedback(cc_assesment_itemfeedbacktype $object) { $this->itemfeedback[] = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::item); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->itemmetadata)) { $this->itemmetadata->generate($doc, $node, $namespace); } if (!empty($this->presentation)) { $this->presentation->generate($doc, $node, $namespace); } if (!empty($this->resprocessing)) { foreach ($this->resprocessing as $resprocessing) { $resprocessing->generate($doc, $node, $namespace); } } if (!empty($this->itemfeedback)) { foreach ($this->itemfeedback as $itemfeedback) { $itemfeedback->generate($doc, $node, $namespace); } } } } class cc_assesment_render_choicetype extends cc_question_metadata_base { /** * @var array */ protected $materials = array(); /** * @var array */ protected $material_refs = array(); /** * @var array */ protected $response_labels = array(); /** * @var array */ protected $flow_labels = array(); public function __construct() { $this->set_setting(cc_qti_tags::shuffle, cc_qti_values::No); $this->set_setting(cc_qti_tags::minnumber); $this->set_setting(cc_qti_tags::maxnumber); } public function add_material(cc_assesment_material $object) { $this->materials[] = $object; } public function add_material_ref(cc_assesment_response_matref $object) { $this->material_refs[] = $object; } public function add_response_label(cc_assesment_response_labeltype $object) { $this->response_labels[] = $object; } public function add_flow_label($object) { $this->flow_labels[] = $object; } public function enable_shuffle($value = true) { $this->enable_setting_yesno(cc_qti_tags::shuffle, $value); } public function set_limits($min = null, $max = null) { $this->set_setting(cc_qti_tags::minnumber, $min); $this->set_setting(cc_qti_tags::maxnumber, $max); } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::render_choice); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->materials)) { foreach ($this->materials as $mattag) { $mattag->generate($doc, $node, $namespace); } } if (!empty($this->material_refs)) { foreach ($this->material_refs as $matreftag) { $matreftag->generate($doc, $node, $namespace); } } if (!empty($this->response_labels)) { foreach ($this->response_labels as $resplabtag) { $resplabtag->generate($doc, $node, $namespace); } } if (!empty($this->flow_labels)) { foreach ($this->flow_labels as $flowlabtag) { $flowlabtag->generate($doc, $node, $namespace); } } } } class cc_assesment_flow_mattype extends cc_question_metadata_base { /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_assesment_response_matref */ protected $material_ref = null; /** * @var cc_assesment_flow_mattype */ protected $flow_mat = null; public function __construct() { $this->set_setting(cc_qti_tags::t_class); } public function set_class($value) { $this->set_setting(cc_qti_tags::t_class, $value); } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_material_ref(cc_assesment_response_matref $object) { $this->material_ref = $object; } public function set_flow_mat(cc_assesment_flow_mattype $object) { $this->flow_mat = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::flow_mat); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->flow_mat)) { $this->flow_mat->generate($doc, $node, $namespace); } if (!empty($this->material)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->material_ref)) { $this->material_ref->generate($doc, $node, $namespace); } } } class cc_assesment_response_labeltype extends cc_question_metadata_base { /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_assesment_response_matref */ protected $material_ref = null; /** * @var cc_assesment_flow_mattype */ protected $flow_mat = null; public function __construct() { $this->set_setting(cc_qti_tags::ident, cc_helpers::uuidgen('I_')); $this->set_setting(cc_qti_tags::labelrefid); $this->set_setting(cc_qti_tags::rshuffle); $this->set_setting(cc_qti_tags::match_group); $this->set_setting(cc_qti_tags::match_max); } public function set_ident($value) { $this->set_setting(cc_qti_tags::ident, $value); } public function get_ident() { return $this->get_setting(cc_qti_tags::ident); } public function set_labelrefid($value) { $this->set_setting(cc_qti_tags::labelrefid, $value); } public function enable_rshuffle($value = true) { $this->enable_setting_yesno(cc_qti_tags::rshuffle, $value); } public function set_match_group($value) { $this->set_setting(cc_qti_tags::match_group, $value); } public function set_match_max($value) { $this->set_setting(cc_qti_tags::match_max, $value); } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_material_ref(cc_assesment_response_matref $object) { $this->material_ref = $object; } public function set_flow_mat(cc_assesment_flow_mattype $object) { $this->flow_mat = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::response_label); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->material)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->material_ref)) { $this->material_ref->generate($doc, $node, $namespace); } if (!empty($this->flow_mat)) { $this->flow_mat->generate($doc, $node, $namespace); } } } class cc_assesment_flow_labeltype extends cc_question_metadata_base { /** * @var cc_assesment_flow_labeltype */ protected $flow_label = null; /** * @var cc_assesment_response_labeltype */ protected $response_label = null;
> > /** @var cc_assesment_material assesment material. */ public function __construct() { > protected $material; $this->set_setting(cc_qti_tags::t_class); > } > /** @var cc_assesment_response_matref assesment response material ref. */ > protected $material_ref;
public function set_class($value) { $this->set_setting(cc_qti_tags::t_class, $value); } public function set_flow_label(cc_assesment_flow_labeltype $object) { $this->flow_label = $object; } public function set_response_label(cc_assesment_response_labeltype $object) { $this->response_label = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::flow_label); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->material)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->material_ref)) { $this->material_ref->generate($doc, $node, $namespace); } if (!empty($this->response_label)) { $this->response_label->generate($doc, $node, $namespace); } if (!empty($this->flow_label)) { $this->flow_label->generate($doc, $node, $namespace); } } } class cc_assesment_render_fibtype extends cc_question_metadata_base { /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_assesment_response_matref */ protected $material_ref = null; /** * @var cc_assesment_response_labeltype */ protected $response_label = null; /** * * Enter description here ... * @var unknown_type */ protected $flow_label = null; public function __construct() { $this->set_setting(cc_qti_tags::encoding ); $this->set_setting(cc_qti_tags::charset ); $this->set_setting(cc_qti_tags::rows ); $this->set_setting(cc_qti_tags::columns ); $this->set_setting(cc_qti_tags::maxchars ); $this->set_setting(cc_qti_tags::minnumber); $this->set_setting(cc_qti_tags::maxnumber); $this->set_setting(cc_qti_tags::prompt, cc_qti_values::Box); $this->set_setting(cc_qti_tags::fibtype, cc_qti_values::String); } public function set_encoding($value) { $this->set_setting(cc_qti_tags::encoding, $value); } public function set_charset($value) { $this->set_setting(cc_qti_tags::charset, $value); } public function set_rows($value) { $this->set_setting(cc_qti_tags::rows, $value); } public function set_columns($value) { $this->set_setting(cc_qti_tags::columns, $value); } public function set_maxchars($value) { $this->set_setting(cc_qti_tags::columns, $value); } public function set_limits($min = null, $max = null) { $this->set_setting(cc_qti_tags::minnumber, $min); $this->set_setting(cc_qti_tags::maxnumber, $max); } public function set_prompt($value) { $this->set_setting(cc_qti_tags::prompt, $value); } public function set_fibtype($value) { $this->set_setting(cc_qti_tags::fibtype, $value); } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_material_ref(cc_assesment_response_matref $object) { $this->material_ref = $object; } public function set_response_label(cc_assesment_response_labeltype $object) { $this->response_label = $object; } public function set_flow_label($object) { $this->flow_label = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::render_fib); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->material) && empty($this->material_ref)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->material_ref) && empty($this->material)) { $this->material_ref->generate($doc, $node, $namespace); } if (!empty($this->response_label)) { $this->response_label->generate($doc, $node, $namespace); } if (!empty($this->flow_label)) { $this->flow_label->generate($doc, $node, $namespace); } } } class cc_response_lidtype extends cc_question_metadata_base { /** * @var string */ protected $tagname = null; /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_assesment_response_matref */ protected $material_ref = null; /** * @var cc_assesment_render_choicetype */ protected $render_choice = null; /** * @var cc_assesment_render_fibtype */ protected $render_fib = null; public function __construct() { $this->set_setting(cc_qti_tags::rcardinality, cc_qti_values::Single); $this->set_setting(cc_qti_tags::rtiming); $this->set_setting(cc_qti_tags::ident, cc_helpers::uuidgen('I_')); $this->tagname = cc_qti_tags::response_lid; } public function set_rcardinality($value) { $this->set_setting(cc_qti_tags::rcardinality, $value); } public function enable_rtiming($value = true) { $this->enable_setting_yesno(cc_qti_tags::rtiming, $value); } public function set_ident($value) { $this->set_setting(cc_qti_tags::ident, $value); } public function get_ident() { return $this->get_setting(cc_qti_tags::ident); } public function set_material_ref(cc_assesment_response_matref $object) { $this->material_ref = $object; } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_render_choice(cc_assesment_render_choicetype $object) { $this->render_choice = $object; } public function set_render_fib(cc_assesment_render_fibtype $object) { $this->render_fib = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, $this->tagname); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->material) && empty($this->material_ref)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->material_ref) && empty($this->material)) { $this->material_ref->generate($doc, $node, $namespace); } if (!empty($this->render_choice) && empty($this->render_fib)) { $this->render_choice->generate($doc, $node, $namespace); } if (!empty($this->render_fib) && empty($this->render_choice)) { $this->render_fib->generate($doc, $node, $namespace); } } } class cc_assesment_response_strtype extends cc_response_lidtype { public function __construct() { $rtt = parent::__construct(); $this->tagname = cc_qti_tags::response_str; } } class cc_assesment_flowtype extends cc_question_metadata_base { /** * @var cc_assesment_flowtype */ protected $flow = null; /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_assesment_response_matref */ protected $material_ref = null; /** * @var cc_response_lidtype */ protected $response_lid = null; /** * @var cc_assesment_response_strtype */ protected $response_str = null; public function __construct() { $this->set_setting(cc_qti_tags::t_class); } public function set_class($value) { $this->set_setting(cc_qti_tags::t_class, $value); } public function set_flow(cc_assesment_flowtype $object) { $this->flow = $object; } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_material_ref(cc_assesment_response_matref $object) { $this->material_ref = $object; } public function set_response_lid(cc_response_lidtype $object) { $this->response_lid = $object; } public function set_response_str(cc_assesment_response_strtype $object) { $this->response_str = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::flow); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->flow)) { $this->flow->generate($doc, $node, $namespace); } if (!empty($this->material)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->response_lid)) { $this->response_lid->generate($doc, $node, $namespace); } if (!empty($this->response_str)) { $this->response_str->generate($doc, $node, $namespace); } } } class cc_assesment_presentation extends cc_question_metadata_base { /** * @var cc_assesment_flowtype */ protected $flow = null; /** * @var cc_assesment_material */ protected $material = null; /** * @var cc_response_lidtype */ protected $response_lid = null; /** * @var cc_assesment_response_strtype */ protected $response_str = null; public function __construct() { $this->set_setting(cc_qti_tags::label); $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml); $this->set_setting(cc_qti_tags::x0); $this->set_setting(cc_qti_tags::y0); $this->set_setting(cc_qti_tags::width); $this->set_setting(cc_qti_tags::height); } public function set_label($value) { $this->set_setting(cc_qti_tags::label, $value); } public function set_lang($value) { $this->set_setting_wns(cc_qti_tags::xml_lang , cc_xml_namespace::xml, $value); } public function set_coor($x = null, $y = null) { $this->set_setting(cc_qti_tags::x0, $x); $this->set_setting(cc_qti_tags::y0, $y); } public function set_size($width = null, $height = null) { $this->set_setting(cc_qti_tags::width, $width); $this->set_setting(cc_qti_tags::height, $height); } public function set_flow(cc_assesment_flowtype $object) { $this->flow = $object; } public function set_material(cc_assesment_material $object) { $this->material = $object; } public function set_response_lid(cc_response_lidtype $object) { $this->response_lid = $object; } public function set_response_str(cc_assesment_response_strtype $object) { $this->response_str = $object; } public function generate(XMLGenericDocument &$doc, DOMNode &$item, $namespace) { $node = $doc->append_new_element_ns($item, $namespace, cc_qti_tags::presentation); $this->generate_attributes($doc, $node, $namespace); if (!empty($this->flow)) { $this->flow->generate($doc, $node, $namespace); } if (!empty($this->material) && empty($this->flow)) { $this->material->generate($doc, $node, $namespace); } if (!empty($this->response_lid) && empty($this->flow)) { $this->response_lid->generate($doc, $node, $namespace); } if (!empty($this->response_str) && empty($this->flow)) { $this->response_str->generate($doc, $node, $namespace); } } } class assesment1_resurce_file extends general_cc_file { const deafultname = 'assesment.xml'; protected $rootns = 'xmlns'; protected $rootname = cc_qti_tags::questestinterop; protected $ccnamespaces = array('xmlns' => 'http://www.imsglobal.org/xsd/ims_qtiasiv1p2', 'xsi' => 'http://www.w3.org/2001/XMLSchema-instance'); protected $ccnsnames = array('xmlns' => 'http://www.imsglobal.org/profile/cc/ccv1p0/derived_schema/domainProfile_4/ims_qtiasiv1p2_localised.xsd'); /** * @var string */ protected $assessment_title = 'Untitled'; /** * @var cc_assesment_metadata */ protected $metadata = null; /** * @var cc_assesment_rubric_base */ protected $rubric = null; /** * @var cc_assesment_presentation_material_base */ protected $presentation_material = null; /** * @var cc_assesment_section */ protected $section = null; public function set_metadata(cc_assesment_metadata $object) { $this->metadata = $object; } public function set_rubric(cc_assesment_rubric_base $object) { $this->rubric = $object; } public function set_presentation_material(cc_assesment_presentation_material_base $object) { $this->presentation_material = $object; } public function set_section(cc_assesment_section $object) { $this->section = $object; } public function set_title($value) { $this->assessment_title = self::safexml($value); } protected function on_save() { $rns = $this->ccnamespaces[$this->rootns]; //root assesment element - required $assessment = $this->append_new_element_ns($this->root, $rns, cc_qti_tags::assessment); $this->append_new_attribute_ns($assessment, $rns, cc_qti_tags::ident, cc_helpers::uuidgen('QDB_')); $this->append_new_attribute_ns($assessment, $rns, cc_qti_tags::title, $this->assessment_title); //metadata - optional if (!empty($this->metadata)) { $this->metadata->generate($this, $assessment, $rns); } //rubric - optional if (!empty($this->rubric)) { $this->rubric->generate($this, $assessment, $rns); } //presentation_material - optional if (!empty($this->presentation_material)) { $this->presentation_material->generate($this, $assessment, $rns); } //section - required if (!empty($this->section)) { $this->section->generate($this, $assessment, $rns); } return true; } } class assesment11_resurce_file extends assesment1_resurce_file { protected $ccnsnames = array('xmlns' => 'http://www.imsglobal.org/profile/cc/ccv1p1/ccv1p1_qtiasiv1p2p1_v1p0.xsd'); } abstract class cc_assesment_helper { public static $correct_fb = null; public static $incorrect_fb = null; public static function add_feedback($qitem, $content, $content_type, $ident) { if (empty($content)) { return false; } $qitemfeedback = new cc_assesment_itemfeedbacktype(); $qitem->add_itemfeedback($qitemfeedback); if (!empty($ident)) { $qitemfeedback->set_ident($ident); } $qflowmat = new cc_assesment_flow_mattype(); $qitemfeedback->set_flow_mat($qflowmat); $qmaterialfb = new cc_assesment_material(); $qflowmat->set_material($qmaterialfb); $qmattext = new cc_assesment_mattext(); $qmaterialfb->set_mattext($qmattext); $qmattext->set_content($content, $content_type); return true; } public static function add_answer($qresponse_choice, $content, $content_type) { $qresponse_label = new cc_assesment_response_labeltype(); $qresponse_choice->add_response_label($qresponse_label); $qrespmaterial = new cc_assesment_material(); $qresponse_label->set_material($qrespmaterial); $qrespmattext = new cc_assesment_mattext(); $qrespmaterial->set_mattext($qrespmattext); $qrespmattext->set_content($content, $content_type); return $qresponse_label; } public static function add_response_condition($node, $title, $ident, $feedback_refid, $respident) { $qrespcondition = new cc_assesment_respconditiontype(); $node->add_respcondition($qrespcondition); //define rest of the conditions $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); $qvarequal = new cc_assignment_conditionvar_varequaltype($ident); $qvarequal->enable_case(); $qconditionvar->set_varequal($qvarequal); $qvarequal->set_respident($respident); $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($feedback_refid); } public static function add_assesment_description($rt, $content, $contenttype) { if (empty($rt) || empty($content)) { return; } $activity_rubric = new cc_assesment_rubric_base(); $rubric_material = new cc_assesment_material(); $activity_rubric->set_material($rubric_material); $rubric_mattext = new cc_assesment_mattext(); $rubric_material->set_label('Summary'); $rubric_material->set_mattext($rubric_mattext); $rubric_mattext->set_content($content, $contenttype); $rt->set_rubric($activity_rubric); } public static function add_respcondition($node, $title, $feedback_refid, $grade_value = null, $continue = false ) { $qrespcondition = new cc_assesment_respconditiontype(); $qrespcondition->set_title($title); $node->add_respcondition($qrespcondition); $qrespcondition->enable_continue($continue); //Add setvar if grade present if ($grade_value !== null) { $qsetvar = new cc_assignment_setvartype($grade_value); $qrespcondition->add_setvar($qsetvar); } //define the condition for success $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); $qother = new cc_assignment_conditionvar_othertype(); $qconditionvar->set_other($qother); $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($feedback_refid); } /** * * Enter description here ... * @param XMLGenericDocument $qdoc * @param unknown_type $manifest * @param cc_assesment_section $section * @param unknown_type $rootpath * @param unknown_type $contextid * @param unknown_type $outdir */ public static function process_questions(&$qdoc, &$manifest, cc_assesment_section &$section, $rootpath, $contextid, $outdir) { $question_file = $rootpath . DIRECTORY_SEPARATOR . 'questions.xml'; //load questions file $questions = new XMLGenericDocument(); if (!$questions->load($question_file)) { return false; } pkg_resource_dependencies::instance()->reset(); $questioncount = 0; $questionforexport = 0; $qids = $qdoc->nodeList('//question_instances//questionid'); foreach ($qids as $qid) { /** @var DOMNode $qid */ $value = $qid->nodeValue; if (intval($value) == 0) { continue; } $question_node = $questions->node("//question_category/questions/question[@id='{$value}']"); if (empty($question_node)) { continue; } ++$questionforexport; //process question //question type $qtype = $questions->nodeValue('qtype', $question_node); $question_processor = null; switch ($qtype) { case 'multichoice': $single_correct_answer = (int)$questions->nodeValue('plugin_qtype_multichoice_question/multichoice/single', $question_node) > 0; //TODO: Add checking for the nunmber of valid responses //If question is marked as multi response but contains only one valid answer it //should be handle as single response - classic multichoice if ($single_correct_answer) { $question_processor = new cc_assesment_question_multichoice($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); } else { $question_processor = new cc_assesment_question_multichoice_multiresponse($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); } $question_processor->generate(); ++$questioncount; break; case 'truefalse': $question_processor = new cc_assesment_question_truefalse($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); $question_processor->generate(); ++$questioncount; break; case 'essay': $question_processor = new cc_assesment_question_essay($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); $question_processor->generate(); ++$questioncount; break; case 'shortanswer': //This is rather ambiguos since shortanswer supports partial pattern match //In order to detect pattern match we need to scan for all the responses //if at least one of the responses uses wildcards it should be treated as //pattern match, otherwise it should be simple fill in the blank if (self::has_matching_element($questions, $question_node)) { //$question_processor = new cc_assesment_question_patternmatch($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); $questionforexport--; } else { $question_processor = new cc_assesment_question_sfib($qdoc, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); } if (!empty($question_processor)) { $question_processor->generate(); ++$questioncount; } break; default: ; break; } } //return dependencies return ($questioncount == 0) || ($questioncount != $questionforexport)? false: pkg_resource_dependencies::instance()->get_deps(); } /** * * Checks if question has matching element * @param XMLGenericDocument $questions * @param object $question_node * @return bool */ public static function has_matching_element(XMLGenericDocument $questions, $question_node) { $answers = $questions->nodeList('plugin_qtype_shortanswer_question//answertext', $question_node); $result = false; foreach ($answers as $answer) { $prepare = str_replace('\*', '\#', $answer->nodeValue); $result = (strpos($prepare, '*') !== false); if ($result) { break; } } return $result; } } class cc_assesment_question_proc_base { /** * @var XMLGenericDocument */ protected $quiz = null; /** * @var XMLGenericDocument */ protected $questions = null; /** * @var cc_manifest */ protected $manifest = null; /** * @var cc_assesment_section */ protected $section = null; /** * @var DOMElement */ protected $question_node = null; /** * @var string */ protected $rootpath = null; /** * @var string */ protected $contextid = null; /** * @var string */ protected $outdir = null; /** * @var string */ protected $qtype = null; /** * @var cc_question_metadata */ protected $qmetadata = null; /** * @var cc_assesment_section_item */ protected $qitem = null; /** * @var cc_assesment_presentation */ protected $qpresentation = null; /** * @var cc_response_lidtype */ protected $qresponse_lid = null; protected $qresprocessing = null; protected $correct_grade_value = null; protected $correct_answer_node_id = null; protected $correct_answer_ident = null; protected $total_grade_value = null; protected $answerlist = null; protected $general_feedback = null; protected $correct_feedbacks = array(); protected $incorrect_feedbacks = array(); /** * @param XMLGenericDocument $questions * @param cc_manifest $manifest * @param cc_assesment_section $section * @param DOMElement $question_node * @param string $rootpath * @param string $contextid * @param string $outdir */ public function __construct(XMLGenericDocument &$quiz, XMLGenericDocument &$questions, cc_manifest &$manifest, cc_assesment_section &$section, &$question_node, $rootpath, $contextid, $outdir) { $this->quiz = $quiz; $this->questions = $questions; $this->manifest = $manifest; $this->section = $section; $this->question_node = $question_node; $this->rootpath = $rootpath; $this->contextid = $contextid; $this->outdir = $outdir; // $qitem = new cc_assesment_section_item(); $this->section->add_item($qitem); $qitem->set_title($this->questions->nodeValue('name', $this->question_node)); $this->qitem = $qitem; } public function on_generate_metadata() { if (empty($this->qmetadata)) { $this->qmetadata = new cc_question_metadata($this->qtype); //Get weighting value $weighting_value = (int)$this->questions->nodeValue('defaultmark', $this->question_node); if ($weighting_value > 1) { $this->qmetadata->set_weighting($weighting_value); } //Get category $question_category = $this->questions->nodeValue('../../name', $this->question_node); if (!empty($question_category)) { $this->qmetadata->set_category($question_category); } $rts = new cc_assesment_itemmetadata(); $rts->add_metadata($this->qmetadata); $this->qitem->set_itemmetadata($rts); } } public function on_generate_presentation() { if (empty($this->qpresentation)) { $qpresentation = new cc_assesment_presentation(); $this->qitem->set_presentation($qpresentation); //add question text $qmaterial = new cc_assesment_material(); $qmattext = new cc_assesment_mattext(); $question_text = $this->questions->nodeValue('questiontext', $this->question_node); $result = cc_helpers::process_linked_files( $question_text, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); $qmattext->set_content($result[0], cc_qti_values::htmltype); $qmaterial->set_mattext($qmattext); $qpresentation->set_material($qmaterial); $this->qpresentation = $qpresentation; pkg_resource_dependencies::instance()->add($result[1]); } } public function on_generate_answers() {} public function on_generate_feedbacks() { $general_question_feedback = $this->questions->nodeValue('generalfeedback', $this->question_node); if (empty($general_question_feedback)) { return; } $name = 'general_fb'; //Add question general feedback - the one that should be always displayed $result = cc_helpers::process_linked_files( $general_question_feedback, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); cc_assesment_helper::add_feedback($this->qitem, $result[0], cc_qti_values::htmltype, $name); pkg_resource_dependencies::instance()->add($result[1]); $this->general_feedback = $name; } public function on_generate_response_processing() { $qresprocessing = new cc_assesment_resprocessingtype(); $this->qitem->add_resprocessing($qresprocessing); $qdecvar = new cc_assesment_decvartype(); $qresprocessing->set_decvar($qdecvar); //according to the Common Cartridge 1.1 Profile: Implementation document //this should always be set to 0, 100 in case of question type that is not essay $qdecvar->set_limits(0,100); $qdecvar->set_vartype(cc_qti_values::Decimal); $this->qresprocessing = $qresprocessing; } public function generate() { $this->on_generate_metadata(); $this->on_generate_presentation(); $this->on_generate_answers(); $this->on_generate_feedbacks(); $this->on_generate_response_processing(); } } class cc_assesment_question_multichoice extends cc_assesment_question_proc_base { public function __construct($quiz, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir) { parent::__construct($quiz, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); $this->qtype = cc_qti_profiletype::multiple_choice; /** * * What is needed is a maximum grade value taken from the answer fraction * It is supposed to always be between 1 and 0 in decimal representation, * however that is not always the case so a change in test was needed * but since we support here one correct answer type * correct answer would always have to be 1 */ $correct_answer_node = $this->questions->node("plugin_qtype_multichoice_question/answers/answer[fraction > 0]", $this->question_node); if (empty($correct_answer_node)) { throw new RuntimeException('No correct answer!'); } $this->correct_answer_node_id = $this->questions->nodeValue('@id', $correct_answer_node); $maximum_quiz_grade = (int)$this->quiz->nodeValue('/activity/quiz/grade'); $this->total_grade_value = ($maximum_quiz_grade + 1).'.0000000'; } public function on_generate_answers() { //add responses holder $qresponse_lid = new cc_response_lidtype(); $this->qresponse_lid = $qresponse_lid; $this->qpresentation->set_response_lid($qresponse_lid); $qresponse_choice = new cc_assesment_render_choicetype(); $qresponse_lid->set_render_choice($qresponse_choice); //Mark that question has only one correct answer - //which applies for multiple choice and yes/no questions $qresponse_lid->set_rcardinality(cc_qti_values::Single); //are we to shuffle the responses? $shuffle_answers = (int)$this->quiz->nodeValue('/activity/quiz/shuffleanswers') > 0; $qresponse_choice->enable_shuffle($shuffle_answers); $answerlist = array(); $qa_responses = $this->questions->nodeList('plugin_qtype_multichoice_question/answers/answer', $this->question_node); foreach ($qa_responses as $node) { $answer_content = $this->questions->nodeValue('answertext', $node); $id = ((int)$this->questions->nodeValue('@id', $node) == $this->correct_answer_node_id); $result = cc_helpers::process_linked_files( $answer_content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); $qresponse_label = cc_assesment_helper::add_answer( $qresponse_choice, $result[0], cc_qti_values::htmltype); pkg_resource_dependencies::instance()->add($result[1]); $answer_ident = $qresponse_label->get_ident(); $feedback_ident = $answer_ident.'_fb'; if (empty($this->correct_answer_ident) && $id) { $this->correct_answer_ident = $answer_ident; } //add answer specific feedbacks if not empty $content = $this->questions->nodeValue('feedback', $node); if (!empty($content)) { $result = cc_helpers::process_linked_files( $content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); cc_assesment_helper::add_feedback( $this->qitem, $result[0], cc_qti_values::htmltype, $feedback_ident); pkg_resource_dependencies::instance()->add($result[1]); $answerlist[$answer_ident] = $feedback_ident; } } $this->answerlist = $answerlist; } public function on_generate_feedbacks() { parent::on_generate_feedbacks(); //Question combined feedbacks $correct_question_fb = $this->questions->nodeValue('plugin_qtype_multichoice_question/multichoice/correctfeedback', $this->question_node); $incorrect_question_fb = $this->questions->nodeValue('plugin_qtype_multichoice_question/multichoice/incorrectfeedback', $this->question_node); $proc = array('correct_fb' => $correct_question_fb, 'general_incorrect_fb' => $incorrect_question_fb); foreach ($proc as $ident => $content) { if (empty($content)) { continue; } $result = cc_helpers::process_linked_files( $content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); cc_assesment_helper::add_feedback( $this->qitem, $result[0], cc_qti_values::htmltype, $ident); pkg_resource_dependencies::instance()->add($result[1]); if ($ident == 'correct_fb') { $this->correct_feedbacks[] = $ident; } else { $this->incorrect_feedbacks[] = $ident; } } } public function on_generate_response_processing() { parent::on_generate_response_processing(); //respconditions /** * General unconditional feedback must be added as a first respcondition * without any condition and just displayfeedback (if exists) */ if (!empty($this->general_feedback)) { $qrespcondition = new cc_assesment_respconditiontype(); $qrespcondition->set_title('General feedback'); $this->qresprocessing->add_respcondition($qrespcondition); $qrespcondition->enable_continue(); //define the condition for success $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); $qother = new cc_assignment_conditionvar_othertype(); $qconditionvar->set_other($qother); $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid('general_fb'); } //success condition /** * For all question types outside of the Essay question, scoring is done in a * single <respcondition> with a continue flag set to No. The outcome is always * a variable named SCORE which value must be set to 100 in case of correct answer. * Partial scores (not 0 or 100) are not supported. */ $qrespcondition = new cc_assesment_respconditiontype(); $qrespcondition->set_title('Correct'); $this->qresprocessing->add_respcondition($qrespcondition); $qrespcondition->enable_continue(false); $qsetvar = new cc_assignment_setvartype(100); $qrespcondition->add_setvar($qsetvar); //define the condition for success $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); $qvarequal = new cc_assignment_conditionvar_varequaltype($this->correct_answer_ident); $qconditionvar->set_varequal($qvarequal); $qvarequal->set_respident($this->qresponse_lid->get_ident()); if (array_key_exists($this->correct_answer_ident, $this->answerlist)) { $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($this->answerlist[$this->correct_answer_ident]); } foreach ($this->correct_feedbacks as $ident) { $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($ident); } //rest of the conditions foreach ($this->answerlist as $ident => $refid) { if ($ident == $this->correct_answer_ident) { continue; } $qrespcondition = new cc_assesment_respconditiontype(); $this->qresprocessing->add_respcondition($qrespcondition); $qsetvar = new cc_assignment_setvartype(0); $qrespcondition->add_setvar($qsetvar); //define the condition for fail $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); $qvarequal = new cc_assignment_conditionvar_varequaltype($ident); $qconditionvar->set_varequal($qvarequal); $qvarequal->set_respident($this->qresponse_lid->get_ident()); $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($refid); foreach ($this->incorrect_feedbacks as $ident) { $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); $qdisplayfeedback->set_linkrefid($ident); } } } } class cc_assesment_question_multichoice_multiresponse extends cc_assesment_question_proc_base { /** * @var DOMNodeList */ protected $correct_answers = null; public function __construct($quiz, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir) { parent::__construct($quiz, $questions, $manifest, $section, $question_node, $rootpath, $contextid, $outdir); $this->qtype = cc_qti_profiletype::multiple_response; $correct_answer_nodes = $this->questions->nodeList("plugin_qtype_multichoice_question/answers/answer[fraction > 0]", $this->question_node); if ($correct_answer_nodes->length == 0) { throw new RuntimeException('No correct answer!'); } $this->correct_answers = $correct_answer_nodes; //$this->correct_answer_node_id = $this->questions->nodeValue('@id', $correct_answer_node); $maximum_quiz_grade = (int)$this->quiz->nodeValue('/activity/quiz/grade'); $this->total_grade_value = ($maximum_quiz_grade + 1).'.0000000'; } public function on_generate_answers() { //add responses holder $qresponse_lid = new cc_response_lidtype(); $this->qresponse_lid = $qresponse_lid; $this->qpresentation->set_response_lid($qresponse_lid); $qresponse_choice = new cc_assesment_render_choicetype(); $qresponse_lid->set_render_choice($qresponse_choice); //Mark that question has more than one correct answer $qresponse_lid->set_rcardinality(cc_qti_values::Multiple); //are we to shuffle the responses? $shuffle_answers = (int)$this->quiz->nodeValue('/activity/quiz/shuffleanswers') > 0; $qresponse_choice->enable_shuffle($shuffle_answers); $answerlist = array(); $qa_responses = $this->questions->nodeList('plugin_qtype_multichoice_question/answers/answer', $this->question_node); foreach ($qa_responses as $node) { $answer_content = $this->questions->nodeValue('answertext', $node); $answer_grade_fraction = (float)$this->questions->nodeValue('fraction', $node); $result = cc_helpers::process_linked_files( $answer_content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); $qresponse_label = cc_assesment_helper::add_answer( $qresponse_choice, $result[0], cc_qti_values::htmltype); pkg_resource_dependencies::instance()->add($result[1]); $answer_ident = $qresponse_label->get_ident(); $feedback_ident = $answer_ident.'_fb'; //add answer specific feedbacks if not empty $content = $this->questions->nodeValue('feedback', $node); if (!empty($content)) { $result = cc_helpers::process_linked_files( $content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); cc_assesment_helper::add_feedback( $this->qitem, $result[0], cc_qti_values::htmltype, $feedback_ident); pkg_resource_dependencies::instance()->add($result[1]); } $answerlist[$answer_ident] = array($feedback_ident, ($answer_grade_fraction > 0)); } $this->answerlist = $answerlist; } public function on_generate_feedbacks() { parent::on_generate_feedbacks(); //Question combined feedbacks $correct_question_fb = $this->questions->nodeValue('plugin_qtype_multichoice_question/multichoice/correctfeedback', $this->question_node); $incorrect_question_fb = $this->questions->nodeValue('plugin_qtype_multichoice_question/multichoice/incorrectfeedback', $this->question_node); if (empty($correct_question_fb)) { //Hardcode some text for now $correct_question_fb = 'Well done!'; } if (empty($incorrect_question_fb)) { //Hardcode some text for now $incorrect_question_fb = 'Better luck next time!'; } $proc = array('correct_fb' => $correct_question_fb, 'incorrect_fb' => $incorrect_question_fb); foreach ($proc as $ident => $content) { if (empty($content)) { continue; } $result = cc_helpers::process_linked_files( $content, $this->manifest, $this->rootpath, $this->contextid, $this->outdir); cc_assesment_helper::add_feedback( $this->qitem, $result[0], cc_qti_values::htmltype, $ident); pkg_resource_dependencies::instance()->add($result[1]); if ($ident == 'correct_fb') { $this->correct_feedbacks[$ident] = $ident; } else { $this->incorrect_feedbacks[$ident] = $ident; } } } public function on_generate_response_processing() { parent::on_generate_response_processing(); //respconditions /** * General unconditional feedback must be added as a first respcondition * without any condition and just displayfeedback (if exists) */ cc_assesment_helper::add_respcondition( $this->qresprocessing, 'General feedback', $this->general_feedback, null, true ); //success condition /** * For all question types outside of the Essay question, scoring is done in a * single <respcondition> with a continue flag set to No. The outcome is always * a variable named SCORE which value must be set to 100 in case of correct answer. * Partial scores (not 0 or 100) are not supported. */ $qrespcondition = new cc_assesment_respconditiontype(); $qrespcondition->set_title('Correct'); $this->qresprocessing->add_respcondition($qrespcondition); $qrespcondition->enable_continue(false); $qsetvar = new cc_assignment_setvartype(100); $qrespcondition->add_setvar($qsetvar); //define the condition for success $qconditionvar = new cc_assignment_conditionvar(); $qrespcondition->set_conditionvar($qconditionvar); //create root and condition $qandcondition = new cc_assignment_conditionvar_andtype(); $qconditionvar->set_and($qandcondition); foreach ($this->answerlist as $ident => $refid) { $qvarequal = new cc_assignment_conditionvar_varequaltype($ident); $qvarequal->enable_case(); if ($refid[1]) { $qandcondition->set_varequal($qvarequal); } else { $qandcondition->set_not($qvarequal); } $qvarequal->set_respident($this->qresponse_lid->get_ident()); } $qdisplayfeedback = new cc_assignment_displayfeedbacktype(); $qrespcondition->add_displayfeedback($qdisplayfeedback); $qdisplayfeedback->set_feedbacktype(cc_qti_values::Response); //TODO: this needs to be fixed reset($this->correct_feedbacks); $ident = key($this->correct_feedbacks); $qdisplayfeedback->set_linkrefid($ident); //rest of the conditions foreach ($this->answerlist as $ident => $refid) { cc_assesment_helper::add_response_condition( $this->qresprocessing, 'Incorrect feedback', $refid[0], $this->general_feedback, $this->qresponse_lid->get_ident() ); } //Final element for incorrect feedback reset($this->incorrect_feedbacks); $ident = key($this->incorrect_feedbacks); cc_assesment_helper::add_respcondition( $this->qresprocessing, 'Incorrect feedback', $ident, 0 ); } }