Returns a QTI xml representation of the question.
Returns a QTI xml representation of the question and sets the internal domxml variable with the DOM XML representation of the QTI xml representation
{
global $ilias;
include_once("./Services/Xml/classes/class.ilXmlWriter.php");
$a_xml_writer->xmlStartTag("questestinterop");
$attrs = array(
"ident" => "il_".IL_INST_ID."_qst_".$this->object->getId(),
"title" => $this->object->getTitle(),
"maxattempts" => $this->object->getNrOfTries()
);
$a_xml_writer->xmlStartTag("item", $attrs);
$a_xml_writer->xmlElement("qticomment", NULL, $this->object->getComment());
$workingtime = $this->object->getEstimatedWorkingTime();
$duration = sprintf("P0Y0M0DT%dH%dM%dS", $workingtime["h"], $workingtime["m"], $workingtime["s"]);
$a_xml_writer->xmlElement("duration", NULL, $duration);
$a_xml_writer->xmlStartTag("itemmetadata");
$a_xml_writer->xmlStartTag("qtimetadata");
$a_xml_writer->xmlStartTag("qtimetadatafield");
$a_xml_writer->xmlElement("fieldlabel", NULL, "ILIAS_VERSION");
$a_xml_writer->xmlElement("fieldentry", NULL, $ilias->getSetting("ilias_version"));
$a_xml_writer->xmlEndTag("qtimetadatafield");
$a_xml_writer->xmlStartTag("qtimetadatafield");
$a_xml_writer->xmlElement("fieldlabel", NULL, "QUESTIONTYPE");
$a_xml_writer->xmlEndTag("qtimetadatafield");
$a_xml_writer->xmlStartTag("qtimetadatafield");
$a_xml_writer->xmlElement("fieldlabel", NULL, "AUTHOR");
$a_xml_writer->xmlElement("fieldentry", NULL, $this->object->getAuthor());
$a_xml_writer->xmlEndTag("qtimetadatafield");
$a_xml_writer->xmlEndTag("qtimetadata");
$a_xml_writer->xmlEndTag("itemmetadata");
$attrs = array(
"label" => $this->object->getTitle()
);
$a_xml_writer->xmlStartTag("presentation", $attrs);
$a_xml_writer->xmlStartTag("flow");
$this->object->addQTIMaterial($a_xml_writer, $this->object->getQuestion());
$attrs = array(
"ident" => "IM",
"rcardinality" => "Single"
);
$a_xml_writer->xmlStartTag("response_xy", $attrs);
$solution = $this->object->getSuggestedSolution(0);
if (count($solution))
{
if (preg_match("/il_(\d*?)_(\w+)_(\d+)/", $solution["internal_link"], $matches))
{
$a_xml_writer->xmlStartTag("material");
$intlink = "il_" . IL_INST_ID . "_" . $matches[2] . "_" . $matches[3];
if (strcmp($matches[1], "") != 0)
{
$intlink = $solution["internal_link"];
}
$attrs = array(
"label" => "suggested_solution"
);
$a_xml_writer->xmlElement("mattext", $attrs, $intlink);
$a_xml_writer->xmlEndTag("material");
}
}
$a_xml_writer->xmlStartTag("render_hotspot");
$a_xml_writer->xmlStartTag("material");
$imagetype = "image/jpeg";
if (preg_match("/.*\.(png|gif)$/", $this->object->getImageFilename(), $matches))
{
$imagetype = "image/" . $matches[1];
}
$attrs = array(
"imagtype" => $imagetype,
"label" => $this->object->getImageFilename()
);
if ($a_include_binary)
{
if ($force_image_references)
{
$attrs["uri"] = $this->object->getImagePathWeb() . $this->object->getImageFilename();
$a_xml_writer->xmlElement("matimage", $attrs);
}
else
{
$attrs["embedded"] = "base64";
$imagepath = $this->object->getImagePath() . $this->object->getImageFilename();
$fh = fopen($imagepath, "rb");
if ($fh == false)
{
$ilErr->raiseError($this->object->lng->txt("error_open_image_file"), $ilErr->MESSAGE);
return;
}
$imagefile = fread($fh, filesize($imagepath));
fclose($fh);
$base64 = base64_encode($imagefile);
$a_xml_writer->xmlElement("matimage", $attrs, $base64, FALSE, FALSE);
}
}
else
{
$a_xml_writer->xmlElement("matimage", $attrs);
}
$a_xml_writer->xmlEndTag("material");
foreach ($this->object->getAnswers() as $index => $answer)
{
$rared = "";
switch ($answer->getArea())
{
case "rect":
$rarea = "Rectangle";
break;
case "circle":
$rarea = "Ellipse";
break;
case "poly":
$rarea = "Bounded";
break;
}
$attrs = array(
"ident" => $index,
"rarea" => $rarea
);
$a_xml_writer->xmlStartTag("response_label", $attrs);
$a_xml_writer->xmlData($answer->getCoords());
$a_xml_writer->xmlStartTag("material");
$a_xml_writer->xmlElement("mattext", NULL, $answer->getAnswertext());
$a_xml_writer->xmlEndTag("material");
$a_xml_writer->xmlEndTag("response_label");
}
$a_xml_writer->xmlEndTag("render_hotspot");
$a_xml_writer->xmlEndTag("response_xy");
$a_xml_writer->xmlEndTag("flow");
$a_xml_writer->xmlEndTag("presentation");
$a_xml_writer->xmlStartTag("resprocessing");
$a_xml_writer->xmlStartTag("outcomes");
$a_xml_writer->xmlStartTag("decvar");
$a_xml_writer->xmlEndTag("decvar");
$a_xml_writer->xmlEndTag("outcomes");
foreach ($this->object->getAnswers() as $index => $answer)
{
$attrs = array(
"continue" => "Yes"
);
$a_xml_writer->xmlStartTag("respcondition", $attrs);
$a_xml_writer->xmlStartTag("conditionvar");
if (!$answer->isStateSet())
{
$a_xml_writer->xmlStartTag("not");
}
$areatype = "";
switch ($answer->getArea())
{
case "rect":
$areatype = "Rectangle";
break;
case "circle":
$areatype = "Ellipse";
break;
case "poly":
$areatype = "Bounded";
break;
}
$attrs = array(
"respident" => "IM",
"areatype" => $areatype
);
$a_xml_writer->xmlElement("varinside", $attrs, $answer->getCoords());
if (!$answer->isStateSet())
{
$a_xml_writer->xmlEndTag("not");
}
$a_xml_writer->xmlEndTag("conditionvar");
$attrs = array(
"action" => "Add"
);
$a_xml_writer->xmlElement("setvar", $attrs, $answer->getPoints());
$linkrefid = "response_$index";
$attrs = array(
"feedbacktype" => "Response",
"linkrefid" => $linkrefid
);
$a_xml_writer->xmlElement("displayfeedback", $attrs);
$a_xml_writer->xmlEndTag("respcondition");
}
$answers = $this->object->getAnswers();
$feedback_allcorrect = $this->object->getFeedbackGeneric(1);
if (strlen($feedback_allcorrect))
{
$attrs = array(
"continue" => "Yes"
);
$a_xml_writer->xmlStartTag("respcondition", $attrs);
$a_xml_writer->xmlStartTag("conditionvar");
$bestindex = 0;
$maxpoints = 0;
foreach ($answers as $index => $answer)
{
if ($answer->getPoints() > $maxpoints)
{
$maxpoints = $answer->getPoints();
$bestindex = $index;
}
}
$attrs = array(
"respident" => "IM"
);
$areatype = "";
$answer = $answers[$bestindex];
switch ($answer->getArea())
{
case "rect":
$areatype = "Rectangle";
break;
case "circle":
$areatype = "Ellipse";
break;
case "poly":
$areatype = "Bounded";
break;
}
$attrs = array(
"respident" => "IM",
"areatype" => $areatype
);
$a_xml_writer->xmlElement("varinside", $attrs, $answer->getCoords());
$a_xml_writer->xmlEndTag("conditionvar");
$attrs = array(
"feedbacktype" => "Response",
"linkrefid" => "response_allcorrect"
);
$a_xml_writer->xmlElement("displayfeedback", $attrs);
$a_xml_writer->xmlEndTag("respcondition");
}
$feedback_onenotcorrect = $this->object->getFeedbackGeneric(0);
if (strlen($feedback_onenotcorrect))
{
$attrs = array(
"continue" => "Yes"
);
$a_xml_writer->xmlStartTag("respcondition", $attrs);
$a_xml_writer->xmlStartTag("conditionvar");
$bestindex = 0;
$maxpoints = 0;
foreach ($answers as $index => $answer)
{
if ($answer->getPoints() > $maxpoints)
{
$maxpoints = $answer->getPoints();
$bestindex = $index;
}
}
$attrs = array(
"respident" => "IM"
);
$a_xml_writer->xmlStartTag("not");
$areatype = "";
$answer = $answers[$bestindex];
switch ($answer->getArea())
{
case "rect":
$areatype = "Rectangle";
break;
case "circle":
$areatype = "Ellipse";
break;
case "poly":
$areatype = "Bounded";
break;
}
$attrs = array(
"respident" => "IM",
"areatype" => $areatype
);
$a_xml_writer->xmlElement("varinside", $attrs, $answer->getCoords());
$a_xml_writer->xmlEndTag("not");
$a_xml_writer->xmlEndTag("conditionvar");
$attrs = array(
"feedbacktype" => "Response",
"linkrefid" => "response_onenotcorrect"
);
$a_xml_writer->xmlElement("displayfeedback", $attrs);
$a_xml_writer->xmlEndTag("respcondition");
}
$a_xml_writer->xmlEndTag("resprocessing");
foreach ($this->object->getAnswers() as $index => $answer)
{
$linkrefid = "";
$linkrefid = "response_$index";
$attrs = array(
"ident" => $linkrefid,
"view" => "All"
);
$a_xml_writer->xmlStartTag("itemfeedback", $attrs);
$a_xml_writer->xmlStartTag("flow_mat");
$this->object->addQTIMaterial($a_xml_writer, $this->object->getFeedbackSingleAnswer($index));
$a_xml_writer->xmlEndTag("flow_mat");
$a_xml_writer->xmlEndTag("itemfeedback");
}
if (strlen($feedback_allcorrect))
{
$attrs = array(
"ident" => "response_allcorrect",
"view" => "All"
);
$a_xml_writer->xmlStartTag("itemfeedback", $attrs);
$a_xml_writer->xmlStartTag("flow_mat");
$this->object->addQTIMaterial($a_xml_writer, $feedback_allcorrect);
$a_xml_writer->xmlEndTag("flow_mat");
$a_xml_writer->xmlEndTag("itemfeedback");
}
if (strlen($feedback_onenotcorrect))
{
$attrs = array(
"ident" => "response_onenotcorrect",
"view" => "All"
);
$a_xml_writer->xmlStartTag("itemfeedback", $attrs);
$a_xml_writer->xmlStartTag("flow_mat");
$this->object->addQTIMaterial($a_xml_writer, $feedback_onenotcorrect);
$a_xml_writer->xmlEndTag("flow_mat");
$a_xml_writer->xmlEndTag("itemfeedback");
}
$a_xml_writer->xmlEndTag("item");
$a_xml_writer->xmlEndTag("questestinterop");
$xml = $a_xml_writer->xmlDumpMem(FALSE);
if (!$a_include_header)
{
$pos = strpos($xml, "?>");
$xml = substr($xml, $pos + 2);
}
return $xml;
}