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