Modules/TestQuestionPool/classes/class.assTextQuestion.php

Go to the documentation of this file.

<?php
 /*
   +----------------------------------------------------------------------------+
   | ILIAS open source                                                          |
   +----------------------------------------------------------------------------+
   | Copyright (c) 1998-2001 ILIAS open source, University of Cologne           |
   |                                                                            |
   | This program 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 2             |
   | of the License, or (at your option) any later version.                     |
   |                                                                            |
   | This program 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 this program; if not, write to the Free Software                |
   | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
   +----------------------------------------------------------------------------+
*/
include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
include_once "./Modules/Test/classes/inc.AssessmentConstants.php";

class assTextQuestion extends assQuestion
{
        var $maxNumOfChars;

        var $keywords;

        var $text_rating;

        function assTextQuestion(
                $title = "",
                $comment = "",
                $author = "",
                $owner = -1,
                $question = ""
          )
        {
                $this->assQuestion($title, $comment, $author, $owner, $question);
                $this->maxNumOfChars = 0;
                $this->points = 0;
                $this->keywords = "";
        }

        function isComplete()
        {
                if (($this->title) and ($this->author) and ($this->question) and ($this->getMaximumPoints() > 0))
                {
                        return true;
                }
                        else
                {
                        return false;
                }
        }

        function saveToDb($original_id = "")
        {
                global $ilDB;

                $complete = 0;
                if ($this->isComplete())
                {
                        $complete = 1;
                }
                $estw_time = $this->getEstimatedWorkingTime();
                $estw_time = sprintf("%02d:%02d:%02d", $estw_time['h'], $estw_time['m'], $estw_time['s']);

                if ($original_id)
                {
                        $original_id = $ilDB->quote($original_id);
                }
                else
                {
                        $original_id = "NULL";
                }

                // cleanup RTE images which are not inserted into the question text
                include_once("./Services/RTE/classes/class.ilRTE.php");
                if ($this->id == -1)
                {
                        // Neuen Datensatz schreiben
                        $now = getdate();
                        $question_type = $this->getQuestionTypeID();
                        $created = sprintf("%04d%02d%02d%02d%02d%02d", $now['year'], $now['mon'], $now['mday'], $now['hours'], $now['minutes'], $now['seconds']);
                        $query = sprintf("INSERT INTO qpl_questions (question_id, question_type_fi, obj_fi, title, comment, author, owner, points, question_text, working_time, complete, created, original_id, TIMESTAMP) VALUES (NULL, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, NULL)",
                                $ilDB->quote($question_type),
                                $ilDB->quote($this->obj_id),
                                $ilDB->quote($this->title),
                                $ilDB->quote($this->comment),
                                $ilDB->quote($this->author),
                                $ilDB->quote($this->owner),
                                $ilDB->quote($this->getPoints() . ""),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->question, 0)),
                                $ilDB->quote($estw_time),
                                $ilDB->quote("$complete"),
                                $ilDB->quote($created),
                                $original_id
                        );
                        $result = $ilDB->query($query);
                        
