backup/cc/entity.quiz.class.php

   1 <?php
   2 // This file is part of Moodle - http://moodle.org/
   3 //
   4 // Moodle is free software: you can redistribute it and/or modify
   5 // it under the terms of the GNU General Public License as published by
   6 // the Free Software Foundation, either version 3 of the License, or
   7 // (at your option) any later version.
   8 //
   9 // Moodle is distributed in the hope that it will be useful,
  10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 // GNU General Public License for more details.
  13 //
  14 // You should have received a copy of the GNU General Public License
  15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  16 /**
  17  * @package   moodlecore
  18  * @subpackage backup-imscc
  19  * @copyright 2009 Mauro Rondinelli (mauro.rondinelli [AT] uvcms.com)
  20  * @copyright 2011 Darko Miletic (dmiletic@moodlerooms.com)
  21  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  22  */
  23
  24 defined('MOODLE_INTERNAL') or die('Direct access to this script is forbidden.');
  25
  26 class cc_quiz extends entities {
  27
  28     public function generate_node_question_categories () {
  29
  30         $instances = $this->generate_instances();
  31
  32         $node_course_question_categories = $this->create_node_course_question_categories($instances);
  33         $node_course_question_categories = empty($node_course_question_categories) ? '' : $node_course_question_categories;
  34
  35         return $node_course_question_categories;
  36
  37     }
  38
  39     public function generate_node_course_modules_mod () {
  40
  41         cc2moodle::log_action('Creating Quiz mods');
  42
  43         $node_course_modules_mod = '';
  44         $instances = $this->generate_instances();
  45
  46         if (!empty($instances)) {
  47             foreach ($instances as $instance) {
  48                 if ($instance['is_question_bank'] == 0) {
  49                     $node_course_modules_mod .= $this->create_node_course_modules_mod($instance);
  50                 }
  51             }
  52         }
  53
  54         return $node_course_modules_mod;
  55
  56     }
  57
  58     private function create_node_course_modules_mod_quiz_feedback () {
  59
  60         $sheet_question_mod_feedback = cc2moodle::loadsheet(SHEET_COURSE_SECTIONS_SECTION_MODS_MOD_QUIZ_FEEDBACK);
  61
  62         return $sheet_question_mod_feedback;
  63     }
  64
  65     private function generate_instances () {
  66
  67         $last_instance_id = 0;
  68         $last_question_id = 0;
  69         $last_answer_id = 0;
  70
  71         $instances = '';
  72
  73         $types = array(MOODLE_TYPE_QUIZ, MOODLE_TYPE_QUESTION_BANK);
  74
  75         foreach ($types as $type) {
  76
  77             if (!empty(cc2moodle::$instances['instances'][$type])) {
  78
  79                 foreach (cc2moodle::$instances['instances'][$type] as $instance) {
  80
  81                     if ($type == MOODLE_TYPE_QUIZ) {
  82                         $is_question_bank = 0;
  83                     } else {
  84                         $is_question_bank = 1;
  85                     }
  86
  87                     $assessment_file = $this->get_external_xml($instance['resource_indentifier']);
  88
  89                     if (!empty($assessment_file)) {
  90
  91                         $assessment = $this->load_xml_resource(cc2moodle::$path_to_manifest_folder . DIRECTORY_SEPARATOR . $assessment_file);
  92
  93                         if (!empty($assessment)) {
  94
  95                             $replace_values = array('unlimited' => 0);
  96
  97                             $questions = $this->get_questions($assessment, $last_question_id, $last_answer_id, dirname($assessment_file), $is_question_bank);
  98                             $question_count = count($questions);
  99
 100                             if (!empty($question_count)) {
 101
 102                                 $last_instance_id++;
 103
 104                                 $instances[$instance['resource_indentifier']]['questions'] = $questions;
 105                                 $instances[$instance['resource_indentifier']]['id'] = $last_instance_id;
 106                                 $instances[$instance['resource_indentifier']]['title'] = $instance['title'];
 107                                 $instances[$instance['resource_indentifier']]['is_question_bank'] = $is_question_bank;
 108                                 $instances[$instance['resource_indentifier']]['options']['timelimit'] = $this->get_global_config($assessment, 'qmd_timelimit', 0);
 109                                 $instances[$instance['resource_indentifier']]['options']['max_attempts'] = $this->get_global_config($assessment, 'cc_maxattempts', 0, $replace_values);
 110                             }
 111                         }
 112                     }
 113                 }
 114             }
 115         }
 116
 117         return $instances;
 118     }
 119
 120
 121     private function create_node_course_modules_mod ($instance) {
 122
 123         $sheet_question_mod = cc2moodle::loadsheet(SHEET_COURSE_SECTIONS_SECTION_MODS_MOD_QUIZ);
 124
 125         $node_course_modules_quiz_question_instances = $this->create_node_course_modules_mod_quiz_question_instances($instance);
 126         $node_course_modules_quiz_feedback = $this->create_node_course_modules_mod_quiz_feedback($instance);
 127
 128         $questions_strings = $this->get_questions_string($instance);
 129         $quiz_stamp = 'localhost+' . time() . '+' . $this->generate_random_string(6);
 130
 131         $find_tags = array('[#mod_id#]',
 132                            '[#mod_name#]',
 133                            '[#mod_intro#]',
 134                            '[#mod_stamp#]',
 135                            '[#question_string#]',
 136                            '[#date_now#]',
 137                            '[#mod_max_attempts#]',
 138                            '[#mod_timelimit#]',
 139                            '[#node_question_instance#]',
 140                            '[#node_questions_feedback#]');
 141
 142         $replace_values = array($instance['id'],
 143                                 self::safexml($instance['title']),
 144                                 self::safexml($instance['title']),
 145                                 self::safexml($quiz_stamp),
 146                                 self::safexml($questions_strings),
 147                                 time(),
 148                                 $instance['options']['max_attempts'],
 149                                 $instance['options']['timelimit'],
 150                                 $node_course_modules_quiz_question_instances,
 151                                 $node_course_modules_quiz_feedback); //this one has tags
 152
 153         $node_question_mod = str_replace($find_tags, $replace_values, $sheet_question_mod);
 154
 155         return $node_question_mod;
 156     }
 157
 158     private function get_global_config ($assessment, $option, $default_value, $replace_values = '') {
 159
 160         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 161         $metadata = $xpath->query('/xmlns:questestinterop/xmlns:assessment/xmlns:qtimetadata/xmlns:qtimetadatafield');
 162
 163         foreach ($metadata as $field) {
 164             $field_label = $xpath->query('xmlns:fieldlabel', $field);
 165             $field_label = !empty($field_label->item(0)->nodeValue) ? $field_label->item(0)->nodeValue : '';
 166
 167             if (strtolower($field_label) == strtolower($option)) {
 168                 $field_entry = $xpath->query('xmlns:fieldentry', $field);
 169                 $response = !empty($field_entry->item(0)->nodeValue) ? $field_entry->item(0)->nodeValue : '';
 170             }
 171         }
 172
 173         $response = !empty($response) ? trim($response) : '';
 174
 175         if (!empty($replace_values)) {
 176             foreach ($replace_values as $key => $value) {
 177                 $response = ($key == $response) ? $value : $response;
 178             }
 179         }
 180
 181         $response = empty($response) ? $default_value : $response;
 182
 183         return $response;
 184     }
 185
 186     private function create_node_course_modules_mod_quiz_question_instances ($instance) {
 187
 188         $node_course_module_mod_quiz_questions_instances = '';
 189         $sheet_question_mod_instance = cc2moodle::loadsheet(SHEET_COURSE_SECTIONS_SECTION_MODS_MOD_QUIZ_QUESTION_INSTANCE);
 190
 191         $find_tags = array('[#question_id#]' , '[#instance_id#]');
 192
 193         if (!empty($instance['questions'])) {
 194
 195             foreach ($instance['questions'] as $question) {
 196                 $replace_values = array($question['id'] , $question['id']);
 197                 $node_course_module_mod_quiz_questions_instances .= str_replace($find_tags, $replace_values, $sheet_question_mod_instance);
 198             }
 199
 200             $node_course_module_mod_quiz_questions_instances = str_replace($find_tags, $replace_values, $node_course_module_mod_quiz_questions_instances);
 201         }
 202
 203         return $node_course_module_mod_quiz_questions_instances;
 204     }
 205
 206     private function get_questions_string ($instance) {
 207
 208         $questions_string = '';
 209
 210         if (!empty($instance['questions'])) {
 211             foreach ($instance['questions'] as $question) {
 212                 $questions_string .= $question['id'] . ',';
 213             }
 214         }
 215
 216         $questions_string = !empty($questions_string) ? substr($questions_string, 0, strlen($questions_string) - 1) : '';
 217
 218         return $questions_string;
 219     }
 220
 221     private function create_node_course_question_categories ($instances) {
 222
 223         $sheet_question_categories = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES);
 224
 225         if (!empty($instances)) {
 226
 227             $node_course_question_categories_question_category = '';
 228
 229             foreach ($instances as $instance) {
 230                 $node_course_question_categories_question_category .= $this->create_node_course_question_categories_question_category($instance);
 231             }
 232
 233             $find_tags = array('[#node_course_question_categories_question_category#]');
 234             $replace_values = array($node_course_question_categories_question_category);
 235
 236             $node_course_question_categories = str_replace($find_tags, $replace_values, $sheet_question_categories);
 237         }
 238
 239         $node_course_question_categories = empty($node_course_question_categories) ? '' : $node_course_question_categories;
 240
 241         return $node_course_question_categories;
 242     }
 243
 244     private function create_node_course_question_categories_question_category ($instance) {
 245
 246         $sheet_question_categories_quetion_category = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY);
 247
 248         $find_tags = array('[#quiz_id#]',
 249                            '[#quiz_name#]',
 250                            '[#quiz_stamp#]',
 251                            '[#node_course_question_categories_question_category_questions#]');
 252
 253         $node_course_question_categories_questions = $this->create_node_course_question_categories_question_category_question($instance);
 254         $node_course_question_categories_questions = empty($node_course_question_categories_questions) ? '' : $node_course_question_categories_questions;
 255
 256         $quiz_stamp = 'localhost+' . time() . '+' . $this->generate_random_string(6);
 257
 258         $replace_values = array($instance['id'],
 259                                 self::safexml($instance['title']),
 260                                 $quiz_stamp,
 261                                 $node_course_question_categories_questions);
 262
 263         $node_question_categories = str_replace($find_tags, $replace_values, $sheet_question_categories_quetion_category);
 264
 265         return $node_question_categories;
 266     }
 267
 268     private function create_node_course_question_categories_question_category_question ($instance) {
 269
 270         global $USER;
 271
 272         $node_course_question_categories_question = '';
 273
 274         $find_tags = array('[#question_id#]',
 275                            '[#question_title#]',
 276                            '[#question_text#]',
 277                            '[#question_type#]',
 278                            '[#question_general_feedback#]',
 279                            '[#question_defaultgrade#]',
 280                            '[#date_now#]',
 281                            '[#question_type_nodes#]',
 282                            '[#question_stamp#]',
 283                            '[#question_version#]',
 284                            '[#logged_user#]');
 285
 286         $sheet_question_categories_question = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION);
 287
 288         $questions = $instance['questions'];
 289
 290         if (!empty($questions)) {
 291
 292             foreach ($questions as $question) {
 293
 294                 $quiz_stamp = 'localhost+' . time() . '+' . $this->generate_random_string(6);
 295                 $quiz_version = 'localhost+' . time() . '+' . $this->generate_random_string(6);
 296
 297                 $question_moodle_type = $question['moodle_type'];
 298                 $question_cc_type = $question['cc_type'];
 299
 300                 $question_type_node = '';
 301
 302                 $question_type_node = ($question_moodle_type == MOODLE_QUIZ_MULTIPLE_CHOICE) ? $this->create_node_course_question_categories_question_category_question_multiple_choice($question) : $question_type_node;
 303                 $question_type_node = ($question_moodle_type == MOODLE_QUIZ_TRUE_FALSE) ? $this->create_node_course_question_categories_question_category_question_true_false($question) : $question_type_node;
 304                 $question_type_node = ($question_moodle_type == MOODLE_QUIZ_ESSAY) ? $this->create_node_course_question_categories_question_category_question_eesay($question) : $question_type_node;
 305                 $question_type_node = ($question_moodle_type == MOODLE_QUIZ_SHORTANSWER) ? $this->create_node_course_question_categories_question_category_question_shortanswer($question) : $question_type_node;
 306
 307                 $replace_values = array($question['id'],
 308                                         self::safexml($this->truncate_text($question['title'], 255, true)),
 309                                         self::safexml($question['title']),
 310                                         $question_moodle_type,
 311                                         self::safexml($question['feedback']),
 312                                         $question['defaultgrade'], //default grade
 313                                         time(),
 314                                         $question_type_node,
 315                                         $quiz_stamp,
 316                                         $quiz_version,
 317                                         $USER->id);
 318
 319                 $node_course_question_categories_question .= str_replace($find_tags, $replace_values, $sheet_question_categories_question);
 320             }
 321         }
 322
 323         $node_course_question_categories_question = empty($node_course_question_categories_question) ? '' : $node_course_question_categories_question;
 324
 325         return $node_course_question_categories_question;
 326     }
 327
 328     private function get_questions ($assessment, &$last_question_id, &$last_answer_id, $root_path, $is_question_bank) {
 329
 330         $questions = array();
 331
 332         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 333
 334         if (!$is_question_bank) {
 335             $questions_items = $xpath->query('/xmlns:questestinterop/xmlns:assessment/xmlns:section/xmlns:item');
 336         } else {
 337             $questions_items = $xpath->query('/xmlns:questestinterop/xmlns:objectbank/xmlns:item');
 338         }
 339
 340         foreach ($questions_items as $question_item) {
 341
 342             $count_questions = $xpath->evaluate('count(xmlns:presentation/xmlns:flow/xmlns:material/xmlns:mattext)', $question_item);
 343
 344             if ($count_questions == 0) {
 345                 $question_title = $xpath->query('xmlns:presentation/xmlns:material/xmlns:mattext', $question_item);
 346             } else {
 347                 $question_title = $xpath->query('xmlns:presentation/xmlns:flow/xmlns:material/xmlns:mattext', $question_item);
 348             }
 349
 350             $question_title = !empty($question_title->item(0)->nodeValue) ? $question_title->item(0)->nodeValue : '';
 351
 352             $question_identifier = $xpath->query('@ident', $question_item);
 353             $question_identifier = !empty($question_identifier->item(0)->nodeValue) ? $question_identifier->item(0)->nodeValue : '';
 354
 355             if (!empty($question_identifier)) {
 356
 357                 $question_type = $this->get_question_type($question_identifier, $assessment);
 358
 359                 if (!empty($question_type['moodle'])) {
 360
 361                     $last_question_id++;
 362
 363                     $questions[$question_identifier]['id'] = $last_question_id;
 364
 365                     $question_title = $this->update_sources($question_title, $root_path);
 366                     $question_title = !empty($question_title) ? str_replace("%24", "\$", $this->include_titles($question_title)) : '';
 367
 368                     $questions[$question_identifier]['title'] = $question_title;
 369                     $questions[$question_identifier]['identifier'] = $question_identifier;
 370                     $questions[$question_identifier]['moodle_type'] = $question_type['moodle'];
 371                     $questions[$question_identifier]['cc_type'] = $question_type['cc'];
 372                     $questions[$question_identifier]['feedback'] = $this->get_general_feedback($assessment, $question_identifier);
 373                     $questions[$question_identifier]['defaultgrade'] = $this->get_defaultgrade($assessment, $question_identifier);
 374                     $questions[$question_identifier]['answers'] = $this->get_answers($question_identifier, $assessment, $last_answer_id);
 375
 376                 }
 377             }
 378         }
 379
 380         $questions = !empty($questions) ? $questions : '';
 381
 382         return $questions;
 383     }
 384
 385     private function str_replace_once ($search, $replace, $subject) {
 386
 387         $first_char = strpos($subject, $search);
 388
 389         if ($first_char !== false) {
 390
 391             $before_str = substr($subject, 0, $first_char);
 392             $after_str = substr($subject, $first_char + strlen($search));
 393
 394             return $before_str . $replace . $after_str;
 395
 396         } else {
 397             return $subject;
 398         }
 399     }
 400
 401     private function get_defaultgrade($assessment, $question_identifier) {
 402         $result = 1;
 403         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 404         $query = '//xmlns:item[@ident="' . $question_identifier . '"]';
 405         $query .= '//xmlns:qtimetadatafield[xmlns:fieldlabel="cc_weighting"]/xmlns:fieldentry';
 406         $defgrade = $xpath->query($query);
 407         if (!empty($defgrade) && ($defgrade->length > 0)) {
 408             $resp = (int)$defgrade->item(0)->nodeValue;
 409             if ($resp >= 0 && $resp <= 99) {
 410                 $result = $resp;
 411             }
 412         }
 413         return $result;
 414     }
 415
 416     private function get_general_feedback ($assessment, $question_identifier) {
 417
 418         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 419
 420         $respconditions = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:resprocessing/xmlns:respcondition');
 421
 422         if (!empty($respconditions)) {
 423
 424             foreach ($respconditions as $respcondition) {
 425
 426                 $continue = $respcondition->getAttributeNode('continue');
 427                 $continue = !empty($continue->nodeValue) ? strtolower($continue->nodeValue) : '';
 428
 429                 if ($continue == 'yes') {
 430
 431                     $display_feedback = $xpath->query('xmlns:displayfeedback', $respcondition);
 432
 433                     if (!empty($display_feedback)) {
 434                         foreach ($display_feedback as $feedback) {
 435
 436                             $feedback_identifier = $feedback->getAttributeNode('linkrefid');
 437                             $feedback_identifier = !empty($feedback_identifier->nodeValue) ? $feedback_identifier->nodeValue : '';
 438
 439                             if (!empty($feedback_identifier)) {
 440                                 $feedbacks_identifiers[] = $feedback_identifier;
 441                             }
 442                         }
 443                     }
 444                 }
 445             }
 446         }
 447
 448         $feedback = '';
 449         $feedbacks_identifiers = empty($feedbacks_identifiers) ? '' : $feedbacks_identifiers;
 450
 451         if (!empty($feedbacks_identifiers)) {
 452             foreach ($feedbacks_identifiers as $feedback_identifier) {
 453                 $feedbacks = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:itemfeedback[@ident="' . $feedback_identifier . '"]/xmlns:flow_mat/xmlns:material/xmlns:mattext');
 454                 $feedback .= !empty($feedbacks->item(0)->nodeValue) ? $feedbacks->item(0)->nodeValue . ' ' : '';
 455             }
 456         }
 457
 458         return $feedback;
 459     }
 460
 461     private function get_feedback ($assessment, $identifier, $item_identifier, $question_type) {
 462
 463         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 464
 465         $resource_processing = $xpath->query('//xmlns:item[@ident="' . $item_identifier . '"]/xmlns:resprocessing/xmlns:respcondition');
 466
 467         if (!empty($resource_processing)) {
 468
 469             foreach ($resource_processing as $response) {
 470
 471                 $varequal = $xpath->query('xmlns:conditionvar/xmlns:varequal', $response);
 472                 $varequal = !empty($varequal->item(0)->nodeValue) ? $varequal->item(0)->nodeValue : '';
 473
 474                 if (strtolower($varequal) == strtolower($identifier) || ($question_type == CC_QUIZ_ESSAY)) {
 475
 476                     $display_feedback = $xpath->query('xmlns:displayfeedback', $response);
 477
 478                     if (!empty($display_feedback)) {
 479                         foreach ($display_feedback as $feedback) {
 480
 481                             $feedback_identifier = $feedback->getAttributeNode('linkrefid');
 482                             $feedback_identifier = !empty($feedback_identifier->nodeValue) ? $feedback_identifier->nodeValue : '';
 483
 484                             if (!empty($feedback_identifier)) {
 485                                 $feedbacks_identifiers[] = $feedback_identifier;
 486                             }
 487                         }
 488                     }
 489                 }
 490             }
 491         }
 492
 493         $feedback = '';
 494         $feedbacks_identifiers = empty($feedbacks_identifiers) ? '' : $feedbacks_identifiers;
 495
 496         if (!empty($feedbacks_identifiers)) {
 497             foreach ($feedbacks_identifiers as $feedback_identifier) {
 498                 $feedbacks = $xpath->query('//xmlns:item[@ident="' . $item_identifier . '"]/xmlns:itemfeedback[@ident="' . $feedback_identifier . '"]/xmlns:flow_mat/xmlns:material/xmlns:mattext');
 499                 $feedback .= !empty($feedbacks->item(0)->nodeValue) ? $feedbacks->item(0)->nodeValue . ' ' : '';
 500             }
 501         }
 502
 503         return $feedback;
 504     }
 505
 506     private function get_answers_fib ($question_identifier, $identifier, $assessment, &$last_answer_id) {
 507
 508         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 509
 510         $answers_fib = array();
 511
 512         $response_items = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:resprocessing/xmlns:respcondition');
 513
 514         foreach ($response_items as $response_item) {
 515
 516             $setvar = $xpath->query('xmlns:setvar', $response_item);
 517             $setvar = is_object($setvar->item(0)) ? $setvar->item(0)->nodeValue : '';
 518
 519             if ($setvar != '') {
 520
 521                 $last_answer_id++;
 522
 523                 $answer_title = $xpath->query('xmlns:conditionvar/xmlns:varequal[@respident="' . $identifier . '"]', $response_item);
 524                 $answer_title = !empty($answer_title->item(0)->nodeValue) ? $answer_title->item(0)->nodeValue : '';
 525
 526             $case = $xpath->query('xmlns:conditionvar/xmlns:varequal/@case', $response_item);
 527             $case = is_object($case->item(0)) ? $case->item(0)->nodeValue : 'no'
 528                                     ;
 529             $case = strtolower($case) == 'yes' ? 1 :
 530                             0;
 531
 532                 $display_feedback = $xpath->query('xmlns:displayfeedback', $response_item);
 533
 534                 unset($feedbacks_identifiers);
 535
 536                 if (!empty($display_feedback)) {
 537
 538                     foreach ($display_feedback as $feedback) {
 539
 540                         $feedback_identifier = $feedback->getAttributeNode('linkrefid');
 541                         $feedback_identifier = !empty($feedback_identifier->nodeValue) ? $feedback_identifier->nodeValue : '';
 542
 543                         if (!empty($feedback_identifier)) {
 544                             $feedbacks_identifiers[] = $feedback_identifier;
 545                         }
 546                     }
 547                 }
 548
 549                 $feedback = '';
 550                 $feedbacks_identifiers = empty($feedbacks_identifiers) ? '' : $feedbacks_identifiers;
 551
 552                 if (!empty($feedbacks_identifiers)) {
 553                     foreach ($feedbacks_identifiers as $feedback_identifier) {
 554                         $feedbacks = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:itemfeedback[@ident="' . $feedback_identifier . '"]/xmlns:flow_mat/xmlns:material/xmlns:mattext');
 555                         $feedback .= !empty($feedbacks->item(0)->nodeValue) ? $feedbacks->item(0)->nodeValue . ' ' : '';
 556                     }
 557                 }
 558
 559                 $answers_fib[] = array('id' => $last_answer_id,
 560                                        'title' => $answer_title,
 561                                        'score' => $setvar,
 562                                        'feedback' => $feedback,
 563                                        'case' => $case);
 564             }
 565         }
 566
 567         $answers_fib = empty($answers_fib) ? '' : $answers_fib;
 568
 569         return $answers_fib;
 570     }
 571
 572     private function get_answers_pattern_match ($question_identifier, $identifier, $assessment, &$last_answer_id) {
 573
 574         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 575
 576         $answers_fib = array();
 577
 578         $response_items = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:resprocessing/xmlns:respcondition');
 579
 580         foreach ($response_items as $response_item) {
 581
 582             $setvar = $xpath->query('xmlns:setvar', $response_item);
 583             $setvar = is_object($setvar->item(0)) ? $setvar->item(0)->nodeValue : '';
 584
 585             if ($setvar != '') {
 586
 587                 $last_answer_id++;
 588
 589                 $answer_title = $xpath->query('xmlns:conditionvar/xmlns:varequal[@respident="' . $identifier . '"]', $response_item);
 590                 $answer_title = !empty($answer_title->item(0)->nodeValue) ? $answer_title->item(0)->nodeValue : '';
 591
 592                 if (empty($answer_title)) {
 593                     $answer_title = $xpath->query('xmlns:conditionvar/xmlns:varsubstring[@respident="' . $identifier . '"]', $response_item);
 594                     $answer_title = !empty($answer_title->item(0)->nodeValue) ? '*' . $answer_title->item(0)->nodeValue . '*' : '';
 595                 }
 596
 597                 if (empty($answer_title)) {
 598                     $answer_title = '*';
 599                 }
 600
 601             $case = $xpath->query('xmlns:conditionvar/xmlns:varequal/@case', $response_item);
 602             $case = is_object($case->item(0)) ? $case->item(0)->nodeValue : 'no'
 603                                     ;
 604             $case = strtolower($case) == 'yes' ? 1 :
 605                             0;
 606
 607                 $display_feedback = $xpath->query('xmlns:displayfeedback', $response_item);
 608
 609                 unset($feedbacks_identifiers);
 610
 611                 if (!empty($display_feedback)) {
 612
 613                     foreach ($display_feedback as $feedback) {
 614
 615                         $feedback_identifier = $feedback->getAttributeNode('linkrefid');
 616                         $feedback_identifier = !empty($feedback_identifier->nodeValue) ? $feedback_identifier->nodeValue : '';
 617
 618                         if (!empty($feedback_identifier)) {
 619                             $feedbacks_identifiers[] = $feedback_identifier;
 620                         }
 621                     }
 622                 }
 623
 624                 $feedback = '';
 625                 $feedbacks_identifiers = empty($feedbacks_identifiers) ? '' : $feedbacks_identifiers;
 626
 627                 if (!empty($feedbacks_identifiers)) {
 628                     foreach ($feedbacks_identifiers as $feedback_identifier) {
 629                         $feedbacks = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:itemfeedback[@ident="' . $feedback_identifier . '"]/xmlns:flow_mat/xmlns:material/xmlns:mattext');
 630                         $feedback .= !empty($feedbacks->item(0)->nodeValue) ? $feedbacks->item(0)->nodeValue . ' ' : '';
 631                     }
 632                 }
 633
 634                 $answers_fib[] = array('id' => $last_answer_id,
 635                                        'title' => $answer_title,
 636                                        'score' => $setvar,
 637                                        'feedback' => $feedback,
 638                                        'case' => $case);
 639             }
 640         }
 641
 642         $answers_fib = empty($answers_fib) ? '' : $answers_fib;
 643
 644         return $answers_fib;
 645     }
 646
 647
 648     private function get_answers ($identifier, $assessment, &$last_answer_id) {
 649
 650         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 651
 652         $answers = array();
 653
 654         $question_cc_type = $this->get_question_type($identifier, $assessment);
 655         $question_cc_type = $question_cc_type['cc'];
 656
 657         if ($question_cc_type == CC_QUIZ_MULTIPLE_CHOICE || $question_cc_type == CC_QUIZ_MULTIPLE_RESPONSE || $question_cc_type == CC_QUIZ_TRUE_FALSE) {
 658
 659             $query_answers = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:response_lid/xmlns:render_choice/xmlns:response_label';
 660             $query_answers_with_flow = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:flow/xmlns:response_lid/xmlns:render_choice/xmlns:response_label';
 661
 662             $query_indentifer = '@ident';
 663             $query_title = 'xmlns:material/xmlns:mattext';
 664         }
 665
 666         if ($question_cc_type == CC_QUIZ_ESSAY) {
 667
 668             $query_answers = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:response_str';
 669             $query_answers_with_flow = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:flow/xmlns:response_str';
 670
 671             $query_indentifer = '@ident';
 672             $query_title = 'xmlns:render_fib';
 673         }
 674
 675         if ($question_cc_type == CC_QUIZ_FIB || $question_cc_type == CC_QUIZ_PATTERN_MACHT) {
 676
 677             $xpath_query = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:response_str/@ident';
 678             $xpath_query_with_flow = '//xmlns:item[@ident="' . $identifier . '"]/xmlns:presentation/xmlns:flow/xmlns:response_str/@ident';
 679
 680             $count_response = $xpath->evaluate('count(' . $xpath_query_with_flow . ')');
 681
 682             if ($count_response == 0) {
 683                 $answer_identifier = $xpath->query($xpath_query);
 684             } else {
 685                 $answer_identifier = $xpath->query($xpath_query_with_flow);
 686             }
 687
 688             $answer_identifier = !empty($answer_identifier->item(0)->nodeValue) ? $answer_identifier->item(0)->nodeValue : '';
 689
 690             if ($question_cc_type == CC_QUIZ_FIB) {
 691                 $answers = $this->get_answers_fib ($identifier, $answer_identifier, $assessment, $last_answer_id);
 692             } else {
 693                 $answers = $this->get_answers_pattern_match ($identifier, $answer_identifier, $assessment, $last_answer_id);
 694             }
 695
 696         } else {
 697
 698             $count_response = $xpath->evaluate('count(' . $query_answers_with_flow . ')');
 699
 700             if ($count_response == 0) {
 701                 $response_items = $xpath->query($query_answers);
 702             } else {
 703                 $response_items = $xpath->query($query_answers_with_flow);
 704             }
 705
 706             if (!empty($response_items)) {
 707
 708                 foreach ($response_items as $response_item) {
 709
 710                     $last_answer_id++;
 711
 712                     $answer_identifier = $xpath->query($query_indentifer, $response_item);
 713                     $answer_identifier = !empty($answer_identifier->item(0)->nodeValue) ? $answer_identifier->item(0)->nodeValue : '';
 714
 715                     $answer_title = $xpath->query($query_title, $response_item);
 716                     $answer_title = !empty($answer_title->item(0)->nodeValue) ? $answer_title->item(0)->nodeValue : '';
 717
 718                     $answer_feedback = $this->get_feedback($assessment, $answer_identifier, $identifier, $question_cc_type);
 719
 720                     $answer_score = $this->get_score($assessment, $answer_identifier, $identifier);
 721
 722                     $answers[] = array('id' => $last_answer_id,
 723                                        'title' => $answer_title,
 724                                        'score' => $answer_score,
 725                                        'identifier' => $answer_identifier,
 726                                        'feedback' => $answer_feedback);
 727                 }
 728             }
 729         }
 730
 731         $answers = empty($answers) ? '' : $answers;
 732
 733         return $answers;
 734
 735     }
 736
 737     private function get_score ($assessment, $identifier, $question_identifier) {
 738
 739         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 740
 741         $resource_processing = $xpath->query('//xmlns:item[@ident="' . $question_identifier . '"]/xmlns:resprocessing/xmlns:respcondition');
 742
 743         if (!empty($resource_processing)) {
 744
 745             foreach ($resource_processing as $response) {
 746
 747                 $question_cc_type = $this->get_question_type($question_identifier, $assessment);
 748                 $question_cc_type = $question_cc_type['cc'];
 749
 750                 $varequal = $xpath->query('xmlns:conditionvar/xmlns:varequal', $response);
 751                 $varequal = !empty($varequal->item(0)->nodeValue) ? $varequal->item(0)->nodeValue : '';
 752
 753                 if (strtolower($varequal) == strtolower($identifier)) {
 754                     $score = $xpath->query('xmlns:setvar', $response);
 755                     $score = !empty($score->item(0)->nodeValue) ? $score->item(0)->nodeValue : '';
 756                 }
 757             }
 758         }
 759
 760         $score = empty($score) ? 0 : $score;
 761
 762         return $score;
 763     }
 764
 765     private function create_node_course_question_categories_question_category_question_multiple_choice ($question) {
 766
 767         $node_course_question_categories_question_answer = '';
 768         $sheet_question_categories_question = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION_MULTIPLE_CHOICE);
 769
 770         if (!empty($question['answers'])) {
 771             foreach ($question['answers'] as $answer) {
 772                 $node_course_question_categories_question_answer .= $this->create_node_course_question_categories_question_category_question_answer($answer);
 773             }
 774         }
 775
 776         $answer_string = $this->get_answers_string($question['answers']);
 777
 778         $is_single = ($question['cc_type'] == CC_QUIZ_MULTIPLE_CHOICE) ? 1 : 0;
 779
 780         $find_tags = array('[#node_course_question_categories_question_category_question_answer#]',
 781                            '[#answer_string#]',
 782                            '[#is_single#]');
 783
 784         $replace_values = array($node_course_question_categories_question_answer,
 785                                 self::safexml($answer_string),
 786                                 $is_single);
 787
 788         $node_question_categories_question = str_replace($find_tags, $replace_values, $sheet_question_categories_question);
 789
 790         return $node_question_categories_question;
 791     }
 792
 793     private function create_node_course_question_categories_question_category_question_eesay ($question) {
 794
 795         $node_course_question_categories_question_answer = '';
 796
 797         $sheet_question_categories_question = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION_EESAY);
 798
 799         if (!empty($question['answers'])) {
 800             foreach ($question['answers'] as $answer) {
 801                 $node_course_question_categories_question_answer .= $this->create_node_course_question_categories_question_category_question_answer($answer);
 802             }
 803         }
 804
 805         $find_tags = array('[#node_course_question_categories_question_category_question_answer#]');
 806         $replace_values = array($node_course_question_categories_question_answer);
 807
 808         $node_question_categories_question = str_replace($find_tags, $replace_values, $sheet_question_categories_question);
 809
 810         return $node_question_categories_question;
 811     }
 812
 813     private function create_node_course_question_categories_question_category_question_shortanswer ($question) { //, &$fib_questions) {
 814
 815         $sheet_question_categories_question = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION_SHORTANSWER);
 816         $node_course_question_categories_question_answer = '';
 817
 818         if (!empty($question['answers'])) {
 819             foreach ($question['answers'] as $answer) {
 820                 $node_course_question_categories_question_answer .= $this->create_node_course_question_categories_question_category_question_answer($answer);
 821             }
 822         }
 823
 824         $answers_string = $this->get_answers_string($question['answers']);
 825
 826         $use_case = 0;
 827
 828         foreach ($question['answers'] as $answer) {
 829
 830             if ($answer['case'] == 1) {
 831                 $use_case = 1;
 832             }
 833
 834         }
 835
 836         $find_tags = array('[#answers_string#]',
 837                            '[#use_case#]',
 838                            '[#node_course_question_categories_question_category_question_answer#]');
 839
 840         $replace_values = array(self::safexml($answers_string),
 841                                 self::safexml($use_case),
 842                                 $node_course_question_categories_question_answer);
 843
 844
 845
 846         $node_question_categories_question = str_replace($find_tags, $replace_values, $sheet_question_categories_question);
 847
 848         return $node_question_categories_question;
 849
 850     }
 851
 852     private function create_node_course_question_categories_question_category_question_true_false ($question) {
 853
 854         $node_course_question_categories_question_answer = '';
 855
 856         $sheet_question_categories_question = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION_TRUE_FALSE);
 857
 858         $max_score = 0;
 859         $true_answer_id = 0;
 860         $false_answer_id = 0;
 861
 862         if (!empty($question['answers'])) {
 863
 864             foreach ($question['answers'] as $answer) {
 865                 if ($answer['score'] > $max_score) {
 866                     $max_score = $answer['score'];
 867                     $true_answer_id = $answer['id'];
 868                 }
 869
 870                 $node_course_question_categories_question_answer .= $this->create_node_course_question_categories_question_category_question_answer($answer);
 871             }
 872
 873             foreach ($question['answers'] as $answer) {
 874
 875                 if ($answer['id'] != $true_answer_id) {
 876                     $max_score = $answer['score'];
 877                     $false_answer_id = $answer['id'];
 878                 }
 879             }
 880         }
 881
 882         $find_tags = array('[#node_course_question_categories_question_category_question_answer#]',
 883                            '[#true_answer_id#]',
 884                            '[#false_answer_id#]');
 885
 886         $replace_values = array($node_course_question_categories_question_answer,
 887                                 $true_answer_id,
 888                                 $false_answer_id);
 889
 890         $node_question_categories_question = str_replace($find_tags, $replace_values, $sheet_question_categories_question);
 891
 892         return $node_question_categories_question;
 893     }
 894
 895     private function get_answers_string ($answers) {
 896
 897         $answer_string = '';
 898
 899         if (!empty($answers)) {
 900             foreach ($answers as $answer) {
 901                 $answer_string .= $answer['id'] . ',';
 902             }
 903         }
 904
 905         $answer_string = !empty($answer_string) ? substr($answer_string, 0, strlen($answer_string) - 1) : '';
 906
 907         return $answer_string;
 908
 909     }
 910
 911     private function create_node_course_question_categories_question_category_question_answer ($answer) {
 912
 913         $sheet_question_categories_question_answer = cc2moodle::loadsheet(SHEET_COURSE_QUESTION_CATEGORIES_QUESTION_CATEGORY_QUESTION_ANSWER);
 914
 915         $find_tags = array('[#answer_id#]',
 916                            '[#answer_text#]',
 917                            '[#answer_score#]',
 918                            '[#answer_feedback#]');
 919
 920         $replace_values = array($answer['id'],
 921                                 self::safexml($answer['title']),
 922                                 $answer['score'],
 923                                 self::safexml($answer['feedback']));
 924
 925         $node_question_categories_question_answer = str_replace($find_tags, $replace_values, $sheet_question_categories_question_answer);
 926
 927         return $node_question_categories_question_answer;
 928     }
 929
 930     private function get_question_type ($identifier, $assessment) {
 931
 932         $xpath = cc2moodle::newx_path($assessment, cc2moodle::getquizns());
 933
 934         $metadata = $xpath->query('//xmlns:item[@ident="' . $identifier . '"]/xmlns:itemmetadata/xmlns:qtimetadata/xmlns:qtimetadatafield');
 935
 936         foreach ($metadata as $field) {
 937
 938             $field_label = $xpath->query('xmlns:fieldlabel', $field);
 939             $field_label = !empty($field_label->item(0)->nodeValue) ? $field_label->item(0)->nodeValue : '';
 940
 941             if ($field_label == 'cc_profile') {
 942                 $field_entry = $xpath->query('xmlns:fieldentry', $field);
 943                 $type = !empty($field_entry->item(0)->nodeValue) ? $field_entry->item(0)->nodeValue : '';
 944             }
 945         }
 946
 947         $return_type = array();
 948
 949         $return_type['moodle'] = '';
 950         $return_type['cc'] = $type;
 951
 952         if ($type == CC_QUIZ_MULTIPLE_CHOICE) {
 953             $return_type['moodle'] = MOODLE_QUIZ_MULTIPLE_CHOICE;
 954         }
 955         if ($type == CC_QUIZ_MULTIPLE_RESPONSE) {
 956             $return_type['moodle'] = MOODLE_QUIZ_MULTIPLE_CHOICE;
 957         }
 958         if ($type == CC_QUIZ_TRUE_FALSE) {
 959             $return_type['moodle'] = MOODLE_QUIZ_TRUE_FALSE;
 960         }
 961         if ($type == CC_QUIZ_ESSAY) {
 962             $return_type['moodle'] = MOODLE_QUIZ_ESSAY;
 963         }
 964         if ($type == CC_QUIZ_FIB) {
 965             $return_type['moodle'] = MOODLE_QUIZ_SHORTANSWER;
 966         }
 967         if ($type == CC_QUIZ_PATTERN_MACHT) {
 968             $return_type['moodle'] = MOODLE_QUIZ_SHORTANSWER;
 969         }
 970
 971         return $return_type;
 972
 973     }
 974 }