2009-09-24 08:28:51 +00:00
|
|
|
<?php
|
2011-06-30 14:59:08 +12:00
|
|
|
// 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
|
|
|
|
|
|
|
|
$delayseconds = 2; // Delay time before sco launch, used to give time to browser to define API
|
|
|
|
|
|
|
|
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('coursemisconf');
|
2006-09-20 19:46:52 +00:00
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
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');
|
|
|
|
}
|
2006-09-20 19:46:52 +00:00
|
|
|
|
2011-06-30 14:59:08 +12:00
|
|
|
$PAGE->set_url('/mod/scorm/loadSCO.php', array('scoid'=>$scoid, 'id'=>$cm->id));
|
2009-09-24 08:28:51 +00:00
|
|
|
|
2012-08-01 09:27:37 +12:00
|
|
|
if (!isloggedin()) { // Prevent login page from being shown in iframe.
|
|
|
|
// Using simple html instead of exceptions here as shown inside iframe/object.
|
|
|
|
echo html_writer::start_tag('html');
|
|
|
|
echo html_writer::tag('head', '');
|
|
|
|
echo html_writer::tag('body', get_string('loggedinnot'));
|
|
|
|
echo html_writer::end_tag('html');
|
|
|
|
exit;
|
|
|
|
}
|
|
|
|
|
|
|
|
require_login($course, false, $cm, false); // Call require_login anyway to set up globals correctly.
|
2008-12-05 03:19:56 +00:00
|
|
|
|
2011-06-30 14:59:08 +12:00
|
|
|
//check if scorm closed
|
|
|
|
$timenow = time();
|
|
|
|
if ($scorm->timeclose !=0) {
|
|
|
|
if ($scorm->timeopen > $timenow) {
|
|
|
|
print_error('notopenyet', 'scorm', null, userdate($scorm->timeopen));
|
|
|
|
} else if ($timenow > $scorm->timeclose) {
|
|
|
|
print_error('expired', 'scorm', null, userdate($scorm->timeclose));
|
2008-11-28 09:20:59 +00:00
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
}
|
2008-12-05 03:19:56 +00:00
|
|
|
|
2012-07-24 16:56:57 +08:00
|
|
|
$context = context_module::instance($cm->id);
|
2008-09-09 08:30:00 +00:00
|
|
|
|
2011-06-30 14:59:08 +12:00
|
|
|
if (!empty($scoid)) {
|
2006-09-20 19:46:52 +00:00
|
|
|
//
|
|
|
|
// Direct SCO request
|
|
|
|
//
|
2011-06-30 14:59:08 +12:00
|
|
|
if ($sco = scorm_get_sco($scoid)) {
|
|
|
|
if ($sco->launch == '') {
|
|
|
|
// Search for the next launchable sco
|
2012-10-19 22:36:26 +02:00
|
|
|
if ($scoes = $DB->get_records_select(
|
|
|
|
'scorm_scoes',
|
|
|
|
'scorm = ? AND '.$DB->sql_isnotempty('scorm_scoes', 'launch', false, true).' AND id > ?',
|
|
|
|
array($scorm->id, $sco->id),
|
2013-08-27 12:55:10 +12:00
|
|
|
'sortorder, id')) {
|
2011-06-30 14:59:08 +12:00
|
|
|
$sco = current($scoes);
|
2006-09-20 19:46:52 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
}
|
|
|
|
//
|
|
|
|
// If no sco was found get the first of SCORM package
|
|
|
|
//
|
|
|
|
if (!isset($sco)) {
|
2012-10-19 22:36:26 +02:00
|
|
|
$scoes = $DB->get_records_select(
|
|
|
|
'scorm_scoes',
|
|
|
|
'scorm = ? AND '.$DB->sql_isnotempty('scorm_scoes', 'launch', false, true),
|
|
|
|
array($scorm->id),
|
2013-08-27 12:55:10 +12:00
|
|
|
'sortorder, id'
|
2012-10-19 22:36:26 +02:00
|
|
|
);
|
2011-06-30 14:59:08 +12:00
|
|
|
$sco = current($scoes);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($sco->scormtype == 'asset') {
|
|
|
|
$attempt = scorm_get_last_attempt($scorm->id, $USER->id);
|
2011-08-15 13:50:06 +12:00
|
|
|
$element = (scorm_version_check($scorm->version, SCORM_13)) ? 'cmi.completion_status':'cmi.core.lesson_status';
|
2011-06-30 14:59:08 +12:00
|
|
|
$value = 'completed';
|
|
|
|
$result = scorm_insert_track($USER->id, $scorm->id, $sco->id, $attempt, $element, $value);
|
|
|
|
}
|
|
|
|
|
|
|
|
//
|
|
|
|
// Forge SCO URL
|
|
|
|
//
|
|
|
|
$connector = '';
|
|
|
|
$version = substr($scorm->version, 0, 4);
|
|
|
|
if ((isset($sco->parameters) && (!empty($sco->parameters))) || ($version == 'AICC')) {
|
|
|
|
if (stripos($sco->launch, '?') !== false) {
|
|
|
|
$connector = '&';
|
|
|
|
} else {
|
|
|
|
$connector = '?';
|
2006-09-20 19:46:52 +00:00
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
if ((isset($sco->parameters) && (!empty($sco->parameters))) && ($sco->parameters[0] == '?')) {
|
|
|
|
$sco->parameters = substr($sco->parameters, 1);
|
2006-09-29 06:27:47 +00:00
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
}
|
2008-09-09 08:30:00 +00:00
|
|
|
|
2011-06-30 14:59:08 +12:00
|
|
|
if ($version == 'AICC') {
|
2011-11-05 15:21:19 +13:00
|
|
|
require_once("$CFG->dirroot/mod/scorm/datamodels/aicclib.php");
|
|
|
|
$aicc_sid = scorm_aicc_get_hacp_session($scorm->id);
|
|
|
|
if (empty($aicc_sid)) {
|
|
|
|
$aicc_sid = sesskey();
|
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
$sco_params = '';
|
|
|
|
if (isset($sco->parameters) && (!empty($sco->parameters))) {
|
|
|
|
$sco_params = '&'. $sco->parameters;
|
2006-09-20 19:46:52 +00:00
|
|
|
}
|
2011-11-05 15:21:19 +13:00
|
|
|
$launcher = $sco->launch.$connector.'aicc_sid='.$aicc_sid.'&aicc_url='.$CFG->wwwroot.'/mod/scorm/aicc.php'.$sco_params;
|
2011-06-30 14:59:08 +12:00
|
|
|
} else {
|
|
|
|
if (isset($sco->parameters) && (!empty($sco->parameters))) {
|
|
|
|
$launcher = $sco->launch.$connector.$sco->parameters;
|
2006-09-20 19:46:52 +00:00
|
|
|
} else {
|
2011-06-30 14:59:08 +12:00
|
|
|
$launcher = $sco->launch;
|
2006-09-20 19:46:52 +00:00
|
|
|
}
|
2011-06-30 14:59:08 +12:00
|
|
|
}
|
|
|
|
|
|
|
|
if (scorm_external_link($sco->launch)) {
|
|
|
|
//TODO: does this happen?
|
|
|
|
$result = $launcher;
|
|
|
|
} else if ($scorm->scormtype === SCORM_TYPE_EXTERNAL) {
|
2013-09-04 18:46:35 +12:00
|
|
|
// Remote learning activity.
|
2011-06-30 14:59:08 +12:00
|
|
|
$result = dirname($scorm->reference).'/'.$launcher;
|
2013-09-04 18:46:35 +12:00
|
|
|
} else if ($scorm->scormtype === SCORM_TYPE_LOCAL && strtolower($scorm->reference) == 'imsmanifest.xml') {
|
|
|
|
// This SCORM content sits in a repository that allows relative links.
|
|
|
|
$result = "$CFG->wwwroot/pluginfile.php/$context->id/mod_scorm/imsmanifest/$scorm->revision/$launcher";
|
2011-06-30 14:59:08 +12:00
|
|
|
} else if ($scorm->scormtype === SCORM_TYPE_LOCAL or $scorm->scormtype === SCORM_TYPE_LOCALSYNC) {
|
2013-09-04 18:46:35 +12:00
|
|
|
// Note: do not convert this to use get_file_url() or moodle_url()
|
|
|
|
// SCORM does not work without slasharguments and moodle_url() encodes querystring vars.
|
2011-06-30 14:59:08 +12:00
|
|
|
$result = "$CFG->wwwroot/pluginfile.php/$context->id/mod_scorm/content/$scorm->revision/$launcher";
|
|
|
|
}
|
|
|
|
|
2014-01-07 14:10:20 +08:00
|
|
|
// Trigger a Sco launched event.
|
|
|
|
$event = \mod_scorm\event\sco_launched::create(array(
|
|
|
|
'objectid' => $sco->id,
|
|
|
|
'context' => $context,
|
|
|
|
'other' => array('instanceid' => $scorm->id, 'loadedcontent' => $result)
|
|
|
|
));
|
|
|
|
$event->add_record_snapshot('course_modules', $cm);
|
|
|
|
$event->add_record_snapshot('scorm', $scorm);
|
|
|
|
$event->add_record_snapshot('scorm_scoes', $sco);
|
|
|
|
$event->trigger();
|
2011-12-05 21:38:27 +13:00
|
|
|
|
2013-04-05 14:34:07 +08:00
|
|
|
header('Content-Type: text/html; charset=UTF-8');
|
|
|
|
|
2013-03-24 12:01:52 +01:00
|
|
|
if ($sco->scormtype == 'asset') {
|
|
|
|
// HTTP 302 Found => Moved Temporarily.
|
|
|
|
header('Location: ' . $result);
|
|
|
|
// Provide a short feedback in case of slow network connection.
|
|
|
|
echo '<html><body><p>' . get_string('activitypleasewait', 'scorm'). '</p></body></html>';
|
|
|
|
exit;
|
|
|
|
}
|
|
|
|
|
|
|
|
// We expect a SCO: select which API are we looking for.
|
|
|
|
$LMS_api = (scorm_version_check($scorm->version, SCORM_12) || empty($scorm->version)) ? 'API' : 'API_1484_11';
|
|
|
|
|
2006-09-20 19:46:52 +00:00
|
|
|
?>
|
|
|
|
<html>
|
|
|
|
<head>
|
|
|
|
<title>LoadSCO</title>
|
2007-01-03 14:44:17 +00:00
|
|
|
<script type="text/javascript">
|
|
|
|
//<![CDATA[
|
2010-05-13 23:01:38 +00:00
|
|
|
var myApiHandle = null;
|
|
|
|
var myFindAPITries = 0;
|
2008-12-05 03:19:56 +00:00
|
|
|
|
2010-05-13 23:01:38 +00:00
|
|
|
function myGetAPIHandle() {
|
|
|
|
myFindAPITries = 0;
|
|
|
|
if (myApiHandle == null) {
|
|
|
|
myApiHandle = myGetAPI();
|
2008-12-05 03:19:56 +00:00
|
|
|
}
|
2010-05-13 23:01:38 +00:00
|
|
|
return myApiHandle;
|
2008-12-05 03:19:56 +00:00
|
|
|
}
|
|
|
|
|
2010-05-13 23:01:38 +00:00
|
|
|
function myFindAPI(win) {
|
2008-12-09 20:41:44 +00:00
|
|
|
while ((win.<?php echo $LMS_api; ?> == null) && (win.parent != null) && (win.parent != win)) {
|
2010-05-13 23:01:38 +00:00
|
|
|
myFindAPITries++;
|
2008-12-05 03:19:56 +00:00
|
|
|
// Note: 7 is an arbitrary number, but should be more than sufficient
|
2010-05-13 23:01:38 +00:00
|
|
|
if (myFindAPITries > 7) {
|
2008-12-05 03:19:56 +00:00
|
|
|
return null;
|
|
|
|
}
|
|
|
|
win = win.parent;
|
|
|
|
}
|
2008-12-09 20:41:44 +00:00
|
|
|
return win.<?php echo $LMS_api; ?>;
|
2008-12-05 03:19:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
// hun for the API - needs to be loaded before we can launch the package
|
2010-05-13 23:01:38 +00:00
|
|
|
function myGetAPI() {
|
|
|
|
var theAPI = myFindAPI(window);
|
2008-12-05 03:19:56 +00:00
|
|
|
if ((theAPI == null) && (window.opener != null) && (typeof(window.opener) != "undefined")) {
|
2010-05-13 23:01:38 +00:00
|
|
|
theAPI = myFindAPI(window.opener);
|
2008-12-05 03:19:56 +00:00
|
|
|
}
|
|
|
|
if (theAPI == null) {
|
|
|
|
return null;
|
|
|
|
}
|
|
|
|
return theAPI;
|
|
|
|
}
|
|
|
|
|
|
|
|
function doredirect() {
|
2010-05-13 23:01:38 +00:00
|
|
|
if (myGetAPIHandle() != null) {
|
2008-12-05 03:19:56 +00:00
|
|
|
location = "<?php echo $result ?>";
|
|
|
|
}
|
|
|
|
else {
|
2010-05-13 23:01:38 +00:00
|
|
|
document.body.innerHTML = "<p><?php echo get_string('activityloading', 'scorm');?> <span id='countdown'><?php echo $delayseconds ?></span> <?php echo get_string('numseconds', 'moodle', '');?>. <img src='<?php echo $OUTPUT->pix_url('wait', 'scorm') ?>'><p>";
|
2008-12-05 03:19:56 +00:00
|
|
|
var e = document.getElementById("countdown");
|
|
|
|
var cSeconds = parseInt(e.innerHTML);
|
|
|
|
var timer = setInterval(function() {
|
2010-05-13 23:01:38 +00:00
|
|
|
if( cSeconds && myGetAPIHandle() == null ) {
|
2008-12-05 03:19:56 +00:00
|
|
|
e.innerHTML = --cSeconds;
|
|
|
|
} else {
|
|
|
|
clearInterval(timer);
|
|
|
|
document.body.innerHTML = "<p><?php echo get_string('activitypleasewait', 'scorm');?></p>";
|
|
|
|
location = "<?php echo $result ?>";
|
|
|
|
}
|
|
|
|
}, 1000);
|
|
|
|
}
|
2008-08-04 02:35:13 +00:00
|
|
|
}
|
2008-09-09 08:30:00 +00:00
|
|
|
//]]>
|
2006-09-20 19:46:52 +00:00
|
|
|
</script>
|
|
|
|
<noscript>
|
2008-11-28 06:49:10 +00:00
|
|
|
<meta http-equiv="refresh" content="0;url=<?php echo $result ?>" />
|
2008-09-09 08:30:00 +00:00
|
|
|
</noscript>
|
2006-09-20 19:46:52 +00:00
|
|
|
</head>
|
2008-08-04 02:35:13 +00:00
|
|
|
<body onload="doredirect();">
|
2008-12-05 03:19:56 +00:00
|
|
|
<p><?php echo get_string('activitypleasewait', 'scorm');?></p>
|
2008-09-09 08:30:00 +00:00
|
|
|
</body>
|
2008-12-12 04:53:32 +00:00
|
|
|
</html>
|