mirror of
https://github.com/moodle/moodle.git
synced 2025-04-23 09:23:09 +02:00
Splitted all the scorm/aicc library in type separeted files
This commit is contained in:
bobopinna
parent
d380567f82
commit
dc383b6f23
506
mod/scorm/datamodels/aicclib.php
Normal file
506
mod/scorm/datamodels/aicclib.php
Normal file
@ -0,0 +1,506 @@
|
||||
<?php
|
||||
function scorm_add_time($a, $b) {
|
||||
$aes = explode(':',$a);
|
||||
$bes = explode(':',$b);
|
||||
$aseconds = explode('.',$aes[2]);
|
||||
$bseconds = explode('.',$bes[2]);
|
||||
$change = 0;
|
||||
|
||||
$acents = 0; //Cents
|
||||
if (count($aseconds) > 1) {
|
||||
$acents = $aseconds[1];
|
||||
}
|
||||
$bcents = 0;
|
||||
if (count($bseconds) > 1) {
|
||||
$bcents = $bseconds[1];
|
||||
}
|
||||
$cents = $acents + $bcents;
|
||||
$change = floor($cents / 100);
|
||||
$cents = $cents - ($change * 100);
|
||||
if (floor($cents) < 10) {
|
||||
$cents = '0'. $cents;
|
||||
}
|
||||
|
||||
$secs = $aseconds[0] + $bseconds[0] + $change; //Seconds
|
||||
$change = floor($secs / 60);
|
||||
$secs = $secs - ($change * 60);
|
||||
if (floor($secs) < 10) {
|
||||
$secs = '0'. $secs;
|
||||
}
|
||||
|
||||
$mins = $aes[1] + $bes[1] + $change; //Minutes
|
||||
$change = floor($mins / 60);
|
||||
$mins = $mins - ($change * 60);
|
||||
if ($mins < 10) {
|
||||
$mins = '0' . $mins;
|
||||
}
|
||||
|
||||
$hours = $aes[0] + $bes[0] + $change; //Hours
|
||||
if ($hours < 10) {
|
||||
$hours = '0' . $hours;
|
||||
}
|
||||
|
||||
if ($cents != '0') {
|
||||
return $hours . ":" . $mins . ":" . $secs . '.' . $cents;
|
||||
} else {
|
||||
return $hours . ":" . $mins . ":" . $secs;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Take the header row of an AICC definition file
|
||||
* and returns sequence of columns and a pointer to
|
||||
* the sco identifier column.
|
||||
*
|
||||
* @param string $row AICC header row
|
||||
* @param string $mastername AICC sco identifier column
|
||||
* @return mixed
|
||||
*/
|
||||
function scorm_get_aicc_columns($row,$mastername='system_id') {
|
||||
$tok = strtok(strtolower($row),"\",\n\r");
|
||||
$result->columns = array();
|
||||
$i=0;
|
||||
while ($tok) {
|
||||
if ($tok !='') {
|
||||
$result->columns[] = $tok;
|
||||
if ($tok == $mastername) {
|
||||
$result->mastercol = $i;
|
||||
}
|
||||
$i++;
|
||||
}
|
||||
$tok = strtok("\",\n\r");
|
||||
}
|
||||
return $result;
|
||||
}
|
||||
|
||||
/**
|
||||
* Given a colums array return a string containing the regular
|
||||
* expression to match the columns in a text row.
|
||||
*
|
||||
* @param array $column The header columns
|
||||
* @param string $remodule The regular expression module for a single column
|
||||
* @return string
|
||||
*/
|
||||
function scorm_forge_cols_regexp($columns,$remodule='(".*")?,') {
|
||||
$regexp = '/^';
|
||||
foreach ($columns as $column) {
|
||||
$regexp .= $remodule;
|
||||
}
|
||||
$regexp = substr($regexp,0,-1) . '/';
|
||||
return $regexp;
|
||||
}
|
||||
|
||||
function scorm_parse_aicc($pkgdir,$scormid) {
|
||||
$version = 'AICC';
|
||||
$ids = array();
|
||||
$courses = array();
|
||||
$extaiccfiles = array('crs','des','au','cst','ort','pre','cmp');
|
||||
if ($handle = opendir($pkgdir)) {
|
||||
while (($file = readdir($handle)) !== false) {
|
||||
if ($file[0] != '.') {
|
||||
$ext = substr($file,strrpos($file,'.'));
|
||||
$extension = strtolower(substr($ext,1));
|
||||
if (in_array($extension,$extaiccfiles)) {
|
||||
$id = strtolower(basename($file,$ext));
|
||||
$ids[$id]->$extension = $file;
|
||||
}
|
||||
}
|
||||
}
|
||||
closedir($handle);
|
||||
}
|
||||
foreach ($ids as $courseid => $id) {
|
||||
if (isset($id->crs)) {
|
||||
if (is_file($pkgdir.'/'.$id->crs)) {
|
||||
$rows = file($pkgdir.'/'.$id->crs);
|
||||
foreach ($rows as $row) {
|
||||
if (preg_match("/^(.+)=(.+)$/",$row,$matches)) {
|
||||
switch (strtolower(trim($matches[1]))) {
|
||||
case 'course_id':
|
||||
$courses[$courseid]->id = trim($matches[2]);
|
||||
break;
|
||||
case 'course_title':
|
||||
$courses[$courseid]->title = trim($matches[2]);
|
||||
break;
|
||||
case 'version':
|
||||
$courses[$courseid]->version = 'AICC_'.trim($matches[2]);
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (isset($id->des)) {
|
||||
$rows = file($pkgdir.'/'.$id->des);
|
||||
$columns = scorm_get_aicc_columns($rows[0]);
|
||||
$regexp = scorm_forge_cols_regexp($columns->columns);
|
||||
for ($i=1;$i<count($rows);$i++) {
|
||||
if (preg_match($regexp,$rows[$i],$matches)) {
|
||||
for ($j=0;$j<count($columns->columns);$j++) {
|
||||
$column = $columns->columns[$j];
|
||||
$courses[$courseid]->elements[substr(trim($matches[$columns->mastercol+1]),1,-1)]->$column = substr(trim($matches[$j+1]),1,-1);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (isset($id->au)) {
|
||||
$rows = file($pkgdir.'/'.$id->au);
|
||||
$columns = scorm_get_aicc_columns($rows[0]);
|
||||
$regexp = scorm_forge_cols_regexp($columns->columns);
|
||||
for ($i=1;$i<count($rows);$i++) {
|
||||
if (preg_match($regexp,$rows[$i],$matches)) {
|
||||
for ($j=0;$j<count($columns->columns);$j++) {
|
||||
$column = $columns->columns[$j];
|
||||
$courses[$courseid]->elements[substr(trim($matches[$columns->mastercol+1]),1,-1)]->$column = substr(trim($matches[$j+1]),1,-1);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (isset($id->cst)) {
|
||||
$rows = file($pkgdir.'/'.$id->cst);
|
||||
$columns = scorm_get_aicc_columns($rows[0],'block');
|
||||
$regexp = scorm_forge_cols_regexp($columns->columns,'(.+)?,');
|
||||
for ($i=1;$i<count($rows);$i++) {
|
||||
if (preg_match($regexp,$rows[$i],$matches)) {
|
||||
for ($j=0;$j<count($columns->columns);$j++) {
|
||||
if ($j != $columns->mastercol) {
|
||||
$courses[$courseid]->elements[substr(trim($matches[$j+1]),1,-1)]->parent = substr(trim($matches[$columns->mastercol+1]),1,-1);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (isset($id->ort)) {
|
||||
$rows = file($pkgdir.'/'.$id->ort);
|
||||
}
|
||||
if (isset($id->pre)) {
|
||||
$rows = file($pkgdir.'/'.$id->pre);
|
||||
$columns = scorm_get_aicc_columns($rows[0],'structure_element');
|
||||
$regexp = scorm_forge_cols_regexp($columns->columns,'(.+),');
|
||||
for ($i=1;$i<count($rows);$i++) {
|
||||
if (preg_match($regexp,$rows[$i],$matches)) {
|
||||
$courses[$courseid]->elements[$columns->mastercol+1]->prerequisites = substr(trim($matches[1-$columns->mastercol+1]),1,-1);
|
||||
}
|
||||
}
|
||||
}
|
||||
if (isset($id->cmp)) {
|
||||
$rows = file($pkgdir.'/'.$id->cmp);
|
||||
}
|
||||
}
|
||||
//print_r($courses);
|
||||
|
||||
$oldscoes = get_records('scorm_scoes','scorm',$scormid);
|
||||
|
||||
$launch = 0;
|
||||
if (isset($courses)) {
|
||||
foreach ($courses as $course) {
|
||||
unset($sco);
|
||||
$sco->identifier = $course->id;
|
||||
$sco->scorm = $scormid;
|
||||
$sco->organization = '';
|
||||
$sco->title = $course->title;
|
||||
$sco->parent = '/';
|
||||
$sco->launch = '';
|
||||
$sco->scormtype = '';
|
||||
|
||||
//print_r($sco);
|
||||
if (get_record('scorm_scoes','scorm',$scormid,'identifier',$sco->identifier)) {
|
||||
$id = update_record('scorm_scoes',$sco);
|
||||
unset($oldscoes[$id]);
|
||||
} else {
|
||||
$id = insert_record('scorm_scoes',$sco);
|
||||
}
|
||||
|
||||
if ($launch == 0) {
|
||||
$launch = $id;
|
||||
}
|
||||
if (isset($course->elements)) {
|
||||
foreach($course->elements as $element) {
|
||||
unset($sco);
|
||||
$sco->identifier = $element->system_id;
|
||||
$sco->scorm = $scormid;
|
||||
$sco->organization = $course->id;
|
||||
$sco->title = $element->title;
|
||||
if (strtolower($element->parent) == 'root') {
|
||||
$sco->parent = '/';
|
||||
} else {
|
||||
$sco->parent = $element->parent;
|
||||
}
|
||||
if (isset($element->file_name)) {
|
||||
$sco->launch = $element->file_name;
|
||||
$sco->scormtype = 'sco';
|
||||
} else {
|
||||
$element->file_name = '';
|
||||
$sco->scormtype = '';
|
||||
}
|
||||
if (!isset($element->prerequisites)) {
|
||||
$element->prerequisites = '';
|
||||
}
|
||||
$sco->prerequisites = $element->prerequisites;
|
||||
if (!isset($element->max_time_allowed)) {
|
||||
$element->max_time_allowed = '';
|
||||
}
|
||||
$sco->maxtimeallowed = $element->max_time_allowed;
|
||||
if (!isset($element->time_limit_action)) {
|
||||
$element->time_limit_action = '';
|
||||
}
|
||||
$sco->timelimitaction = $element->time_limit_action;
|
||||
if (!isset($element->mastery_score)) {
|
||||
$element->mastery_score = '';
|
||||
}
|
||||
$sco->masteryscore = $element->mastery_score;
|
||||
$sco->previous = 0;
|
||||
$sco->next = 0;
|
||||
if ($oldscoid = scorm_array_search('identifier',$sco->identifier,$oldscoes)) {
|
||||
$sco->id = $oldscoid;
|
||||
$id = update_record('scorm_scoes',$sco);
|
||||
unset($oldscoes[$oldscoid]);
|
||||
} else {
|
||||
$id = insert_record('scorm_scoes',$sco);
|
||||
}
|
||||
if ($launch==0) {
|
||||
$launch = $id;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (!empty($oldscoes)) {
|
||||
foreach($oldscoes as $oldsco) {
|
||||
delete_records('scorm_scoes','id',$oldsco->id);
|
||||
delete_records('scorm_scoes_track','scoid',$oldsco->id);
|
||||
}
|
||||
}
|
||||
set_field('scorm','version','AICC','id',$scormid);
|
||||
return $launch;
|
||||
}
|
||||
|
||||
function scorm_get_toc($user,$scorm,$liststyle,$currentorg='',$scoid='',$mode='normal',$attempt='',$play=false) {
|
||||
global $CFG;
|
||||
|
||||
// Added by Pham Minh Duc
|
||||
$suspendscoid = scorm_get_suspendscoid($scorm->id,$user->id);
|
||||
// End add
|
||||
|
||||
$strexpand = get_string('expcoll','scorm');
|
||||
$modestr = '';
|
||||
if ($mode == 'browse') {
|
||||
$modestr = '&mode='.$mode;
|
||||
}
|
||||
$scormpixdir = $CFG->modpixpath.'/scorm/pix';
|
||||
|
||||
$result = new stdClass();
|
||||
$result->toc = "<ul id='0' class='$liststyle'>\n";
|
||||
$tocmenus = array();
|
||||
$result->prerequisites = true;
|
||||
$incomplete = false;
|
||||
|
||||
//
|
||||
// Get the current organization infos
|
||||
//
|
||||
$organizationsql = '';
|
||||
if (!empty($currentorg)) {
|
||||
if (($organizationtitle = get_field('scorm_scoes','title','scorm',$scorm->id,'identifier',$currentorg)) != '') {
|
||||
$result->toc .= "\t<li>$organizationtitle</li>\n";
|
||||
$tocmenus[] = $organizationtitle;
|
||||
}
|
||||
$organizationsql = "AND organization='$currentorg'";
|
||||
}
|
||||
//
|
||||
// If not specified retrieve the last attempt number
|
||||
//
|
||||
if (empty($attempt)) {
|
||||
$attempt = scorm_get_last_attempt($scorm->id, $user->id);
|
||||
}
|
||||
$result->attemptleft = $scorm->maxattempt - $attempt;
|
||||
if ($scoes = get_records_select('scorm_scoes',"scorm='$scorm->id' $organizationsql order by id ASC")){
|
||||
//
|
||||
// Retrieve user tracking data for each learning object
|
||||
//
|
||||
$usertracks = array();
|
||||
foreach ($scoes as $sco) {
|
||||
if (!empty($sco->launch)) {
|
||||
if ($usertrack=scorm_get_tracks($sco->id,$user->id,$attempt)) {
|
||||
if ($usertrack->status == '') {
|
||||
$usertrack->status = 'notattempted';
|
||||
}
|
||||
$usertracks[$sco->identifier] = $usertrack;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$level=0;
|
||||
$sublist=1;
|
||||
$previd = 0;
|
||||
$nextid = 0;
|
||||
$findnext = false;
|
||||
$parents[$level]='/';
|
||||
|
||||
foreach ($scoes as $sco) {
|
||||
if ($parents[$level]!=$sco->parent) {
|
||||
if ($newlevel = array_search($sco->parent,$parents)) {
|
||||
for ($i=0; $i<($level-$newlevel); $i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
$level = $newlevel;
|
||||
} else {
|
||||
$i = $level;
|
||||
$closelist = '';
|
||||
while (($i > 0) && ($parents[$level] != $sco->parent)) {
|
||||
$closelist .= "\t\t</ul></li>\n";
|
||||
$i--;
|
||||
}
|
||||
if (($i == 0) && ($sco->parent != $currentorg)) {
|
||||
$style = '';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$sco->id])) {
|
||||
$style = ' style="display: none;"';
|
||||
}
|
||||
$result->toc .= "\t\t<li><ul id='$sublist' class='$liststyle'$style>\n";
|
||||
$level++;
|
||||
} else {
|
||||
$result->toc .= $closelist;
|
||||
$level = $i;
|
||||
}
|
||||
$parents[$level]=$sco->parent;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t\t<li>";
|
||||
$nextsco = next($scoes);
|
||||
if (($nextsco !== false) && ($sco->parent != $nextsco->parent) && (($level==0) || (($level>0) && ($nextsco->parent == $sco->identifier)))) {
|
||||
$sublist++;
|
||||
$icon = 'minus';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$nextsco->id])) {
|
||||
$icon = 'plus';
|
||||
}
|
||||
$result->toc .= '<a href="javascript:expandCollide(img'.$sublist.','.$sublist.','.$nextsco->id.');"><img id="img'.$sublist.'" src="'.$scormpixdir.'/'.$icon.'.gif" alt="'.$strexpand.'" title="'.$strexpand.'"/></a>';
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/spacer.gif" />';
|
||||
}
|
||||
if (empty($sco->title)) {
|
||||
$sco->title = $sco->identifier;
|
||||
}
|
||||
if (!empty($sco->launch)) {
|
||||
$startbold = '';
|
||||
$endbold = '';
|
||||
$score = '';
|
||||
if (empty($scoid) && ($mode != 'normal')) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
// Modified by Pham Minh Duc
|
||||
if ($suspendscoid == $sco->id){
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/suspend.gif" alt="Dang tam dung o day" title="Dang dung o day" />';
|
||||
} else {
|
||||
if (isset($usertracks[$sco->identifier])) {
|
||||
$usertrack = $usertracks[$sco->identifier];
|
||||
$strstatus = get_string($usertrack->status,'scorm');
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/'.$usertrack->status.'.gif" alt="'.$strstatus.'" title="'.$strstatus.'" />';
|
||||
|
||||
if (($usertrack->status == 'notattempted') || ($usertrack->status == 'incomplete') || ($usertrack->status == 'browsed')) {
|
||||
$incomplete = true;
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
}
|
||||
if ($usertrack->score_raw != '') {
|
||||
$score = '('.get_string('score','scorm').': '.$usertrack->score_raw.')';
|
||||
}
|
||||
} else {
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
if ($sco->scormtype == 'sco') {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/notattempted.gif" alt="'.get_string('notattempted','scorm').'" title="'.get_string('notattempted','scorm').'" />';
|
||||
$incomplete = true;
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/asset.gif" alt="'.get_string('asset','scorm').'" title="'.get_string('asset','scorm').'" />';
|
||||
}
|
||||
}
|
||||
}
|
||||
// End Modify
|
||||
if ($sco->id == $scoid) {
|
||||
$startbold = '<b>';
|
||||
$endbold = '</b>';
|
||||
$findnext = true;
|
||||
$shownext = $sco->next;
|
||||
$showprev = $sco->previous;
|
||||
}
|
||||
|
||||
if (($nextid == 0) && (scorm_count_launchable($scorm->id,$currentorg) > 1) && ($nextsco!==false) && (!$findnext)) {
|
||||
if (!empty($sco->launch)) {
|
||||
$previd = $sco->id;
|
||||
}
|
||||
}
|
||||
if (empty($sco->prerequisites) || scorm_eval_prerequisites($sco->prerequisites,$usertracks)) {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = true;
|
||||
}
|
||||
// Modified by Pham Minh Duc
|
||||
if (scorm_isChoice($scorm->id,$sco->id) == 1) {
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid='.$sco->id;
|
||||
$result->toc .= ' '.$startbold.'<a href="'.$url.'">'.format_string($sco->title).'</a>'.$score.$endbold."</li>\n";
|
||||
$tocmenus[$sco->id] = scorm_repeater('−',$level) . '>' . format_string($sco->title);
|
||||
} else {
|
||||
$result->toc .= ' '.$startbold.format_string($sco->title).$score.$endbold."</li>\n";
|
||||
$tocmenus[$sco->id] = scorm_repeater('−',$level) . '>' . format_string($sco->title);
|
||||
}
|
||||
// End modify
|
||||
} else {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = false;
|
||||
}
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
} else {
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
if (($nextsco !== false) && ($nextid == 0) && ($findnext)) {
|
||||
if (!empty($nextsco->launch)) {
|
||||
$nextid = $nextsco->id;
|
||||
}
|
||||
}
|
||||
}
|
||||
for ($i=0;$i<$level;$i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
|
||||
if ($play) {
|
||||
$sco = get_record('scorm_scoes','id',$scoid);
|
||||
$sco->previd = $previd;
|
||||
$sco->nextid = $nextid;
|
||||
$result->sco = $sco;
|
||||
$result->incomplete = $incomplete;
|
||||
} else {
|
||||
$result->incomplete = $incomplete;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t</ul>\n";
|
||||
if ($scorm->hidetoc == 0) {
|
||||
$result->toc .= '
|
||||
<script language="javascript" type="text/javascript">
|
||||
<!--
|
||||
function expandCollide(which,list,item) {
|
||||
var nn=document.ids?true:false
|
||||
var w3c=document.getElementById?true:false
|
||||
var beg=nn?"document.ids.":w3c?"document.getElementById(":"document.all.";
|
||||
var mid=w3c?").style":".style";
|
||||
|
||||
if (eval(beg+list+mid+".display") != "none") {
|
||||
which.src = "'.$scormpixdir.'/plus.gif";
|
||||
eval(beg+list+mid+".display=\'none\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, 356, "/").set();
|
||||
} else {
|
||||
which.src = "'.$scormpixdir.'/minus.gif";
|
||||
eval(beg+list+mid+".display=\'block\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, -1, "/").set();
|
||||
}
|
||||
}
|
||||
-->
|
||||
</script>'."\n";
|
||||
}
|
||||
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid=';
|
||||
$result->tocmenu = popup_form($url,$tocmenus, "tocmenu", $sco->id, '', '', '', true);
|
||||
|
||||
return $result;
|
||||
}
|
||||
|
||||
?>
|
||||
561
mod/scorm/datamodels/scorm_12.js.php
Normal file
561
mod/scorm/datamodels/scorm_12.js.php
Normal file
@ -0,0 +1,561 @@
|
||||
<?php
|
||||
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 = '';
|
||||
}
|
||||
}
|
||||
}
|
||||
?>
|
||||
//
|
||||
// SCORM 1.2 API Implementation
|
||||
//
|
||||
function SCORMapi1_2() {
|
||||
// Standard Data Type Definition
|
||||
CMIString256 = '^.{0,255}$';
|
||||
//CMIString4096 = '^[.|\\n|\\r]{0,4095}$';
|
||||
CMIString4096 = '^.{0,4096}$';
|
||||
CMITime = '^([0-2]{1}[0-9]{1}):([0-5]{1}[0-9]{1}):([0-5]{1}[0-9]{1})(\.[0-9]{1,2})?$';
|
||||
CMITimespan = '^([0-9]{2,4}):([0-9]{2}):([0-9]{2})(\.[0-9]{1,2})?$';
|
||||
CMIInteger = '^\\d+$';
|
||||
CMISInteger = '^-?([0-9]+)$';
|
||||
CMIDecimal = '^-?([0-9]{0,3})(\.[0-9]{1,2})?$';
|
||||
CMIIdentifier = '^\\w{1,255}$';
|
||||
CMIFeedback = CMIString256; // This must be redefined
|
||||
CMIIndex = '[._](\\d+).';
|
||||
// Vocabulary Data Type Definition
|
||||
CMIStatus = '^passed$|^completed$|^failed$|^incomplete$|^browsed$';
|
||||
CMIStatus2 = '^passed$|^completed$|^failed$|^incomplete$|^browsed$|^not attempted$';
|
||||
CMIExit = '^time-out$|^suspend$|^logout$|^$';
|
||||
CMIType = '^true-false$|^choice$|^fill-in$|^matching$|^performance$|^sequencing$|^likert$|^numeric$';
|
||||
CMIResult = '^correct$|^wrong$|^unanticipated$|^neutral$|^([0-9]{0,3})?(\.[0-9]{1,2})?$';
|
||||
NAVEvent = '^previous$|^continue$';
|
||||
// Children lists
|
||||
cmi_children = 'core, suspend_data, launch_data, comments, objectives, student_data, student_preference, interactions';
|
||||
core_children = 'student_id, student_name, lesson_location, credit, lesson_status, entry, score, total_time, lesson_mode, exit, session_time';
|
||||
score_children = 'raw, min, max';
|
||||
objectives_children = 'id, score, status';
|
||||
student_data_children = 'mastery_score, max_time_allowed, time_limit_action';
|
||||
student_preference_children = 'audio, language, speed, text';
|
||||
interactions_children = 'id, objectives, time, type, correct_responses, weighting, student_response, result, latency';
|
||||
// Data ranges
|
||||
score_range = '0#100';
|
||||
audio_range = '-1#100';
|
||||
speed_range = '-100#100';
|
||||
weighting_range = '-100#100';
|
||||
text_range = '-1#1';
|
||||
// The SCORM 1.2 data model
|
||||
var datamodel = {
|
||||
'cmi._children':{'defaultvalue':cmi_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi._version':{'defaultvalue':'3.4', 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.core._children':{'defaultvalue':core_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.core.student_id':{'defaultvalue':'<?php echo $userdata->student_id ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.student_name':{'defaultvalue':'<?php echo addslashes($userdata->student_name) ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.lesson_location':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.lesson_location'})?$userdata->{'cmi.core.lesson_location'}:'' ?>', 'format':CMIString256, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.core.credit':{'defaultvalue':'<?php echo $userdata->credit ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.lesson_status':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.lesson_status'})?$userdata->{'cmi.core.lesson_status'}:'' ?>', 'format':CMIStatus, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.core.entry':{'defaultvalue':'<?php echo $userdata->entry ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.score._children':{'defaultvalue':score_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.core.score.raw':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.score.raw'})?$userdata->{'cmi.core.score.raw'}:'' ?>', 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.core.score.max':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.score.max'})?$userdata->{'cmi.core.score.max'}:'' ?>', 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.core.score.min':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.score.min'})?$userdata->{'cmi.core.score.min'}:'' ?>', 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.core.total_time':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.total_time'})?$userdata->{'cmi.core.total_time'}:'00:00:00' ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.lesson_mode':{'defaultvalue':'<?php echo $userdata->mode ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.core.exit':{'defaultvalue':'<?php echo isset($userdata->{'cmi.core.exit'})?$userdata->{'cmi.core.exit'}:'' ?>', 'format':CMIExit, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.core.session_time':{'format':CMITimespan, 'mod':'w', 'defaultvalue':'00:00:00', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.suspend_data':{'defaultvalue':'<?php echo isset($userdata->{'cmi.suspend_data'})?$userdata->{'cmi.suspend_data'}:'' ?>', 'format':CMIString4096, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.launch_data':{'defaultvalue':'<?php echo $userdata->datafromlms ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.comments':{'defaultvalue':'<?php echo isset($userdata->{'cmi.comments'})?$userdata->{'cmi.comments'}:'' ?>', 'format':CMIString4096, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.comments_from_lms':{'mod':'r', 'writeerror':'403'},
|
||||
'cmi.objectives._children':{'defaultvalue':objectives_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.objectives._count':{'mod':'r', 'defaultvalue':'0', 'writeerror':'402'},
|
||||
'cmi.objectives.n.id':{'pattern':CMIIndex, 'format':CMIIdentifier, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.objectives.n.score._children':{'pattern':CMIIndex, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.objectives.n.score.raw':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.objectives.n.score.min':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.objectives.n.score.max':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'range':score_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.objectives.n.status':{'pattern':CMIIndex, 'format':CMIStatus2, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.student_data._children':{'defaultvalue':student_data_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.student_data.mastery_score':{'defaultvalue':'<?php echo $userdata->masteryscore ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.student_data.max_time_allowed':{'defaultvalue':'<?php echo $userdata->maxtimeallowed ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.student_data.time_limit_action':{'defaultvalue':'<?php echo $userdata->timelimitaction ?>', 'mod':'r', 'writeerror':'403'},
|
||||
'cmi.student_preference._children':{'defaultvalue':student_preference_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.student_preference.audio':{'defaultvalue':'0', 'format':CMISInteger, 'range':audio_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.student_preference.language':{'defaultvalue':'', 'format':CMIString256, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.student_preference.speed':{'defaultvalue':'0', 'format':CMISInteger, 'range':speed_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.student_preference.text':{'defaultvalue':'0', 'format':CMISInteger, 'range':text_range, 'mod':'rw', 'writeerror':'405'},
|
||||
'cmi.interactions._children':{'defaultvalue':interactions_children, 'mod':'r', 'writeerror':'402'},
|
||||
'cmi.interactions._count':{'mod':'r', 'defaultvalue':'0', 'writeerror':'402'},
|
||||
'cmi.interactions.n.id':{'pattern':CMIIndex, 'format':CMIIdentifier, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.objectives._count':{'pattern':CMIIndex, 'mod':'r', 'defaultvalue':'0', 'writeerror':'402'},
|
||||
'cmi.interactions.n.objectives.n.id':{'pattern':CMIIndex, 'format':CMIIdentifier, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.time':{'pattern':CMIIndex, 'format':CMITime, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.type':{'pattern':CMIIndex, 'format':CMIType, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.correct_responses._count':{'pattern':CMIIndex, 'mod':'r', 'defaultvalue':'0', 'writeerror':'402'},
|
||||
'cmi.interactions.n.correct_responses.n.pattern':{'pattern':CMIIndex, 'format':CMIFeedback, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.weighting':{'pattern':CMIIndex, 'format':CMIDecimal, 'range':weighting_range, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.student_response':{'pattern':CMIIndex, 'format':CMIFeedback, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.result':{'pattern':CMIIndex, 'format':CMIResult, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'cmi.interactions.n.latency':{'pattern':CMIIndex, 'format':CMITimespan, 'mod':'w', 'readerror':'404', 'writeerror':'405'},
|
||||
'nav.event':{'defaultvalue':'', 'format':NAVEvent, 'mod':'w', 'readerror':'404', 'writeerror':'405'}
|
||||
};
|
||||
//
|
||||
// Datamodel inizialization
|
||||
//
|
||||
var cmi = new Object();
|
||||
cmi.core = new Object();
|
||||
cmi.core.score = new Object();
|
||||
cmi.objectives = new Object();
|
||||
cmi.student_data = new Object();
|
||||
cmi.student_preference = new Object();
|
||||
cmi.interactions = new Object();
|
||||
|
||||
// Navigation Object
|
||||
var nav = new Object();
|
||||
|
||||
for (element in datamodel) {
|
||||
if (element.match(/\.n\./) == null) {
|
||||
if ((typeof eval('datamodel["'+element+'"].defaultvalue')) != 'undefined') {
|
||||
eval(element+' = datamodel["'+element+'"].defaultvalue;');
|
||||
} else {
|
||||
eval(element+' = "";');
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
<?php
|
||||
$count = 0;
|
||||
$objectives = '';
|
||||
foreach($userdata as $element => $value){
|
||||
if (substr($element,0,14) == 'cmi.objectives') {
|
||||
preg_match('/.(\d+)./',$element,$matches);
|
||||
$element = preg_replace('/.(\d+)./',"_\$1.",$element);
|
||||
if ($matches[1] == $count) {
|
||||
$count++;
|
||||
$end = strpos($element,$matches[1])+strlen($matches[1]);
|
||||
$subelement = substr($element,0,$end);
|
||||
echo ' '.$subelement." = new Object();\n";
|
||||
echo ' '.$subelement.".score = new Object();\n";
|
||||
echo ' '.$subelement.".score._children = score_children;\n";
|
||||
echo ' '.$subelement.".score.raw = '';\n";
|
||||
echo ' '.$subelement.".score.min = '';\n";
|
||||
echo ' '.$subelement.".score.max = '';\n";
|
||||
}
|
||||
echo ' '.$element.' = \''.$value."';\n";
|
||||
}
|
||||
}
|
||||
if ($count > 0) {
|
||||
echo ' cmi.objectives._count = '.$count.";\n";
|
||||
}
|
||||
?>
|
||||
|
||||
if (cmi.core.lesson_status == '') {
|
||||
cmi.core.lesson_status = 'not attempted';
|
||||
}
|
||||
|
||||
//
|
||||
// API Methods definition
|
||||
//
|
||||
var Initialized = false;
|
||||
|
||||
function LMSInitialize (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if (!Initialized) {
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Initialized SCORM 1.2");';
|
||||
}
|
||||
?>
|
||||
Initialized = true;
|
||||
errorCode = "0";
|
||||
return "true";
|
||||
} else {
|
||||
errorCode = "101";
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function LMSFinish (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if (Initialized) {
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Finished SCORM 1.2");';
|
||||
}
|
||||
?>
|
||||
Initialized = false;
|
||||
result = StoreData(cmi,true);
|
||||
if (nav.event != '') {
|
||||
if (nav.event == 'continue') {
|
||||
setTimeout('top.document.location=top.next;',500);
|
||||
} else {
|
||||
setTimeout('top.document.location=top.prev;',500);
|
||||
}
|
||||
} else {
|
||||
if (<?php echo $scorm->auto ?> == 1) {
|
||||
setTimeout('top.document.location=top.next;',500);
|
||||
}
|
||||
}
|
||||
return "true";
|
||||
} else {
|
||||
errorCode = "301";
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function LMSGetValue (element) {
|
||||
errorCode = "0";
|
||||
if (Initialized) {
|
||||
if (element !="") {
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'w') {
|
||||
element = element.replace(expression, "_$1.");
|
||||
elementIndexes = element.split('.');
|
||||
subelement = 'cmi';
|
||||
i = 1;
|
||||
while ((i < elementIndexes.length) && (typeof eval(subelement) != "undefined")) {
|
||||
subelement += '.'+elementIndexes[i++];
|
||||
}
|
||||
if (subelement == element) {
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+": "+eval(element));';
|
||||
}
|
||||
?>
|
||||
return eval(element);
|
||||
} else {
|
||||
errorCode = "0"; // Need to check if it is the right errorCode
|
||||
}
|
||||
} else {
|
||||
errorCode = eval('datamodel["'+elementmodel+'"].readerror');
|
||||
}
|
||||
} else {
|
||||
childrenstr = '._children';
|
||||
countstr = '._count';
|
||||
if (elementmodel.substr(elementmodel.length-childrenstr.length,elementmodel.length) == childrenstr) {
|
||||
parentmodel = elementmodel.substr(0,elementmodel.length-childrenstr.length);
|
||||
if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
|
||||
errorCode = "202";
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
} else if (elementmodel.substr(elementmodel.length-countstr.length,elementmodel.length) == countstr) {
|
||||
parentmodel = elementmodel.substr(0,elementmodel.length-countstr.length);
|
||||
if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
|
||||
errorCode = "203";
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
} else {
|
||||
errorCode = "301";
|
||||
}
|
||||
return "";
|
||||
}
|
||||
|
||||
function LMSSetValue (element,value) {
|
||||
errorCode = "0";
|
||||
if (Initialized) {
|
||||
if (element != "") {
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
|
||||
expression = new RegExp(eval('datamodel["'+elementmodel+'"].format'));
|
||||
value = value+'';
|
||||
matches = value.match(expression);
|
||||
if (matches != null) {
|
||||
//Create dynamic data model element
|
||||
if (element != elementmodel) {
|
||||
elementIndexes = element.split('.');
|
||||
subelement = 'cmi';
|
||||
for (i=1;i < elementIndexes.length-1;i++) {
|
||||
elementIndex = elementIndexes[i];
|
||||
if (elementIndexes[i+1].match(/^\d+$/)) {
|
||||
if ((typeof eval(subelement+'.'+elementIndex)) == "undefined") {
|
||||
eval(subelement+'.'+elementIndex+' = new Object();');
|
||||
eval(subelement+'.'+elementIndex+'._count = 0;');
|
||||
}
|
||||
if (elementIndexes[i+1] == eval(subelement+'.'+elementIndex+'._count')) {
|
||||
eval(subelement+'.'+elementIndex+'._count++;');
|
||||
}
|
||||
if (elementIndexes[i+1] > eval(subelement+'.'+elementIndex+'._count')) {
|
||||
errorCode = "201";
|
||||
}
|
||||
subelement = subelement.concat('.'+elementIndex+'_'+elementIndexes[i+1]);
|
||||
i++;
|
||||
} else {
|
||||
subelement = subelement.concat('.'+elementIndex);
|
||||
}
|
||||
if ((typeof eval(subelement)) == "undefined") {
|
||||
eval(subelement+' = new Object();');
|
||||
if (subelement.substr(0,14) == 'cmi.objectives') {
|
||||
eval(subelement+'.score = new Object();');
|
||||
eval(subelement+'.score._children = score_children;');
|
||||
eval(subelement+'.score.raw = "";');
|
||||
eval(subelement+'.score.min = "";');
|
||||
eval(subelement+'.score.max = "";');
|
||||
}
|
||||
if (subelement.substr(0,16) == 'cmi.interactions') {
|
||||
eval(subelement+'.objectives = new Object();');
|
||||
eval(subelement+'.objectives._count = 0;');
|
||||
eval(subelement+'.correct_responses = new Object();');
|
||||
eval(subelement+'.correct_responses._count = 0;');
|
||||
}
|
||||
}
|
||||
}
|
||||
element = subelement.concat('.'+elementIndexes[elementIndexes.length-1]);
|
||||
}
|
||||
//Store data
|
||||
if (errorCode == "0") {
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"].range')) != "undefined") {
|
||||
range = eval('datamodel["'+elementmodel+'"].range');
|
||||
ranges = range.split('#');
|
||||
value = value*1.0;
|
||||
if ((value >= ranges[0]) && (value <= ranges[1])) {
|
||||
eval(element+'="'+value+'";');
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+":= "+value);';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
} else {
|
||||
errorCode = eval('datamodel["'+elementmodel+'"].writeerror');
|
||||
}
|
||||
} else {
|
||||
if (element == 'cmi.comments') {
|
||||
eval(element+'+="'+value+'";');
|
||||
} else {
|
||||
eval(element+'="'+value+'";');
|
||||
}
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+":= "+value);';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = eval('datamodel["'+elementmodel+'"].writeerror');
|
||||
}
|
||||
} else {
|
||||
errorCode = eval('datamodel["'+elementmodel+'"].writeerror');
|
||||
}
|
||||
} else {
|
||||
errorCode = "201"
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
} else {
|
||||
errorCode = "301";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function LMSCommit (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if (Initialized) {
|
||||
result = StoreData(cmi,false);
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Data Commited");';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
} else {
|
||||
errorCode = "301";
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function LMSGetLastError () {
|
||||
return errorCode;
|
||||
}
|
||||
|
||||
function LMSGetErrorString (param) {
|
||||
if (param != "") {
|
||||
var errorString = new Array();
|
||||
errorString["0"] = "No error";
|
||||
errorString["101"] = "General exception";
|
||||
errorString["201"] = "Invalid argument error";
|
||||
errorString["202"] = "Element cannot have children";
|
||||
errorString["203"] = "Element not an array - cannot have count";
|
||||
errorString["301"] = "Not initialized";
|
||||
errorString["401"] = "Not implemented error";
|
||||
errorString["402"] = "Invalid set value, element is a keyword";
|
||||
errorString["403"] = "Element is read only";
|
||||
errorString["404"] = "Element is write only";
|
||||
errorString["405"] = "Incorrect data type";
|
||||
return errorString[param];
|
||||
} else {
|
||||
return "";
|
||||
}
|
||||
}
|
||||
|
||||
function LMSGetDiagnostic (param) {
|
||||
if (param == "") {
|
||||
param = errorCode;
|
||||
}
|
||||
return param;
|
||||
}
|
||||
|
||||
function AddTime (first, second) {
|
||||
var sFirst = first.split(":");
|
||||
var sSecond = second.split(":");
|
||||
var cFirst = sFirst[2].split(".");
|
||||
var cSecond = sSecond[2].split(".");
|
||||
var change = 0;
|
||||
|
||||
FirstCents = 0; //Cents
|
||||
if (cFirst.length > 1) {
|
||||
FirstCents = parseInt(cFirst[1],10);
|
||||
}
|
||||
SecondCents = 0;
|
||||
if (cSecond.length > 1) {
|
||||
SecondCents = parseInt(cSecond[1],10);
|
||||
}
|
||||
var cents = FirstCents + SecondCents;
|
||||
change = Math.floor(cents / 100);
|
||||
cents = cents - (change * 100);
|
||||
if (Math.floor(cents) < 10) {
|
||||
cents = "0" + cents.toString();
|
||||
}
|
||||
|
||||
var secs = parseInt(cFirst[0],10)+parseInt(cSecond[0],10)+change; //Seconds
|
||||
change = Math.floor(secs / 60);
|
||||
secs = secs - (change * 60);
|
||||
if (Math.floor(secs) < 10) {
|
||||
secs = "0" + secs.toString();
|
||||
}
|
||||
|
||||
mins = parseInt(sFirst[1],10)+parseInt(sSecond[1],10)+change; //Minutes
|
||||
change = Math.floor(mins / 60);
|
||||
mins = mins - (change * 60);
|
||||
if (mins < 10) {
|
||||
mins = "0" + mins.toString();
|
||||
}
|
||||
|
||||
hours = parseInt(sFirst[0],10)+parseInt(sSecond[0],10)+change; //Hours
|
||||
if (hours < 10) {
|
||||
hours = "0" + hours.toString();
|
||||
}
|
||||
|
||||
if (cents != '0') {
|
||||
return hours + ":" + mins + ":" + secs + '.' + cents;
|
||||
} else {
|
||||
return hours + ":" + mins + ":" + secs;
|
||||
}
|
||||
}
|
||||
|
||||
function TotalTime() {
|
||||
total_time = AddTime(cmi.core.total_time, cmi.core.session_time);
|
||||
return '&'+underscore('cmi.core.total_time')+'='+escape(total_time);
|
||||
}
|
||||
|
||||
function CollectData(data,parent) {
|
||||
var datastring = '';
|
||||
for (property in data) {
|
||||
if (typeof data[property] == 'object') {
|
||||
datastring += CollectData(data[property],parent+'.'+property);
|
||||
} else {
|
||||
element = parent+'.'+property;
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if (elementmodel != "cmi.core.session_time") {
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
|
||||
elementstring = '&'+underscore(element)+'='+escape(data[property]);
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"].defaultvalue')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].defaultvalue') != data[property]) {
|
||||
datastring += elementstring;
|
||||
}
|
||||
} else {
|
||||
datastring += elementstring;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return datastring;
|
||||
}
|
||||
|
||||
function StoreData(data,storetotaltime) {
|
||||
if (storetotaltime) {
|
||||
if (cmi.core.lesson_status == 'not attempted') {
|
||||
cmi.core.lesson_status = 'completed';
|
||||
}
|
||||
if (cmi.core.lesson_mode == 'normal') {
|
||||
if (cmi.core.credit == 'credit') {
|
||||
if (cmi.core.lesson_status == 'completed') {
|
||||
if (cmi.student_data.mastery_score != '') {
|
||||
if (parseFloat(cmi.core.score.raw) >= parseFloat(cmi.student_data.mastery_score)) {
|
||||
cmi.core.lesson_status = 'passed';
|
||||
} else {
|
||||
cmi.core.lesson_status = 'failed';
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (cmi.core.lesson_mode == 'browse') {
|
||||
if (datamodel['cmi.core.lesson_status'].defaultvalue == '') {
|
||||
cmi.core.lesson_status = 'browsed';
|
||||
}
|
||||
}
|
||||
datastring = CollectData(data,'cmi');
|
||||
datastring += TotalTime();
|
||||
} else {
|
||||
datastring = CollectData(data,'cmi');
|
||||
}
|
||||
datastring += '&attempt=<?php echo $attempt ?>';
|
||||
datastring += '&scoid=<?php echo $sco->id ?>';
|
||||
|
||||
var myRequest = NewHttpReq();
|
||||
result = DoRequest(myRequest,"<?php p($CFG->wwwroot) ?>/mod/scorm/datamodel.php","id=<?php p($id) ?>&sesskey=<?php p($USER->sesskey) ?>"+datastring);
|
||||
results = result.split('\n');
|
||||
errorCode = results[1];
|
||||
return results[0];
|
||||
}
|
||||
|
||||
this.LMSInitialize = LMSInitialize;
|
||||
this.LMSFinish = LMSFinish;
|
||||
this.LMSGetValue = LMSGetValue;
|
||||
this.LMSSetValue = LMSSetValue;
|
||||
this.LMSCommit = LMSCommit;
|
||||
this.LMSGetLastError = LMSGetLastError;
|
||||
this.LMSGetErrorString = LMSGetErrorString;
|
||||
this.LMSGetDiagnostic = LMSGetDiagnostic;
|
||||
}
|
||||
|
||||
var API = new SCORMapi1_2();
|
||||
369
mod/scorm/datamodels/scorm_12lib.php
Normal file
369
mod/scorm/datamodels/scorm_12lib.php
Normal file
@ -0,0 +1,369 @@
|
||||
<?php
|
||||
|
||||
function scorm_eval_prerequisites($prerequisites,$usertracks) {
|
||||
$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;
|
||||
while ($i<strlen($prerequisites)) {
|
||||
$symbol = $prerequisites[$i];
|
||||
switch ($symbol) {
|
||||
case '&':
|
||||
case '|':
|
||||
$symbol .= $symbol;
|
||||
case '~':
|
||||
case '(':
|
||||
case ')':
|
||||
case '*':
|
||||
$element = trim($element);
|
||||
|
||||
if (!empty($element)) {
|
||||
$element = trim($element);
|
||||
if (isset($usertracks[$element])) {
|
||||
$element = '((\''.$usertracks[$element]->status.'\' == \'completed\') || '.
|
||||
'(\''.$usertracks[$element]->status.'\' == \'passed\'))';
|
||||
} else if (($operator = strpos($element,'=')) !== false) {
|
||||
$item = trim(substr($element,0,$operator));
|
||||
if (!isset($usertracks[$item])) {
|
||||
return false;
|
||||
}
|
||||
|
||||
$value = trim(trim(substr($element,$operator+1)),'"');
|
||||
if (isset($statuses[$value])) {
|
||||
$status = $statuses[$value];
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
$element = '(\''.$usertracks[$item]->status.'\' == \''.$status.'\')';
|
||||
} else if (($operator = strpos($element,'<>')) !== false) {
|
||||
$item = trim(substr($element,0,$operator));
|
||||
if (!isset($usertracks[$item])) {
|
||||
return false;
|
||||
}
|
||||
|
||||
$value = trim(trim(substr($element,$operator+2)),'"');
|
||||
if (isset($statuses[$value])) {
|
||||
$status = $statuses[$value];
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
$element = '(\''.$usertracks[$item]->status.'\' != \''.$status.'\')';
|
||||
} else if (is_numeric($element)) {
|
||||
if ($symbol == '*') {
|
||||
$symbol = '';
|
||||
$open = strpos($prerequisites,'{',$i);
|
||||
$opened = 1;
|
||||
$closed = 0;
|
||||
for ($close=$open+1; (($opened > $closed) && ($close<strlen($prerequisites))); $close++) {
|
||||
if ($prerequisites[$close] == '}') {
|
||||
$closed++;
|
||||
} else if ($prerequisites[$close] == '{') {
|
||||
$opened++;
|
||||
}
|
||||
}
|
||||
$i = $close;
|
||||
|
||||
$setelements = explode(',', substr($prerequisites, $open+1, $close-($open+1)-1));
|
||||
$settrue = 0;
|
||||
foreach ($setelements as $setelement) {
|
||||
if (eval_prerequisites($setelement,$usertracks)) {
|
||||
$settrue++;
|
||||
}
|
||||
}
|
||||
|
||||
if ($settrue >= $element) {
|
||||
$element = 'true';
|
||||
} else {
|
||||
$element = 'false';
|
||||
}
|
||||
}
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
array_push($stack,$element);
|
||||
$element = '';
|
||||
}
|
||||
if ($symbol == '~') {
|
||||
$symbol = '!';
|
||||
}
|
||||
if (!empty($symbol)) {
|
||||
array_push($stack,$symbol);
|
||||
}
|
||||
break;
|
||||
default:
|
||||
$element .= $symbol;
|
||||
break;
|
||||
}
|
||||
$i++;
|
||||
}
|
||||
if (!empty($element)) {
|
||||
$element = trim($element);
|
||||
if (isset($usertracks[$element])) {
|
||||
$element = '((\''.$usertracks[$element]->status.'\' == \'completed\') || '.
|
||||
'(\''.$usertracks[$element]->status.'\' == \'passed\'))';
|
||||
} else if (($operator = strpos($element,'=')) !== false) {
|
||||
$item = trim(substr($element,0,$operator));
|
||||
if (!isset($usertracks[$item])) {
|
||||
return false;
|
||||
}
|
||||
|
||||
$value = trim(trim(substr($element,$operator+1)),'"');
|
||||
if (isset($statuses[$value])) {
|
||||
$status = $statuses[$value];
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
$element = '(\''.$usertracks[$item]->status.'\' == \''.$status.'\')';
|
||||
} else if (($operator = strpos($element,'<>')) !== false) {
|
||||
$item = trim(substr($element,0,$operator));
|
||||
if (!isset($usertracks[$item])) {
|
||||
return false;
|
||||
}
|
||||
|
||||
$value = trim(trim(substr($element,$operator+1)),'"');
|
||||
if (isset($statuses[$value])) {
|
||||
$status = $statuses[$value];
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
$element = '(\''.$usertracks[$item]->status.'\' != \''.trim($status).'\')';
|
||||
} else {
|
||||
return false;
|
||||
}
|
||||
|
||||
array_push($stack,$element);
|
||||
}
|
||||
return eval('return '.implode($stack).';');
|
||||
}
|
||||
|
||||
function scorm_get_toc($user,$scorm,$liststyle,$currentorg='',$scoid='',$mode='normal',$attempt='',$play=false) {
|
||||
global $CFG;
|
||||
|
||||
$strexpand = get_string('expcoll','scorm');
|
||||
$modestr = '';
|
||||
if ($mode == 'browse') {
|
||||
$modestr = '&mode='.$mode;
|
||||
}
|
||||
$scormpixdir = $CFG->modpixpath.'/scorm/pix';
|
||||
|
||||
$result = new stdClass();
|
||||
$result->toc = "<ul id='0' class='$liststyle'>\n";
|
||||
$tocmenus = array();
|
||||
$result->prerequisites = true;
|
||||
$incomplete = false;
|
||||
|
||||
//
|
||||
// Get the current organization infos
|
||||
//
|
||||
$organizationsql = '';
|
||||
if (!empty($currentorg)) {
|
||||
if (($organizationtitle = get_field('scorm_scoes','title','scorm',$scorm->id,'identifier',$currentorg)) != '') {
|
||||
$result->toc .= "\t<li>$organizationtitle</li>\n";
|
||||
$tocmenus[] = $organizationtitle;
|
||||
}
|
||||
$organizationsql = "AND organization='$currentorg'";
|
||||
}
|
||||
//
|
||||
// If not specified retrieve the last attempt number
|
||||
//
|
||||
if (empty($attempt)) {
|
||||
$attempt = scorm_get_last_attempt($scorm->id, $user->id);
|
||||
}
|
||||
$result->attemptleft = $scorm->maxattempt - $attempt;
|
||||
if ($scoes = get_records_select('scorm_scoes',"scorm='$scorm->id' $organizationsql order by id ASC")){
|
||||
//
|
||||
// Retrieve user tracking data for each learning object
|
||||
//
|
||||
$usertracks = array();
|
||||
foreach ($scoes as $sco) {
|
||||
if (!empty($sco->launch)) {
|
||||
if ($usertrack=scorm_get_tracks($sco->id,$user->id,$attempt)) {
|
||||
if ($usertrack->status == '') {
|
||||
$usertrack->status = 'notattempted';
|
||||
}
|
||||
$usertracks[$sco->identifier] = $usertrack;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$level=0;
|
||||
$sublist=1;
|
||||
$previd = 0;
|
||||
$nextid = 0;
|
||||
$findnext = false;
|
||||
$parents[$level]='/';
|
||||
|
||||
foreach ($scoes as $sco) {
|
||||
if ($parents[$level]!=$sco->parent) {
|
||||
if ($newlevel = array_search($sco->parent,$parents)) {
|
||||
for ($i=0; $i<($level-$newlevel); $i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
$level = $newlevel;
|
||||
} else {
|
||||
$i = $level;
|
||||
$closelist = '';
|
||||
while (($i > 0) && ($parents[$level] != $sco->parent)) {
|
||||
$closelist .= "\t\t</ul></li>\n";
|
||||
$i--;
|
||||
}
|
||||
if (($i == 0) && ($sco->parent != $currentorg)) {
|
||||
$style = '';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$sco->id])) {
|
||||
$style = ' style="display: none;"';
|
||||
}
|
||||
$result->toc .= "\t\t<li><ul id='$sublist' class='$liststyle'$style>\n";
|
||||
$level++;
|
||||
} else {
|
||||
$result->toc .= $closelist;
|
||||
$level = $i;
|
||||
}
|
||||
$parents[$level]=$sco->parent;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t\t<li>";
|
||||
$nextsco = next($scoes);
|
||||
if (($nextsco !== false) && ($sco->parent != $nextsco->parent) && (($level==0) || (($level>0) && ($nextsco->parent == $sco->identifier)))) {
|
||||
$sublist++;
|
||||
$icon = 'minus';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$nextsco->id])) {
|
||||
$icon = 'plus';
|
||||
}
|
||||
$result->toc .= '<a href="javascript:expandCollide(img'.$sublist.','.$sublist.','.$nextsco->id.');"><img id="img'.$sublist.'" src="'.$scormpixdir.'/'.$icon.'.gif" alt="'.$strexpand.'" title="'.$strexpand.'"/></a>';
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/spacer.gif" />';
|
||||
}
|
||||
if (empty($sco->title)) {
|
||||
$sco->title = $sco->identifier;
|
||||
}
|
||||
if (!empty($sco->launch)) {
|
||||
$startbold = '';
|
||||
$endbold = '';
|
||||
$score = '';
|
||||
if (empty($scoid) && ($mode != 'normal')) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
if (isset($usertracks[$sco->identifier])) {
|
||||
$usertrack = $usertracks[$sco->identifier];
|
||||
$strstatus = get_string($usertrack->status,'scorm');
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/'.$usertrack->status.'.gif" alt="'.$strstatus.'" title="'.$strstatus.'" />';
|
||||
|
||||
if (($usertrack->status == 'notattempted') || ($usertrack->status == 'incomplete') || ($usertrack->status == 'browsed')) {
|
||||
$incomplete = true;
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
}
|
||||
if ($usertrack->score_raw != '') {
|
||||
$score = '('.get_string('score','scorm').': '.$usertrack->score_raw.')';
|
||||
}
|
||||
} else {
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
if ($sco->scormtype == 'sco') {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/notattempted.gif" alt="'.get_string('notattempted','scorm').'" title="'.get_string('notattempted','scorm').'" />';
|
||||
$incomplete = true;
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/asset.gif" alt="'.get_string('asset','scorm').'" title="'.get_string('asset','scorm').'" />';
|
||||
}
|
||||
}
|
||||
if ($sco->id == $scoid) {
|
||||
$startbold = '<b>';
|
||||
$endbold = '</b>';
|
||||
$findnext = true;
|
||||
$shownext = $sco->next;
|
||||
$showprev = $sco->previous;
|
||||
}
|
||||
|
||||
if (($nextid == 0) && (scorm_count_launchable($scorm->id,$currentorg) > 1) && ($nextsco!==false) && (!$findnext)) {
|
||||
if (!empty($sco->launch)) {
|
||||
$previd = $sco->id;
|
||||
}
|
||||
}
|
||||
if (empty($sco->prerequisites) || scorm_eval_prerequisites($sco->prerequisites,$usertracks)) {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = true;
|
||||
}
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid='.$sco->id;
|
||||
$result->toc .= ' '.$startbold.'<a href="'.$url.'">'.format_string($sco->title).'</a>'.$score.$endbold."</li>\n";
|
||||
$tocmenus[$sco->id] = scorm_repeater('−',$level) . '>' . format_string($sco->title);
|
||||
} else {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = false;
|
||||
}
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
} else {
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
if (($nextsco !== false) && ($nextid == 0) && ($findnext)) {
|
||||
if (!empty($nextsco->launch)) {
|
||||
$nextid = $nextsco->id;
|
||||
}
|
||||
}
|
||||
}
|
||||
for ($i=0;$i<$level;$i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
|
||||
if ($play) {
|
||||
$sco = get_record('scorm_scoes','id',$scoid);
|
||||
$sco->previd = $previd;
|
||||
$sco->nextid = $nextid;
|
||||
$result->sco = $sco;
|
||||
$result->incomplete = $incomplete;
|
||||
} else {
|
||||
$result->incomplete = $incomplete;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t</ul>\n";
|
||||
if ($scorm->hidetoc == 0) {
|
||||
$result->toc .= '
|
||||
<script language="javascript" type="text/javascript">
|
||||
<!--
|
||||
function expandCollide(which,list,item) {
|
||||
var nn=document.ids?true:false
|
||||
var w3c=document.getElementById?true:false
|
||||
var beg=nn?"document.ids.":w3c?"document.getElementById(":"document.all.";
|
||||
var mid=w3c?").style":".style";
|
||||
|
||||
if (eval(beg+list+mid+".display") != "none") {
|
||||
which.src = "'.$scormpixdir.'/plus.gif";
|
||||
eval(beg+list+mid+".display=\'none\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, 356, "/").set();
|
||||
} else {
|
||||
which.src = "'.$scormpixdir.'/minus.gif";
|
||||
eval(beg+list+mid+".display=\'block\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, -1, "/").set();
|
||||
}
|
||||
}
|
||||
-->
|
||||
</script>'."\n";
|
||||
}
|
||||
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid=';
|
||||
$result->tocmenu = popup_form($url,$tocmenus, "tocmenu", $sco->id, '', '', '', true);
|
||||
|
||||
return $result;
|
||||
}
|
||||
|
||||
?>
|
||||
615
mod/scorm/datamodels/scorm_13.js.php
Normal file
615
mod/scorm/datamodels/scorm_13.js.php
Normal file
@ -0,0 +1,615 @@
|
||||
<?php
|
||||
if (isset($userdata->status)) {
|
||||
if ($userdata->status == '') {
|
||||
$userdata->entry = 'ab-initio';
|
||||
} else {
|
||||
if (isset($userdata->{'cmi.exit'}) && ($userdata->{'cmi.exit'} == 'suspend')) {
|
||||
$userdata->entry = 'resume';
|
||||
} else {
|
||||
$userdata->entry = '';
|
||||
}
|
||||
}
|
||||
}
|
||||
?>
|
||||
//
|
||||
// SCORM 1.3 API Implementation
|
||||
//
|
||||
function SCORMapi1_3() {
|
||||
// Standard Data Type Definition
|
||||
CMIString200 = '^.{0,200}$';
|
||||
CMIString250 = '^.{0,250}$';
|
||||
CMIString1000 = '^.{0,1000}$';
|
||||
CMIString4000 = '^.{0,4000}$';
|
||||
CMITime = '^(\\d{4})(-\\d{2})(-\\d{2})(T[0-2]{1}[0-9]{1}):([0-5]{1}[0-9]{1}):([0-5]{1}[0-9]{1})(\\.[0-9]{1,2})?(Z|(-?[0-1]{1}[0-9]{1})(:[0-5]{1}[0-9]{1})?)?$';
|
||||
CMITimespan = '^P(\\d+Y)?(\\d+M)?(\\d+D)?(T(\\d+H)?(\\d+M)?(\\d+(\.\\d{1,2})?S)?)?$';
|
||||
CMIInteger = '^\\d+$';
|
||||
CMISInteger = '^-?([0-9]+)$';
|
||||
CMIDecimal = '^-?([0-9]{0,3})(\\.[0-9]{1,7})?$';
|
||||
CMIIdentifier = '^\\w{1,200}$';
|
||||
CMILongIdentifier = '^\\w{1,4000}$';
|
||||
CMIFeedback = CMIString200; // This must be redefined
|
||||
CMIIndex = '[._](\\d+).';
|
||||
// Vocabulary Data Type Definition
|
||||
CMICStatus = '^completed$|^incomplete$|^not attempted$|^unknown$';
|
||||
CMISStatus = '^passed$|^failed$|^unknown$';
|
||||
CMIExit = '^time-out$|^suspend$|^logout$|^$';
|
||||
CMIType = '^true-false$|^choice$|^fill-in$|^matching$|^performance$|^sequencing$|^likert$|^numeric$';
|
||||
CMIResult = '^correct$|^wrong$|^unanticipated$|^neutral$|^([0-9]{0,3})?(\\.[0-9]{1,2})?$';
|
||||
NAVEvent = '^previous$|^continue$';
|
||||
// Children lists
|
||||
cmi_children = 'version, comments_from_learner, comments_from_lms, completion_status, credit, entry, exit, interactions, launch_data, learner_id, learner_name, learner_preference, location, max_time_allowed, mode, objectives, progress_measure, scaled_passing_score, score, session_time, success_status, suspend_data, time_limit_action, total_time';
|
||||
comments_children = 'comment, location, date_time';
|
||||
score_children = 'scaled, raw, min, max';
|
||||
objectives_children = 'id, score, success_status, completion_status, description';
|
||||
student_data_children = 'mastery_score, max_time_allowed, time_limit_action';
|
||||
student_preference_children = 'audio_level, language, delivery_speed, audio_caption';
|
||||
interactions_children = 'id, type, objectives, timestamp, correct_responses, weighting, learner_response, result, latency, description';
|
||||
// Data ranges
|
||||
scaled_range = '-1#1';
|
||||
audio_range = '0#*';
|
||||
speed_range = '0#*';
|
||||
text_range = '-1#1';
|
||||
progress_range = '0#1';
|
||||
// The SCORM 1.3 data model
|
||||
var datamodel = {
|
||||
'cmi._children':{'defaultvalue':cmi_children, 'mod':'r'},
|
||||
'cmi.version':{'defaultvalue':'1.0', 'mod':'r'},
|
||||
'cmi.comments_from_learner._children':{'defaultvalue':comments_children, 'mod':'r'},
|
||||
'cmi.comments_from_learner._count':{'mod':'r', 'defaultvalue':'0'},
|
||||
'cmi.comments_from_learner.n.comment':{'format':CMIString4000, 'mod':'rw'},
|
||||
'cmi.comments_from_learner.n.location':{'format':CMIString250, 'mod':'rw'},
|
||||
'cmi.comments_from_learner.n.date_time':{'format':CMITime, 'mod':'rw'},
|
||||
'cmi.comments_from_lms._children':{'defaultvalue':comments_children, 'mod':'r'},
|
||||
'cmi.comments_from_lms._count':{'mod':'r', 'defaultvalue':'0'},
|
||||
'cmi.comments_from_lms.n.comment':{'format':CMIString4000, 'mod':'r'},
|
||||
'cmi.comments_from_lms.n.location':{'format':CMIString250, 'mod':'r'},
|
||||
'cmi.comments_from_lms.n.date_time':{'format':CMITime, 'mod':'r'},
|
||||
'cmi.completion_status':{'defaultvalue':'<?php echo isset($userdata->{'cmi.completion_status'})?$userdata->{'cmi.completion_status'}:'unknown' ?>', 'format':CMICStatus, 'mod':'rw'},
|
||||
'cmi.completion_threshold':{'defaultvalue':<?php echo isset($userdata->threshold)?'\''.$userdata->threshold.'\'':'null' ?>, 'mod':'r'},
|
||||
'cmi.credit':{'defaultvalue':'<?php echo isset($userdata->credit)?$userdata->credit:'' ?>', 'mod':'r'},
|
||||
'cmi.entry':{'defaultvalue':'<?php echo $userdata->entry ?>', 'mod':'r'},
|
||||
'cmi.exit':{'defaultvalue':'<?php echo isset($userdata->{'cmi.exit'})?$userdata->{'cmi.exit'}:'' ?>', 'format':CMIExit, 'mod':'w'},
|
||||
'cmi.interactions._children':{'defaultvalue':interactions_children, 'mod':'r'},
|
||||
'cmi.interactions._count':{'mod':'r', 'defaultvalue':'0'},
|
||||
'cmi.interactions.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
|
||||
'cmi.interactions.n.type':{'pattern':CMIIndex, 'format':CMIType, 'mod':'rw'},
|
||||
'cmi.interactions.n.objectives._count':{'pattern':CMIIndex, 'mod':'r', 'defaultvalue':'0'},
|
||||
'cmi.interactions.n.objectives.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
|
||||
'cmi.interactions.n.timestamp':{'pattern':CMIIndex, 'format':CMITime, 'mod':'rw'},
|
||||
'cmi.interactions.n.correct_responses._count':{'defaultvalue':'0', 'pattern':CMIIndex, 'mod':'r'},
|
||||
'cmi.interactions.n.correct_responses.n.pattern':{'pattern':CMIIndex, 'format':CMIFeedback, 'mod':'rw'},
|
||||
'cmi.interactions.n.weighting':{'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.interactions.n.learner_response':{'pattern':CMIIndex, 'format':CMIFeedback, 'mod':'rw'},
|
||||
'cmi.interactions.n.result':{'pattern':CMIIndex, 'format':CMIResult, 'mod':'rw'},
|
||||
'cmi.interactions.n.latency':{'pattern':CMIIndex, 'format':CMITimespan, 'mod':'rw'},
|
||||
'cmi.interactions.n.description':{'pattern':CMIIndex, 'format':CMIString250, 'mod':'rw'},
|
||||
'cmi.launch_data':{'defaultvalue':<?php echo isset($userdata->datafromlms)?'\''.$userdata->datafromlms.'\'':'null' ?>, 'mod':'r'},
|
||||
'cmi.learner_id':{'defaultvalue':'<?php echo $userdata->student_id ?>', 'mod':'r'},
|
||||
'cmi.learner_name':{'defaultvalue':'<?php echo addslashes($userdata->student_name) ?>', 'mod':'r'},
|
||||
'cmi.learner_preference._children':{'defaultvalue':student_preference_children, 'mod':'r'},
|
||||
'cmi.learner_preference.audio_level':{'defaultvalue':'0', 'format':CMIDecimal, 'range':audio_range, 'mod':'rw'},
|
||||
'cmi.learner_preference.language':{'defaultvalue':'', 'format':CMIString250, 'mod':'rw'},
|
||||
'cmi.learner_preference.delivery_speed':{'defaultvalue':'0', 'format':CMIDecimal, 'range':speed_range, 'mod':'rw'},
|
||||
'cmi.learner_preference.audio_caption':{'defaultvalue':'0', 'format':CMISInteger, 'range':text_range, 'mod':'rw'},
|
||||
'cmi.location':{'defaultvalue':<?php echo isset($userdata->{'cmi.location'})?'\''.$userdata->{'cmi.location'}.'\'':'null' ?>, 'format':CMIString1000, 'mod':'rw'},
|
||||
'cmi.max_time_allowed':{'defaultvalue':<?php echo isset($userdata->maxtimeallowed)?'\''.$userdata->maxtimeallowed.'\'':'null' ?>, 'mod':'r'},
|
||||
'cmi.mode':{'defaultvalue':'<?php echo $userdata->mode ?>', 'mod':'r'},
|
||||
'cmi.objectives._children':{'defaultvalue':objectives_children, 'mod':'r'},
|
||||
'cmi.objectives._count':{'mod':'r', 'defaultvalue':'0'},
|
||||
'cmi.objectives.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
|
||||
'cmi.objectives.n.score._children':{'pattern':CMIIndex, 'mod':'r'},
|
||||
'cmi.objectives.n.score.scaled':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'range':scaled_range, 'mod':'rw'},
|
||||
'cmi.objectives.n.score.raw':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.objectives.n.score.min':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.objectives.n.score.max':{'defaultvalue':'', 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.objectives.n.success_status':{'defaultvalue':'unknown', 'pattern':CMIIndex, 'format':CMISStatus, 'mod':'rw'},
|
||||
'cmi.objectives.n.completion_status':{'defaultvalue':'unknown', 'pattern':CMIIndex, 'format':CMISStatus, 'mod':'rw'},
|
||||
'cmi.objectives.n.description':{'pattern':CMIIndex, 'format':CMIString250, 'mod':'rw'},
|
||||
'cmi.progress_measure':{'defaultvalue':'<?php echo isset($userdata->{'cmi.progess_measure'})?$userdata->{'cmi.progress_measure'}:'' ?>', 'format':CMIDecimal, 'range':progress_range, 'mod':'rw'},
|
||||
'cmi.scaled_passing_score':{'defaultvalue':<?php echo isset($userdata->mnm)?'\''.$userdata->mnm.'\'':'null' ?>, 'format':CMIDecimal, 'range':scaled_range, 'mod':'r'},
|
||||
'cmi.score._children':{'pattern':CMIIndex, 'mod':'r'},
|
||||
'cmi.score.scaled':{'defaultvalue':'<?php echo isset($userdata->{'cmi.score.scaled'})?$userdata->{'cmi.score.scaled'}:'' ?>', 'format':CMIDecimal, 'range':scaled_range, 'mod':'rw'},
|
||||
'cmi.score.raw':{'defaultvalue':'<?php echo isset($userdata->{'cmi.score.raw'})?$userdata->{'cmi.score.raw'}:'' ?>', 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.score.min':{'defaultvalue':'<?php echo isset($userdata->{'cmi.score.min'})?$userdata->{'cmi.score.min'}:'' ?>', 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.score.max':{'defaultvalue':'<?php echo isset($userdata->{'cmi.score.max'})?$userdata->{'cmi.score.max'}:'' ?>', 'format':CMIDecimal, 'mod':'rw'},
|
||||
'cmi.session_time':{'format':CMITimespan, 'mod':'w', 'defaultvalue':'PT0H0M0S'},
|
||||
'cmi.success_status':{'defaultvalue':'<?php echo isset($userdata->{'cmi.success_status'})?$userdata->{'cmi.success_status'}:'unknown' ?>', 'format':CMISStatus, 'mod':'rw'},
|
||||
'cmi.suspend_data':{'defaultvalue':<?php echo isset($userdata->{'cmi.suspend_data'})?'\''.$userdata->{'cmi.suspend_data'}.'\'':'null' ?>, 'format':CMIString4000, 'mod':'rw'},
|
||||
'cmi.time_limit_action':{'defaultvalue':<?php echo isset($userdata->timelimitaction)?'\''.$userdata->timelimitaction.'\'':'null' ?>, 'mod':'r'},
|
||||
'cmi.total_time':{'defaultvalue':'<?php echo isset($userdata->{'cmi.total_time'})?$userdata->{'cmi.total_time'}:'PT0H0M0S' ?>', 'mod':'r'},
|
||||
'nav.event':{'defaultvalue':'', 'format':NAVEvent, 'mod':'w'}
|
||||
};
|
||||
//
|
||||
// Datamodel inizialization
|
||||
//
|
||||
var cmi = new Object();
|
||||
cmi.comments_from_learner = new Object();
|
||||
cmi.comments_from_lms = new Object();
|
||||
cmi.interactions = new Object();
|
||||
cmi.learner_preference = new Object();
|
||||
cmi.objectives = new Object();
|
||||
cmi.score = new Object();
|
||||
|
||||
// Navigation Object
|
||||
var nav = new Object();
|
||||
|
||||
for (element in datamodel) {
|
||||
if (element.match(/\.n\./) == null) {
|
||||
if ((typeof eval('datamodel["'+element+'"].defaultvalue')) != 'undefined') {
|
||||
eval(element+' = datamodel["'+element+'"].defaultvalue;');
|
||||
} else {
|
||||
eval(element+' = "";');
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
<?php
|
||||
$count = 0;
|
||||
$objectives = '';
|
||||
foreach($userdata as $element => $value){
|
||||
if (substr($element,0,14) == 'cmi.objectives') {
|
||||
preg_match('/.(\d+)./',$element,$matches);
|
||||
$element = preg_replace('/.(\d+)./',"_\$1.",$element);
|
||||
if ($matches[1] == $count) {
|
||||
$count++;
|
||||
$end = strpos($element,$matches[1])+strlen($matches[1]);
|
||||
$subelement = substr($element,0,$end);
|
||||
echo ' '.$subelement." = new Object();\n";
|
||||
echo ' '.$subelement.".score = new Object();\n";
|
||||
echo ' '.$subelement.".score._children = score_children;\n";
|
||||
echo ' '.$subelement.".score.scaled = '';\n";
|
||||
echo ' '.$subelement.".score.raw = '';\n";
|
||||
echo ' '.$subelement.".score.min = '';\n";
|
||||
echo ' '.$subelement.".score.max = '';\n";
|
||||
}
|
||||
echo ' '.$element.' = \''.$value."';\n";
|
||||
}
|
||||
}
|
||||
if ($count > 0) {
|
||||
echo ' cmi.objectives._count = '.$count.";\n";
|
||||
}
|
||||
?>
|
||||
|
||||
if (cmi.completion_status == '') {
|
||||
cmi.completion_status = 'not attempted';
|
||||
}
|
||||
|
||||
//
|
||||
// API Methods definition
|
||||
//
|
||||
var Initialized = false;
|
||||
var Terminated = false;
|
||||
var diagnostic = "";
|
||||
|
||||
function Initialize (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if ((!Initialized) && (!Terminated)) {
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Initialized SCORM 1.3");';
|
||||
}
|
||||
?>
|
||||
Initialized = true;
|
||||
errorCode = "0";
|
||||
return "true";
|
||||
} else {
|
||||
if (Initializated) {
|
||||
errorCode = "103";
|
||||
} else {
|
||||
errorCode = "104";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function Terminate (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if ((Initialized) && (!Terminated)) {
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Terminated SCORM 1.3");';
|
||||
}
|
||||
?>
|
||||
Initialized = false;
|
||||
Terminated = true;
|
||||
result = StoreData(cmi,true);
|
||||
if (nav.event != '') {
|
||||
if (nav.event == 'continue') {
|
||||
setTimeout('top.nextSCO();',500);
|
||||
} else {
|
||||
setTimeout('top.prevSCO();',500);
|
||||
}
|
||||
} else {
|
||||
if (<?php echo $scorm->auto ?> == 1) {
|
||||
setTimeout('top.nextSCO();',500);
|
||||
}
|
||||
}
|
||||
return "true";
|
||||
} else {
|
||||
if (Terminated) {
|
||||
errorCode = "113";
|
||||
} else {
|
||||
errorCode = "112";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function GetValue (element) {
|
||||
errorCode = "0";
|
||||
diagnostic = "";
|
||||
if ((Initialized) && (!Terminated)) {
|
||||
if (element !="") {
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'w') {
|
||||
element = element.replace(expression, "_$1.");
|
||||
elementIndexes = element.split('.');
|
||||
subelement = 'cmi';
|
||||
i = 1;
|
||||
while ((i < elementIndexes.length) && (typeof eval(subelement) != "undefined")) {
|
||||
subelement += '.'+elementIndexes[i++];
|
||||
}
|
||||
if (subelement == element) {
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+": "+eval(element));';
|
||||
}
|
||||
?>
|
||||
return eval(element);
|
||||
} else {
|
||||
errorCode = "0"; // Need to check if it is the right errorCode
|
||||
}
|
||||
} else {
|
||||
//errorCode = eval('datamodel["'+elementmodel+'"].readerror');
|
||||
errorCode = "405";
|
||||
}
|
||||
} else {
|
||||
childrenstr = '._children';
|
||||
countstr = '._count';
|
||||
if (elementmodel.substr(elementmodel.length-childrenstr.length,elementmodel.length) == childrenstr) {
|
||||
parentmodel = elementmodel.substr(0,elementmodel.length-childrenstr.length);
|
||||
if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
|
||||
errorCode = "301";
|
||||
diagnostic = "Data Model Element Does Not Have Children";
|
||||
} else {
|
||||
errorCode = "401";
|
||||
}
|
||||
} else if (elementmodel.substr(elementmodel.length-countstr.length,elementmodel.length) == countstr) {
|
||||
parentmodel = elementmodel.substr(0,elementmodel.length-countstr.length);
|
||||
if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
|
||||
errorCode = "301";
|
||||
diagnostic = "Data Model Element Cannot Have Count";
|
||||
} else {
|
||||
errorCode = "401";
|
||||
}
|
||||
} else {
|
||||
errorCode = "401";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = "301";
|
||||
}
|
||||
} else {
|
||||
if (Terminated) {
|
||||
errorCode = "123";
|
||||
} else {
|
||||
errorCode = "122";
|
||||
}
|
||||
}
|
||||
return "";
|
||||
}
|
||||
|
||||
function SetValue (element,value) {
|
||||
errorCode = "0";
|
||||
diagnostic = "";
|
||||
if ((Initialized) && (!Terminated)) {
|
||||
if (element != "") {
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
|
||||
expression = new RegExp(eval('datamodel["'+elementmodel+'"].format'));
|
||||
value = value+'';
|
||||
matches = value.match(expression);
|
||||
if (matches != null) {
|
||||
//Create dynamic data model element
|
||||
if (element != elementmodel) {
|
||||
elementIndexes = element.split('.');
|
||||
subelement = 'cmi';
|
||||
for (i=1;i < elementIndexes.length-1;i++) {
|
||||
elementIndex = elementIndexes[i];
|
||||
if (elementIndexes[i+1].match(/^\d+$/)) {
|
||||
if ((typeof eval(subelement+'.'+elementIndex)) == "undefined") {
|
||||
eval(subelement+'.'+elementIndex+' = new Object();');
|
||||
eval(subelement+'.'+elementIndex+'._count = 0;');
|
||||
}
|
||||
if (elementIndexes[i+1] == eval(subelement+'.'+elementIndex+'._count')) {
|
||||
eval(subelement+'.'+elementIndex+'._count++;');
|
||||
}
|
||||
if (elementIndexes[i+1] > eval(subelement+'.'+elementIndex+'._count')) {
|
||||
errorCode = "351";
|
||||
diagnostic = "Data Model Element Collection Set Out Of Order";
|
||||
}
|
||||
subelement = subelement.concat('.'+elementIndex+'_'+elementIndexes[i+1]);
|
||||
i++;
|
||||
} else {
|
||||
subelement = subelement.concat('.'+elementIndex);
|
||||
}
|
||||
if ((typeof eval(subelement)) == "undefined") {
|
||||
eval(subelement+' = new Object();');
|
||||
if (subelement.substr(0,14) == 'cmi.objectives') {
|
||||
eval(subelement+'.score = new Object();');
|
||||
eval(subelement+'.score._children = score_children;');
|
||||
eval(subelement+'.score.scaled = "";');
|
||||
eval(subelement+'.score.raw = "";');
|
||||
eval(subelement+'.score.min = "";');
|
||||
eval(subelement+'.score.max = "";');
|
||||
}
|
||||
if (subelement.substr(0,16) == 'cmi.interactions') {
|
||||
eval(subelement+'.objectives = new Object();');
|
||||
eval(subelement+'.objectives._count = 0;');
|
||||
eval(subelement+'.correct_responses = new Object();');
|
||||
eval(subelement+'.correct_responses._count = 0;');
|
||||
}
|
||||
}
|
||||
}
|
||||
element = subelement.concat('.'+elementIndexes[elementIndexes.length-1]);
|
||||
}
|
||||
//Store data
|
||||
if (errorCode == "0") {
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"].range')) != "undefined") {
|
||||
range = eval('datamodel["'+elementmodel+'"].range');
|
||||
ranges = range.split('#');
|
||||
value = value*1.0;
|
||||
if (value >= ranges[0]) {
|
||||
if ((ranges[1] == '*') || (value <= ranges[1])) {
|
||||
eval(element+'="'+value+'";');
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+":= "+value);';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
} else {
|
||||
errorCode = '407';
|
||||
}
|
||||
} else {
|
||||
errorCode = '407';
|
||||
}
|
||||
} else {
|
||||
eval(element+'="'+value+'";');
|
||||
errorCode = "0";
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert(element+":= "+value);';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
//errorCode = eval('datamodel["'+elementmodel+'"].writeerror');
|
||||
errorCode = "406";
|
||||
}
|
||||
} else {
|
||||
//errorCode = eval('datamodel["'+elementmodel+'"].writeerror');
|
||||
errorCode = "404";
|
||||
}
|
||||
} else {
|
||||
errorCode = "401"
|
||||
}
|
||||
} else {
|
||||
errorCode = "351";
|
||||
}
|
||||
} else {
|
||||
if (Terminated) {
|
||||
errorCode = "133";
|
||||
} else {
|
||||
errorCode = "132";
|
||||
}
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function Commit (param) {
|
||||
errorCode = "0";
|
||||
if (param == "") {
|
||||
if ((Initialized) && (!Terminated)) {
|
||||
result = StoreData(cmi,false);
|
||||
<?php
|
||||
if (($CFG->debug > 7) && (isadmin())) {
|
||||
echo 'alert("Data Commited");';
|
||||
}
|
||||
?>
|
||||
return "true";
|
||||
} else {
|
||||
if (Terminated) {
|
||||
errorCode = "143";
|
||||
} else {
|
||||
errorCode = "142";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errorCode = "201";
|
||||
}
|
||||
return "false";
|
||||
}
|
||||
|
||||
function GetLastError () {
|
||||
return errorCode;
|
||||
}
|
||||
|
||||
function GetErrorString (param) {
|
||||
if (param != "") {
|
||||
var errorString = new Array();
|
||||
errorString["0"] = "No error";
|
||||
errorString["101"] = "General exception";
|
||||
errorString["102"] = "General Inizialization Failure";
|
||||
errorString["103"] = "Already Initialized";
|
||||
errorString["104"] = "Content Instance Terminated";
|
||||
errorString["111"] = "General Termination Failure";
|
||||
errorString["112"] = "Termination Before Inizialization";
|
||||
errorString["113"] = "Termination After Termination";
|
||||
errorString["122"] = "Retrieve Data Before Initialization";
|
||||
errorString["123"] = "Retrieve Data After Termination";
|
||||
errorString["132"] = "Store Data Before Inizialization";
|
||||
errorString["133"] = "Store Data After Termination";
|
||||
errorString["142"] = "Commit Before Inizialization";
|
||||
errorString["143"] = "Commit After Termination";
|
||||
errorString["201"] = "General Argument Error";
|
||||
errorString["301"] = "General Get Failure";
|
||||
errorString["351"] = "General Set Failure";
|
||||
errorString["391"] = "General Commit Failure";
|
||||
errorString["401"] = "Undefinited Data Model";
|
||||
errorString["402"] = "Unimplemented Data Model Element";
|
||||
errorString["403"] = "Data Model Element Value Not Initialized";
|
||||
errorString["404"] = "Data Model Element Is Read Only";
|
||||
errorString["405"] = "Data Model Element Is Write Only";
|
||||
errorString["406"] = "Data Model Element Type Mismatch";
|
||||
errorString["407"] = "Data Model Element Value Out Of Range";
|
||||
errorString["408"] = "Data Model Dependency Not Established";
|
||||
return errorString[param];
|
||||
} else {
|
||||
return "";
|
||||
}
|
||||
}
|
||||
|
||||
function GetDiagnostic (param) {
|
||||
if (param == "") {
|
||||
return diagnostic;
|
||||
}
|
||||
return param;
|
||||
}
|
||||
|
||||
function AddTime (first, second) {
|
||||
var timestring = 'P';
|
||||
var matchexpr = /^P((\d+)Y)?((\d+)M)?((\d+)D)?(T((\d+)H)?((\d+)M)?((\d+(\.\d{1,2})?)S)?)?$/;
|
||||
var firstarray = first.match(matchexpr);
|
||||
var secondarray = second.match(matchexpr);
|
||||
if ((firstarray != null) && (secondarray != null)) {
|
||||
var secs = parseFloat(firstarray[13],10)+parseFloat(secondarray[13],10); //Seconds
|
||||
change = Math.floor(secs / 60);
|
||||
secs = secs - (change * 60);
|
||||
mins = parseInt(firstarray[11],10)+parseInt(secondarray[11],10)+change; //Minutes
|
||||
change = Math.floor(mins / 60);
|
||||
mins = mins - (change * 60);
|
||||
hours = parseInt(firstarray[10],10)+parseInt(secondarray[10],10)+change; //Hours
|
||||
change = Math.floor(hours / 24);
|
||||
hours = hours - (change * 24);
|
||||
days = parseInt(firstarray[6],10)+parseInt(secondarray[6],10)+change; // Days
|
||||
months = parseInt(firstarray[4],10)+parseInt(secondarray[4],10)
|
||||
years = parseInt(firstarray[2],10)+parseInt(secondarray[2],10)
|
||||
}
|
||||
if (years > 0) {
|
||||
timestring += years + 'Y';
|
||||
}
|
||||
if (months > 0) {
|
||||
timestring += months + 'M';
|
||||
}
|
||||
if (days > 0) {
|
||||
timestring += days + 'D';
|
||||
}
|
||||
if ((hours > 0) || (mins > 0) || (secs > 0)) {
|
||||
timestring += 'T';
|
||||
if (hours > 0) {
|
||||
timestring += hours + 'H';
|
||||
}
|
||||
if (mins > 0) {
|
||||
timestring += mins + 'M';
|
||||
}
|
||||
if (secs > 0) {
|
||||
timestring += secs + 'S';
|
||||
}
|
||||
}
|
||||
return timestring;
|
||||
}
|
||||
|
||||
function TotalTime() {
|
||||
total_time = AddTime(cmi.total_time, cmi.session_time);
|
||||
return '&'+underscore('cmi.total_time')+'='+escape(total_time);
|
||||
}
|
||||
|
||||
function CollectData(data,parent) {
|
||||
var datastring = '';
|
||||
for (property in data) {
|
||||
if (typeof data[property] == 'object') {
|
||||
datastring += CollectData(data[property],parent+'.'+property);
|
||||
} else {
|
||||
element = parent+'.'+property;
|
||||
expression = new RegExp(CMIIndex,'g');
|
||||
elementmodel = element.replace(expression,'.n.');
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
|
||||
elementstring = '&'+underscore(element)+'='+escape(data[property]);
|
||||
if ((typeof eval('datamodel["'+elementmodel+'"].defaultvalue')) != "undefined") {
|
||||
if (eval('datamodel["'+elementmodel+'"].defaultvalue') != data[property]) {
|
||||
datastring += elementstring;
|
||||
}
|
||||
} else {
|
||||
datastring += elementstring;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return datastring;
|
||||
}
|
||||
|
||||
function StoreData(data,storetotaltime) {
|
||||
if (storetotaltime) {
|
||||
if (cmi.mode == 'normal') {
|
||||
if (cmi.credit == 'credit') {
|
||||
if ((cmi.completion_threshold != null) && (cmi.progress_measure != '')) {
|
||||
if (cmi.progress_measure >= cmi.completion_threshold) {
|
||||
cmi.completion_status = 'completed';
|
||||
} else {
|
||||
cmi.completion_status = 'incomplete';
|
||||
}
|
||||
}
|
||||
if ((cmi.scaled_passed_score != null) && (cmi.score.scaled != '')) {
|
||||
if (cmi.score.scaled >= cmi.scaled_passed_score) {
|
||||
cmi.success_status = 'passed';
|
||||
} else {
|
||||
cmi.success_status = 'failed';
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
datastring = CollectData(data,'cmi');
|
||||
datastring += TotalTime();
|
||||
} else {
|
||||
datastring = CollectData(data,'cmi');
|
||||
}
|
||||
datastring += '&attempt=<?php echo $attempt ?>';
|
||||
datastring += '&scoid=<?php echo $sco->id ?>';
|
||||
//popupwin(datastring);
|
||||
var myRequest = NewHttpReq();
|
||||
result = DoRequest(myRequest,"<?php p($CFG->wwwroot) ?>/mod/scorm/datamodel.php","id=<?php p($id) ?>&sesskey=<?php p($USER->sesskey) ?>"+datastring);
|
||||
results = result.split('\n');
|
||||
errorCode = results[1];
|
||||
return results[0];
|
||||
}
|
||||
|
||||
this.Initialize = Initialize;
|
||||
this.Terminate = Terminate;
|
||||
this.GetValue = GetValue;
|
||||
this.SetValue = SetValue;
|
||||
this.Commit = Commit;
|
||||
this.GetLastError = GetLastError;
|
||||
this.GetErrorString = GetErrorString;
|
||||
this.GetDiagnostic = GetDiagnostic;
|
||||
}
|
||||
|
||||
var API_1484_11 = new SCORMapi1_3();
|
||||
784
mod/scorm/datamodels/scorm_13lib.php
Normal file
784
mod/scorm/datamodels/scorm_13lib.php
Normal file
@ -0,0 +1,784 @@
|
||||
<?php
|
||||
/* // Added by Pham Minh Duc
|
||||
case 'ADLNAV:PRESENTATION':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
foreach ($block['children'] as $adlnav) {
|
||||
if ($adlnav['name'] == 'ADLNAV:NAVIGATIONINTERFACE') {
|
||||
foreach ($adlnav['children'] as $adlnavInterface) {
|
||||
if ($adlnavInterface['name'] == 'ADLNAV:HIDELMSUI') {
|
||||
if ($adlnavInterface['tagData'] == 'continue') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->next = 1;
|
||||
}
|
||||
if ($adlnavInterface['tagData'] == 'previous') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->previous = 1;
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'IMSSS:SEQUENCING':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
foreach ($block['children'] as $sequencing) {
|
||||
if ($sequencing['name']=='IMSSS:CONTROLMODE') {
|
||||
if ($sequencing['attrs']['CHOICE'] == 'false') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->choice = 0;
|
||||
}
|
||||
if ($sequencing['attrs']['CHOICEEXIT'] == 'false') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->choiceexit = 0;
|
||||
}
|
||||
if ($sequencing['attrs']['FLOW'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->flow = 1;
|
||||
}
|
||||
if ($sequencing['attrs']['FORWARDONLY'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->forwardonly = 1;
|
||||
}
|
||||
if ($sequencing['attrs']['USECURRENTATTEMPTOBJECTINFO'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->usecurrentattemptobjectinfo = 1;
|
||||
}
|
||||
if ($sequencing['attrs']['USECURRENTATTEMPTPROGRESSINFO'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->usecurrentattemptprogressinfo = 1;
|
||||
}
|
||||
}
|
||||
if ($sequencing['name']=='ADLSEQ:CONSTRAINEDCHOICECONSIDERATIONS') {
|
||||
if ($sequencing['attrs']['CONSTRAINCHOICE'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->constrainChoice = 1;
|
||||
}
|
||||
if ($sequencing['attrs']['PREVENTACTIVATION'] == 'true') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->preventactivation = 1;
|
||||
}
|
||||
|
||||
}
|
||||
if ($sequencing['name']=='IMSSS:OBJECTIVES') {
|
||||
foreach ($sequencing['children'] as $objective) {
|
||||
if ($objective['name']=='IMSSS:PRIMARYOBJECTIVE') {
|
||||
foreach ($objective['children'] as $primaryobjective) {
|
||||
if ($primaryobjective['name']=='IMSSS:MINNORMALIZEDMEASURE') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->minnormalizedmeasure = $primaryobjective['tagData'];
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if ($sequencing['name']=='IMSSS:LIMITCONDITIONS') {
|
||||
if (!empty($sequencing['attrs']['ATTEMPTLIMIT'])) {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->attemptLimit = $sequencing['attrs']['ATTEMPTLIMIT'];
|
||||
}
|
||||
if (!empty($sequencing['attrs']['ATTEMPTABSOLUTEDURATIONLIMIT'])) {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->attemptAbsoluteDurationLimit = $sequencing['attrs']['ATTEMPTABSOLUTEDURATIONLIMIT'];
|
||||
}
|
||||
}
|
||||
if ($sequencing['name']=='IMSSS:ROLLUPRULES') {
|
||||
$rolluprules = array();
|
||||
if (!empty($sequencing['attrs']['ROLLUPOBJECTIVESATISFIED'])) {
|
||||
if ($sequencing['attrs']['ROLLUPOBJECTIVESATISFIED']== 'false') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->rollupobjectivesatisfied = 0;
|
||||
}
|
||||
}
|
||||
if (!empty($sequencing['attrs']['ROLLUPPROGRESSCOMPLETION'])) {
|
||||
if ($sequencing['attrs']['ROLLUPPROGRESSCOMPLETION']== 'false') {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->rollupprogresscompletion = 0;
|
||||
}
|
||||
}
|
||||
if (!empty($sequencing['attrs']['OBJECTIVEMEASUREWEIGHT'])) {
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->objectivemeasureweight = $sequencing['attrs']['OBJECTIVEMEASUREWEIGHT'];
|
||||
}
|
||||
|
||||
if (!empty($sequencing['children'])){
|
||||
foreach ($sequencing['children'] as $sequencingrolluprule) {
|
||||
if ($sequencingrolluprule['name']=='IMSSS:ROLLUPRULE' ) {
|
||||
$rolluprule = new stdClass();
|
||||
if ($sequencingrolluprule['attrs']['CHILDACTIVITYSET'] !=' ') {
|
||||
$rolluprule->childactivityset = $sequencingrolluprule['attrs']['CHILDACTIVITYSET'];
|
||||
if (!empty($sequencingrolluprule['children'])) {
|
||||
foreach ($sequencingrolluprule['children'] as $rolluproleconditions) {
|
||||
if ($rolluproleconditions['name']=='IMSSS:ROLLUPCONDITIONS') {
|
||||
$conditions = array();
|
||||
if (!empty($rolluproleconditions['attrs']['conditionCombination'])) {
|
||||
$rolluprule->conditionCombination = $rolluproleconditions['attrs']['conditionCombination'];
|
||||
}
|
||||
foreach ($rolluproleconditions['children'] as $rolluprulecondition) {
|
||||
if ($rolluprulecondition['name']=='IMSSS:ROLLUPCONDITION') {
|
||||
$condition = new stdClass();
|
||||
if (!empty($rolluprulecondition['attrs']['OPERATOR'])) {
|
||||
$condition->operator = $rolluprulecondition['attrs']['OPERATOR'];
|
||||
}
|
||||
if (!empty($rolluprulecondition['attrs']['CONDITION'])) {
|
||||
$condition->condition = $rolluprulecondition['attrs']['CONDITION'];
|
||||
}
|
||||
array_push($conditions,$condition);
|
||||
}
|
||||
}
|
||||
$rolluprule->conditions = $conditions;
|
||||
}
|
||||
if ($rolluproleconditions['name']=='IMSSS:ROLLUPACTION') {
|
||||
$rolluprule->rollupruleaction = $rolluproleconditions['attrs']['ACTION'];
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
array_push($rolluprules, $rolluprule);
|
||||
}
|
||||
}
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->rolluprules = $rolluprules;
|
||||
}
|
||||
|
||||
if ($sequencing['name']=='IMSSS:SEQUENCINGRULES') {
|
||||
$sequencingrules = array();
|
||||
foreach ($sequencing['children'] as $conditionrules) {
|
||||
if ($conditionrules['name']=='IMSSS:EXITCONDITIONRULE') {
|
||||
$sequencingrule = new stdClass();
|
||||
if (!empty($conditionrules['children'])) {
|
||||
foreach ($conditionrules['children'] as $conditionrule) {
|
||||
if ($conditionrule['name']=='IMSSS:RULECONDITIONS') {
|
||||
$ruleconditions = array();
|
||||
if (!empty($conditionrule['attrs']['conditionCombination'])) {
|
||||
$sequencingrule->conditionCombination = $conditionrule['attrs']['conditionCombination'];
|
||||
}
|
||||
foreach ($conditionrule['children'] as $rulecondition) {
|
||||
if ($rulecondition['name']=='IMSSS:RULECONDITION') {
|
||||
$condition = new stdClass();
|
||||
if (!empty($rulecondition['attrs']['OPERATOR'])) {
|
||||
$condition->operator = $rulecondition['attrs']['OPERATOR'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['CONDITION'])) {
|
||||
$condition->condition = $rulecondition['attrs']['CONDITION'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['MEASURETHRESHOLD'])) {
|
||||
$condition->measurethreshold = $rulecondition['attrs']['MEASURETHRESHOLD'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['REFERENCEDOBJECTIVE'])) {
|
||||
$condition->referencedobjective = $rulecondition['attrs']['REFERENCEDOBJECTIVE'];
|
||||
}
|
||||
array_push($ruleconditions,$condition);
|
||||
}
|
||||
}
|
||||
$sequencingrule->ruleconditions = $ruleconditions;
|
||||
}
|
||||
if ($conditionrule['name']=='IMSSS:RULEACTION') {
|
||||
$sequencingrule->exitconditionruleaction = $conditionrule['attrs']['ACTION'];
|
||||
}
|
||||
}
|
||||
}
|
||||
array_push($sequencingrules,$sequencingrule);
|
||||
}
|
||||
if ($conditionrules['name']=='IMSSS:PRECONDITIONRULE') {
|
||||
$sequencingrule = new stdClass();
|
||||
if (!empty($conditionrules['children'])) {
|
||||
foreach ($conditionrules['children'] as $conditionrule) {
|
||||
if ($conditionrule['name']=='IMSSS:RULECONDITIONS') {
|
||||
$ruleconditions = array();
|
||||
if (!empty($conditionrule['attrs']['conditionCombination'])) {
|
||||
$sequencingrule->conditionCombination = $conditionrule['attrs']['conditionCombination'];
|
||||
}
|
||||
foreach ($conditionrule['children'] as $rulecondition) {
|
||||
if ($rulecondition['name']=='IMSSS:RULECONDITION') {
|
||||
$condition = new stdClass();
|
||||
if (!empty($rulecondition['attrs']['OPERATOR'])) {
|
||||
$condition->operator = $rulecondition['attrs']['OPERATOR'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['CONDITION'])) {
|
||||
$condition->condition = $rulecondition['attrs']['CONDITION'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['MEASURETHRESHOLD'])) {
|
||||
$condition->measurethreshold = $rulecondition['attrs']['MEASURETHRESHOLD'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['REFERENCEDOBJECTIVE'])) {
|
||||
$condition->referencedobjective = $rulecondition['attrs']['REFERENCEDOBJECTIVE'];
|
||||
}
|
||||
array_push($ruleconditions,$condition);
|
||||
}
|
||||
}
|
||||
$sequencingrule->ruleconditions = $ruleconditions;
|
||||
}
|
||||
if ($conditionrule['name']=='IMSSS:RULEACTION') {
|
||||
$sequencingrule->preconditionruleaction = $conditionrule['attrs']['ACTION'];
|
||||
}
|
||||
}
|
||||
}
|
||||
array_push($sequencingrules,$sequencingrule);
|
||||
}
|
||||
if ($conditionrules['name']=='IMSSS:POSTCONDITIONRULE') {
|
||||
$sequencingrule = new stdClass();
|
||||
if (!empty($conditionrules['children'])) {
|
||||
foreach ($conditionrules['children'] as $conditionrule) {
|
||||
if ($conditionrule['name']=='IMSSS:RULECONDITIONS'){
|
||||
$ruleconditions = array();
|
||||
if (!empty($conditionrule['attrs']['conditionCombination'])){
|
||||
$sequencingrule->conditionCombination = $conditionrule['attrs']['conditionCombination'];
|
||||
}
|
||||
foreach ($conditionrule['children'] as $rulecondition){
|
||||
if ($rulecondition['name']=='IMSSS:RULECONDITION'){
|
||||
$condition = new stdClass();
|
||||
if (!empty($rulecondition['attrs']['OPERATOR'])){
|
||||
$condition->operator = $rulecondition['attrs']['OPERATOR'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['CONDITION'])){
|
||||
$condition->condition = $rulecondition['attrs']['CONDITION'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['MEASURETHRESHOLD'])){
|
||||
$condition->measurethreshold = $rulecondition['attrs']['MEASURETHRESHOLD'];
|
||||
}
|
||||
if (!empty($rulecondition['attrs']['REFERENCEDOBJECTIVE'])){
|
||||
$condition->referencedobjective = $rulecondition['attrs']['REFERENCEDOBJECTIVE'];
|
||||
}
|
||||
array_push($ruleconditions,$condition);
|
||||
}
|
||||
}
|
||||
$sequencingrule->ruleconditions = $ruleconditions;
|
||||
}
|
||||
if ($conditionrule['name']=='IMSSS:RULEACTION'){
|
||||
$sequencingrule->postconditionruleaction = $conditionrule['attrs']['ACTION'];
|
||||
}
|
||||
}
|
||||
}
|
||||
array_push($sequencingrules,$sequencingrule);
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->sequencingrules = $sequencingrules;
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
*/
|
||||
|
||||
function scorm_parse_scorm($pkgdir,$scormid) {
|
||||
global $CFG;
|
||||
|
||||
$launch = 0;
|
||||
$manifestfile = $pkgdir.'/imsmanifest.xml';
|
||||
|
||||
if (is_file($manifestfile)) {
|
||||
|
||||
$xmlstring = file_get_contents($manifestfile);
|
||||
$objXML = new xml2Array();
|
||||
$manifests = $objXML->parse($xmlstring);
|
||||
// print_r($manifests);
|
||||
$scoes = new stdClass();
|
||||
$scoes->version = '';
|
||||
$scoes = scorm_get_manifest($manifests,$scoes);
|
||||
|
||||
if (count($scoes->elements) > 0) {
|
||||
$olditems = get_records('scorm_scoes','scorm',$scormid);
|
||||
foreach ($scoes->elements as $manifest => $organizations) {
|
||||
foreach ($organizations as $organization => $items) {
|
||||
foreach ($items as $identifier => $item) {
|
||||
$item->scorm = $scormid;
|
||||
$item->manifest = $manifest;
|
||||
$item->organization = $organization;
|
||||
if ($olditemid = scorm_array_search('identifier',$item->identifier,$olditems)) {
|
||||
$item->id = $olditemid;
|
||||
$id = update_record('scorm_scoes',$item);
|
||||
unset($olditems[$olditemid]);
|
||||
} else {
|
||||
$id = insert_record('scorm_scoes',$item);
|
||||
}
|
||||
// Added by Pham Minh Duc
|
||||
$item->scormid = $scormid;
|
||||
$item->scoid = $id;
|
||||
$idControlMode = insert_record('scorm_sequencing_controlmode',$item);
|
||||
|
||||
if (!empty($item->sequencingrules)) {
|
||||
foreach($item->sequencingrules as $sequencingrule) {
|
||||
$sequencingrule->scormid = $scormid;
|
||||
$sequencingrule->scoid = $item->scoid;
|
||||
$idruleconditions = insert_record('scorm_sequencing_ruleconditions',$sequencingrule);
|
||||
foreach($sequencingrule->ruleconditions as $rulecondition) {
|
||||
$rulecondition->scormid = $sequencingrule->scormid;
|
||||
$rulecondition->scoid = $sequencingrule->scoid;
|
||||
$rulecondition->ruleconditionsid = $idruleconditions;
|
||||
$idrulecondition = insert_record('scorm_sequencing_rulecondition',$rulecondition);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (!empty($item->rolluprules)) {
|
||||
$idControlMode = insert_record('scorm_sequencing_rolluprules',$item);
|
||||
foreach($item->rolluprules as $rollup) {
|
||||
$rollup->rolluprulesid =$idControlMode;
|
||||
$rollup->scormid = $scormid;
|
||||
$rollup->scoid = $item->scoid;
|
||||
|
||||
$idRollupRule = insert_record('scorm_sequencing_rolluprule',$rollup);
|
||||
$rollup->rollupruleid = $idRollupRule;
|
||||
$idconditions = insert_record('scorm_sequencing_rollupruleconditions',$rollup);
|
||||
foreach($rollup->conditions as $condition){
|
||||
$condition->ruleconditionsid = $idconditions;
|
||||
$condition->scormid = $rollup->scormid;
|
||||
$condition->scoid = $rollup->scoid;
|
||||
$idcondition = insert_record('scorm_sequencing_rolluprulecondition',$condition);
|
||||
}
|
||||
}
|
||||
}
|
||||
// End Add
|
||||
if (($launch == 0) && ((empty($scoes->defaultorg)) || ($scoes->defaultorg == $identifier))) {
|
||||
$launch = $id;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (!empty($olditems)) {
|
||||
foreach($olditems as $olditem) {
|
||||
delete_records('scorm_scoes','id',$olditem->id);
|
||||
delete_records('scorm_scoes_track','scoid',$olditem->id);
|
||||
}
|
||||
}
|
||||
set_field('scorm','version',$scoes->version,'id',$scormid);
|
||||
}
|
||||
}
|
||||
|
||||
return $launch;
|
||||
}
|
||||
|
||||
function scorm_get_toc($user,$scorm,$liststyle,$currentorg='',$scoid='',$mode='normal',$attempt='',$play=false) {
|
||||
global $CFG;
|
||||
|
||||
// Added by Pham Minh Duc
|
||||
$suspendscoid = scorm_get_suspendscoid($scorm->id,$user->id);
|
||||
// End add
|
||||
|
||||
$strexpand = get_string('expcoll','scorm');
|
||||
$modestr = '';
|
||||
if ($mode == 'browse') {
|
||||
$modestr = '&mode='.$mode;
|
||||
}
|
||||
$scormpixdir = $CFG->modpixpath.'/scorm/pix';
|
||||
|
||||
$result = new stdClass();
|
||||
$result->toc = "<ul id='0' class='$liststyle'>\n";
|
||||
$tocmenus = array();
|
||||
$result->prerequisites = true;
|
||||
$incomplete = false;
|
||||
|
||||
//
|
||||
// Get the current organization infos
|
||||
//
|
||||
$organizationsql = '';
|
||||
if (!empty($currentorg)) {
|
||||
if (($organizationtitle = get_field('scorm_scoes','title','scorm',$scorm->id,'identifier',$currentorg)) != '') {
|
||||
$result->toc .= "\t<li>$organizationtitle</li>\n";
|
||||
$tocmenus[] = $organizationtitle;
|
||||
}
|
||||
$organizationsql = "AND organization='$currentorg'";
|
||||
}
|
||||
//
|
||||
// If not specified retrieve the last attempt number
|
||||
//
|
||||
if (empty($attempt)) {
|
||||
$attempt = scorm_get_last_attempt($scorm->id, $user->id);
|
||||
}
|
||||
$result->attemptleft = $scorm->maxattempt - $attempt;
|
||||
if ($scoes = get_records_select('scorm_scoes',"scorm='$scorm->id' $organizationsql order by id ASC")){
|
||||
//
|
||||
// Retrieve user tracking data for each learning object
|
||||
//
|
||||
$usertracks = array();
|
||||
foreach ($scoes as $sco) {
|
||||
if (!empty($sco->launch)) {
|
||||
if ($usertrack=scorm_get_tracks($sco->id,$user->id,$attempt)) {
|
||||
if ($usertrack->status == '') {
|
||||
$usertrack->status = 'notattempted';
|
||||
}
|
||||
$usertracks[$sco->identifier] = $usertrack;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$level=0;
|
||||
$sublist=1;
|
||||
$previd = 0;
|
||||
$nextid = 0;
|
||||
$findnext = false;
|
||||
$parents[$level]='/';
|
||||
|
||||
foreach ($scoes as $sco) {
|
||||
if ($parents[$level]!=$sco->parent) {
|
||||
if ($newlevel = array_search($sco->parent,$parents)) {
|
||||
for ($i=0; $i<($level-$newlevel); $i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
$level = $newlevel;
|
||||
} else {
|
||||
$i = $level;
|
||||
$closelist = '';
|
||||
while (($i > 0) && ($parents[$level] != $sco->parent)) {
|
||||
$closelist .= "\t\t</ul></li>\n";
|
||||
$i--;
|
||||
}
|
||||
if (($i == 0) && ($sco->parent != $currentorg)) {
|
||||
$style = '';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$sco->id])) {
|
||||
$style = ' style="display: none;"';
|
||||
}
|
||||
$result->toc .= "\t\t<li><ul id='$sublist' class='$liststyle'$style>\n";
|
||||
$level++;
|
||||
} else {
|
||||
$result->toc .= $closelist;
|
||||
$level = $i;
|
||||
}
|
||||
$parents[$level]=$sco->parent;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t\t<li>";
|
||||
$nextsco = next($scoes);
|
||||
if (($nextsco !== false) && ($sco->parent != $nextsco->parent) && (($level==0) || (($level>0) && ($nextsco->parent == $sco->identifier)))) {
|
||||
$sublist++;
|
||||
$icon = 'minus';
|
||||
if (isset($_COOKIE['hide:SCORMitem'.$nextsco->id])) {
|
||||
$icon = 'plus';
|
||||
}
|
||||
$result->toc .= '<a href="javascript:expandCollide(img'.$sublist.','.$sublist.','.$nextsco->id.');"><img id="img'.$sublist.'" src="'.$scormpixdir.'/'.$icon.'.gif" alt="'.$strexpand.'" title="'.$strexpand.'"/></a>';
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/spacer.gif" />';
|
||||
}
|
||||
if (empty($sco->title)) {
|
||||
$sco->title = $sco->identifier;
|
||||
}
|
||||
if (!empty($sco->launch)) {
|
||||
$startbold = '';
|
||||
$endbold = '';
|
||||
$score = '';
|
||||
if (empty($scoid) && ($mode != 'normal')) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
// Modified by Pham Minh Duc
|
||||
if ($suspendscoid == $sco->id){
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/suspend.gif" alt="Dang tam dung o day" title="Dang dung o day" />';
|
||||
} else {
|
||||
if (isset($usertracks[$sco->identifier])) {
|
||||
$usertrack = $usertracks[$sco->identifier];
|
||||
$strstatus = get_string($usertrack->status,'scorm');
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/'.$usertrack->status.'.gif" alt="'.$strstatus.'" title="'.$strstatus.'" />';
|
||||
|
||||
if (($usertrack->status == 'notattempted') || ($usertrack->status == 'incomplete') || ($usertrack->status == 'browsed')) {
|
||||
$incomplete = true;
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
}
|
||||
if ($usertrack->score_raw != '') {
|
||||
$score = '('.get_string('score','scorm').': '.$usertrack->score_raw.')';
|
||||
}
|
||||
} else {
|
||||
if ($play && empty($scoid)) {
|
||||
$scoid = $sco->id;
|
||||
}
|
||||
if ($sco->scormtype == 'sco') {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/notattempted.gif" alt="'.get_string('notattempted','scorm').'" title="'.get_string('notattempted','scorm').'" />';
|
||||
$incomplete = true;
|
||||
} else {
|
||||
$result->toc .= '<img src="'.$scormpixdir.'/asset.gif" alt="'.get_string('asset','scorm').'" title="'.get_string('asset','scorm').'" />';
|
||||
}
|
||||
}
|
||||
}
|
||||
// End Modify
|
||||
if ($sco->id == $scoid) {
|
||||
$startbold = '<b>';
|
||||
$endbold = '</b>';
|
||||
$findnext = true;
|
||||
$shownext = $sco->next;
|
||||
$showprev = $sco->previous;
|
||||
}
|
||||
|
||||
if (($nextid == 0) && (scorm_count_launchable($scorm->id,$currentorg) > 1) && ($nextsco!==false) && (!$findnext)) {
|
||||
if (!empty($sco->launch)) {
|
||||
$previd = $sco->id;
|
||||
}
|
||||
}
|
||||
if (empty($sco->prerequisites) || scorm_eval_prerequisites($sco->prerequisites,$usertracks)) {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = true;
|
||||
}
|
||||
// Modified by Pham Minh Duc
|
||||
if (scorm_isChoice($scorm->id,$sco->id) == 1) {
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid='.$sco->id;
|
||||
$result->toc .= ' '.$startbold.'<a href="'.$url.'">'.format_string($sco->title).'</a>'.$score.$endbold."</li>\n";
|
||||
$tocmenus[$sco->id] = scorm_repeater('−',$level) . '>' . format_string($sco->title);
|
||||
} else {
|
||||
$result->toc .= ' '.$startbold.format_string($sco->title).$score.$endbold."</li>\n";
|
||||
$tocmenus[$sco->id] = scorm_repeater('−',$level) . '>' . format_string($sco->title);
|
||||
}
|
||||
// End modify
|
||||
} else {
|
||||
if ($sco->id == $scoid) {
|
||||
$result->prerequisites = false;
|
||||
}
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
} else {
|
||||
$result->toc .= ' '.$sco->title."</li>\n";
|
||||
}
|
||||
if (($nextsco !== false) && ($nextid == 0) && ($findnext)) {
|
||||
if (!empty($nextsco->launch)) {
|
||||
$nextid = $nextsco->id;
|
||||
}
|
||||
}
|
||||
}
|
||||
for ($i=0;$i<$level;$i++) {
|
||||
$result->toc .= "\t\t</ul></li>\n";
|
||||
}
|
||||
|
||||
if ($play) {
|
||||
$sco = get_record('scorm_scoes','id',$scoid);
|
||||
$sco->previd = $previd;
|
||||
$sco->nextid = $nextid;
|
||||
$result->sco = $sco;
|
||||
$result->incomplete = $incomplete;
|
||||
} else {
|
||||
$result->incomplete = $incomplete;
|
||||
}
|
||||
}
|
||||
$result->toc .= "\t</ul>\n";
|
||||
if ($scorm->hidetoc == 0) {
|
||||
$result->toc .= '
|
||||
<script language="javascript" type="text/javascript">
|
||||
<!--
|
||||
function expandCollide(which,list,item) {
|
||||
var nn=document.ids?true:false
|
||||
var w3c=document.getElementById?true:false
|
||||
var beg=nn?"document.ids.":w3c?"document.getElementById(":"document.all.";
|
||||
var mid=w3c?").style":".style";
|
||||
|
||||
if (eval(beg+list+mid+".display") != "none") {
|
||||
which.src = "'.$scormpixdir.'/plus.gif";
|
||||
eval(beg+list+mid+".display=\'none\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, 356, "/").set();
|
||||
} else {
|
||||
which.src = "'.$scormpixdir.'/minus.gif";
|
||||
eval(beg+list+mid+".display=\'block\';");
|
||||
new cookie("hide:SCORMitem" + item, 1, -1, "/").set();
|
||||
}
|
||||
}
|
||||
-->
|
||||
</script>'."\n";
|
||||
}
|
||||
|
||||
$url = $CFG->wwwroot.'/mod/scorm/player.php?a='.$scorm->id.'&currentorg='.$currentorg.$modestr.'&scoid=';
|
||||
$result->tocmenu = popup_form($url,$tocmenus, "tocmenu", $sco->id, '', '', '', true);
|
||||
|
||||
return $result;
|
||||
}
|
||||
|
||||
//
|
||||
// Functions added by Pham Minh Duc
|
||||
//
|
||||
function scorm_get_score_from_parent($sco,$userid,$grademethod=VALUESCOES) {
|
||||
$scores = NULL;
|
||||
$scores->scoes = 0;
|
||||
$scores->values = 0;
|
||||
$scores->scaled = 0;
|
||||
$scores->max = 0;
|
||||
$scores->sum = 0;
|
||||
|
||||
$scoes_total = 0;
|
||||
$scoes_count = 0;
|
||||
$attempt = scorm_get_last_attempt($sco->scorm, $userid);
|
||||
$scoes = get_records('scorm_scoes', 'parent', $sco->identifier);
|
||||
foreach ($scoes as $sco)
|
||||
{
|
||||
$scoes_total++;
|
||||
if ($userdata=scorm_get_tracks($sco->id, $userid,$attempt)) {
|
||||
if (($userdata->status == 'completed') || ($userdata->success_status == 'passed')) {
|
||||
$scoes_count++;
|
||||
}
|
||||
|
||||
$scoreraw = $userdata->score_raw;
|
||||
if (!empty($userdata->score_raw)) {
|
||||
$scores->values++;
|
||||
$scores->sum += $userdata->score_raw;
|
||||
$scores->max = ($userdata->score_raw > $scores->max)?$userdata->score_raw:$scores->max;
|
||||
}
|
||||
if (!empty($userdata->score_scaled)) {
|
||||
$scores->scaled = $scores->scaled + $userdata->score_scaled;
|
||||
}
|
||||
}
|
||||
}
|
||||
if ($scoes_count > 0) {
|
||||
$scores->scaled = ($scores->scaled)/($scoes_count);
|
||||
}
|
||||
switch ($grademethod) {
|
||||
case VALUEHIGHEST:
|
||||
return $scores->max;
|
||||
break;
|
||||
case VALUEAVERAGE:
|
||||
if ($scores->values > 0) {
|
||||
return $scores->sum/$scores->values;
|
||||
} else {
|
||||
return 0;
|
||||
}
|
||||
break;
|
||||
case VALUESUM:
|
||||
return $scores->sum;
|
||||
break;
|
||||
case VALUESCOES:
|
||||
return $scores->scaled;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
function scorm_get_user_sco_count($scormid, $userid) {
|
||||
$scoes_count = 0;
|
||||
$attempt = scorm_get_last_attempt($current->scorm, $userid);
|
||||
$scoes = get_records('scorm_scoes', 'scorm', $scormid);
|
||||
|
||||
foreach ($scoes as $sco) {
|
||||
if ($userdata=scorm_get_tracks($sco->id, $userid,$attempt)) {
|
||||
if (($userdata->status == 'completed') || ($userdata->success_status == 'passed')) {
|
||||
$scoes_count++;
|
||||
}
|
||||
}
|
||||
}
|
||||
return $scoes_count;
|
||||
}
|
||||
|
||||
function scorm_grade_user_new($scoes, $userid, $grademethod=VALUESCOES) {
|
||||
$scores = NULL;
|
||||
$scores->scoes = 0;
|
||||
$scores->values = 0;
|
||||
$scores->scaled = 0;
|
||||
$scores->max = 0;
|
||||
$scores->sum = 0;
|
||||
|
||||
if (!$scoes) {
|
||||
return '';
|
||||
}
|
||||
$current = current($scoes);
|
||||
$attempt = scorm_get_last_attempt($current->scorm, $userid);
|
||||
foreach ($scoes as $sco) {
|
||||
if ($userdata=scorm_get_tracks($sco->id, $userid,$attempt)) {
|
||||
if (($userdata->status == 'completed') || ($userdata->success_status == 'passed')) {
|
||||
$scores->scoes++;
|
||||
}
|
||||
$scaled = $userdata->score_scaled;
|
||||
$scoreraw = $userdata->score_raw;
|
||||
if ($scaled ==0){
|
||||
$scores->scaled = $scores->scaled / $scores->scoes;
|
||||
}
|
||||
if (!empty($userdata->score_raw)) {
|
||||
$scores->values++;
|
||||
$scores->sum += $userdata->score_raw;
|
||||
$scores->max = ($userdata->score_raw > $scores->max)?$userdata->score_raw:$scores->max;
|
||||
}
|
||||
if (!empty($scaled)) {
|
||||
$scores->scaled = (($scores->scaled) * ($scores->scoes-1) + $scaled)/($scores->scoes);
|
||||
}
|
||||
}
|
||||
}
|
||||
switch ($grademethod) {
|
||||
case VALUEHIGHEST:
|
||||
return $scores->max;
|
||||
break;
|
||||
case VALUEAVERAGE:
|
||||
if ($scores->values > 0) {
|
||||
return $scores->sum/$scores->values;
|
||||
} else {
|
||||
return 0;
|
||||
}
|
||||
break;
|
||||
case VALUESUM:
|
||||
return $scores->sum;
|
||||
break;
|
||||
case VALUESCOES:
|
||||
return $scores->scaled;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
function scorm_insert_statistic($statisticInput){
|
||||
$id = null;
|
||||
if ($statistic = get_record_select('scorm_statistic',"userid='$statisticInput->userid' AND scormid='$statisticInput->scormid'")) {
|
||||
|
||||
$statistic->durationtime = $statisticInput->duration;
|
||||
$statistic->accesstime = $statisticInput->accesstime;
|
||||
$statistic->status = $statisticInput->status;
|
||||
$statistic->attemptnumber = $statisticInput->attemptnumber;
|
||||
$id = update_record('scorm_statistic',$statistic);
|
||||
} else {
|
||||
$id = insert_record('scorm_statistic',$statisticInput);
|
||||
}
|
||||
return $id;
|
||||
}
|
||||
|
||||
function scorm_insert_trackmodel($userid,$scormid,$scoid,$attempt) {
|
||||
$id = null;
|
||||
if ($suspendtrack = get_record_select('scorm_suspendtrack',"userid='$userid' AND scormid='$scormid'")) {
|
||||
$suspendtrack->suspendscoid = $scoid;
|
||||
$suspendtrack->attempt = $attempt;
|
||||
$id = update_record('scorm_suspendtrack',$suspendtrack);
|
||||
} else {
|
||||
$suspendtrack->scormid = $scormid;
|
||||
$suspendtrack->suspendscoid = $scoid;
|
||||
$suspendtrack->userid = $userid;
|
||||
$suspendtrack->attempt = $attempt;
|
||||
$id = insert_record('scorm_suspendtrack',$suspendtrack);
|
||||
}
|
||||
return $id;
|
||||
}
|
||||
|
||||
function scorm_get_suspendscoid($scormid,$userid) {
|
||||
if ($sco = get_record("scorm_suspendtrack","scormid",$scormid,"userid",$userid)) {
|
||||
$suspendscoid = $sco->suspendscoid;
|
||||
return $suspendscoid;
|
||||
} else {
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
||||
function scorm_set_attempt($scoid,$userid) {
|
||||
if ($scormid = get_field('scorm_scoes','scorm','id',$scoid)) {
|
||||
$attempt = scorm_get_last_attempt($scormid,$userid);
|
||||
} else {
|
||||
$attempt = 1;
|
||||
}
|
||||
$scormtype = get_field('scorm_scoes','scormtype','id',$scoid) ;
|
||||
if ($scormtype == 'sco'){
|
||||
$element = 'cmi.attempt_status';
|
||||
$value = 'attempted';
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,$element,$value);
|
||||
}
|
||||
}
|
||||
|
||||
function scorm_get_AbsoluteTimeLimit($scoid){
|
||||
$sco = get_record("scorm_scoes","id",$scoid);
|
||||
if (!empty($sco)){
|
||||
return $sco->attemptAbsoluteDurationLimit;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
function scorm_update_status($scormid,$scoid)
|
||||
{
|
||||
|
||||
}
|
||||
|
||||
function scorm_get_nextsco($scormid,$scoid)
|
||||
{
|
||||
|
||||
}
|
||||
|
||||
function scorm_get_presco($scormid,$scoid)
|
||||
{
|
||||
|
||||
}
|
||||
|
||||
function scorm_isChoice($scormid,$scoid)
|
||||
{
|
||||
$sco = get_record("scorm_sequencing_controlmode","scormid",$scormid,"scoid",$scoid);
|
||||
$scoparent = get_record("scorm_sequencing_controlmode","scormid",$scormid,"identifier",$sco->parent);
|
||||
|
||||
return $scoparent->choice;
|
||||
}
|
||||
|
||||
function scorm_isChoiceexit($scormid,$scoid)
|
||||
{
|
||||
$sco = get_record("scorm_sequencing_controlmode","scormid",$scormid,"scoid",$scoid);
|
||||
$scoparent = get_record("scorm_sequencing_controlmode","scormid",$scormid,"identifier",$sco->parent);
|
||||
|
||||
return $scoparent->choiceexit;
|
||||
}
|
||||
// End add
|
||||
|
||||
?>
|
||||
354
mod/scorm/datamodels/scormlib.php
Normal file
354
mod/scorm/datamodels/scormlib.php
Normal file
@ -0,0 +1,354 @@
|
||||
<?php
|
||||
function scorm_get_resources($blocks) {
|
||||
$resources = array();
|
||||
foreach ($blocks as $block) {
|
||||
if ($block['name'] == 'RESOURCES') {
|
||||
foreach ($block['children'] as $resource) {
|
||||
if ($resource['name'] == 'RESOURCE') {
|
||||
$resources[addslashes($resource['attrs']['IDENTIFIER'])] = $resource['attrs'];
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return $resources;
|
||||
}
|
||||
|
||||
function scorm_get_manifest($blocks,$scoes) {
|
||||
static $parents = array();
|
||||
static $resources;
|
||||
|
||||
static $manifest;
|
||||
static $organization;
|
||||
|
||||
if (count($blocks) > 0) {
|
||||
foreach ($blocks as $block) {
|
||||
switch ($block['name']) {
|
||||
case 'METADATA':
|
||||
if (isset($block['children'])) {
|
||||
foreach ($block['children'] as $metadata) {
|
||||
if ($metadata['name'] == 'SCHEMAVERSION') {
|
||||
if (empty($scoes->version)) {
|
||||
if (isset($metadata['tagData']) && (preg_match("/^(1\.2)$|^(CAM )?(1\.3)$/",$metadata['tagData'],$matches))) {
|
||||
$scoes->version = 'SCORM_'.$matches[count($matches)-1];
|
||||
} else {
|
||||
$scoes->version = 'SCORM_1.2';
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'MANIFEST':
|
||||
$manifest = addslashes($block['attrs']['IDENTIFIER']);
|
||||
$organization = '';
|
||||
$resources = array();
|
||||
$resources = scorm_get_resources($block['children']);
|
||||
$scoes = scorm_get_manifest($block['children'],$scoes);
|
||||
if (count($scoes->elements) <= 0) {
|
||||
foreach ($resources as $item => $resource) {
|
||||
if (!empty($resource['HREF'])) {
|
||||
$sco = new stdClass();
|
||||
$sco->identifier = $item;
|
||||
$sco->title = $item;
|
||||
$sco->parent = '/';
|
||||
$sco->launch = addslashes($resource['HREF']);
|
||||
$sco->scormtype = addslashes($resource['ADLCP:SCORMTYPE']);
|
||||
$scoes->elements[$manifest][$organization][$item] = $sco;
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'ORGANIZATIONS':
|
||||
if (!isset($scoes->defaultorg)) {
|
||||
$scoes->defaultorg = addslashes($block['attrs']['DEFAULT']);
|
||||
}
|
||||
$scoes = scorm_get_manifest($block['children'],$scoes);
|
||||
break;
|
||||
case 'ORGANIZATION':
|
||||
$identifier = addslashes($block['attrs']['IDENTIFIER']);
|
||||
$organization = '';
|
||||
$scoes->elements[$manifest][$organization][$identifier]->identifier = $identifier;
|
||||
$scoes->elements[$manifest][$organization][$identifier]->parent = '/';
|
||||
$scoes->elements[$manifest][$organization][$identifier]->launch = '';
|
||||
$scoes->elements[$manifest][$organization][$identifier]->scormtype = '';
|
||||
|
||||
$parents = array();
|
||||
$parent = new stdClass();
|
||||
$parent->identifier = $identifier;
|
||||
$parent->organization = $organization;
|
||||
array_push($parents, $parent);
|
||||
$organization = $identifier;
|
||||
|
||||
$scoes = scorm_get_manifest($block['children'],$scoes);
|
||||
|
||||
array_pop($parents);
|
||||
break;
|
||||
case 'ITEM':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
|
||||
$identifier = addslashes($block['attrs']['IDENTIFIER']);
|
||||
$scoes->elements[$manifest][$organization][$identifier]->identifier = $identifier;
|
||||
$scoes->elements[$manifest][$organization][$identifier]->parent = $parent->identifier;
|
||||
if (!isset($block['attrs']['ISVISIBLE'])) {
|
||||
$block['attrs']['ISVISIBLE'] = 'true';
|
||||
}
|
||||
$scoes->elements[$manifest][$organization][$identifier]->isvisible = addslashes($block['attrs']['ISVISIBLE']);
|
||||
if (!isset($block['attrs']['PARAMETERS'])) {
|
||||
$block['attrs']['PARAMETERS'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$organization][$identifier]->parameters = addslashes($block['attrs']['PARAMETERS']);
|
||||
if (!isset($block['attrs']['IDENTIFIERREF'])) {
|
||||
$scoes->elements[$manifest][$organization][$identifier]->launch = '';
|
||||
$scoes->elements[$manifest][$organization][$identifier]->scormtype = 'asset';
|
||||
} else {
|
||||
$idref = addslashes($block['attrs']['IDENTIFIERREF']);
|
||||
$base = '';
|
||||
if (isset($resources[$idref]['XML:BASE'])) {
|
||||
$base = $resources[$idref]['XML:BASE'];
|
||||
}
|
||||
$scoes->elements[$manifest][$organization][$identifier]->launch = addslashes($base.$resources[$idref]['HREF']);
|
||||
if (empty($resources[$idref]['ADLCP:SCORMTYPE'])) {
|
||||
$resources[$idref]['ADLCP:SCORMTYPE'] = 'asset';
|
||||
}
|
||||
$scoes->elements[$manifest][$organization][$identifier]->scormtype = addslashes($resources[$idref]['ADLCP:SCORMTYPE']);
|
||||
}
|
||||
|
||||
$parent = new stdClass();
|
||||
$parent->identifier = $identifier;
|
||||
$parent->organization = $organization;
|
||||
array_push($parents, $parent);
|
||||
|
||||
$scoes = scorm_get_manifest($block['children'],$scoes);
|
||||
|
||||
array_pop($parents);
|
||||
break;
|
||||
case 'TITLE':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->title = addslashes($block['tagData']);
|
||||
break;
|
||||
case 'ADLCP:PREREQUISITES':
|
||||
if ($block['attrs']['TYPE'] == 'aicc_script') {
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->prerequisites = addslashes($block['tagData']);
|
||||
}
|
||||
break;
|
||||
case 'ADLCP:MAXTIMEALLOWED':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->maxtimeallowed = addslashes($block['tagData']);
|
||||
break;
|
||||
case 'ADLCP:TIMELIMITACTION':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->timelimitaction = addslashes($block['tagData']);
|
||||
break;
|
||||
case 'ADLCP:DATAFROMLMS':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->datafromlms = addslashes($block['tagData']);
|
||||
break;
|
||||
case 'ADLCP:MASTERYSCORE':
|
||||
$parent = array_pop($parents);
|
||||
array_push($parents, $parent);
|
||||
if (!isset($block['tagData'])) {
|
||||
$block['tagData'] = '';
|
||||
}
|
||||
$scoes->elements[$manifest][$parent->organization][$parent->identifier]->masteryscore = addslashes($block['tagData']);
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
return $scoes;
|
||||
}
|
||||
|
||||
function scorm_parse_scorm($pkgdir,$scormid) {
|
||||
global $CFG;
|
||||
|
||||
$launch = 0;
|
||||
$manifestfile = $pkgdir.'/imsmanifest.xml';
|
||||
|
||||
if (is_file($manifestfile)) {
|
||||
|
||||
$xmlstring = file_get_contents($manifestfile);
|
||||
$objXML = new xml2Array();
|
||||
$manifests = $objXML->parse($xmlstring);
|
||||
// print_r($manifests);
|
||||
$scoes = new stdClass();
|
||||
$scoes->version = '';
|
||||
$scoes = scorm_get_manifest($manifests,$scoes);
|
||||
|
||||
if (count($scoes->elements) > 0) {
|
||||
$olditems = get_records('scorm_scoes','scorm',$scormid);
|
||||
foreach ($scoes->elements as $manifest => $organizations) {
|
||||
foreach ($organizations as $organization => $items) {
|
||||
foreach ($items as $identifier => $item) {
|
||||
$newitem = new stdClass();
|
||||
$newitem->scorm = $scormid;
|
||||
$newitem->manifest = $manifest;
|
||||
$newitem->organization = $organization;
|
||||
$standarddatas = array('parent', 'identifier', 'launch', 'scormtype', 'title');
|
||||
foreach ($standarddatas as $standarddata) {
|
||||
$newitem->$standarddata = $item->$standarddata;
|
||||
}
|
||||
|
||||
if ($olditemid = scorm_array_search('identifier',$newitem->identifier,$olditems)) {
|
||||
$newitem->id = $olditemid;
|
||||
$id = update_record('scorm_scoes',$newitem);
|
||||
unset($olditems[$olditemid]);
|
||||
delete_records('scorm_scoes_data','scoid',$olditem->id);
|
||||
} else {
|
||||
$id = insert_record('scorm_scoes',$newitem);
|
||||
}
|
||||
|
||||
$data = new stdClass();
|
||||
$data->scormid = $scormid;
|
||||
$data->scoid = $id;
|
||||
$optionaldatas = scorm_optionals_data();
|
||||
foreach ($optionalsdatas as $optionaldata) {
|
||||
if (isset($item->$optionaldata)) {
|
||||
$data->name = $optionaldata;
|
||||
$data->value = $item->$optionaldata;
|
||||
$dataid = insert_record('scorm_scoes_data');
|
||||
}
|
||||
}
|
||||
|
||||
if (($launch == 0) && ((empty($scoes->defaultorg)) || ($scoes->defaultorg == $identifier))) {
|
||||
$launch = $id;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (!empty($olditems)) {
|
||||
foreach($olditems as $olditem) {
|
||||
delete_records('scorm_scoes','id',$olditem->id);
|
||||
delete_records('scorm_scoes_data','scoid',$olditem->id);
|
||||
delete_records('scorm_scoes_track','scoid',$olditem->id);
|
||||
}
|
||||
}
|
||||
set_field('scorm','version',$scoes->version,'id',$scormid);
|
||||
}
|
||||
}
|
||||
|
||||
return $launch;
|
||||
}
|
||||
|
||||
/* Usage
|
||||
Grab some XML data, either from a file, URL, etc. however you want. Assume storage in $strYourXML;
|
||||
|
||||
$objXML = new xml2Array();
|
||||
$arrOutput = $objXML->parse($strYourXML);
|
||||
print_r($arrOutput); //print it out, or do whatever!
|
||||
|
||||
*/
|
||||
class xml2Array {
|
||||
|
||||
var $arrOutput = array();
|
||||
var $resParser;
|
||||
var $strXmlData;
|
||||
|
||||
/**
|
||||
* Convert a utf-8 string to html entities
|
||||
*
|
||||
* @param string $str The UTF-8 string
|
||||
* @return string
|
||||
*/
|
||||
function utf8_to_entities($str) {
|
||||
global $CFG;
|
||||
|
||||
$entities = '';
|
||||
$values = array();
|
||||
$lookingfor = 1;
|
||||
|
||||
if (empty($CFG->unicodedb)) { // If Unicode DB support enable does not convert string
|
||||
$textlib = textlib_get_instance();
|
||||
for ($i = 0; $i < $textlib->strlen($str,'utf-8'); $i++) {
|
||||
$thisvalue = ord($str[$i]);
|
||||
if ($thisvalue < 128) {
|
||||
$entities .= $str[$i]; // Leave ASCII chars unchanged
|
||||
} else {
|
||||
if (count($values) == 0) {
|
||||
$lookingfor = ($thisvalue < 224) ? 2 : 3;
|
||||
}
|
||||
$values[] = $thisvalue;
|
||||
if (count($values) == $lookingfor) {
|
||||
$number = ($lookingfor == 3) ?
|
||||
(($values[0] % 16) * 4096) + (($values[1] % 64) * 64) + ($values[2] % 64):
|
||||
(($values[0] % 32) * 64) + ($values[1] % 64);
|
||||
$entities .= '&#' . $number . ';';
|
||||
$values = array();
|
||||
$lookingfor = 1;
|
||||
}
|
||||
}
|
||||
}
|
||||
return $entities;
|
||||
} else {
|
||||
return $str;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Parse an XML text string and create an array tree that rapresent the XML structure
|
||||
*
|
||||
* @param string $strInputXML The XML string
|
||||
* @return array
|
||||
*/
|
||||
function parse($strInputXML) {
|
||||
$this->resParser = xml_parser_create ('UTF-8');
|
||||
xml_set_object($this->resParser,$this);
|
||||
xml_set_element_handler($this->resParser, "tagOpen", "tagClosed");
|
||||
|
||||
xml_set_character_data_handler($this->resParser, "tagData");
|
||||
|
||||
$this->strXmlData = xml_parse($this->resParser,$strInputXML );
|
||||
if(!$this->strXmlData) {
|
||||
die(sprintf("XML error: %s at line %d",
|
||||
xml_error_string(xml_get_error_code($this->resParser)),
|
||||
xml_get_current_line_number($this->resParser)));
|
||||
}
|
||||
|
||||
xml_parser_free($this->resParser);
|
||||
|
||||
return $this->arrOutput;
|
||||
}
|
||||
|
||||
function tagOpen($parser, $name, $attrs) {
|
||||
$tag=array("name"=>$name,"attrs"=>$attrs);
|
||||
array_push($this->arrOutput,$tag);
|
||||
}
|
||||
|
||||
function tagData($parser, $tagData) {
|
||||
if(trim($tagData)) {
|
||||
if(isset($this->arrOutput[count($this->arrOutput)-1]['tagData'])) {
|
||||
$this->arrOutput[count($this->arrOutput)-1]['tagData'] .= $this->utf8_to_entities($tagData);
|
||||
} else {
|
||||
$this->arrOutput[count($this->arrOutput)-1]['tagData'] = $this->utf8_to_entities($tagData);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
function tagClosed($parser, $name) {
|
||||
$this->arrOutput[count($this->arrOutput)-2]['children'][] = $this->arrOutput[count($this->arrOutput)-1];
|
||||
array_pop($this->arrOutput);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
?>
|
||||
513
mod/scorm/datamodels/sequencinglib.php
Executable file
513
mod/scorm/datamodels/sequencinglib.php
Executable file
@ -0,0 +1,513 @@
|
||||
<?php
|
||||
|
||||
// Cac ham danh cho viec thuc thi Sequencing
|
||||
// --------Ket thuc cac ham danh cho viec thuc thi Sequencing ------------
|
||||
|
||||
// Cac ham danh cho viec thuc thi Rollup
|
||||
|
||||
//-----------------------------------------------------
|
||||
function scorm_rollup_updatestatus($scormid,$scoidchild, $userid)
|
||||
{
|
||||
//$f = "D:\\test.txt";
|
||||
//@$ft = fopen($f,"a");
|
||||
//fwrite($ft,"\n >>>>> SCO goi Rollup la ".$scoidchild);
|
||||
$scochild = get_record("scorm_scoes","id",$scoidchild);
|
||||
$scoparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$scochild->parent);
|
||||
//Danh sach cac con cua cha
|
||||
$scochildren = get_records_select("scorm_scoes","scorm =".$scormid." and parent ='".$scoparent->identifier."'");
|
||||
//Lay gia tri last attempt
|
||||
//fwrite($ft,"\n >>>>> Bat dau xu ly Rollup SCO cha ".$scoparent->id);
|
||||
$attempt = scorm_get_last_attempt($scormid,$userid);
|
||||
|
||||
if(!empty($scoparent)){
|
||||
$scoid = $scoparent->id;
|
||||
$rolluprules = get_record("scorm_sequencing_rolluprules","scormid",$scormid,"scoid",$scoid);
|
||||
if (!empty($rolluprules)){
|
||||
$idrolluprules = $rolluprules->id;
|
||||
$rules = get_records_select('scorm_sequencing_rolluprule','scoid ='.$scoid.' and rolluprulesid ='. $idrolluprules);
|
||||
|
||||
foreach ($rules as $rule){
|
||||
$ruleid = $rule->id;
|
||||
$ruleConditions = get_record("scorm_sequencing_rollupruleconditions","scoid",$scoid,"rollupruleid",$ruleid);
|
||||
$idruleConditions = $ruleConditions->id;
|
||||
$conditions = get_records_select('scorm_sequencing_rolluprulecondition','scoid ='.$scoid.' and ruleconditionsid ='.$idruleConditions);
|
||||
|
||||
//Truong hop 1: childactivitySet = all
|
||||
// conditioncombination = any
|
||||
if (($rule->childactivityset == 'all') && ($ruleConditions->conditioncombination=='any')){
|
||||
foreach($conditions as $condition){
|
||||
$conditionOK = false;
|
||||
//Condition 1: condition = attempted operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='noOp')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup voi dieu kien attempt \n");
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status != 'attempted'){
|
||||
//fwrite($ft,"\n >>>>> Co SCO con chua attempted \n");
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 2: condition = attempted operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='not')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup voi dieu kien not attempt \n");
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status != 'notattempted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 3: condition = satisfied operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='noOp')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->satisfied_status != 'satisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 4: condition = satisfied operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='not')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->satisfied_status != 'notSatisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 5: condition = completed operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='noOp')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status != 'completed'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 6: condition = completed operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='not')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status != 'notcompleted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Neu dieu kien van dung sau khi xem xet thi thuc hien action
|
||||
if ($conditionOK == true){
|
||||
if ($ruleConditions->rollupruleaction == 'completed')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.completion_status','completed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi completed cho SCO ".$scoid);
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'satisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','passed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi satisfied\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'notSatisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','failed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi notSatisfied\n");
|
||||
}
|
||||
//echo "<script language='JavaScript'>";
|
||||
//echo "alert('Thuc hien rollup. Trang thai ".$scoparent->identifier." la hoan thanh voi userid".$userid."');";
|
||||
//echo "<script>";
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
//Ket thuc truong hop 1
|
||||
//Truong hop 2: childactivitySet = any
|
||||
// conditioncombination = any
|
||||
if (($rule->childactivityset == 'any') && ($ruleConditions->conditioncombination=='any')){
|
||||
$conditionOK = false;
|
||||
foreach($conditions as $condition){
|
||||
//$conditionOK = false;
|
||||
//Condition 1: condition = attempted operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='noOp')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status = 'attempted'){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 2: condition = attempted operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='not')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status = 'notattempted'){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 3: condition = satisfied operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='noOp')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->satisfied_status = 'satisfied'){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 4: condition = satisfied operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='not')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->satisfied_status = 'notSatisfied'){
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup voi notSatisfied\n");
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 5: condition = completed operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='noOp')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status = 'completed'){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Condition 6: condition = completed operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='not')){
|
||||
$conditionOK = false;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
if ($usertrack->attempt_status = 'notcompleted'){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Neu dieu kien van dung sau khi xem xet thi thuc hien action
|
||||
if ($conditionOK == true){
|
||||
if ($ruleConditions->rollupruleaction == 'completed')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.completion_status','completed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi completed\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'satisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','passed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi satisfied\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'notSatisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','failed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi notSatisfied\n");
|
||||
}
|
||||
//echo "<script language='JavaScript'>";
|
||||
//echo "alert('Thuc hien rollup. Trang thai ".$scoparent->identifier." la hoan thanh voi userid".$userid."');";
|
||||
//echo "<script>";
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
//Ket thuc truong hop 2
|
||||
//Truong hop 3: childactivitySet = any
|
||||
// conditioncombination = all
|
||||
if (($rule->childactivityset == 'any') && ($ruleConditions->conditioncombination=='all')){
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
$conditionOK = true;
|
||||
foreach($conditions as $condition){
|
||||
//Condition 1: condition = attempted operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'attempted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 2: condition = attempted operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notattempted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 3: condition = satisfied operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'satisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 4: condition = satisfied operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notSatisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 5: condition = completed operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'completed'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 6: condition = completed operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notcompleted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Neu dieu kien van dung sau khi xem xet thi thuc hien action
|
||||
}
|
||||
}
|
||||
if ($conditionOK == true){
|
||||
if ($ruleConditions->rollupruleaction == 'completed')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.completion_status','completed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi completed\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'satisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','passed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi satisfied\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'notSatisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','failed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi notSatisfied\n");
|
||||
}
|
||||
//echo "<script language='JavaScript'>";
|
||||
//echo "alert('Thuc hien rollup. Trang thai ".$scoparent->identifier." la hoan thanh voi userid".$userid."');";
|
||||
//echo "<script>";
|
||||
|
||||
}
|
||||
}
|
||||
//Ket thuc truong hop 3
|
||||
//Truong hop 4: childactivitySet = all
|
||||
// conditioncombination = all
|
||||
if (($rule->childactivityset == 'all') && ($ruleConditions->conditioncombination=='all')){
|
||||
$conditionOK = true;
|
||||
foreach ($scochildren as $sco){
|
||||
$usertrack = scorm_get_tracks($sco->id,$userid);
|
||||
foreach($conditions as $condition){
|
||||
//Condition 1: condition = attempted operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'attempted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 2: condition = attempted operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'attempted') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notattempted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 3: condition = satisfied operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'satisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 4: condition = satisfied operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'satisfied') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notSatisfied'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 5: condition = completed operator = 'noOp'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='noOp')){
|
||||
if ($usertrack->attempt_status != 'completed'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Condition 6: condition = completed operator = 'not'
|
||||
// Thuc hien rollupaction
|
||||
if (($condition->condition == 'completed') && ($condition->operator=='not')){
|
||||
if ($usertrack->attempt_status != 'notcompleted'){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
//Neu dieu kien van dung sau khi xem xet thi thuc hien action
|
||||
}
|
||||
}
|
||||
if ($conditionOK == true){
|
||||
if ($ruleConditions->rollupruleaction == 'completed')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.completion_status','completed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi completed\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'satisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','passed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi satisfied\n");
|
||||
}
|
||||
if ($ruleConditions->rollupruleaction == 'notSatisfied')
|
||||
{
|
||||
scorm_insert_track($userid,$scormid,$scoid,$attempt,'cmi.success_status','failed');
|
||||
//fwrite($ft,"\n >>>>> Xu ly Rollup thanh cong voi notSatisfied\n");
|
||||
}
|
||||
//echo "<script language='JavaScript'>";
|
||||
//echo "alert('Thuc hien rollup. Trang thai ".$scoparent->identifier." la hoan thanh voi userid".$userid."');";
|
||||
//echo "<script>";
|
||||
|
||||
}
|
||||
}
|
||||
//Ket thuc truong hop 4
|
||||
}
|
||||
}
|
||||
|
||||
//Thuc hien de qui cho Rollup voi cac muc cha
|
||||
$scograndparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$scoparent->parent);
|
||||
if (!empty($scograndparent)){
|
||||
//fwrite($ft,"\n >>>>> Quay lui Rollup SCO ".$scoparent->id);
|
||||
scorm_rollup_updatestatus($scormid,$scoparent->id, $userid);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// --------Ket thuc cac ham danh cho viec thuc thi Rollup -------
|
||||
|
||||
//---------Thuc hien sequencing rule -----------------
|
||||
function scorm_sequecingrule_implement($scormid,$scoidchild, $userid)
|
||||
{
|
||||
$sequencingResult->rule = ''; //Rule co 3 truong hop exit, pre va post
|
||||
$sequencingResult->action = '';
|
||||
|
||||
|
||||
$f = "D:\\test.txt";
|
||||
@$ft = fopen($f,"a");
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing \n");
|
||||
|
||||
$scochild = get_record("scorm_scoes","id",$scoidchild);
|
||||
$scoparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$scochild->parent);
|
||||
//Danh sach cac con cua cha
|
||||
$scochildren = get_records_select("scorm_scoes","scorm =".$scormid." and parent ='".$scoparent->identifier."'");
|
||||
//Lay gia tri last attempt
|
||||
|
||||
$attempt = scorm_get_last_attempt($scormid,$userid);
|
||||
|
||||
if(!empty($scoparent)){
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing : Co Parent\n");
|
||||
|
||||
$scoid = $scoparent->id;
|
||||
//Lay trang thai cua SCO cha
|
||||
$usertrack = scorm_get_tracks($scoid,$userid);
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing : id Parent ".$scoid);
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing : usertrack ".$usertrack->status);
|
||||
$sequencingrules = get_records_select("scorm_sequencing_ruleconditions","scormid=".$scormid." and scoid=".$scoid);
|
||||
if (!empty($sequencingrules)){
|
||||
foreach($sequencingrules as $sequencingrule){
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing : Co Sequencing o SCO".$sequencingrule->scoid);
|
||||
|
||||
$idsequencingrule = $sequencingrule->id;
|
||||
$ruleconditions = get_records_select('scorm_sequencing_rulecondition','scoid ='.$scoid.' and ruleconditionsid ='. $idsequencingrule);
|
||||
|
||||
$conditionOK = true;
|
||||
//Truong hop 1: conditioncombination = all
|
||||
if ($sequencingrule->conditioncombination =='all'){
|
||||
//fwrite($ft,"\n >>>>> Kiem tra Sequencing :conditioncombination la all \n");
|
||||
$conditionOK = true;
|
||||
//fwrite($ft,"\n >>>>> Usertrack->status la: ".$usertrack->status);
|
||||
foreach ($ruleconditions as $rulecondition){
|
||||
//Neu co mot dieu kien khong thoa man thi se khong dung
|
||||
if (($rulecondition->condition != $usertrack->status)&&($rulecondition->condition != $usertrack->success_status)&&($rulecondition->condition != $usertrack->satisfied_status)){
|
||||
$conditionOK = false;
|
||||
}
|
||||
}
|
||||
}
|
||||
//Truong hop 2: conditioncombination = any
|
||||
if ($sequencingrule->conditioncombination =='any'){
|
||||
$conditionOK = false;
|
||||
foreach ($ruleconditions as $rulecondition){
|
||||
//Neu co mot dieu kien thoa man thi se dung
|
||||
if (($rulecondition->condition == $usertrack->status) || ($rulecondition->condition == $usertrack->success_status) || ($rulecondition->condition == $usertrack->satisfied_status) ){
|
||||
$conditionOK = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//fwrite($ft,"\n >>>>> Gia tri conditionOK sau khi kiem tra dk la: ".$conditionOK);
|
||||
//Neu dieu kien van dung thi thuc hien Action
|
||||
if ($conditionOK == true){
|
||||
//fwrite($ft,"\n >>>>> Dieu kien Sequencing OK..Thuc hien Action \n");
|
||||
//Truong hop 1: ExitAction la Exit
|
||||
if ($sequencingrule->exitconditionruleaction=='exit')
|
||||
{
|
||||
//fwrite($ft,"\n >>>>> Xu ly Sequencing thanh cong -- Thuc hien su kien exit \n");
|
||||
echo "<script language='JavaScript'>";
|
||||
echo "alert('Thuc hien sequen. Do Trang thai ".$scoparent->identifier." la hoan thanh. Tien hanh EXIT');";
|
||||
echo "</script>";
|
||||
$sequencingResult->rule = 'exit';
|
||||
$sequencingResult->action = 'exit';
|
||||
}
|
||||
if ($sequencingrule->preconditionruleaction=='disabled')
|
||||
{
|
||||
//fwrite($ft,"\n >>>>> Xu ly Sequencing thanh cong -- Thuc hien su kien disable \n");
|
||||
echo "<script language='JavaScript'>";
|
||||
echo "alert('Thuc hien sequen. Do Trang thai ".$scoparent->identifier." la hoan thanh. Tien hanh Disable');";
|
||||
echo "</script>";
|
||||
$sequencingResult->rule = 'pre';
|
||||
$sequencingResult->action = 'disable';
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return $sequencingResult;
|
||||
}
|
||||
function get_sco_after_exit($scoid,$scormid){
|
||||
$scochild = get_record("scorm_scoes","id",$scoid);
|
||||
$scoparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$scochild->parent);
|
||||
$exitscoid = $scoid++;
|
||||
$exitscochild = get_record("scorm_scoes","id",$exitscoid,"scorm",$scormid);
|
||||
if (empty($exitscochild)){
|
||||
//Da ra ngoai vung scoid. Hay day chinh la sco cuoi cung
|
||||
return 0;
|
||||
}
|
||||
else{
|
||||
$exitscoparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$exitscochild->parent);
|
||||
//Neu chua ra khoi activity do thi tiep tuc
|
||||
while ($exitscoparent->id == $scoparent->id){
|
||||
$exitscoid++;
|
||||
$exitscochild = get_record("scorm_scoes","id",$exitscoid);
|
||||
if (empty($exitscochild)){
|
||||
//Da ra ngoai vung scoid. Hay day chinh la sco cuoi cung
|
||||
return 0;
|
||||
}
|
||||
else{
|
||||
$exitscoparent = get_record("scorm_scoes","scorm",$scormid,"identifier",$exitscochild->parent);
|
||||
}
|
||||
}
|
||||
}
|
||||
return $exitscoid;
|
||||
}
|
||||
|
||||
?>
|
||||
29
mod/scorm/datamodels/suspend.php
Executable file
29
mod/scorm/datamodels/suspend.php
Executable file
@ -0,0 +1,29 @@
|
||||
<?php
|
||||
require_once('../../config.php');
|
||||
require_once('locallib.php');
|
||||
|
||||
$id = required_param('id', PARAM_INT); // course ID
|
||||
$scormid = required_param('scorm', PARAM_INT); // scorm ID
|
||||
$scoid = required_param('sco', PARAM_INT); // suspend sco ID
|
||||
$userid = required_param('userid', PARAM_INT); // user ID
|
||||
|
||||
$attempt = scorm_get_last_attempt($scormid,$userid);
|
||||
$statistic = get_record('scorm_statistic',"scormid",$scormid,"userid",$userid);
|
||||
$statisticInput->accesstime = $statistic->accesstime;
|
||||
$statisticInput->durationtime = $statistic->durationtime + time()- $statistic->accesstime;
|
||||
$statisticInput->status = 'suspend';
|
||||
$statisticInput->attemptnumber = $attempt;
|
||||
$statisticInput->scormid = $statistic->scormid;
|
||||
$statisticInput->userid = $statistic->userid;
|
||||
$statisticid = scorm_insert_statistic($statisticInput);
|
||||
|
||||
$result = scorm_insert_trackmodel($userid, $scormid, $scoid,$attempt);
|
||||
if ($result) {
|
||||
echo "<script language='Javascript' type='text/javascript'>";
|
||||
echo "location.href='".$CFG->wwwroot." /course/view.php?id=".$id."';";
|
||||
echo "</script>";
|
||||
} else {
|
||||
echo "Suspend failed";
|
||||
}
|
||||
?>
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user