mirror of
https://github.com/moodle/moodle.git
synced 2025-08-06 01:16:44 +02:00
205 lines
8.2 KiB
PHP
205 lines
8.2 KiB
PHP
<?php
|
|
// This file is part of Moodle - http://moodle.org/
|
|
//
|
|
// Moodle is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Moodle is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU General Public License
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* This is really a little language parser for AICC_SCRIPT
|
|
* evaluates the expression and returns a boolean answer
|
|
* see 2.3.2.5.1. Sequencing/Navigation Today - from the SCORM 1.2 spec (CAM).
|
|
*
|
|
* @param string $prerequisites the aicc_script prerequisites expression
|
|
* @param array $usertracks the tracked user data of each SCO visited
|
|
* @return boolean
|
|
*/
|
|
function scorm_eval_prerequisites($prerequisites, $usertracks) {
|
|
|
|
// This is really a little language parser - AICC_SCRIPT is the reference
|
|
// see 2.3.2.5.1. Sequencing/Navigation Today - from the SCORM 1.2 spec.
|
|
$element = '';
|
|
$stack = array();
|
|
$statuses = array(
|
|
'passed' => 'passed',
|
|
'completed' => 'completed',
|
|
'failed' => 'failed',
|
|
'incomplete' => 'incomplete',
|
|
'browsed' => 'browsed',
|
|
'not attempted' => 'notattempted',
|
|
'p' => 'passed',
|
|
'c' => 'completed',
|
|
'f' => 'failed',
|
|
'i' => 'incomplete',
|
|
'b' => 'browsed',
|
|
'n' => 'notattempted'
|
|
);
|
|
$i = 0;
|
|
|
|
// Expand the amp entities.
|
|
$prerequisites = preg_replace('/&/', '&', $prerequisites);
|
|
// Find all my parsable tokens.
|
|
$prerequisites = preg_replace('/(&|\||\(|\)|\~)/', '\t$1\t', $prerequisites);
|
|
// Expand operators.
|
|
$prerequisites = preg_replace('/&/', '&&', $prerequisites);
|
|
$prerequisites = preg_replace('/\|/', '||', $prerequisites);
|
|
// Now - grab all the tokens.
|
|
$elements = explode('\t', trim($prerequisites));
|
|
|
|
// Process each token to build an expression to be evaluated.
|
|
$stack = array();
|
|
foreach ($elements as $element) {
|
|
$element = trim($element);
|
|
if (empty($element)) {
|
|
continue;
|
|
}
|
|
if (!preg_match('/^(&&|\|\||\(|\))$/', $element)) {
|
|
// Create each individual expression.
|
|
// Search for ~ = <> X*{} .
|
|
|
|
// Sets like 3*{S34, S36, S37, S39}.
|
|
if (preg_match('/^(\d+)\*\{(.+)\}$/', $element, $matches)) {
|
|
$repeat = $matches[1];
|
|
$set = explode(',', $matches[2]);
|
|
$count = 0;
|
|
foreach ($set as $setelement) {
|
|
if (isset($usertracks[$setelement]) &&
|
|
($usertracks[$setelement]->status == 'completed' || $usertracks[$setelement]->status == 'passed')) {
|
|
$count++;
|
|
}
|
|
}
|
|
if ($count >= $repeat) {
|
|
$element = 'true';
|
|
} else {
|
|
$element = 'false';
|
|
}
|
|
} else if ($element == '~') {
|
|
// Not maps ~.
|
|
$element = '!';
|
|
} else if (preg_match('/^(.+)(\=|\<\>)(.+)$/', $element, $matches)) {
|
|
// Other symbols = | <> .
|
|
$element = trim($matches[1]);
|
|
if (isset($usertracks[$element])) {
|
|
$value = trim(preg_replace('/(\'|\")/', '', $matches[3]));
|
|
if (isset($statuses[$value])) {
|
|
$value = $statuses[$value];
|
|
}
|
|
if ($matches[2] == '<>') {
|
|
$oper = '!=';
|
|
} else {
|
|
$oper = '==';
|
|
}
|
|
$element = '(\''.$usertracks[$element]->status.'\' '.$oper.' \''.$value.'\')';
|
|
} else {
|
|
$element = 'false';
|
|
}
|
|
} else {
|
|
// Everything else must be an element defined like S45 ...
|
|
if (isset($usertracks[$element]) &&
|
|
($usertracks[$element]->status == 'completed' || $usertracks[$element]->status == 'passed')) {
|
|
$element = 'true';
|
|
} else {
|
|
$element = 'false';
|
|
}
|
|
}
|
|
|
|
}
|
|
$stack[] = ' '.$element.' ';
|
|
}
|
|
return eval('return '.implode($stack).';');
|
|
}
|
|
|
|
/**
|
|
* Sets up $userdata array and default values for SCORM 1.2 .
|
|
*
|
|
* @param stdClass $userdata an empty stdClass variable that should be set up with user values
|
|
* @param object $scorm package record
|
|
* @param string $scoid SCO Id
|
|
* @param string $attempt attempt number for the user
|
|
* @param string $mode scorm display mode type
|
|
* @return array The default values that should be used for SCORM 1.2 package
|
|
*/
|
|
function get_scorm_default (&$userdata, $scorm, $scoid, $attempt, $mode) {
|
|
global $USER;
|
|
|
|
$userdata->student_id = $USER->username;
|
|
$userdata->student_name = $USER->lastname .', '. $USER->firstname;
|
|
|
|
if ($usertrack = scorm_get_tracks($scoid, $USER->id, $attempt)) {
|
|
foreach ($usertrack as $key => $value) {
|
|
$userdata->$key = $value;
|
|
}
|
|
} else {
|
|
$userdata->status = '';
|
|
$userdata->score_raw = '';
|
|
}
|
|
|
|
if ($scodatas = scorm_get_sco($scoid, SCO_DATA)) {
|
|
foreach ($scodatas as $key => $value) {
|
|
$userdata->$key = $value;
|
|
}
|
|
} else {
|
|
print_error('cannotfindsco', 'scorm');
|
|
}
|
|
if (!$sco = scorm_get_sco($scoid)) {
|
|
print_error('cannotfindsco', 'scorm');
|
|
}
|
|
|
|
if (isset($userdata->status)) {
|
|
if ($userdata->status == '') {
|
|
$userdata->entry = 'ab-initio';
|
|
} else {
|
|
if (isset($userdata->{'cmi.core.exit'}) && ($userdata->{'cmi.core.exit'} == 'suspend')) {
|
|
$userdata->entry = 'resume';
|
|
} else {
|
|
$userdata->entry = '';
|
|
}
|
|
}
|
|
}
|
|
|
|
$userdata->mode = 'normal';
|
|
if (!empty($mode)) {
|
|
$userdata->mode = $mode;
|
|
}
|
|
if ($userdata->mode == 'normal') {
|
|
$userdata->credit = 'credit';
|
|
} else {
|
|
$userdata->credit = 'no-credit';
|
|
}
|
|
|
|
$def = array();
|
|
$def['cmi.core.student_id'] = $userdata->student_id;
|
|
$def['cmi.core.student_name'] = $userdata->student_name;
|
|
$def['cmi.core.credit'] = $userdata->credit;
|
|
$def['cmi.core.entry'] = $userdata->entry;
|
|
$def['cmi.core.lesson_mode'] = $userdata->mode;
|
|
$def['cmi.launch_data'] = scorm_isset($userdata, 'datafromlms');
|
|
$def['cmi.student_data.mastery_score'] = scorm_isset($userdata, 'masteryscore');
|
|
$def['cmi.student_data.max_time_allowed'] = scorm_isset($userdata, 'maxtimeallowed');
|
|
$def['cmi.student_data.time_limit_action'] = scorm_isset($userdata, 'timelimitaction');
|
|
$def['cmi.core.total_time'] = scorm_isset($userdata, 'cmi.core.total_time', '00:00:00');
|
|
|
|
// Now handle standard userdata items.
|
|
$def['cmi.core.lesson_location'] = scorm_isset($userdata, 'cmi.core.lesson_location');
|
|
$def['cmi.core.lesson_status'] = scorm_isset($userdata, 'cmi.core.lesson_status');
|
|
$def['cmi.core.score.raw'] = scorm_isset($userdata, 'cmi.core.score.raw');
|
|
$def['cmi.core.score.max'] = scorm_isset($userdata, 'cmi.core.score.max');
|
|
$def['cmi.core.score.min'] = scorm_isset($userdata, 'cmi.core.score.min');
|
|
$def['cmi.core.exit'] = scorm_isset($userdata, 'cmi.core.exit');
|
|
$def['cmi.suspend_data'] = scorm_isset($userdata, 'cmi.suspend_data');
|
|
$def['cmi.comments'] = scorm_isset($userdata, 'cmi.comments');
|
|
$def['cmi.student_preference.language'] = scorm_isset($userdata, 'cmi.student_preference.language');
|
|
$def['cmi.student_preference.audio'] = scorm_isset($userdata, 'cmi.student_preference.audio', '0');
|
|
$def['cmi.student_preference.speed'] = scorm_isset($userdata, 'cmi.student_preference.speed', '0');
|
|
$def['cmi.student_preference.text'] = scorm_isset($userdata, 'cmi.student_preference.text', '0');
|
|
return $def;
|
|
}
|