|
@@ -1,5 +1,7 @@
|
|
|
-<?php // $Id: $
|
|
|
-if ( count( get_included_files() ) == 1 ) die( '---' );
|
|
|
+<?php
|
|
|
+// $Id: $
|
|
|
+if (count(get_included_files()) == 1)
|
|
|
+ die('---');
|
|
|
/**
|
|
|
* @copyright (c) 2001-2006 Universite catholique de Louvain (UCL)
|
|
|
*
|
|
@@ -15,73 +17,42 @@ if ( count( get_included_files() ) == 1 ) die( '---' );
|
|
|
* function to create a temporary directory (SAME AS IN MODULE ADMIN)
|
|
|
*/
|
|
|
|
|
|
-function tempdir($dir, $prefix='tmp', $mode=0777)
|
|
|
-{
|
|
|
- if (substr($dir, -1) != '/') $dir .= '/';
|
|
|
+function tempdir($dir, $prefix = 'tmp', $mode = 0777) {
|
|
|
+ if (substr($dir, -1) != '/')
|
|
|
+ $dir .= '/';
|
|
|
|
|
|
- do
|
|
|
- {
|
|
|
- $path = $dir.$prefix.mt_rand(0, 9999999);
|
|
|
- } while (!mkdir($path, $mode));
|
|
|
+ do {
|
|
|
+ $path = $dir . $prefix . mt_rand(0, 9999999);
|
|
|
+ } while (!mkdir($path, $mode));
|
|
|
|
|
|
- return $path;
|
|
|
+ return $path;
|
|
|
}
|
|
|
|
|
|
-
|
|
|
/**
|
|
|
* @return the path of the temporary directory where the exercise was uploaded and unzipped
|
|
|
*/
|
|
|
|
|
|
-function get_and_unzip_uploaded_exercise()
|
|
|
-{
|
|
|
- $backlog_message = array();
|
|
|
-
|
|
|
- //Check if the file is valid (not to big and exists)
|
|
|
-
|
|
|
- if( !isset($_FILES['uploadedExercise'])
|
|
|
- || !is_uploaded_file($_FILES['uploadedExercise']['tmp_name']))
|
|
|
- {
|
|
|
- $backlog_message[] = get_lang('Problem with file upload');
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $backlog_message[] = get_lang('Temporary file is : ') . $_FILES['uploadedExercise']['tmp_name'];
|
|
|
- }
|
|
|
- //1- Unzip folder in a new repository in claroline/module
|
|
|
-
|
|
|
- include_once (realpath(dirname(__FILE__) . '/../../inc/lib/pclzip/') . '/pclzip.lib.php');
|
|
|
-
|
|
|
- //unzip files
|
|
|
-
|
|
|
- $exerciseRepositorySys = get_conf('rootSys') . get_conf('exerciseRepository','cache/');
|
|
|
-
|
|
|
- //create temp dir for upload
|
|
|
- //claro_mkdir($exerciseRepositorySys);
|
|
|
- mkdir($exerciseRepositorySys, api_get_permissions_for_new_directories(), true);
|
|
|
- //
|
|
|
- $uploadDirFullPath = tempdir($exerciseRepositorySys, api_get_permissions_for_new_directories());
|
|
|
- $uploadDir = str_replace($exerciseRepositorySys,'',$uploadDirFullPath);
|
|
|
- $exercisePath = $exerciseRepositorySys.$uploadDir.'/';
|
|
|
-
|
|
|
- if ( preg_match('/.zip$/i', $_FILES['uploadedExercise']['name']) && treat_uploaded_file($_FILES['uploadedExercise'],$exerciseRepositorySys, $uploadDir, get_conf('maxFilledSpaceForExercise' , 10000000),'unzip',true))
|
|
|
- {
|
|
|
- $backlog_message[] = get_lang('Files dezipped sucessfully in ' ) . $exercisePath;
|
|
|
-
|
|
|
- if (!function_exists('gzopen'))
|
|
|
- {
|
|
|
- $backlog_message[] = get_lang('Error : no zlib extension found');
|
|
|
- claro_delete_file($exercisePath);
|
|
|
- return claro_failure::set_failure($backlog_message);
|
|
|
- }
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $backlog_message[] = get_lang('Impossible to unzip file');
|
|
|
- claro_delete_file($exercisePath);
|
|
|
- return claro_failure::set_failure($backlog_message);
|
|
|
- }
|
|
|
-
|
|
|
- return $exercisePath;
|
|
|
+function get_and_unzip_uploaded_exercise($baseWorkDir, $uploadPath) {
|
|
|
+ global $_course, $_user;
|
|
|
+ //Check if the file is valid (not to big and exists)
|
|
|
+ if (!isset ($_FILES['userFile']) || !is_uploaded_file($_FILES['userFile']['tmp_name'])) {
|
|
|
+ // upload failed
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+
|
|
|
+ //1- Unzip folder in a new repository
|
|
|
+ require_once api_get_path(LIBRARY_PATH) . 'pclzip/pclzip.lib.php';
|
|
|
+ if (preg_match('/.zip$/i', $_FILES['userFile']['name']) && handle_uploaded_document($_course, $_FILES['userFile'], $baseWorkDir, $uploadPath, $_user['user_id'], 0, null, 10000000, 1)) {
|
|
|
+ if (!function_exists('gzopen')) {
|
|
|
+ claro_delete_file($uploadPath);
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ // upload successfull
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ claro_delete_file($uploadPath);
|
|
|
+ return false;
|
|
|
+ }
|
|
|
}
|
|
|
/**
|
|
|
* main function to import an exercise,
|
|
@@ -89,512 +60,399 @@ function get_and_unzip_uploaded_exercise()
|
|
|
* @return an array as a backlog of what was really imported, and error or debug messages to display
|
|
|
*/
|
|
|
|
|
|
-function import_exercise($file)
|
|
|
-{
|
|
|
-
|
|
|
- global $exercise_info;
|
|
|
- global $element_pile;
|
|
|
- global $non_HTML_tag_to_avoid;
|
|
|
- global $record_item_body;
|
|
|
- global $backlog_message;
|
|
|
-
|
|
|
- //get required table names
|
|
|
-
|
|
|
- $tbl_cdb_names = claro_sql_get_course_tbl();
|
|
|
- $tbl_quiz_exercise = $tbl_cdb_names['qwz_exercise'];
|
|
|
- $tbl_quiz_question = $tbl_cdb_names['qwz_question'];
|
|
|
-
|
|
|
- //set some default values for the new exercise
|
|
|
-
|
|
|
- $exercise_info = array();
|
|
|
- $exercise_info['name'] = preg_replace('/.zip$/i','' ,$file);
|
|
|
- $exercise_info['description'] = get_lang('undefined description');
|
|
|
- $exercise_info['question'] = array();
|
|
|
- $element_pile = array();
|
|
|
- $backlog_message = array();
|
|
|
-
|
|
|
- //create parser and array to retrieve info from manifest
|
|
|
-
|
|
|
- $element_pile = array(); //pile to known the depth in which we are
|
|
|
- $module_info = array(); //array to store the info we need
|
|
|
-
|
|
|
- //unzip the uploaded file in a tmp directory
|
|
|
-
|
|
|
- $exercisePath = get_and_unzip_uploaded_exercise();
|
|
|
-
|
|
|
- //find the different manifests for each question and parse them.
|
|
|
-
|
|
|
- $exerciseHandle = opendir($exercisePath);
|
|
|
+function import_exercise($file) {
|
|
|
+ global $exercise_info;
|
|
|
+ global $element_pile;
|
|
|
+ global $non_HTML_tag_to_avoid;
|
|
|
+ global $record_item_body;
|
|
|
+ // used to specify the question directory where files could be found in relation in any question
|
|
|
+ global $questionTempDir;
|
|
|
+
|
|
|
+ $archive_path = api_get_path(SYS_ARCHIVE_PATH) . 'qti2';
|
|
|
+ $baseWorkDir = $archive_path;
|
|
|
+
|
|
|
+ if (!is_dir($baseWorkDir)) {
|
|
|
+ mkdir($baseWorkDir, api_get_permissions_for_new_directories(), true);
|
|
|
+ }
|
|
|
+
|
|
|
+ $uploadPath = '/';
|
|
|
+
|
|
|
+ // set some default values for the new exercise
|
|
|
+ $exercise_info = array ();
|
|
|
+ $exercise_info['name'] = preg_replace('/.zip$/i', '', $file);
|
|
|
+ $exercise_info['question'] = array ();
|
|
|
+ $element_pile = array ();
|
|
|
+
|
|
|
+ // create parser and array to retrieve info from manifest
|
|
|
+ $element_pile = array (); //pile to known the depth in which we are
|
|
|
+ $module_info = array (); //array to store the info we need
|
|
|
+
|
|
|
+ // if file is not a .zip, then we cancel all
|
|
|
+ if (!preg_match('/.zip$/i', $file)) {
|
|
|
+ Display :: display_error_message(get_lang('You must upload a zip file'));
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+
|
|
|
+ // unzip the uploaded file in a tmp directory
|
|
|
+ if (!get_and_unzip_uploaded_exercise($baseWorkDir, $uploadPath)) {
|
|
|
+ Display :: display_error_message(get_lang('You must upload a zip file'));
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+
|
|
|
+ // find the different manifests for each question and parse them.
|
|
|
+ $exerciseHandle = opendir($baseWorkDir);
|
|
|
+ //$question_number = 0;
|
|
|
+ $file_found = false;
|
|
|
+ $operation = false;
|
|
|
+
|
|
|
+ // parse every subdirectory to search xml question files
|
|
|
+ while (false !== ($file = readdir($exerciseHandle))) {
|
|
|
+ if (is_dir($baseWorkDir . '/' . $file) && $file != "." && $file != "..") {
|
|
|
+ //find each manifest for each question repository found
|
|
|
+ $questionHandle = opendir($baseWorkDir . '/' . $file);
|
|
|
+ while (false !== ($questionFile = readdir($questionHandle))) {
|
|
|
+ if (preg_match('/.xml$/i', $questionFile)) {
|
|
|
+ parse_file($baseWorkDir, $file, $questionFile);
|
|
|
+ $file_found = true;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ }
|
|
|
+ elseif (preg_match('/.xml$/i', $file)) {
|
|
|
+ parse_file($baseWorkDir, '', $file);
|
|
|
+ $file_found = true;
|
|
|
+ } // else ignore file
|
|
|
+ }
|
|
|
+
|
|
|
+ if (!$file_found) {
|
|
|
+ Display :: display_error_message(get_lang('No XML file found in the zip'));
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+
|
|
|
+ //---------------------
|
|
|
+ //add exercise in tool
|
|
|
+ //---------------------
|
|
|
+
|
|
|
+ //1.create exercise
|
|
|
+ $exercise = new Exercise();
|
|
|
+ $exercise->exercise = $exercise_info['name'];
|
|
|
+ $exercise->save();
|
|
|
+ $last_exercise_id = $exercise->selectId();
|
|
|
+ if (!empty ($last_exercise_id)) {
|
|
|
+ //For each question found...
|
|
|
+ foreach ($exercise_info['question'] as $key => $question_array) {
|
|
|
+ //2.create question
|
|
|
+ $question = new Ims2Question();
|
|
|
+ $question->type = $question_array['type'];
|
|
|
+ $question->setAnswer();
|
|
|
+ $question->updateTitle($question_array['title']); // question ...
|
|
|
+ $type = $question->selectType();
|
|
|
+ $question->type = constant($type); // type ...
|
|
|
+ $question->save($last_exercise_id); // save computed grade
|
|
|
+ $last_question_id = $question->selectId();
|
|
|
+ //3.create answer
|
|
|
+ $answer = new Answer($last_question_id);
|
|
|
+ $answer->new_nbrAnswers = count($question_array['answer']);
|
|
|
+ foreach ($question_array['answer'] as $key => $answers) {
|
|
|
+ $split = explode('_', $key);
|
|
|
+ $i = $split[1];
|
|
|
+ $answer->new_answer[$i] = $answers['value']; // answer ...
|
|
|
+ $answer->new_comment[$i] = $answers['feedback']; // comment ...
|
|
|
+ $answer->new_position[$i] = $i; // position ...
|
|
|
+ // correct answers ...
|
|
|
+ if (in_array($key, $question_array['correct_answers'])) {
|
|
|
+ $answer->new_correct[$i] = 1;
|
|
|
+ } else {
|
|
|
+ $answer->new_correct[$i] = 0;
|
|
|
+ }
|
|
|
+ $answer->new_weighting[$i] = $question_array['weighting'][$key];
|
|
|
+ }
|
|
|
+ $answer->save();
|
|
|
+ }
|
|
|
+ // delete the temp dir where the exercise was unzipped
|
|
|
+ my_delete($baseWorkDir . $uploadPath);
|
|
|
+ $operation = true;
|
|
|
+ }
|
|
|
+ return $operation;
|
|
|
+}
|
|
|
|
|
|
- //find each question repository in the uploaded exercise folder
|
|
|
+function parse_file($exercisePath, $file, $questionFile) {
|
|
|
+ global $exercise_info;
|
|
|
+ global $element_pile;
|
|
|
+ global $non_HTML_tag_to_avoid;
|
|
|
+ global $record_item_body;
|
|
|
+ global $questionTempDir;
|
|
|
+
|
|
|
+ $questionTempDir = $exercisePath . '/' . $file . '/';
|
|
|
+ $questionFilePath = $questionTempDir . $questionFile;
|
|
|
+
|
|
|
+ if (!($fp = @ fopen($questionFilePath, 'r'))) {
|
|
|
+ Display :: display_error_message(get_lang('Error opening question\'s XML file'));
|
|
|
+ return false;
|
|
|
+ } else {
|
|
|
+ $data = fread($fp, filesize($questionFilePath));
|
|
|
+ }
|
|
|
+
|
|
|
+ //parse XML question file
|
|
|
+
|
|
|
+ //used global variable start values declaration :
|
|
|
+
|
|
|
+ $record_item_body = false;
|
|
|
+ $non_HTML_tag_to_avoid = array (
|
|
|
+ "SIMPLECHOICE",
|
|
|
+ "CHOICEINTERACTION",
|
|
|
+ "INLINECHOICEINTERACTION",
|
|
|
+ "INLINECHOICE",
|
|
|
+ "SIMPLEMATCHSET",
|
|
|
+ "SIMPLEASSOCIABLECHOICE",
|
|
|
+ "TEXTENTRYINTERACTION",
|
|
|
+ "FEEDBACKINLINE",
|
|
|
+ "MATCHINTERACTION",
|
|
|
+ "ITEMBODY",
|
|
|
+ "BR",
|
|
|
+ "IMG"
|
|
|
+ );
|
|
|
+
|
|
|
+ //this array to detect tag not supported by claroline import in the xml file to warn the user.
|
|
|
+
|
|
|
+ $non_supported_content_in_question = array (
|
|
|
+ "GAPMATCHINTERACTION",
|
|
|
+ "EXTENDEDTEXTINTERACTION",
|
|
|
+ "HOTTEXTINTERACTION",
|
|
|
+ "HOTSPOTINTERACTION",
|
|
|
+ "SELECTPOINTINTERACTION",
|
|
|
+ "GRAPHICORDERINTERACTION",
|
|
|
+ "GRAPHICASSOCIATIONINTERACTION",
|
|
|
+ "GRAPHICGAPMATCHINTERACTION",
|
|
|
+ "POSITIONOBJECTINTERACTION",
|
|
|
+ "SLIDERINTERACTION",
|
|
|
+ "DRAWINGINTERACTION",
|
|
|
+ "UPLOADINTERACTION",
|
|
|
+ "RESPONSECONDITION",
|
|
|
+ "RESPONSEIF"
|
|
|
+ );
|
|
|
+ $question_format_supported = true;
|
|
|
+
|
|
|
+ $xml_parser = xml_parser_create();
|
|
|
+ xml_parser_set_option($xml_parser, XML_OPTION_SKIP_WHITE, false);
|
|
|
+ xml_set_element_handler($xml_parser, 'startElement', 'endElement');
|
|
|
+ xml_set_character_data_handler($xml_parser, 'elementData');
|
|
|
+
|
|
|
+ if (!xml_parse($xml_parser, $data, feof($fp))) {
|
|
|
+ // if reading of the xml file in not successfull :
|
|
|
+ // set errorFound, set error msg, break while statement
|
|
|
+ Display :: display_error_message(get_lang('Error reading XML file'));
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+
|
|
|
+ //close file
|
|
|
+ fclose($fp);
|
|
|
+ if (!$question_format_supported) {
|
|
|
+ Display :: display_error_message(get_lang('Unknown question format in file %file', array (
|
|
|
+ '%file' => $questionFile
|
|
|
+ )));
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ return true;
|
|
|
+}
|
|
|
|
|
|
- array_push ($backlog_message, get_lang('XML question files found : '));
|
|
|
+/**
|
|
|
+ * Function used by the SAX xml parser when the parser meets a opening tag
|
|
|
+ *
|
|
|
+ * @param unknown_type $parser xml parser created with "xml_parser_create()"
|
|
|
+ * @param unknown_type $name name of the element
|
|
|
+ * @param unknown_type $attributes
|
|
|
+ */
|
|
|
|
|
|
- $question_number = 0;
|
|
|
+function startElement($parser, $name, $attributes) {
|
|
|
+ global $element_pile;
|
|
|
+ global $exercise_info;
|
|
|
+ global $current_question_ident;
|
|
|
+ global $current_answer_id;
|
|
|
+ global $current_match_set;
|
|
|
+ global $currentAssociableChoice;
|
|
|
+ global $current_question_item_body;
|
|
|
+ global $record_item_body;
|
|
|
+ global $non_HTML_tag_to_avoid;
|
|
|
+ global $current_inlinechoice_id;
|
|
|
+ global $cardinality;
|
|
|
+ global $questionTempDir;
|
|
|
+
|
|
|
+ array_push($element_pile, $name);
|
|
|
+ $current_element = end($element_pile);
|
|
|
+ if (sizeof($element_pile) >= 2)
|
|
|
+ $parent_element = $element_pile[sizeof($element_pile) - 2];
|
|
|
+ else
|
|
|
+ $parent_element = "";
|
|
|
+ if (sizeof($element_pile) >= 3)
|
|
|
+ $grant_parent_element = $element_pile[sizeof($element_pile) - 3];
|
|
|
+ else
|
|
|
+ $grant_parent_element = "";
|
|
|
+
|
|
|
+ if ($record_item_body) {
|
|
|
+
|
|
|
+ if ((!in_array($current_element, $non_HTML_tag_to_avoid))) {
|
|
|
+ $current_question_item_body .= "<" . $name;
|
|
|
+
|
|
|
+ foreach ($attributes as $attribute_name => $attribute_value) {
|
|
|
+ $current_question_item_body .= " " . $attribute_name . "=\"" . $attribute_value . "\"";
|
|
|
+ }
|
|
|
+ $current_question_item_body .= ">";
|
|
|
+ } else {
|
|
|
+ //in case of FIB question, we replace the IMS-QTI tag b y the correct answer between "[" "]",
|
|
|
+ //we first save with claroline tags ,then when the answer will be parsed, the claroline tags will be replaced
|
|
|
|
|
|
- //used to specify the question directory where files could be found in relation in any question
|
|
|
+ if ($current_element == 'INLINECHOICEINTERACTION') {
|
|
|
|
|
|
- global $questionTempDir;
|
|
|
+ $current_question_item_body .= "**claroline_start**" . $attributes['RESPONSEIDENTIFIER'] . "**claroline_end**";
|
|
|
+ }
|
|
|
+ if ($current_element == 'TEXTENTRYINTERACTION') {
|
|
|
+ $correct_answer_value = $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id];
|
|
|
+ $current_question_item_body .= "[" . $correct_answer_value . "]";
|
|
|
|
|
|
+ }
|
|
|
+ if ($current_element == 'BR') {
|
|
|
+ $current_question_item_body .= "<BR/>";
|
|
|
+ }
|
|
|
+ }
|
|
|
|
|
|
- //1- parse the parent directory
|
|
|
+ }
|
|
|
|
|
|
- $questionHandle = opendir($exercisePath);
|
|
|
+ switch ($current_element) {
|
|
|
+ case 'ASSESSMENTITEM' :
|
|
|
+ {
|
|
|
+ //retrieve current question
|
|
|
+
|
|
|
+ $current_question_ident = $attributes['IDENTIFIER'];
|
|
|
+ $exercise_info['question'][$current_question_ident] = array ();
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'] = array ();
|
|
|
+ $exercise_info['question'][$current_question_ident]['correct_answers'] = array ();
|
|
|
+ $exercise_info['question'][$current_question_ident]['title'] = $attributes['TITLE'];
|
|
|
+ $exercise_info['question'][$current_question_ident]['tempdir'] = $questionTempDir;
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- while (false !== ($questionFile = readdir($questionHandle)))
|
|
|
- {
|
|
|
- if (preg_match('/.xml$/i' ,$questionFile))
|
|
|
- {
|
|
|
- array_push ($backlog_message, get_lang("XML question file found : ".$questionFile));
|
|
|
- parse_file($exercisePath, '', $questionFile);
|
|
|
- }//end if xml question file found
|
|
|
- }//end while question rep
|
|
|
+ case 'SECTION' :
|
|
|
+ {
|
|
|
+ //retrieve exercise name
|
|
|
|
|
|
+ $exercise_info['name'] = $attributes['TITLE'];
|
|
|
|
|
|
- //2- parse every subdirectory to search xml question files
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- while (false !== ($file = readdir($exerciseHandle)))
|
|
|
- {
|
|
|
+ case 'RESPONSEDECLARATION' :
|
|
|
+ {
|
|
|
+ //retrieve question type
|
|
|
|
|
|
- if (is_dir($exercisePath.$file) && $file != "." && $file != "..")
|
|
|
- {
|
|
|
- //find each manifest for each question repository found
|
|
|
+ if ("multiple" == $attributes['CARDINALITY']) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['type'] = 'MCMA';
|
|
|
+ $cardinality = 'multiple';
|
|
|
+ }
|
|
|
+ if ("single" == $attributes['CARDINALITY']) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['type'] = 'MCUA';
|
|
|
+ $cardinality = 'single';
|
|
|
+ }
|
|
|
|
|
|
- $questionHandle = opendir($exercisePath.$file);
|
|
|
+ //needed for FIB
|
|
|
|
|
|
- while (false !== ($questionFile = readdir($questionHandle)))
|
|
|
- {
|
|
|
- if (preg_match('/.xml$/i' ,$questionFile))
|
|
|
- {
|
|
|
- parse_file($exercisePath, $file, $questionFile);
|
|
|
- }//end if xml question file found
|
|
|
- }//end while question rep
|
|
|
- } //if is_dir
|
|
|
- }//end while loop to find each question data's
|
|
|
+ $current_answer_id = $attributes['IDENTIFIER'];
|
|
|
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- //Display data found
|
|
|
+ case 'INLINECHOICEINTERACTION' :
|
|
|
+ {
|
|
|
+ $exercise_info['question'][$current_question_ident]['type'] = 'FIB';
|
|
|
+ $exercise_info['question'][$current_question_ident]['subtype'] = 'LISTBOX_FILL';
|
|
|
+ $current_answer_id = $attributes['RESPONSEIDENTIFIER'];
|
|
|
|
|
|
- array_push ($backlog_message, 'Exercise name : <b>' . $exercise_info['name'] . '</b>');
|
|
|
- array_push ($backlog_message, 'Exercise description : ' . $exercise_info['description']);
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- foreach ($exercise_info['question'] as $key => $question)
|
|
|
- {
|
|
|
- $question_number++;
|
|
|
- array_push ($backlog_message, '<b>'.$question_number.'-</b> Question found (' .$key. ') : <b>' . $question['title'] . '</b>');
|
|
|
- if (isset($question['statement'])) array_push ($backlog_message, '* Statement : ' . $question['statement']);
|
|
|
- array_push ($backlog_message, '* Type : ' . $question['type']);
|
|
|
+ case 'INLINECHOICE' :
|
|
|
+ {
|
|
|
+ $current_inlinechoice_id = $attributes['IDENTIFIER'];
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- foreach ($exercise_info['question'][$key]['answer'] as $answer)
|
|
|
- {
|
|
|
- if ($question['type']=="MATCHING")
|
|
|
- {
|
|
|
- array_push ($backlog_message, '** Matchset : ');
|
|
|
- foreach ($answer as $matchSetElement)
|
|
|
- {
|
|
|
- array_push ($backlog_message, '*** Element ' . $matchSetElement);
|
|
|
- }
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- array_push ($backlog_message, '** Answer found : ' . $answer['value']);
|
|
|
- if (isset($answer['feedback'])) array_push ($backlog_message, '*** Answer feedback : ' . $answer['feedback']);
|
|
|
- }
|
|
|
- }
|
|
|
+ case 'TEXTENTRYINTERACTION' :
|
|
|
+ {
|
|
|
+ $exercise_info['question'][$current_question_ident]['type'] = 'FIB';
|
|
|
+ $exercise_info['question'][$current_question_ident]['subtype'] = 'TEXTFIELD_FILL';
|
|
|
+ $exercise_info['question'][$current_question_ident]['response_text'] = $current_question_item_body;
|
|
|
|
|
|
- if (isset($question['weighting']))
|
|
|
- {
|
|
|
- array_push ($backlog_message, '* WEIGHTING for Answers :');
|
|
|
- foreach ($question['weighting'] as $key => $weighting)
|
|
|
- {
|
|
|
- array_push ($backlog_message, '** Answer : '.$key.' ==> weighting : '.$weighting);
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- if (isset($question['correct_answers']))
|
|
|
- {
|
|
|
- array_push ($backlog_message, '* CORRECT ANSWERS :');
|
|
|
- foreach ($question['correct_answers'] as $answerIdent)
|
|
|
- {
|
|
|
- array_push ($backlog_message, '* Answer : '.$answerIdent);
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- if (isset($question['response_text']))
|
|
|
- {
|
|
|
- array_push ($backlog_message, '* Text to fill in : '.$question['response_text'] );
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- //---------------------
|
|
|
- //add exercise in tool
|
|
|
- //---------------------
|
|
|
-
|
|
|
- //1.create exercise
|
|
|
-
|
|
|
- $exercise = new Exercise();
|
|
|
-
|
|
|
- $exercise->setTitle($exercise_info['name']);
|
|
|
- $exercise->setDescription($exercise_info['description']);
|
|
|
-
|
|
|
- if ($exercise->validate())
|
|
|
- {
|
|
|
- $exercise_id = $exercise->save();
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- array_push ($backlog_message, 'EXERCISE DATA INVALID !!!');
|
|
|
- }
|
|
|
-
|
|
|
- //For each question found...
|
|
|
-
|
|
|
- foreach($exercise_info['question'] as $key => $question_array)
|
|
|
- {
|
|
|
- //2.create question
|
|
|
-
|
|
|
- $question = new ImsQuestion();
|
|
|
-
|
|
|
- if (isset($question_array['title'])) $question->setTitle($question_array['title']);
|
|
|
- if (isset($question_array['statement'])) $question->setDescription($question_array['statement']);
|
|
|
- $question->setType($question_array['type']);
|
|
|
-
|
|
|
- if ($question->validate())
|
|
|
- {
|
|
|
- $question_id = $question->save();
|
|
|
-
|
|
|
- if ($question_id)
|
|
|
- {
|
|
|
- //3.create answers
|
|
|
-
|
|
|
- $question->setAnswer();
|
|
|
- $question->import($exercise_info['question'][$key], $exercise_info['question'][$key]['tempdir']);
|
|
|
- $exercise->addQuestion($question_id);
|
|
|
- $question->answer->save();
|
|
|
- $question->save();
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- array_push ($backlog_message, 'IMPOSSIBLE TO SAVE QUESTION !!!');
|
|
|
- }
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- array_push ($backlog_message, 'QUESTION DATA INVALID !!!');
|
|
|
- }
|
|
|
- }
|
|
|
- $link = "<center><a href=\"../exercise_submit.php?gradebook=$gradebook&exId=".$exercise_id."\">".get_lang('See the exercise')."</a></center>";
|
|
|
- array_push ($backlog_message, $link);
|
|
|
-
|
|
|
- //delete the temp dir where the exercise was unzipped
|
|
|
-
|
|
|
- claro_delete_file($exercisePath);
|
|
|
-
|
|
|
- return $backlog_message;
|
|
|
-}
|
|
|
+ //replace claroline tags
|
|
|
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
+ case 'MATCHINTERACTION' :
|
|
|
+ {
|
|
|
+ $exercise_info['question'][$current_question_ident]['type'] = 'MATCHING';
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
-function parse_file($exercisePath, $file, $questionFile)
|
|
|
-{
|
|
|
- global $exercise_info;
|
|
|
- global $element_pile;
|
|
|
- global $non_HTML_tag_to_avoid;
|
|
|
- global $record_item_body;
|
|
|
-
|
|
|
- $questionTempDir = $exercisePath.$file.'/';
|
|
|
- $questionFilePath = $questionTempDir.$questionFile;
|
|
|
- $backlog_message = array();
|
|
|
- array_push ($backlog_message, "* ".$questionFile);
|
|
|
-
|
|
|
- if (!($fp = @fopen($questionFilePath, 'r')))
|
|
|
- {
|
|
|
- array_push ($backlog_message, get_lang("Error opening question's XML file"));
|
|
|
- return $backlog_message;
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $data = fread($fp, filesize( $questionFilePath));
|
|
|
- }
|
|
|
-
|
|
|
- //parse XML question file
|
|
|
-
|
|
|
- //used global variable start values declaration :
|
|
|
-
|
|
|
- $record_item_body = false;
|
|
|
- $non_HTML_tag_to_avoid = array(
|
|
|
- "SIMPLECHOICE",
|
|
|
- "CHOICEINTERACTION",
|
|
|
- "INLINECHOICEINTERACTION",
|
|
|
- "INLINECHOICE",
|
|
|
- "SIMPLEMATCHSET",
|
|
|
- "SIMPLEASSOCIABLECHOICE",
|
|
|
- "TEXTENTRYINTERACTION",
|
|
|
- "FEEDBACKINLINE",
|
|
|
- "MATCHINTERACTION",
|
|
|
- "ITEMBODY",
|
|
|
- "BR",
|
|
|
- "IMG"
|
|
|
- );
|
|
|
-
|
|
|
- //this array to detect tag not supported by claroline import in the xml file to warn the user.
|
|
|
-
|
|
|
- $non_supported_content_in_question = array(
|
|
|
- "GAPMATCHINTERACTION",
|
|
|
- "EXTENDEDTEXTINTERACTION",
|
|
|
- "HOTTEXTINTERACTION",
|
|
|
- "HOTSPOTINTERACTION",
|
|
|
- "SELECTPOINTINTERACTION",
|
|
|
- "GRAPHICORDERINTERACTION",
|
|
|
- "GRAPHICASSOCIATIONINTERACTION",
|
|
|
- "GRAPHICGAPMATCHINTERACTION",
|
|
|
- "POSITIONOBJECTINTERACTION",
|
|
|
- "SLIDERINTERACTION",
|
|
|
- "DRAWINGINTERACTION",
|
|
|
- "UPLOADINTERACTION",
|
|
|
- "RESPONSECONDITION",
|
|
|
- "RESPONSEIF"
|
|
|
- );
|
|
|
- $question_format_supported = true;
|
|
|
-
|
|
|
- $xml_parser = xml_parser_create();
|
|
|
- xml_set_element_handler($xml_parser, 'startElement', 'endElement');
|
|
|
- xml_set_character_data_handler($xml_parser, 'elementData');
|
|
|
-
|
|
|
- if (!xml_parse($xml_parser, $data, feof($fp)))
|
|
|
- {
|
|
|
- // if reading of the xml file in not successfull :
|
|
|
- // set errorFound, set error msg, break while statement
|
|
|
-
|
|
|
- array_push ($backlog_message, get_lang('Error reading XML file') );
|
|
|
- return $backlog_message;
|
|
|
- }
|
|
|
-
|
|
|
- //close file
|
|
|
-
|
|
|
- fclose($fp);
|
|
|
-
|
|
|
- if ($question_format_supported)
|
|
|
- {
|
|
|
- array_push ($backlog_message, get_lang('Question format found') );
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- array_push ($backlog_message, get_lang('ERROR in:<b>'.$questionFile.'</b> Question format unknown') );
|
|
|
- }
|
|
|
-}
|
|
|
+ case 'SIMPLEMATCHSET' :
|
|
|
+ {
|
|
|
+ if (!isset ($current_match_set)) {
|
|
|
+ $current_match_set = 1;
|
|
|
+ } else {
|
|
|
+ $current_match_set++;
|
|
|
+ }
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_match_set] = array ();
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
+ case 'SIMPLEASSOCIABLECHOICE' :
|
|
|
+ {
|
|
|
+ $currentAssociableChoice = $attributes['IDENTIFIER'];
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
-/**
|
|
|
- * Function used by the SAX xml parser when the parser meets a opening tag
|
|
|
- *
|
|
|
- * @param unknown_type $parser xml parser created with "xml_parser_create()"
|
|
|
- * @param unknown_type $name name of the element
|
|
|
- * @param unknown_type $attributes
|
|
|
- */
|
|
|
+ //retrieve answers id for MCUA and MCMA questions
|
|
|
|
|
|
-function startElement($parser, $name, $attributes)
|
|
|
-{
|
|
|
- global $element_pile;
|
|
|
- global $exercise_info;
|
|
|
- global $current_question_ident;
|
|
|
- global $current_answer_id;
|
|
|
- global $current_match_set;
|
|
|
- global $currentAssociableChoice;
|
|
|
- global $current_question_item_body;
|
|
|
- global $record_item_body;
|
|
|
- global $non_HTML_tag_to_avoid;
|
|
|
- global $current_inlinechoice_id;
|
|
|
- global $cardinality;
|
|
|
- global $questionTempDir;
|
|
|
-
|
|
|
- array_push($element_pile,$name);
|
|
|
- $current_element = end($element_pile);
|
|
|
- if (sizeof($element_pile)>=2) $parent_element = $element_pile[sizeof($element_pile)-2]; else $parent_element = "";
|
|
|
- if (sizeof($element_pile)>=3) $grant_parent_element = $element_pile[sizeof($element_pile)-3]; else $grant_parent_element ="";
|
|
|
-
|
|
|
- if ($record_item_body)
|
|
|
- {
|
|
|
-
|
|
|
- if ((!in_array($current_element,$non_HTML_tag_to_avoid)))
|
|
|
- {
|
|
|
- $current_question_item_body .= "<".$name;
|
|
|
-
|
|
|
- foreach ($attributes as $attribute_name => $attribute_value)
|
|
|
- {
|
|
|
- $current_question_item_body .= " ".$attribute_name."=\"".$attribute_value."\"";
|
|
|
- }
|
|
|
- $current_question_item_body .= ">";
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- //in case of FIB question, we replace the IMS-QTI tag b y the correct answer between "[" "]",
|
|
|
- //we first save with claroline tags ,then when the answer will be parsed, the claroline tags will be replaced
|
|
|
-
|
|
|
- if ($current_element=='INLINECHOICEINTERACTION')
|
|
|
- {
|
|
|
-
|
|
|
- $current_question_item_body .="**claroline_start**".$attributes['RESPONSEIDENTIFIER']."**claroline_end**";
|
|
|
- }
|
|
|
- if ($current_element=='TEXTENTRYINTERACTION')
|
|
|
- {
|
|
|
- $correct_answer_value = $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id];
|
|
|
- $current_question_item_body .= "[".$correct_answer_value."]";
|
|
|
-
|
|
|
- }
|
|
|
- if ($current_element=='BR')
|
|
|
- {
|
|
|
- $current_question_item_body .= "<BR/>";
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- }
|
|
|
-
|
|
|
- switch ($current_element)
|
|
|
- {
|
|
|
- case 'ASSESSMENTITEM' :
|
|
|
- {
|
|
|
- //retrieve current question
|
|
|
-
|
|
|
- $current_question_ident = $attributes['IDENTIFIER'];
|
|
|
- $exercise_info['question'][$current_question_ident] = array();
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'] = array();
|
|
|
- $exercise_info['question'][$current_question_ident]['correct_answers'] = array();
|
|
|
- $exercise_info['question'][$current_question_ident]['title'] = $attributes['TITLE'];
|
|
|
- $exercise_info['question'][$current_question_ident]['tempdir'] = $questionTempDir;
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'SECTION' :
|
|
|
- {
|
|
|
- //retrieve exercise name
|
|
|
-
|
|
|
- $exercise_info['name'] = $attributes['TITLE'];
|
|
|
-
|
|
|
- }
|
|
|
- break;
|
|
|
+ case 'SIMPLECHOICE' :
|
|
|
+ {
|
|
|
+ $current_answer_id = $attributes['IDENTIFIER'];
|
|
|
+ if (!isset ($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id] = array ();
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- case 'RESPONSEDECLARATION' :
|
|
|
- {
|
|
|
- //retrieve question type
|
|
|
+ case 'MAPENTRY' :
|
|
|
+ {
|
|
|
+ if ($parent_element == "MAPPING") {
|
|
|
+ $answer_id = $attributes['MAPKEY'];
|
|
|
+
|
|
|
+ if (!isset ($exercise_info['question'][$current_question_ident]['weighting'])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['weighting'] = array ();
|
|
|
+ }
|
|
|
+ $exercise_info['question'][$current_question_ident]['weighting'][$answer_id] = $attributes['MAPPEDVALUE'];
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
|
|
|
- if ( "multiple" == $attributes['CARDINALITY'])
|
|
|
+ case 'MAPPING' :
|
|
|
{
|
|
|
- $exercise_info['question'][$current_question_ident]['type'] = 'MCMA';
|
|
|
- $cardinality = 'multiple';
|
|
|
+ if (isset ($attributes['DEFAULTVALUE'])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['default_weighting'] = $attributes['DEFAULTVALUE'];
|
|
|
+ }
|
|
|
}
|
|
|
- if ( "single" == $attributes['CARDINALITY'])
|
|
|
+
|
|
|
+ case 'ITEMBODY' :
|
|
|
{
|
|
|
- $exercise_info['question'][$current_question_ident]['type'] = 'MCUA';
|
|
|
- $cardinality = 'single';
|
|
|
+ $record_item_body = true;
|
|
|
+ $current_question_item_body = '';
|
|
|
}
|
|
|
+ break;
|
|
|
|
|
|
- //needed for FIB
|
|
|
-
|
|
|
- $current_answer_id = $attributes['IDENTIFIER'];
|
|
|
-
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'INLINECHOICEINTERACTION' :
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['type'] = 'FIB';
|
|
|
- $exercise_info['question'][$current_question_ident]['subtype'] = 'LISTBOX_FILL';
|
|
|
- $current_answer_id = $attributes['RESPONSEIDENTIFIER'];
|
|
|
-
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'INLINECHOICE' :
|
|
|
- {
|
|
|
- $current_inlinechoice_id = $attributes['IDENTIFIER'];
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'TEXTENTRYINTERACTION' :
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['type'] = 'FIB';
|
|
|
- $exercise_info['question'][$current_question_ident]['subtype'] = 'TEXTFIELD_FILL';
|
|
|
- $exercise_info['question'][$current_question_ident]['response_text'] = $current_question_item_body;
|
|
|
-
|
|
|
- //replace claroline tags
|
|
|
-
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'MATCHINTERACTION' :
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['type'] = 'MATCHING';
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'SIMPLEMATCHSET' :
|
|
|
- {
|
|
|
- if (!isset($current_match_set))
|
|
|
- {
|
|
|
- $current_match_set = 1;
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $current_match_set++;
|
|
|
- }
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_match_set] = array();
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'SIMPLEASSOCIABLECHOICE' :
|
|
|
- {
|
|
|
- $currentAssociableChoice = $attributes['IDENTIFIER'];
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- //retrieve answers id for MCUA and MCMA questions
|
|
|
-
|
|
|
- case 'SIMPLECHOICE':
|
|
|
- {
|
|
|
- $current_answer_id = $attributes['IDENTIFIER'];
|
|
|
- if (!isset($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id] = array();
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'MAPENTRY':
|
|
|
- {
|
|
|
- if ($parent_element == "MAPPING")
|
|
|
- {
|
|
|
- $answer_id = $attributes['MAPKEY'];
|
|
|
-
|
|
|
- if (!isset($exercise_info['question'][$current_question_ident]['weighting']))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['weighting'] = array();
|
|
|
- }
|
|
|
- $exercise_info['question'][$current_question_ident]['weighting'][$answer_id] = $attributes['MAPPEDVALUE'];
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'MAPPING':
|
|
|
- {
|
|
|
- if (isset($attributes['DEFAULTVALUE']))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['default_weighting'] = $attributes['DEFAULTVALUE'];
|
|
|
- }
|
|
|
- }
|
|
|
-
|
|
|
- case 'ITEMBODY':
|
|
|
- {
|
|
|
- $record_item_body = true;
|
|
|
- $current_question_item_body = '';
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'IMG' :
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['attached_file_url'] = $attributes['SRC'];
|
|
|
- }
|
|
|
- break;
|
|
|
- }
|
|
|
+ case 'IMG' :
|
|
|
+ {
|
|
|
+ $exercise_info['question'][$current_question_ident]['attached_file_url'] = $attributes['SRC'];
|
|
|
+ }
|
|
|
+ break;
|
|
|
+ }
|
|
|
}
|
|
|
|
|
|
/**
|
|
@@ -604,150 +462,134 @@ function startElement($parser, $name, $attributes)
|
|
|
* @param $name name of the element
|
|
|
*/
|
|
|
|
|
|
-function endElement($parser,$name)
|
|
|
-{
|
|
|
- global $element_pile;
|
|
|
- global $exercise_info;
|
|
|
+function endElement($parser, $name) {
|
|
|
+ global $element_pile;
|
|
|
+ global $exercise_info;
|
|
|
global $current_question_ident;
|
|
|
- global $record_item_body;
|
|
|
- global $current_question_item_body;
|
|
|
- global $non_HTML_tag_to_avoid;
|
|
|
- global $cardinality;
|
|
|
+ global $record_item_body;
|
|
|
+ global $current_question_item_body;
|
|
|
+ global $non_HTML_tag_to_avoid;
|
|
|
+ global $cardinality;
|
|
|
|
|
|
$current_element = end($element_pile);
|
|
|
|
|
|
- //treat the record of the full content of itembody tag :
|
|
|
-
|
|
|
- if ($record_item_body && (!in_array($current_element,$non_HTML_tag_to_avoid)))
|
|
|
- {
|
|
|
- $current_question_item_body .= "</".$name.">";
|
|
|
- }
|
|
|
-
|
|
|
- switch ($name)
|
|
|
- {
|
|
|
- case 'ITEMBODY':
|
|
|
- {
|
|
|
- $record_item_body = false;
|
|
|
- if ($exercise_info['question'][$current_question_ident]['type']=='FIB')
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['response_text'] = $current_question_item_body;
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['statement'] = $current_question_item_body;
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
- }
|
|
|
- array_pop($element_pile);
|
|
|
+ //treat the record of the full content of itembody tag :
|
|
|
+
|
|
|
+ if ($record_item_body && (!in_array($current_element, $non_HTML_tag_to_avoid))) {
|
|
|
+ $current_question_item_body .= "</" . $name . ">";
|
|
|
+ }
|
|
|
+
|
|
|
+ switch ($name) {
|
|
|
+ case 'ITEMBODY' :
|
|
|
+ {
|
|
|
+ $record_item_body = false;
|
|
|
+ if ($exercise_info['question'][$current_question_ident]['type'] == 'FIB') {
|
|
|
+ $exercise_info['question'][$current_question_ident]['response_text'] = $current_question_item_body;
|
|
|
+ } else {
|
|
|
+ $exercise_info['question'][$current_question_ident]['statement'] = $current_question_item_body;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
+ }
|
|
|
+ array_pop($element_pile);
|
|
|
|
|
|
}
|
|
|
|
|
|
-function elementData($parser,$data)
|
|
|
-{
|
|
|
+function elementData($parser, $data) {
|
|
|
|
|
|
- global $element_pile;
|
|
|
- global $exercise_info;
|
|
|
+ global $element_pile;
|
|
|
+ global $exercise_info;
|
|
|
global $current_question_ident;
|
|
|
- global $current_answer_id;
|
|
|
- global $current_match_set;
|
|
|
- global $currentAssociableChoice;
|
|
|
- global $current_question_item_body;
|
|
|
- global $record_item_body;
|
|
|
- global $non_HTML_tag_to_avoid;
|
|
|
- global $current_inlinechoice_id;
|
|
|
- global $cardinality;
|
|
|
-
|
|
|
- $current_element = end($element_pile);
|
|
|
- if (sizeof($element_pile)>=2) $parent_element = $element_pile[sizeof($element_pile)-2]; else $parent_element = "";
|
|
|
- if (sizeof($element_pile)>=3) $grant_parent_element = $element_pile[sizeof($element_pile)-3]; else $grant_parent_element = "";
|
|
|
+ global $current_answer_id;
|
|
|
+ global $current_match_set;
|
|
|
+ global $currentAssociableChoice;
|
|
|
+ global $current_question_item_body;
|
|
|
+ global $record_item_body;
|
|
|
+ global $non_HTML_tag_to_avoid;
|
|
|
+ global $current_inlinechoice_id;
|
|
|
+ global $cardinality;
|
|
|
+
|
|
|
+ $current_element = end($element_pile);
|
|
|
+ if (sizeof($element_pile) >= 2)
|
|
|
+ $parent_element = $element_pile[sizeof($element_pile) - 2];
|
|
|
+ else
|
|
|
+ $parent_element = "";
|
|
|
+ if (sizeof($element_pile) >= 3)
|
|
|
+ $grant_parent_element = $element_pile[sizeof($element_pile) - 3];
|
|
|
+ else
|
|
|
+ $grant_parent_element = "";
|
|
|
|
|
|
//treat the record of the full content of itembody tag (needed for question statment and/or FIB text:
|
|
|
|
|
|
- if ($record_item_body && (!in_array($current_element,$non_HTML_tag_to_avoid)))
|
|
|
- {
|
|
|
- $current_question_item_body .= $data;
|
|
|
- }
|
|
|
-
|
|
|
- switch ($current_element)
|
|
|
- {
|
|
|
- case 'SIMPLECHOICE':
|
|
|
- {
|
|
|
- if (!isset($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value']))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value'] = trim($data);
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value'] .= ' '.trim($data);
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'FEEDBACKINLINE' :
|
|
|
- {
|
|
|
- if (!isset($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback']))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback'] = trim($data);
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback'] .= ' '.trim($data);
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'SIMPLEASSOCIABLECHOICE' :
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['answer'][$current_match_set][$currentAssociableChoice] = trim($data);
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'VALUE':
|
|
|
- {
|
|
|
- if ($parent_element=="CORRECTRESPONSE")
|
|
|
- {
|
|
|
- if ($cardinality=="single")
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id] = $data;
|
|
|
- }
|
|
|
- else
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['correct_answers'][] = $data;
|
|
|
- }
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'ITEMBODY' :
|
|
|
- {
|
|
|
- $current_question_item_body .= $data;
|
|
|
-
|
|
|
- }
|
|
|
- break;
|
|
|
-
|
|
|
- case 'INLINECHOICE' :
|
|
|
- {
|
|
|
-
|
|
|
- // if this is the right answer, then we must replace the claroline tags in the FIB text bye the answer between "[" and "]" :
|
|
|
-
|
|
|
- $answer_identifier = $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id];
|
|
|
-
|
|
|
- if ($current_inlinechoice_id == $answer_identifier)
|
|
|
- {
|
|
|
-
|
|
|
- $current_question_item_body = str_replace("**claroline_start**".$current_answer_id."**claroline_end**", "[".$data."]", $current_question_item_body);
|
|
|
- }
|
|
|
- else // save wrong answers in an array
|
|
|
- {
|
|
|
- if(!isset($exercise_info['question'][$current_question_ident]['wrong_answers']))
|
|
|
- {
|
|
|
- $exercise_info['question'][$current_question_ident]['wrong_answers'] = array();
|
|
|
- }
|
|
|
- $exercise_info['question'][$current_question_ident]['wrong_answers'][] = $data;
|
|
|
- }
|
|
|
- }
|
|
|
- break;
|
|
|
- }
|
|
|
+ if ($record_item_body && (!in_array($current_element, $non_HTML_tag_to_avoid))) {
|
|
|
+ $current_question_item_body .= $data;
|
|
|
+ }
|
|
|
+
|
|
|
+ switch ($current_element) {
|
|
|
+ case 'SIMPLECHOICE' :
|
|
|
+ {
|
|
|
+ if (!isset ($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value'])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value'] = trim($data);
|
|
|
+ } else {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['value'] .= ' ' . trim($data);
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
+
|
|
|
+ case 'FEEDBACKINLINE' :
|
|
|
+ {
|
|
|
+ if (!isset ($exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback'])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback'] = trim($data);
|
|
|
+ } else {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_answer_id]['feedback'] .= ' ' . trim($data);
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
+
|
|
|
+ case 'SIMPLEASSOCIABLECHOICE' :
|
|
|
+ {
|
|
|
+ $exercise_info['question'][$current_question_ident]['answer'][$current_match_set][$currentAssociableChoice] = trim($data);
|
|
|
+ }
|
|
|
+ break;
|
|
|
+
|
|
|
+ case 'VALUE' :
|
|
|
+ {
|
|
|
+ if ($parent_element == "CORRECTRESPONSE") {
|
|
|
+ if ($cardinality == "single") {
|
|
|
+ $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id] = $data;
|
|
|
+ } else {
|
|
|
+ $exercise_info['question'][$current_question_ident]['correct_answers'][] = $data;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
+
|
|
|
+ case 'ITEMBODY' :
|
|
|
+ {
|
|
|
+ $current_question_item_body .= $data;
|
|
|
+
|
|
|
+ }
|
|
|
+ break;
|
|
|
+
|
|
|
+ case 'INLINECHOICE' :
|
|
|
+ {
|
|
|
+
|
|
|
+ // if this is the right answer, then we must replace the claroline tags in the FIB text bye the answer between "[" and "]" :
|
|
|
+
|
|
|
+ $answer_identifier = $exercise_info['question'][$current_question_ident]['correct_answers'][$current_answer_id];
|
|
|
+
|
|
|
+ if ($current_inlinechoice_id == $answer_identifier) {
|
|
|
+
|
|
|
+ $current_question_item_body = str_replace("**claroline_start**" . $current_answer_id . "**claroline_end**", "[" . $data . "]", $current_question_item_body);
|
|
|
+ } else // save wrong answers in an array
|
|
|
+ {
|
|
|
+ if (!isset ($exercise_info['question'][$current_question_ident]['wrong_answers'])) {
|
|
|
+ $exercise_info['question'][$current_question_ident]['wrong_answers'] = array ();
|
|
|
+ }
|
|
|
+ $exercise_info['question'][$current_question_ident]['wrong_answers'][] = $data;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ break;
|
|
|
+ }
|
|
|
}
|
|
|
?>
|