/**
* Print a detailed representation of what a user has done with
* a given particular instance of this module, for user activity reports.
*
* @param int $course Course id
* @param int $user User id
* @param int $mod
* @param int $udutu The udutu id
* @return boolean
*/
function udutu_user_complete($course, $user, $mod, $udutu)
{
global $CFG;
$liststyle = 'structlist';
$udutupixdir = $CFG->modpixpath . '/udutu/pix';
$now = time();
$firstmodify = $now;
$lastmodify = 0;
$sometoreport = false;
$report = '';
if ($orgs = get_records_select('udutu_scoes', "udutu='{$udutu->id}' AND organization='' AND launch=''", 'id', 'id,identifier,title')) {
if (count($orgs) <= 1) {
unset($orgs);
$orgs[]->identifier = '';
}
$report .= '<div class="mod-udutu">' . "\n";
foreach ($orgs as $org) {
$organizationsql = '';
$currentorg = '';
if (!empty($org->identifier)) {
$report .= '<div class="orgtitle">' . $org->title . '</div>';
$currentorg = $org->identifier;
$organizationsql = "AND organization='{$currentorg}'";
}
$report .= "<ul id='0' class='{$liststyle}'>";
if ($scoes = get_records_select('udutu_scoes', "udutu='{$udutu->id}' {$organizationsql} order by id ASC")) {
$level = 0;
$sublist = 1;
$parents[$level] = '/';
foreach ($scoes as $sco) {
if ($parents[$level] != $sco->parent) {
if ($level > 0 && $parents[$level - 1] == $sco->parent) {
$report .= "\t\t</ul></li>\n";
$level--;
} else {
$i = $level;
$closelist = '';
while ($i > 0 && $parents[$level] != $sco->parent) {
$closelist .= "\t\t</ul></li>\n";
$i--;
}
if ($i == 0 && $sco->parent != $currentorg) {
$report .= "\t\t<li><ul id='{$sublist}' class='{$liststyle}'>\n";
$level++;
} else {
$report .= $closelist;
$level = $i;
}
$parents[$level] = $sco->parent;
}
}
$report .= "\t\t<li>";
$nextsco = next($scoes);
if ($nextsco !== false && $sco->parent != $nextsco->parent && ($level == 0 || $level > 0 && $nextsco->parent == $sco->identifier)) {
$sublist++;
} else {
$report .= '<img src="' . $udutupixdir . '/spacer.gif" alt="" />';
}
if ($sco->launch) {
require_once 'locallib.php';
$score = '';
$totaltime = '';
if ($usertrack = udutu_get_tracks($sco->id, $user->id)) {
if ($usertrack->status == '') {
$usertrack->status = 'notattempted';
}
$strstatus = get_string($usertrack->status, 'udutu');
$report .= "<img src='" . $udutupixdir . '/' . $usertrack->status . ".gif' alt='{$strstatus}' title='{$strstatus}' />";
if ($usertrack->timemodified != 0) {
if ($usertrack->timemodified > $lastmodify) {
$lastmodify = $usertrack->timemodified;
}
if ($usertrack->timemodified < $firstmodify) {
$firstmodify = $usertrack->timemodified;
}
}
} else {
if ($sco->udututype == 'sco') {
$report .= '<img src="' . $udutupixdir . '/' . 'notattempted.gif" alt="' . get_string('notattempted', 'udutu') . '" title="' . get_string('notattempted', 'udutu') . '" />';
} else {
$report .= '<img src="' . $udutupixdir . '/' . 'asset.gif" alt="' . get_string('asset', 'udutu') . '" title="' . get_string('asset', 'udutu') . '" />';
}
}
$report .= " {$sco->title} {$score}{$totaltime}</li>\n";
if ($usertrack !== false) {
$sometoreport = true;
$report .= "\t\t\t<li><ul class='{$liststyle}'>\n";
foreach ($usertrack as $element => $value) {
if (substr($element, 0, 3) == 'cmi') {
$report .= '<li>' . $element . ' => ' . $value . '</li>';
}
}
$report .= "\t\t\t</ul></li>\n";
}
} else {
$report .= " {$sco->title}</li>\n";
}
}
for ($i = 0; $i < $level; $i++) {
$report .= "\t\t</ul></li>\n";
}
}
$report .= "\t</ul><br />\n";
}
$report .= "</div>\n";
}
if ($sometoreport) {
if ($firstmodify < $now) {
$timeago = format_time($now - $firstmodify);
echo get_string('firstaccess', 'udutu') . ': ' . userdate($firstmodify) . ' (' . $timeago . ")<br />\n";
}
if ($lastmodify > 0) {
$timeago = format_time($now - $lastmodify);
echo get_string('lastaccess', 'udutu') . ': ' . userdate($lastmodify) . ' (' . $timeago . ")<br />\n";
}
echo get_string('report', 'udutu') . ":<br />\n";
echo $report;
} else {
print_string('noactivity', 'udutu');
}
return true;
}
if (!empty($a)) {
if (!($udutu = get_record("udutu", "id", $a))) {
error("Course module is incorrect");
}
if (!($course = get_record("course", "id", $udutu->course))) {
error("Course is misconfigured");
}
if (!($cm = get_coursemodule_from_instance("udutu", $udutu->id, $course->id))) {
error("Course Module ID was incorrect");
}
} else {
error('A required parameter is missing');
}
}
require_login($course->id, false, $cm);
if ($usertrack = udutu_get_tracks($scoid, $USER->id, $attempt)) {
if (isset($usertrack->{'cmi.exit'}) && $usertrack->{'cmi.exit'} != 'time-out' || $udutu->version != "udutu_1.3") {
$userdata = $usertrack;
} else {
$userdata->status = '';
$userdata->score_raw = '';
}
} else {
$userdata->status = '';
$userdata->score_raw = '';
}
$userdata->student_id = addslashes($USER->username);
$userdata->student_name = addslashes($USER->lastname . ', ' . $USER->firstname);
$userdata->mode = 'normal';
if (isset($mode)) {
$userdata->mode = $mode;
function udutu_simple_play($udutu, $user)
{
$result = false;
$scoes = get_records_select('udutu_scoes', 'udutu=' . $udutu->id . ' AND launch<>\'\'');
if (count($scoes) == 1) {
if ($udutu->skipview >= 1) {
$sco = current($scoes);
if (udutu_get_tracks($sco->id, $user->id) === false) {
header('Location: player.php?a=' . $udutu->id . '&scoid= ' . $sco->id);
$result = true;
} else {
if ($udutu->skipview == 2) {
header('Location: player.php?a=' . $udutu->id . '&scoid= ' . $sco->id);
$result = true;
}
}
}
}
return $result;
}
function udutu_get_toc($user, $udutu, $liststyle, $currentorg = '', $scoid = '', $mode = 'normal', $attempt = '', $play = false)
{
global $CFG;
$strexpand = get_string('expcoll', 'udutu');
$modestr = '';
if ($mode == 'browse') {
$modestr = '&mode=' . $mode;
}
$udutupixdir = $CFG->modpixpath . '/udutu/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('udutu_scoes', 'title', 'udutu', $udutu->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 = udutu_get_last_attempt($udutu->id, $user->id);
}
$result->attemptleft = $udutu->maxattempt - $attempt;
if ($scoes = get_records_select('udutu_scoes', "udutu='{$udutu->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 = udutu_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) {
$isvisible = false;
if ($optionaldatas = udutu_get_sco($sco->id, UDUTU_SCO_DATA)) {
if (!isset($optionaldatas->isvisible) || isset($optionaldatas->isvisible) && $optionaldatas->isvisible == 'true') {
$isvisible = true;
}
} else {
$isvisible = true;
}
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:udutuitem' . $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;
}
}
if ($isvisible) {
$result->toc .= "\t\t<li>";
}
$nextsco = next($scoes);
$nextisvisible = false;
if ($nextsco !== false && ($optionaldatas = udutu_get_sco($nextsco->id, UDUTU_SCO_DATA))) {
if (!isset($optionaldatas->isvisible) || isset($optionaldatas->isvisible) && $optionaldatas->isvisible == 'true') {
$nextisvisible = true;
}
}
if ($nextisvisible && $nextsco !== false && $sco->parent != $nextsco->parent && ($level == 0 || $level > 0 && $nextsco->parent == $sco->identifier)) {
$sublist++;
$icon = 'minus';
if (isset($_COOKIE['hide:udutuitem' . $nextsco->id])) {
$icon = 'plus';
}
$result->toc .= '<a href="javascript:expandCollide(img' . $sublist . ',' . $sublist . ',' . $nextsco->id . ');"><img id="img' . $sublist . '" src="' . $udutupixdir . '/' . $icon . '.gif" alt="' . $strexpand . '" title="' . $strexpand . '"/></a>';
} else {
if ($isvisible) {
$result->toc .= '<img src="' . $udutupixdir . '/spacer.gif" />';
}
}
if (empty($sco->title)) {
$sco->title = $sco->identifier;
}
if (!empty($sco->launch)) {
if ($isvisible) {
$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, 'udutu');
if ($sco->udututype == 'sco') {
$statusicon = '<img src="' . $udutupixdir . '/' . $usertrack->status . '.gif" alt="' . $strstatus . '" title="' . $strstatus . '" />';
} else {
$statusicon = '<img src="' . $udutupixdir . '/assetc.gif" alt="' . get_string('assetlaunched', 'udutu') . '" title="' . get_string('assetlaunched', 'udutu') . '" />';
}
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', 'udutu') . ': ' . $usertrack->score_raw . ')';
}
$strsuspended = get_string('suspended', 'udutu');
if (isset($usertrack->{'cmi.core.exit'}) && $usertrack->{'cmi.core.exit'} == 'suspend') {
$statusicon = '<img src="' . $udutupixdir . '/suspend.gif" alt="' . $strstatus . ' - ' . $strsuspended . '" title="' . $strstatus . ' - ' . $strsuspended . '" />';
}
} else {
if ($play && empty($scoid)) {
$scoid = $sco->id;
}
$incomplete = true;
if ($sco->udututype == 'sco') {
$statusicon = '<img src="' . $udutupixdir . '/notattempted.gif" alt="' . get_string('notattempted', 'udutu') . '" title="' . get_string('notattempted', 'udutu') . '" />';
} else {
$statusicon = '<img src="' . $udutupixdir . '/asset.gif" alt="' . get_string('asset', 'udutu') . '" title="' . get_string('asset', 'udutu') . '" />';
}
}
if ($sco->id == $scoid) {
$scodata = udutu_get_sco($sco->id, UDUTU_SCO_DATA);
$startbold = '<b>';
$endbold = '</b>';
$findnext = true;
$shownext = isset($scodata->next) ? $scodata->next : 0;
$showprev = isset($scodata->previous) ? $scodata->previous : 0;
}
if ($nextid == 0 && udutu_count_launchable($udutu->id, $currentorg) > 1 && $nextsco !== false && !$findnext) {
if (!empty($sco->launch)) {
$previd = $sco->id;
}
}
if (empty($sco->prerequisites) || udutu_eval_prerequisites($sco->prerequisites, $usertracks)) {
if ($sco->id == $scoid) {
$result->prerequisites = true;
}
$url = $CFG->wwwroot . '/mod/udutu/player.php?a=' . $udutu->id . '&currentorg=' . $currentorg . $modestr . '&scoid=' . $sco->id;
$result->toc .= $statusicon . ' ' . $startbold . '<a href="' . $url . '">' . format_string($sco->title) . '</a>' . $score . $endbold . "</li>\n";
$tocmenus[$sco->id] = udutu_repeater('−', $level) . '>' . format_string($sco->title);
} else {
if ($sco->id == $scoid) {
$result->prerequisites = false;
}
$result->toc .= $statusicon . ' ' . $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 = udutu_get_sco($scoid);
$sco->previd = $previd;
$sco->nextid = $nextid;
$result->sco = $sco;
$result->incomplete = $incomplete;
} else {
$result->incomplete = $incomplete;
}
}
$result->toc .= "\t</ul>\n";
if ($udutu->hidetoc == 0) {
$result->toc .= '
<script type="text/javascript">
//<![CDATA[
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 = "' . $udutupixdir . '/plus.gif";
eval(beg+list+mid+".display=\'none\';");
new cookie("hide:udutuitem" + item, 1, 356, "/").set();
} else {
which.src = "' . $udutupixdir . '/minus.gif";
eval(beg+list+mid+".display=\'block\';");
new cookie("hide:udutuitem" + item, 1, -1, "/").set();
}
}
//]]>
</script>' . "\n";
}
$url = $CFG->wwwroot . '/mod/udutu/player.php?a=' . $udutu->id . '&currentorg=' . $currentorg . $modestr . '&scoid=';
$result->tocmenu = popup_form($url, $tocmenus, "tocmenu", $sco->id, '', '', '', true);
return $result;
}
$udutu->version = 'udutu_12';
}
require_once $CFG->dirroot . '/mod/udutu/datamodels/' . $udutu->version . 'lib.php';
$attempt = udutu_get_last_attempt($udutu->id, $USER->id);
if ($newattempt == 'on' && ($attempt < $udutu->maxattempt || $udutu->maxattempt == 0)) {
$attempt++;
$mode = 'normal';
}
$attemptstr = '&attempt=' . $attempt;
$result = udutu_get_toc($USER, $udutu, 'structurelist', $currentorg, $scoid, $mode, $attempt, true);
$sco = $result->sco;
if ($mode == 'browse' && $udutu->hidebrowse == 1) {
$mode = 'normal';
}
if ($mode != 'browse') {
if ($trackdata = udutu_get_tracks($sco->id, $USER->id, $attempt)) {
if ($trackdata->status == 'completed' || $trackdata->status == 'passed' || $trackdata->status == 'failed') {
$mode = 'review';
} else {
$mode = 'normal';
}
} else {
$mode = 'normal';
}
}
add_to_log($course->id, 'udutu', 'view', "player.php?id={$cm->id}&scoid={$sco->id}", "{$udutu->id}");
$scoidstr = '&scoid=' . $sco->id;
$scoidpop = '&scoid=' . $sco->id;
$modestr = '&mode=' . $mode;
if ($mode == 'browse') {
$modepop = '&mode=' . $mode;
