35    public function __construct($a_id = 0, $a_call_by_reference = 
true)
 
   39        $this->log = 
$DIC[
"ilLog"];
 
   40        $this->db = 
$DIC->database();
 
   41        $this->
user = $DIC->user();
 
   42        $this->plugin_admin = 
$DIC[
"ilPluginAdmin"];
 
   50    public function create($a_upload = 
false)
 
   67        if (!parent::update()) {
 
   91    public function cloneObject($a_target_id, $a_copy_id = 0, $a_omit_tree = 
false)
 
   94        $newObj = parent::cloneObject($a_target_id, $a_copy_id, $a_omit_tree);
 
   99        if (!$cp_options->isRootNode($this->getRefId())) {
 
  106        foreach ($questions as $question_id) {
 
  107            $newObj->copyQuestion($question_id, $newObj->getId());
 
  112        $new_md = &$md->cloneMD($newObj->getId(), 0, $newObj->getType());
 
  115        $newObj->updateMetaData();
 
  121        if ((!$question_type) and ($question_id > 0)) {
 
  125        $question_type_gui = $question_type . 
"GUI";
 
  126        $question = 
new $question_type_gui();
 
  128        if ($question_id > 0) {
 
  129            $question->object->loadFromDb($question_id);
 
  145        if ($question_gui->object->getObjId() == $questionpool_to) {
 
  150            $newtitle = $question_gui->object->getTitle();
 
  151            if ($question_gui->object->questionTitleExists($question_gui->object->getTitle(), $questionpool_to)) {
 
  153                while ($question_gui->object->questionTitleExists($question_gui->object->getTitle() . 
" ($counter)", $questionpool_to)) {
 
  156                $newtitle = $question_gui->object->getTitle() . 
" ($counter)";
 
  158            $question_gui->object->copyObject($this->
getId(), $newtitle);
 
  172            "SELECT * FROM svy_qpl WHERE obj_fi = %s",
 
  174            array($this->
getId())
 
  194            "SELECT * FROM svy_qpl WHERE obj_fi = %s",
 
  196            array($this->
getId())
 
  199            $affectedRows = 
$ilDB->manipulateF(
 
  200                "UPDATE svy_qpl SET isonline = %s, tstamp = %s WHERE obj_fi = %s",
 
  201                array(
'text',
'integer',
'integer'),
 
  205            $next_id = 
$ilDB->nextId(
'svy_qpl');
 
  207                "INSERT INTO svy_qpl (id_questionpool, isonline, obj_fi, tstamp) VALUES (%s, %s, %s, %s)",
 
  208                array(
'integer', 
'text', 
'integer', 
'integer'),
 
  220    public function delete()
 
  222        $remove = parent::delete();
 
  241            "SELECT question_id FROM svy_question WHERE obj_fi = %s AND original_id IS NULL",
 
  243            array($this->
getId())
 
  245        $found_questions = array();
 
  252        $directory = $spl_data_dir . 
"/spl_" . $this->
getId();
 
  253        if (is_dir($directory)) {
 
  266        if ($question_id < 1) {
 
  270        $question->delete($question_id);
 
  283        if ($question_id < 1) {
 
  287            "SELECT svy_qtype.type_tag FROM svy_question, svy_qtype WHERE svy_question.questiontype_fi = svy_qtype.questiontype_id AND svy_question.question_id = %s",
 
  293            return $data[
"type_tag"];
 
  311            "SELECT answer_id FROM svy_answer WHERE question_fi = %s",
 
  315        $answered = 
$result->numRows();
 
  319            "SELECT svy_svy.* FROM svy_svy, svy_svy_qst WHERE svy_svy_qst.survey_fi = svy_svy.survey_id AND svy_svy_qst.question_fi = %s",
 
  323        $inserted = 
$result->numRows();
 
  324        if (($inserted + $answered) == 0) {
 
  327        $result_array = array();
 
  329            array_push($result_array, $row);
 
  331        return $result_array;
 
  355        $result_array = array();
 
  356        $result = 
$ilDB->query(
"SELECT svy_question.*, svy_qtype.type_tag, svy_qtype.plugin FROM svy_question, svy_qtype WHERE svy_question.questiontype_fi = svy_qtype.questiontype_id AND svy_question.tstamp > 0 AND " . 
$ilDB->in(
'svy_question.question_id', $question_array, 
false, 
'integer'));
 
  358            if ($row[
"plugin"]) {
 
  360                    array_push($result_array, $row);
 
  363                array_push($result_array, $row);
 
  366        return $result_array;
 
  381        while ($question->questionTitleExists($question->getTitle() . $suffix, $obj_id)) {
 
  384                $suffix = 
" ($counter)";
 
  388            $question->setObjId($obj_id);
 
  390        $question->duplicate(
false, $question->getTitle() . $suffix, 
$ilUser->fullname, 
$ilUser->id);
 
  403        if (is_array($arrFilter)) {
 
  404            foreach ($arrFilter as $key => $value) {
 
  405                $arrFilter[$key] = str_replace(
'%', 
'', $arrFilter[$key]);
 
  407            if (array_key_exists(
'title', $arrFilter) && strlen($arrFilter[
'title'])) {
 
  408                $where .= 
" AND " . 
$ilDB->like(
'svy_question.title', 
'text', 
"%%" . $arrFilter[
'title'] . 
"%%");
 
  410            if (array_key_exists(
'description', $arrFilter) && strlen($arrFilter[
'description'])) {
 
  411                $where .= 
" AND " . 
$ilDB->like(
'svy_question.description', 
'text', 
"%%" . $arrFilter[
'description'] . 
"%%");
 
  413            if (array_key_exists(
'author', $arrFilter) && strlen($arrFilter[
'author'])) {
 
  414                $where .= 
" AND " . 
$ilDB->like(
'svy_question.author', 
'text', 
"%%" . $arrFilter[
'author'] . 
"%%");
 
  416            if (array_key_exists(
'type', $arrFilter) && strlen($arrFilter[
'type'])) {
 
  417                $where .= 
" AND svy_qtype.type_tag = " . 
$ilDB->quote($arrFilter[
'type'], 
'text');
 
  420        $query_result = 
$ilDB->queryF(
 
  421            "SELECT svy_question.*, svy_qtype.type_tag, svy_qtype.plugin FROM svy_question, svy_qtype WHERE svy_question.original_id IS NULL AND svy_question.tstamp > 0 AND svy_question.questiontype_fi = svy_qtype.questiontype_id AND svy_question.obj_fi = %s" . $where,
 
  423            array($this->
getId())
 
  426        if ($query_result->numRows()) {
 
  427            while ($row = 
$ilDB->fetchAssoc($query_result)) {
 
  428                if ($row[
"plugin"]) {
 
  430                        array_push(
$rows, $row);
 
  433                    array_push(
$rows, $row);
 
  451        if (!is_writable($spl_data_dir)) {
 
  452            throw new ilSurveyException(
"Survey Questionpool Data Directory (" . $spl_data_dir . 
") not writeable.");
 
  456        $spl_dir = $spl_data_dir . 
"/spl_" . $this->
getId();
 
  458        if (!@is_dir($spl_dir)) {
 
  459            throw new ilSurveyException(
"Creation of Survey Questionpool Directory failed.");
 
  462        $export_dir = $spl_dir . 
"/export";
 
  464        if (!@is_dir($export_dir)) {
 
  465            throw new ilSurveyException(
"Creation of Survey Questionpool Export Directory failed.");
 
  484        if (!@is_dir($dir) or
 
  485            !is_writeable($dir)) {
 
  496        while ($entry = $dir->read()) {
 
  499                preg_match(
"/^[0-9]{10}__[0-9]+__(spl_)*[0-9]+\.[A-Za-z]{3}$/", $entry)) {
 
  525        if (!is_writable($spl_data_dir)) {
 
  526            throw new ilSurveyException(
"Survey Questionpool Data Directory (" . $spl_data_dir . 
") not writeable.");
 
  530        $spl_dir = $spl_data_dir . 
"/spl_" . $this->
getId();
 
  532        if (!@is_dir($spl_dir)) {
 
  533            throw new ilSurveyException(
"Creation of Survey Questionpool Directory failed.");
 
  537        $import_dir = $spl_dir . 
"/import";
 
  539        if (!@is_dir($import_dir)) {
 
  540            throw new ilSurveyException(
"Creation of Survey Questionpool Import Directory failed.");
 
  550            "/spl_" . $this->
getId() . 
"/import";
 
  551        if (@is_dir($import_dir)) {
 
  563        if (!is_array($questions)) {
 
  566        if (count($questions) == 0) {
 
  575            "xmlns:xsi" => 
"http://www.w3.org/2001/XMLSchema-instance",
 
  576            "xsi:noNamespaceSchemaLocation" => 
"http://www.ilias.de/download/xsd/ilias_survey_4_2.xsd" 
  578        $a_xml_writer->xmlStartTag(
"surveyobject", $attrs);
 
  580            "id" => 
"qpl_" . $this->
getId(),
 
  584        $a_xml_writer->xmlStartTag(
"surveyquestions", $attrs);
 
  585        $a_xml_writer->xmlElement(
"dummy", 
null, 
"dummy");
 
  587        $a_xml_writer->xmlStartTag(
"metadata");
 
  588        $a_xml_writer->xmlStartTag(
"metadatafield");
 
  589        $a_xml_writer->xmlElement(
"fieldlabel", 
null, 
"SCORM");
 
  593        $metadata = $writer->xmlDumpMem();
 
  594        $a_xml_writer->xmlElement(
"fieldentry", 
null, $metadata);
 
  595        $a_xml_writer->xmlEndTag(
"metadatafield");
 
  596        $a_xml_writer->xmlEndTag(
"metadata");
 
  598        $a_xml_writer->xmlEndTag(
"surveyquestions");
 
  599        $a_xml_writer->xmlEndTag(
"surveyobject");
 
  601        $xml = $a_xml_writer->xmlDumpMem(
false);
 
  604        foreach ($questions as $key => $value) {
 
  607            $question = 
new $questiontype();
 
  608            $question->loadFromDb($value);
 
  609            $questionxml .= $question->toXML(
false);
 
  612        $xml = str_replace(
"<dummy>dummy</dummy>", $questionxml, 
$xml);
 
  619        $questions = array();
 
  621            "SELECT question_id FROM svy_question WHERE obj_fi = %s AND svy_question.tstamp > 0 AND original_id IS NULL",
 
  623            array($this->
getId())
 
  627                array_push($questions, $row[
"question_id"]);
 
  642            $isZip = (strcmp(strtolower(substr(
$source, -3)), 
'zip') == 0);
 
  648                $subdir = basename(
$source, 
".zip");
 
  649                $source = dirname(
$source) . 
"/" . $subdir . 
"/" . $subdir . 
".xml";
 
  652            $fh = fopen(
$source, 
"r") or die(
"");
 
  654            fclose($fh) or die(
"");
 
  656                $subdir = basename(
$source, 
".zip");
 
  657                if (@is_dir(dirname(
$source) . 
"/" . $subdir)) {
 
  661            if (strpos(
$xml, 
"questestinterop") > 0) {
 
  666                $import->setXMLContent(
$xml);
 
  667                $import->startParsing();
 
  672    public static function _setOnline($a_obj_id, $a_online_status)
 
  679        switch ($a_online_status) {
 
  682                $status = 
"$a_online_status";
 
  685        $affectedRows = 
$ilDB->manipulateF(
 
  686            "UPDATE svy_qpl SET isonline = %s  WHERE obj_fi = %s",
 
  687            array(
'text',
'integer'),
 
  688            array($status, $a_obj_id)
 
  701        switch ($a_online_status) {
 
  704                $this->online = $a_online_status;
 
  714        if (strcmp($this->online, 
"") == 0) {
 
  727            "SELECT isonline FROM svy_qpl WHERE obj_fi = %s",
 
  733            return $row[
"isonline"];
 
  749        $rbacsystem = 
$DIC->rbac()->system();
 
  756        foreach ($refs as $ref) {
 
  779        $lng->loadLanguageModule(
"survey");
 
  781        $query_result = 
$ilDB->query(
"SELECT * FROM svy_qtype ORDER BY type_tag");
 
  782        while ($row = 
$ilDB->fetchAssoc($query_result)) {
 
  784            if ($row[
"plugin"] == 0) {
 
  785                $types[
$lng->txt($row[
"type_tag"])] = $row;
 
  789                $ilPluginAdmin = 
$DIC[
"ilPluginAdmin"];
 
  790                $pl_names = $ilPluginAdmin->getActivePluginsForSlot(
IL_COMP_MODULE, 
"SurveyQuestionPool", 
"svyq");
 
  791                foreach ($pl_names as $pl_name) {
 
  793                    if (strcmp($pl->getQuestionType(), $row[
"type_tag"]) == 0) {
 
  794                        $types[$pl->getQuestionTypeTranslation()] = $row;
 
  804        $default_sorting = array_flip(array(
 
  805            "SurveySingleChoiceQuestion",
 
  806            "SurveyMultipleChoiceQuestion",
 
  807            "SurveyMatrixQuestion",
 
  808            "SurveyMetricQuestion",
 
  813        $idx = 
sizeof($default_sorting);
 
  814        foreach ($types as $caption => $item) {
 
  815            $type = $item[
"type_tag"];
 
  816            $item[
"caption"] = $caption;
 
  819            if (array_key_exists(
$type, $default_sorting)) {
 
  820                $sorted[$default_sorting[
$type]] = $item;
 
  824                $sorted[$idx] = $item;
 
  832        foreach ($sorted as $item) {
 
  833            $types[$item[
"caption"]] = $item;
 
  846        $classes = array_map(
 
  848                return $c[
"type_tag"];
 
  865        $ilLog = 
$DIC[
"ilLog"];
 
  868        $ilPluginAdmin = 
$DIC[
"ilPluginAdmin"];
 
  870        $lng->loadLanguageModule(
"survey");
 
  874            if ($row[
"plugin"] == 0) {
 
  875                $types[$row[
'type_tag']] = 
$lng->txt($row[
"type_tag"]);
 
  877                $pl_names = $ilPluginAdmin->getActivePluginsForSlot(
IL_COMP_MODULE, 
"SurveyQuestionPool", 
"svyq");
 
  878                foreach ($pl_names as $pl_name) {
 
  880                    if (strcmp($pl->getQuestionType(), $row[
"type_tag"]) == 0) {
 
  881                        $types[$row[
'type_tag']] = $pl->getQuestionTypeTranslation();
 
  896    public static function _getAvailableQuestionpools($use_object_id = 
false, $could_be_offline = 
false, $showPath = 
false, $permission = 
"read")
 
  905        $result_array = array();
 
  909        $result = 
$ilDB->query(
"SELECT obj_fi, isonline FROM svy_qpl");
 
  911            $allqpls[$row[
'obj_fi']] = $row[
'isonline'];
 
  915            if ($could_be_offline || $allqpls[$obj_id] == 1) {
 
  916                if ($use_object_id) {
 
  917                    $result_array[$obj_id] = $titles[
$ref_id];
 
  923        return $result_array;
 
  935        if ($ilPluginAdmin->isActive(
IL_COMP_MODULE, 
"SurveyQuestionPool", 
"svyq", $a_pname)) {
 
  953        $query_result = 
$ilDB->query(
"SELECT svy_question.*, svy_qtype.type_tag FROM svy_question, svy_qtype " .
 
  954            "WHERE svy_question.questiontype_fi = svy_qtype.questiontype_id " .
 
  955            "AND svy_question.tstamp > 0 AND " . 
$ilDB->in(
'svy_question.question_id', $question_ids, 
false, 
'integer') . 
" " .
 
  956            "ORDER BY svy_question.title");
 
  957        if ($query_result->numRows() > 0) {
 
  958            while (
$data = 
$ilDB->fetchAssoc($query_result)) {
 
  959                if (in_array(
$data[
"question_id"], $question_ids)) {
 
  960                    array_push($found, array(
'id' => 
$data[
"question_id"],
 
  961                        'title' => 
$data[
"title"],
 
  962                        'description' => 
$data[
"description"],
 
  963                        'type_tag' => 
$data[
"type_tag"]));
 
  979            "SELECT question_id FROM svy_question WHERE owner_fi = %s AND tstamp = %s",
 
  980            array(
"integer", 
"integer"),
 
  995        if (!array_key_exists(
"spl_clipboard", 
$_SESSION)) {
 
  998        $_SESSION[
"spl_clipboard"][$question_id] = array(
"question_id" => $question_id, 
"action" => 
"copy");
 
 1008        if (!array_key_exists(
"spl_clipboard", 
$_SESSION)) {
 
 1011        $_SESSION[
"spl_clipboard"][$question_id] = array(
"question_id" => $question_id, 
"action" => 
"move");
 
 1021        if (array_key_exists(
"spl_clipboard", 
$_SESSION)) {
 
 1022            foreach (
$_SESSION[
"spl_clipboard"] as $question_object) {
 
 1023                if (strcmp($question_object[
"action"], 
"move") == 0) {
 
 1025                        "SELECT obj_fi FROM svy_question WHERE question_id = %s",
 
 1027                        array($question_object[
"question_id"])
 
 1029                    if (
$result->numRows() == 1) {
 
 1031                        $source_questionpool = $row[
"obj_fi"];
 
 1032                        if ($this->
getId() != $source_questionpool) {
 
 1034                            $affectedRows = 
$ilDB->manipulateF(
 
 1035                                "UPDATE svy_question SET obj_fi = %s WHERE question_id = %s",
 
 1036                                array(
'integer',
'integer'),
 
 1037                                array($this->
getId(), $question_object[
"question_id"])
 
 1041                            $source_path = 
CLIENT_WEB_DIR . 
"/survey/" . $source_questionpool . 
"/" . $question_object[
"question_id"] . 
"/";
 
 1042                            if (@is_dir($source_path)) {
 
 1044                                if (!@is_dir($target_path)) {
 
 1047                                @rename($source_path, $target_path . $question_object[
"question_id"]);
 
 1059        ilUtil::sendSuccess($this->lng->txt(
"spl_paste_success"), 
true);
 
 1074            $status = (int) (in_array($question_id, $obligatory_questions));
 
 1076            $ilDB->manipulate(
"UPDATE svy_question" .
 
 1077                " SET obligatory = " . 
$ilDB->quote($status, 
"integer") .
 
 1078                " WHERE question_id = " . 
$ilDB->quote($question_id, 
"integer"));
 
An exception for terminatinating execution or to throw for unit testing.
Survey Question Import Parser.
static _instanciateQuestion($question_id)
Creates an instance of a question with a given question id.
static _includeClass($question_type, $gui=0)
Include the php class file for a given question type.
static _getInstance($a_copy_id)
Get instance of copy wizard options.
Class ilInvalidSurveyImportFileException.
Class ilObjSurveyQuestionPool.
moveToClipboard($question_id)
Moves a question to the clipboard.
getQuestionsData($arrFilter)
Calculates the data for the output of the questionpool.
setOnline($a_online_status)
Sets the questionpool online status.
removeQuestion($question_id)
Removes a question from the question pool.
createImportDirectory()
creates data directory for import files (data_dir/spl_data/spl_<id>/import, depending on data directo...
loadFromDb()
Loads a ilObjQuestionpool object from a database.
getQuestionInfos($question_ids)
Returns title, description and type for an array of question id's.
cloneObject($a_target_id, $a_copy_id=0, $a_omit_tree=false)
Creates a 1:1 copy of the object and places the copy in a given repository.
paste($question_id)
Pastes a question in the question pool.
copyToClipboard($question_id)
Copies a question to the clipboard.
static _getAvailableQuestionpools($use_object_id=false, $could_be_offline=false, $showPath=false, $permission="read")
Returns the available question pools for the active user.
importObject($source, $spl_exists=false)
Imports survey questions into ILIAS.
static _getQuestionClasses()
Get question classes.
createExportDirectory()
creates data directory for export files (data_dir/spl_data/spl_<id>/export, depending on data directo...
copyQuestion($question_id, $questionpool_to)
Copies a question into another question pool.
static _isWriteable($object_id, $user_id)
Returns true, if the question pool is writeable by a given user.
static _getQuestiontypes()
Creates a list of all available question types.
create($a_upload=false)
create question pool object
getExportDirectory()
get export directory of survey
isPluginActive($a_pname)
Checks whether or not a question plugin with a given name is active.
static _getQuestionTypeTranslations()
read()
read object data from db into object @access public
pasteFromClipboard()
Copies/Moves a question from the clipboard.
& createQuestion($question_type, $question_id=-1)
static _lookupOnline($a_obj_id)
toXML($questions)
export questions to xml
saveToDb()
Saves a ilObjSurveyQuestionPool object to a database.
static _setOnline($a_obj_id, $a_online_status)
getImportDirectory()
get import directory of survey
update()
update object data
& getQuestionsInfo($question_array)
Retrieves the datase entries for questions from a given array.
isInUse($question_id)
Checks if a question is in use by a survey.
__construct($a_id=0, $a_call_by_reference=true)
Constructor @access public.
getExportFiles($dir)
get export files
getQuestiontype($question_id)
Returns the question type of a question with a given id.
duplicateQuestion($question_id, $obj_id="")
Duplicates a question for a questionpool.
setObligatoryStates($obligatory_questions)
Sets the obligatory states for questions in a survey from the questions form.
Class ilObject Basic functions for all objects.
getType()
get object type @access public
static _lookupObjectId($a_ref_id)
lookup object id
deleteMetaData()
delete meta data entry
updateMetaData()
update meta data entry
createMetaData()
create meta data entry
static _getAllReferences($a_id)
get all reference ids of object
getId()
get object id @access public
static _hasUntrashedReference($a_obj_id)
checks wether an object has at least one reference that is not in trash
static _prepareCloneSelection($a_ref_ids, $new_type, $show_path=true)
Prepare copy wizard object selection.
getTitle()
get object title @access public
static getPluginObject(string $a_ctype, string $a_cname, string $a_slot_id, string $a_pname)
static getDataDir()
get data directory (outside webspace)
static delDir($a_dir, $a_clean_only=false)
removes a dir and all its content (subdirs and files) recursively
static sendFailure($a_info="", $a_keep=false)
Send Failure Message to Screen.
static _getObjectsByOperations($a_obj_type, $a_operation, $a_usr_id=0, $limit=0)
Get all objects of a specific type and check access This function is not recursive,...
static unzip(string $path_to_zip_file, bool $overwrite_existing=false, bool $unpack_flat=false)
static makeDirParents($a_dir)
Create a new directory and all parent directories.
static makeDir($a_dir)
creates a new directory and inherits all filesystem permissions of the parent directory You may pass ...
xmlHeader()
Writes xml header @access public.
__construct(Container $dic, ilPlugin $plugin)
@inheritDoc