                        if ($result == DB_OK)
                        {
                                $this->id = $ilDB->getLastInsertId();
                                $query = sprintf("INSERT INTO qpl_question_essay (question_fi, maxNumOfChars, keywords, textgap_rating) VALUES (%s, %s, %s, %s)",
                                        $ilDB->quote($this->id . ""),
                                        $ilDB->quote($this->getMaxNumOfChars()),
                                        $ilDB->quote($this->getKeywords() . ""),
                                        $ilDB->quote($this->getTextRating() . "")
                                );
                                $ilDB->query($query);

                                // create page object of question
                                $this->createPageObject();

                                if ($this->getTestId() > 0)
                                {
                                        $this->insertIntoTest($this->getTestId());
                                }
                        }
                }
                else
                {
                        // Vorhandenen Datensatz aktualisieren
                        $query = sprintf("UPDATE qpl_questions SET obj_fi = %s, title = %s, comment = %s, author = %s, points = %s, question_text = %s, working_time=%s, complete = %s WHERE question_id = %s",
                                $ilDB->quote($this->obj_id. ""),
                                $ilDB->quote($this->title),
                                $ilDB->quote($this->comment),
                                $ilDB->quote($this->author),
                                $ilDB->quote($this->getPoints() . ""),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->question, 0)),
                                $ilDB->quote($estw_time),
                                $ilDB->quote("$complete"),
                                $ilDB->quote($this->id)
                        );
                        $result = $ilDB->query($query);
                        $query = sprintf("UPDATE qpl_question_essay SET maxNumOfChars = %s, keywords = %s, textgap_rating = %s WHERE question_fi = %s",
                                $ilDB->quote($this->getMaxNumOfChars()),
                                $ilDB->quote($this->getKeywords() . ""),
                                $ilDB->quote($this->getTextRating() . ""),
                                $ilDB->quote($this->id . "")
                        );
                        $result = $ilDB->query($query);
                }
                parent::saveToDb($original_id);
        }

        function loadFromDb($question_id)
        {
                global $ilDB;

    $query = sprintf("SELECT qpl_questions.*, qpl_question_essay.* FROM qpl_questions, qpl_question_essay WHERE question_id = %s AND qpl_questions.question_id = qpl_question_essay.question_fi",
                        $ilDB->quote($question_id)
                );
                $result = $ilDB->query($query);
                if (strcmp(strtolower(get_class($result)), db_result) == 0)
                {
                        if ($result->numRows() == 1)
                        {
                                $data = $result->fetchRow(DB_FETCHMODE_OBJECT);
                                $this->id = $question_id;
                                $this->title = $data->title;
                                $this->comment = $data->comment;
                                $this->solution_hint = $data->solution_hint;
                                $this->original_id = $data->original_id;
                                $this->obj_id = $data->obj_fi;
                                $this->author = $data->author;
                                $this->owner = $data->owner;
                                include_once("./Services/RTE/classes/class.ilRTE.php");
                                $this->question = ilRTE::_replaceMediaObjectImageSrc($data->question_text, 1);
                                $this->maxNumOfChars = $data->maxNumOfChars;
                                $this->keywords = $data->keywords;
                                $this->text_rating = $data->textgap_rating;
                                $this->points = $data->points;
                                $this->setEstimatedWorkingTime(substr($data->working_time, 0, 2), substr($data->working_time, 3, 2), substr($data->working_time, 6, 2));
                        }
                }
                parent::loadFromDb($question_id);
        }

        function duplicate($for_test = true, $title = "", $author = "", $owner = "")
        {
                if ($this->id <= 0)
                {
                        // The question has not been saved. It cannot be duplicated
                        return;
                }
                // duplicate the question in database
                $this_id = $this->getId();
                $clone = $this;
                include_once ("./Modules/TestQuestionPool/classes/class.assQuestion.php");
                $original_id = assQuestion::_getOriginalId($this->id);
                $clone->id = -1;
                if ($title)
                {
                        $clone->setTitle($title);
                }

                if ($author)
                {
                        $clone->setAuthor($author);
                }
                if ($owner)
                {
                        $clone->setOwner($owner);
                }

                if ($for_test)
                {
                        $clone->saveToDb($original_id);
                }
                else
                {
                        $clone->saveToDb();
                }

                // copy question page content
                $clone->copyPageOfQuestion($this_id);
                // copy XHTML media objects
                $clone->copyXHTMLMediaObjectsOfQuestion($this_id);
                // duplicate the generic feedback
                $clone->duplicateFeedbackGeneric($this_id);

                return $clone->id;
        }

        function copyObject($target_questionpool, $title = "")
        {
                if ($this->id <= 0)
                {
                        // The question has not been saved. It cannot be duplicated
                        return;
                }
                // duplicate the question in database
                $clone = $this;
                include_once ("./Modules/TestQuestionPool/classes/class.assQuestion.php");
                $original_id = assQuestion::_getOriginalId($this->id);
                $clone->id = -1;
                $source_questionpool = $this->getObjId();
                $clone->setObjId($target_questionpool);
                if ($title)
                {
                        $clone->setTitle($title);
                }
                $clone->saveToDb();

                // copy question page content
                $clone->copyPageOfQuestion($original_id);
                // copy XHTML media objects
                $clone->copyXHTMLMediaObjectsOfQuestion($original_id);
                // duplicate the generic feedback
                $clone->duplicateFeedbackGeneric($original_id);

                return $clone->id;
        }

        function getMaxNumOfChars()
        {
                if (strcmp($this->maxNumOfChars, "") == 0)
                {
                        return 0;
                }
                else
                {
                        return $this->maxNumOfChars;
                }
        }

        function setMaxNumOfChars($maxchars = 0)
        {
                $this->maxNumOfChars = $maxchars;
        }

        function getMaximumPoints()
        {
                return $this->points;
        }

        function setReachedPoints($active_id, $points, $pass = NULL)
        {
                global $ilDB;
                
                if (($points > 0) && ($points <= $this->getPoints()))
                {
                        if (is_null($pass))
                        {
                                $pass = $this->getSolutionMaxPass($active_id);
                        }
                        $query = sprintf("UPDATE tst_test_result SET points = %s WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                                $ilDB->quote($points . ""),
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($this->getId() . ""),
                                $ilDB->quote($pass . "")
                        );
                        $result = $ilDB->query($query);
                        $this->_updateTestPassResults($active_id, $pass);
                        return TRUE;
                }
                        else
                {
                        return TRUE;
                }
        }

        function isKeywordMatching($answertext, $a_keyword)
        {
                $result = FALSE;
                $textrating = $this->getTextRating();
                include_once "./Services/Utilities/classes/class.ilStr.php";
                switch ($textrating)
                {
                        case TEXTGAP_RATING_CASEINSENSITIVE:
                                if (ilStr::strPos(ilStr::strToLower($answertext), ilStr::strToLower($a_keyword)) !== false) return TRUE;
                                break;
                        case TEXTGAP_RATING_CASESENSITIVE:
                                if (ilStr::strPos($answertext, $a_keyword) !== false) return TRUE;
                                break;
                }
                $answerwords = array();
                if (preg_match_all("/([^\s.]+)/", $answertext, $matches))
                {
                        foreach ($matches[1] as $answerword)
                        {
                                array_push($answerwords, trim($answerword));
                        }
                }
                foreach ($answerwords as $a_original)
                {
                        switch ($textrating)
                        {
                                case TEXTGAP_RATING_LEVENSHTEIN1:
                                        if (levenshtein($a_original, $a_keyword) <= 1) return TRUE;
                                        break;
                                case TEXTGAP_RATING_LEVENSHTEIN2:
                                        if (levenshtein($a_original, $a_keyword) <= 2) return TRUE;
                                        break;
                                case TEXTGAP_RATING_LEVENSHTEIN3:
                                        if (levenshtein($a_original, $a_keyword) <= 3) return TRUE;
                                        break;
                                case TEXTGAP_RATING_LEVENSHTEIN4:
                                        if (levenshtein($a_original, $a_keyword) <= 4) return TRUE;
                                        break;
                                case TEXTGAP_RATING_LEVENSHTEIN5:
                                        if (levenshtein($a_original, $a_keyword) <= 5) return TRUE;
                                        break;
                        }
                }
                return $result;
        }

        function calculateReachedPoints($active_id, $pass = NULL)
        {
                global $ilDB;

                $points = 0;
                if (is_null($pass))
                {
                        $pass = $this->getSolutionMaxPass($active_id);
                }
                $query = sprintf("SELECT * FROM tst_solutions WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($this->getId() . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
                        if ($row["points"])
                        {
                                $points = $row["points"];
                        }
                        else
                        {
                                $keywords =& $this->getKeywordList();
                                if (count($keywords))
                                {
                                        $foundkeyword = false;
                                        foreach ($keywords as $keyword)
                                        {
                                                if (!$foundkeyword)
                                                {
                                                        if ($this->isKeywordMatching($row["value1"], $keyword)) 
                                                        {
                                                                $foundkeyword = true;
                                                        }
                                                }
                                        }
                                        if ($foundkeyword) $points = $this->getMaximumPoints();
                                }
                        }
                }

                $points = parent::calculateReachedPoints($active_id, $pass = NULL, $points);
                return $points;
        }

        function saveWorkingData($active_id, $pass = NULL)
        {
                global $ilDB;
                global $ilUser;

                if (is_null($pass))
                {
                        include_once "./Modules/Test/classes/class.ilObjTest.php";
                        $pass = ilObjTest::_getPass($active_id);
                }
                
                $query = sprintf("DELETE FROM tst_solutions WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($this->getId() . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);

                $text = ilUtil::stripSlashes($_POST["TEXT"], FALSE);
                if ($this->getMaxNumOfChars())
                {
                        include_once "./Services/Utilities/classes/class.ilStr.php";
                        $text = ilStr::subStr($text, 0, $this->getMaxNumOfChars()); 
                }
                $entered_values = 0;
                if (strlen($text))
                {
                        $query = sprintf("INSERT INTO tst_solutions (solution_id, active_fi, question_fi, value1, value2, pass, TIMESTAMP) VALUES (NULL, %s, %s, %s, NULL, %s, NULL)",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($this->getId() . ""),
                                $ilDB->quote(trim($text) . ""),
                                $ilDB->quote($pass . "")
                        );
                        $result = $ilDB->query($query);
                        $entered_values++;
                }
                if ($entered_values)
                {
                        include_once ("./classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_user_entered_values", ilObjAssessmentFolder::_getLogLanguage()), $active_id, $this->getId());
                        }
                }
                else
                {
                        include_once ("./classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_user_not_entered_values", ilObjAssessmentFolder::_getLogLanguage()), $active_id, $this->getId());
                        }
                }
    parent::saveWorkingData($active_id, $pass);
                return true;
        }

        function createRandomSolution($test_id, $user_id)
        {
        }

        function getQuestionType()
        {
                return "assTextQuestion";
        }
        
        function getKeywords()
        {
                return $this->keywords;
        }
        
        function setKeywords($a_keywords)
        {
                $this->keywords = $a_keywords;
        }
        
        function &getKeywordList()
        {
                $keywords = array();
                if (preg_match_all("/([^\s]+)/", $this->keywords, $matches))
                {
                        foreach ($matches[1] as $keyword)
                        {
                                array_push($keywords, trim($keyword));
                        }
                }
                return $keywords;
        }

        function getTextRating()
        {
                return $this->text_rating;
        }
        
        function setTextRating($a_text_rating)
        {
                switch ($a_text_rating)
                {
                        case TEXTGAP_RATING_CASEINSENSITIVE:
                        case TEXTGAP_RATING_CASESENSITIVE:
                        case TEXTGAP_RATING_LEVENSHTEIN1:
                        case TEXTGAP_RATING_LEVENSHTEIN2:
                        case TEXTGAP_RATING_LEVENSHTEIN3:
                        case TEXTGAP_RATING_LEVENSHTEIN4:
                        case TEXTGAP_RATING_LEVENSHTEIN5:
                                $this->text_rating = $a_text_rating;
                                break;
                        default:
                                $this->text_rating = TEXTGAP_RATING_CASEINSENSITIVE;
                                break;
                }
        }
        
        function getAdditionalTableName()
        {
                return "qpl_question_essay";
        }

        function getRTETextWithMediaObjects()
        {
                return parent::getRTETextWithMediaObjects();
        }
}

?>