4 include_once
"./Modules/TestQuestionPool/classes/export/qti12/class.assQuestionExport.php";
26 function toXML($a_include_header =
true, $a_include_binary =
true, $a_shuffle =
false, $test_output =
false, $force_image_references =
false)
32 include_once(
"./Services/Xml/classes/class.ilXmlWriter.php");
36 $a_xml_writer->xmlStartTag(
"questestinterop");
38 "ident" =>
"il_".IL_INST_ID.
"_qst_".$this->object->getId(),
39 "title" => $this->
object->getTitle(),
40 "maxattempts" => $this->
object->getNrOfTries()
42 $a_xml_writer->xmlStartTag(
"item", $attrs);
44 $a_xml_writer->xmlElement(
"qticomment", NULL, $this->object->getComment());
46 $workingtime = $this->
object->getEstimatedWorkingTime();
47 $duration = sprintf(
"P0Y0M0DT%dH%dM%dS", $workingtime[
"h"], $workingtime[
"m"], $workingtime[
"s"]);
48 $a_xml_writer->xmlElement(
"duration", NULL, $duration);
50 $a_xml_writer->xmlStartTag(
"itemmetadata");
51 $a_xml_writer->xmlStartTag(
"qtimetadata");
52 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
53 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"ILIAS_VERSION");
54 $a_xml_writer->xmlElement(
"fieldentry", NULL, $ilias->getSetting(
"ilias_version"));
55 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
56 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
57 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"QUESTIONTYPE");
59 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
60 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
61 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"AUTHOR");
62 $a_xml_writer->xmlElement(
"fieldentry", NULL, $this->object->getAuthor());
63 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
69 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
70 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"thumb_geometry");
71 $a_xml_writer->xmlElement(
"fieldentry", NULL, $this->object->getThumbGeometry());
72 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
73 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
74 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"element_height");
75 $a_xml_writer->xmlElement(
"fieldentry", NULL, $this->object->getElementHeight());
76 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
77 $a_xml_writer->xmlStartTag(
"qtimetadatafield");
78 $a_xml_writer->xmlElement(
"fieldlabel", NULL,
"points");
79 $a_xml_writer->xmlElement(
"fieldentry", NULL, $this->object->getPoints());
80 $a_xml_writer->xmlEndTag(
"qtimetadatafield");
81 $a_xml_writer->xmlEndTag(
"qtimetadata");
82 $a_xml_writer->xmlEndTag(
"itemmetadata");
86 "label" => $this->object->getTitle()
88 $a_xml_writer->xmlStartTag(
"presentation", $attrs);
90 $a_xml_writer->xmlStartTag(
"flow");
92 $this->
object->addQTIMaterial($a_xml_writer, $this->object->getQuestion());
96 if ($this->object->getOrderingType() ==
OQ_PICTURES)
97 $ordering_type =
'OQP';
99 $ordering_type =
'OQNP';
101 $ordering_type =
'OQNT';
102 else if($this->object->getOrderingType() ==
OQ_TERMS)
103 $ordering_type =
'OQT';
106 "ident" => $ordering_type,
107 "rcardinality" =>
"Ordered" 112 $attrs[
"output"] =
"javascript";
114 $a_xml_writer->xmlStartTag(
"response_lid", $attrs);
115 $solution = $this->
object->getSuggestedSolution(0);
116 if (count($solution))
118 if (preg_match(
"/il_(\d*?)_(\w+)_(\d+)/", $solution[
"internal_link"], $matches))
120 $a_xml_writer->xmlStartTag(
"material");
121 $intlink =
"il_" . IL_INST_ID .
"_" . $matches[2] .
"_" . $matches[3];
122 if (strcmp($matches[1],
"") != 0)
124 $intlink = $solution[
"internal_link"];
127 "label" =>
"suggested_solution" 129 $a_xml_writer->xmlElement(
"mattext", $attrs, $intlink);
130 $a_xml_writer->xmlEndTag(
"material");
135 if ($this->object->getShuffle())
147 $a_xml_writer->xmlStartTag(
"render_choice", $attrs);
149 $akeys = array_keys($this->object->getAnswers());
150 if ($this->object->getShuffle() && $a_shuffle)
152 $akeys = $this->
object->pcArrayShuffle($akeys);
156 foreach ($akeys as $index)
158 $answer = $this->
object->getAnswer($index);
162 $a_xml_writer->xmlStartTag(
"response_label", $attrs);
163 if ($this->object->getOrderingType() ==
OQ_PICTURES 166 $imagetype =
"image/jpeg";
168 $a_xml_writer->xmlStartTag(
"material");
169 if ($force_image_references)
172 "imagtype" => $imagetype,
173 "label" => $answer->getAnswertext(),
174 "uri" => $this->
object->getImagePathWeb() . $answer->getAnswertext()
176 $a_xml_writer->xmlElement(
"matimage", $attrs);
180 $imagepath = $this->
object->getImagePath() . $answer->getAnswertext();
181 $fh = @fopen($imagepath,
"rb");
184 $imagefile = fread($fh, filesize($imagepath));
186 $base64 = base64_encode($imagefile);
188 if (preg_match(
"/.*\.(png|gif)$/", $answer->getAnswertext(), $matches))
190 $imagetype =
"image/".$matches[1];
193 "imagtype" => $imagetype,
194 "label" => $answer->getAnswertext(),
195 "embedded" =>
"base64" 197 $a_xml_writer->xmlElement(
"matimage", $attrs, $base64, FALSE, FALSE);
200 $a_xml_writer->xmlEndTag(
"material");
202 else if ($this->object->getOrderingType() ==
OQ_TERMS 205 $a_xml_writer->xmlStartTag(
"material");
206 $this->
object->addQTIMaterial($a_xml_writer, $answer->getAnswertext(), TRUE, FALSE);
207 $a_xml_writer->xmlEndTag(
"material");
208 $a_xml_writer->xmlStartTag(
"material");
209 if ($this->object->getOldLeveledOrdering())
212 "label" =>
"answerdepth" 214 $a_xml_writer->xmlElement(
"mattext", $attrs, $answer->getOrderingDepth());
216 $a_xml_writer->xmlEndTag(
"material");
218 $a_xml_writer->xmlEndTag(
"response_label");
220 $a_xml_writer->xmlEndTag(
"render_choice");
221 $a_xml_writer->xmlEndTag(
"response_lid");
222 $a_xml_writer->xmlEndTag(
"flow");
223 $a_xml_writer->xmlEndTag(
"presentation");
226 $a_xml_writer->xmlStartTag(
"resprocessing");
227 $a_xml_writer->xmlStartTag(
"outcomes");
228 $a_xml_writer->xmlStartTag(
"decvar");
229 $a_xml_writer->xmlEndTag(
"decvar");
230 $a_xml_writer->xmlEndTag(
"outcomes");
232 foreach ($this->object->getAnswers() as $index => $answer)
237 $a_xml_writer->xmlStartTag(
"respcondition", $attrs);
239 $a_xml_writer->xmlStartTag(
"conditionvar");
242 if ($this->object->getOrderingType() ==
OQ_PICTURES)
243 $ordering_type =
'OQP';
245 $ordering_type =
'OQNP';
247 $ordering_type =
'OQNT';
248 else if($this->object->getOrderingType() ==
OQ_TERMS)
249 $ordering_type =
'OQT';
251 $attrs = array(
"respident" => $ordering_type);
253 $attrs[
"index"] = $index;
254 $a_xml_writer->xmlElement(
"varequal", $attrs, $index);
255 $a_xml_writer->xmlEndTag(
"conditionvar");
260 $a_xml_writer->xmlElement(
"setvar", $attrs, $this->object->getPoints() / count($this->object->getAnswers()));
263 "feedbacktype" =>
"Response",
264 "linkrefid" =>
"link_$index" 266 $a_xml_writer->xmlElement(
"displayfeedback", $attrs);
267 $a_xml_writer->xmlEndTag(
"respcondition");
270 $feedback_allcorrect = $this->
object->feedbackOBJ->getGenericFeedbackExportPresentation(
271 $this->object->getId(), true
273 if (strlen($feedback_allcorrect))
278 $a_xml_writer->xmlStartTag(
"respcondition", $attrs);
280 $a_xml_writer->xmlStartTag(
"conditionvar");
282 foreach ($this->object->getAnswers() as $index => $answer)
286 if ($this->object->getOrderingType() ==
OQ_PICTURES)
287 $ordering_type =
'OQP';
289 $ordering_type =
'OQNP';
291 $ordering_type =
'OQNT';
292 else if($this->object->getOrderingType() ==
OQ_TERMS)
293 $ordering_type =
'OQT';
295 $attrs = array(
"respident" => $ordering_type);
297 $attrs[
"index"] = $index;
298 $a_xml_writer->xmlElement(
"varequal", $attrs, $index);
301 $a_xml_writer->xmlEndTag(
"conditionvar");
304 "feedbacktype" =>
"Response",
305 "linkrefid" =>
"response_allcorrect" 307 $a_xml_writer->xmlElement(
"displayfeedback", $attrs);
308 $a_xml_writer->xmlEndTag(
"respcondition");
311 $feedback_onenotcorrect = $this->
object->feedbackOBJ->getGenericFeedbackExportPresentation(
312 $this->object->getId(), false
314 if (strlen($feedback_onenotcorrect))
319 $a_xml_writer->xmlStartTag(
"respcondition", $attrs);
321 $a_xml_writer->xmlStartTag(
"conditionvar");
322 $a_xml_writer->xmlStartTag(
"not");
324 foreach ($this->object->getAnswers() as $index => $answer)
327 if ($this->object->getOrderingType() ==
OQ_PICTURES)
328 $ordering_type =
'OQP';
330 $ordering_type =
'OQNP';
332 $ordering_type =
'OQNT';
333 else if($this->object->getOrderingType() ==
OQ_TERMS)
334 $ordering_type =
'OQT';
336 $attrs = array(
"respident" => $ordering_type);
338 $attrs[
"index"] = $index;
339 $a_xml_writer->xmlElement(
"varequal", $attrs, $index);
342 $a_xml_writer->xmlEndTag(
"not");
343 $a_xml_writer->xmlEndTag(
"conditionvar");
346 "feedbacktype" =>
"Response",
347 "linkrefid" =>
"response_onenotcorrect" 349 $a_xml_writer->xmlElement(
"displayfeedback", $attrs);
350 $a_xml_writer->xmlEndTag(
"respcondition");
353 $a_xml_writer->xmlEndTag(
"resprocessing");
356 foreach ($this->object->getAnswers() as $index => $answer)
359 "ident" =>
"link_$index",
362 $a_xml_writer->xmlStartTag(
"itemfeedback", $attrs);
364 $a_xml_writer->xmlStartTag(
"flow_mat");
365 $a_xml_writer->xmlStartTag(
"material");
366 $a_xml_writer->xmlElement(
"mattext");
367 $a_xml_writer->xmlEndTag(
"material");
368 $a_xml_writer->xmlEndTag(
"flow_mat");
369 $a_xml_writer->xmlEndTag(
"itemfeedback");
372 if (strlen($feedback_allcorrect))
375 "ident" =>
"response_allcorrect",
378 $a_xml_writer->xmlStartTag(
"itemfeedback", $attrs);
380 $a_xml_writer->xmlStartTag(
"flow_mat");
381 $this->
object->addQTIMaterial($a_xml_writer, $feedback_allcorrect);
382 $a_xml_writer->xmlEndTag(
"flow_mat");
383 $a_xml_writer->xmlEndTag(
"itemfeedback");
385 if (strlen($feedback_onenotcorrect))
388 "ident" =>
"response_onenotcorrect",
391 $a_xml_writer->xmlStartTag(
"itemfeedback", $attrs);
393 $a_xml_writer->xmlStartTag(
"flow_mat");
394 $this->
object->addQTIMaterial($a_xml_writer, $feedback_onenotcorrect);
395 $a_xml_writer->xmlEndTag(
"flow_mat");
396 $a_xml_writer->xmlEndTag(
"itemfeedback");
399 $a_xml_writer->xmlEndTag(
"item");
400 $a_xml_writer->xmlEndTag(
"questestinterop");
402 $xml = $a_xml_writer->xmlDumpMem(FALSE);
403 if (!$a_include_header)
405 $pos = strpos($xml,
"?>");
406 $xml = substr($xml, $pos + 2);
Class for ordering question exports.
Class for question exports.
addGeneralMetadata(ilXmlWriter $xmlwriter)
const OQ_PICTURES
Ordering question constants.
const ORDERING_QUESTION_IDENTIFIER
toXML($a_include_header=true, $a_include_binary=true, $a_shuffle=false, $test_output=false, $force_image_references=false)
Returns a QTI xml representation of the question.
xmlHeader()
Writes xml header public.
addAdditionalContentEditingModeInformation(ilXmlWriter $a_xml_writer)
adds a qti meta data field for ilias specific information of "additional content editing mode" (xml w...