class.ilObjTest.php

Go to the documentation of this file.

<?php
/*
        +-----------------------------------------------------------------------------+
        | ILIAS open source                                                           |
        +-----------------------------------------------------------------------------+
        | Copyright (c) 1998-2008 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 "./classes/class.ilObject.php";
include_once "./Modules/Test/classes/inc.AssessmentConstants.php";

class ilObjTest extends ilObject
{
        protected $_kiosk;
        
  var $test_id;

        var $invitation = INVITATION_OFF;


  var $author;

  var $metadata;

  var $questions;

  var $introduction;

  var $mark_schema;

  var $sequence_settings;

  var $score_reporting;

        var $instant_verification;

        var $answer_feedback_points;

  var $reporting_date;

  var $evaluation_data;

  var $nr_of_tries;

        var $use_previous_answers;

  var $title_output;

  var $processing_time;

        var $enable_processing_time;

        var $reset_processing_time;

  var $starting_time;

  var $ending_time;

  var $ects_output;

  var $ects_fx;

  var $ects_grades;

        var $random_test;

        var $random_question_count;

        var $count_system;

        var $mc_scoring;

        var $pass_scoring;

        var $shuffle_questions;

        var $results_presentation;

        var $show_summary;

        var $score_cutting;

        var $password;

        var $allowedUsers;

        var $allowedUsersTimeGap;

        var $certificate_visibility;

        var $anonymity;

        var $show_cancel;

        var $show_marker;

        var $fixed_participants;

        var $answer_feedback;
        
        var $testSession;

        var $testSequence;
        
        private $_showfinalstatement;

        private $_finalstatement;

        private $_showinfo;

        private $_forcejs;
        
        private $_customStyle;

        function ilObjTest($a_id = 0,$a_call_by_reference = true)
        {
                global $ilUser;
                $this->type = "tst";
                include_once "./Modules/Test/classes/class.assMarkSchema.php";
                $this->mark_schema = new ASS_MarkSchema();
                $this->test_id = -1;
                $this->author = $ilUser->fullname;
                $this->introduction = "";
                $this->questions = array();
                $this->sequence_settings = TEST_FIXED_SEQUENCE;
                $this->score_reporting = REPORT_AFTER_TEST;
                $this->instant_verification = 0;
                $this->answer_feedback_points = 0;
                $this->reporting_date = "";
                $this->nr_of_tries = 0;
                $this->_kiosk = 0;
                $this->use_previous_answers = 1;
                $this->title_output = 0;
                $this->starting_time = "";
                $this->ending_time = "";
                $this->processing_time = "00:00:00";
                $this->enable_processing_time = "0";
                $this->reset_processing_time = 0;
                $this->ects_output = 0;
                $this->ects_fx = "";
                $this->random_test = 0;
                $this->shuffle_questions = FALSE;
                $this->show_summary = 8;
                $this->random_question_count = "";
                $this->count_system = COUNT_PARTIAL_SOLUTIONS;
                $this->mc_scoring = SCORE_ZERO_POINTS_WHEN_UNANSWERED;
                $this->score_cutting = SCORE_CUT_QUESTION;
                $this->pass_scoring = SCORE_LAST_PASS;
                $this->answer_feedback = 0;
                $this->password = "";
                $this->certificate_visibility = 0;
                $this->allowedUsers = "";
                $this->_showfinalstatement = FALSE;
                $this->_finalstatement = "";
                $this->_showinfo = TRUE;
                $this->_forcejs = FALSE;
                $this->_customStyle = "";
                $this->allowedUsersTimeGap = "";
                $this->anonymity = 0;
                $this->show_cancel = 1;
                $this->show_marker = 0;
                $this->fixed_participants = 0;
                $this->setShowPassDetails(TRUE);
                $this->setShowSolutionDetails(TRUE);
                $this->setShowSolutionAnswersOnly(FALSE);
                $this->setShowSolutionSignature(FALSE);
                $this->testSession = FALSE;
                $this->testSequence = FALSE;
                global $lng;
                $lng->loadLanguageModule("assessment");
                $this->mark_schema->createSimpleSchema($lng->txt("failed_short"), $lng->txt("failed_official"), 0, 0, $lng->txt("passed_short"), $lng->txt("passed_official"), 50, 1);
                $this->ects_grades = array(
                        "A" => 90,
                        "B" => 65,
                        "C" => 35,
                        "D" => 10,
                        "E" => 0
                );
                $this->ilObject($a_id, $a_call_by_reference);
        }

        function create($a_upload = false)
        {
                parent::create();

                // meta data will be created by
                // import parser
                if (!$a_upload)
                {
                        $this->createMetaData();
                }
        }

        function update()
        {
                if (!parent::update())
                {
                        return false;
                }

                // put here object specific stuff

                return true;
        }

        function createReference() {
                $result = parent::createReference();
                $this->saveToDb();
                return $result;
        }

        function read($a_force_db = false)
        {
                parent::read($a_force_db);
                $this->loadFromDb();
        }


        function delete()
        {
                // always call parent delete function first!!
                if (!parent::delete())
                {
                        return false;
                }

                // delet meta data
                $this->deleteMetaData();

                //put here your module specific stuff
                $this->deleteTest();

                return true;
        }

        function deleteTest()
        {
                global $ilDB;

                $query = sprintf("SELECT active_id FROM tst_active WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                $active_array = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        array_push($active_array, $row["active_id"]);
                }

                $query = sprintf("DELETE FROM tst_active WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                if (count($active_array))
                {
                        foreach ($active_array as $active_id)
                        {
                                $query = sprintf("DELETE FROM tst_times WHERE active_fi = %s",
                                        $ilDB->quote($active_id)
                                );
                                $result = $ilDB->query($query);

                                $query = sprintf("DELETE FROM tst_sequence WHERE active_fi = %s",
                                        $ilDB->quote($active_id)
                                );
                                $result = $ilDB->query($query);
                        }
                }

                $query = sprintf("DELETE FROM tst_mark WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                $query = sprintf("SELECT question_fi FROM tst_test_question WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
                {
                        $this->removeQuestion($row->question_fi);
                }

                $query = sprintf("DELETE FROM tst_tests WHERE test_id = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                $query = sprintf("DELETE FROM tst_test_random WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                $query = sprintf("DELETE FROM tst_test_random_question USING tst_test_random_question, tst_active WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_test_random_question.active_fi",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                $this->removeAllTestEditings();

                $query = sprintf("DELETE FROM tst_test_question WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                // delete export files
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $tst_data_dir = ilUtil::getDataDir()."/tst_data";
                $directory = $tst_data_dir."/tst_".$this->getId();
                if (is_dir($directory))
                {
                        include_once "./Services/Utilities/classes/class.ilUtil.php";
                        ilUtil::delDir($directory);
                }
                include_once("./Services/MediaObjects/classes/class.ilObjMediaObject.php");
                $mobs = ilObjMediaObject::_getMobsOfObject("tst:html", $this->getId());
                // remaining usages are not in text anymore -> delete them
                // and media objects (note: delete method of ilObjMediaObject
                // checks whether object is used in another context; if yes,
                // the object is not deleted!)
                foreach($mobs as $mob)
                {
                        ilObjMediaObject::_removeUsage($mob, "tst:html", $this->getId());
                        if (ilObjMediaObject::_exists($mob))
                        {
                                $mob_obj =& new ilObjMediaObject($mob);
                                $mob_obj->delete();
                        }
                }
        }

        function initDefaultRoles()
        {
                global $rbacadmin;

                // create a local role folder
                //$rfoldObj = $this->createRoleFolder("Local roles","Role Folder of forum obj_no.".$this->getId());

                // create moderator role and assign role to rolefolder...
                //$roleObj = $rfoldObj->createRole("Moderator","Moderator of forum obj_no.".$this->getId());
                //$roles[] = $roleObj->getId();

                //unset($rfoldObj);
                //unset($roleObj);

                return $roles ? $roles : array();
        }

        function notify($a_event,$a_ref_id,$a_parent_non_rbac_id,$a_node_id,$a_params = 0)
        {
                global $tree;

                switch ($a_event)
                {
                        case "link":

                                //var_dump("<pre>",$a_params,"</pre>");
                                //echo "Module name ".$this->getRefId()." triggered by link event. Objects linked into target object ref_id: ".$a_ref_id;
                                //exit;
                                break;

                        case "cut":

                                //echo "Module name ".$this->getRefId()." triggered by cut event. Objects are removed from target object ref_id: ".$a_ref_id;
                                //exit;
                                break;

                        case "copy":

                                //var_dump("<pre>",$a_params,"</pre>");
                                //echo "Module name ".$this->getRefId()." triggered by copy event. Objects are copied into target object ref_id: ".$a_ref_id;
                                //exit;
                                break;

                        case "paste":

                                //echo "Module name ".$this->getRefId()." triggered by paste (cut) event. Objects are pasted into target object ref_id: ".$a_ref_id;
                                //exit;
                                break;

                        case "new":

                                //echo "Module name ".$this->getRefId()." triggered by paste (new) event. Objects are applied to target object ref_id: ".$a_ref_id;
                                //exit;
                                break;
                }

                // At the beginning of the recursive process it avoids second call of the notify function with the same parameter
                if ($a_node_id==$_GET["ref_id"])
                {
                        $parent_obj =& $this->ilias->obj_factory->getInstanceByRefId($a_node_id);
                        $parent_type = $parent_obj->getType();
                        if($parent_type == $this->getType())
                        {
                                $a_node_id = (int) $tree->getParentId($a_node_id);
                        }
                }

                parent::notify($a_event,$a_ref_id,$a_parent_non_rbac_id,$a_node_id,$a_params);
        }

        function createExportDirectory()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $tst_data_dir = ilUtil::getDataDir()."/tst_data";
                ilUtil::makeDir($tst_data_dir);
                if(!is_writable($tst_data_dir))
                {
                        $this->ilias->raiseError("Test Data Directory (".$tst_data_dir
                                .") not writeable.",$this->ilias->error_obj->MESSAGE);
                }

                // create learning module directory (data_dir/lm_data/lm_<id>)
                $tst_dir = $tst_data_dir."/tst_".$this->getId();
                ilUtil::makeDir($tst_dir);
                if(!@is_dir($tst_dir))
                {
                        $this->ilias->raiseError("Creation of Test Directory failed.",$this->ilias->error_obj->MESSAGE);
                }
                // create Export subdirectory (data_dir/lm_data/lm_<id>/Export)
                $export_dir = $tst_dir."/export";
                ilUtil::makeDir($export_dir);
                if(!@is_dir($export_dir))
                {
                        $this->ilias->raiseError("Creation of Export Directory failed.",$this->ilias->error_obj->MESSAGE);
                }
        }

        function getExportDirectory()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $export_dir = ilUtil::getDataDir()."/tst_data"."/tst_".$this->getId()."/export";
                return $export_dir;
        }

        function getExportFiles($dir)
        {
                // quit if import dir not available
                if (!@is_dir($dir) or
                        !is_writeable($dir))
                {
                        return array();
                }

                // open directory
                $dir = dir($dir);

                // initialize array
                $file = array();

                // get files and save the in the array
                while ($entry = $dir->read())
                {
                        if ($entry != "." and
                                $entry != ".." and
                                //substr($entry, -4) == ".zip" and
                                ereg("^[0-9]{10}_{2}[0-9]+_{2}(test(__results)?__)*[0-9]+\.[a-z]{1,3}\$", $entry))
                        {
                                $file[] = $entry;
                        }
                }

                // close import directory
                $dir->close();

                // sort files
                sort ($file);
                reset ($file);

                return $file;
        }


        function _createImportDirectory()
        {
                global $ilias;

                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $tst_data_dir = ilUtil::getDataDir()."/tst_data";
                ilUtil::makeDir($tst_data_dir);

                if(!is_writable($tst_data_dir))
                {
                        $ilias->raiseError("Test data directory (".$tst_data_dir
                                .") not writeable.",$ilias->error_obj->FATAL);
                }

                // create test directory (data_dir/tst_data/tst_import)
                $tst_dir = $tst_data_dir."/tst_import";
                ilUtil::makeDir($tst_dir);
                if(!@is_dir($tst_dir))
                {
                        $ilias->raiseError("Creation of test import directory failed.",$ilias->error_obj->FATAL);
                }
        }

        function _getImportDirectory()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $import_dir = ilUtil::getDataDir()."/tst_data/tst_import";
                if(@is_dir($import_dir))
                {
                        return $import_dir;
                }
                else
                {
                        return false;
                }
        }

        function createImportDirectory()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $tst_data_dir = ilUtil::getDataDir()."/tst_data";
                ilUtil::makeDir($tst_data_dir);

                if(!is_writable($tst_data_dir))
                {
                        $this->ilias->raiseError("Test Data Directory (".$tst_data_dir
                                .") not writeable.",$this->ilias->error_obj->FATAL);
                }

                // create test directory (data_dir/tst_data/tst_import)
                $tst_dir = $tst_data_dir."/tst_import";
                ilUtil::makeDir($tst_dir);
                if(!@is_dir($tst_dir))
                {
                        $ilias->raiseError("Creation of test import directory failed.",$ilias->error_obj->FATAL);
                }
        }

        function getImportDirectory()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $import_dir = ilUtil::getDataDir()."/tst_data/tst_import";
                if(@is_dir($import_dir))
                {
                        return $import_dir;
                }
                else
                {
                        return false;
                }
        }


        function testTitleExists($title)
        {
                global $ilDB;

                $query = sprintf("SELECT * FROM object_data WHERE title = %s AND type = %s",
                        $ilDB->quote($title),
                        $ilDB->quote("tst")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        return TRUE;
                }
                return FALSE;
        }

        function isSingleChoiceTest()
        {
                global $ilDB;

                $query = sprintf("SELECT DISTINCT(qpl_question_type.type_tag) foundtypes FROM qpl_questions, tst_test_result, qpl_question_type, tst_active WHERE tst_test_result.question_fi = qpl_questions.question_id AND qpl_questions.question_type_fi = qpl_question_type.question_type_id AND tst_test_result.active_fi = tst_active.active_id AND tst_active.test_fi = %s AND qpl_question_type.type_tag = %s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote("assSingleChoice")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        $row = $ilDB->fetchAssoc($result);
                        if (strcmp($row['foundtypes'], 'assSingleChoice') == 0)
                        {
                                return TRUE;
                        }
                        else
                        {
                                return false;
                        }
                }
                return FALSE;
        }

        function isSingleChoiceTestWithoutShuffle()
        {
                global $ilDB;

                $query = sprintf("SELECT DISTINCT(qpl_question_singlechoice.shuffle) foundshuffles FROM qpl_questions, qpl_question_singlechoice, tst_test_result, qpl_question_type, tst_active WHERE tst_test_result.question_fi = qpl_questions.question_id AND qpl_questions.question_type_fi = qpl_question_type.question_type_id AND tst_test_result.active_fi = tst_active.active_id AND qpl_questions.question_id = qpl_question_singlechoice.question_fi AND tst_active.test_fi = %s AND qpl_question_type.type_tag = %s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote("assSingleChoice")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        $row = $ilDB->fetchAssoc($result);
                        return ($row['foundshuffles'] == 0);
                }
                return FALSE;
        }

        function isComplete()
        {
                if ((count($this->mark_schema->mark_steps)) and (count($this->questions)))
                {
                        return true;
                }
                        else
                {
                        if ($this->isRandomTest())
                        {
                                $arr = $this->getRandomQuestionpools();
                                if (count($arr) && ($this->getRandomQuestionCount() > 0))
                                {
                                        return true;
                                }
                                $count = 0;
                                foreach ($arr as $array)
                                {
                                        $count += $array["count"];
                                }
                                if ($count)
                                {
                                        return true;
                                }
                        }
                        return false;
                }
        }

        function _isComplete($obj_id)
        {
                $test = new ilObjTest($obj_id, false);
                $test->loadFromDb();
                return $test->isComplete();
        }

        function saveECTSStatus($ects_output = 0, $fx_support = "", $ects_a = 90, $ects_b = 65, $ects_c = 35, $ects_d = 10, $ects_e = 0)
        {
    global $ilDB;
    if ($this->test_id > 0) {
                        $fx_support = preg_replace("/,/", ".", $fx_support);
                        if (preg_match("/\d+/", $fx_support))
                        {
                                $fx_support = $fx_support;
                        }
                        else
                        {
                                $fx_support = "NULL";
                        }
      $query = sprintf("UPDATE tst_tests SET ects_output = %s, ects_a = %s, ects_b = %s, ects_c = %s, ects_d = %s, ects_e = %s, ects_fx = %s WHERE test_id = %s",
                                $ilDB->quote("$ects_output"),
                                $ilDB->quote($ects_a . ""),
                                $ilDB->quote($ects_b . ""),
                                $ilDB->quote($ects_c . ""),
                                $ilDB->quote($ects_d . ""),
                                $ilDB->quote($ects_e . ""),
        $fx_support,
                                $this->getTestId()
      );
      $result = $ilDB->query($query);
                        $this->ects_output = $ects_output;
                        $this->ects_fx = $fx_support;
                }
        }

        function saveCompleteStatus()
        {
    global $ilDB;

                $complete = 0;
                if ($this->isComplete())
                {
                        $complete = 1;
                }
    if ($this->test_id > 0)
                {
      $query = sprintf("UPDATE tst_tests SET complete = %s WHERE test_id = %s",
                                $ilDB->quote("$complete"),
        $ilDB->quote($this->test_id)
      );
      $result = $ilDB->query($query);
                }
        }
        
        function getAllRTEContent()
        {
                $result = array();
                array_push($result, $this->getIntroduction());
                array_push($result, $this->getFinalStatement());
                return $result;
        }
        
        function cleanupMediaobjectUsage()
        {
                include_once("./Services/RTE/classes/class.ilRTE.php");
                $completecontent = "";
                foreach ($this->getAllRTEContent() as $content)
                {
                        $completecontent .= $content;
                }
                ilRTE::_cleanupMediaObjectUsage($completecontent, $this->getType() . ":html",
                        $this->getId());
        }

        function saveToDb($properties_only = FALSE)
        {
                global $ilDB, $ilLog;

                $complete = 0;
                if ($this->isComplete())
                {
                        $complete = 1;
                }
                $ects_fx = "NULL";
                if (preg_match("/\d+/", $this->ects_fx))
                {
                        $ects_fx = $this->ects_fx;
                }
                $random_question_count = "NULL";
                if ($this->random_question_count > 0)
                {
                        $random_question_count = $ilDB->quote($this->random_question_count . "");
                }
                $shuffle_questions = 0;
                if ($this->getShuffleQuestions())
                {
                        $shuffle_questions = 1;
                }
                $allowedUsers = $this->getAllowedUsers();
                if ($allowedUsers == 0)
                {
                        $allowedUsers = "NULL";
                }
                else
                {
                        $allowedUsers = $ilDB->quote($allowedUsers);
                }
                $allowedUsersTimeGap = $this->getAllowedUsersTimeGap();
                if ($allowedUsersTimeGap == 0)
                {
                        $allowedUsersTimeGap = "NULL";
                }
                else
                {
                        $allowedUsersTimeGap = $ilDB->quote($allowedUsersTimeGap);
                }

                // cleanup RTE images
                $this->cleanupMediaobjectUsage();
                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                if ($this->test_id == -1)
                {
                        // Create new dataset
                        $now = getdate();
                        $created = sprintf("%04d%02d%02d%02d%02d%02d", $now['year'], $now['mon'], $now['mday'], $now['hours'], $now['minutes'], $now['seconds']);
                        $query = sprintf("INSERT INTO tst_tests (test_id, obj_fi, author, introduction, finalstatement, showinfo, forcejs, customstyle, showfinalstatement, sequence_settings, " .
                                "score_reporting, instant_verification, answer_feedback_points, answer_feedback, anonymity, show_cancel, show_marker, " .
                                "fixed_participants, nr_of_tries, kiosk, use_previous_answers, title_output, processing_time, enable_processing_time, reset_processing_time, " .
                                "reporting_date, starting_time, ending_time, complete, ects_output, ects_a, ects_b, ects_c, ects_d, ects_e, " .
                                "ects_fx, random_test, random_question_count, count_system, mc_scoring, score_cutting, pass_scoring, " .
                                "shuffle_questions, results_presentation, show_summary, password, allowedUsers, " .
                                "allowedUsersTimeGap, certificate_visibility, created, TIMESTAMP) " .
                                "VALUES (NULL, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, " .
                                "%s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, NULL)",
                                $ilDB->quote($this->getId() . ""),
                                $ilDB->quote($this->getAuthor() . ""),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->introduction, 0)),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->getFinalStatement(), 0)),
                                $ilDB->quote((($this->getShowInfo()) ? "1" : "0")),
                                $ilDB->quote((($this->getForceJS()) ? "1" : "0")),
                                (strlen($this->getCustomStyle())) ? $ilDB->quote($this->getCustomStyle()) : "NULL",
                                $ilDB->quote((($this->getShowFinalStatement()) ? "1" : "0")),
                                $ilDB->quote($this->sequence_settings . ""),
                                $ilDB->quote($this->score_reporting . ""),
                                $ilDB->quote($this->getInstantFeedbackSolution() . ""),
                                $ilDB->quote($this->getAnswerFeedbackPoints() . ""),
                                $ilDB->quote($this->getAnswerFeedback() . ""),
                                $ilDB->quote($this->getAnonymity() . ""),
                                $ilDB->quote($this->getShowCancel() . ""),
                                $ilDB->quote($this->getShowMarker() . ""),
                                $ilDB->quote($this->getFixedParticipants() . ""),
                                $ilDB->quote(sprintf("%d", $this->getNrOfTries()) . ""),
                                $ilDB->quote($this->getKiosk() . ""),
                                $ilDB->quote(sprintf("%d", $this->getUsePreviousAnswers() . "")),
                                $ilDB->quote(sprintf("%d", $this->getTitleOutput() . "")),
                                $ilDB->quote($this->processing_time . ""),
                                $ilDB->quote("$this->enable_processing_time"),
                                $ilDB->quote($this->getResetProcessingTime() . ""),
                                $ilDB->quote($this->reporting_date . ""),
                                $ilDB->quote($this->starting_time . ""),
                                $ilDB->quote($this->ending_time . ""),
                                $ilDB->quote("$complete"),
                                $ilDB->quote($this->ects_output . ""),
                                $ilDB->quote($this->ects_grades["A"] . ""),
                                $ilDB->quote($this->ects_grades["B"] . ""),
                                $ilDB->quote($this->ects_grades["C"] . ""),
                                $ilDB->quote($this->ects_grades["D"] . ""),
                                $ilDB->quote($this->ects_grades["E"] . ""),
                                $ects_fx,
                                $ilDB->quote(sprintf("%d", $this->random_test) . ""),
                                $random_question_count,
                                $ilDB->quote($this->count_system . ""),
                                $ilDB->quote($this->mc_scoring . ""),
                                $ilDB->quote($this->getScoreCutting() . ""),
                                $ilDB->quote($this->getPassScoring() . ""),
                                $ilDB->quote($shuffle_questions . ""),
                                $ilDB->quote($this->getResultsPresentation() . ""),
                                $ilDB->quote($this->getListOfQuestionsSettings() . ""),
                                $ilDB->quote($this->getPassword() . ""),
                                $allowedUsers,
                                $allowedUsersTimeGap,
                                $ilDB->quote($this->getCertificateVisibility() . ""),
                                $ilDB->quote($created)
                        );

                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_create_new_test", ilObjAssessmentFolder::_getLogLanguage()));
                        }
                        $result = $ilDB->query($query);
                        if (PEAR::isError($result)) 
                        {
                                global $ilias;
                                $ilias->raiseError($result->getMessage());
                        }
                        else
                        {
                                $this->test_id = $ilDB->getLastInsertId();
                        }
                }
                else
                {
                        // Modify existing dataset
                        $oldrow = array();
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $query = sprintf("SELECT * FROM tst_tests WHERE test_id = %s",
                $ilDB->quote($this->test_id)
                                );
                                $result = $ilDB->query($query);
                                if ($result->numRows() == 1)
                                {
                                        $oldrow = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                                }
                        }
                        $query = sprintf("UPDATE tst_tests SET author = %s, introduction = %s, finalstatement = %s, showinfo = %s, forcejs = %s, customstyle = %s, showfinalstatement = %s, sequence_settings = %s, score_reporting = %s, instant_verification = %s, answer_feedback_points = %s, answer_feedback = %s, anonymity = %s, show_cancel = %s, show_marker = %s, fixed_participants = %s, nr_of_tries = %s, kiosk = %s, use_previous_answers = %s, title_output = %s, processing_time = %s, enable_processing_time = %s, reset_processing_time = %s, reporting_date = %s, starting_time = %s, ending_time = %s, ects_output = %s, ects_a = %s, ects_b = %s, ects_c = %s, ects_d = %s, ects_e = %s, ects_fx = %s, random_test = %s, complete = %s, count_system = %s, mc_scoring = %s, score_cutting = %s, pass_scoring = %s, shuffle_questions = %s, results_presentation = %s, show_summary = %s, password = %s, allowedUsers = %s, allowedUsersTimeGap = %s, certificate_visibility = %s WHERE test_id = %s",
                                $ilDB->quote($this->getAuthor() . ""),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->introduction, 0)),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($this->getFinalStatement(), 0)),
                                $ilDB->quote((($this->getShowInfo()) ? "1" : "0")),
                                $ilDB->quote((($this->getForceJS()) ? "1" : "0")),
                                (strlen($this->getCustomStyle())) ? $ilDB->quote($this->getCustomStyle()) : "NULL",
                                $ilDB->quote((($this->getShowFinalStatement()) ? "1" : "0")),
                                $ilDB->quote($this->sequence_settings . ""),
                                $ilDB->quote($this->score_reporting . ""),
                                $ilDB->quote($this->getInstantFeedbackSolution() . ""),
                                $ilDB->quote($this->getAnswerFeedbackPoints() . ""),
                                $ilDB->quote($this->getAnswerFeedback() . ""),
                                $ilDB->quote($this->getAnonymity() . ""),
                                $ilDB->quote($this->getShowCancel() . ""),
                                $ilDB->quote($this->getShowMarker() . ""),
                                $ilDB->quote($this->getFixedParticipants() . ""),
                                $ilDB->quote(sprintf("%d", $this->getNrOfTries()) . ""),
                                $ilDB->quote($this->getKiosk() . ""),
                                $ilDB->quote(sprintf("%d", $this->getUsePreviousAnswers() . "")),
                                $ilDB->quote(sprintf("%d", $this->getTitleOutput() . "")),
                                $ilDB->quote($this->processing_time . ""),
                                $ilDB->quote("$this->enable_processing_time"),
                                $ilDB->quote($this->getResetProcessingTime() . ""),
                                $ilDB->quote($this->reporting_date . ""),
                                $ilDB->quote($this->starting_time . ""),
                                $ilDB->quote($this->ending_time . ""),
                                $ilDB->quote($this->ects_output . ""),
                                $ilDB->quote($this->ects_grades["A"] . ""),
                                $ilDB->quote($this->ects_grades["B"] . ""),
                                $ilDB->quote($this->ects_grades["C"] . ""),
                                $ilDB->quote($this->ects_grades["D"] . ""),
                                $ilDB->quote($this->ects_grades["E"] . ""),
                                $ects_fx,
                                $ilDB->quote(sprintf("%d", $this->random_test) . ""),
                                $ilDB->quote("$complete"),
                                $ilDB->quote($this->count_system . ""),
                                $ilDB->quote($this->mc_scoring . ""),
                                $ilDB->quote($this->getScoreCutting() . ""),
                                $ilDB->quote($this->getPassScoring() . ""),
                                $ilDB->quote($shuffle_questions . ""),
                                $ilDB->quote($this->getResultsPresentation() . ""),
                                $ilDB->quote($this->getListOfQuestionsSettings() . ""),
                                $ilDB->quote($this->getPassword() . ""),
                                $allowedUsers,
                                $allowedUsersTimeGap,
                                $ilDB->quote($this->getCertificateVisibility() . ""),
                                $ilDB->quote($this->test_id)
                        );
                        $result = $ilDB->query($query);
                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $query = sprintf("SELECT * FROM tst_tests WHERE test_id = %s",
                                        $ilDB->quote($this->test_id)
                                );
                                $logresult = $ilDB->query($query);
                                $newrow = array();
                                if ($logresult->numRows() == 1)
                                {
                                        $newrow = $logresult->fetchRow(MDB2_FETCHMODE_ASSOC);
                                }
                                $changed_fields = array();
                                foreach ($oldrow as $key => $value)
                                {
                                        if (strcmp($oldrow[$key], $newrow[$key]) != 0)
                                        {
                                                array_push($changed_fields, "$key: " . $oldrow[$key] . " => " . $newrow[$key]);
                                        }
                                }
                                $changes = join($changed_fields, ", ");
                                if (count($changed_fields) > 0)
                                {
                                        $this->logAction($this->lng->txtlng("assessment", "log_modified_test", ilObjAssessmentFolder::_getLogLanguage()) . " [".$changes."]");
                                }
                        }
                        if ($this->evalTotalPersons() > 0)
                        {
                                // reset the finished status of participants if the nr of test passes did change
                                
                                if ($this->getNrOfTries() > 0)
                                {
                                        // set all unfinished tests with nr of passes >= allowed passes finished
                                        $query = sprintf("SELECT active_id FROM tst_active WHERE test_fi = %s AND tries >= %s AND submitted = 0",
                                                $ilDB->quote($this->getTestId() . ""),
                                                $ilDB->quote($this->getNrOfTries() . "")
                                        );
                                        $aresult = $ilDB->query($query);
                                        while ($row = $aresult->fetchRow(MDB2_FETCHMODE_ASSOC))
                                        {
                                                $newquery = sprintf("UPDATE tst_active SET submitted = 1, submittimestamp = NOW() WHERE active_id = %s",
                                                        $ilDB->quote($row["active_id"] . "")
                                                );
                                                $newresult = $ilDB->query($newquery);
                                        }

                                        // set all finished tests with nr of passes >= allowed passes not finished
                                        $query = sprintf("SELECT active_id FROM tst_active WHERE test_fi = %s AND tries < %s AND submitted = 1",
                                                $ilDB->quote($this->getTestId() . ""),
                                                $ilDB->quote($this->getNrOfTries() . "")
                                        );
                                        $aresult = $ilDB->query($query);
                                        while ($row = $aresult->fetchRow(MDB2_FETCHMODE_ASSOC))
                                        {
                                                $newquery = sprintf("UPDATE tst_active SET submitted = 0, submittimestamp = NULL WHERE active_id = %s",
                                                        $ilDB->quote($row["active_id"] . "")
                                                );
                                                $newresult = $ilDB->query($newquery);
                                        }
                                }
                                else
                                {
                                        // set all finished tests with nr of passes >= allowed passes not finished
                                        $query = sprintf("SELECT active_id FROM tst_active WHERE test_fi = %s AND submitted = 1",
                                                $ilDB->quote($this->getTestId() . "")
                                        );
                                        $aresult = $ilDB->query($query);
                                        while ($row = $aresult->fetchRow(MDB2_FETCHMODE_ASSOC))
                                        {
                                                $newquery = sprintf("UPDATE tst_active SET submitted = 0, submittimestamp = NULL WHERE active_id = %s",
                                                        $ilDB->quote($row["active_id"] . "")
                                                );
                                                $newresult = $ilDB->query($newquery);
                                        }
                                }
                        }
    }
                if (!$properties_only)
                {
                        if (PEAR::isError($result)) 
                        {
                                global $ilias;
                                $ilias->raiseError($result->getMessage());
                        }
                        else
                        {
                                if (!$this->isRandomTest())
                                {
                                        $this->saveQuestionsToDb();
                                }
                                $this->mark_schema->saveToDb($this->test_id);
                        }
                }
  }

        function saveQuestionsToDb()
        {
                global $ilDB;

                $oldquestions = array();
                include_once "./Modules/Test/classes/class.ilObjAssessmentFolder.php";
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        $query = sprintf("SELECT question_fi FROM tst_test_question WHERE test_fi = %s ORDER BY sequence",
                                $ilDB->quote($this->getTestId())
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows() > 0)
                        {
                                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                                {
                                        array_push($oldquestions, $row["question_fi"]);
                                }
                        }
                }

                // delete existing category relations
    $query = sprintf("DELETE FROM tst_test_question WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                // create new category relations
                foreach ($this->questions as $key => $value) {
                        $query = sprintf("INSERT INTO tst_test_question (test_question_id, test_fi, question_fi, sequence, TIMESTAMP) VALUES (NULL, %s, %s, %s, NULL)",
                                $ilDB->quote($this->getTestId() . ""),
                                $ilDB->quote($value . ""),
                                $ilDB->quote($key . "")
                        );
                        $result = $ilDB->query($query);
                }
                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        $query = sprintf("SELECT question_fi FROM tst_test_question WHERE test_fi = %s ORDER BY sequence",
                                $ilDB->quote($this->getTestId())
                        );
                        $result = $ilDB->query($query);
                        $newquestions = array();
                        if ($result->numRows() > 0)
                        {
                                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                                {
                                        array_push($newquestions, $row["question_fi"]);
                                }
                        }
                        foreach ($oldquestions as $index => $question_id)
                        {
                                if (strcmp($newquestions[$index], $question_id) != 0)
                                {
                                        $pos = array_search($question_id, $newquestions);
                                        if ($pos === FALSE)
                                        {
                                                $this->logAction($this->lng->txtlng("assessment", "log_question_removed", ilObjAssessmentFolder::_getLogLanguage()), $question_id);
                                        }
                                        else
                                        {
                                                $this->logAction($this->lng->txtlng("assessment", "log_question_position_changed", ilObjAssessmentFolder::_getLogLanguage()) . ": " . ($index+1) . " => " . ($pos+1), $question_id);
                                        }
                                }
                        }
                        foreach ($newquestions as $index => $question_id)
                        {
                                if (array_search($question_id, $oldquestions) === FALSE)
                                {
                                        $this->logAction($this->lng->txtlng("assessment", "log_question_added", ilObjAssessmentFolder::_getLogLanguage()) . ": " . ($index+1), $question_id);
                                }
                        }
                }
        }

        function saveRandomQuestion($active_id, $question_id, $pass = NULL, $maxcount)
        {
                global $ilUser;
                global $ilDB;

                if (is_null($pass)) $pass = 0;
                $query = sprintf("SELECT test_random_question_id FROM tst_test_random_question WHERE active_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() < $maxcount)
                {
                        $duplicate_id = $this->getRandomQuestionDuplicate($question_id, $active_id);
                        if ($duplicate_id === FALSE)
                        {
                                $duplicate_id = $this->duplicateQuestionForTest($question_id);
                        }

                        $query = sprintf("INSERT INTO tst_test_random_question (test_random_question_id, active_fi, question_fi, sequence, pass, TIMESTAMP) VALUES (NULL, %s, %s, %s, %s, NULL)",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($duplicate_id . ""),
                                $ilDB->quote(($result->numRows()+1) . ""),
                                $ilDB->quote($pass . "")
                        );
                        $result = $ilDB->query($query);
                }
        }

        function getRandomQuestionDuplicate($question_id, $active_id)
        {
                global $ilDB;

                $query = sprintf("SELECT qpl_questions.question_id FROM qpl_questions, tst_test_random_question WHERE qpl_questions.original_id = %s AND tst_test_random_question.question_fi = qpl_questions.question_id AND tst_test_random_question.active_fi = %s",
                        $ilDB->quote($question_id . ""),
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                $num = $result->numRows();
                if ($num > 0)
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["question_id"];
                }
                else
                {
                        return FALSE;
                }
        }

        function getNrOfResultsForPass($active_id, $pass)
        {
                global $ilDB;

                $query = sprintf("SELECT test_result_id FROM tst_test_result WHERE active_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                return $result->numRows();
        }

        function hasRandomQuestionsForPass($active_id, $pass)
        {
                global $ilDB;
                $query = sprintf("SELECT test_random_question_id FROM tst_test_random_question WHERE active_fi = %s AND pass = %s",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($pass . "")
                        );
                $result = $ilDB->query($query);
                if ($result->numRows() > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

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

                if ($active_id > 0)
                {
                        if ($this->hasRandomQuestionsForPass($active_id, $pass) > 0)
                        {
                                // Something went wrong. Maybe the user pressed the start button twice
                                // Questions already exist so there is no need to create new questions
                                return;
                        }
                        if ($pass > 0)
                        {
                                if ($this->getNrOfResultsForPass($active_id, $pass - 1) == 0)
                                {
                                        // This means that someone maybe reloaded the test submission page
                                        // If there are no existing results for the previous test, it makes
                                        // no sense to create a new set of random questions
                                        return;
                                }
                        }
                }
                else
                {
                        // This may not happen! If it happens, raise a fatal error...
                        global $ilias, $ilErr;
                        $ilias->raiseError(sprintf($this->lng->txt("error_random_question_generation"), $ilUser->getId(), $this->getTestId()), $ilErr->FATAL);
                }

                $num = $this->getRandomQuestionCount();
                if ($num > 0)
                {
                        $qpls =& $this->getRandomQuestionpools();
                        $rndquestions = $this->randomSelectQuestions($num, 0, 1, $qpls, $pass);
                        $allquestions = array();
                        foreach ($rndquestions as $question_id)
                        {
                                array_push($allquestions, $question_id);
                        }
                        if ($this->getShuffleQuestions())
                        {
                                srand ((float)microtime()*1000000);
                                shuffle($allquestions);
                        }

                        $maxcount = 0;
                        foreach ($qpls as $data)
                        {
                                $maxcount += $data["contains"];
                        }
                        if ($num > $maxcount) $num = $maxcount;
                        foreach ($allquestions as $question_id)
                        {
                                $this->saveRandomQuestion($active_id, $question_id, $pass, $num);
                        }
                }
                else
                {
                        $qpls =& $this->getRandomQuestionpools();
                        $allquestions = array();
                        $maxcount = 0;
                        foreach ($qpls as $key => $value)
                        {
                                if ($value["count"] > 0)
                                {
                                        $rndquestions = $this->randomSelectQuestions($value["count"], $value["qpl"], 1, $pass);
                                        foreach ($rndquestions as $question_id)
                                        {
                                                array_push($allquestions, $question_id);
                                        }
                                }
                                $add = ($value["count"] <= $value["contains"]) ? $value["count"] : $value["contains"];
                                $maxcount += $add;
                        }
                        if ($this->getShuffleQuestions())
                        {
                                srand ((float)microtime()*1000000);
                                shuffle($allquestions);
                        }
                        foreach ($allquestions as $question_id)
                        {
                                $this->saveRandomQuestion($active_id, $question_id, $pass, $maxcount);
                        }
                }
        }

        function saveRandomQuestionCount($total_questions = "NULL")
        {
                global $ilDB;

                if (strcmp($total_questions, "NULL") != 0)
                {
                        $this->setRandomQuestionCount($total_questions);
                        $total_questions = $ilDB->quote($total_questions);
                }
                $query = sprintf("UPDATE tst_tests SET random_question_count = %s WHERE test_id = %s",
                        $total_questions,
                        $ilDB->quote($this->getTestId() . "")
                );
                $result = $ilDB->query($query);
                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        if (strcmp($total_questions, "NULL") == 0) $total_questions = '0';
                        $this->logAction(sprintf($this->lng->txtlng("assessment", "log_total_amount_of_questions", ilObjAssessmentFolder::_getLogLanguage()), $total_questions));
                }
        }

        function saveRandomQuestionpools($qpl_array)
        {
                global $ilDB;

                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                // delete existing random questionpools
    $query = sprintf("DELETE FROM tst_test_random WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        $this->logAction($this->lng->txtlng("assessment", "log_random_question_pool_deleted", ilObjAssessmentFolder::_getLogLanguage()));
                }
                // create new random questionpools
                foreach ($qpl_array as $key => $value) {
                        if ($value["qpl"] > -1)
                        {
                                include_once "./Modules/TestQuestionPool/classes/class.ilObjQuestionPool.php";
                                $count = ilObjQuestionPool::_getQuestionCount($value["qpl"]);
                                if ($value["count"] > $count)
                                {
                                        $value["count"] = $count;
                                }
                                $query = sprintf("INSERT INTO tst_test_random (test_random_id, test_fi, questionpool_fi, num_of_q, TIMESTAMP) VALUES (NULL, %s, %s, %s, NULL)",
                                        $ilDB->quote($this->getTestId() . ""),
                                        $ilDB->quote($value["qpl"] . ""),
                                        $ilDB->quote(sprintf("%d", $value["count"]) . "")
                                );
                                $result = $ilDB->query($query);
                                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                                {
                                        $this->logAction(sprintf($this->lng->txtlng("assessment", "log_random_question_pool_added", ilObjAssessmentFolder::_getLogLanguage()), $value["title"] . " (" . $value["qpl"] . ")", $value["count"]));
                                }
                        }
                }
        }

        function &getRandomQuestionpools()
        {
                global $ilDB;

                $qpls = array();
                $counter = 0;
                $query = sprintf("SELECT tst_test_random.*, qpl_questionpool.questioncount FROM tst_test_random, qpl_questionpool WHERE tst_test_random.test_fi = %s AND tst_test_random.questionpool_fi = qpl_questionpool.obj_fi ORDER BY test_random_id",
                        $ilDB->quote($this->getTestId() . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                $qpls[$counter] = array(
                                        "index" => $counter,
                                        "count" => $row["num_of_q"],
                                        "qpl"   => $row["questionpool_fi"],
                                        "contains" => $row["questioncount"]
                                );
                                $counter++;
                        }
                }
                return $qpls;
        }

        function loadFromDb()
        {
                global $ilDB;

                $query = sprintf("SELECT * FROM tst_tests WHERE obj_fi = %s",
                $ilDB->quote($this->getId())
                        );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        $data = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                        $this->test_id = $data->test_id;
                        if (strlen($this->getAuthor()) == 0)
                        {
                                $this->saveAuthorToMetadata($data->author);
                        }
                        $this->author = $this->getAuthor();
                        include_once("./Services/RTE/classes/class.ilRTE.php");
                        $this->introduction = ilRTE::_replaceMediaObjectImageSrc($data->introduction, 1);
                        $this->setFinalStatement(ilRTE::_replaceMediaObjectImageSrc($data->finalstatement, 1));
                        $this->setShowInfo($data->showinfo);
                        $this->setForceJS($data->forcejs);
                        $this->setCustomStyle($data->customstyle);
                        $this->setShowFinalStatement($data->showfinalstatement);
                        $this->sequence_settings = $data->sequence_settings;
                        $this->score_reporting = $data->score_reporting;
                        $this->instant_verification = $data->instant_verification;
                        $this->answer_feedback_points = $data->answer_feedback_points;
                        $this->answer_feedback = $data->answer_feedback;
                        $this->anonymity = $data->anonymity;
                        $this->show_cancel = $data->show_cancel;
                        $this->show_marker = $data->show_marker;
                        $this->fixed_participants = $data->fixed_participants;
                        $this->nr_of_tries = $data->nr_of_tries;
                        $this->setKiosk($data->kiosk);
                        $this->setUsePreviousAnswers($data->use_previous_answers);
                        $this->setTitleOutput($data->title_output);
                        $this->processing_time = $data->processing_time;
                        $this->enable_processing_time = $data->enable_processing_time;
                        $this->reset_processing_time = $data->reset_processing_time;
                        $this->reporting_date = $data->reporting_date;
                        $this->setShuffleQuestions($data->shuffle_questions);
                        $this->setResultsPresentation($data->results_presentation);
                        $this->setListOfQuestionsSettings($data->show_summary);
                        $this->starting_time = $data->starting_time;
                        $this->ending_time = $data->ending_time;
                        $this->ects_output = $data->ects_output;
                        $this->ects_grades = array(
                                "A" => $data->ects_a,
                                "B" => $data->ects_b,
                                "C" => $data->ects_c,
                                "D" => $data->ects_d,
                                "E" => $data->ects_e
                        );
                        $this->ects_fx = $data->ects_fx;
                        $this->random_test = $data->random_test;
                        $this->random_question_count = $data->random_question_count;
                        $this->mark_schema->flush();
                        $this->mark_schema->loadFromDb($this->test_id);
                        $this->count_system = $data->count_system;
                        $this->mc_scoring = $data->mc_scoring;
                        $this->setScoreCutting($data->score_cutting);
                        $this->setPassword($data->password);
                        $this->setAllowedUsers($data->allowedUsers);
                        $this->setAllowedUsersTimeGap($data->allowedUsersTimeGap);
                        $this->setPassScoring($data->pass_scoring);
                        $this->setCertificateVisibility($data->certificate_visibility);
                        $this->loadQuestions();
                }
        }

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

        $this->questions = array();
        if (strcmp($active_id, "") == 0)
        {
                $active_id = $this->getActiveIdOfUser($ilUser->getId());
        }
        if ($this->isRandomTest())
        {
                if (is_null($pass))
                {
                        $pass = $this->_getPass($active_id);
                }
                $query = sprintf("SELECT tst_test_random_question.* FROM tst_test_random_question, qpl_questions WHERE tst_test_random_question.active_fi = %s AND qpl_questions.question_id = tst_test_random_question.question_fi AND tst_test_random_question.pass = %s ORDER BY sequence",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                // The following is a fix for random tests prior to ILIAS 3.8. If someone started a random test in ILIAS < 3.8, there
                // is only one test pass (pass = 0) in tst_test_random_question while with ILIAS 3.8 there are questions for every test pass.
                // To prevent problems with tests started in an older version and continued in ILIAS 3.8, the first pass should be taken if
                // no questions are present for a newer pass.
                if ($result->numRows() == 0)
                {
                        $query = sprintf("SELECT tst_test_random_question.* FROM tst_test_random_question, qpl_questions WHERE tst_test_random_question.active_fi = %s AND qpl_questions.question_id = tst_test_random_question.question_fi AND tst_test_random_question.pass = 0 ORDER BY sequence",
                                $ilDB->quote($active_id . "")
                        );
                        $result = $ilDB->query($query);
                }
        }
        else
        {
                $query = sprintf("SELECT tst_test_question.* FROM tst_test_question, qpl_questions WHERE tst_test_question.test_fi = %s AND qpl_questions.question_id = tst_test_question.question_fi ORDER BY sequence",
                        $ilDB->quote($this->test_id . "")
                );
                $result = $ilDB->query($query);
        }
        $index = 1;
        while ($data = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
        {
                $this->questions[$index++] = $data->question_fi;
        }
}

  function setIntroduction($introduction = "")
        {
    $this->introduction = $introduction;
  }

        public function setFinalStatement($a_statement = "")
        {
                $this->_finalstatement = $a_statement;
        }

        public function setShowInfo($a_boolean = TRUE)
        {
                if ($a_boolean)
                {
                        $this->_showinfo = TRUE;
                }
                else
                {
                        $this->_showinfo = FALSE;
                }
        }

        public function setForceJS($a_boolean = TRUE)
        {
                if ($a_boolean)
                {
                        $this->_forcejs = TRUE;
                }
                else
                {
                        $this->_forcejs = FALSE;
                }
        }
        
        public function setCustomStyle($a_customStyle = "")
        {
                $this->_customStyle = $a_customStyle;
        }
        
        public function getCustomStyle()
        {
                return $this->_customStyle;
        }
        
        public function getCustomStyles()
        {
                $css_path = ilUtil::getStyleSheetLocation("filesystem", "ta.css", "Modules/Test");
                $css_path = str_replace("ta.css", "customstyles", $css_path) . "/";
                $customstyles = array();
                if (is_dir($css_path))
                {
                        $results = array();
                        include_once "./Services/Utilities/classes/class.ilFileUtils.php";
                        ilFileUtils::recursive_dirscan($css_path, $results);
                        if (is_array($results["file"]))
                        {
                                foreach ($results["file"] as $filename)
                                {
                                        if (strpos($filename, ".css"))
                                        {
                                                array_push($customstyles, $filename);
                                        }
                                }
                        }
                }
                return $customstyles;
        }
        
        public function getTestStyleLocation($mode = "output")
        {
                if (strlen($this->getCustomStyle()))
                {
                        $default = ilUtil::getStyleSheetLocation("filesystem", "ta.css", "Modules/Test");
                        $custom = str_replace("ta.css", "customstyles/" . $this->getCustomStyle(), $default);
                        if (file_exists($custom))
                        {
                                $custom = ilUtil::getStyleSheetLocation($mode, "ta.css", "Modules/Test");
                                $custom = str_replace("ta.css", "customstyles/" . $this->getCustomStyle(), $custom);
                                return $custom;
                        }
                        else
                        {
                                return ilUtil::getStyleSheetLocation($mode, "ta.css", "Modules/Test");
                        }
                }
                else
                {
                        return ilUtil::getStyleSheetLocation($mode, "ta.css", "Modules/Test");
                }
        }

        public function setShowFinalStatement($show = "")
        {
                if ($show)
                {
                        $this->_showfinalstatement = TRUE;
                }
                else
                {
                        $this->_showfinalstatement = FALSE;
                }
        }


  function isRandomTest()
        {
    return $this->random_test;
  }

  function getRandomQuestionCount()
        {
    return $this->random_question_count;
  }

  function getIntroduction()
        {
    return $this->introduction;
  }

        public function getFinalStatement()
        {
                return $this->_finalstatement;
        }

        public function getShowInfo()
        {
                return $this->_showinfo;
        }

        public function getForceJS()
        {
                return $this->_forcejs;
        }

        public function getShowFinalStatement()
        {
                return $this->_showfinalstatement;
        }

  function getTestId()
        {
    return $this->test_id;
  }

        function getECTSOutput()
        {
                return $this->ects_output;
        }

        function setECTSOutput($a_ects_output)
        {
                $this->ects_output = $a_ects_output ? 1 : 0;
        }

        function getECTSFX()
        {
                return $this->ects_fx;
        }

        function setECTSFX($a_ects_fx)
        {
                $this->ects_fx = $a_ects_fx;
        }

        function &getECTSGrades()
        {
                return $this->ects_grades;
        }

        function setECTSGrades($a_ects_grades)
        {
                if (is_array($a_ects_grades))
                {
                        $this->ects_grades = $a_ects_grades;
                }
        }

  function setSequenceSettings($sequence_settings = 0)
        {
    $this->sequence_settings = $sequence_settings;
  }

  function setScoreReporting($score_reporting = 0)
        {
    $this->score_reporting = $score_reporting;
  }

  function setInstantFeedbackSolution($instant_feedback = 0)
        {
                switch ($instant_feedback)
                {
                        case 1:
                                $this->instant_verification = 1;
                                break;
                        default:
                                $this->instant_verification = 0;
                                break;
                }
  }

  function setAnswerFeedback($answer_feedback = 0)
        {
                switch ($answer_feedback)
                {
                        case 1:
                                $this->answer_feedback = 1;
                                break;
                        default:
                                $this->answer_feedback = 0;
                                break;
                }
  }

  function setAnswerFeedbackPoints($answer_feedback_points = 0)
        {
                switch ($answer_feedback_points)
                {
                        case 1:
                                $this->answer_feedback_points = 1;
                                break;
                        default:
                                $this->answer_feedback_points = 0;
                                break;
                }
  }

  function setRandomTest($a_random_test = 0)
        {
    $this->random_test = $a_random_test;
  }

  function setRandomQuestionCount($a_random_question_count = "")
        {
    $this->random_question_count = $a_random_question_count;
  }

  function setReportingDate($reporting_date)
  {
                if (!$reporting_date)
                {
                        $this->reporting_date = "";
                        $this->ects_output = 0;
                }
                else
                {
                        $this->reporting_date = $reporting_date;
                }
  }

  function getSequenceSettings()
        {
    return $this->sequence_settings;
  }

  function getScoreReporting()
        {
    return $this->score_reporting;
  }

  function getInstantFeedbackSolution()
        {
    return $this->instant_verification;
  }

  function getAnswerFeedback()
        {
    return $this->answer_feedback;
  }

  function getAnswerFeedbackPoints()
        {
    return $this->answer_feedback_points;
  }

  function getCountSystem()
        {
    return $this->count_system;
  }

  function _getCountSystem($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tst_tests.count_system FROM tst_tests, tst_active WHERE tst_active.active_id = %s AND tst_active.test_fi = tst_tests.test_id",
                        $ilDB->quote($active_id)
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["count_system"];
                }
    return FALSE;
  }

  function getMCScoring()
        {
    return $this->mc_scoring;
  }

  function getScoreCutting()
        {
    return $this->score_cutting;
  }

  function getPassword()
        {
    return $this->password;
  }

  function getPassScoring()
        {
    return $this->pass_scoring;
  }

  function _getPassScoring($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tst_tests.pass_scoring FROM tst_tests, tst_active WHERE tst_tests.test_id = tst_active.test_fi AND tst_active.active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["pass_scoring"];
                }
    return 0;
  }

  function _getMCScoring($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tst_tests.mc_scoring FROM tst_tests, tst_active WHERE tst_active.active_id = %s AND tst_active.test_fi = tst_tests.test_id",
                        $ilDB->quote($active_id)
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["mc_scoring"];
                }
    return FALSE;
  }

  function _getScoreCutting($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tst_tests.score_cutting FROM tst_tests, tst_active WHERE tst_active.active_id = %s AND tst_tests.test_id = tst_active.test_fi",
                        $ilDB->quote($active_id)
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["score_cutting"];
                }
    return FALSE;
  }

  function getReportingDate()
        {
    return $this->reporting_date;
  }

  function getNrOfTries()
        {
    return $this->nr_of_tries;
  }

        function getKiosk()
        {
                return $this->_kiosk;
        }


                function setKiosk($kiosk = 0)
                {
                        $this->_kiosk = $kiosk;
                }

        function getKioskMode()
        {
                if (($this->_kiosk & 1) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        public function setKioskMode($a_kiosk = FALSE)
        {
                if ($a_kiosk)
                {
                        $this->_kiosk = $this->_kiosk | 1;
                }
                else
                {
                        if ($this->getKioskMode())
                        {
                                $this->_kiosk = $this->_kiosk ^ 1;
                        }
                }
        }

        public function getShowKioskModeTitle()
        {
                if (($this->_kiosk & 2) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        public function setShowKioskModeTitle($a_title = FALSE)
        {
                if ($a_title)
                {
                        $this->_kiosk = $this->_kiosk | 2;
                }
                else
                {
                        if ($this->getShowKioskModeTitle())
                        {
                                $this->_kiosk = $this->_kiosk ^ 2;
                        }
                }
        }

        public function getShowKioskModeParticipant()
        {
                if (($this->_kiosk & 4) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        public function setShowKioskModeParticipant($a_participant = FALSE)
        {
                if ($a_participant)
                {
                        $this->_kiosk = $this->_kiosk | 4;
                }
                else
                {
                        if ($this->getShowKioskModeParticipant())
                        {
                                $this->_kiosk = $this->_kiosk ^ 4;
                        }
                }
        }

  function getUsePreviousAnswers()
        {
    return $this->use_previous_answers;
  }

  function getTitleOutput()
        {
    return $this->title_output;
  }

  function _getTitleOutput($active_id)
        {
                global $ilDB;

                $query = sprintf("SELECT tst_tests.title_output FROM tst_tests, tst_active WHERE tst_tests.test_id = tst_active.test_fi AND tst_active.active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["title_output"];
                }
                return 0;
  }

  function _getUsePreviousAnswers($active_id, $user_active_user_setting = false)
        {
                global $ilDB;
                global $ilUser;

                $use_previous_answers = 1;

                $query = sprintf("SELECT tst_tests.use_previous_answers FROM tst_tests, tst_active WHERE tst_tests.test_id = tst_active.test_fi AND tst_active.active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        $use_previous_answers = $row["use_previous_answers"];
                }

                if ($use_previous_answers == 1)
                {
                        if ($user_active_user_setting)
                        {
                                $res = $ilUser->getPref("tst_use_previous_answers");
                                if ($res !== FALSE)
                                {
                                        $use_previous_answers = $res;
                                }
                        }
                }
                return $use_previous_answers;
  }

  function getProcessingTime()
        {
    return $this->processing_time;
  }

        function getProcessingTimeInSeconds()
        {
                if (preg_match("/(\d{2}):(\d{2}):(\d{2})/", $this->getProcessingTime(), $matches))
                {
                        return ($matches[1] * 3600) + ($matches[2] * 60) + $matches[3];
                }
                        else
                {
                        return 0;
                }
        }

                function getSecondsUntilEndingTime()
                {
                        if (preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->getEndingTime(), $matches))
                        {
                                $ending = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                                $now = time();
                                return $ending - $now;
                        }
                        else
                        {
                                return 0;
                        }
                }

          function getEnableProcessingTime()
                {
            return $this->enable_processing_time;
          }

          function getResetProcessingTime()
                {
            return $this->reset_processing_time;
          }

  function getStartingTime()
        {
    return $this->starting_time;
  }

  function getEndingTime()
        {
    return $this->ending_time;
  }

  function setNrOfTries($nr_of_tries = 0)
        {
    $this->nr_of_tries = $nr_of_tries;
  }

        function setUsePreviousAnswers($use_previous_answers = 1)
        {
                if ($use_previous_answers)
                {
                        $this->use_previous_answers = 1;
                }
                else
                {
                        $this->use_previous_answers = 0;
                }
  }

  function setTitleOutput($title_output = 0)
        {
                switch ($title_output)
                {
                        case 1:
                                $this->title_output = 1;
                                break;
                        case 2:
                                $this->title_output = 2;
                                break;
                        default:
                                $this->title_output = 0;
                                break;
                }
  }

  function setProcessingTime($processing_time = "00:00:00")
        {
    $this->processing_time = $processing_time;
  }

        function setEnableProcessingTime($enable = 0)
        {
                if ($enable) {
                        $this->enable_processing_time = "1";
                } else {
                        $this->enable_processing_time = "0";
                }
        }

        function setResetProcessingTime($reset = 0)
        {
                if ($reset) 
                {
                        $this->reset_processing_time = 1;
                } 
                else 
                {
                        $this->reset_processing_time = 0;
                }
        }

  function setStartingTime($starting_time = "")
        {
    $this->starting_time = $starting_time;
  }

  function setEndingTime($ending_time = "")
        {
    $this->ending_time = $ending_time;
  }

  function setCountSystem($a_count_system = COUNT_PARTIAL_SOLUTIONS)
        {
    $this->count_system = $a_count_system;
  }

  function setPassword($a_password = "")
        {
    $this->password = $a_password;
  }

  function setScoreCutting($a_score_cutting = SCORE_CUT_QUESTION)
        {
    $this->score_cutting = $a_score_cutting;
  }

  function setMCScoring($a_mc_scoring = SCORE_ZERO_POINTS_WHEN_UNANSWERED)
        {
    $this->mc_scoring = $a_mc_scoring;
  }

  function setPassScoring($a_pass_scoring = SCORE_LAST_PASS)
        {
                switch ($a_pass_scoring)
                {
                        case SCORE_BEST_PASS:
                                $this->pass_scoring = SCORE_BEST_PASS;
                                break;
                        default:
                                $this->pass_scoring = SCORE_LAST_PASS;
                                break;
                }
  }

        function removeQuestion($question_id)
        {
                $question =& ilObjTest::_instanciateQuestion($question_id);
                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        $this->logAction($this->lng->txtlng("assessment", "log_question_removed", ilObjAssessmentFolder::_getLogLanguage()), $question_id);
                }
                $question->delete($question_id);
                $this->removeAllTestEditings($question_id);
                $this->loadQuestions();
                $this->saveQuestionsToDb();
        }

        function removeAllTestEditings($question_id = "")
        {
                global $ilDB;
                // remove the question from tst_solutions
                if ($question_id)
                {
                        $query = sprintf("DELETE FROM tst_solutions USING tst_solutions, tst_active where tst_solutions.active_fi = tst_active.active_id AND tst_active.test_fi = %s AND tst_solutions.question_fi = %s",
                                $ilDB->quote($this->getTestId()),
                                $ilDB->quote($question_id)
                        );
                        $query2 = sprintf("DELETE FROM tst_active_qst_sol_settings USING tst_active_qst_sol_settings, tst_active where tst_active_qst_sol_settings.active_fi = tst_active.active_id AND tst_active.test_fi = %s AND tst_active_qst_sol_settings.question_fi = %s",
                                $ilDB->quote($this->getTestId()),
                                $ilDB->quote($question_id)
                        );
                        $query3 = sprintf("DELETE FROM tst_test_result USING tst_test_result, tst_active WHERE tst_active.test_fi = %s AND tst_test_result.question_fi = %s AND tst_active.active_id = tst_test_result.active_fi",
                                $ilDB->quote($this->getTestId()),
                                $ilDB->quote($question_id)
                        );
                        $query4 = sprintf("DELETE FROM tst_test_pass_result USING tst_test_pass_result, tst_active WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_test_pass_result.active_fi",
                                $ilDB->quote($this->getTestId())
                        );
                } 
                else 
                {
                        $query = sprintf("DELETE FROM tst_solutions USING tst_solutions, tst_active where tst_solutions.active_fi = tst_active.active_id AND tst_active.test_fi = %s",
                                $ilDB->quote($this->getTestId())
                        );
                        $query2 = sprintf("DELETE FROM tst_active_qst_sol_settings USING tst_active_qst_sol_settings, tst_active where tst_active_qst_sol_settings.active_fi = tst_active.active_id AND tst_active.test_fi = %s",
                                $ilDB->quote($this->getTestId())
                        );
                        $query3 = sprintf("DELETE FROM tst_test_result USING tst_test_result, tst_active WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_test_result.active_fi",
                                $ilDB->quote($this->getTestId())
                        );
                        $query4 = sprintf("DELETE FROM tst_test_pass_result USING tst_test_pass_result, tst_active WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_test_pass_result.active_fi",
                                $ilDB->quote($this->getTestId())
                        );
                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_user_data_removed", ilObjAssessmentFolder::_getLogLanguage()));
                        }
                }
                $query5 = sprintf("DELETE FROM tst_sequence USING tst_sequence, tst_active WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_sequence.active_fi",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                $result = $ilDB->query($query2);
                $result = $ilDB->query($query3);
                $result = $ilDB->query($query4);
                $result = $ilDB->query($query5);

                if ($this->isRandomTest())
                {
                        $query = sprintf("DELETE FROM tst_test_random_question USING tst_test_random_question, tst_active WHERE tst_active.test_fi = %s AND tst_test_random_question.active_fi = tst_active.active_id",
                                $ilDB->quote($this->getTestId())
                        );
                        $result = $ilDB->query($query);
                }

                // remove test_active entries, because test has changed
                $query = sprintf("DELETE FROM tst_active WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);

                // remove saved user passwords
                $query = sprintf("DELETE FROM usr_pref WHERE keyword = %s",
                        $ilDB->quote("tst_password_".$this->getTestId())
                );
                $result = $ilDB->query($query);
        }

        function removeSelectedTestResults($active_ids)
        {
                global $ilDB;

                // remove the question from tst_solutions
                foreach ($active_ids as $active_id)
                {
                        $query = sprintf("DELETE FROM tst_solutions WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $query2 = sprintf("DELETE FROM tst_active_qst_sol_settings WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $query3 = sprintf("DELETE FROM tst_test_result WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $query4 = sprintf("DELETE FROM tst_test_pass_result WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $result = $ilDB->query($query);
                        $result = $ilDB->query($query2);
                        $result = $ilDB->query($query3);
                        $result = $ilDB->query($query4);

                        if ($this->isRandomTest())
                        {
                                $query = sprintf("DELETE FROM tst_test_random_question WHERE active_fi = %s",
                                        $ilDB->quote($active_id . "")
                                );
                                $result = $ilDB->query($query);
                        }

                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction(sprintf($this->lng->txtlng("assessment", "log_selected_user_data_removed", ilObjAssessmentFolder::_getLogLanguage()), $this->userLookupFullName($this->_getUserIdFromActiveId($active_id))));
                        }
                }

                // remove test_active entries of selected users
                foreach ($active_ids as $active_id)
                {
                        $usr_id = $this->_getUserIdFromActiveId($active_id);

                        $query = sprintf("DELETE FROM tst_active WHERE active_id = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $result = $ilDB->query($query);

                        $query = sprintf("DELETE FROM tst_sequence WHERE active_fi = %s",
                                $ilDB->quote($active_id)
                        );
                        $result = $ilDB->query($query);

                        // remove saved user password
                        if ($usr_id > 0)
                        {
                                $query = sprintf("DELETE FROM usr_pref WHERE usr_id = %s AND keyword = %s",
                                        $ilDB->quote($usr_id),
                                        $ilDB->quote("tst_password_".$this->getTestId())
                                );
                                $result = $ilDB->query($query);
                        }
                }
        }

        function removeTestResultsForUser($user_id)
        {
                global $ilDB;

                $active_id = $this->getActiveIdOfUser($user_id);

                // remove the question from tst_solutions
                $query = sprintf("DELETE FROM tst_solutions WHERE active_fi = %s",
                        $ilDB->quote($active_id . "")
                );
                $query2 = sprintf("DELETE FROM tst_active_qst_sol_settings WHERE active_fi = %s",
                        $ilDB->quote($active_id . "")
                );
                $query3 = sprintf("DELETE FROM tst_test_result WHERE active_fi = %s",
                        $ilDB->quote($active_id . "")
                );
                $query4 = sprintf("DELETE FROM tst_test_pass_result WHERE active_fi = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                $result = $ilDB->query($query2);
                $result = $ilDB->query($query3);
                $result = $ilDB->query($query4);

                if ($this->isRandomTest())
                {
                        $query = sprintf("DELETE FROM tst_test_random_question WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $result = $ilDB->query($query);
                }

                include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                {
                        $this->logAction(sprintf($this->lng->txtlng("assessment", "log_selected_user_data_removed", ilObjAssessmentFolder::_getLogLanguage()), $this->userLookupFullName($this->_getUserIdFromActiveId($active_id))));
                }

                $query = sprintf("DELETE FROM tst_sequence WHERE active_fi = %s",
                        $ilDB->quote($active_id)
                );
                $result = $ilDB->query($query);

                // remove test_active entry
                $query = sprintf("DELETE FROM tst_active WHERE active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);

                // remove saved user password
                if ($user_id > 0)
                {
                        $query = sprintf("DELETE FROM usr_pref WHERE usr_id = %s AND keyword = %s",
                                $ilDB->quote($user_id),
                                $ilDB->quote("tst_password_".$this->getTestId())
                        );
                        $result = $ilDB->query($query);
                }
        }

        function questionMoveUp($question_id)
        {
                global $ilDB;

                // Move a question up in sequence
                $query = sprintf("SELECT * FROM tst_test_question WHERE test_fi=%s AND question_fi=%s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote($question_id)
                );
                $result = $ilDB->query($query);
                $data = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                if ($data->sequence > 1) {
                        // OK, it's not the top question, so move it up
                        $query = sprintf("SELECT * FROM tst_test_question WHERE test_fi=%s AND sequence=%s",
                                $ilDB->quote($this->getTestId()),
                                $ilDB->quote($data->sequence - 1)
                        );
                        $result = $ilDB->query($query);
                        $data_previous = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                        // change previous dataset
                        $query = sprintf("UPDATE tst_test_question SET sequence=%s WHERE test_question_id=%s",
                                $ilDB->quote($data->sequence),
                                $ilDB->quote($data_previous->test_question_id)
                        );
                        $result = $ilDB->query($query);
                        // move actual dataset up
                        $query = sprintf("UPDATE tst_test_question SET sequence=%s WHERE test_question_id=%s",
                                $ilDB->quote($data->sequence - 1),
                                $ilDB->quote($data->test_question_id)
                        );
                        $result = $ilDB->query($query);
                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_question_position_changed", ilObjAssessmentFolder::_getLogLanguage()) . ": " . ($data->sequence) . " => " . ($data->sequence-1), $question_id);
                        }
                }
                $this->loadQuestions();
        }

        function questionMoveDown($question_id)
        {
                global $ilDB;

                // Move a question down in sequence
                $query = sprintf("SELECT * FROM tst_test_question WHERE test_fi=%s AND question_fi=%s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote($question_id)
                );
                $result = $ilDB->query($query);
                $data = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                $query = sprintf("SELECT * FROM tst_test_question WHERE test_fi=%s AND sequence=%s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote($data->sequence + 1)
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        // OK, it's not the last question, so move it down
                        $data_next = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                        // change next dataset
                        $query = sprintf("UPDATE tst_test_question SET sequence=%s WHERE test_question_id=%s",
                                $ilDB->quote($data->sequence),
                                $ilDB->quote($data_next->test_question_id)
                        );
                        $result = $ilDB->query($query);
                        // move actual dataset down
                        $query = sprintf("UPDATE tst_test_question SET sequence=%s WHERE test_question_id=%s",
                                $ilDB->quote($data->sequence + 1),
                                $ilDB->quote($data->test_question_id)
                        );
                        $result = $ilDB->query($query);
                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_question_position_changed", ilObjAssessmentFolder::_getLogLanguage()) . ": " . ($data->sequence) . " => " . ($data->sequence+1), $question_id);
                        }
                }
                $this->loadQuestions();
        }

        function duplicateQuestionForTest($question_id)
        {
                global $ilUser;
                $question =& ilObjTest::_instanciateQuestion($question_id);
                $duplicate_id = $question->duplicate(true);

                return $duplicate_id;
        }

        function insertQuestion($question_id)
        {
                global $ilDB;

                $duplicate_id = $this->duplicateQuestionForTest($question_id);

                // get maximum sequence index in test
                $query = sprintf("SELECT MAX(sequence) AS seq FROM tst_test_question WHERE test_fi=%s",
                        $ilDB->quote($this->getTestId())
                        );
                $result = $ilDB->query($query);
                $sequence = 1;

                if ($result->numRows() == 1)
                {
                        $data = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                        $sequence = $data->seq + 1;
                }

                $query = sprintf("INSERT INTO tst_test_question (test_question_id, test_fi, question_fi, sequence, TIMESTAMP) VALUES (NULL, %s, %s, %s, NULL)",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote($duplicate_id),
                        $ilDB->quote($sequence)
                        );
                $result = $ilDB->query($query);
                if (PEAR::isError($result)) 
                {
                        global $ilias;
                        $ilias->raiseError($result->getMessage());
                }
                else
                {
                        include_once ("./Modules/Test/classes/class.ilObjAssessmentFolder.php");
                        if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                        {
                                $this->logAction($this->lng->txtlng("assessment", "log_question_added", ilObjAssessmentFolder::_getLogLanguage()) . ": " . $sequence, $duplicate_id);
                        }
                }
                // remove test_active entries, because test has changed
                $query = sprintf("DELETE FROM tst_active WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                        );
                $result = $ilDB->query($query);
                $this->loadQuestions();
                $this->saveCompleteStatus();
        }

        function &getQuestionTitles()
        {
                $titles = array();
                if (!$this->isRandomTest())
                {
                        global $ilDB;
                        $query = sprintf("SELECT qpl_questions.title FROM tst_test_question, qpl_questions WHERE tst_test_question.test_fi = %s AND tst_test_question.question_fi = qpl_questions.question_id ORDER BY tst_test_question.sequence",
                                $ilDB->quote($this->getTestId() . "")
                        );
                        $result = $ilDB->query($query);
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                array_push($titles, $row["title"]);
                        }
                }
                return $titles;
        }

        function &getQuestionTitlesAndIndexes()
        {
                $titles = array();
                if (!$this->isRandomTest())
                {
                        global $ilDB;
                        $query = sprintf("SELECT qpl_questions.title, qpl_questions.question_id FROM tst_test_question, qpl_questions WHERE tst_test_question.test_fi = %s AND tst_test_question.question_fi = qpl_questions.question_id ORDER BY tst_test_question.sequence",
                                $ilDB->quote($this->getTestId() . "")
                        );
                        $result = $ilDB->query($query);
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                $titles[$row['question_id']] = $row["title"];
                        }
                }
                return $titles;
        }

        function getQuestionTitle($title)
        {
                if ($this->getTitleOutput() == 2)
                {
                        return $this->lng->txt("ass_question");
                }
                else
                {
                        return $title;
                }
        }

        function getQuestionDataset($question_id)
        {
                global $ilDB;

                $query = sprintf("SELECT qpl_questions.*, qpl_question_type.type_tag FROM qpl_questions, qpl_question_type WHERE qpl_questions.question_id = %s AND qpl_questions.question_type_fi = qpl_question_type.question_type_id",
                        $ilDB->quote("$question_id")
                );
    $result = $ilDB->query($query);
                $row = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                return $row;
        }

        function &getExistingQuestions($pass = NULL)
        {
                global $ilUser;
                global $ilDB;

                $existing_questions = array();
                $active_id = $this->getActiveIdOfUser($ilUser->getId());
                if ($this->isRandomTest())
                {
                        if (is_null($pass)) $pass = 0;
                        $query = sprintf("SELECT qpl_questions.original_id FROM qpl_questions, tst_test_random_question WHERE tst_test_random_question.active_fi = %s AND tst_test_random_question.question_fi = qpl_questions.question_id AND tst_test_random_question.pass = %s",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($pass . "")
                        );
                }
                else
                {
                        $query = sprintf("SELECT qpl_questions.original_id FROM qpl_questions, tst_test_question WHERE tst_test_question.test_fi = %s AND tst_test_question.question_fi = qpl_questions.question_id",
                                $ilDB->quote($this->getTestId())
                        );
                }
                $result = $ilDB->query($query);
                while ($data = $result->fetchRow(MDB2_FETCHMODE_OBJECT)) {
                        array_push($existing_questions, $data->original_id);
                }
                return $existing_questions;
        }

  function getQuestionType($question_id)
        {
                global $ilDB;

    if ($question_id < 1)
      return -1;
    $query = sprintf("SELECT type_tag FROM qpl_questions, qpl_question_type WHERE qpl_questions.question_id = %s AND qpl_questions.question_type_fi = qpl_question_type.question_type_id",
      $ilDB->quote($question_id)
    );
    $result = $ilDB->query($query);
    if ($result->numRows() == 1) {
      $data = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
      return $data->type_tag;
    } else {
      return "";
    }
  }

        function startWorkingTime($active_id, $pass)
        {
                global $ilDB;

                $q = sprintf("INSERT INTO tst_times (times_id, active_fi, started, finished, pass, TIMESTAMP) VALUES (NULL, %s, %s, %s, %s, NULL)",
                        $ilDB->quote($active_id),
                        $ilDB->quote(strftime("%Y-%m-%d %H:%M:%S")),
                        $ilDB->quote(strftime("%Y-%m-%d %H:%M:%S")),
                        $ilDB->quote($pass)
                );
                $result = $ilDB->query($q);
                return $ilDB->getLastInsertId();
        }

        function updateWorkingTime($times_id)
        {
                global $ilDB;

                $q = sprintf("UPDATE tst_times SET finished = %s WHERE times_id = %s",
                        $ilDB->quote(strftime("%Y-%m-%d %H:%M:%S")),
                        $ilDB->quote($times_id)
                );
                $result = $ilDB->query($q);
        }

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

                if (is_null($pass))
                {
                        $query = sprintf("SELECT * FROM tst_solutions WHERE active_fi = %s AND pass = 0 GROUP BY question_fi",
                                $ilDB->quote($active_id . "")
                        );
                }
                else
                {
                        $query = sprintf("SELECT * FROM tst_solutions WHERE active_fi = %s AND pass = %s GROUP BY question_fi",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($pass . "")
                        );
                }
                $result = $ilDB->query($query);
                $result_array = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
                {
                        array_push($result_array, $row->question_fi);
                }
                return $result_array;
        }

        function isTestFinishedToViewResults($active_id, $currentpass)
        {
                $num = $this->getPassFinishDate($active_id, $currentpass);
                if (($currentpass > 0) && ($num == 0))
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function &getAllQuestions($pass = NULL)
        {
                global $ilUser;
                global $ilDB;

                $result_array = array();
                if ($this->isRandomTest())
                {
                        $active_id = $this->getActiveIdOfUser($ilUser->getId());
                        $this->loadQuestions($active_id, $pass);
                        if (count($this->questions) == 0) return $result_array;
                        if (is_null($pass))
                        {
                                $pass = $this->_getPass($active_id);
                        }
                        $query = sprintf("SELECT qpl_questions.* FROM qpl_questions, tst_test_random_question WHERE tst_test_random_question.question_fi = qpl_questions.question_id AND tst_test_random_question.active_fi = %s AND tst_test_random_question.pass = %s AND qpl_questions.question_id IN ('" . join($this->questions, "','") . "')",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($pass . "")
                        );
                }
                else
                {
                        if (count($this->questions) == 0) return $result_array;
                        $query = "SELECT qpl_questions.* FROM qpl_questions, tst_test_question WHERE tst_test_question.question_fi = qpl_questions.question_id AND qpl_questions.question_id IN ('" . join($this->questions, "','") . "')";
                }
                $result = $ilDB->query($query);
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        $result_array[$row["question_id"]] = $row;
                }
                return $result_array;
        }

                function getActiveIdOfUser($user_id = "", $anonymous_id = "")
                {
                        global $ilDB;
                        global $ilUser;

                        if (!$user_id) $user_id = $ilUser->getId();
                        if (($_SESSION["AccountId"] == ANONYMOUS_USER_ID) && (strlen($_SESSION["tst_access_code"][$this->getTestId()])))
                        {
                                $query = sprintf("SELECT active_id FROM tst_active WHERE user_fi = %s AND test_fi = %s AND anonymous_id = %s",
                                        $ilDB->quote($user_id),
                                        $ilDB->quote($this->test_id),
                                        $ilDB->quote($_SESSION["tst_access_code"][$this->getTestId()])
                                );
                        }
                        else if (strlen($anonymous_id))
                        {
                                $query = sprintf("SELECT active_id FROM tst_active WHERE user_fi = %s AND test_fi = %s AND anonymous_id = %s",
                                        $ilDB->quote($user_id),
                                        $ilDB->quote($this->test_id),
                                        $ilDB->quote($anonymous_id)
                                );
                        }
                        else
                        {
                                if ($_SESSION["AccountId"] == ANONYMOUS_USER_ID)
                                {
                                        return NULL;
                                }
                                $query = sprintf("SELECT active_id FROM tst_active WHERE user_fi = %s AND test_fi = %s",
                                        $ilDB->quote($user_id),
                                        $ilDB->quote($this->test_id)
                                );
                        }
                        $result = $ilDB->query($query);
                        if ($result->numRows())
                        {
                                $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                                return $row["active_id"];
                        }
                        else
                        {
                                return 0;
                        }
                }

        function _getActiveIdOfUser($user_id = "", $test_id = "") 
        {
                global $ilDB;
                global $ilUser;

                if (!$user_id) {
                        $user_id = $ilUser->id;
                }
                if (!$test_id)
                {
                        return "";
                }
                $query = sprintf("SELECT tst_active.active_id FROM tst_active WHERE user_fi = %s AND test_fi = %s",
                        $ilDB->quote($user_id . ""),
                        $ilDB->quote($test_id . "")
                );

                $result = $ilDB->query($query);
                if ($result->numRows()) 
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["active_id"];
                } 
                else 
                {
                        return "";
                }
        }

        function pcArrayShuffle($array)
        {
                mt_srand((double)microtime()*1000000);
                $i = count($array);
                if ($i > 0)
                {
                        while(--$i)
                        {
                                $j = mt_rand(0, $i);
                                if ($i != $j)
                                {
                                        // swap elements
                                        $tmp = $array[$j];
                                        $array[$j] = $array[$i];
                                        $array[$i] = $tmp;
                                }
                        }
                }
                return $array;
        }
        
        function &getTestResult($active_id, $pass = NULL, $ordered_sequence = FALSE)
        {
                //              global $ilBench;
                $total_max_points = 0;
                $total_reached_points = 0;

                $key = 1;
                $result_array = array();
                include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                $workedthrough = 0;

                if (is_null($pass))
                {
                        $pass = $this->_getResultPass($active_id);
                }
                include_once "./Modules/Test/classes/class.ilTestSequence.php";
                $testSequence = new ilTestSequence($active_id, $pass, $this->isRandomTest());
                $sequence = array();
                if ($ordered_sequence)
                {
                        $sequence = $testSequence->getOrderedSequence();
                }
                else
                {
                        $sequence = $testSequence->getUserSequence();
                }
                foreach ($sequence as $sequenceindex)
                {
                        $value = $testSequence->getQuestionForSequence($sequenceindex);
                        $max_points = assQuestion::_getMaximumPoints($value);
                        $total_max_points += $max_points;
                        $reached_points = assQuestion::_getReachedPoints($active_id, $value, $pass);
                        if (assQuestion::_isWorkedThrough($active_id, $value, $pass))
                        {
                                $workedthrough = 1;
                        }
                        else
                        {
                                $workedthrough = 0;
                        }
                        $total_reached_points += $reached_points;
                        if ($max_points > 0)
                        {
                                $percentvalue = $reached_points / $max_points;
                        }
                        else
                        {
                                $percentvalue = 0;
                        }
                        if ($percentvalue < 0) $percentvalue = 0.0;
                        if (assQuestion::_getSuggestedSolutionCount($value) == 1)
                        {
                                $solution_array =& assQuestion::_getSuggestedSolution($value, 0);
                                $href = assQuestion::_getInternalLinkHref($solution_array["internal_link"]);
                        }
                        elseif (assQuestion::_getSuggestedSolutionCount($value) > 1)
                        {
                                $href = "see_details_for_further_information";
                        }
                        else
                        {
                                $href = "";
                        }
                        $info =& assQuestion::_getQuestionInfo($value);
                        include_once "./Services/Utilities/classes/class.ilUtil.php";
                        $row = array(
                                "nr" => "$key",
                                "title" => ilUtil::prepareFormOutput($this->getQuestionTitle($info["title"])),
                                "max" => $max_points,
                                "reached" => $reached_points,
                                "percent" => sprintf("%2.2f ", ($percentvalue) * 100) . "%",
                                "solution" => $href,
                                "type" => $info["type_tag"],
                                "qid" => $value,
                                "original_id" => $info["original_id"],
                                "workedthrough" => $workedthrough
                        );
                        array_push($result_array, $row);
                        $key++;
                }

                if ($this->getScoreCutting() == 1)
                {
                        if ($total_reached_points < 0)
                        {
                                $total_reached_points = 0;
                        }
                }
                $result_array["test"]["total_max_points"] = $total_max_points;
                $result_array["test"]["total_reached_points"] = $total_reached_points;
                if ((!$total_reached_points) or (!$total_max_points))
                {
                        $percentage = 0.0;
                }
                else
                {
                        $percentage = ($total_reached_points / $total_max_points) * 100.0;
                        if ($percentage < 0) $percentage = 0.0;
                }
                $mark_obj = $this->mark_schema->getMatchingMark($percentage);
                $passed = "";
                if ($mark_obj)
                {
                        if ($mark_obj->getPassed())
                        {
                                $passed = 1;
                        }
                        else
                        {
                                $passed = 0;
                        }
                }
                $result_array["test"]["passed"] = $passed;
                return $result_array;
        }

        function evalTotalPersons()
        {
                global $ilDB;

                $q = sprintf("SELECT COUNT(*) as total FROM tst_active WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $row = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                return $row->total;
        }

        function getCompleteWorkingTime($user_id)
        {
                global $ilDB;

                $q = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_times.active_fi AND tst_active.user_fi = %s",
                        $ilDB->quote($this->getTestId()),
                        $ilDB->quote($user_id)
                );
                $result = $ilDB->query($q);
                $time = 0;
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
                {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->started, $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->finished, $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        $time += ($epoch_2 - $epoch_1);
                }
                return $time;
        }

        function &getCompleteWorkingTimeOfParticipants()
        {
                return $this->_getCompleteWorkingTimeOfParticipants($this->getTestId());
        }

        function &_getCompleteWorkingTimeOfParticipants($test_id)
        {
                global $ilDB;

                $query = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_times.active_fi ORDER BY tst_times.active_fi, tst_times.started",
                        $ilDB->quote($test_id . "")
                );
                $result = $ilDB->query($query);
                $time = 0;
                $times = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        if (!array_key_exists($row["active_fi"], $times))
                        {
                                $times[$row["active_fi"]] = 0;
                        }
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["started"], $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["finished"], $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        $times[$row["active_fi"]] += ($epoch_2 - $epoch_1);
                }
                return $times;
        }

        function getCompleteWorkingTimeOfParticipant($active_id)
        {
                global $ilDB;

                $query = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_times.active_fi AND tst_active.active_id = %s ORDER BY tst_times.active_fi, tst_times.started",
                        $ilDB->quote($this->getTestId() . ""),
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                $time = 0;
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["started"], $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["finished"], $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        $time += ($epoch_2 - $epoch_1);
                }
                return $time;
        }

        function _getWorkingTimeOfParticipantForPass($active_id, $pass)
        {
                global $ilDB;

                $query = sprintf("SELECT * FROM tst_times WHERE active_fi = %s AND pass = %s ORDER BY started",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                $time = 0;
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["started"], $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["finished"], $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        $time += ($epoch_2 - $epoch_1);
                }
                return $time;
        }

        function getVisitTimeOfParticipant($active_id)
        {
                return ilObjTest::_getVisitTimeOfParticipant($this->getTestId(), $active_id);
        }

        function _getVisitTimeOfParticipant($test_id, $active_id)
        {
                global $ilDB;

                $query = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_times.active_fi AND tst_active.active_id = %s ORDER BY tst_times.started",
                        $ilDB->quote($test_id . ""),
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                $firstvisit = 0;
                $lastvisit = 0;
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["started"], $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        if ($firstvisit == 0 || $epoch_1 < $firstvisit) $firstvisit = $epoch_1;
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["finished"], $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        if ($epoch_2 > $lastvisit) $lastvisit = $epoch_2;
                }
                return array("firstvisit" => $firstvisit, "lastvisit" => $lastvisit);
        }

        function &evalStatistical($active_id)
        {
                global $ilDB;
//              global $ilBench;
                $pass = ilObjTest::_getResultPass($active_id);
                $test_result =& $this->getTestResult($active_id, $pass);
                $q = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.active_id = %s AND tst_active.active_id = tst_times.active_fi",
                        $ilDB->quote($active_id)
                );
                $result = $ilDB->query($q);
                $times = array();
                $first_visit = 0;
                $last_visit = 0;
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT)) {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->started, $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        if (!$first_visit) {
                                $first_visit = $epoch_1;
                        }
                        if ($epoch_1 < $first_visit) {
                                $first_visit = $epoch_1;
                        }
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->finished, $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        if (!$last_visit) {
                                $last_visit = $epoch_2;
                        }
                        if ($epoch_2 > $last_visit) {
                                $last_visit = $epoch_2;
                        }
                        $times[$row->active_fi] += ($epoch_2 - $epoch_1);
                }
                $max_time = 0;
                foreach ($times as $key => $value) {
                        $max_time += $value;
                }
                if ((!$test_result["test"]["total_reached_points"]) or (!$test_result["test"]["total_max_points"]))
                {
                        $percentage = 0.0;
                }
                else
                {
                        $percentage = ($test_result["test"]["total_reached_points"] / $test_result["test"]["total_max_points"]) * 100.0;
                        if ($percentage < 0) $percentage = 0.0;
                }
                $mark_obj = $this->mark_schema->getMatchingMark($percentage);
                $first_date = getdate($first_visit);
                $last_date = getdate($last_visit);
                $qworkedthrough = 0;
                foreach ($test_result as $key => $value)
                {
                        if (preg_match("/\d+/", $key))
                        {
                                $qworkedthrough += $value["workedthrough"];
                        }
                }
                if (!$qworkedthrough)
                {
                        $atimeofwork = 0;
                }
                else
                {
                        $atimeofwork = $max_time / $qworkedthrough;
                }
                $result_mark = "";
                $passed = "";
                if ($mark_obj)
                {
                        $result_mark = $mark_obj->getShortName();
                        if ($mark_obj->getPassed())
                        {
                                $passed = 1;
                        }
                        else
                        {
                                $passed = 0;
                        }
                }
                $percent_worked_through = 0;
                if (count($this->questions))
                {
                        $percent_worked_through = $qworkedthrough / count($this->questions);
                }
                $result_array = array(
                        "qworkedthrough" => $qworkedthrough,
                        "qmax" => count($this->questions),
                        "pworkedthrough" => $percent_worked_through,
                        "timeofwork" => $max_time,
                        "atimeofwork" => $atimeofwork,
                        "firstvisit" => $first_date,
                        "lastvisit" => $last_date,
                        "resultspoints" => $test_result["test"]["total_reached_points"],
                        "maxpoints" => $test_result["test"]["total_max_points"],
                        "resultsmarks" => $result_mark,
                        "passed" => $passed,
                        "distancemedian" => "0"
                );
                foreach ($test_result as $key => $value)
                {
                        if (preg_match("/\d+/", $key))
                        {
                                $result_array[$key] = $value;
                        }
                }
                return $result_array;
        }

        function &getTotalPointsPassedArray()
        {
                $totalpoints_array = array();
                $all_users =& $this->evalTotalParticipantsArray();
                foreach ($all_users as $active_id => $user_name)
                {
                        $test_result =& $this->getTestResult($active_id);
                        $reached = $test_result["test"]["total_reached_points"];
                        $total = $test_result["test"]["total_max_points"];
                        $percentage = $total != 0 ? $reached/$total : 0;
                        $mark = $this->mark_schema->getMatchingMark($percentage*100.0);
                        if ($mark)
                        {
                                if ($mark->getPassed())
                                {
                                        array_push($totalpoints_array, $test_result["test"]["total_reached_points"]);
                                }
                        }
                }
                return $totalpoints_array;
        }

        function &getParticipants()
        {
                global $ilDB;
                $q = sprintf("SELECT tst_active.active_id, usr_data.usr_id, usr_data.firstname, usr_data.lastname, usr_data.title, usr_data.login FROM tst_active LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id WHERE tst_active.test_fi = %s ORDER BY usr_data.lastname ASC",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $persons_array = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        $name = $this->lng->txt("unknown");
                        $fullname = $this->lng->txt("unknown");
                        $login = "";
                        if (!$this->getAnonymity())
                        {
                                if (strlen($row["firstname"].$row["lastname"].$row["title"]) == 0)
                                {
                                        $name = $this->lng->txt("deleted_user");
                                        $fullname = $this->lng->txt("deleted_user");
                                        $login = $this->lng->txt("unknown");
                                }
                                else
                                {
                                        $login = $row["login"];
                                        if ($row["user_fi"] == ANONYMOUS_USER_ID)
                                        {
                                                $name = $this->lng->txt("unknown");
                                                $fullname = $this->lng->txt("unknown");
                                        }
                                        else
                                        {
                                                $name = trim($row["lastname"] . ", " . $row["firstname"] . " " .  $row["title"]);
                                                $fullname = trim($row["title"] . " " . $row["firstname"] . " " .  $row["lastname"]);
                                        }
                                }
                        }
                        $persons_array[$row["active_id"]] = array(
                                "name" => $name,
                                "fullname" => $fullname,
                                "login" => $login
                        );
                }
                return $persons_array;
        }

        function &evalTotalPersonsArray($name_sort_order = "asc")
        {
                global $ilDB;
                $q = sprintf("SELECT tst_active.active_id, usr_data.firstname, usr_data.lastname, usr_data.title FROM tst_active LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id WHERE tst_active.test_fi = %s ORDER BY usr_data.lastname " . strtoupper($name_sort_order),
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $persons_array = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        if ($this->getAnonymity())
                        {
                                $persons_array[$row["active_id"]] = $this->lng->txt("unknown");
                        }
                        else
                        {
                                if (strlen($row["firstname"].$row["lastname"].$row["title"]) == 0)
                                {
                                        $persons_array[$row["active_id"]] = $this->lng->txt("deleted_user");
                                }
                                else
                                {
                                        if ($row["user_fi"] == ANONYMOUS_USER_ID)
                                        {
                                                $persons_array[$row["active_id"]] = $row["lastname"];
                                        }
                                        else
                                        {
                                                $persons_array[$row["active_id"]] = trim($row["lastname"] . ", " . $row["firstname"] . " " .  $row["title"]);
                                        }
                                }
                        }
                }
                return $persons_array;
        }

        function &evalTotalParticipantsArray($name_sort_order = "asc")
        {
                global $ilDB;
                $q = sprintf("SELECT tst_active.active_id, usr_data.login, usr_data.firstname, usr_data.lastname, usr_data.title FROM tst_active LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id WHERE tst_active.test_fi = %s ORDER BY usr_data.lastname " . strtoupper($name_sort_order),
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $persons_array = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        if ($this->getAnonymity())
                        {
                                $persons_array[$row["active_id"]] = array("name" => $this->lng->txt("unknown"));
                        }
                        else
                        {
                                if (strlen($row["firstname"].$row["lastname"].$row["title"]) == 0)
                                {
                                        $persons_array[$row["active_id"]] = array("name" => $this->lng->txt("deleted_user"));
                                }
                                else
                                {
                                        if ($row["user_fi"] == ANONYMOUS_USER_ID)
                                        {
                                                $persons_array[$row["active_id"]] = array("name" => $row["lastname"]);
                                        }
                                        else
                                        {
                                                $persons_array[$row["active_id"]] = array("name" => trim($row["lastname"] . ", " . $row["firstname"] . " " .  $row["title"]), "login" => $row["login"]);
                                        }
                                }
                        }
                }
                return $persons_array;
        }

        function evalTotalFinished()
        {
                global $ilDB;

                $q = sprintf("SELECT COUNT(*) as total FROM tst_active WHERE test_fi = %s AND tries > 0",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $row = $result->fetchRow(MDB2_FETCHMODE_OBJECT);
                return $row->total;
        }

        function &getQuestionsOfTest($active_id)
        {
                global $ilDB;
                if ($this->isRandomTest())
                {
                        $query = sprintf("SELECT tst_test_random_question.sequence, tst_test_random_question.question_fi, " .
                                "tst_test_random_question.pass, qpl_questions.points " .
                                "FROM tst_test_random_question, qpl_questions " .
                                "WHERE tst_test_random_question.question_fi = qpl_questions.question_id " .
                                "AND tst_test_random_question.active_fi = %s ORDER BY tst_test_random_question.sequence LIMIT 0, %s",
                                $ilDB->quote($active_id . ""),
                                $this->getQuestionCount()
                        );
                }
                else
                {
                        $query = sprintf("SELECT tst_test_question.sequence, tst_test_question.question_fi, " .
                                "qpl_questions.points " .
                                "FROM tst_test_question, tst_active, qpl_questions " .
                                "WHERE tst_test_question.question_fi = qpl_questions.question_id " .
                                "AND tst_active.active_id = %s AND tst_active.test_fi = tst_test_question.test_fi",
                                $ilDB->quote($active_id . "")
                        );
                }
                $result = $ilDB->query($query);
                $qtest = array();
                if ($result->numRows())
                {
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                array_push($qtest, $row);
                        }
                }
                return $qtest;
        }
        
        function &getQuestionsOfPass($active_id, $pass)
        {
                global $ilDB;
                if ($this->isRandomTest())
                {
                        $query = sprintf("SELECT tst_test_random_question.sequence, tst_test_random_question.question_fi, " .
                                "qpl_questions.points " .
                                "FROM tst_test_random_question, qpl_questions " .
                                "WHERE tst_test_random_question.question_fi = qpl_questions.question_id " .
                                "AND tst_test_random_question.active_fi = %s AND tst_test_random_question.pass = %s " .
                                "ORDER BY tst_test_random_question.sequence LIMIT 0, %s",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($pass . ""),
                                $this->getQuestionCount()
                        );
                }
                else
                {
                        $query = sprintf("SELECT tst_test_question.sequence, tst_test_question.question_fi, " .
                                "qpl_questions.points " .
                                "FROM tst_test_question, tst_active, qpl_questions " .
                                "WHERE tst_test_question.question_fi = qpl_questions.question_id " .
                                "AND tst_active.active_id = %s AND tst_active.test_fi = tst_test_question.test_fi",
                                $ilDB->quote($active_id . "")
                        );
                }
                $result = $ilDB->query($query);
                $qpass = array();
                if ($result->numRows())
                {
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                array_push($qpass, $row);
                        }
                }
                return $qpass;
        }
        
        private function getMembershipByType($a_usr_id,$a_type)
        {
                global $ilDB;
                
                $query = "SELECT DISTINCT obd.obj_id,obr.ref_id FROM rbac_ua AS ua ".
                        "JOIN rbac_fa AS fa ON ua.rol_id = fa.rol_id ".
                        "JOIN tree AS t1 ON t1.child = fa.parent ".
                        "JOIN object_reference AS obr ON t1.parent = obr.ref_id ".
                        "JOIN object_data AS obd ON obr.obj_id = obd.obj_id ".
                        "WHERE obd.type = ".$ilDB->quote($a_type)." ".
                        "AND fa.assign = 'y' ".
                        "AND ua.usr_id = ".$ilDB->quote($a_usr_id)." ";
                $res = $ilDB->query($query);
                
                while($row = $res->fetchRow(DB_FETCHMODE_OBJECT))
                {
                        $ref_ids[] = $row->obj_id;
                }
                
                return $ref_ids ? $ref_ids : array();                   
        }
        
        function getUnfilteredEvaluationData()
        {
                global $ilDB;
                include_once "./Modules/Test/classes/class.ilTestEvaluationPassData.php";
                include_once "./Modules/Test/classes/class.ilTestEvaluationUserData.php";
                include_once "./Modules/Test/classes/class.ilTestEvaluationData.php";
                $data = new ilTestEvaluationData($this);
                $query = sprintf("SELECT tst_test_result.*, qpl_questions.original_id, qpl_questions.title AS questiontitle, " .
                        "qpl_questions.points AS maxpoints " .
                        "FROM tst_test_result, qpl_questions, tst_active " .
                        "WHERE tst_active.active_id = tst_test_result.active_fi " .
                        "AND qpl_questions.question_id = tst_test_result.question_fi " .
                        "AND tst_active.test_fi = %s " .
                        "ORDER BY active_id, pass, TIMESTAMP",
                        $ilDB->quote($this->getTestId() . "")
                );
                $result = $ilDB->query($query);
                $pass = NULL;
                $checked = array();
                $datasets = 0;
                while ($row = $result->fetchRow(DB_FETCHMODE_ASSOC))
                {
                        $data->getParticipant($row["active_fi"])->getPass($row["pass"])->addAnsweredQuestion($row["original_id"] ? $row["original_id"] : $row["question_fi"], $row["maxpoints"], $row["points"]);
                }

                foreach (array_keys($data->getParticipants()) as $active_id)
                {
                        if ($this->isRandomTest())
                        {
                                for ($testpass = 0; $testpass <= $data->getParticipant($active_id)->getLastPass(); $testpass++)
                                {
                                        $query = sprintf("SELECT tst_test_random_question.sequence, tst_test_random_question.question_fi, qpl_questions.original_id, " .
                                                "tst_test_random_question.pass, qpl_questions.points, qpl_questions.title " .
                                                "FROM tst_test_random_question, qpl_questions " .
                                                "WHERE tst_test_random_question.question_fi = qpl_questions.question_id " .
                                                "AND tst_test_random_question.pass = %s " .
                                                "AND tst_test_random_question.active_fi = %s ORDER BY tst_test_random_question.sequence LIMIT 0, %s",
                                                $ilDB->quote($testpass . ""),
                                                $ilDB->quote($active_id . ""),
                                                $this->getQuestionCount()
                                        );
                                        $result = $ilDB->query($query);
                                        if ($result->numRows())
                                        {
                                                while ($row = $result->fetchRow(DB_FETCHMODE_ASSOC))
                                                {
                                                        $tpass = array_key_exists("pass", $row) ? $row["pass"] : 0;
                                                        $data->getParticipant($active_id)->addQuestion($row["original_id"] ? $row["original_id"] : $row["question_fi"], $row["question_fi"], $row["points"], $row["sequence"], $tpass);
                                                        $data->addQuestionTitle($row["original_id"] ? $row["original_id"] : $row["question_fi"], $row["title"]);
                                                }
                                        }
                                }
                        }
                        else
                        {
                                $query = sprintf("SELECT tst_test_question.sequence, tst_test_question.question_fi, " .
                                        "qpl_questions.points, qpl_questions.title, qpl_questions.original_id " .
                                        "FROM tst_test_question, tst_active, qpl_questions " .
                                        "WHERE tst_test_question.question_fi = qpl_questions.question_id " .
                                        "AND tst_active.active_id = %s AND tst_active.test_fi = tst_test_question.test_fi ORDER BY tst_test_question.sequence",
                                        $ilDB->quote($active_id . "")
                                );
                                $result = $ilDB->query($query);
                                if ($result->numRows())
                                {
                                        $questionsbysequence = array();
                                        while ($row = $result->fetchRow(DB_FETCHMODE_ASSOC))
                                        {
                                                $questionsbysequence[$row["sequence"]] = $row;
                                        }
                                        $sequery = sprintf("SELECT * FROM tst_sequence WHERE active_fi = %s",
                                                $ilDB->quote($active_id)
                                        );
                                        $seqresult = $ilDB->query($sequery);
                                        while ($seqrow = $seqresult->fetchRow(DB_FETCHMODE_ASSOC))
                                        {
                                                $questionsequence = unserialize($seqrow["sequence"]);
                                                foreach ($questionsequence as $sidx => $seq)
                                                {
                                                        $qsid = $questionsbysequence[$seq]["original_id"] ? $questionsbysequence[$seq]["original_id"] : $questionsbysequence[$seq]["question_fi"];
                                                        $data->getParticipant($active_id)->addQuestion($qsid, $questionsbysequence[$seq]["question_fi"], $questionsbysequence[$seq]["points"], $sidx + 1, $seqrow["pass"]);
                                                        $data->addQuestionTitle($qsid, $questionsbysequence[$seq]["title"]);
                                                }
                                        }
                                }
                        }
                }

                if ($this->ects_output)
                {
                        $passed_array =& $this->getTotalPointsPassedArray();
                }
                foreach (array_keys($data->getParticipants()) as $active_id)
                {
                        $percentage = $data->getParticipant($active_id)->getReachedPointsInPercent();
                        $mark = $this->mark_schema->getMatchingMark($percentage);
                        if (is_object($mark))
                        {
                                $data->getParticipant($active_id)->setMark($mark->getShortName());
                                $data->getParticipant($active_id)->setMarkOfficial($mark->getOfficialName());
                                $data->getParticipant($active_id)->setPassed($mark->getPassed());
                        }
                        if ($this->ects_output)
                        {
                                $ects_mark = $this->getECTSGrade($passed_array, $data->getParticipant($active_id)->getReached(), $data->getParticipant($active_id)->getMaxPoints());
                                $data->getParticipant($active_id)->setECTSMark($ects_mark);
                        }
                        $visitingTime =& $this->getVisitTimeOfParticipant($active_id);
                        $data->getParticipant($active_id)->setFirstVisit($visitingTime["firstvisit"]);
                        $data->getParticipant($active_id)->setLastVisit($visitingTime["lastvisit"]);
                }
                return $data;
        }
        
        function _getQuestionCountAndPointsForPassOfParticipant($active_id, $pass)
        {
                global $ilDB;
                $random = ilObjTest::_lookupRandomTestFromActiveId($active_id);
                if ($random)
                {
                        $query = sprintf("SELECT tst_test_random_question.pass, COUNT(tst_test_random_question.question_fi) AS qcount, " .
                                "SUM(qpl_questions.points) AS qsum FROM tst_test_random_question, qpl_questions " .
                                "WHERE tst_test_random_question.question_fi = qpl_questions.question_id AND " .
                                "tst_test_random_question.active_fi = %s and pass = %s GROUP BY tst_test_random_question.active_fi, " .
                                "tst_test_random_question.pass",
                                $ilDB->quote($active_id),
                                $ilDB->quote($pass)
                        );
                }
                else
                {
                        $query = sprintf("SELECT COUNT(tst_test_question.question_fi) AS qcount, " .
                                "SUM(qpl_questions.points) AS qsum FROM tst_test_question, qpl_questions, tst_active " .
                                "WHERE tst_test_question.question_fi = qpl_questions.question_id AND tst_test_question.test_fi = tst_active.test_fi AND " .
                                "tst_active.active_id = %s GROUP BY tst_test_question.test_fi",
                                $ilDB->quote($active_id)
                        );
                }
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
                        return array("count" => $row["qcount"], "points" => $row["qsum"]);
                }
                else
                {
                        return array("count" => 0, "points" => 0);
                }
        }

        function &getCompleteEvaluationData($withStatistics = TRUE, $filterby = "", $filtertext = "")
        {
                include_once "./Modules/Test/classes/class.ilTestEvaluationData.php";
                include_once "./Modules/Test/classes/class.ilTestEvaluationPassData.php";
                include_once "./Modules/Test/classes/class.ilTestEvaluationUserData.php";
                $data = $this->getUnfilteredEvaluationData();
                if ($withStatistics)
                {
                        $data->calculateStatistics();
                }
                $data->setFilter($filterby, $filtertext);
                return $data;
        }
        
        function &evalResultsOverview()
        {
                return $this->_evalResultsOverview($this->getTestId());
        }

        function &_evalResultsOverview($test_id)
        {
                global $ilDB;
                
                $query = sprintf("SELECT usr_data.usr_id, usr_data.firstname, usr_data.lastname, usr_data.title, usr_data.login, " .
                        "tst_test_result.*, qpl_questions.original_id, qpl_questions.title AS questiontitle, " .
                        "qpl_questions.points AS maxpoints " .
                        "FROM tst_test_result, qpl_questions, tst_active " .
                        "LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id " .
                        "WHERE tst_active.active_id = tst_test_result.active_fi " .
                        "AND qpl_questions.question_id = tst_test_result.question_fi " .
                        "AND tst_active.test_fi = %s " .
                        "ORDER BY active_id, pass, TIMESTAMP",
                        $ilDB->quote($test_id . "")
                );
                $result = $ilDB->query($query);
                $overview = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        if (!array_key_exists($row["active_fi"], $overview))
                        {
                                $overview[$row["active_fi"]] = array();
                                $overview[$row["active_fi"]]["firstname"] = $row["firstname"];
                                $overview[$row["active_fi"]]["lastname"] = $row["lastname"];
                                $overview[$row["active_fi"]]["title"] = $row["title"];
                                $overview[$row["active_fi"]]["login"] = $row["login"];
                                $overview[$row["active_fi"]]["usr_id"] = $row["usr_id"];
                                $overview[$row["active_fi"]]["started"] = $row["started"];
                                $overview[$row["active_fi"]]["finished"] = $row["finished"];
                        }
                        if (!array_key_exists($row["pass"], $overview[$row["active_fi"]]))
                        {
                                $overview[$row["active_fi"]][$row["pass"]] = array();
                                $overview[$row["active_fi"]][$row["pass"]]["reached"] = 0;
                                $overview[$row["active_fi"]][$row["pass"]]["maxpoints"] = $row["maxpoints"];
                        }
                        array_push($overview[$row["active_fi"]][$row["pass"]], $row);
                        $overview[$row["active_fi"]][$row["pass"]]["reached"] += $row["points"];
                }
                return $overview;
        }

        function &evalResultsOverviewOfParticipant($active_id)
        {
                global $ilDB;
                
                $query = sprintf("SELECT usr_data.usr_id, usr_data.firstname, usr_data.lastname, usr_data.title, usr_data.login, " .
                        "tst_test_result.*, qpl_questions.original_id, qpl_questions.title AS questiontitle, " .
                        "qpl_questions.points AS maxpoints " .
                        "FROM tst_test_result, qpl_questions, tst_active " .
                        "LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id " .
                        "WHERE tst_active.active_id = tst_test_result.active_fi " .
                        "AND qpl_questions.question_id = tst_test_result.question_fi " .
                        "AND tst_active.test_fi = %s AND tst_active.active_id = %s" .
                        "ORDER BY active_id, pass, TIMESTAMP",
                        $ilDB->quote($this->getTestId() . ""),
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                $overview = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        if (!array_key_exists($row["active_fi"], $overview))
                        {
                                $overview[$row["active_fi"]] = array();
                                $overview[$row["active_fi"]]["firstname"] = $row["firstname"];
                                $overview[$row["active_fi"]]["lastname"] = $row["lastname"];
                                $overview[$row["active_fi"]]["title"] = $row["title"];
                                $overview[$row["active_fi"]]["login"] = $row["login"];
                                $overview[$row["active_fi"]]["usr_id"] = $row["usr_id"];
                                $overview[$row["active_fi"]]["started"] = $row["started"];
                                $overview[$row["active_fi"]]["finished"] = $row["finished"];
                        }
                        if (!array_key_exists($row["pass"], $overview[$row["active_fi"]]))
                        {
                                $overview[$row["active_fi"]][$row["pass"]] = array();
                                $overview[$row["active_fi"]][$row["pass"]]["reached"] = 0;
                                $overview[$row["active_fi"]][$row["pass"]]["maxpoints"] = $row["maxpoints"];
                        }
                        array_push($overview[$row["active_fi"]][$row["pass"]], $row);
                        $overview[$row["active_fi"]][$row["pass"]]["reached"] += $row["points"];
                }
                return $overview;
        }

        function buildName($user_id, $firstname, $lastname, $title)
        {
                $name = "";
                if (strlen($firstname.$lastname.$title) == 0)
                {
                        $name = $this->lng->txt("deleted_user");
                }
                else
                {
                        if ($user_id == ANONYMOUS_USER_ID)
                        {
                                $name = $lastname;
                        }
                        else
                        {
                                $name = trim($lastname . ", " . $firstname . " " .  $title);
                        }
                        if ($this->getAnonymity())
                        {
                                $name = $this->lng->txt("anonymous");
                        }
                }
                return $name;
        }

        function _buildName($is_anonymous, $user_id, $firstname, $lastname, $title)
        {
                global $lng;
                $name = "";
                if (strlen($firstname.$lastname.$title) == 0)
                {
                        $name = $lng->txt("deleted_user");
                }
                else
                {
                        if ($user_id == ANONYMOUS_USER_ID)
                        {
                                $name = $lastname;
                        }
                        else
                        {
                                $name = trim($lastname . ", " . $firstname . " " .  $title);
                        }
                        if ($is_anonymous)
                        {
                                $name = $lng->txt("anonymous");
                        }
                }
                return $name;
        }

        function evalTotalStartedAverageTime()
        {
                global $ilDB;

                $q = sprintf("SELECT tst_times.* FROM tst_active, tst_times WHERE tst_active.test_fi = %s AND tst_active.active_id = tst_times.active_fi",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($q);
                $times = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
                {
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->started, $matches);
                        $epoch_1 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row->finished, $matches);
                        $epoch_2 = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        $times[$row->active_fi] += ($epoch_2 - $epoch_1);
                }
                $max_time = 0;
                $counter = 0;
                foreach ($times as $key => $value)
                {
                        $max_time += $value;
                        $counter++;
                }
                if ($counter)
                {
                        $average_time = round($max_time / $counter);
                }
                        else
                {
                        $average_time = 0;
                }
                return $average_time;
        }

        function &getAvailableQuestionpools($use_object_id = false, $equal_points = false, $could_be_offline = false, $show_path = FALSE, $with_questioncount = FALSE, $permission = "read")
        {
                include_once "./Modules/TestQuestionPool/classes/class.ilObjQuestionPool.php";
                return ilObjQuestionPool::_getAvailableQuestionpools($use_object_id, $equal_points, $could_be_offline, $show_path, $with_questioncount, $permission);
        }

        function getEstimatedWorkingTime()
        {
                $time_in_seconds = 0;
                foreach ($this->questions as $question_id)
                {
                        $question =& ilObjTest::_instanciateQuestion($question_id);
                        $est_time = $question->getEstimatedWorkingTime();
                        $time_in_seconds += $est_time["h"] * 3600 + $est_time["m"] * 60 + $est_time["s"];
                }
                $hours = (int)($time_in_seconds / 3600) ;
                $time_in_seconds = $time_in_seconds - ($hours * 3600);
                $minutes = (int)($time_in_seconds / 60);
                $time_in_seconds = $time_in_seconds - ($minutes * 60);
                $result = array("h" => $hours, "m" => $minutes, "s" => $time_in_seconds);
                return $result;
        }

        function randomSelectQuestions($nr_of_questions, $questionpool, $use_obj_id = 0, $qpls = "", $pass = NULL)
        {
                global $rbacsystem;
                global $ilDB;
                // get the questionpool id if a questionpool ref id was entered
                if ($questionpool != 0)
                {
                        // retrieve object id
                        if (!$use_obj_id)
                        {
                                $query = sprintf("SELECT obj_id FROM object_reference WHERE ref_id = %s",
                                        $ilDB->quote("$questionpool")
                                );
                                $result = $ilDB->query($query);
                                $row = $result->fetchRow(DB_FETCHMODE_ARRAY);
                                $questionpool = $row[0];
                        }
                }

                // get all existing questions in the test
                $query = sprintf("SELECT qpl_questions.original_id FROM qpl_questions, tst_test_question WHERE qpl_questions.question_id = tst_test_question.question_fi AND tst_test_question.test_fi = %s",
                        $ilDB->quote($this->getTestId() . "")
                );
                $result = $ilDB->query($query);
                $original_ids = array();
                while ($row = $result->fetchRow(DB_FETCHMODE_ARRAY))
                {
                        if (strcmp($row[0], "") != 0)
                        {
                                array_push($original_ids, $row[0]);
                        }
                }
                $original_clause = "";
                if (count($original_ids))
                {
                        $original_clause = " AND ISNULL(qpl_questions.original_id) AND qpl_questions.question_id NOT IN ('" . join($original_ids, "','") . "')";
                }

                // get a list of questionpools which are not allowed for the test (only for random selection of questions in test questions editor)
                if (($questionpool == 0) && (!is_array($qpls)))
                {
                        include_once "./Modules/TestQuestionPool/classes/class.ilObjQuestionPool.php";
                        $available_pools = array_keys(ilObjQuestionPool::_getAvailableQuestionpools($use_object_id = TRUE, $equal_points = FALSE, $could_be_offline = FALSE, $showPath = FALSE, $with_questioncount = FALSE));
                        $available = "";
                        $constraint_qpls = "";
                        if (count($available_pools))
                        {
                                $available = " AND qpl_questions.obj_fi IN ('" . join($available_pools, "','") . "')";
                        }
                        else
                        {
                                return array();
                        }
                }

                $result_array = array();
                if ($questionpool == 0)
                {
                        if (is_array($qpls))
                        {
                                if (count($qpls) > 0)
                                {
                                        $qplidx = array();
                                        foreach ($qpls as $idx => $arr)
                                        {
                                                array_push($qplidx, $arr["qpl"]);
                                        }
                                        $constraint_qpls = " AND qpl_questions.obj_fi IN ('" . join($qplidx, "','") . "')";
                                }
                        }
                        $query = "SELECT COUNT(question_id) FROM qpl_questions, object_data WHERE ISNULL(qpl_questions.original_id) AND object_data.type = 'qpl' AND object_data.obj_id = qpl_questions.obj_fi$available$constraint_qpls AND qpl_questions.complete = '1'$original_clause";
                }
                        else
                {
                        $query = sprintf("SELECT COUNT(question_id) FROM qpl_questions WHERE ISNULL(qpl_questions.original_id) AND obj_fi = %s$original_clause",
                                $ilDB->quote("$questionpool")
                        );
                }
                $result = $ilDB->query($query);
                $row = $result->fetchRow(DB_FETCHMODE_ARRAY);
                if (($row[0]) <= $nr_of_questions)
                {
                        // take all available questions
                        if ($questionpool == 0)
                        {
                                $query = "SELECT question_id FROM qpl_questions, object_data WHERE ISNULL(qpl_questions.original_id) AND object_data.type = 'qpl' AND object_data.obj_id = qpl_questions.obj_fi$available$constraint_qpls AND qpl_questions.complete = '1'$original_clause";
                        }
                                else
                        {
                                $query = sprintf("SELECT question_id FROM qpl_questions WHERE ISNULL(qpl_questions.original_id) AND obj_fi = %s AND qpl_questions.complete = '1'$original_clause",
                                        $ilDB->quote("$questionpool")
                                );
                        }
                        $result = $ilDB->query($query);
                        while ($row = $result->fetchRow(DB_FETCHMODE_ARRAY))
                        {
                                if ((!in_array($row[0], $this->questions)) && (strcmp($row[0], "") != 0))
                                {
                                        $result_array[$row[0]] = $row[0];
                                }
                        }
                }
                        else
                {
                        // select a random number out of the maximum number of questions
                        mt_srand((double)microtime()*1000000);
                        $random_number = mt_rand(0, $row[0] - 1);
                        $securitycounter = 500;
                        while ((count($result_array) < $nr_of_questions) && ($securitycounter > 0))
                        {
                                if ($questionpool == 0)
                                {
                                        $query = "SELECT question_id FROM qpl_questions, object_data WHERE ISNULL(qpl_questions.original_id) AND object_data.type = 'qpl' AND object_data.obj_id = qpl_questions.obj_fi$available$constraint_qpls AND qpl_questions.complete = '1'$original_clause LIMIT $random_number, 1";
                                }
                                        else
                                {
                                        $query = sprintf("SELECT question_id FROM qpl_questions WHERE ISNULL(qpl_questions.original_id) AND obj_fi = %s AND qpl_questions.complete = '1'$original_clause LIMIT $random_number, 1",
                                                $ilDB->quote("$questionpool")
                                        );
                                }
                                $result = $ilDB->query($query);
                                $result_row = $result->fetchRow(DB_FETCHMODE_ARRAY);
                                if ((!in_array($result_row[0], $this->questions)) && (strcmp($result_row[0], "") != 0))
                                {
                                        $result_array[$result_row[0]] = $result_row[0];
                                }
                                $random_number = mt_rand(0, $row[0] - 1);
                                $securitycounter--;
                        }
                }
                return $result_array;
        }

        function getImagePath()
        {
                return CLIENT_WEB_DIR . "/assessment/" . $this->getId() . "/images/";
        }

        function getImagePathWeb()
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $webdir = ilUtil::removeTrailingPathSeparators(CLIENT_WEB_DIR) . "/assessment/" . $this->getId() . "/images/";
                return str_replace(ilUtil::removeTrailingPathSeparators(ILIAS_ABSOLUTE_PATH), ilUtil::removeTrailingPathSeparators(ILIAS_HTTP_PATH), $webdir);
        }

  function &createQuestionGUI($question_type, $question_id = -1)
        {
                if ((!$question_type) and ($question_id > 0))
                {
                        $question_type = $this->getQuestionType($question_id);
                }
                include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                assQuestion::_includeClass($question_type, 1);
                $question_type_gui = $question_type . "GUI";
                $question = new $question_type_gui();
                if ($question_id > 0)
                {
                        $question->object->loadFromDb($question_id);
                }
                return $question;
  }

  function &_instanciateQuestion($question_id)
        {
                if (strcmp($question_id, "") != 0)
                {
                        include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                        return assQuestion::_instanciateQuestion($question_id);
                }
  }

        function moveQuestions($move_questions, $target_index, $insert_mode)
        {
                $this->questions = array_values($this->questions);
                $array_pos = array_search($target_index, $this->questions);
                if ($insert_mode == 0)
                {
                        $part1 = array_slice($this->questions, 0, $array_pos);
                        $part2 = array_slice($this->questions, $array_pos);
                }
                else if ($insert_mode == 1)
                {
                        $part1 = array_slice($this->questions, 0, $array_pos + 1);
                        $part2 = array_slice($this->questions, $array_pos + 1);
                }
                foreach ($move_questions as $question_id)
                {
                        if (!(array_search($question_id, $part1) === FALSE))
                        {
                                unset($part1[array_search($question_id, $part1)]);
                        }
                        if (!(array_search($question_id, $part2) === FALSE))
                        {
                                unset($part2[array_search($question_id, $part2)]);
                        }
                }
                $part1 = array_values($part1);
                $part2 = array_values($part2);
                $new_array = array_values(array_merge($part1, $move_questions, $part2));
                $this->questions = array();
                $counter = 1;
                foreach ($new_array as $question_id)
                {
                        $this->questions[$counter] = $question_id;
                        $counter++;
                }
                $this->saveQuestionsToDb();
        }


        function startingTimeReached()
        {
                if ($this->getStartingTime())
                {
                        if (preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->getStartingTime(), $matches))
                        {
                                $epoch_time = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                                $now = mktime();
                                if ($now < $epoch_time)
                                {
                                        // starting time not reached
                                        return false;
                                }
                        }
                }
                return true;
        }

        function endingTimeReached()
        {
                if ($this->getEndingTime())
                {
                        if (preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->getEndingTime(), $matches))
                        {
                                $epoch_time = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                                $now = mktime();
                                if ($now > $epoch_time)
                                {
                                        // ending time reached
                                        return true;
                                }
                        }
                }
                return false;
        }

        function getQuestionsTable($sort, $sortorder, $textfilter, $startrow = 0, $completeonly = 0, $filter_question_type = "", $filter_questionpool = "")
        {
                global $ilUser;
                global $ilDB;

                $where = "";
                foreach ($textfilter as $sel_filter_type => $filter_text)
                {
                        if (strlen($filter_text) > 0) 
                        {
                                switch($sel_filter_type) 
                                {
                                        case "title":
                                                $where .= " AND qpl_questions.title LIKE " . $ilDB->quote("%" . $filter_text . "%");
                                                break;
                                        case "comment":
                                                $where .= " AND qpl_questions.comment LIKE " . $ilDB->quote("%" . $filter_text . "%");
                                                break;
                                        case "author":
                                                $where .= " AND qpl_questions.author LIKE " . $ilDB->quote("%" . $filter_text . "%");
                                                break;
                                        case "qpl":
                                                $where .= " AND object_data.title LIKE " . $ilDB->quote("%" . $filter_text . "%");
                                                break;
                                }
                        }
                }

                if ($filter_question_type && (strcmp($filter_question_type, "all") != 0))
                {
                        $where .= " AND qpl_question_type.type_tag = " . $ilDB->quote($filter_question_type);
                }

                if ($filter_questionpool && (strcmp($filter_questionpool, "all") != 0))
                {
                        $where .= " AND qpl_questions.obj_fi = $filter_questionpool";
                }

                // build sort order for sql query
                $order = "";
                $images = array();
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                switch($sort) 
                {
                        case "title":
                                $order = " ORDER BY qpl_questions.title $sortorder";
                                $images["title"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "comment":
                                $order = " ORDER BY comment $sortorder";
                                $images["comment"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "type":
                                $order = " ORDER BY question_type_id $sortorder";
                                $images["type"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "author":
                                $order = " ORDER BY author $sortorder";
                                $images["author"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "created":
                                $order = " ORDER BY created $sortorder";
                                $images["created"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "updated":
                                $order = " ORDER BY timestamp14 $sortorder";
                                $images["updated"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                        case "qpl":
                                $order = " ORDER BY UPPER(object_data.title) $sortorder";
                                $images["qpl"] = " <img src=\"" . ilUtil::getImagePath(strtolower($sortorder) . "_order.gif") . "\" alt=\"" . $this->lng->txt(strtolower($sortorder) . "ending_order")."\" />";
                                break;
                }
                $maxentries = $ilUser->prefs["hits_per_page"];
                if ($maxentries < 1)
                {
                        $maxentries = 9999;
                }
                include_once "./Modules/TestQuestionPool/classes/class.ilObjQuestionPool.php";
                $available_pools = array_keys(ilObjQuestionPool::_getAvailableQuestionpools($use_object_id = TRUE, $equal_points = FALSE, $could_be_offline = FALSE, $showPath = FALSE, $with_questioncount = FALSE));
                $available = "";
                if (count($available_pools))
                {
                        $available = " AND qpl_questions.obj_fi IN ('" . join($available_pools, "','") . "')";
                }
                else
                {
                        return array();
                }
                if ($completeonly)
                {
                        $available .= " AND qpl_questions.complete = " . $ilDB->quote("1");
                }

                // get all questions in the test
                $query = sprintf("SELECT qpl_questions.original_id, qpl_questions.TIMESTAMP + 0 AS timestamp14 FROM qpl_questions, tst_test_question, object_data WHERE qpl_questions.question_id = tst_test_question.question_fi AND object_data.obj_id = qpl_questions.obj_fi AND tst_test_question.test_fi = %s",
                        $ilDB->quote($this->getTestId() . "")
                );
                $result = $ilDB->query($query);
                $original_ids = array();
                while ($row = $result->fetchRow(DB_FETCHMODE_ARRAY))
                {
                        if (strcmp($row[0], "") != 0)
                        {
                                array_push($original_ids, $row[0]);
                        }
                }
                $original_clause = " ISNULL(qpl_questions.original_id)";
                if (count($original_ids))
                {
                        $original_clause = " ISNULL(qpl_questions.original_id) AND qpl_questions.question_id NOT IN ('" . join($original_ids, "','") . "')";
                }

                $query = "SELECT qpl_questions.question_id, qpl_questions.TIMESTAMP + 0 AS timestamp14 FROM qpl_questions, qpl_question_type, object_data WHERE $original_clause$available AND object_data.obj_id = qpl_questions.obj_fi AND qpl_questions.question_type_fi = qpl_question_type.question_type_id $where$order$limit";
    $query_result = $ilDB->query($query);
                $max = $query_result->numRows();
                if ($startrow > $max -1)
                {
                        $startrow = $max - ($max % $maxentries);
                }
                else if ($startrow < 0)
                {
                        $startrow = 0;
                }
                $limit = " LIMIT $startrow, $maxentries";
                $query = "SELECT qpl_questions.*, qpl_questions.TIMESTAMP + 0 AS timestamp14, qpl_question_type.type_tag, qpl_question_type.plugin FROM qpl_questions, qpl_question_type, object_data WHERE $original_clause $available AND object_data.obj_id = qpl_questions.obj_fi AND qpl_questions.question_type_fi = qpl_question_type.question_type_id $where$order$limit";
                $query_result = $ilDB->query($query);
                $rows = array();
                if ($query_result->numRows())
                {
                        while ($row = $query_result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                if ($row["plugin"])
                                {
                                        if ($this->isPluginActive($row["type_tag"]))
                                        {
                                                array_push($rows, $row);
                                        }
                                }
                                else
                                {
                                        array_push($rows, $row);
                                }
                        }
                }
                $nextrow = $startrow + $maxentries;
                if ($nextrow > $max - 1)
                {
                        $nextrow = $startrow;
                }
                $prevrow = $startrow - $maxentries;
                if ($prevrow < 0)
                {
                        $prevrow = 0;
                }
                return array(
                        "rows" => $rows,
                        "images" => $images,
                        "startrow" => $startrow,
                        "nextrow" => $nextrow,
                        "prevrow" => $prevrow,
                        "step" => $maxentries,
                        "rowcount" => $max
                );
        }

        function fromXML(&$assessment)
        {
                unset($_SESSION["import_mob_xhtml"]);

                $this->setDescription($assessment->getComment());
                $this->setTitle($assessment->getTitle());

                foreach ($assessment->objectives as $objectives)
                {
                        foreach ($objectives->materials as $material)
                        {
                                $this->setIntroduction($this->QTIMaterialToString($material));
                        }
                }
                if ($assessment->getPresentationMaterial())
                {
                        $this->setFinalStatement($this->QTIMaterialToString($assessment->getPresentationMaterial()->getMaterial(0)));
                }
                
                foreach ($assessment->assessmentcontrol as $assessmentcontrol)
                {
                        switch ($assessmentcontrol->getSolutionswitch())
                        {
                                case "Yes":
                                        $this->setInstantFeedbackSolution(1);
                                        break;
                                default:
                                        $this->setInstantFeedbackSolution(0);
                                        break;
                        }
                }

                foreach ($assessment->qtimetadata as $metadata)
                {
                        switch ($metadata["label"])
                        {
                                case "test_type":
                                        // for old tests with a test type
                                        $type = $metadata["entry"];
                                        switch ($type)
                                        {
                                                case 1:
                                                        // assessment
                                                        $this->setAnonymity(1);
                                                        break;
                                                case 2:
                                                        // self assessment
                                                        break;
                                                case 4:
                                                        // online exam
                                                        $this->setFixedParticipants(1);
                                                        $this->setListOfQuestionsSettings(7);
                                                        $this->setShowSolutionPrintview(1);
                                                        break;
                                                case 5:
                                                        // varying random test
                                                        break;
                                        }
                                        break;
                                case "sequence_settings":
                                        $this->setSequenceSettings($metadata["entry"]);
                                        break;
                                case "author":
                                        $this->setAuthor($metadata["entry"]);
                                        break;
                                case "nr_of_tries":
                                        $this->setNrOfTries($metadata["entry"]);
                                        break;
                                case "kiosk":
                                        $this->setKiosk($metadata["entry"]);
                                        break;
                                case "showfinalstatement":
                                        $this->setShowFinalStatement($metadata["entry"]);
                                        break;
                                case "showinfo":
                                        $this->setShowInfo($metadata["entry"]);
                                        break;
                                case "forcejs":
                                        $this->setForceJS($metadata["entry"]);
                                        break;
                                case "customstyle":
                                        $this->setCustomStyle($metadata["entry"]);
                                        break;
                                case "hide_previous_results":
                                        if ($metadata["entry"] == 0)
                                        {
                                                $this->setUsePreviousAnswers(1);
                                        }
                                        else
                                        {
                                                $this->setUsePreviousAnswers(0);
                                        }
                                        break;
                                case "use_previous_answers":
                                        $this->setUsePreviousAnswers($metadata["entry"]);
                                        break;
                                case "answer_feedback":
                                        $this->setAnswerFeedback($metadata["entry"]);
                                        break;
                                case "hide_title_points":
                                        $this->setTitleOutput($metadata["entry"]);
                                        break;
                                case "title_output":
                                        $this->setTitleOutput($metadata["entry"]);
                                        break;
                                case "random_test":
                                        $this->setRandomTest($metadata["entry"]);
                                        break;
                                case "random_question_count":
                                        $this->setRandomQuestionCount($metadata["entry"]);
                                        break;
                                case "results_presentation":
                                        $this->setResultsPresentation($metadata["entry"]);
                                        break;
                                case "reset_processing_time":
                                        $this->setResetProcessingTime($metadata["entry"]);
                                        break;
                                case "show_solution_details":
                                        $this->setShowSolutionDetails($metadata["entry"]);
                                        break;
                                case "show_solution_printview":
                                        $this->setShowSolutionPrintview($metadata["entry"]);
                                        break;
                                case "show_solution_feedback":
                                        $this->setShowSolutionFeedback($metadata["entry"]);
                                        break;
                                case "instant_verification":
                                        $this->setInstantFeedbackSolution($metadata["entry"]);
                                        break;
                                case "answer_feedback_points":
                                        $this->setAnswerFeedbackPoints($metadata["entry"]);
                                        break;
                                case "anonymity":
                                        $this->setAnonymity($metadata["entry"]);
                                        break;
                                case "show_cancel":
                                        $this->setShowCancel($metadata["entry"]);
                                        break;
                                case "show_marker":
                                        $this->setShowMarker($metadata["entry"]);
                                        break;
                                case "fixed_participants":
                                        $this->setFixedParticipants($metadata["entry"]);
                                        break;
                                case "score_reporting":
                                        $this->setScoreReporting($metadata["entry"]);
                                        break;
                                case "shuffle_questions":
                                        $this->setShuffleQuestions($metadata["entry"]);
                                        break;
                                case "count_system":
                                        $this->setCountSystem($metadata["entry"]);
                                        break;
                                case "mc_scoring":
                                        $this->setMCScoring($metadata["entry"]);
                                        break;
                                case "score_cutting":
                                        $this->setScoreCutting($metadata["entry"]);
                                        break;
                                case "password":
                                        $this->setPassword($metadata["entry"]);
                                        break;
                                case "allowedUsers":
                                        $this->setAllowedUsers($metadata["entry"]);
                                        break;
                                case "allowedUsersTimeGap":
                                        $this->setAllowedUsersTimeGap($metadata["entry"]);
                                        break;
                                case "pass_scoring":
                                        $this->setPassScoring($metadata["entry"]);
                                        break;
                                case "show_summary":
                                        $this->setListOfQuestionsSettings($metadata["entry"]);
                                        break;
                                case "reporting_date":
                                        $iso8601period = $metadata["entry"];
                                        if (preg_match("/P(\d+)Y(\d+)M(\d+)DT(\d+)H(\d+)M(\d+)S/", $iso8601period, $matches))
                                        {
                                                $this->setReportingDate(sprintf("%02d%02d%02d%02d%02d%02d", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                                        }
                                        break;
                                case "processing_time":
                                        $this->setProcessingTime($metadata['entry']);
                                        break;
                                case "starting_time":
                                        $iso8601period = $metadata["entry"];
                                        if (preg_match("/P(\d+)Y(\d+)M(\d+)DT(\d+)H(\d+)M(\d+)S/", $iso8601period, $matches))
                                        {
                                                $this->setStartingTime(sprintf("%02d%02d%02d%02d%02d%02d", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                                        }
                                        break;
                                case "ending_time":
                                        $iso8601period = $metadata["entry"];
                                        if (preg_match("/P(\d+)Y(\d+)M(\d+)DT(\d+)H(\d+)M(\d+)S/", $iso8601period, $matches))
                                        {
                                                $this->setEndingTime(sprintf("%02d%02d%02d%02d%02d%02d", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                                        }
                                        break;
                        }
                        if (preg_match("/mark_step_\d+/", $metadata["label"]))
                        {
                                $xmlmark = $metadata["entry"];
                                preg_match("/<short>(.*?)<\/short>/", $xmlmark, $matches);
                                $mark_short = $matches[1];
                                preg_match("/<official>(.*?)<\/official>/", $xmlmark, $matches);
                                $mark_official = $matches[1];
                                preg_match("/<percentage>(.*?)<\/percentage>/", $xmlmark, $matches);
                                $mark_percentage = $matches[1];
                                preg_match("/<passed>(.*?)<\/passed>/", $xmlmark, $matches);
                                $mark_passed = $matches[1];
                                $this->mark_schema->addMarkStep($mark_short, $mark_official, $mark_percentage, $mark_passed);
                        }
                }
                // handle the import of media objects in XHTML code
                if (is_array($_SESSION["import_mob_xhtml"]))
                {
                        include_once "./Services/MediaObjects/classes/class.ilObjMediaObject.php";
                        include_once "./Services/RTE/classes/class.ilRTE.php";
                        include_once "./Modules/TestQuestionPool/classes/class.ilObjQuestionPool.php";
                        foreach ($_SESSION["import_mob_xhtml"] as $mob)
                        {
                                $importfile = $this->getImportDirectory() . "/" . $_SESSION["tst_import_subdir"] . "/" . $mob["uri"];
                                if (file_exists($importfile))
                                {
                                        $media_object =& ilObjMediaObject::_saveTempFileAsMediaObject(basename($importfile), $importfile, FALSE);
                                        ilObjMediaObject::_saveUsage($media_object->getId(), "tst:html", $this->getId());
                                        $this->setIntroduction(ilRTE::_replaceMediaObjectImageSrc(str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $this->getIntroduction()), 1));
                                        $this->setFinalStatement(ilRTE::_replaceMediaObjectImageSrc(str_replace("src=\"" . $mob["mob"] . "\"", "src=\"" . "il_" . IL_INST_ID . "_mob_" . $media_object->getId() . "\"", $this->getFinalStatement()), 1));
                                }
                                else
                                {
                                        global $ilLog;
                                        $ilLog->write("Error: Could not open XHTML mob file for test introduction during test import. File $importfile does not exist!");
                                }
                        }
                        $this->saveToDb();
                }
        }

        function toXML()
        {
                include_once("./classes/class.ilXmlWriter.php");
                $a_xml_writer = new ilXmlWriter;
                // set xml header
                $a_xml_writer->xmlHeader();
                $a_xml_writer->xmlSetDtdDef("<!DOCTYPE questestinterop SYSTEM \"ims_qtiasiv1p2p1.dtd\">");
                $a_xml_writer->xmlStartTag("questestinterop");

                $attrs = array(
                        "ident" => "il_".IL_INST_ID."_tst_".$this->getTestId(),
                        "title" => $this->getTitle()
                );
                $a_xml_writer->xmlStartTag("assessment", $attrs);
                // add qti comment
                $a_xml_writer->xmlElement("qticomment", NULL, $this->getDescription());

                // add qti duration
                if ($this->enable_processing_time)
                {
                        preg_match("/(\d+):(\d+):(\d+)/", $this->processing_time, $matches);
                        $a_xml_writer->xmlElement("duration", NULL, sprintf("P0Y0M0DT%dH%dM%dS", $matches[1], $matches[2], $matches[3]));
                }

-               // add the rest of the preferences in qtimetadata tags, because there is no correspondent definition in QTI
                $a_xml_writer->xmlStartTag("qtimetadata");
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "ILIAS_VERSION");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->ilias->getSetting("ilias_version"));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // anonymity
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "anonymity");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getAnonymity()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // random test
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "random_test");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->isRandomTest()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // sequence settings
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "sequence_settings");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getSequenceSettings());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // author
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "author");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getAuthor());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // reset processing time
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "reset_processing_time");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getResetProcessingTime());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // count system
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "count_system");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getCountSystem());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // multiple choice scoring
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "mc_scoring");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getMCScoring());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // multiple choice scoring
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "score_cutting");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getScoreCutting());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // multiple choice scoring
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "password");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getPassword());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // allowed users
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "allowedUsers");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getAllowedUsers());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // allowed users time gap
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "allowedUsersTimeGap");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getAllowedUsersTimeGap());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // pass scoring
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "pass_scoring");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getPassScoring());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // score reporting date
                if ($this->getReportingDate())
                {
                        $a_xml_writer->xmlStartTag("qtimetadatafield");
                        $a_xml_writer->xmlElement("fieldlabel", NULL, "reporting_date");
                        preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->reporting_date, $matches);
                        $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("P%dY%dM%dDT%dH%dM%dS", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                        $a_xml_writer->xmlEndTag("qtimetadatafield");
                }
                // number of tries
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "nr_of_tries");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getNrOfTries()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // kiosk
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "kiosk");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getKiosk()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // use previous answers
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "use_previous_answers");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getUsePreviousAnswers());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // hide title points
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "title_output");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getTitleOutput()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // random question count
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "random_question_count");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getRandomQuestionCount()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // results presentation
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "results_presentation");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getResultsPresentation()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // solution details
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "show_summary");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getListOfQuestionsSettings()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // solution details
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "score_reporting");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getScoreReporting()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // solution details
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "instant_verification");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getInstantFeedbackSolution()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // answer specific feedback
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "answer_feedback");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getAnswerFeedback()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // answer specific feedback of reached points
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "answer_feedback_points");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getAnswerFeedbackPoints()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // show cancel
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "show_cancel");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getShowCancel()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // show marker
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "show_marker");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getShowMarker()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // fixed participants
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "fixed_participants");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getFixedParticipants()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // show final statement
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "showfinalstatement");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", (($this->getShowFinalStatement()) ? "1" : "0")));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // show introduction only
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "showinfo");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", (($this->getShowInfo()) ? "1" : "0")));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // force JavaScript
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "forcejs");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", (($this->getForceJS()) ? "1" : "0")));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // custom style
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "customstyle");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getCustomStyle());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // shuffle questions
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "shuffle_questions");
                $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("%d", $this->getShuffleQuestions()));
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // processing time
                $a_xml_writer->xmlStartTag("qtimetadatafield");
                $a_xml_writer->xmlElement("fieldlabel", NULL, "processing_time");
                $a_xml_writer->xmlElement("fieldentry", NULL, $this->getProcessingTime());
                $a_xml_writer->xmlEndTag("qtimetadatafield");

                // starting time
                if ($this->getStartingTime())
                {
                        $a_xml_writer->xmlStartTag("qtimetadatafield");
                        $a_xml_writer->xmlElement("fieldlabel", NULL, "starting_time");
                        preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->starting_time, $matches);
                        $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("P%dY%dM%dDT%dH%dM%dS", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                        $a_xml_writer->xmlEndTag("qtimetadatafield");
                }
                // ending time
                if ($this->getEndingTime())
                {
                        $a_xml_writer->xmlStartTag("qtimetadatafield");
                        $a_xml_writer->xmlElement("fieldlabel", NULL, "ending_time");
                        preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->ending_time, $matches);
                        $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("P%dY%dM%dDT%dH%dM%dS", $matches[1], $matches[2], $matches[3], $matches[4], $matches[5], $matches[6]));
                        $a_xml_writer->xmlEndTag("qtimetadatafield");
                }
                foreach ($this->mark_schema->mark_steps as $index => $mark)
                {
                        // mark steps
                        $a_xml_writer->xmlStartTag("qtimetadatafield");
                        $a_xml_writer->xmlElement("fieldlabel", NULL, "mark_step_$index");
                        $a_xml_writer->xmlElement("fieldentry", NULL, sprintf("<short>%s</short><official>%s</official><percentage>%.2f</percentage><passed>%d</passed>", $mark->getShortName(), $mark->getOfficialName(), $mark->getMinimumLevel(), $mark->getPassed()));
                        $a_xml_writer->xmlEndTag("qtimetadatafield");
                }
                $a_xml_writer->xmlEndTag("qtimetadata");

                // add qti objectives
                $a_xml_writer->xmlStartTag("objectives");
                $this->addQTIMaterial($a_xml_writer, $this->getIntroduction());
                $a_xml_writer->xmlEndTag("objectives");

                // add qti assessmentcontrol
                if ($this->getInstantFeedbackSolution() == 1)
                {
                        $attrs = array(
                                "solutionswitch" => "Yes"
                        );
                }
                else
                {
                        $attrs = NULL;
                }
                $a_xml_writer->xmlElement("assessmentcontrol", $attrs, NULL);

                if (strlen($this->getFinalStatement()))
                {
                        // add qti presentation_material
                        $a_xml_writer->xmlStartTag("presentation_material");
                        $a_xml_writer->xmlStartTag("flow_mat");
                        $this->addQTIMaterial($a_xml_writer, $this->getFinalStatement());
                        $a_xml_writer->xmlEndTag("flow_mat");
                        $a_xml_writer->xmlEndTag("presentation_material");
                }
                
                $attrs = array(
                        "ident" => "1"
                );
                $a_xml_writer->xmlElement("section", $attrs, NULL);
                $a_xml_writer->xmlEndTag("assessment");
                $a_xml_writer->xmlEndTag("questestinterop");

                $xml = $a_xml_writer->xmlDumpMem(FALSE);

                foreach ($this->questions as $question_id)
                {
                        $question =& ilObjTest::_instanciateQuestion($question_id);
                        $qti_question = $question->toXML(false);
                        $qti_question = preg_replace("/<questestinterop>/", "", $qti_question);
                        $qti_question = preg_replace("/<\/questestinterop>/", "", $qti_question);
                        if (strpos($xml, "</section>") !== false)
                        {
                                $xml = str_replace("</section>", "$qti_question</section>", $xml);
                        }
                        else
                        {
                                $xml = str_replace("<section ident=\"1\"/>", "<section ident=\"1\">\n$qti_question</section>", $xml);
                        }
                }
                return $xml;
        }

        function exportPagesXML(&$a_xml_writer, $a_inst, $a_target_dir, &$expLog)
        {
                global $ilBench;

                $this->mob_ids = array();
                $this->file_ids = array();

                $attrs = array();
                $attrs["Type"] = "Test";
                $a_xml_writer->xmlStartTag("ContentObject", $attrs);

                // MetaData
                $this->exportXMLMetaData($a_xml_writer);

                // PageObjects
                $expLog->write(date("[y-m-d H:i:s] ")."Start Export Page Objects");
                $ilBench->start("ContentObjectExport", "exportPageObjects");
                $this->exportXMLPageObjects($a_xml_writer, $a_inst, $expLog);
                $ilBench->stop("ContentObjectExport", "exportPageObjects");
                $expLog->write(date("[y-m-d H:i:s] ")."Finished Export Page Objects");

                // MediaObjects
                $expLog->write(date("[y-m-d H:i:s] ")."Start Export Media Objects");
                $ilBench->start("ContentObjectExport", "exportMediaObjects");
                $this->exportXMLMediaObjects($a_xml_writer, $a_inst, $a_target_dir, $expLog);
                $ilBench->stop("ContentObjectExport", "exportMediaObjects");
                $expLog->write(date("[y-m-d H:i:s] ")."Finished Export Media Objects");

                // FileItems
                $expLog->write(date("[y-m-d H:i:s] ")."Start Export File Items");
                $ilBench->start("ContentObjectExport", "exportFileItems");
                $this->exportFileItems($a_target_dir, $expLog);
                $ilBench->stop("ContentObjectExport", "exportFileItems");
                $expLog->write(date("[y-m-d H:i:s] ")."Finished Export File Items");

                $a_xml_writer->xmlEndTag("ContentObject");
        }

        function exportXMLMetaData(&$a_xml_writer)
        {
                include_once "./Services/MetaData/classes/class.ilMD2XML.php";
                $md2xml = new ilMD2XML($this->getId(), 0, $this->getType());
                $md2xml->setExportMode(true);
                $md2xml->startExport();
                $a_xml_writer->appendXML($md2xml->getXML());
        }

        function modifyExportIdentifier($a_tag, $a_param, $a_value)
        {
                if ($a_tag == "Identifier" && $a_param == "Entry")
                {
                        include_once "./Services/Utilities/classes/class.ilUtil.php";
                        $a_value = ilUtil::insertInstIntoID($a_value);
                }

                return $a_value;
        }


        function exportXMLPageObjects(&$a_xml_writer, $a_inst, &$expLog)
        {
                global $ilBench;

                include_once "./Modules/LearningModule/classes/class.ilLMPageObject.php";

                foreach ($this->questions as $question_id)
                {
                        $ilBench->start("ContentObjectExport", "exportPageObject");
                        $expLog->write(date("[y-m-d H:i:s] ")."Page Object ".$question_id);

                        $attrs = array();
                        $a_xml_writer->xmlStartTag("PageObject", $attrs);


                        // export xml to writer object
                        $ilBench->start("ContentObjectExport", "exportPageObject_XML");
                        $page_object = new ilPageObject("qpl", $question_id);
                        $page_object->buildDom();
                        $page_object->insertInstIntoIDs($a_inst);
                        $mob_ids = $page_object->collectMediaObjects(false);
                        $file_ids = $page_object->collectFileItems();
                        $xml = $page_object->getXMLFromDom(false, false, false, "", true);
                        $xml = str_replace("&","&amp;", $xml);
                        $a_xml_writer->appendXML($xml);
                        $page_object->freeDom();
                        unset ($page_object);

                        $ilBench->stop("ContentObjectExport", "exportPageObject_XML");

                        // collect media objects
                        $ilBench->start("ContentObjectExport", "exportPageObject_CollectMedia");
                        //$mob_ids = $page_obj->getMediaObjectIDs();
                        foreach($mob_ids as $mob_id)
                        {
                                $this->mob_ids[$mob_id] = $mob_id;
                        }
                        $ilBench->stop("ContentObjectExport", "exportPageObject_CollectMedia");

                        // collect all file items
                        $ilBench->start("ContentObjectExport", "exportPageObject_CollectFileItems");
                        //$file_ids = $page_obj->getFileItemIds();
                        foreach($file_ids as $file_id)
                        {
                                $this->file_ids[$file_id] = $file_id;
                        }
                        $ilBench->stop("ContentObjectExport", "exportPageObject_CollectFileItems");

                        $a_xml_writer->xmlEndTag("PageObject");
                        //unset($page_obj);

                        $ilBench->stop("ContentObjectExport", "exportPageObject");


                }
        }

        function exportXMLMediaObjects(&$a_xml_writer, $a_inst, $a_target_dir, &$expLog)
        {
                include_once "./Services/MediaObjects/classes/class.ilObjMediaObject.php";

                foreach ($this->mob_ids as $mob_id)
                {
                        $expLog->write(date("[y-m-d H:i:s] ")."Media Object ".$mob_id);
                        if (ilObjMediaObject::_exists($mob_id))
                        {
                                $media_obj = new ilObjMediaObject($mob_id);
                                $media_obj->exportXML($a_xml_writer, $a_inst);
                                $media_obj->exportFiles($a_target_dir);
                                unset($media_obj);
                        }
                }
        }

        function exportFileItems($a_target_dir, &$expLog)
        {
                include_once "./Modules/File/classes/class.ilObjFile.php";

                foreach ($this->file_ids as $file_id)
                {
                        $expLog->write(date("[y-m-d H:i:s] ")."File Item ".$file_id);
                        $file_obj = new ilObjFile($file_id, false);
                        $file_obj->export($a_target_dir);
                        unset($file_obj);
                }
        }

        function getImportMapping()
        {
                if (!is_array($this->import_mapping))
                {
                        return array();
                }
                else
                {
                        return $this->import_mapping;
                }
        }

        function getECTSGrade($passed_array, $reached_points, $max_points)
        {
                return ilObjTest::_getECTSGrade($passed_array, $reached_points, $max_points, $this->ects_grades["A"], $this->ects_grades["B"], $this->ects_grades["C"], $this->ects_grades["D"], $this->ects_grades["E"], $this->ects_fx);
        }

        function _getECTSGrade($points_passed, $reached_points, $max_points, $a, $b, $c, $d, $e, $fx)
        {
                include_once "./classes/class.ilStatistics.php";
                // calculate the median
                $passed_statistics = new ilStatistics();
                $passed_statistics->setData($points_passed);
                $ects_percentiles = array
                (
                        "A" => $passed_statistics->quantile($a),
                        "B" => $passed_statistics->quantile($b),
                        "C" => $passed_statistics->quantile($c),
                        "D" => $passed_statistics->quantile($d),
                        "E" => $passed_statistics->quantile($e)
                );
                if (count($points_passed) && ($reached_points >= $ects_percentiles["A"]))
                {
                        return "A";
                }
                else if (count($points_passed) && ($reached_points >= $ects_percentiles["B"]))
                {
                        return "B";
                }
                else if (count($points_passed) && ($reached_points >= $ects_percentiles["C"]))
                {
                        return "C";
                }
                else if (count($points_passed) && ($reached_points >= $ects_percentiles["D"]))
                {
                        return "D";
                }
                else if (count($points_passed) && ($reached_points >= $ects_percentiles["E"]))
                {
                        return "E";
                }
                else if (strcmp($fx, "") != 0)
                {
                        if ($max_points > 0)
                        {
                                $percentage = ($reached_points / $max_points) * 100.0;
                                if ($percentage < 0) $percentage = 0.0;
                        }
                        else
                        {
                                $percentage = 0.0;
                        }
                        if ($percentage >= $fx)
                        {
                                return "FX";
                        }
                        else
                        {
                                return "F";
                        }
                }
                else
                {
                        return "F";
                }
        }

        function checkMarks()
        {
                return $this->mark_schema->checkMarks();
        }
        
        function getMarkSchema()
        {
                return $this->mark_schema;
        }

  function setAuthor($author = "")
        {
    $this->author = $author;
  }

        function saveAuthorToMetadata($a_author = "")
        {
                $md =& new ilMD($this->getId(), 0, $this->getType());
                $md_life =& $md->getLifecycle();
                if (!$md_life)
                {
                        if (strlen($a_author) == 0)
                        {
                                global $ilUser;
                                $a_author = $ilUser->getFullname();
                        }

                        $md_life =& $md->addLifecycle();
                        $md_life->save();
                        $con =& $md_life->addContribute();
                        $con->setRole("Author");
                        $con->save();
                        $ent =& $con->addEntity();
                        $ent->setEntity($a_author);
                        $ent->save();
                }
        }

        function createMetaData()
        {
                parent::createMetaData();
                $this->saveAuthorToMetadata();
        }

  function getAuthor()
        {
                $author = array();
                include_once "./Services/MetaData/classes/class.ilMD.php";
                $md =& new ilMD($this->getId(), 0, $this->getType());
                $md_life =& $md->getLifecycle();
                if ($md_life)
                {
                        $ids =& $md_life->getContributeIds();
                        foreach ($ids as $id)
                        {
                                $md_cont =& $md_life->getContribute($id);
                                if (strcmp($md_cont->getRole(), "Author") == 0)
                                {
                                        $entids =& $md_cont->getEntityIds();
                                        foreach ($entids as $entid)
                                        {
                                                $md_ent =& $md_cont->getEntity($entid);
                                                array_push($author, $md_ent->getEntity());
                                        }
                                }
                        }
                }
                return join($author, ",");
  }

  function _lookupAuthor($obj_id)
        {
                $author = array();
                include_once "./Services/MetaData/classes/class.ilMD.php";
                $md =& new ilMD($obj_id, 0, "tst");
                $md_life =& $md->getLifecycle();
                if ($md_life)
                {
                        $ids =& $md_life->getContributeIds();
                        foreach ($ids as $id)
                        {
                                $md_cont =& $md_life->getContribute($id);
                                if (strcmp($md_cont->getRole(), "Author") == 0)
                                {
                                        $entids =& $md_cont->getEntityIds();
                                        foreach ($entids as $entid)
                                        {
                                                $md_ent =& $md_cont->getEntity($entid);
                                                array_push($author, $md_ent->getEntity());
                                        }
                                }
                        }
                }
                return join($author, ",");
  }

        function &_getAvailableTests($use_object_id = FALSE)
        {
                global $ilUser;
                global $ilDB;

                $result_array = array();
                $tests = ilUtil::_getObjectsByOperations("tst","write", $ilUser->getId(), -1);
                if (count($tests))
                {
                        $titles = ilObject::_prepareCloneSelection($tests, "tst");
                        $query = sprintf("SELECT object_data.*, object_reference.ref_id FROM object_data, object_reference WHERE object_data.obj_id = object_reference.obj_id AND object_reference.ref_id IN ('%s') ORDER BY object_data.title",
                                implode("','", $tests)
                        );
                        $result = $ilDB->query($query);
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                if ($use_object_id)
                                {
                                        $result_array[$row["obj_id"]] = $titles[$row["ref_id"]];
                                }
                                else
                                {
                                        $result_array[$row["ref_id"]] = $titles[$row["ref_id"]];
                                }
                        }
                }
                return $result_array;
        }

        function cloneRandomQuestions($new_id)
        {
                global $ilDB;

                if ($new_id > 0)
                {
                        $query = sprintf("SELECT * FROM tst_test_random WHERE test_fi = %s ORDER BY test_random_id",
                                $ilDB->quote($this->getTestId() . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows())
                        {
                                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                                {
                                        $query = sprintf("INSERT INTO tst_test_random (test_random_id, test_fi, questionpool_fi, num_of_q, TIMESTAMP) VALUES (NULL, %s, %s, %s, NULL)",
                                                $ilDB->quote($new_id . ""),
                                                $ilDB->quote($row["questionpool_fi"] . ""),
                                                $ilDB->quote($row["num_of_q"] . "")
                                        );
                                        $insertresult = $ilDB->query($query);
                                }
                        }
                }
        }
        
        
        public function cloneObject($a_target_id,$a_copy_id = 0)
        {
                global $ilDB,$ilLog;
                
                $this->loadFromDb();

                // Copy settings
                $newObj = parent::cloneObject($a_target_id,$a_copy_id);
                $this->cloneMetaData($newObj);
                $newObj->setAnonymity($this->getAnonymity());
                $newObj->setAnswerFeedback($this->getAnswerFeedback());
                $newObj->setAnswerFeedbackPoints($this->getAnswerFeedbackPoints());
                $newObj->setAuthor($this->getAuthor());
                $newObj->setCountSystem($this->getCountSystem());
                $newObj->setECTSFX($this->getECTSFX());
                $newObj->setECTSGrades($this->getECTSGrades());
                $newObj->setECTSOutput($this->getECTSOutput());
                $newObj->setEnableProcessingTime($this->getEnableProcessingTime());
                $newObj->setEndingTime($this->getEndingTime());
                $newObj->setFixedParticipants($this->getFixedParticipants());
                $newObj->setInstantFeedbackSolution($this->getInstantFeedbackSolution());
                $newObj->setIntroduction($this->getIntroduction());
                $newObj->setFinalStatement($this->getFinalStatement());
                $newObj->setShowInfo($this->getShowInfo());
                $newObj->setForceJS($this->getForceJS());
                $newObj->setCustomStyle($this->getCustomStyle());
                $newObj->setShowFinalStatement($this->getShowFinalStatement());
                $newObj->setListOfQuestionsSettings($this->getListOfQuestionsSettings());
                $newObj->setMCScoring($this->getMCScoring());
                $newObj->setNrOfTries($this->getNrOfTries());
                $newObj->setPassScoring($this->getPassScoring());
                $newObj->setPassword($this->getPassword());
                $newObj->setProcessingTime($this->getProcessingTime());
                $newObj->setRandomQuestionCount($this->getRandomQuestionCount());
                $newObj->setRandomTest($this->isRandomTest());
                $newObj->setReportingDate($this->getReportingDate());
                $newObj->setResetProcessingTime($this->getResetProcessingTime());
                $newObj->setResultsPresentation($this->getResultsPresentation());
                $newObj->setScoreCutting($this->getScoreCutting());
                $newObj->setScoreReporting($this->getScoreReporting());
                $newObj->setSequenceSettings($this->getSequenceSettings());
                $newObj->setShowCancel($this->getShowCancel());
                $newObj->setShowMarker($this->getShowMarker());
                $newObj->setShuffleQuestions($this->getShuffleQuestions());
                $newObj->setStartingTime($this->getStartingTime());
                $newObj->setTitleOutput($this->getTitleOutput());
                $newObj->setUsePreviousAnswers($this->getUsePreviousAnswers());
                $newObj->setCertificateVisibility($this->getCertificateVisibility());
                $newObj->mark_schema = clone $this->mark_schema;

                $newObj->saveToDb();
                // clone certificate
                include_once "./Modules/Test/classes/class.ilTestCertificate.php";
                $cert = new ilTestCertificate($this);
                $cert->cloneCertificate($newObj->getId());
                
                if ($this->isRandomTest())
                {
                        $newObj->saveRandomQuestionCount($newObj->getRandomQuestionCount());
                        $this->cloneRandomQuestions($newObj->getTestId());
                }
                else
                {
                        include_once("./Services/CopyWizard/classes/class.ilCopyWizardOptions.php");
                        $cwo = ilCopyWizardOptions::_getInstance($a_copy_id);
                        
                        // clone the questions
                        include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                        foreach ($this->questions as $key => $question_id)
                        {
                                $question = ilObjTest::_instanciateQuestion($question_id);
                                $newObj->questions[$key] = $question->duplicate();
                                $original_id = assQuestion::_getOriginalId($question_id);
                                $question = ilObjTest::_instanciateQuestion($newObj->questions[$key]);
                                $question->saveToDb($original_id);
                                
                                // Save the mapping of old question id <-> new question id
                                // This will be used in class.ilObjCourse::cloneDependencies to copy learning objectives
                                $cwo->appendMapping($this->getRefId().'_'.$question_id,$newObj->getRefId().'_'.$newObj->questions[$key]);
                                $ilLog->write(__METHOD__.': Added mapping '.$this->getRefId().'_'.$question_id.' <-> ' .
                                                $newObj->getRefId().'_'.$newObj->questions[$key]);
                        }
                }
                $newObj->saveToDb();
                return $newObj;
        }
        
        function _getRefIdFromObjId($obj_id)
        {
                global $ilDB;

                $query = sprintf("SELECT ref_id FROM object_reference WHERE obj_id=%s",
                        $ilDB->quote($obj_id)

                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["ref_id"];
                }
                return 0;
        }

        function getQuestionCount()
        {
                $num = 0;

                if ($this->isRandomTest())
                {
                        if ($this->getRandomQuestionCount())
                        {
                                $num = $this->getRandomQuestionCount();
                                $qpls =& $this->getRandomQuestionpools();
                                $maxcount = 0;
                                foreach ($qpls as $data)
                                {
                                        $maxcount += $data["contains"];
                                }
                                if ($num > $maxcount) $num = $maxcount;
                        }
                                else
                        {
                                $qpls =& $this->getRandomQuestionpools();
                                foreach ($qpls as $data)
                                {
                                        $add = ($data["count"] <= $data["contains"]) ? $data["count"] : $data["contains"];
                                        $num += $add;
                                }
                        }
                }
                        else
                {
                        $num = count($this->questions);
                }
                return $num;
        }

        function _getQuestionCount($test_id)
        {
                global $ilDB;

                $num = 0;

                $query = sprintf("SELECT * FROM tst_tests WHERE test_id = %s",
                        $ilDB->quote($test_id . "")
                );
                $result = $ilDB->query($query);
                if (!$result->numRows())
                {
                        return 0;
                }
                $test = $result->fetchRow(MDB2_FETCHMODE_ASSOC);

                if ($test["random_test"] == 1)
                {
                        $qpls = array();
                        $counter = 0;
                        $query = sprintf("SELECT * FROM tst_test_random WHERE test_fi = %s ORDER BY test_random_id",
                                $ilDB->quote($test_id . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows())
                        {
                                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                                {
                                        $countquery = sprintf("SELECT question_id FROM qpl_questions WHERE obj_fi =  %s AND original_id IS NULL",
                                                $ilDB->quote($row["questionpool_fi"] . "")
                                        );
                                        $countresult = $ilDB->query($countquery);
                                        $contains = $countresult->numRows();
                                        $qpls[$counter] = array(
                                                "index" => $counter,
                                                "count" => $row["num_of_q"],
                                                "qpl"   => $row["questionpool_fi"],
                                                "contains" => $contains
                                        );
                                        $counter++;
                                }
                        }
                        if ($test["random_question_count"] > 0)
                        {
                                $num = $test["random_question_count"];
                                $maxcount = 0;
                                foreach ($qpls as $data)
                                {
                                        $maxcount += $data["contains"];
                                }
                                if ($num > $maxcount) $num = $maxcount;
                        }
                                else
                        {
                                $num = 0;
                                foreach ($qpls as $data)
                                {
                                        $add = ($data["count"] <= $data["contains"]) ? $data["count"] : $data["contains"];
                                        $num += $add;
                                }
                        }
                }
                else
                {
                        $query = sprintf("SELECT test_question_id FROM tst_test_question WHERE test_fi = %s",
                                $ilDB->quote($test_id . "")
                        );
                        $result = $ilDB->query($query);
                        $num = $result->numRows();
                }
                return $num;
        }

        function removeNonRandomTestData()
        {
                global $ilDB;

                // delete eventually set questions of a previous non-random test
                $this->removeAllTestEditings();
                $query = sprintf("DELETE FROM tst_test_question WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                $this->questions = array();
                $this->saveCompleteStatus();
        }

        function removeRandomTestData()
        {
                global $ilDB;
                // delete eventually set random question pools of a previous random test
                $this->removeAllTestEditings();
                $query = sprintf("DELETE FROM tst_test_random WHERE test_fi = %s",
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
                $this->questions = array();
                $this->saveCompleteStatus();
        }

        function logAction($logtext = "", $question_id = "")
        {
                global $ilUser;

                $original_id = "";
                if (strcmp($question_id, "") != 0)
                {
                        include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                        $original_id = assQuestion::_getOriginalId($question_id);
                }
                include_once "./Modules/Test/classes/class.ilObjAssessmentFolder.php";
                ilObjAssessmentFolder::_addLog($ilUser->getId(), $this->getId(), $logtext, $question_id, $original_id, TRUE, $this->getRefId());
        }

        function _getObjectIDFromTestID($test_id)
        {
                global $ilDB;
                $object_id = FALSE;
                $query = sprintf("SELECT obj_fi FROM tst_tests WHERE test_id = %s",
                        $ilDB->quote($test_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        $object_id = $row["obj_fi"];
                }
                return $object_id;
        }

        function _getObjectIDFromActiveID($active_id)
        {
                global $ilDB;
                $object_id = FALSE;
                $query = sprintf("SELECT tst_tests.obj_fi FROM tst_tests, tst_active WHERE tst_tests.test_id = tst_active.test_fi AND tst_active.active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        $object_id = $row["obj_fi"];
                }
                return $object_id;
        }

        function _getTestIDFromObjectID($object_id)
        {
                global $ilDB;
                $test_id = FALSE;
                $query = sprintf("SELECT test_id FROM tst_tests WHERE obj_fi = %s",
                        $ilDB->quote($object_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        $test_id = $row["test_id"];
                }
                return $test_id;
        }

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

                $res = "";
                if (($active_id) && ($question_id))
                {
                        if (is_null($pass))
                        {
                                include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                                $pass = assQuestion::_getSolutionMaxPass($question_id, $active_id);
                        }
                        $query = sprintf("SELECT value1 FROM tst_solutions WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($question_id . ""),
                                $ilDB->quote($pass . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows() == 1)
                        {
                                $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                                $res = $row["value1"];
                        }
                }
                return $res;
        }

        function getQuestiontext($question_id)
        {
                global $ilDB;

                $res = "";
                if ($question_id)
                {
                        $query = sprintf("SELECT question_text FROM qpl_questions WHERE question_id = %s",
                                $ilDB->quote($question_id . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows() == 1)
                        {
                                $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                                $res = $row["question_text"];
                        }
                }
                return $res;
        }

        function &getInvitedUsers($user_id="", $order="login, lastname, firstname")
        {
                global $ilDB;

                $result_array = array();

                if ($this->getAnonymity())
                {
                        if (is_numeric($user_id))
                        {
                                $query = sprintf("SELECT tst_active.active_id, tst_active.tries, usr_id, '' AS login, %s AS lastname, '' AS firstname, tst_invited_user.clientip, " .
                                        "tst_active.submitted as test_finished, matriculation, IF(tst_active.active_id IS NULL,0,1) as test_started " .
                                        "FROM usr_data, tst_invited_user " .
                                        "LEFT JOIN tst_active ON tst_active.user_fi = tst_invited_user.user_fi AND tst_active.test_fi = tst_invited_user.test_fi " .
                                        "WHERE tst_invited_user.test_fi = %s and tst_invited_user.user_fi=usr_data.usr_id AND usr_data.usr_id=%s " .
                                        "ORDER BY %s",
                                        $ilDB->quote($this->lng->txt("unknown")),
                                        $ilDB->quote($this->test_id),
                                        $user_id,
                                        $order
                                );
                        }
                        else
                        {
                                $query = sprintf("SELECT tst_active.active_id, usr_id, '' AS login, %s AS lastname, '' AS firstname, tst_invited_user.clientip, " .
                                        "tst_active.submitted as test_finished, matriculation, IF(tst_active.active_id IS NULL,0,1) as test_started " .
                                        "FROM usr_data, tst_invited_user " .
                                        "LEFT JOIN tst_active ON tst_active.user_fi = tst_invited_user.user_fi AND tst_active.test_fi = tst_invited_user.test_fi " .
                                        "WHERE tst_invited_user.test_fi = %s and tst_invited_user.user_fi=usr_data.usr_id " .
                                        "ORDER BY %s",
                                        $ilDB->quote($this->lng->txt("unknown")),
                                        $ilDB->quote($this->test_id),
                                        $order
                                );
                        }
                }
                else
                {
                        if (is_numeric($user_id))
                        {
                                $query = sprintf("SELECT tst_active.active_id, tst_active.tries, usr_id, login, lastname, firstname, tst_invited_user.clientip, " .
                                        "tst_active.submitted as test_finished, matriculation, IF(tst_active.active_id IS NULL,0,1) as test_started " .
                                        "FROM usr_data, tst_invited_user " .
                                        "LEFT JOIN tst_active ON tst_active.user_fi = tst_invited_user.user_fi AND tst_active.test_fi = tst_invited_user.test_fi " .
                                        "WHERE tst_invited_user.test_fi = %s and tst_invited_user.user_fi=usr_data.usr_id AND usr_data.usr_id=%s " .
                                        "ORDER BY %s",
                                        $ilDB->quote($this->test_id),
                                        $user_id,
                                        $order
                                );
                        }
                        else
                        {
                                $query = sprintf("SELECT tst_active.active_id, tst_active.tries, usr_id, login, lastname, firstname, tst_invited_user.clientip, " .
                                        "tst_active.submitted as test_finished, matriculation, IF(tst_active.active_id IS NULL,0,1) as test_started " .
                                        "FROM usr_data, tst_invited_user " .
                                        "LEFT JOIN tst_active ON tst_active.user_fi = tst_invited_user.user_fi AND tst_active.test_fi = tst_invited_user.test_fi " .
                                        "WHERE tst_invited_user.test_fi = %s and tst_invited_user.user_fi=usr_data.usr_id " .
                                        "ORDER BY %s",
                                        $ilDB->quote($this->test_id),
                                        $order
                                );
                        }
                }
                return $this->getArrayData($query, "usr_id");
        }

        function &getTestParticipants()
        {
                global $ilDB;

                if ($this->getAnonymity())
                {
                        $q = sprintf("SELECT tst_active.active_id, tst_active.tries, tst_active.user_fi AS usr_id, '' AS login, %s AS lastname, '' AS firstname, tst_active.submitted as test_finished, usr_data.matriculation, usr_data.active, IF(tst_active.active_id IS NULL,0,1) as test_started ".
                                "FROM tst_active LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id WHERE tst_active.test_fi = %s ORDER BY usr_data.lastname " . strtoupper($name_sort_order),
                                $ilDB->quote($this->lng->txt("unknown")),
                                $ilDB->quote($this->getTestId())
                        );
                }
                else
                {
                        $q = sprintf("SELECT tst_active.active_id, tst_active.tries, tst_active.user_fi AS usr_id, usr_data.login, usr_data.lastname, usr_data.firstname, tst_active.submitted as test_finished, usr_data.matriculation, usr_data.active, IF(tst_active.active_id IS NULL,0,1) as test_started ".
                                "FROM tst_active LEFT JOIN usr_data ON tst_active.user_fi = usr_data.usr_id WHERE tst_active.test_fi = %s ORDER BY usr_data.lastname " . strtoupper($name_sort_order),
                                $ilDB->quote($this->getTestId())
                        );
                }
                $data = $this->getArrayData($q, "active_id");
                foreach ($data as $index => $participant)
                {
                        if (strlen(trim($participant->firstname.$participant->lastname)) == 0)
                        {
                                $data[$index]->lastname = $this->lng->txt("deleted_user");
                        }
                }
                return $data;
        }

        function &getUserData($ids)
        {
                if (!is_array($ids) || count($ids) ==0)
                        return array();

                $result_array = array();

                if ($this->getAnonymity())
                {
                        $query = sprintf("SELECT usr_id, '' AS login, %s AS lastname, '' AS firstname, client_ip as clientip FROM usr_data WHERE usr_id IN ('%s') ORDER BY login",
                                $ilDB->quote($this->lng->txt("unknown")),
                                join ($ids,"','")
                        );
                }
                else
                {
                        $query = sprintf("SELECT usr_id, login, lastname, firstname, client_ip as clientip FROM usr_data WHERE usr_id IN ('%s') ORDER BY login",
                                join ($ids,"','")
                        );
                }

                return $this->getArrayData ($query, "usr_id");
        }

        function &getArrayData($query, $id_field)
        {
                return ilObjTest::_getArrayData ($query, $id_field);
        }

        function &_getArrayData($query, $id_field)
        {
                global $ilDB;
                $result = $ilDB->query($query);
                while ($row = $result->fetchRow(MDB2_FETCHMODE_OBJECT))
                {
                        $result_array[$row->$id_field]= $row;
                }
                return ($result_array)?$result_array:array();
        }

        function &getGroupData($ids)
        {
                if (!is_array($ids) || count($ids) ==0)
                        return array();

                $result_array = array();

                $query = sprintf("SELECT ref_id, title, description FROM `grp_settings` g, object_data o, object_reference r WHERE o.obj_id=g.obj_id AND o.obj_id = r.obj_id AND ref_id IN ('%s')",
                        join ($ids,"','")
                );

                return $this->getArrayData ($query, "ref_id");
        }

        function &getRoleData($ids)
        {
                if (!is_array($ids) || count($ids) ==0)
                        return array();

                $result_array = array();

                $query = sprintf("SELECT obj_id, description, title FROM role_data, object_data o WHERE o.obj_id=role_id AND role_id IN ('%s')",
                        join ($ids,"','")
                );

                return $this->getArrayData ($query, "obj_id");
        }


        function inviteGroup($group_id)
        {
                include_once "./Modules/Group/classes/class.ilObjGroup.php";
                $group = new ilObjGroup($group_id);
                $members = $group->getGroupMemberIds();
                include_once './Services/User/classes/class.ilObjUser.php';
                foreach ($members as $user_id)
                {
                        $this->inviteUser($user_id, ilObjUser::_lookupClientIP($user_id));
                }
        }

        function inviteRole($role_id)
        {
                global $rbacreview;
                $members =  $rbacreview->assignedUsers($role_id,"usr_id");
                include_once './Services/User/classes/class.ilObjUser.php';
                foreach ($members as $user_id)
                {
                        $this->inviteUser($user_id, ilObjUser::_lookupClientIP($user_id));
                }
        }



        function disinviteUser($user_id)
        {
                global $ilDB;

                $query = sprintf("DELETE FROM tst_invited_user WHERE test_fi = %s AND user_fi = %s",
                        $ilDB->quote($this->test_id),
                        $ilDB->quote($user_id)
                );
                $result = $ilDB->query($query);
        }

        function inviteUser($user_id, $client_ip="")
        {
                global $ilDB;

                $query = sprintf("INSERT IGNORE INTO tst_invited_user (test_fi, user_fi, clientip) VALUES (%s, %s, %s)",
                        $ilDB->quote($this->test_id),
                        $ilDB->quote($user_id),
                        $ilDB->quote($client_ip)
                );
                $result = $ilDB->query($query);
        }


        function setClientIP($user_id, $client_ip)
        {
                global $ilDB;

                $query = sprintf("UPDATE tst_invited_user SET clientip=%s WHERE test_fi=%s and user_fi=%s",
                                $ilDB->quote($client_ip),
                                $ilDB->quote($this->test_id),
                                $ilDB->quote($user_id)
                );
                $insertresult = $ilDB->query($query);
        }

        function _getSolvedQuestions($active_id, $question_fi = null)
        {
                global $ilDB;
                if (is_numeric($question_fi))
                        $query = sprintf("SELECT question_fi, solved FROM tst_active_qst_sol_settings " .
                                                 "WHERE active_fi = %s AND question_fi=%s",
                                                        $ilDB->quote($active_id),
                                                        $question_fi
                        );
                else $query = sprintf("SELECT question_fi, solved FROM tst_active_qst_sol_settings " .
                                                 "WHERE active_fi = %s",
                        $ilDB->quote($active_id)
                );
                return ilObjTest::_getArrayData ($query, "question_fi");
        }


        function setQuestionSetSolved($value, $question_id, $user_id)
        {
                global $ilDB;

                $active_id = $this->getActiveIdOfUser($user_id);
                $query = sprintf("REPLACE INTO tst_active_qst_sol_settings SET solved=%s, question_fi=%s, active_fi = %s",
                        $ilDB->quote($value),
                        $ilDB->quote($question_id),
                        $ilDB->quote($active_id)
                );

                $ilDB->query($query);
        }


        function setActiveTestSubmitted($user_id)
        {
                global $ilDB, $ilLog;

                $query = sprintf("UPDATE tst_active SET submitted = 1, submittimestamp = NOW() WHERE test_fi = %s AND user_fi = %s",
                        $ilDB->quote($this->getTestId() . ""),
                        $ilDB->quote($user_id . "")
                );
                $result = $ilDB->query($query);
                $this->testSession = NULL;
        }

        function isActiveTestSubmitted($user_id = null)
        {
                global $ilUser;
                global $ilDB;

                if (!is_numeric($user_id))
                        $user_id = $ilUser->getId();

                $query = sprintf("SELECT submitted FROM tst_active WHERE test_fi=%s AND user_fi=%s AND submitted=1",
                        $ilDB->quote($this->test_id),
                        $ilDB->quote($user_id)
                );
                $result = $ilDB->query($query);

                return  $result->numRows() == 1;

        }
        function hasNrOfTriesRestriction()
        {
                return $this->getNrOfTries() != 0;
        }


        function isNrOfTriesReached($tries)
        {
                return $tries >= (int) $this->getNrOfTries();
        }


        function getAllTestResults($participants, $prepareForCSV = true)
        {
                $results = array();
                $row = array(
                        "user_id" => $this->lng->txt("user_id"),
                        "matriculation" =>  $this->lng->txt("matriculation"),
                        "lastname" =>  $this->lng->txt("lastname"),
                        "firstname" => $this->lng->txt("firstname"),
                        "login" =>$this->lng->txt("login"),
                        "reached_points" => $this->lng->txt("tst_reached_points"),
                        "max_points" => $this->lng->txt("tst_maximum_points"),
                        "percent_value" => $this->lng->txt("tst_percent_solved"),
                        "mark" => $this->lng->txt("tst_mark"),
                        "ects" => $this->lng->txt("ects_grade")
                );
                $results[] = $row;
                #print_r($participants);
                if (count($participants))
                {
                        if ($this->ects_output)
                        {
                                $passed_array =& $this->getTotalPointsPassedArray();
                        }
                        foreach ($participants as $active_id => $user_rec)
                        {
                                $row = array();
                                $reached_points = 0;
                                $max_points = 0;
                                foreach ($this->questions as $value)
                                {
                                        $question =& ilObjTest::_instanciateQuestion($value);
                                        if (is_object($question))
                                        {
                                                $max_points += $question->getMaximumPoints();
                                                $reached_points += $question->getReachedPoints($active_id);
                                        }
                                }
                                if ($max_points > 0)
                                {
                                        $percentvalue = $reached_points / $max_points;
                                        if ($percentvalue < 0) $percentvalue = 0.0;
                                }
                                else
                                {
                                        $percentvalue = 0;
                                }
                                $mark_obj = $this->mark_schema->getMatchingMark($percentvalue * 100);
                                $passed = "";
                                if ($mark_obj)
                                {
                                        $mark = $mark_obj->getOfficialName();
                                        $ects_mark = $this->getECTSGrade($passed_array, $reached_points, $max_points);
                                }
                                if ($this->getAnonymity())
                                {
                                        $user_rec->firstname = "";
                                        $user_rec->lastname = $this->lng->txt("unknown");
                                }
                                $row = array(
"user_id"=>$user_rec->usr_id,
                                "matriculation" =>  $user_rec->matriculation,
                                        "lastname" =>  $user_rec->lastname,
                                        "firstname" => $user_rec->firstname,
"login"=>$user_rec->login,
                                "reached_points" => $reached_points,
                                        "max_points" => $max_points,
                                        "percent_value" => $percentvalue,
                                        "mark" => $mark,
                                        "ects" => $ects_mark
                                );
                                $results[] = $prepareForCSV ? $this->processCSVRow ($row, true) : $row;
                        }
                }
                return $results;
        }

        function &processCSVRow($row, $quoteAll = FALSE, $separator = ";")
        {
                $resultarray = array();
                foreach ($row as $rowindex => $entry)
                {
                        $surround = FALSE;
                        if ($quoteAll)
                        {
                                $surround = TRUE;
                        }
                        if (strpos($entry, "\"") !== FALSE)
                        {
                                $entry = str_replace("\"", "\"\"", $entry);
                                $surround = TRUE;
                        }
                        if (strpos($entry, $separator) !== FALSE)
                        {
                                $surround = TRUE;
                        }
                        // replace all CR LF with LF (for Excel for Windows compatibility
                        $entry = str_replace(chr(13).chr(10), chr(10), $entry);
                        if ($surround)
                        {
                            $resultarray[$rowindex] = utf8_decode("\"" . $entry . "\"");
                        }
                        else
                        {
                                $resultarray[$rowindex] = utf8_decode($entry);
                        }
                }
                return $resultarray;
        }

        function _getPass($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tries FROM tst_active WHERE active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["tries"];
                }
                else
                {
                        return 0;
                }
        }

                function _getMaxPass($active_id)
                {
                        global $ilDB;
                        $query = sprintf("SELECT MAX(pass) as maxpass FROM tst_test_result WHERE active_fi = %s",
                                $ilDB->quote($active_id . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows())
                        {
                                $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                                $max = $row["maxpass"];
                        }
                        else
                        {
                                $max = NULL;
                        }
                        return $max;
                }

        function _getBestPass($active_id)
        {
                global $ilDB;
                
                $query = sprintf("SELECT * FROM tst_test_pass_result WHERE active_fi = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $bestrow = null;
                        $bestpoints = -1;
                        while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                        {
                                if ($row["points"] > $bestpoints) 
                                {
                                        $bestrow = $row;
                                        $bestpoints = $row["points"];
                                }
                        }
                        if (is_array($bestrow))
                        {
                                return $bestrow["pass"];
                        }
                        else
                        {
                                return 0;
                        }
                }
                else
                {
                        return 0;
                }
        }

        function _getResultPass($active_id)
        {
                $counted_pass = NULL;
                if (ilObjTest::_getPassScoring($active_id) == SCORE_BEST_PASS)
                {
                        $counted_pass = ilObjTest::_getBestPass($active_id);
                }
                else
                {
                        $counted_pass = ilObjTest::_getMaxPass($active_id);
                }
                return $counted_pass;
        }

        function getAnsweredQuestionCount($active_id, $pass = NULL)
        {
                if ($this->isRandomTest())
                {
                        $this->loadQuestions($active_id, $pass);
                }
                include_once "./Modules/TestQuestionPool/classes/class.assQuestion.php";
                $workedthrough = 0;
                foreach ($this->questions as $value)
                {
                        if (assQuestion::_isWorkedThrough($active_id, $value, $pass))
                        {
                                $workedthrough += 1;
                        }
                }
                return $workedthrough;
        }

        function getPassFinishDate($active_id, $pass)
        {
                global $ilDB;
                if (is_null($pass)) $pass = 0;
                $query = sprintf("SELECT tst_test_result.TIMESTAMP + 0 AS timestamp14 FROM tst_test_result WHERE active_fi = %s AND pass = %s ORDER BY tst_test_result.TIMESTAMP DESC",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["timestamp14"];
                }
                else
                {
                        return 0;
                }
        }

        function isExecutable($user_id, $allowPassIncrease = FALSE)
        {
                $result = array(
                        "executable" => true,
                        "errormessage" => ""
                );
                if (!$this->startingTimeReached())
                {
                        $result["executable"] = false;
                        $result["errormessage"] = sprintf($this->lng->txt("detail_starting_time_not_reached"), ilFormat::ftimestamp2datetimeDB($this->getStartingTime()));
                        return $result;
                }
                if ($this->endingTimeReached())
                {
                        $result["executable"] = false;
                        $result["errormessage"] = sprintf($this->lng->txt("detail_ending_time_reached"), ilFormat::ftimestamp2datetimeDB($this->getEndingTime()));
                        return $result;
                }

                $active_id = $this->getActiveIdOfUser($user_id);

                if ($this->getEnableProcessingTime())
                {
                        if ($active_id > 0)
                        {
                                $starting_time = $this->getStartingTimeOfUser($active_id);
                                if ($starting_time !== FALSE)
                                {
                                        if ($this->isMaxProcessingTimeReached($starting_time))
                                        {
                                                if ($allowPassIncrease && $this->getResetProcessingTime() && (($this->getNrOfTries() == 0) || ($this->getNrOfTries() > ($this->_getPass($active_id)+1))))
                                                {
                                                        // a test pass was quitted because the maximum processing time was reached, but the time
                                                        // will be resetted for future passes, so if there are more passes allowed, the participant may
                                                        // start the test again.
                                                        // This code block is only called when $allowPassIncrease is TRUE which only happens when
                                                        // the test info page is opened. Otherwise this will lead to unexpected results!
                                                        $this->getTestSession()->increasePass();
                                                        $this->getTestSession()->setLastSequence(0);
                                                        $this->getTestSession()->saveToDb();
                                                }
                                                else
                                                {
                                                        $result["executable"] = false;
                                                        $result["errormessage"] = $this->lng->txt("detail_max_processing_time_reached");
                                                }
                                                return $result;
                                        }
                                }
                        }
                }

                if ($this->hasNrOfTriesRestriction() && ($active_id > 0) && $this->isNrOfTriesReached($this->getTestSession($active_id)->getPass()))
                {
                        $result["executable"] = false;
                        $result["errormessage"] = $this->lng->txt("maximum_nr_of_tries_reached");
                        return $result;
                }
                
                if ($this->getTestSession($active_id)->isSubmitted())
                {
                        $result["executable"] = FALSE;
                        $result["errormessage"] = $this->lng->txt("maximum_nr_of_tries_reached");
                        return $result;
                }

                // TODO: max. processing time

                return $result;
        }

        function canViewResults()
        {
                $result = true;
                if ($this->getReportingDate())
                {
                        if (preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->getReportingDate(), $matches))
                        {
                                $epoch_time = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                                $now = mktime();
                                if ($now < $epoch_time)
                                {
                                        $result = false;
                                }
                        }
                }
                return $result;
        }

        function canShowTestResults($user_id)
        {
                $result = true;
                $active_id = $this->getActiveIdOfUser($user_id);
                if ($active_id > 0)
                {
                        $starting_time = $this->getStartingTimeOfUser($active_id);
                }
                $notimeleft = FALSE;
                if ($starting_time !== FALSE)
                {
                        if ($this->isMaxProcessingTimeReached($starting_time))
                        {
                                $notimeleft = TRUE;
                        }
                }
                if (!$this->isTestFinishedToViewResults($active_id, $this->getTestSession($active_id)->getPass()) && ($this->getScoreReporting() == REPORT_AFTER_TEST))
                {
                        $result = FALSE;
                }
                if (($this->endingTimeReached()) || $notimeleft) $result = TRUE;
                $result = $result & $this->canViewResults();
                return $result;
        }

        function canEditMarks()
        {
                $total = $this->evalTotalPersons();
                if ($total > 0)
                {
                        if ($this->getReportingDate())
                        {
                                if (preg_match("/(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/", $this->getReportingDate(), $matches))
                                {
                                        $epoch_time = mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                                        $now = mktime();
                                        if ($now < $epoch_time)
                                        {
                                                return true;
                                        }
                                }
                        }
                        return false;
                }
                else
                {
                        return true;
                }
        }

        function getStartingTimeOfUser($active_id)
        {
                global $ilDB;

                if ($active_id < 1) return FALSE;
                $pass = ($this->getResetProcessingTime()) ? $this->_getPass($active_id) : 0;
                $query = sprintf("SELECT tst_times.started FROM tst_times WHERE tst_times.active_fi = %s AND tst_times.pass = %s ORDER BY tst_times.started",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        if (preg_match("/(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})/", $row["started"], $matches))
                        {
                                return mktime($matches[4], $matches[5], $matches[6], $matches[2], $matches[3], $matches[1]);
                        }
                        else
                        {
                                return mktime();
                        }
                }
                else
                {
                        return mktime();
                }
        }

        function isMaxProcessingTimeReached($starting_time)
        {
                if ($this->getEnableProcessingTime())
                {
                        $processing_time = $this->getProcessingTimeInSeconds();
                        $now = mktime();
                        if ($now > ($starting_time + $processing_time))
                        {
                                return TRUE;
                        }
                        else
                        {
                                return FALSE;
                        }
                }
                else
                {
                        return FALSE;
                }
        }

        function &getTestQuestions()
        {
                global $ilDB;
                $query = sprintf("SELECT qpl_questions.*, qpl_question_type.type_tag FROM qpl_questions, qpl_question_type, tst_test_question WHERE qpl_questions.question_type_fi = qpl_question_type.question_type_id AND tst_test_question.test_fi = %s AND tst_test_question.question_fi = qpl_questions.question_id ORDER BY sequence",
                        $ilDB->quote($this->getTestId() . "")
                );
                $query_result = $ilDB->query($query);
                $removableQuestions = array();
                while ($row = $query_result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        array_push($removableQuestions, $row);
                }
                return $removableQuestions;
        }

        function getShuffleQuestions()
        {
                return $this->shuffle_questions;
        }

        function setShuffleQuestions($a_shuffle)
        {
                if ($a_shuffle)
                {
                        $this->shuffle_questions = TRUE;
                }
                else
                {
                        $this->shuffle_questions = FALSE;
                }
        }

        function getListOfQuestionsSettings()
        {
                return $this->show_summary;
        }

        function setListOfQuestionsSettings($a_value = 0)
        {
                $this->show_summary = $a_value;
        }

        function getListOfQuestions()
        {
                if (($this->show_summary & 1) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function setListOfQuestions($a_value = TRUE)
        {
                if ($a_value)
                {
                        $this->show_summary = 1;
                }
                else
                {
                        $this->show_summary = 0;
                }
        }

        function getListOfQuestionsStart()
        {
                if (($this->show_summary & 2) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function setListOfQuestionsStart($a_value = TRUE)
        {
                if ($a_value && $this->getListOfQuestions())
                {
                        $this->show_summary = $this->show_summary | 2;
                }
                if (!$a_value && $this->getListOfQuestions())
                {
                        if ($this->getListOfQuestionsStart())
                        {
                                $this->show_summary = $this->show_summary ^ 2;
                        }
                }
        }

        function getListOfQuestionsEnd()
        {
                if (($this->show_summary & 4) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function setListOfQuestionsEnd($a_value = TRUE)
        {
                if ($a_value && $this->getListOfQuestions())
                {
                        $this->show_summary = $this->show_summary | 4;
                }
                if (!$a_value && $this->getListOfQuestions())
                {
                        if ($this->getListOfQuestionsEnd())
                        {
                                $this->show_summary = $this->show_summary ^ 4;
                        }
                }
        }

                function getListOfQuestionsDescription()
                {
                        if (($this->show_summary & 8) > 0)
                        {
                                return TRUE;
                        }
                        else
                        {
                                return FALSE;
                        }
                }

                function setListOfQuestionsDescription($a_value = TRUE)
                {
                        if ($a_value && $this->getListOfQuestions())
                        {
                                $this->show_summary = $this->show_summary | 8;
                        }
                        if (!$a_value && $this->getListOfQuestions())
                        {
                                if ($this->getListOfQuestionsDescription())
                                {
                                        $this->show_summary = $this->show_summary ^ 8;
                                }
                        }
                }

        function getResultsPresentation()
        {
                return $this->results_presentation;
        }

        function getShowPassDetails()
        {
                if (($this->results_presentation & 1) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function getShowSolutionDetails()
        {
                if (($this->results_presentation & 2) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function getShowSolutionPrintview()
        {
                if (($this->results_presentation & 4) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function getShowSolutionFeedback()
        {
                if (($this->results_presentation & 8) > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

                function getShowSolutionAnswersOnly()
                {
                        if (($this->results_presentation & 16) > 0)
                        {
                                return TRUE;
                        }
                        else
                        {
                                return FALSE;
                        }
                }

                function getShowSolutionSignature()
                {
                        if (($this->results_presentation & 32) > 0)
                        {
                                return TRUE;
                        }
                        else
                        {
                                return FALSE;
                        }
                }

        function setResultsPresentation($a_results_presentation = 3)
        {
                $this->results_presentation = $a_results_presentation;
        }

        function setShowPassDetails($a_details = 1)
        {
                if ($a_details)
                {
                        $this->results_presentation = $this->results_presentation | 1;
                }
                else
                {
                        if ($this->getShowPassDetails())
                        {
                                $this->results_presentation = $this->results_presentation ^ 1;
                        }
                }
        }

        function setShowSolutionDetails($a_details = 1)
        { 
                if ($a_details)
                {
                        $this->results_presentation = $this->results_presentation | 2;
                }
                else
                {
                        if ($this->getShowSolutionDetails())
                        {
                                $this->results_presentation = $this->results_presentation ^ 2;
                        }
                }
        }

        function canShowSolutionPrintview($user_id = NULL)
        {
                return $this->getShowSolutionPrintview();
        }

        function setShowSolutionPrintview($a_printview = 1)
        {
                if ($a_printview)
                {
                        $this->results_presentation = $this->results_presentation | 4;
                }
                else
                {
                        if ($this->getShowSolutionPrintview())
                        {
                                $this->results_presentation = $this->results_presentation ^ 4;
                        }
                }
        }

        function setShowSolutionFeedback($a_feedback = TRUE)
        {
                if ($a_feedback)
                {
                        $this->results_presentation = $this->results_presentation | 8;
                }
                else
                {
                        if ($this->getShowSolutionFeedback())
                        {
                                $this->results_presentation = $this->results_presentation ^ 8;
                        }
                }
        }

                function setShowSolutionAnswersOnly($a_full = TRUE)
                {
                        if ($a_full)
                        {
                                $this->results_presentation = $this->results_presentation | 16;
                        }
                        else
                        {
                                if ($this->getShowSolutionAnswersOnly())
                                {
                                        $this->results_presentation = $this->results_presentation ^ 16;
                                }
                        }
                }

                function setShowSolutionSignature($a_signature = FALSE)
                {
                        if ($a_signature)
                        {
                                $this->results_presentation = $this->results_presentation | 32;
                        }
                        else
                        {
                                if ($this->getShowSolutionSignature())
                                {
                                        $this->results_presentation = $this->results_presentation ^ 32;
                                }
                        }
                }

        function createNewAccessCode()
        {
                // create a 5 character code
                $codestring = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
                mt_srand();
                $code = "";
                for ($i = 1; $i <=5; $i++)
                {
                        $index = mt_rand(0, strlen($codestring)-1);
                        $code .= substr($codestring, $index, 1);
                }
                // verify it against the database
                while ($this->isAccessCodeUsed($code))
                {
                        $code = $this->createNewAccessCode();
                }
                return $code;
        }

        function isAccessCodeUsed($code)
        {
                global $ilDB;

                $query = sprintf("SELECT anonymous_id FROM tst_active WHERE test_fi = %s AND anonymous_id = %s",
                        $ilDB->quote($this->getTestId() . ""),
                        $ilDB->quote($code . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() > 0)
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function _getUserIdFromActiveId($active_id)
        {
                global $ilDB;
                $query = sprintf("SELECT user_fi FROM tst_active WHERE active_id = %s",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["user_fi"];
                }
                else
                {
                        return -1;
                }
        }

        function getAccessCodeSession()
        {
                $id = $this->getTestId();
                if (!is_array($_SESSION["tst_access_code"]))
                {
                        return "";
                }
                else
                {
                        return $_SESSION["tst_access_code"]["$id"];
                }
        }

        function setAccessCodeSession($access_code)
        {
                $id = $this->getTestId();
                if (!is_array($_SESSION["tst_access_code"]))
                {
                        $_SESSION["tst_access_code"] = array();
                }
                $_SESSION["tst_access_code"]["$id"] = $access_code;
        }

        function unsetAccessCodeSession()
        {
                $id = $this->getTestId();
                unset($_SESSION["tst_access_code"]["$id"]);
        }

        function getAllowedUsers()
        {
                return $this->allowedUsers;
        }

        function setAllowedUsers($a_allowed_users)
        {
                $this->allowedUsers = $a_allowed_users;
        }

        function getAllowedUsersTimeGap()
        {
                return $this->allowedUsersTimeGap;
        }

        function setAllowedUsersTimeGap($a_allowed_users_time_gap)
        {
                $this->allowedUsersTimeGap = $a_allowed_users_time_gap;
        }

        function checkMaximumAllowedUsers()
        {
                global $ilDB;

                $nr_of_users = $this->getAllowedUsers();
                $time_gap = ($this->getAllowedUsersTimeGap()) ? $this->getAllowedUsersTimeGap() : 60;
                if (($nr_of_users > 0) && ($time_gap > 0))
                {
                        $now = mktime();
                        $time_border = $now - $time_gap;
                        $str_time_border = strftime("%Y%m%d%H%M%S", $time_border);
                        $query = sprintf("SELECT DISTINCT tst_times.active_fi FROM tst_times, tst_active WHERE tst_times.TIMESTAMP > %s AND tst_times.active_fi = tst_active.active_id AND tst_active.test_fi = %s",
                                $ilDB->quote($str_time_border),
                                $ilDB->quote($this->getTestId() . "")
                        );
                        $result = $ilDB->query($query);
                        if ($result->numRows() >= $nr_of_users)
                        {
                                include_once "./Modules/Test/classes/class.ilObjAssessmentFolder.php";
                                if (ilObjAssessmentFolder::_enabledAssessmentLogging())
                                {
                                        $this->logAction($this->lng->txtlng("assessment", "log_could_not_enter_test_due_to_simultaneous_users", ilObjAssessmentFolder::_getLogLanguage()));
                                }
                                return FALSE;
                        }
                        else
                        {
                                return TRUE;
                        }
                }
                return TRUE;
        }

        function _getLastAccess($active_id)
        {
                global $ilDB;

                $query = sprintf("SELECT finished FROM tst_times WHERE active_fi = %s ORDER BY finished DESC",
                        $ilDB->quote($active_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row["finished"];
                }
                return "";
        }

        function isHTML($a_text)
        {
                if (preg_match("/<[^>]*?>/", $a_text))
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }

        function QTIMaterialToString($a_material)
        {
                $result = "";
                for ($i = 0; $i < $a_material->getMaterialCount(); $i++)
                {
                        $material = $a_material->getMaterial($i);
                        if (strcmp($material["type"], "mattext") == 0)
                        {
                                $result .= $material["material"]->getContent();
                        }
                        if (strcmp($material["type"], "matimage") == 0)
                        {
                                $matimage = $material["material"];
                                if (preg_match("/(il_([0-9]+)_mob_([0-9]+))/", $matimage->getLabel(), $matches))
                                {
                                        // import an mediaobject which was inserted using tiny mce
                                        if (!is_array($_SESSION["import_mob_xhtml"])) $_SESSION["import_mob_xhtml"] = array();
                                        array_push($_SESSION["import_mob_xhtml"], array("mob" => $matimage->getLabel(), "uri" => $matimage->getUri()));
                                }
                        }
                }
                global $ilLog;
                $ilLog->write(print_r($_SESSION["import_mob_xhtml"], true));
                return $result;
        }

        function addQTIMaterial(&$a_xml_writer, $a_material)
        {
                include_once "./Services/RTE/classes/class.ilRTE.php";
                include_once("./Services/MediaObjects/classes/class.ilObjMediaObject.php");

                $a_xml_writer->xmlStartTag("material");
                $attrs = array(
                        "texttype" => "text/plain"
                );
                if ($this->isHTML($a_material))
                {
                        $attrs["texttype"] = "text/xhtml";
                }
                $a_xml_writer->xmlElement("mattext", $attrs, ilRTE::_replaceMediaObjectImageSrc($a_material, 0));

                $mobs = ilObjMediaObject::_getMobsOfObject("tst:html", $this->getId());
                foreach ($mobs as $mob)
                {
                        $moblabel = "il_" . IL_INST_ID . "_mob_" . $mob;
                        if (strpos($a_material, "mm_$mob") !== FALSE)
                        {
                                if (ilObjMediaObject::_exists($mob))
                                {
                                        $mob_obj =& new ilObjMediaObject($mob);
                                        $imgattrs = array(
                                                "label" => $moblabel,
                                                "uri" => "objects/" . "il_" . IL_INST_ID . "_mob_" . $mob . "/" . $mob_obj->getTitle()
                                        );
                                }
                                $a_xml_writer->xmlElement("matimage", $imgattrs, NULL);
                        }
                }
                $a_xml_writer->xmlEndTag("material");
        }

        function prepareTextareaOutput($txt_output, $prepare_for_latex_output = FALSE)
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                return ilUtil::prepareTextareaOutput($txt_output, $prepare_for_latex_output);
        }

        function saveCertificateVisibility($a_value)
        {
                global $ilDB;

                $query = sprintf("UPDATE tst_tests SET certificate_visibility = %s WHERE test_id = %s",
                        $ilDB->quote($a_value),
                        $ilDB->quote($this->getTestId())
                );
                $result = $ilDB->query($query);
        }

        function getCertificateVisibility()
        {
                return $this->certificate_visibility;
        }

        function setCertificateVisibility($a_value)
        {
                $this->certificate_visibility = $a_value;
        }

        function getAnonymity()
        {
                return $this->anonymity;
        }

        function setAnonymity($a_value = 0)
        {
                switch ($a_value)
                {
                        case 1:
                                $this->anonymity = 1;
                                break;
                        default:
                                $this->anonymity = 0;
                                break;
                }
        }

        function getShowCancel()
        {
                return $this->show_cancel;
        }

        function setShowCancel($a_value = 1)
        {
                switch ($a_value)
                {
                        case 1:
                                $this->show_cancel = 1;
                                break;
                        default:
                                $this->show_cancel = 0;
                                break;
                }
        }

        function getShowMarker()
        {
                return $this->show_marker;
        }

        function setShowMarker($a_value = 1)
        {
                switch ($a_value)
                {
                        case 1:
                                $this->show_marker = 1;
                                break;
                        default:
                                $this->show_marker = 0;
                                break;
                }
        }

        function getFixedParticipants()
        {
                return $this->fixed_participants;
        }

        function setFixedParticipants($a_value = 1)
        {
                switch ($a_value)
                {
                        case 1:
                                $this->fixed_participants = 1;
                                break;
                        default:
                                $this->fixed_participants = 0;
                                break;
                }
        }

        function _lookupAnonymity($a_obj_id)
        {
          global $ilDB;

          $query = "SELECT anonymity FROM tst_tests ".
                  "WHERE obj_fi = '".$a_obj_id."'";
          $res = $ilDB->query($query);
          while($row = $res->fetchRow(MDB2_FETCHMODE_ASSOC))
          {
                  return $row['anonymity'];
          }
          return 0;
        }

        function _lookupRandomTestFromActiveId($active_id)
        {
          global $ilDB;

          $query = sprintf("SELECT tst_tests.random_test FROM tst_tests, tst_active WHERE tst_active.active_id = %s AND tst_active.test_fi = tst_tests.test_id",
                        $ilDB->quote($active_id . "")
                );
          $res = $ilDB->query($query);
          while($row = $res->fetchRow(MDB2_FETCHMODE_ASSOC))
          {
                  return $row['random_test'];
          }
          return 0;
        }

        function userLookupFullName($user_id, $overwrite_anonymity = FALSE, $sorted_order = FALSE, $suffix = "")
        {
                if ($this->getAnonymity() && !$overwrite_anonymity)
                {
                        return $this->lng->txt("unknown") . $suffix;
                }
                else
                {
                        include_once './Services/User/classes/class.ilObjUser.php';
                        $uname = ilObjUser::_lookupName($user_id);
                        if (strlen($uname["firstname"].$uname["lastname"]) == 0) $uname["firstname"] = $this->lng->txt("deleted_user");
                        if ($sorted_order)
                        {
                                return trim($uname["lastname"] . ", " . $uname["firstname"]) .  $suffix;
                        }
                        else
                        {
                                return trim($uname["firstname"] . " " . $uname["lastname"]) .  $suffix;
                        }
                }
        }

        function getStartTestLabel($active_id)
        {
                if ($this->getNrOfTries() == 1)
                {
                        return $this->lng->txt("tst_start_test");
                }
                $active_pass = $this->_getPass($active_id);
                $res = $this->getNrOfResultsForPass($active_id, $active_pass);
                if ($res == 0)
                {
                        if ($active_pass == 0)
                        {
                                return $this->lng->txt("tst_start_test");
                        }
                        else
                        {
                                return $this->lng->txt("tst_start_new_test_pass");
                        }
                }
                else
                {
                        return $this->lng->txt("tst_resume_test");
                }
        }

        function &getAvailableDefaults($sortby = "name", $sortorder = "asc")
        {
                global $ilDB;
                global $ilUser;
                
                $query = sprintf("SELECT * FROM tst_test_defaults WHERE user_fi = %s ORDER BY $sortby $sortorder",
                        $ilDB->quote($ilUser->getId() . "")
                );
                $result = $ilDB->query($query);
                $defaults = array();
                while ($row = $result->fetchRow(MDB2_FETCHMODE_ASSOC))
                {
                        $defaults[$row["test_defaults_id"]] = $row;
                }
                return $defaults;
        }
        
        function &getTestDefaults($test_defaults_id)
        {
                global $ilDB;
                
                $query = sprintf("SELECT * FROM tst_test_defaults WHERE test_defaults_id = %s",
                        $ilDB->quote($test_defaults_id . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows() == 1)
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        return $row;
                }
                else
                {
                        return NULL;
                }
        }
        
        function deleteDefaults($test_default_id)
        {
                global $ilDB;
                $query = sprintf("DELETE FROM tst_test_defaults WHERE test_defaults_id = %s",
                        $ilDB->quote($test_default_id . "")
                );
                $result = $ilDB->query($query);
        }
        
        function addDefaults($a_name)
        {
                global $ilDB;
                global $ilUser;
                $testsettings = array(
                        "TitleOutput" => $this->getTitleOutput(),
                        "PassScoring" => $this->getPassScoring(),
                        "Introduction" => $this->getIntroduction(),
                        "FinalStatement" => $this->getFinalStatement(),
                        "ShowInfo" => $this->getShowInfo(),
                        "ForceJS" => $this->getForceJS(),
                        "CustomStyle" => $this->getCustomStyle(),
                        "ShowFinalStatement" => $this->getShowFinalStatement(),
                        "SequenceSettings" => $this->getSequenceSettings(),
                        "ScoreReporting" => $this->getScoreReporting(),
                        "InstantFeedbackSolution" => $this->getInstantFeedbackSolution(),
                        "AnswerFeedback" => $this->getAnswerFeedback(),
                        "AnswerFeedbackPoints" => $this->getAnswerFeedbackPoints(),
                        "ResultsPresentation" => $this->getResultsPresentation(),
                        "Anonymity" => $this->getAnonymity(),
                        "ShowCancel" => $this->getShowCancel(),
                        "ShowMarker" => $this->getShowMarker(),
                        "ReportingDate" => $this->getReportingDate(),
                        "NrOfTries" => $this->getNrOfTries(),
                        "Kiosk" => $this->getKiosk(),
                        "UsePreviousAnswers" => $this->getUsePreviousAnswers(),
                        "ProcessingTime" => $this->getProcessingTime(),
                        "EnableProcessingTime" => $this->getEnableProcessingTime(),
                        "ResetProcessingTime" => $this->getResetProcessingTime(),
                        "StartingTime" => $this->getStartingTime(),
                        "EndingTime" => $this->getEndingTime(),
                        "ECTSOutput" => $this->getECTSOutput(),
                        "ECTSFX" => $this->getECTSFX(),
                        "ECTSGrades" => $this->getECTSGrades(),
                        "isRandomTest" => $this->isRandomTest(),
                        "RandomQuestionCount" => $this->getRandomQuestionCount(),
                        "CountSystem" => $this->getCountSystem(),
                        "MCScoring" => $this->getMCScoring(),
                        "ListOfQuestionsSettings" => $this->getListOfQuestionsSettings()
                );
                $query = sprintf("INSERT INTO tst_test_defaults (test_defaults_id, name, user_fi, defaults, marks) VALUES (NULL, %s, %s, %s, %s)",
                        $ilDB->quote($a_name . ""),
                        $ilDB->quote($ilUser->getId(). ""),
                        $ilDB->quote(serialize($testsettings)),
                        $ilDB->quote(serialize($this->mark_schema))
                );
                $result = $ilDB->query($query);
        }
        
        function applyDefaults($test_defaults_id)
        {
                $total = $this->evalTotalPersons();
                $result = FALSE;
                if (($this->getQuestionCount() == 0) && ($total == 0))
                {
                        // only apply if there are no questions added and not user datasets exist
                        $defaults =& $this->getTestDefaults($test_defaults_id);
                        $testsettings = unserialize($defaults["defaults"]);
                        include_once "./Modules/Test/classes/class.assMarkSchema.php";
                        $this->mark_schema = unserialize($defaults["marks"]);
                        $this->setTitleOutput($testsettings["TitleOutput"]);
                        $this->setPassScoring($testsettings["PassScoring"]);
                        $this->setIntroduction($testsettings["Introduction"]);
                        $this->setFinalStatement($testsettings["FinalStatement"]);
                        $this->setShowInfo($testsettings["ShowInfo"]);
                        $this->setForceJS($testsettings["ForceJS"]);
                        $this->setCustomStyle($testsettings["CustomStyle"]);
                        $this->setShowFinalStatement($testsettings["ShowFinalStatement"]);
                        $this->setSequenceSettings($testsettings["SequenceSettings"]);
                        $this->setScoreReporting($testsettings["ScoreReporting"]);
                        $this->setInstantFeedbackSolution($testsettings["InstantFeedbackSolution"]);
                        $this->setAnswerFeedback($testsettings["AnswerFeedback"]);
                        $this->setAnswerFeedbackPoints($testsettings["AnswerFeedbackPoints"]);
                        $this->setResultsPresentation($testsettings["ResultsPresentation"]);
                        $this->setAnonymity($testsettings["Anonymity"]);
                        $this->setShowCancel($testsettings["ShowCancel"]);
                        $this->setShowMarker($testsettings["ShowMarker"]);
                        $this->setReportingDate($testsettings["ReportingDate"]);
                        $this->setNrOfTries($testsettings["NrOfTries"]);
                        $this->setUsePreviousAnswers($testsettings["UsePreviousAnswers"]);
                        $this->setProcessingTime($testsettings["ProcessingTime"]);
                        $this->setResetProcessingTime($testsettings["ResetProcessingTime"]);
                        $this->setEnableProcessingTime($testsettings["EnableProcessingTime"]);
                        $this->setStartingTime($testsettings["StartingTime"]);
                        $this->setKiosk($testsettings["Kiosk"]);
                        $this->setEndingTime($testsettings["EndingTime"]);
                        $this->setECTSOutput($testsettings["ECTSOutput"]);
                        $this->setECTSFX($testsettings["ECTSFX"]);
                        $this->setECTSGrades($testsettings["ECTSGrades"]);
                        $this->setRandomTest($testsettings["isRandomTest"]);
                        $this->setRandomQuestionCount($testsettings["RandomQuestionCount"]);
                        $this->setCountSystem($testsettings["CountSystem"]);
                        $this->setMCScoring($testsettings["MCScoring"]);
                        $this->setListOfQuestionsSettings($testsettings["ListOfQuestionsSettings"]);
                        $this->saveToDb();
                        $result = TRUE;
                }
                return $result;
        }

        function processPrintoutput2FO($print_output)
        {
                if (extension_loaded("tidy"))
                {
                        $config = array(
                                "indent"         => false,
                                "output-xml"     => true,
                                "numeric-entities" => true
                        );
                        $tidy = new tidy();
                        $tidy->parseString($print_output, $config, 'utf8');
                        $tidy->cleanRepair();
                        $print_output = tidy_get_output($tidy);
                        $print_output = preg_replace("/^.*?(<html)/", "\\1", $print_output);
                }
                else
                {
                        $print_output = str_replace("&nbsp;", "&#160;", $print_output);
                        $print_output = str_replace("&otimes;", "X", $print_output);
                }

                $xsl = file_get_contents("./Modules/Test/xml/question2fo.xsl");
                $args = array( '/_xml' => $print_output, '/_xsl' => $xsl );
                $xh = xslt_create();
                $params = array();
                $output = xslt_process($xh, "arg:/_xml", "arg:/_xsl", NULL, $args, $params);
                xslt_error($xh);
                xslt_free($xh);
                return $output;
        }
        
        public function deliverPDFfromFO($fo, $title = null)
        {
                include_once "./Services/Utilities/classes/class.ilUtil.php";
                $fo_file = ilUtil::ilTempnam() . ".fo";
                $fp = fopen($fo_file, "w"); fwrite($fp, $fo); fclose($fp);
                include_once "./Services/Transformation/classes/class.ilFO2PDF.php";
                $fo2pdf = new ilFO2PDF();
                $fo2pdf->setFOString($fo);
                $result = $fo2pdf->send();
                $filename = (strlen($title)) ? $title : $this->getTitle();
                ilUtil::deliverData($result, ilUtil::getASCIIFilename($filename) . ".pdf", "application/pdf", false, true);
        }
        
        static function getManualFeedback($active_id, $question_id, $pass)
        {
                global $ilDB;
                $feedback = "";
                $query = sprintf("SELECT feedback FROM tst_manual_feedback WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($question_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);
                if ($result->numRows())
                {
                        $row = $result->fetchRow(MDB2_FETCHMODE_ASSOC);
                        include_once("./Services/RTE/classes/class.ilRTE.php");
                        $feedback = ilRTE::_replaceMediaObjectImageSrc($row["feedback"], 1);
                }
                return $feedback;
        }
        
        function saveManualFeedback($active_id, $question_id, $pass, $feedback)
        {
                global $ilDB;

                $query = sprintf("DELETE FROM tst_manual_feedback WHERE active_fi = %s AND question_fi = %s AND pass = %s",
                        $ilDB->quote($active_id . ""),
                        $ilDB->quote($question_id . ""),
                        $ilDB->quote($pass . "")
                );
                $result = $ilDB->query($query);

                if (strlen($feedback))
                {
                        $query = sprintf("INSERT INTO tst_manual_feedback (active_fi, question_fi, pass, feedback) VALUES (%s, %s, %s, %s)",
                                $ilDB->quote($active_id . ""),
                                $ilDB->quote($question_id . ""),
                                $ilDB->quote($pass . ""),
                                $ilDB->quote(ilRTE::_replaceMediaObjectImageSrc($feedback, 0) . "")
                        );
                        $result = $ilDB->query($query);
                }
                if (PEAR::isError($result)) 
                {
                        global $ilias;
                        $ilias->raiseError($result->getMessage());
                }
                else
                {
                        return TRUE;
                }
        }
        
        function getJavaScriptOutput()
        {
                global $ilUser;
                if (strcmp($_GET["tst_javascript"], "0") == 0) return FALSE;
                if ($this->getForceJS()) return TRUE;
                $assessmentSetting = new ilSetting("assessment");
                return ($ilUser->getPref("tst_javascript") === FALSE) ? $assessmentSetting->get("use_javascript") : $ilUser->getPref("tst_javascript");
        }
        
        function &createTestSession()
        {
                global $ilUser;
                
                include_once "./Modules/Test/classes/class.ilTestSession.php";
                $testSession = FALSE;
                $testSession = new ilTestSession();
                $testSession->setTestId($this->getTestId());
                $testSession->setUserId($ilUser->getId());
                $testSession->setAnonymousId($_SESSION["tst_access_code"][$this->getTestId()]);
                $testSession->saveToDb();
                $this->testSession =& $testSession;
                return $this->testSession;
        }

        function &setTestSession($active_id = "")
        {
                if (is_object($this->testSession) && ($this->testSession->getActiveId() > 0)) return $this->testSession;
                
                global $ilUser;
                
                include_once "./Modules/Test/classes/class.ilTestSession.php";
                $testSession = FALSE;
                if ($active_id > 0)
                {
                        $testSession = new ilTestSession($active_id);
                }
                else
                {
                        $testSession = new ilTestSession();
                        $testSession->loadTestSession($this->getTestId(), $ilUser->getId(), $_SESSION["tst_access_code"][$this->getTestId()]);
                }
                $this->testSession =& $testSession;
                return $this->testSession;
        }
        
        function &getTestSession($active_id = "")
        {
                if (is_object($this->testSession) && ($this->testSession->getActiveId() > 0)) return $this->testSession;
                return $this->setTestSession($active_id);
        }
        
        function &createTestSequence($active_id, $pass, $shuffle)
        {
                include_once "./Modules/Test/classes/class.ilTestSequence.php";
                $this->testSequence = new ilTestSequence($active_id, $pass, $this->isRandomTest());
                if (!$this->testSequence->hasSequence())
                {
                        $this->testSequence->createNewSequence($this->getQuestionCount(), $shuffle);
                        $this->testSequence->saveToDb();
                }
        }
        
        function &getTestSequence($active_id = "", $pass = "")
        {
                if (is_object($this->testSequence) && ($this->testSequence->getActiveId() > 0)) return $this->testSequence;
                
                include_once "./Modules/Test/classes/class.ilTestSequence.php";
                if (($active_id > 0) && (strlen($pass)))
                {
                        $this->testSequence = new ilTestSequence($active_id, $pass, $this->isRandomTest());
                }
                else
                {
                        $this->testSequence = new ilTestSequence($this->getTestSession()->getActiveId(), $this->getTestSession()->getPass(), $this->isRandomTest());
                }
                return $this->testSequence;
        }
        
        function hideCorrectAnsweredQuestions()
        {
                if ($this->getTestSession()->getActiveId() > 0)
                {
                        $result = $this->getTestResult($this->getTestSession()->getActiveId(), $this->getTestSession()->getPass(), TRUE);
                        foreach ($result as $sequence => $question)
                        {
                                if (is_numeric($sequence))
                                {
                                        if ($question["reached"] == $question["max"])
                                        {
                                                $this->getTestSequence()->hideQuestion($question["qid"]);
                                        }
                                }
                        }
                        $this->getTestSequence()->saveToDb();
                }
        }
        
        function getDetailedTestResults($participants)
        {
                $results = array();
                if (count($participants))
                {
                        foreach ($participants as $active_id => $user_rec)
                        {
                                $row = array();
                                $reached_points = 0;
                                $max_points = 0;
                                foreach ($this->questions as $value)
                                {
                                        $question =& ilObjTest::_instanciateQuestion($value);
                                        if (is_object($question))
                                        {
                                                $max_points += $question->getMaximumPoints();
                                                $reached_points += $question->getReachedPoints($active_id);
                                                if ($max_points > 0)
                                                {
                                                        $percentvalue = $reached_points / $max_points;
                                                        if ($percentvalue < 0) $percentvalue = 0.0;
                                                }
                                                else
                                                {
                                                        $percentvalue = 0;
                                                }
                                                if ($this->getAnonymity())
                                                {
                                                        $user_rec->firstname = "";
                                                        $user_rec->lastname = $this->lng->txt("unknown");
                                                }
                                                $row = array(
                                                        "user_id"=>$user_rec->usr_id,
                                                        "matriculation" =>  $user_rec->matriculation,
                                                        "lastname" =>  $user_rec->lastname,
                                                        "firstname" => $user_rec->firstname,
                                                        "login"=>$user_rec->login,
                                                        "question_id" => $question->getId(),
                                                        "question_title" => $question->getTitle(),
                                                        "reached_points" => $reached_points,
                                                        "max_points" => $max_points
                                                );
                                                $results[] = $row;
                                        }
                                }
                        }
                }
                return $results;
        }

        function _lookupTestObjIdForQuestionId($a_q_id)
        {
                global $ilDB;
                
                $set = $ilDB->query("SELECT t.obj_fi AS obj_id FROM tst_test_question AS q, tst_tests AS t WHERE".
                        " q.test_fi = t.test_id AND q.question_fi = ".$ilDB->quote($a_q_id));
                $rec = $set->fetchRow(DB_FETCHMODE_ASSOC);
                return $rec["obj_id"];
        }

        function isPluginActive($a_pname)
        {
                global $ilPluginAdmin;
                if ($ilPluginAdmin->isActive(IL_COMP_MODULE, "TestQuestionPool", "qst", $a_pname))
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }
        
        function setEvaluationAdditionalFields($fields)
        {
                $assessmentSetting = new ilSetting("assessment");
                $assessmentSetting->set("evalFields_" . $this->getId(), serialize($fields));
        }
        
        function getEvaluationAdditionalFields()
        {
                        $assessmentSetting = new ilSetting("assessment");
                        $found = $assessmentSetting->get("evalFields_" . $this->getId());
                        $fields = array();
                        if (strlen($found)) $fields = unserialize($found);
                        if (is_array($fields)) return $fields; else return array();
        }

        function canShowCertificate($user_id, $active_id)
        {
                if ($this->canShowTestResults($user_id))
                {
                        $counted_pass = ilObjTest::_getResultPass($active_id);
                        $result_array =& $this->getTestResult($active_id, $counted_pass);

                        include_once "./Modules/Test/classes/class.ilTestCertificate.php";
                        $cert = new ilTestCertificate($this);
                        if ($cert->isComplete())
                        {
                                $vis = $this->getCertificateVisibility();
                                $showcert = FALSE;
                                switch ($vis)
                                {
                                        case 0:
                                                $showcert = TRUE;
                                                break;
                                        case 1:
                                                if ($result_array["test"]["passed"] == 1)
                                                {
                                                        $showcert = TRUE;
                                                }
                                                break;
                                        case 2:
                                                $showcert = FALSE;
                                                break;
                                }
                                if ($showcert)
                                {
                                        return TRUE;
                                }
                                else
                                {
                                        return FALSE;
                                }
                        }
                        else
                        {
                                return FALSE;
                        }
                }
                else
                {
                        return FALSE;
                }
        }

        function getParticipantsForTestAndQuestion($test_id, $question_id)
        {
                global $ilDB;
                $query = sprintf("SELECT tst_test_result.active_fi, tst_test_result.question_fi, tst_test_result.pass FROM tst_test_result, tst_active, qpl_questions WHERE tst_active.active_id = tst_test_result.active_fi AND tst_active.test_fi = %s AND tst_test_result.question_fi = qpl_questions.question_id AND qpl_questions.original_id = %s",
                        $ilDB->quote($test_id),
                        $ilDB->quote($question_id)
                );
                $result = $ilDB->query($query);
                $foundusers = array();
                while ($row = $result->fetchRow(DB_FETCHMODE_ASSOC))
                {
                        if (!array_key_exists($row["active_fi"], $foundusers))
                        {
                                $foundusers[$row["active_fi"]] = array();
                        }
                        array_push($foundusers[$row["active_fi"]], array("pass" => $row["pass"], "qid" => $row["question_fi"]));
                }
                return $foundusers;
        }

        public function hasPDFProcessing()
        {
                global $ilias;
                if ((strlen($ilias->getSetting("rpc_server_host"))) && (strlen($ilias->getSetting("rpc_server_port"))))
                {
                        return TRUE;
                }
                else
                {
                        return FALSE;
                }
        }
        
        public function getAggregatedResultsData()
        {
                $data =& $this->getCompleteEvaluationData();
                $foundParticipants =& $data->getParticipants();
                $results = array("overview" => array(), "questions" => array());
                if (count($foundParticipants)) 
                {
                        $results["overview"][$this->lng->txt("tst_eval_total_persons")] = count($foundParticipants);
                        $total_finished = $this->evalTotalFinished();
                        $results["overview"][$this->lng->txt("tst_eval_total_finished")] = $total_finished;
                        $average_time = $this->evalTotalStartedAverageTime();
                        $diff_seconds = $average_time;
                        $diff_hours    = floor($diff_seconds/3600);
                        $diff_seconds -= $diff_hours   * 3600;
                        $diff_minutes  = floor($diff_seconds/60);
                        $diff_seconds -= $diff_minutes * 60;
                        $results["overview"][$this->lng->txt("tst_eval_total_finished_average_time")] = sprintf("%02d:%02d:%02d", $diff_hours, $diff_minutes, $diff_seconds);
                        $total_passed = 0;
                        $total_passed_reached = 0;
                        $total_passed_max = 0;
                        $total_passed_time = 0;
                        foreach ($foundParticipants as $userdata)
                        {
                                if ($userdata->getPassed()) 
                                {
                                        $total_passed++;
                                        $total_passed_reached += $userdata->getReached();
                                        $total_passed_max += $userdata->getMaxpoints();
                                        $total_passed_time += $userdata->getTimeOfWork();
                                }
                        }
                        $average_passed_reached = $total_passed ? $total_passed_reached / $total_passed : 0;
                        $average_passed_max = $total_passed ? $total_passed_max / $total_passed : 0;
                        $average_passed_time = $total_passed ? $total_passed_time / $total_passed : 0;
                        $results["overview"][$this->lng->txt("tst_eval_total_passed")] = $total_passed;
                        $results["overview"][$this->lng->txt("tst_eval_total_passed_average_points")] = sprintf("%2.2f", $average_passed_reached) . " " . strtolower($this->lng->txt("of")) . " " . sprintf("%2.2f", $average_passed_max);
                        $average_time = $average_passed_time;
                        $diff_seconds = $average_time;
                        $diff_hours    = floor($diff_seconds/3600);
                        $diff_seconds -= $diff_hours   * 3600;
                        $diff_minutes  = floor($diff_seconds/60);
                        $diff_seconds -= $diff_minutes * 60;
                        $results["overview"][$this->lng->txt("tst_eval_total_passed_average_time")] = sprintf("%02d:%02d:%02d", $diff_hours, $diff_minutes, $diff_seconds);
                } 

                foreach ($data->getQuestionTitles() as $question_id => $question_title)
                {
                        $answered = 0;
                        $reached = 0;
                        $max = 0;
                        foreach ($foundParticipants as $userdata)
                        {
                                for ($i = 0; $i <= $userdata->getLastPass(); $i++)
                                {
                                        if (is_object($userdata->getPass($i)))
                                        {
                                                $question =& $userdata->getPass($i)->getAnsweredQuestionByQuestionId($question_id);
                                                if (is_array($question))
                                                {
                                                        $answered++;
                                                        $reached += $question["reached"];
                                                        $max += $question["points"];
                                                }
                                        }
                                }
                        }
                        $percent = $max ? $reached/$max * 100.0 : 0;
                        $counter++;
                        $results["questions"][$question_id] = array(
                                $question_title, 
                                sprintf("%.2f", $answered ? $reached / $answered : 0) . " " . strtolower($this->lng->txt("of")) . " " . sprintf("%.2f", $answered ? $max / $answered : 0),
                                sprintf("%.2f", $percent) . "%",
                                $answered,
                                sprintf("%.2f", $answered ? $reached / $answered : 0),
                                sprintf("%.2f", $answered ? $max / $answered : 0),
                                $percent / 100.0
                        );
                }
                return $results;
        }
} // END class.ilObjTest

?>