You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
101 lines
4.3 KiB
101 lines
4.3 KiB
2 years ago
|
<?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/>.
|
||
|
|
|
||
|
|
require_once('../../config.php');
|
||
|
|
require_once($CFG->dirroot.'/mod/scorm/locallib.php');
|
||
|
|
|
||
|
|
$id = optional_param('id', '', PARAM_INT); // Course Module ID, or
|
||
|
|
$a = optional_param('a', '', PARAM_INT); // scorm ID
|
||
|
|
$scoid = required_param('scoid', PARAM_INT); // sco ID
|
||
|
|
$attempt = required_param('attempt', PARAM_INT); // attempt number.
|
||
|
|
|
||
|
|
if (!empty($id)) {
|
||
|
|
if (! $cm = get_coursemodule_from_id('scorm', $id)) {
|
||
|
|
print_error('invalidcoursemodule');
|
||
|
|
}
|
||
|
|
if (! $course = $DB->get_record("course", array("id" => $cm->course))) {
|
||
|
|
print_error('coursemisconf');
|
||
|
|
}
|
||
|
|
if (! $scorm = $DB->get_record("scorm", array("id" => $cm->instance))) {
|
||
|
|
print_error('invalidcoursemodule');
|
||
|
|
}
|
||
|
|
} else if (!empty($a)) {
|
||
|
|
if (! $scorm = $DB->get_record("scorm", array("id" => $a))) {
|
||
|
|
print_error('invalidcoursemodule');
|
||
|
|
}
|
||
|
|
if (! $course = $DB->get_record("course", array("id" => $scorm->course))) {
|
||
|
|
print_error('coursemisconf');
|
||
|
|
}
|
||
|
|
if (! $cm = get_coursemodule_from_instance("scorm", $scorm->id, $course->id)) {
|
||
|
|
print_error('invalidcoursemodule');
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
print_error('missingparameter');
|
||
|
|
}
|
||
|
|
|
||
|
|
$PAGE->set_url('/mod/scorm/datamodel.php', array('scoid' => $scoid, 'attempt' => $attempt, 'id' => $cm->id));
|
||
|
|
|
||
|
|
require_login($course, false, $cm);
|
||
|
|
|
||
|
|
if (confirm_sesskey() && (!empty($scoid))) {
|
||
|
|
$result = true;
|
||
|
|
$request = null;
|
||
|
|
if (has_capability('mod/scorm:savetrack', context_module::instance($cm->id))) {
|
||
|
|
// Preload all current tracking data.
|
||
|
|
$trackdata = $DB->get_records('scorm_scoes_track', array('userid' => $USER->id, 'scormid' => $scorm->id, 'scoid' => $scoid,
|
||
|
|
'attempt' => $attempt), '', 'element, id, value, timemodified');
|
||
|
|
foreach (data_submitted() as $element => $value) {
|
||
|
|
$element = str_replace('__', '.', $element);
|
||
|
|
if (substr($element, 0, 3) == 'cmi') {
|
||
|
|
$netelement = preg_replace('/\.N(\d+)\./', "\.\$1\.", $element);
|
||
|
|
$result = scorm_insert_track($USER->id, $scorm->id, $scoid, $attempt, $element, $value, $scorm->forcecompleted,
|
||
|
|
$trackdata) && $result;
|
||
|
|
}
|
||
|
|
if (substr($element, 0, 15) == 'adl.nav.request') {
|
||
|
|
// SCORM 2004 Sequencing Request.
|
||
|
|
require_once($CFG->dirroot.'/mod/scorm/datamodels/scorm_13lib.php');
|
||
|
|
|
||
|
|
$search = array('@continue@', '@previous@', '@\{target=(\S+)\}choice@', '@exit@',
|
||
|
|
'@exitAll@', '@abandon@', '@abandonAll@');
|
||
|
|
$replace = array('continue_', 'previous_', '\1', 'exit_', 'exitall_', 'abandon_', 'abandonall');
|
||
|
|
$action = preg_replace($search, $replace, $value);
|
||
|
|
|
||
|
|
if ($action != $value) {
|
||
|
|
// Evaluating navigation request.
|
||
|
|
$valid = scorm_seq_overall ($scoid, $USER->id, $action, $attempt);
|
||
|
|
$valid = 'true';
|
||
|
|
|
||
|
|
// Set valid request.
|
||
|
|
$search = array('@continue@', '@previous@', '@\{target=(\S+)\}choice@');
|
||
|
|
$replace = array('true', 'true', 'true');
|
||
|
|
$matched = preg_replace($search, $replace, $value);
|
||
|
|
if ($matched == 'true') {
|
||
|
|
$request = 'adl.nav.request_valid["'.$action.'"] = "'.$valid.'";';
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($result) {
|
||
|
|
echo "true\n0";
|
||
|
|
} else {
|
||
|
|
echo "false\n101";
|
||
|
|
}
|
||
|
|
if ($request != null) {
|
||
|
|
echo "\n".$request;
|
||
|
|
}
|
||
|
|
}
|