mirror of
https://github.com/moodle/moodle.git
synced 2025-02-13 20:36:42 +01:00
429 lines
18 KiB
PHP
Executable File
429 lines
18 KiB
PHP
Executable File
<?PHP // $Id$
|
|
|
|
/// This page prints a particular instance of aicc/scorm package
|
|
|
|
require_once('../../config.php');
|
|
require_once('locallib.php');
|
|
require_once('sequencinglib.php');
|
|
|
|
//
|
|
// Checkin' script parameters
|
|
//
|
|
$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
|
|
$mode = optional_param('mode', 'normal', PARAM_ALPHA); // navigation mode
|
|
$currentorg = optional_param('currentorg', '', PARAM_RAW); // selected organization
|
|
$newattempt = optional_param('newattempt', 'off', PARAM_ALPHA); // the user request to start a new attempt
|
|
|
|
if (!empty($id)) {
|
|
if (! $cm = get_record("course_modules", "id", $id)) {
|
|
error("Course Module ID was incorrect");
|
|
}
|
|
if (! $course = get_record("course", "id", $cm->course)) {
|
|
error("Course is misconfigured");
|
|
}
|
|
if (! $scorm = get_record("scorm", "id", $cm->instance)) {
|
|
error("Course module is incorrect");
|
|
}
|
|
} else if (!empty($a)) {
|
|
if (! $scorm = get_record("scorm", "id", $a)) {
|
|
error("Course module is incorrect");
|
|
}
|
|
if (! $course = get_record("course", "id", $scorm->course)) {
|
|
error("Course is misconfigured");
|
|
}
|
|
if (! $cm = get_coursemodule_from_instance("scorm", $scorm->id, $course->id)) {
|
|
error("Course Module ID was incorrect");
|
|
}
|
|
} else {
|
|
error('A required parameter is missing');
|
|
}
|
|
|
|
require_login($course->id, false, $cm);
|
|
|
|
//$f = "D:\\test.txt";
|
|
//@$ft = fopen($f,"a");
|
|
//fwrite($ft,"\n ++ Thong tin quyen set attempt ".$USER->setAttempt);
|
|
$strscorms = get_string('modulenameplural', 'scorm');
|
|
$strscorm = get_string('modulename', 'scorm');
|
|
$strpopup = get_string('popup','scorm');
|
|
|
|
$attempt = scorm_get_last_attempt($scorm->id,$USER->id);
|
|
|
|
//Kiem tra xem co phai la tiep tuc khong
|
|
if ($mode=='continue') {
|
|
$scoid = scorm_get_suspendscoid($scorm->id,$USER->id);
|
|
$USER->setAttempt = 'set';
|
|
$mode = 'normal';
|
|
}
|
|
if (($mode == 'normal') && ($USER->setAttempt == 'notset')) {
|
|
$attempt++;
|
|
$USER->setAttempt = 'set';
|
|
}
|
|
//Thuc hien Sequencing
|
|
|
|
if ($mode!='review') {
|
|
$sequencingResult = scorm_sequecingrule_implement($scorm->id,$scoid,$USER->id);
|
|
//echo "<script language='JavaScript'>";
|
|
// echo "alert('Sequencing');";
|
|
//echo "<script>";
|
|
if (($sequencingResult->rule == 'pre') && ($sequencingResult->action == 'disabled')){
|
|
echo "<script language='JavaScript'>";
|
|
echo "alert('Disabling');";
|
|
echo "</script>";
|
|
}
|
|
if (($sequencingResult->rule == 'exit') && ($sequencingResult->action == 'exit')){
|
|
$exitscoid = get_sco_after_exit($scoid,$scorm->id);
|
|
//fwrite($ft,"\n ++ Thong tin exit sco la ".$exitscoid);
|
|
$orgstr = '¤torg='.$currentorg;
|
|
$modepop = '&mode='.$mode;
|
|
$scostr = '&scoid='.$exitscoid;
|
|
echo "<script language='JavaScript'>";
|
|
echo "alert('Exiting');";
|
|
echo "location.href='".$CFG->wwwroot.'/mod/scorm/player.php?id='.$cm->id.$orgstr.$modepop.$scostr."';";
|
|
echo "</script>";
|
|
}
|
|
}
|
|
|
|
//Thiet lap attempt_status cho scoid
|
|
scorm_set_attempt($scoid,$USER->id);
|
|
//Ket thuc thiet lap attemp_status
|
|
if ($mode!='review') {
|
|
//Update trang thai
|
|
scorm_rollup_updatestatus($scorm->id,$scoid,$USER->id);
|
|
//------------------------------
|
|
}
|
|
//Thiet lap thong tin lien quan truy xuat Scorm
|
|
$statistic = get_record('scorm_statistic',"scormid",$scorm->id,"userid",$USER->id);
|
|
if (empty($statistic)) {
|
|
$statisticInput->accesstime = time();
|
|
$statisticInput->durationtime = 0;
|
|
$statisticInput->status = 'during';
|
|
$statisticInput->attemptnumber = $attempt;
|
|
$statisticInput->scormid = $scorm->id;
|
|
$statisticInput->userid = $USER->id;
|
|
$statisticid = scorm_insert_statistic($statisticInput);
|
|
} else {
|
|
if ($statistic->status=='suspend') {
|
|
$statisticInput->accesstime = time();
|
|
$statisticInput->durationtime = $statistic->durationtime;
|
|
$statisticInput->status = 'during';
|
|
$statisticInput->attemptnumber = $attempt;
|
|
$statisticInput->scormid = $scorm->id;
|
|
$statisticInput->userid = $USER->id;
|
|
}
|
|
}
|
|
|
|
//---------------------Ket thuc thiet lap thoi gian ---------------
|
|
|
|
//Lay thoi gian toi da cho phep
|
|
$absoluteTimeLimit = scorm_get_AbsoluteTimeLimit($scoid);
|
|
if ($absoluteTimeLimit > 0) {
|
|
echo "<script type='text/javascript'>";
|
|
echo "alert('Bai nay co thoi gian lam la: ".$absoluteTimeLimit."');";
|
|
echo "function remind(msg1) {";
|
|
echo "var msg = 'Da het gio lam bai ' + msg1 +' Secs.Lua chon bai khac de tiep tuc';";
|
|
echo "alert(msg);";
|
|
echo "window.location.href = 'view.php?id=".$scorm->id."';";
|
|
echo "}";
|
|
echo "setTimeout('remind(".$absoluteTimeLimit.")',".$absoluteTimeLimit.");";
|
|
echo "</script>";
|
|
}
|
|
//--------------------------------
|
|
|
|
|
|
if ($course->category != 0) {
|
|
$navigation = "<a target=\"{$CFG->framename}\" href=\"../../course/view.php?id=$course->id\">$course->shortname</a> ->";
|
|
if ($scorms = get_all_instances_in_course('scorm', $course)) {
|
|
// The module SCORM activity with the least id is the course
|
|
$firstscorm = current($scorms);
|
|
if (!(($course->format == 'scorm') && ($firstscorm->id == $scorm->id))) {
|
|
$navigation .= "<a target=\"{$CFG->framename}\" href=\"index.php?id=$course->id\">$strscorms</a> ->";
|
|
}
|
|
}
|
|
} else {
|
|
$navigation = "<a target=\"{$CFG->framename}\" href=\"index.php?id=$course->id\">$strscorms</a> ->";
|
|
}
|
|
|
|
$pagetitle = strip_tags("$course->shortname: ".format_string($scorm->name));
|
|
|
|
if (!$cm->visible and !isteacher($course->id)) {
|
|
print_header($pagetitle, "$course->fullname",
|
|
"$navigation <a target='{$CFG->framename}' href='view.php?id=$cm->id'>".format_string($scorm->name,true)."</a>",
|
|
'', '', true, update_module_button($cm->id, $course->id, $strscorm), '', false);
|
|
notice(get_string("activityiscurrentlyhidden"));
|
|
}
|
|
|
|
//
|
|
// TOC processing
|
|
//
|
|
//$attempt = scorm_get_last_attempt($scorm->id, $USER->id);
|
|
//$f = "D:\\test.txt";
|
|
//@$ft = fopen($f,"a");
|
|
////fwrite($ft,"\n ++ ++ + ++ Gia tri $attempt lay duoc la ".$attempt);
|
|
|
|
//if ($mode=='normal'){
|
|
// $newattempt = 'on';
|
|
//}
|
|
if (($newattempt=='on') && (($attempt < $scorm->maxattempt) || ($scorm->maxattempt == 0))) {
|
|
$attempt++;
|
|
//$f = "D:\\test.txt";
|
|
//@$ft = fopen($f,"a");
|
|
//fwrite($ft,"\n ----New attempt------- ".$attempt);
|
|
|
|
}
|
|
$attemptstr = '&attempt=' . $attempt;
|
|
|
|
//fwrite($ft,"\n ----Gia tri attempt bay gio la------- ".$attempt);
|
|
$result = scorm_get_toc($USER,$scorm,'structurelist',$currentorg,$scoid,$mode,$attempt,true);
|
|
$sco = $result->sco;
|
|
|
|
if (($mode == 'browse') && ($scorm->hidebrowse == 1)) {
|
|
$mode = 'normal';
|
|
}
|
|
if ($mode != 'browse') {
|
|
////fwrite($ft,"\n ++ ++ + ++ Gia tri $mode khac browser ".$mode);
|
|
if ($trackdata = scorm_get_tracks($sco->id,$USER->id,$attempt)) {
|
|
if (($trackdata->status == 'completed') || ($trackdata->status == 'passed') || ($trackdata->status == 'failed')) {
|
|
$mode = 'review';
|
|
////fwrite($ft,"\n ++ ++ + ++ Gia tri $mode ".$mode);
|
|
} else {
|
|
$mode = 'normal';
|
|
////fwrite($ft,"\n ++ ++ + ++ Gia tri $mode ".$mode);
|
|
}
|
|
}
|
|
}
|
|
|
|
add_to_log($course->id, 'scorm', 'view', "player.php?id=$cm->id&scoid=$sco->id", "$scorm->id");
|
|
|
|
$scoidstr = '&scoid='.$sco->id;
|
|
$scoidpop = '&scoid='.$sco->id;
|
|
$modestr = '&mode='.$mode;
|
|
if ($mode == 'browse') {
|
|
$modepop = '&mode='.$mode;
|
|
} else {
|
|
$modepop = '';
|
|
}
|
|
$orgstr = '¤torg='.$currentorg;
|
|
|
|
$SESSION->scorm_scoid = $sco->id;
|
|
$SESSION->scorm_status = 'Not Initialized';
|
|
$SESSION->scorm_mode = $mode;
|
|
$SESSION->attempt = $attempt;
|
|
|
|
// Doan code them
|
|
////fwrite($ft,"\n ++ ++ + ++ Gia tri attempt duoc gan cho user la ".$attempt);
|
|
$USER->attempt = $attempt;
|
|
//------------Ket thuc doan them
|
|
|
|
//
|
|
// Print the page header
|
|
//
|
|
$bodyscript = '';
|
|
if ($scorm->popup == 1) {
|
|
$bodyscript = 'onunload="main.close();"';
|
|
}
|
|
|
|
// Kiem tra xem co duoc exit khong
|
|
if (scorm_isChoiceexit($sco->scorm,$sco->id)) {
|
|
$exitlink = '(<a href="'.$CFG->wwwroot.'/course/view.php?id='.$cm->course.'">'.get_string('exit','scorm').'</a>) ';
|
|
} else {
|
|
$exitlink = get_string('exitisnotallowed','scorm');
|
|
}
|
|
|
|
//Luu giu khoa hoc thoat ra
|
|
$suspend = '(<a href="suspend.php?scorm='.$sco->scorm.'&sco='.$sco->id.'&userid='.$USER->id.'&id='.$cm->course.'">'.get_string('suspend','scorm').'</a>) ';
|
|
|
|
print_header($pagetitle, "$course->fullname",
|
|
"$navigation <a target='{$CFG->framename}' href='view.php?id=$cm->id'>".format_string($scorm->name,true)."</a>",
|
|
'', '', true, $exitlink.$suspend.update_module_button($cm->id, $course->id, $strscorm), '', false, $bodyscript);
|
|
if ($sco->scormtype == 'sco') {
|
|
?>
|
|
<script language="JavaScript" type="text/javascript" src="request.js"></script>
|
|
<script language="JavaScript" type="text/javascript" src="api.php?id=<?php echo $cm->id.$scoidstr.$modestr.$attemptstr ?>"></script>
|
|
<?php
|
|
}
|
|
if (($sco->previd != 0) && ($sco->previous == 0)) {
|
|
$scostr = '&scoid='.$sco->previd;
|
|
echo ' <script language="javascript">var prev="'.$CFG->wwwroot.'/mod/scorm/player.php?id='.$cm->id.$orgstr.$modepop.$scostr."\";</script>\n";
|
|
} else {
|
|
echo ' <script language="javascript">var prev="'.$CFG->wwwroot.'/mod/scorm/view.php?id='.$cm->id."\";</script>\n";
|
|
}
|
|
if (($sco->nextid != 0) && ($sco->next == 0)) {
|
|
$scostr = '&scoid='.$sco->nextid;
|
|
echo ' <script language="javascript">var next="'.$CFG->wwwroot.'/mod/scorm/player.php?id='.$cm->id.$orgstr.$modepop.$scostr."\";</script>\n";
|
|
} else {
|
|
echo ' <script language="javascript">var next="'.$CFG->wwwroot.'/mod/scorm/view.php?id='.$cm->id."\";</script>\n";
|
|
}
|
|
?>
|
|
<div id="scormpage">
|
|
<?php
|
|
if ($scorm->hidetoc == 0) {
|
|
?>
|
|
<div id="tocbox" class="generalbox">
|
|
<div id="tochead" class="header"><?php print_string('coursestruct','scorm') ?></div>
|
|
<div id="toctree">
|
|
<?php echo $result->toc; ?>
|
|
</div>
|
|
</div>
|
|
<?php
|
|
$class = ' class="toc"';
|
|
} else {
|
|
$class = ' class="no-toc"';
|
|
}
|
|
?>
|
|
<div id="scormbox"<?php echo $class ?>>
|
|
<?php
|
|
// This very big test check if is necessary the "scormtop" div
|
|
if (
|
|
($mode != 'normal') || // We are not in normal mode so review or browse text will displayed
|
|
(
|
|
($scorm->hidenav == 0) && // Teacher want to display navigation links
|
|
(
|
|
(
|
|
($sco->previd != 0) && // This is not the first learning object of the package
|
|
($sco->previous == 0) // Moodle must manage the previous link
|
|
) ||
|
|
(
|
|
($sco->nextid != 0) && // This is not the last learning object of the package
|
|
($sco->next == 0) // Moodle must manage the next link
|
|
)
|
|
)
|
|
) || ($scorm->hidetoc == 2) // Teacher want to display toc in a small dropdown menu
|
|
) {
|
|
?>
|
|
<div id="scormtop">
|
|
<?php echo $mode == 'browse' ? '<div id="scormmode" class="left">'.get_string('browsemode','scorm')."</div>\n" : ''; ?>
|
|
<?php echo $mode == 'review' ? '<div id="scormmode" class="left">'.get_string('reviewmode','scorm')."</div>\n" : ''; ?>
|
|
<?php
|
|
if (($scorm->hidenav == 0) || ($scorm->hidetoc == 2)) {
|
|
?>
|
|
<div id="scormnav" class="right">
|
|
<?php
|
|
$orgstr = '&currentorg='.$currentorg;
|
|
if (($scorm->hidenav == 0) && ($sco->previd != 0) && ($sco->previous == 0)) {
|
|
/// Print the prev LO link
|
|
$scostr = '&scoid='.$sco->previd;
|
|
$url = $CFG->wwwroot.'/mod/scorm/player.php?id='.$cm->id.$orgstr.$modestr.$scostr;
|
|
echo '<a href="'.$url.'">< '.get_string('prev','scorm').'</a>';
|
|
}
|
|
if ($scorm->hidetoc == 2) {
|
|
echo $result->tocmenu;
|
|
}
|
|
if (($scorm->hidenav == 0) && ($sco->nextid != 0) && ($sco->next == 0)) {
|
|
/// Print the next LO link
|
|
$scostr = '&scoid='.$sco->nextid;
|
|
$url = $CFG->wwwroot.'/mod/scorm/player.php?id='.$cm->id.$orgstr.$modestr.$scostr;
|
|
echo ' <a href="'.$url.'">'.get_string('next','scorm').' ></a>';
|
|
}
|
|
?>
|
|
|
|
</div>
|
|
<?php
|
|
}
|
|
?>
|
|
</div>
|
|
<?php
|
|
} // The end of the very big test
|
|
?>
|
|
<div id="scormobject" class="right">
|
|
<noscript>
|
|
<div id="noscript">
|
|
<?php print_string('noscriptnoscorm','scorm'); // No Martin(i), No Party ;-) ?>
|
|
|
|
</div>
|
|
</noscript>
|
|
<?php
|
|
if ($result->prerequisites) {
|
|
if ($scorm->popup == 0) {
|
|
if (strpos('MSIE',$_SERVER['HTTP_USER_AGENT']) === false) {
|
|
/// Internet Explorer does not has full support to objects
|
|
?>
|
|
<iframe id="main"
|
|
class="scoframe"
|
|
width="<?php echo $scorm->width<=100 ? $scorm->width.'%' : $scorm->width ?>"
|
|
height="<?php echo $scorm->height<=100 ? $scorm->height.'%' : $scorm->height ?>"
|
|
src="loadSCO.php?id=<?php echo $cm->id.$scoidstr.$modestr ?>">
|
|
</iframe>
|
|
<?php
|
|
} else {
|
|
?>
|
|
<object id="main"
|
|
class="scoframe"
|
|
width="<?php echo $scorm->width<=100 ? $scorm->width.'%' : $scorm->width ?>"
|
|
height="<?php echo $scorm->height<=100 ? $scorm->height.'%' : $scorm->height ?>"
|
|
data="loadSCO.php?id=<?php echo $cm->id.$scoidstr.$modestr ?>"
|
|
type="text/html">
|
|
<?php print_string('noobjectsupport', 'scorm'); ?>
|
|
</object>
|
|
<?php
|
|
}
|
|
} else {
|
|
?>
|
|
<script lanuguage="javascript">
|
|
function openpopup(url,name,options,width,height) {
|
|
fullurl = "<?php echo $CFG->wwwroot.'/mod/scorm/' ?>" + url;
|
|
windowobj = window.open(fullurl,name,options);
|
|
if ((width==100) && (height==100)) {
|
|
// Fullscreen
|
|
windowobj.moveTo(0,0);
|
|
}
|
|
if (width<=100) {
|
|
width = Math.round(screen.availWidth * width / 100);
|
|
}
|
|
if (height<=100) {
|
|
height = Math.round(screen.availHeight * height / 100);
|
|
}
|
|
windowobj.resizeTo(width,height);
|
|
windowobj.focus();
|
|
return windowobj;
|
|
}
|
|
|
|
url = "loadSCO.php?id=<?php echo $cm->id.$scoidpop ?>";
|
|
width = <?php p($scorm->width) ?>;
|
|
height = <?php p($scorm->height) ?>;
|
|
var main = openpopup(url, "<?php p($scorm->name) ?>", "<?php p($scorm->options) ?>", width, height);
|
|
</script>
|
|
<noscript>
|
|
<?php
|
|
if (strpos('MSIE',$_SERVER['HTTP_USER_AGENT']) === false) {
|
|
/// Internet Explorer does not has full support to objects
|
|
?>
|
|
<iframe id="main"
|
|
class="scoframe"
|
|
width="<?php echo $scorm->width<=100 ? $scorm->width.'%' : $scorm->width ?>"
|
|
height="<?php echo $scorm->height<=100 ? $scorm->height.'%' : $scorm->height ?>"
|
|
src="loadSCO.php?id=<?php echo $cm->id.$scoidstr.$modestr ?>">
|
|
</iframe>
|
|
<?php
|
|
} else {
|
|
?>
|
|
<object id="main"
|
|
class="scoframe"
|
|
width="<?php echo $scorm->width<=100 ? $scorm->width.'%' : $scorm->width ?>"
|
|
height="<?php echo $scorm->height<=100 ? $scorm->height.'%' : $scorm->height ?>"
|
|
data="loadSCO.php?id=<?php echo $cm->id.$scoidstr.$modestr ?>"
|
|
type="text/html">
|
|
<?php print_string('noobjectsupport', 'scorm'); ?>
|
|
</object>
|
|
<?php
|
|
}
|
|
?>
|
|
</noscript>
|
|
<?php
|
|
}
|
|
} else {
|
|
print_simple_box(get_string('noprerequisites','scorm'),'center');
|
|
}
|
|
?>
|
|
</div> <!-- SCORM object -->
|
|
</div> <!-- SCORM box -->
|
|
</div> <!-- SCORM content -->
|
|
</div> <!-- Content -->
|
|
</div> <!-- Page -->
|
|
|
|
</body>
|
|
</html>
|
|
|