2006-06-06 04:15:04 +00:00
|
|
|
<?php
|
|
|
|
|
|
|
|
$courses = get_courses('all','c.shortname','c.id,c.shortname,c.fullname');
|
|
|
|
$courseoptions = array();
|
|
|
|
|
|
|
|
foreach ($courses as $c) {
|
2006-08-25 08:27:28 +00:00
|
|
|
$context = get_context_instance(CONTEXT_COURSE, $c->id);
|
|
|
|
|
|
|
|
if (has_capability('moodle/site:viewreports', $context)) {
|
2006-06-06 04:15:04 +00:00
|
|
|
$courseoptions[$c->id] = $c->shortname;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
$reportoptions = stats_get_report_options($course->id, $mode);
|
|
|
|
$timeoptions = report_stats_timeoptions($mode);
|
2006-09-23 08:52:12 +00:00
|
|
|
if (empty($timeoptions)) {
|
2007-04-30 17:08:34 +00:00
|
|
|
error(get_string('nostatstodisplay'), $CFG->wwwroot.'/course/view.php?id='.$course->id);
|
2006-09-23 08:52:12 +00:00
|
|
|
}
|
|
|
|
|
2006-06-06 04:15:04 +00:00
|
|
|
$table->width = '*';
|
|
|
|
|
|
|
|
if ($mode == STATS_MODE_DETAILED) {
|
2006-09-24 22:13:31 +00:00
|
|
|
$param = stats_get_parameters($time,null,$course->id,$mode); // we only care about the table and the time string (if we have time)
|
|
|
|
|
|
|
|
$sql = 'SELECT DISTINCT s.userid,s.roleid,r.name AS rolename,r.sortorder,u.firstname,u.lastname,u.idnumber
|
|
|
|
FROM '.$CFG->prefix.'stats_user_'.$param->table.' s
|
|
|
|
JOIN '.$CFG->prefix.'user u ON u.id = s.userid
|
|
|
|
JoIN '.$CFG->prefix.'role r ON s.roleid = r.id
|
|
|
|
WHERE courseid = '.$course->id
|
|
|
|
. ((!empty($param->stattype)) ? ' AND stattype = \''.$param->stattype.'\'' : '')
|
|
|
|
. ((!empty($time)) ? ' AND timeend >= '.$param->timeafter : '')
|
|
|
|
.' ORDER BY r.sortorder';
|
2006-09-24 07:13:33 +00:00
|
|
|
|
2006-06-06 04:15:04 +00:00
|
|
|
if (!$us = get_records_sql($sql)) {
|
2007-04-30 17:08:34 +00:00
|
|
|
error('Cannot enter detailed view: No users found for this course.');
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
|
|
|
|
2006-09-24 22:13:31 +00:00
|
|
|
foreach ($us as $u) {
|
|
|
|
$users[$u->userid] = $u->rolename.' - '.fullname($u,true);
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
$table->align = array('left','left','left','left','left','left','left','left');
|
|
|
|
$table->data[] = array(get_string('course'),choose_from_menu($courseoptions,'course',$course->id,'','','',true),
|
|
|
|
get_string('users'),choose_from_menu($users,'userid',$userid,'','','',true),
|
2006-09-23 08:52:12 +00:00
|
|
|
get_string('statsreporttype'),choose_from_menu($reportoptions,'report',($report == 5) ? $report.$roleid : $report,'','','',true),
|
2006-06-06 04:15:04 +00:00
|
|
|
get_string('statstimeperiod'),choose_from_menu($timeoptions,'time',$time,'','','',true),
|
|
|
|
'<input type="submit" value="'.get_string('view').'" />') ;
|
2006-09-24 07:13:33 +00:00
|
|
|
} else if ($mode == STATS_MODE_RANKED) {
|
|
|
|
$table->align = array('left','left','left','left','left','left');
|
|
|
|
$table->data[] = array(get_string('statsreporttype'),choose_from_menu($reportoptions,'report',($report == 5) ? $report.$roleid : $report,'','','',true),
|
|
|
|
get_string('statstimeperiod'),choose_from_menu($timeoptions,'time',$time,'','','',true),
|
|
|
|
'<input type="submit" value="'.get_string('view').'" />') ;
|
|
|
|
} else if ($mode == STATS_MODE_GENERAL) {
|
2006-06-06 04:15:04 +00:00
|
|
|
$table->align = array('left','left','left','left','left','left','left');
|
|
|
|
$table->data[] = array(get_string('course'),choose_from_menu($courseoptions,'course',$course->id,'','','',true),
|
2006-09-23 08:52:12 +00:00
|
|
|
get_string('statsreporttype'),choose_from_menu($reportoptions,'report',($report == 5) ? $report.$roleid : $report,'','','',true),
|
2006-06-06 04:15:04 +00:00
|
|
|
get_string('statstimeperiod'),choose_from_menu($timeoptions,'time',$time,'','','',true),
|
|
|
|
'<input type="submit" value="'.get_string('view').'" />') ;
|
|
|
|
}
|
|
|
|
|
2007-01-15 08:15:04 +00:00
|
|
|
echo '<form action="index.php" method="post">'."\n"
|
|
|
|
.'<fieldset class="invisiblefieldset">'."\n"
|
|
|
|
.'<input type="hidden" name="mode" value="'.$mode.'" />'."\n";
|
2006-06-06 04:15:04 +00:00
|
|
|
|
|
|
|
print_table($table);
|
2007-01-15 08:15:04 +00:00
|
|
|
|
|
|
|
echo '</fieldset>';
|
2006-06-06 04:15:04 +00:00
|
|
|
echo '</form>';
|
|
|
|
|
|
|
|
if (!empty($report) && !empty($time)) {
|
|
|
|
if ($report == STATS_REPORT_LOGINS && $course->id != SITEID) {
|
2007-04-30 17:08:34 +00:00
|
|
|
error('This type of report is only available for the site course');
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
2006-09-24 07:13:33 +00:00
|
|
|
$timesql =
|
2006-06-06 04:15:04 +00:00
|
|
|
$param = stats_get_parameters($time,$report,$course->id,$mode);
|
2006-09-23 08:52:12 +00:00
|
|
|
|
2006-06-06 04:15:04 +00:00
|
|
|
if ($mode == STATS_MODE_DETAILED) {
|
|
|
|
$param->table = 'user_'.$param->table;
|
|
|
|
}
|
2006-09-24 07:13:33 +00:00
|
|
|
if (!empty($param->sql)) {
|
|
|
|
$sql = $param->sql;
|
|
|
|
} else {
|
|
|
|
$sql = 'SELECT '.((empty($param->fieldscomplete)) ? 'id,roleid,timeend,' : '').$param->fields
|
|
|
|
.' FROM '.$CFG->prefix.'stats_'.$param->table.' WHERE '
|
|
|
|
.(($course->id == SITEID) ? '' : ' courseid = '.$course->id.' AND ')
|
|
|
|
.((!empty($userid)) ? ' userid = '.$userid.' AND ' : '')
|
|
|
|
.((!empty($roleid)) ? ' roleid = '.$roleid.' AND ' : '')
|
|
|
|
. ((!empty($param->stattype)) ? ' stattype = \''.$param->stattype.'\' AND ' : '')
|
|
|
|
.' timeend >= '.$param->timeafter
|
|
|
|
.' '.$param->extras
|
|
|
|
.' ORDER BY timeend DESC';
|
|
|
|
}
|
2006-09-24 03:15:52 +00:00
|
|
|
|
2006-06-06 04:15:04 +00:00
|
|
|
$stats = get_records_sql($sql);
|
|
|
|
|
|
|
|
if (empty($stats)) {
|
2006-09-24 05:53:45 +00:00
|
|
|
notify(get_string('statsnodata'));
|
2006-06-06 04:15:04 +00:00
|
|
|
|
|
|
|
} else {
|
2006-09-24 05:53:45 +00:00
|
|
|
|
|
|
|
$stats = stats_fix_zeros($stats,$param->timeafter,$param->table,(!empty($param->line2)));
|
|
|
|
|
2007-02-28 06:25:22 +00:00
|
|
|
print_heading(format_string($course->shortname).' - '.get_string('statsreport'.$report)
|
2006-09-24 05:53:45 +00:00
|
|
|
.((!empty($user)) ? ' '.get_string('statsreportforuser').' ' .fullname($user,true) : '')
|
|
|
|
.((!empty($roleid)) ? ' '.get_field('role','name','id',$roleid) : ''));
|
|
|
|
|
|
|
|
|
|
|
|
if (empty($CFG->gdversion)) {
|
|
|
|
echo "(".get_string("gdneed").")";
|
2006-06-06 04:15:04 +00:00
|
|
|
} else {
|
2006-09-24 05:53:45 +00:00
|
|
|
if ($mode == STATS_MODE_DETAILED) {
|
2006-11-24 20:16:37 +00:00
|
|
|
echo '<center><img src="'.$CFG->wwwroot.'/course/report/stats/graph.php?mode='.$mode.'&course='.$course->id.'&time='.$time.'&report='.$report.'&userid='.$userid.'" alt="'.get_string('statisticsgraph').'" /></center>';
|
2006-09-24 05:53:45 +00:00
|
|
|
} else {
|
2006-11-24 20:16:37 +00:00
|
|
|
echo '<center><img src="'.$CFG->wwwroot.'/course/report/stats/graph.php?mode='.$mode.'&course='.$course->id.'&time='.$time.'&report='.$report.'&roleid='.$roleid.'" alt="'.get_string('statisticsgraph').'" /></center>';
|
2006-09-24 05:53:45 +00:00
|
|
|
}
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
|
|
|
|
2006-09-24 05:53:45 +00:00
|
|
|
$table = new StdClass;
|
|
|
|
$table->align = array('left','center','center','center');
|
|
|
|
$param->table = str_replace('user_','',$param->table);
|
|
|
|
$table->head = array(get_string('periodending','moodle',$param->table));
|
|
|
|
if (empty($param->crosstab)) {
|
|
|
|
$table->head[] = $param->line1;
|
|
|
|
if (!empty($param->line2)) {
|
|
|
|
$table->head[] = $param->line2;
|
2006-09-23 08:52:12 +00:00
|
|
|
}
|
2006-09-23 12:10:42 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
if (empty($param->crosstab)) {
|
|
|
|
foreach ($stats as $stat) {
|
|
|
|
$a = array(userdate($stat->timeend-(60*60*24),get_string('strftimedate'),$CFG->timezone),$stat->line1);
|
|
|
|
if (isset($stat->line2)) {
|
|
|
|
$a[] = $stat->line2;
|
2006-09-24 03:15:52 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
if (empty($CFG->loglifetime) || ($stat->timeend-(60*60*24)) >= (time()-60*60*24*$CFG->loglifetime)) {
|
|
|
|
$a[] = '<a href="'.$CFG->wwwroot.'/course/report/log/index.php?id='.
|
|
|
|
$course->id.'&chooselog=1&showusers=1&showcourses=1&user='
|
|
|
|
.$userid.'&date='.usergetmidnight($stat->timeend-(60*60*24)).'">'
|
|
|
|
.get_string('course').' ' .get_string('logs').'</a> ';
|
|
|
|
}
|
|
|
|
$table->data[] = $a;
|
2006-09-23 12:10:42 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
} else {
|
|
|
|
$data = array();
|
|
|
|
$roles = array();
|
|
|
|
$times = array();
|
|
|
|
$missedlines = array();
|
|
|
|
foreach ($stats as $stat) {
|
|
|
|
if (!empty($stat->zerofixed)) {
|
|
|
|
$missedlines[] = $stat->timeend;
|
|
|
|
}
|
|
|
|
$data[$stat->timeend][$stat->roleid] = $stat->line1;
|
|
|
|
if ($stat->roleid != 0) {
|
|
|
|
if (!array_key_exists($stat->roleid,$roles)) {
|
|
|
|
$roles[$stat->roleid] = get_field('role','name','id',$stat->roleid);
|
2006-09-24 03:15:52 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
}
|
|
|
|
if (!array_key_exists($stat->timeend,$times)) {
|
|
|
|
$times[$stat->timeend] = userdate($stat->timeend,get_string('strftimedate'),$CFG->timezone);
|
2006-09-24 03:15:52 +00:00
|
|
|
}
|
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
foreach ($data as $time => $rolesdata) {
|
|
|
|
if (in_array($time,$missedlines)) {
|
|
|
|
$rolesdata = array();
|
|
|
|
foreach ($roles as $roleid => $guff) {
|
|
|
|
if ($roleid == 0 ) {
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
$rolesdata[$roleid] = 0;
|
|
|
|
}
|
|
|
|
}
|
2007-04-11 23:53:15 +00:00
|
|
|
else {
|
|
|
|
foreach (array_keys($roles) as $r) {
|
|
|
|
if (!array_key_exists($r, $rolesdata)) {
|
|
|
|
$rolesdata[$r] = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
krsort($rolesdata);
|
|
|
|
$row = array_merge(array($times[$time]),$rolesdata);
|
|
|
|
if (empty($CFG->loglifetime) || ($stat->timeend-(60*60*24)) >= (time()-60*60*24*$CFG->loglifetime)) {
|
|
|
|
$row[] = '<a href="'.$CFG->wwwroot.'/course/report/log/index.php?id='
|
|
|
|
.$course->id.'&chooselog=1&showusers=1&showcourses=1&user='.$userid
|
|
|
|
.'&date='.usergetmidnight($time-(60*60*24)).'">'
|
|
|
|
.get_string('course').' ' .get_string('logs').'</a> ';
|
|
|
|
}
|
|
|
|
$table->data[] = $row;
|
2006-09-23 08:52:12 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
krsort($roles);
|
|
|
|
$table->head = array_merge($table->head,$roles);
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
$table->head[] = get_string('logs');
|
|
|
|
if (!empty($lastrecord)) {
|
|
|
|
$lastrecord[] = $lastlink;
|
|
|
|
$table->data[] = $lastrecord;
|
|
|
|
}
|
|
|
|
print_table($table);
|
2006-06-06 04:15:04 +00:00
|
|
|
}
|
2006-09-24 05:53:45 +00:00
|
|
|
}
|
2006-06-06 04:15:04 +00:00
|
|
|
|
2007-04-11 23:53:15 +00:00
|
|
|
?>
|