@ -1,19 +1,19 @@
<?php
/* For licensing terms, see /license.txt */
/**
* @author Thomas Depraetere
* @author Hugues Peeters
* @author Christophe Gesche
* @author Sebastien Piraux
* @author Toon Keppens (Vi-Host.net)
* @author Thomas Depraetere
* @author Hugues Peeters
* @author Christophe Gesche
* @author Sebastien Piraux
* @author Toon Keppens (Vi-Host.net)
*
* @package chamilo.tracking
* @package chamilo.tracking
*/
/**
* Code
*/
// TODO: Is this file deprecated?
/* INIT SECTION */
@ -32,82 +32,89 @@ require_once '../newscorm/scormItem.class.php';
/* Constants and variables */
// regroup table names for maintenance purpose
$TABLETRACK_ACCESS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_LASTACCESS);
$TABLETRACK_LINKS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_LINKS);
$TABLETRACK_DOWNLOADS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_DOWNLOADS);
$TABLETRACK_ACCESS_2 = Database::get_statistic_table("track_e_access");
$TABLECOURSUSER = Database::get_main_table(TABLE_MAIN_COURSE_USER);
$TABLECOURSE = Database::get_main_table(TABLE_MAIN_COURSE);
$table_user = Database::get_main_table(TABLE_MAIN_USER);
$TABLECOURSE_LINKS = Database::get_course_table(TABLE_LINK);
$tbl_learnpath_main = Database::get_course_table(TABLE_LP_MAIN);
$tbl_learnpath_item = Database::get_course_table(TABLE_LP_ITEM);
$tbl_learnpath_view = Database::get_course_table(TABLE_LP_VIEW);
$tbl_learnpath_item_view = Database::get_course_table(TABLE_LP_ITEM_VIEW);
$course_id = api_get_course_int_id();
$TABLETRACK_ACCESS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_LASTACCESS);
$TABLETRACK_LINKS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_LINKS);
$TABLETRACK_DOWNLOADS = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_DOWNLOADS);
$TABLETRACK_ACCESS_2 = Database::get_statistic_table("track_e_access");
$TABLECOURSUSER = Database::get_main_table(TABLE_MAIN_COURSE_USER);
$TABLECOURSE = Database::get_main_table(TABLE_MAIN_COURSE);
$table_user = Database::get_main_table(TABLE_MAIN_USER);
$TABLECOURSE_LINKS = Database::get_course_table(TABLE_LINK);
$tbl_learnpath_main = Database::get_course_table(TABLE_LP_MAIN);
$tbl_learnpath_item = Database::get_course_table(TABLE_LP_ITEM);
$tbl_learnpath_view = Database::get_course_table(TABLE_LP_VIEW);
$tbl_learnpath_item_view = Database::get_course_table(TABLE_LP_ITEM_VIEW);
$course_id = api_get_course_int_id();
$view = $_REQUEST['view'];
if($view=="0000001") $nameTools=get_lang('SynthesisView');
if($view=="1000000") $nameTools=get_lang('CourseStats');
if($view=="0100000") $nameTools=get_lang('CourseAccess');
if($view=="0010000") $nameTools=get_lang('ToolsAccess');
if($view=="0001000") $nameTools=get_lang('LinksAccess');
if($view=="0000100") $nameTools=get_lang('DocumentsAccess');
if($view=="00000010") $nameTools=get_lang('ScormAccess');
$interbreadcrumb[] = array ("url" => api_get_self()."?view=0000000", "name" => get_lang('ToolName'));
include(api_get_path(LIBRARY_PATH)."statsUtils.lib.inc.php");
if ($view == "0000001")
$nameTools = get_lang('SynthesisView');
if ($view == "1000000")
$nameTools = get_lang('CourseStats');
if ($view == "0100000")
$nameTools = get_lang('CourseAccess');
if ($view == "0010000")
$nameTools = get_lang('ToolsAccess');
if ($view == "0001000")
$nameTools = get_lang('LinksAccess');
if ($view == "0000100")
$nameTools = get_lang('DocumentsAccess');
if ($view == "00000010")
$nameTools = get_lang('ScormAccess');
$interbreadcrumb[] = array("url" => api_get_self() . "?view=0000000", "name" => get_lang('ToolName'));
include(api_get_path(LIBRARY_PATH) . "statsUtils.lib.inc.php");
include("../resourcelinker/resourcelinker.inc.php");
$is_allowedToTrack = $is_courseAdmin || $is_platformAdmin || api_is_drh();
/* MAIN CODE */
/* MAIN CODE */
$title[0]=get_lang('StatsOfCourse')." : ".$_course['official_code'];
$title[0] = get_lang('StatsOfCourse') . " : " . $_course['official_code'];
// check if uid is prof of this group
if ($is_allowedToTrack) {
// show all : view must be equal to the sum of all view values (1024+512+...+64)
// show none : less than the tiniest value
/*echo "< div >
[< a href = '".api_get_self()."?view=1111111' > ".get_lang('ShowAll')."< / a > ]
[< a href = '".api_get_self()."?view=0000000' > ".get_lang('ShowNone')."< / a > ]
< / div > < br >
";*/
/* echo "< div >
[< a href = '".api_get_self()."?view=1111111' > ".get_lang('ShowAll')."< / a > ]
[< a href = '".api_get_self()."?view=0000000' > ".get_lang('ShowNone')."< / a > ]
< / div > < br >
"; */
if(!isset($view)) $view ="0000000";
if (!isset($view))
$view = "0000000";
/* Reporting */
/* Reporting */
$tempView = $view;
if($view[6] == '1'){
if ($view[6] == '1') {
$tempView[6] = '0';
// BEGIN users in this course
$sql = "SELECT $TABLECOURSUSER.user_i, $table_user.lastname, $table_user.firstname
FROM $TABLECOURSUSER, $table_user
WHERE $TABLECOURSUSER.course_code = '".$_cid."' AND $TABLECOURSUSER.user_id = $table_user.user_id AND $TABLECOURSUSER.relation_type< >".COURSE_RELATION_TYPE_RRHH."
WHERE $TABLECOURSUSER.course_code = '" . $_cid . "' AND $TABLECOURSUSER.user_id = $table_user.user_id AND $TABLECOURSUSER.relation_type< >" . COURSE_RELATION_TYPE_RRHH . "
ORDER BY $table_user.lastname";
$results = getManyResults3Col($sql);
//BUGFIX: get visual code instead of real course code. Scormpaths use the visual code... (should be fixed in future versions)
$sql = "SELECT visual_code FROM $TABLECOURSE WHERE code = '".$_cid."'";
$sql = "SELECT visual_code FROM $TABLECOURSE WHERE code = '" . $_cid . "'";
$_course['visual_code'] = getOneResult($sql);
if (is_array($results))
{
$line='';
$title_line = get_lang('Name').";".get_lang('FirstAccess').";".get_lang('LastAccess').";".get_lang('Visited')."\n";
if (is_array($results)) {
$line = '';
$title_line = get_lang('Name') . ";" . get_lang('FirstAccess') . ";" . get_lang('LastAccess') . ";" . get_lang('Visited') . "\n";
for($j = 0 ; $j < count ( $ results ) ; $ j + + ) {
for ($j = 0; $j < count ( $ results ) ; $ j + + ) {
// BEGIN % visited
// sum of all items (= multiple learningpaths + SCORM imported paths)
$sql = "SELECT COUNT(DISTINCT(iv.lp_item_id)) FROM $tbl_learnpath_item_view iv " .
@ -116,7 +123,7 @@ if ($is_allowedToTrack) {
"WHERE
v.c_id = $course_id AND
iv.c_id = $course_id AND
v.user_id = ".$results[$j][0];
v.user_id = " . $results[$j][0];
$total_lpath_items = getOneResult($sql);
// sum of all completed items (= multiple learningpaths + SCORM imported paths)
@ -126,88 +133,72 @@ if ($is_allowedToTrack) {
"WHERE
v.c_id = $course_id AND
iv.c_id = $course_id AND
v.user_id = ".$results[$j][0]." " .
"AND (status = 'completed' OR status='passed')";
v.user_id = " . $results[$j][0] . " " .
"AND (status = 'completed' OR status='passed')";
$total_lpath_items_completed = getOneResult($sql);
// calculation & bgcolor setting
$lpath_pct_completed = empty($total_lpath_items) ? "-" : round(($total_lpath_items_completed / $total_lpath_items) * 100);
// END % visited
// BEGIN first/last access
// first access
$sql = "SELECT access_date FROM $TABLETRACK_ACCESS_2 WHERE access_user_id = '".$results[$j][0]."' AND access_cours_code = '".$_course['official_code']."' AND access_tool = 'learnpath' AND access_session_id = '".api_get_session_id()."' ORDER BY access_id ASC LIMIT 1";
$sql = "SELECT access_date FROM $TABLETRACK_ACCESS_2 WHERE access_user_id = '" . $results[$j][0] . "' AND access_cours_code = '" . $_course['official_code'] . "' AND access_tool = 'learnpath' AND access_session_id = '" . api_get_session_id() . "' ORDER BY access_id ASC LIMIT 1";
$first_access = getOneResult($sql);
$first_access = empty($first_access) ? "-" : date('d.m.y',strtotime($first_access));
$first_access = empty($first_access) ? "-" : date('d.m.y', strtotime($first_access));
// last access
$sql = "SELECT access_date FROM $TABLETRACK_ACCESS WHERE access_user_id = '".$results[$j][0]."' AND access_cours_code = '".$_course['official_code']."' AND access_tool = 'learnpath'";
$sql = "SELECT access_date FROM $TABLETRACK_ACCESS WHERE access_user_id = '" . $results[$j][0] . "' AND access_cours_code = '" . $_course['official_code'] . "' AND access_tool = 'learnpath'";
$last_access = getOneResult($sql);
$last_access = empty($last_access) ? "-" : date('d.m.y',strtotime($last_access));
$last_access = empty($last_access) ? "-" : date('d.m.y', strtotime($last_access));
// END first/last access
// BEGIN presentation of data
$line .= $results[$j][1]." ".$results[$j][2].";".$first_access.";".$last_access.";".$lpath_pct_completed."\n";
$line .= $results[$j][1] . " " . $results[$j][2] . ";" . $first_access . ";" . $last_access . ";" . $lpath_pct_completed . "\n";
// END presentation of data
}
} else {
$line = get_lang('NoResult') . "\n";
}
else
{
$line = get_lang('NoResult')."\n";
}
}
/* Main */
/* Main */
$tempView = $view;
if($view[0] == '1')
{
$title[1]= $nameTools;
if ($view[0] == '1') {
$title[1] = $nameTools;
$tempView[0] = '0';
$sql = "SELECT count(*)
FROM $TABLECOURSUSER
WHERE course_code = '".$_cid."' AND relation_type< >".COURSE_RELATION_TYPE_RRHH."";
WHERE course_code = '" . $_cid . "' AND relation_type< >" . COURSE_RELATION_TYPE_RRHH . "";
$count = getOneResult($sql);
$title_line = get_lang('CountUsers')." ; ".$count."\n";
$title_line = get_lang('CountUsers') . " ; " . $count . "\n";
}
/* Access to this course */
/* Access to this course */
$tempView = $view;
if($view[1] == '1'){
if ($view[1] == '1') {
$tempView[1] = '0';
$title[1]=get_lang('ConnectionsToThisCourse');
$title[1] = get_lang('ConnectionsToThisCourse');
$title_line = '';
$line = '';
//Total
$sql = "SELECT count(*)
FROM $TABLETRACK_ACCESS
WHERE access_cours_code = '".$_cid."'
WHERE access_cours_code = '" . $_cid . "'
AND access_tool IS NULL";
$count = getOneResult($sql);
$line .= get_lang('CountToolAccess')." ; ".$count."\n";
$line .= get_lang('CountToolAccess') . " ; " . $count . "\n";
// last 31 days
$sql = "SELECT count(*)
@ -217,7 +208,7 @@ if ($is_allowedToTrack) {
AND access_tool IS NULL";
$count = getOneResult($sql);
$line .= get_lang('Last31days')." ; ".$count."\n";
$line .= get_lang('Last31days') . " ; " . $count . "\n";
// last 7 days
$sql = "SELECT count(*)
@ -227,7 +218,7 @@ if ($is_allowedToTrack) {
AND access_tool IS NULL";
$count = getOneResult($sql);
$line .= get_lang('Last7days')." ; ".$count."\n";
$line .= get_lang('Last7days') . " ; " . $count . "\n";
// today
$sql = "SELECT count(*)
@ -236,22 +227,21 @@ if ($is_allowedToTrack) {
AND ( access_date > CURDATE() )
AND access_tool IS NULL";
$count = getOneResult($sql);
$line .= get_lang('Thisday')." ; ".$count."\n";
$line .= get_lang('Thisday') . " ; " . $count . "\n";
}
/* Tools */
/* Tools */
$tempView = $view;
if($view[2] == '1'){
if ($view[2] == '1') {
$tempView[2] = '0';
$title[1]= $nameTools;
$line ='';
$title[1] = $nameTools;
$line = '';
$title_line = get_lang('ToolTitleToolnameColumn').";".get_lang('ToolTitleUsersColumn').";".get_lang('ToolTitleCountColumn')."\n";
$title_line = get_lang('ToolTitleToolnameColumn') . ";" . get_lang('ToolTitleUsersColumn') . ";" . get_lang('ToolTitleCountColumn') . "\n";
$sql = "SELECT access_tool, COUNT(DISTINCT access_user_id),count( access_tool )
FROM $TABLETRACK_ACCESS
@ -261,26 +251,20 @@ if ($is_allowedToTrack) {
$results = getManyResults3Col($sql);
if (is_array($results))
{
for($j = 0 ; $j < count ( $ results ) ; $ j + + )
{
$line .= $results[$j][0]."/".get_lang($results[$j][0]).";".$results[$j][1].";".$results[$j][2]."\n";
if (is_array($results)) {
for ($j = 0; $j < count ( $ results ) ; $ j + + ) {
$line .= $results[$j][0] . "/" . get_lang($results[$j][0]) . ";" . $results[$j][1] . ";" . $results[$j][2] . "\n";
}
} else {
$line = get_lang('NoResult') . "\n";
}
else
{
$line = get_lang('NoResult')."\n";
}
}
/* Links */
/* Links */
$tempView = $view;
if($view[3] == '1'){
if ($view[3] == '1') {
$tempView[3] = '0';
@ -292,32 +276,26 @@ if ($is_allowedToTrack) {
sl.links_cours_id = '$_cid'
GROUP BY cl.title, cl.url";
$results = getManyResultsXCol($sql,4);
$results = getManyResultsXCol($sql, 4);
$title[1]= $nameTools;
$line='';
$title_line = get_lang('LinksTitleLinkColumn').";".get_lang('LinksTitleUsersColumn').";".get_lang('LinksTitleCountColumn')."\n";
$title[1] = $nameTools;
$line = '';
$title_line = get_lang('LinksTitleLinkColumn') . ";" . get_lang('LinksTitleUsersColumn') . ";" . get_lang('LinksTitleCountColumn') . "\n";
if (is_array($results))
{
for($j = 0 ; $j < count ( $ results ) ; $ j + + )
{
$line .= $results[$j][1]."'>".$results[$j][0].";".$results[$j][2].";".$results[$j][3]."\n";
if (is_array($results)) {
for ($j = 0; $j < count ( $ results ) ; $ j + + ) {
$line .= $results[$j][1] . "'>" . $results[$j][0] . ";" . $results[$j][2] . ";" . $results[$j][3] . "\n";
}
}
else
{
$line = get_lang('NoResult')."\n";
} else {
$line = get_lang('NoResult') . "\n";
}
}
/* Documents */
/* Documents */
$tempView = $view;
if($view[4] == '1'){
if ($view[4] == '1') {
$tempView[4] = '0';
@ -328,74 +306,67 @@ if ($is_allowedToTrack) {
$results = getManyResults3Col($sql);
$title[1]= $nameTools;
$line='';
$title_line = get_lang('DocumentsTitleDocumentColumn').";".get_lang('DocumentsTitleUsersColumn').";".get_lang('DocumentsTitleCountColumn')."\n";
if (is_array($results))
{
for($j = 0 ; $j < count ( $ results ) ; $ j + + )
{
$line .= $results[$j][0].";".$results[$j][1].";".$results[$j][2]."\n";
$title[1] = $nameTools;
$line = '';
$title_line = get_lang('DocumentsTitleDocumentColumn') . ";" . get_lang('DocumentsTitleUsersColumn') . ";" . get_lang('DocumentsTitleCountColumn') . "\n";
if (is_array($results)) {
for ($j = 0; $j < count ( $ results ) ; $ j + + ) {
$line .= $results[$j][0] . ";" . $results[$j][1] . ";" . $results[$j][2] . "\n";
}
}
else
{
$line=get_lang('NoResult')."\n";
} else {
$line = get_lang('NoResult') . "\n";
}
}
/* Scorm contents and Learning Path */
/* Scorm contents and Learning Path */
$tempView = $view;
if($view[5] == '1'){
if ($view[5] == '1') {
$tempView[5] = '0';
$sql = "SELECT id, name FROM $tbl_learnpath_main WHERE c_id = $course_id ";
$result=Database::query($sql);
$result = Database::query($sql);
$ar=Database::fetch_array($result);
$ar = Database::fetch_array($result);
$title[1]= $nameTools;
$line='';
$title[1] = $nameTools;
$line = '';
$title_line = get_lang('ScormContentColumn');
$scormcontopen=$_REQUEST["scormcontopen"];
$scormstudentopen=$_REQUEST["scormstudentopen"];
$scormcontopen = $_REQUEST["scormcontopen"];
$scormstudentopen = $_REQUEST["scormstudentopen"];
if (is_array($ar)){
if (is_array($ar)) {
while ($ar['id'] != '') {
$lp_title = stripslashes($ar['name']);
//echo "< a href = '".api_get_self()."?view=".$view."&scormcontopen=".$ar[' id ' ] . " ' class = 'specialLink' > $lp_title< / a > ";
if ($ar['id']==$scormcontopen) { //have to list the students here
$contentId=$ar['id'];
if ($ar['id'] == $scormcontopen) { //have to list the students here
$contentId = $ar['id'];
$sql2 = "SELECT u.user_id, u.lastname, u.firstname " .
"FROM $tbl_learnpath_view sd " .
"INNER JOIN $table_user u " .
"ON u.user_id = sd.user_id " .
"WHERE sd.c_id = $course_id AND sd.lp_id=$contentId group by u.user_id";
//error_log($sql2,0);
$result2=Database::query($sql2);
$result2 = Database::query($sql2);
if(Database::num_rows($result2)>0){
if (Database::num_rows($result2) > 0) {
$ar2=Database::fetch_array($result2);
$ar2 = Database::fetch_array($result2);
while ($ar2 != '') {
if (isset($_REQUEST["scormstudentopen"]) & & $ar2['user_id']==$scormstudentopen) {
$line .= $ar['id']." ".$ar2['user_id']." ".api_get_person_name($ar2['firstname'], $ar2['lastname']);
if (isset($_REQUEST["scormstudentopen"]) & & $ar2['user_id'] == $scormstudentopen) {
$line .= $ar['id'] . " " . $ar2['user_id'] . " " . api_get_person_name($ar2['firstname'], $ar2['lastname']);
} else {
$line .= $ar['id']." ".$ar2['user_id']." ".api_get_person_name($ar2['firstname'], $ar2['lastname']);
$line .= $ar['id'] . " " . $ar2['user_id'] . " " . api_get_person_name($ar2['firstname'], $ar2['lastname']);
}
if ($ar2['user_id']==$scormstudentopen) { //have to list the student's results
$studentId=$ar2['user_id'];
if ($ar2['user_id'] == $scormstudentopen) { //have to list the student's results
$studentId = $ar2['user_id'];
$sql3 = "SELECT iv.status, iv.score, i.title, iv.total_time " .
"FROM $tbl_learnpath_item i " .
"INNER JOIN $tbl_learnpath_item_view iv ON i.id=iv.lp_item_id " .
@ -404,62 +375,50 @@ if ($is_allowedToTrack) {
iv.c_id = $course_id AND
v.c_id = $course_id AND
v.user_id=$studentId and v.lp_id=$contentId ORDER BY v.id, i.id";
$result3=Database::query($sql3);
$ar3=Database::fetch_array($result3);
$title_line .= get_lang('ScormTitleColumn').";".get_lang('ScormStatusColumn').";".get_lang('ScormScoreColumn').";".get_lang('ScormTimeColumn');
$result3 = Database::query($sql3);
$ar3 = Database::fetch_array($result3);
$title_line .= get_lang('ScormTitleColumn') . ";" . get_lang('ScormStatusColumn') . ";" . get_lang('ScormScoreColumn') . ";" . get_lang('ScormTimeColumn');
while ($ar3['status'] != '') {
require_once '../newscorm/learnpathItem.class.php';
$time = learnpathItem::get_scorm_time('php',$ar3['total_time']);
$line .= $title.";".$ar3['status'].";".$ar3['score'].";".$time;
$ar3=Database::fetch_array($result3);
$time = learnpathItem::get_scorm_time('php', $ar3['total_time']);
$line .= $title . ";" . $ar3['status'] . ";" . $ar3['score'] . ";" . $time;
$ar3 = Database::fetch_array($result3);
}
}
$line .= "\n";
$ar2=Database::fetch_array($result2);
$ar2 = Database::fetch_array($result2);
}
$title_line .= "\n";
}
}
$ar=Database::fetch_array($result);
$ar = Database::fetch_array($result);
}
}
}
/*
* Export to a CSV file
* Force the browser to save the file instead of opening it.
*/
$len = strlen($title_line.$line);
$len = strlen($title_line . $line);
header('Content-type: application/octet-stream');
//header('Content-Type: application/force-download');
header('Content-length: '.$len);
$filename = api_html_entity_decode(str_replace(":","",str_replace(" ","_", $title[0].'_'.$title[1].'.csv')));
header('Content-length: ' . $len);
$filename = api_html_entity_decode(str_replace(":", "", str_replace(" ", "_", $title[0] . '_' . $title[1] . '.csv')));
$filename = replace_dangerous_char($filename);
if(preg_match("/MSIE 5.5/",$_SERVER['HTTP_USER_AGENT']))
{
header('Content-Disposition: filename= '.$filename);
}
else
{
header('Content-Disposition: attachment; filename= '.$filename);
if (preg_match("/MSIE 5.5/", $_SERVER['HTTP_USER_AGENT'])) {
header('Content-Disposition: filename= ' . $filename);
} else {
header('Content-Disposition: attachment; filename= ' . $filename);
}
if(strpos($_SERVER['HTTP_USER_AGENT'],'MSIE'))
{
if (strpos($_SERVER['HTTP_USER_AGENT'], 'MSIE')) {
header('Pragma: ');
header('Cache-Control: ');
header('Cache-Control: public'); // IE cannot download from sessions without a cache
}
header('Content-Description: '.$filename);
header('Content-Description: ' . $filename);
header('Content-transfer-encoding: binary');
echo api_html_entity_decode($title_line, ENT_COMPAT);