class.assClozeTestImport.php

Go to the documentation of this file.

<?php
/* Copyright (c) 1998-2013 ILIAS open source, Extended GPL, see docs/LICENSE */

include_once "./Modules/TestQuestionPool/classes/import/qti12/class.assQuestionImport.php";

class assClozeTestImport extends assQuestionImport
{
    public function fromXML(&$item, $questionpool_id, &$tst_id, &$tst_object, &$question_counter, &$import_mapping)
    {
        global $DIC;
        $ilUser = $DIC['ilUser'];

        // empty session variable for imported xhtml mobs
        unset($_SESSION["import_mob_xhtml"]);
        $presentation = $item->getPresentation();
        $duration = $item->getDuration();

        $packageIliasVersion = $item->getIliasSourceVersion('ILIAS_VERSION');
        $seperate_question_field = $item->getMetadataEntry("question");

        $questiontext = null;
        if (!$packageIliasVersion || version_compare($packageIliasVersion, '5.0.0', '<')) {
            $questiontext = '&nbsp;';
        } elseif ($seperate_question_field) {
            $questiontext = $this->processNonAbstractedImageReferences(
                $seperate_question_field,
                $item->getIliasSourceNic()
            );
        }
            
        $clozetext = array();
        $shuffle = 0;
        $now = getdate();
        $created = sprintf("%04d%02d%02d%02d%02d%02d", $now['year'], $now['mon'], $now['mday'], $now['hours'], $now['minutes'], $now['seconds']);
        $gaps = array();
        foreach ($presentation->order as $entry) {
            switch ($entry["type"]) {
                case "material":

                    $materialString = $this->object->QTIMaterialToString(
                        $presentation->material[$entry["index"]]
                    );
                    
                    if ($questiontext === null) {
                        $questiontext = $materialString;
                    } else {
                        array_push($clozetext, $materialString);
                    }
                    
                    break;
                case "response":
                    $response = $presentation->response[$entry["index"]];
                    $rendertype = $response->getRenderType();
                    array_push($clozetext, "<<" . $response->getIdent() . ">>");

                    switch (strtolower(get_class($response->getRenderType()))) {
                        case "ilqtirenderfib":
                            switch ($response->getRenderType()->getFibtype()) {
                                case FIBTYPE_DECIMAL:
                                case FIBTYPE_INTEGER:
                                    array_push(
                                        $gaps,
                                        array(
                                            "ident" => $response->getIdent(),
                                            "type" => CLOZE_NUMERIC,
                                            "answers" => array(),
                                            "minnumber" => $response->getRenderType()->getMinnumber(),
                                            "maxnumber" => $response->getRenderType()->getMaxnumber(),
                                            'gap_size' => $response->getRenderType()->getMaxchars()
                                        )
                                    );
                                    break;
                                default:
                                case FIBTYPE_STRING:
                                    array_push(
                                        $gaps,
                                        array("ident" => $response->getIdent(),
                                              "type" => CLOZE_TEXT,
                                              "answers" => array(),
                                              'gap_size' => $response->getRenderType()->getMaxchars()
                                        )
                                    );
                                    break;
                            }
                            break;
                        case "ilqtirenderchoice":
                            $answers = array();
                            $shuffle = $rendertype->getShuffle();
                            $answerorder = 0;
                            foreach ($rendertype->response_labels as $response_label) {
                                $ident = $response_label->getIdent();
                                $answertext = "";
                                foreach ($response_label->material as $mat) {
                                    $answertext .= $this->object->QTIMaterialToString($mat);
                                }
                                $answers[$ident] = array(
                                    "answertext" => $answertext,
                                    "points" => 0,
                                    "answerorder" => $answerorder++,
                                    "action" => "",
                                    "shuffle" => $rendertype->getShuffle()
                                );
                            }
                            array_push($gaps, array("ident" => $response->getIdent(), "type" => CLOZE_SELECT, "shuffle" => $rendertype->getShuffle(), "answers" => $answers));
                            break;
                    }
                    break;
            }
        }
        $responses = array();
        $feedbacks = array();
        $feedbacksgeneric = array();
        foreach ($item->resprocessing as $resprocessing) {
            foreach ($resprocessing->respcondition as $respcondition) {
                $ident = "";
                $correctness = 1;
                $conditionvar = $respcondition->getConditionvar();
                foreach ($conditionvar->order as $order) {
                    switch ($order["field"]) {
                        case "varequal":
                            $equals = $conditionvar->varequal[$order["index"]]->getContent();
                            $gapident = $conditionvar->varequal[$order["index"]]->getRespident();
                            break;
                    }
                }
                foreach ($respcondition->setvar as $setvar) {
                    if (strcmp($gapident, "") != 0) {
                        foreach ($gaps as $gi => $g) {
                            if (strcmp($g["ident"], $gapident) == 0) {
                                if ($g["type"] == CLOZE_SELECT) {
                                    foreach ($gaps[$gi]["answers"] as $ai => $answer) {
                                        if (strcmp($answer["answertext"], $equals) == 0) {
                                            $gaps[$gi]["answers"][$ai]["action"] = $setvar->getAction();
                                            $gaps[$gi]["answers"][$ai]["points"] = $setvar->getContent();
                                        }
                                    }
                                } elseif ($g["type"] == CLOZE_TEXT) {
                                    array_push($gaps[$gi]["answers"], array(
                                        "answertext" => $equals,
                                        "points" => $setvar->getContent(),
                                        "answerorder" => count($gaps[$gi]["answers"]),
                                        "action" => $setvar->getAction()
                                        
                                    ));
                                } elseif ($g["type"] == CLOZE_NUMERIC) {
                                    array_push($gaps[$gi]["answers"], array(
                                        "answertext" => $equals,
                                        "points" => $setvar->getContent(),
                                        "answerorder" => count($gaps[$gi]["answers"]),
                                        "action" => $setvar->getAction()
                                    ));
                                }
                            }
                        }
                    }
                }

                if (count($respcondition->displayfeedback)) {
                    foreach ($respcondition->displayfeedback as $feedbackpointer) {
                        if (strlen($feedbackpointer->getLinkrefid())) {
                            foreach ($item->itemfeedback as $ifb) {
                                if (strcmp($ifb->getIdent(), "response_allcorrect") == 0) {
                                    // found a feedback for the identifier
                                    if (count($ifb->material)) {
                                        foreach ($ifb->material as $material) {
                                            $feedbacksgeneric[1] = $material;
                                        }
                                    }
                                    if ((count($ifb->flow_mat) > 0)) {
                                        foreach ($ifb->flow_mat as $fmat) {
                                            if (count($fmat->material)) {
                                                foreach ($fmat->material as $material) {
                                                    $feedbacksgeneric[1] = $material;
                                                }
                                            }
                                        }
                                    }
                                } elseif (strcmp($ifb->getIdent(), "response_onenotcorrect") == 0) {
                                    // found a feedback for the identifier
                                    if (count($ifb->material)) {
                                        foreach ($ifb->material as $material) {
                                            $feedbacksgeneric[0] = $material;
                                        }
                                    }
                                    if ((count($ifb->flow_mat) > 0)) {
                                        foreach ($ifb->flow_mat as $fmat) {
                                            if (count($fmat->material)) {
                                                foreach ($fmat->material as $material) {
                                                    $feedbacksgeneric[0] = $material;
                                                }
                                            }
                                        }
                                    }
                                } else {
                                    // found a feedback for the identifier
                                    if (count($ifb->material)) {
                                        foreach ($ifb->material as $material) {
                                            $feedbacks[$ifb->getIdent()] = $material;
                                        }
                                    }
                                    if ((count($ifb->flow_mat) > 0)) {
                                        foreach ($ifb->flow_mat as $fmat) {
                                            if (count($fmat->material)) {
                                                foreach ($fmat->material as $material) {
                                                    $feedbacks[$ifb->getIdent()] = $material;
                                                }
                                            }
                                        }
                                    }
                                }
                            }
                        }
                    }
                }
            }
        }
    
        $this->addGeneralMetadata($item);
        $this->object->setTitle($item->getTitle());
        $this->object->setNrOfTries($item->getMaxattempts());
        $this->object->setComment($item->getComment());
        $this->object->setAuthor($item->getAuthor());
        $this->object->setOwner($ilUser->getId());
        $this->object->setObjId($questionpool_id);
        $this->object->setEstimatedWorkingTime($duration["h"], $duration["m"], $duration["s"]);
        $textgap_rating = $item->getMetadataEntry("textgaprating");
        $this->object->setFixedTextLength($item->getMetadataEntry("fixedTextLength"));
        $this->object->setIdenticalScoring($item->getMetadataEntry("identicalScoring"));
        $this->object->setFeedbackMode(
            strlen($item->getMetadataEntry("feedback_mode")) ?
            $item->getMetadataEntry("feedback_mode") : ilAssClozeTestFeedback::FB_MODE_GAP_QUESTION
        );
        $combination = json_decode(base64_decode($item->getMetadataEntry("combinations")));
        if (strlen($textgap_rating) == 0) {
            $textgap_rating = "ci";
        }
        $this->object->setTextgapRating($textgap_rating);
        $gaptext = array();
        foreach ($gaps as $gapidx => $gap) {
            $gapcontent = array();
            include_once "./Modules/TestQuestionPool/classes/class.assClozeGap.php";
            $clozegap = new assClozeGap($gap["type"]);
            foreach ($gap["answers"] as $index => $answer) {
                include_once "./Modules/TestQuestionPool/classes/class.assAnswerCloze.php";
                $gapanswer = new assAnswerCloze($answer["answertext"], $answer["points"], $answer["answerorder"]);
                $gapanswer->setGapSize($gap["gap_size"]);
                switch ($clozegap->getType()) {
                    case CLOZE_SELECT:
                        $clozegap->setShuffle($answer["shuffle"]);
                        break;
                    case CLOZE_NUMERIC:
                        $gapanswer->setLowerBound($gap["minnumber"]);
                        $gapanswer->setUpperBound($gap["maxnumber"]);
                        break;
                }
                $clozegap->setGapSize($gap["gap_size"]);
                $clozegap->addItem($gapanswer);
                array_push($gapcontent, $answer["answertext"]);
            }
            $this->object->addGapAtIndex($clozegap, $gapidx);
            $gaptext[$gap["ident"]] = "[gap]" . join(",", $gapcontent) . "[/gap]";
        }
    
        $this->object->setQuestion($questiontext);
        $clozetext = join("", $clozetext);
        
        foreach ($gaptext as $idx => $val) {
            $clozetext = str_replace("<<" . $idx . ">>", $val, $clozetext);
        }
        $this->object->setClozeTextValue($clozetext);

        // additional content editing mode information
        $this->object->setAdditionalContentEditingMode(
            $this->fetchAdditionalContentEditingModeInformation($item)
        );
        $this->object->saveToDb();

        // handle the import of media objects in XHTML code
        foreach ($feedbacks as $ident => $material) {
            $m = $this->object->QTIMaterialToString($material);
            $feedbacks[$ident] = $m;
        }
        foreach ($feedbacksgeneric as $correctness => $material) {
            $m = $this->object->QTIMaterialToString($material);
            $feedbacksgeneric[$correctness] = $m;
        }
        $questiontext = $this->object->getQuestion();
        $clozetext = $this->object->getClozeText();
        if (is_array($_SESSION["import_mob_xhtml"])) {
            include_once "./Services/MediaObjects/classes/class.ilObjMediaObject.php";
            include_once "./Services/RTE/classes/class.ilRTE.php";
            foreach ($_SESSION["import_mob_xhtml"] as $mob) {
                if ($tst_id > 0) {
                    $importfile = $this->getTstImportArchivDirectory() . '/' . $mob["uri"];
                } else {
                    $importfile = $this->getQplImportArchivDirectory() . '/' . $mob["uri"];
                }
                global $DIC; /* @var ILIAS\DI\Container $DIC */
                $DIC['ilLog']->write(__METHOD__ . ': import mob from dir: ' . $importfile);
                
                $media_object = &ilObjMediaObject::_saveTempFileAsMediaObject(basename($importfile), $importfile, false);
                $questiontext = str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $questiontext);
                $clozetext = str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $clozetext);
                foreach ($feedbacks as $ident => $material) {
                    $feedbacks[$ident] = str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $material);
                }
                foreach ($feedbacksgeneric as $correctness => $material) {
                    $feedbacksgeneric[$correctness] = str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $material);
                }
            }
        }
        $this->object->setQuestion(ilRTE::_replaceMediaObjectImageSrc($questiontext, 1));
        $this->object->setClozeTextValue(ilRTE::_replaceMediaObjectImageSrc($clozetext, 1));
        foreach ($feedbacks as $ident => $material) {
            $fbIdentifier = $this->buildFeedbackIdentifier($ident);
            $this->object->feedbackOBJ->importSpecificAnswerFeedback(
                $this->object->getId(),
                $fbIdentifier->getQuestionIndex(),
                $fbIdentifier->getAnswerIndex(),
                ilRTE::_replaceMediaObjectImageSrc($material, 1)
            );
        }
        foreach ($feedbacksgeneric as $correctness => $material) {
            $this->object->feedbackOBJ->importGenericFeedback(
                $this->object->getId(),
                $correctness,
                ilRTE::_replaceMediaObjectImageSrc($material, 1)
            );
        }
        $this->object->saveToDb();
        if (count($item->suggested_solutions)) {
            foreach ($item->suggested_solutions as $suggested_solution) {
                $this->object->setSuggestedSolution($suggested_solution["solution"]->getContent(), $suggested_solution["gap_index"], true);
            }
            $this->object->saveToDb();
        }
        if ($tst_id > 0) {
            $q_1_id = $this->object->getId();
            $question_id = $this->object->duplicate(true, null, null, null, $tst_id);
            $tst_object->questions[$question_counter++] = $question_id;
            $import_mapping[$item->getIdent()] = array("pool" => $q_1_id, "test" => $question_id);
        } else {
            $import_mapping[$item->getIdent()] = array("pool" => $this->object->getId(), "test" => 0);
        }
        $this->object->saveToDb();
        if (is_array($combination) && count($combination) > 0) {
            require_once './Modules/TestQuestionPool/classes/class.assClozeGapCombination.php';
            assClozeGapCombination::clearGapCombinationsFromDb($this->object->getId());
            assClozeGapCombination::importGapCombinationToDb($this->object->getId(), $combination);
        }
        $this->object->saveToDb();
    }
    
    protected function buildFeedbackIdentifier($ident)
    {
        require_once 'Modules/TestQuestionPool/classes/feedback/class.ilAssSpecificFeedbackIdentifier.php';
        $fbIdentifier = new ilAssSpecificFeedbackIdentifier();
        
        $ident = explode('_', $ident);
        
        if (count($ident) > 1) {
            $fbIdentifier->setQuestionIndex($ident[0]);
            $fbIdentifier->setAnswerIndex($ident[1]);
        } else {
            $fbIdentifier->setQuestionIndex($ident[0]);
            $fbIdentifier->setAnswerIndex(0);
        }
        
        return $fbIdentifier;
    }
}