*/
function myEnc($isostring,$supposed_encoding='ISO-8859-15')
{
return htmlentities($isostring,ENT_QUOTES,$supposed_encoding);
}
/**
* Displays the number of logins every month for a specific user in a specific course.
*/
function display_login_tracking_info($view, $user_id, $course_id)
{
$MonthsLong = $GLOBALS['MonthsLong'];
$track_access_table = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_ACCESS);
$tempView = $view;
if(substr($view,0,1) == '1')
{
$new_view = substr_replace($view,'0',0,1);
echo "
|
- ".myEnc(get_lang('LoginsAndAccessTools'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
echo "".myEnc(get_lang('LoginsDetails'))."
";
$sql = "SELECT UNIX_TIMESTAMP(`access_date`), count(`access_date`)
FROM $track_access_table
WHERE `access_user_id` = '$user_id'
AND `access_cours_code` = '".$course_id."'
GROUP BY YEAR(`access_date`),MONTH(`access_date`)
ORDER BY YEAR(`access_date`),MONTH(`access_date`) ASC";
echo " |
| ";
//$results = getManyResults2Col($sql);
$results = getManyResults3Col($sql);
echo "";
echo " |
";
}
else
{
$new_view = substr_replace($view,'1',0,1);
echo "
|
+ ".myEnc(get_lang('LoginsAndAccessTools'))."
|
";
}
}
/**
* Displays the exercise results for a specific user in a specific course.
* @todo remove globals
*/
function display_exercise_tracking_info($view, $user_id, $course_id)
{
global $TABLECOURSE_EXERCICES, $TABLETRACK_EXERCICES;
if(substr($view,1,1) == '1')
{
$new_view = substr_replace($view,'0',1,1);
echo "
|
- ".myEnc(get_lang('ExercicesResults'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
echo "".myEnc(get_lang('ExercicesDetails'))."
";
$sql = "SELECT `ce`.`title`, `te`.`exe_result` , `te`.`exe_weighting`, UNIX_TIMESTAMP(`te`.`exe_date`)
FROM $TABLECOURSE_EXERCICES AS ce , `$TABLETRACK_EXERCICES` AS te
WHERE `te`.`exe_cours_id` = '$course_id'
AND `te`.`exe_user_id` = '$user_id'
AND `te`.`exe_exo_id` = `ce`.`id`
ORDER BY `ce`.`title` ASC, `te`.`exe_date` ASC";
$hpsql = "SELECT `te`.`exe_name`, `te`.`exe_result` , `te`.`exe_weighting`, UNIX_TIMESTAMP(`te`.`exe_date`)
FROM $TBL_TRACK_HOTPOTATOES AS te
WHERE `te`.`exe_user_id` = '$user_id' AND `te`.`exe_cours_id` = '$course_id'
ORDER BY `te`.`exe_cours_id` ASC, `te`.`exe_date` ASC";
$hpresults = getManyResultsXCol($hpsql, 4);
$NoTestRes = 0;
$NoHPTestRes = 0;
echo " |
\n\n";
$results = getManyResultsXCol($sql, 4);
echo "\n";
echo "
|
".myEnc(get_lang('ExercicesTitleExerciceColumn'))."
|
".myEnc(get_lang('Date'))."
|
".myEnc(get_lang('ExercicesTitleScoreColumn'))."
|
";
if (is_array($results))
{
for($i = 0; $i < sizeof($results); $i++)
{
$display_date = format_locale_date(get_lang('dateTimeFormatLong'), $results[$i][3]);
echo "\n";
echo "| ".$results[$i][0]." | \n";
echo "".$display_date." | \n";
echo "".$results[$i][1]." / ".$results[$i][2]." | \n";
echo " \n";
}
}
else // istvan begin
{
$NoTestRes = 1;
}
// The Result of Tests
if(is_array($hpresults))
{
for($i = 0; $i < sizeof($hpresults); $i++)
{
$title = GetQuizName($hpresults[$i][0],'');
if ($title == '')
$title = GetFileName($hpresults[$i][0]);
$display_date = format_locale_date(get_lang('dateTimeFormatLong'), $hpresults[$i][3]);
?>
|
|
/ |
\n";
echo "".myEnc(get_lang('NoResult'))." | \n";
echo "\n";
}
echo " ";
echo " | \n
\n";
}
else
{
$new_view = substr_replace($view,'1',1,1);
echo "
|
+ ".myEnc(get_lang('ExercicesResults'))."
|
";
}
}
/**
* Displays the student publications for a specific user in a specific course.
* @todo remove globals
*/
function display_student_publications_tracking_info($view, $user_id, $course_id)
{
global $TABLETRACK_UPLOADS, $TABLECOURSE_WORK, $dateTimeFormatLong;
if(substr($view,2,1) == '1')
{
$new_view = substr_replace($view,'0',2,1);
echo "
|
- ".myEnc(get_lang('WorkUploads'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
echo "".myEnc(get_lang('WorksDetails'))."
";
$sql = "SELECT `u`.`upload_date`, `w`.`title`, `w`.`author`,`w`.`url`
FROM `$TABLETRACK_UPLOADS` `u` , $TABLECOURSE_WORK `w`
WHERE `u`.`upload_work_id` = `w`.`id`
AND `u`.`upload_user_id` = '$user_id'
AND `u`.`upload_cours_id` = '$course_id'
ORDER BY `u`.`upload_date` DESC";
echo " |
";
$results = getManyResultsXCol($sql,4);
echo "";
echo "
|
".myEnc(get_lang('WorkTitle'))."
|
".myEnc(get_lang('WorkAuthors'))."
|
".myEnc(get_lang('Date'))."
|
";
if (is_array($results))
{
for($j = 0 ; $j < count($results) ; $j++)
{
$pathToFile = api_get_path(WEB_COURSE_PATH).$_course['path']."/".$results[$j][3];
$timestamp = strtotime($results[$j][0]);
$beautifulDate = format_locale_date($dateTimeFormatLong,$timestamp);
echo "";
echo "| "
."".$results[$j][1].""
." | ";
echo "".$results[$j][2]." | ";
echo "".$beautifulDate." | ";
echo" ";
}
}
else
{
echo "";
echo "| ".myEnc(get_lang('NoResult'))." | ";
echo" ";
}
echo " ";
echo " |
";
}
else
{
$new_view = substr_replace($view,'1',2,1);
echo "
|
+ ".myEnc(get_lang('WorkUploads'))."
|
";
}
}
/**
* Displays the links followed for a specific user in a specific course.
* @todo remove globals
*/
function display_links_tracking_info($view, $user_id, $course_id)
{
global $TABLETRACK_LINKS, $TABLECOURSE_LINKS;
if(substr($view,3,1) == '1')
{
$new_view = substr_replace($view,'0',3,1);
echo "
|
- ".myEnc(get_lang('LinksAccess'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
echo "".myEnc(get_lang('LinksDetails'))."
";
$sql = "SELECT `cl`.`title`, `cl`.`url`
FROM `$TABLETRACK_LINKS` AS sl, $TABLECOURSE_LINKS AS cl
WHERE `sl`.`links_link_id` = `cl`.`id`
AND `sl`.`links_cours_id` = '$course_id'
AND `sl`.`links_user_id` = '$user_id'
GROUP BY `cl`.`title`, `cl`.`url`";
echo " |
";
$results = getManyResults2Col($sql);
echo "";
echo "
|
".myEnc(get_lang('LinksTitleLinkColumn'))."
|
";
if (is_array($results))
{
for($j = 0 ; $j < count($results) ; $j++)
{
echo "";
echo "| ".$results[$j][0]." | ";
echo" ";
}
}
else
{
echo "";
echo "| ".myEnc(get_lang('NoResult'))." | ";
echo" ";
}
echo " ";
echo " |
";
}
else
{
$new_view = substr_replace($view,'1',3,1);
echo "
|
+ ".myEnc(get_lang('LinksAccess'))."
|
";
}
}
/**
* Displays the documents downloaded for a specific user in a specific course.
*/
function display_document_tracking_info($view, $user_id, $course_id)
{
$downloads_table = Database::get_statistic_table(TABLE_STATISTIC_TRACK_E_DOWNLOADS);
if(substr($view,4,1) == '1')
{
$new_view = substr_replace($view,'0',4,1);
echo "
|
- ".myEnc(get_lang('DocumentsAccess'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
echo "".myEnc(get_lang('DocumentsDetails'))."
";
$sql = "SELECT `down_doc_path`
FROM $downloads_table
WHERE `down_cours_id` = '$course_id'
AND `down_user_id` = '$user_id'
GROUP BY `down_doc_path`";
echo " |
";
$results = getManyResults1Col($sql);
echo "";
echo "
|
".myEnc(get_lang('DocumentsTitleDocumentColumn'))."
|
";
if (is_array($results))
{
for($j = 0 ; $j < count($results) ; $j++)
{
echo "";
echo "| ".$results[$j]." | ";
echo" ";
}
}
else
{
echo "";
echo "| ".myEnc(get_lang('NoResult'))." | ";
echo" ";
}
echo " ";
echo " |
";
}
else
{
$new_view = substr_replace($view,'1',4,1);
echo "
|
+ ".myEnc(get_lang('DocumentsAccess'))."
|
";
}
}
/*
==============================================================================
MAIN SECTION
==============================================================================
*/
?>
".myEnc(get_lang('ListStudents'))."";
if( $is_allowedToTrackEverybodyInCourse )
{
// if user can track everybody : list user of course
if(api_get_setting('use_session_mode')) {
$sql = "SELECT count(user_id)
FROM $TABLECOURSUSER
WHERE `course_code` = '$_cid'";
}
else {
$sql = "SELECT count(id_user)
FROM $tbl_session_course_user
WHERE `course_code` = '$_cid'";
}
}
else
{
// if user can only track one group : list users of this group
$sql = "SELECT count(user)
FROM $TABLECOURSE_GROUPSUSER
WHERE `group_id` = '$_gid'";
}
$userGroupNb = getOneResult($sql);
$step = 25; // number of student per page
if ($userGroupNb > $step)
{
if(!isset($offset))
{
$offset=0;
}
$next = $offset + $step;
$previous = $offset - $step;
$navLink = "\n";
}
else
{
$offset = 0;
}
echo $navLink;
if (!settype($offset, 'integer') || !settype($step, 'integer')) die('Offset or step variables are not integers.'); //sanity check of integer vars
if( $is_allowedToTrackEverybodyInCourse )
{
// list of users in this course
$sql = "SELECT `u`.`user_id`, `u`.`firstname`,`u`.`lastname`
FROM $TABLECOURSUSER cu , $TABLEUSER u
WHERE `cu`.`user_id` = `u`.`user_id`
AND `cu`.`course_code` = '$_cid'
LIMIT $offset,$step";
}
else
{
// list of users of this group
$sql = "SELECT `u`.`user_id`, `u`.`firstname`,`u`.`lastname`
FROM $TABLECOURSE_GROUPSUSER gu , $TABLEUSER u
WHERE `gu`.`user_id` = `u`.`user_id`
AND `gu`.`group_id` = '$_gid'
LIMIT $offset,$step";
}
$list_users = getManyResults3Col($sql);
echo "\n";
echo $navLink;
}
else // if uInfo is set
{
/***************************************************************************
*
* Informations about student uInfo
*
***************************************************************************/
// these checks exists for security reasons, neither a prof nor a tutor can see statistics of a user from
// another course, or group
if( $is_allowedToTrackEverybodyInCourse )
{
// check if user is in this course
$tracking_is_accepted = $is_course_member;
$tracked_user_info = Database::get_user_info_from_id($uInfo);
}
else
{
// check if user is in the group of this tutor
$sql = "SELECT `u`.`firstname`,`u`.`lastname`, `u`.`email`
FROM $TABLECOURSE_GROUPSUSER gu , $TABLEUSER u
WHERE `gu`.`user_id` = `u`.`user_id`
AND `gu`.`group_id` = '$_gid'
AND `u`.`user_id` = '$uInfo'";
$query = api_sql_query($sql,__FILE__,__LINE__);
$tracked_user_info = @mysql_fetch_assoc($query);
if(is_array($tracked_user_info)) $tracking_is_accepted = true;
}
if ($tracking_is_accepted)
{
$tracked_user_info['email'] == '' ? $mail_link = myEnc(get_lang('NoEmail')) : $mail_link = Display::encrypted_mailto_link($tracked_user_info['email']);
echo "";
echo get_lang('informationsAbout').' :';
echo "\n"
."- ".myEnc(get_lang('FirstName'))." : ".$tracked_user_info['firstname']."
\n"
."- ".myEnc(get_lang('LastName'))." : ".$tracked_user_info['lastname']."
\n"
."- ".myEnc(get_lang('Email'))." : ".$mail_link."
\n"
." ";
echo " |
\n";
// show all : number of 1 is equal to or bigger than number of categories
// show none : number of 0 is equal to or bigger than number of categories
echo "
|
[".myEnc(get_lang('ShowAll'))."]
[".myEnc(get_lang('ShowNone'))."]".
//"||[".myEnc(get_lang('BackToList'))."]".
" |
";
if(!isset($view))
{
$view ='0000000';
}
//Logins
display_login_tracking_info($view, $uInfo, $_cid);
//Exercise results
display_exercise_tracking_info($view, $uInfo, $_cid);
//Student publications uploaded
display_student_publications_tracking_info($view, $uInfo, $_cid);
//Links usage
display_links_tracking_info($view, $uInfo, $_cid);
//Documents downloaded
display_document_tracking_info($view, $uInfo, $_cid);
}
else
{
echo myEnc(get_lang('ErrorUserNotInGroup'));
}
/***************************************************************************
*
* Scorm contents and Learning Path
*
***************************************************************************/
if(substr($view,5,1) == '1')
{
$new_view = substr_replace($view,'0',5,1);
echo "
|
- ".myEnc(get_lang('ScormAccess'))." [".myEnc(get_lang('Close'))."] [".get_lang('ExportAsCSV')."]
|
";
$sql = "SELECT id, name FROM $tbl_learnpath_main";
$result=api_sql_query($sql,__FILE__,__LINE__);
$ar=Database::fetch_array($result);
echo "";
echo "
|
".myEnc(get_lang('ScormContentColumn'))."
|
";
if (is_array($ar))
{
while ($ar['id'] != '') {
$lp_title = stripslashes($ar['name']);
echo "| ";
echo "$lp_title";
echo " | ";
if ($ar['id']==$scormcontopen) { //have to list the students here
$contentId=$ar['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 " .
"INNER JOIN $tbl_learnpath_view v ON iv.lp_view_id=v.id " .
"WHERE (v.user_id=$uInfo and v.lp_id=$contentId) ORDER BY v.id, i.id";
$result3=api_sql_query($sql3,__FILE__,__LINE__);
$ar3=Database::fetch_array($result3);
if (is_array($ar3)) {
echo "| |
".myEnc(get_lang('ScormTitleColumn'))."
|
".myEnc(get_lang('ScormStatusColumn'))."
|
".myEnc(get_lang('ScormScoreColumn'))."
|
".myEnc(get_lang('ScormTimeColumn'))."
|
";
while ($ar3['status'] != '') {
require_once('../newscorm/learnpathItem.class.php');
$time = learnpathItem::get_scorm_time('php',$ar3['total_time']);
$title = htmlentities($ar3['title'],ENT_QUOTES,$lp_charset);
echo "| | ";
echo "$title | {$ar3['status']} | {$ar3['score']} | $time | ";
echo " ";
$ar3=Database::fetch_array($result3);
}
} else {
echo "";
echo "| ".myEnc(get_lang('ScormNeverOpened'))." | ";
echo" ";
}
}
$ar=Database::fetch_array($result);
}
}
else
{
$noscorm=true;
}
if ($noscorm) {
echo "";
echo "| ".myEnc(get_lang('NoResult'))." | ";
echo " ";
}
echo "
";
echo " |
";
}
else
{
$new_view = substr_replace($view,'1',5,1);
echo "
|
+ ".myEnc(get_lang('ScormAccess'))."
|
";
}
}
}
// not allowed
else
{
if(!$_configuration['tracking_enabled'])
{
echo myEnc(get_lang('TrackingDisabled'));
}
else
{
api_not_allowed();
}
}
?>