Skip to content

Commit

Permalink
Added data store and reporting
Browse files Browse the repository at this point in the history
  • Loading branch information
bobopinna committed Apr 28, 2005
1 parent da3ec04 commit a5463b3
Show file tree
Hide file tree
Showing 11 changed files with 375 additions and 170 deletions.
133 changes: 94 additions & 39 deletions mod/scorm/api.php
View file
Original file line number Diff line number Diff line change
@@ -1,10 +1,12 @@
<?php

require_once("../../config.php");
require_once("lib.php");

optional_variable($id); // Course Module ID, or
optional_variable($a); // scorm ID
optional_variable($userid); // user ID
//require_variable($scoid); // sco ID
optional_variable($mode); // navigation mode

if ($id) {
if (! $cm = get_record("course_modules", "id", $id)) {
Expand Down Expand Up @@ -32,56 +34,109 @@
}

require_login($course->id, false, $cm);
$scoid = $SESSION->scorm_scoid;

if (empty($userid) || !isteacher($course->id)) {
$user = $USER;
if ($usertrack=scorm_get_tracks($scoid,$USER->id)) {
$userdata = $usertrack;
} else {
$user = get_complete_user_data('id', $userid);
$userdata->status = '';
$userdata->scorre_raw = '';
}
$userdata->student_id = $USER->username;
$userdata->student_name = $USER->lastname .', '. $USER->firstname;
$userdata->mode = 'normal';
if (isset($mode)) {
$userdata->mode = $mode;
}
if ($sco = get_record('scorm_scoes','id',$scoid)) {
$userdata->datafromlms = $sco->datafromlms;
$userdata->masteryscore = $sco->masteryscore;
$userdata->maxtimeallowed = $sco->maxtimeallowed;
$userdata->timelimitaction = $sco->timelimitaction;
if (!empty($sco->masteryscore)) {
$userdata->credit = 'credit';
} else {
$userdata->credit = 'no-credit';
}
} else {
error('Sco not found');
}
?>

function SCOFinish(){
/*if (typeof API != "undefined") {
API.SaveTotalTime();
} */
}
switch ($scorm->version) {
case 'SCORM_1.2':
include_once ('datamodels/scorm1_2.js.php');
break;
case 'SCORM_1.3':
include_once ('datamodels/scorm1_3.js.php');
break;
case 'AICC':
include_once ('datamodels/aicc.js.php');
break;
default:
include_once ('datamodels/scorm1_2.js.php');
break;
}
?>

//
// SCORM Call Implementation
//
var errorCode = "0";

function SCORM_Call (call,param) {
if (arguments.length < 2) {
alert ("Invalid SCORM_Call function call: too few arguments.\nYou need pass at least 2 parameters");
}
var myRequest = NewHttpReq();
result = DoRequest(myRequest,"<?php p($CFG->wwwroot) ?>/mod/scorm/datamodel.php","id=<?php p($id) ?>&sesskey=<?php p($USER->sesskey) ?>&call="+call+param);
//alert('Call: '+call+'\nParam: '+param+'\nResult: '+result);
results = result.split('\n');

errorCode = results[1];
return results[0];
function underscore(str) {
return str.replace(/\./g,"__");
}

//
// SCORM 1.2 API Implementation
//
function SCORMapi1_2() {

<?php include_once ('datamodels/scorm1_2.js.php'); ?>

function CollectData(apiname,data,parent) {
var datastring = '';
for (property in data) {
if (typeof data[property] == 'object') {
datastring += CollectData(apiname,data[property],parent+'.'+property);
} else {
element = parent+'.'+property;
expression = new RegExp(CMIIndex,'g');
elementmodel = element.replace(expression,'.n.');
if ((typeof eval(apiname+'.datamodel["'+elementmodel+'"]')) != "undefined") {
if (eval(apiname+'.datamodel["'+elementmodel+'"].mod') != 'r') {
if (eval(apiname+'.datamodel["'+elementmodel+'"].defaultvalue') != data[property]) {
datastring += '&'+underscore(element)+'='+escape(data[property]);
//alert(element+'='+data[property]);
}
}
}
}
}
return datastring;
}

var API = new SCORMapi1_2();
function AddTime (first, second) {
var sFirst = first.split(":");
var sSecond = second.split(":");
var change = 0;

//
// SCORM 2004 API Implementation
//
function SCORMapi2004() {
var secs = (Math.round((parseFloat(sFirst[2],10)+parseFloat(sSecond[2],10))*100))/100; //Seconds
change = Math.floor(secs / 60);
secs = secs - (change * 60);
if (Math.floor(secs) < 10) secs = "0" + secs.toString();

<?php include_once ('datamodels/scorm1_3.js.php'); ?>

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();

return hours + ":" + mins + ":" + secs;
}

var API_1484_11 = new SCORMapi2004();
function StoreData(apiname,data,storetotaltime) {
datastring = CollectData(apiname,data,'cmi');
if (storetotaltime) {
datastring += eval(apiname+'.TotalTime();');
}
//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');
//alert(results);
errorCode = results[1];
return results[0];
}
33 changes: 25 additions & 8 deletions mod/scorm/datamodel.php
View file
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
require_once('lib.php');

optional_variable($id); // Course Module ID, or
optional_variable($a); // scorm ID
optional_variable($a); // scorm IDa

if ($id) {
if (! $cm = get_record('course_modules', 'id', $id)) {
Expand Down Expand Up @@ -32,14 +32,31 @@

require_login($course->id, false, $cm);


if (isset($_GET['call']) && confirm_sesskey()) {
if (strstr($_GET['call'],'LMS') !== false) {
// SCORM 1.2 Call
//require_once('datamodels/scorm1_2.php');
if (confirm_sesskey() && (isset($SESSION->scorm_scoid))) {
$scoid = $SESSION->scorm_scoid;
$result = true;
foreach ($_GET as $element => $value) {
if (substr($element,0,3) == 'cmi') {
$element = str_replace('__','.',$element);
$element = preg_replace('/_(\d+)/',".\$1",$element);
if ($track = get_record_select('scorm_scoes_track',"userid='$USER->id' AND scormid='$scorm->id' AND scoid='$scoid' AND element='$element'")) {
$track->value = $value;
$result = update_record('scorm_scoes_track',$track) && $result;
} else {
$track->userid = $USER->id;
$track->scormid = $scorm->id;
$track->scoid = $scoid;
$track->element = $element;
$track->value = $value;
$result = insert_record('scorm_scoes_track',$track) && $result;
}
//print_r($track);
}
}
if ($result) {
echo "true\n0";
} else {
// SCORM 1.3 (aka SCORM 2004) Call
//require_once('datamodels/scorm1_3.php');
echo "false\n101";
}
}
?>
Expand Down
Loading

0 comments on commit a5463b3

Please sign in to comment.