See Release Notes
Long Term Support Release
<?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 ); } }