123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562 |
- <?php
- /*
- ==============================================================================
- Dokeos - elearning and course management software
- Copyright (c) 2004-2006 Dokeos S.A.
- Copyright (c) 2003 Ghent University (UGent)
- Copyright (c) 2001 Universite catholique de Louvain (UCL)
- Author: Frederic Vauthier (frederic.vauthier@dokeos.com)
- For a full list of contributors, see "credits.txt".
- The full license can be read in "license.txt".
- This program is free software; you can redistribute it and/or
- modify it under the terms of the GNU General Public License
- as published by the Free Software Foundation; either version 2
- of the License, or (at your option) any later version.
- See the GNU General Public License for more details.
- Contact address: Dokeos, 44 rue des palais, B-1030 Brussels, Belgium
- Mail: info@dokeos.com
- ==============================================================================
- */
- /**
- ==============================================================================
- * @author Thomas Depraetere
- * @author Hugues Peeters
- * @author Christophe Gesche
- * @author Sebastien Piraux
- * @author Toon Keppens (Vi-Host.net)
- *
- * @package dokeos.tracking
- ==============================================================================
- */
- // TODO: Is this file deprecated?
- /*
- ==============================================================================
- INIT SECTION
- ==============================================================================
- */
- $pathopen = isset($_REQUEST['pathopen']) ? $_REQUEST['pathopen'] : null;
- // name of the language file that needs to be included
- $language_file = "tracking";
- include('../inc/global.inc.php');
- //includes for SCORM and LP
- require_once('../newscorm/learnpath.class.php');
- require_once('../newscorm/learnpathItem.class.php');
- require_once('../newscorm/scorm.class.php');
- require_once('../newscorm/scormItem.class.php');
- // charset determination
- if ($_GET['scormcontopen'])
- {
- $tbl_lp = Database::get_course_table(TABLE_LP_MAIN);
- $contopen = (int) $_GET['scormcontopen'];
- $sql = "SELECT default_encoding FROM $tbl_lp WHERE id = ".$contopen;
- $res = Database::query($sql,__FILE__,__LINE__);
- $row = Database::fetch_array($res);
- $lp_charset = $row['default_encoding'];
- //header('Content-Type: text/html; charset='. $row['default_encoding']);
- }
- /*
- -----------------------------------------------------------
- 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);
- $TABLECOURSE_LINKS = Database::get_course_table(TABLE_LINK);
- $table_user = Database::get_main_table(TABLE_MAIN_USER);
- //$table_scormdata = Database::get_scorm_table(TABLE_SCORM_SCO_DATA);
- //$table_scormmain = Database::get_scorm_table(TABLE_SCORM_MAIN);
- //$tbl_learnpath_main = Database::get_course_table(TABLE_LEARNPATH_MAIN);
- //$tbl_learnpath_item = Database::get_course_table(TABLE_LEARNPATH_ITEM);
- //$tbl_learnpath_chapter = Database::get_course_table(TABLE_LEARNPATH_CHAPTER);
- $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);
- $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");
- include("../resourcelinker/resourcelinker.inc.php");
- $is_allowedToTrack = $is_courseAdmin || $is_platformAdmin;
- /*
- ==============================================================================
- MAIN CODE
- ==============================================================================
- */
- $title[0]=get_lang('StatsOfCourse')." : ".$_course['official_code'];
- // check if uid is prof of this group
- if($is_allowedToTrack && $_configuration['tracking_enabled'])
- {
- // 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>
- ";*/
- if(!isset($view)) $view ="0000000";
- /***************************************************************************
- *
- * Reporting
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[6] == '1'){
- $tempView[6] = '0';
- //--------------------------------BEGIN users in this course
- $sql = "SELECT $TABLECOURSUSER.`user_id`, $table_user.`lastname`, $table_user.`firstname`
- FROM $TABLECOURSUSER, $table_user
- WHERE $TABLECOURSUSER.course_code = '".$_cid."' AND $TABLECOURSUSER.`user_id` = $table_user.`user_id`
- 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."'";
- $_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";
- 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 " .
- "INNER JOIN $tbl_learnpath_view v ON iv.lp_view_id = v.id " .
- "WHERE v.user_id = ".$results[$j][0];
- $total_lpath_items = getOneResult($sql);
- // sum of all completed items (= multiple learningpaths + SCORM imported paths)
- $sql = "SELECT COUNT(DISTINCT(iv.lp_item_id)) " .
- "FROM $tbl_learnpath_item_view iv " .
- "INNER JOIN $tbl_learnpath_view v ON iv.lp_view_id = v.id " .
- "WHERE 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' ORDER BY access_id ASC LIMIT 1";
- $first_access = getOneResult($sql);
- $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'";
- $last_access = getOneResult($sql);
- $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";
- //--------------------------------END presentation of data
- }
- }
- else
- {
- $line = get_lang('NoResult')."\n";
- }
- }
- /***************************************************************************
- *
- * Main
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[0] == '1')
- {
- $title[1]= $nameTools;
- $tempView[0] = '0';
- $sql = "SELECT count(*)
- FROM $TABLECOURSUSER
- WHERE course_code = '".$_cid."'";
- $count = getOneResult($sql);
- $title_line = get_lang('CountUsers')." ; ".$count."\n";
- }
- /***************************************************************************
- *
- * Access to this course
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[1] == '1'){
- $tempView[1] = '0';
- $title[1]=get_lang('ConnectionsToThisCourse');
- $title_line = '';
- $line = '';
- //Total
- $sql = "SELECT count(*)
- FROM $TABLETRACK_ACCESS
- WHERE access_cours_code = '".$_cid."'
- AND access_tool IS NULL";
- $count = getOneResult($sql);
- $line .= get_lang('CountToolAccess')." ; ".$count."\n";
- // last 31 days
- $sql = "SELECT count(*)
- FROM $TABLETRACK_ACCESS
- WHERE `access_cours_code` = '$_cid'
- AND (access_date > DATE_ADD(CURDATE(), INTERVAL -31 DAY))
- AND access_tool IS NULL";
- $count = getOneResult($sql);
- $line .= get_lang('Last31days')." ; ".$count."\n";
- // last 7 days
- $sql = "SELECT count(*)
- FROM $TABLETRACK_ACCESS
- WHERE `access_cours_code` = '$_cid'
- AND (access_date > DATE_ADD(CURDATE(), INTERVAL -7 DAY))
- AND access_tool IS NULL";
- $count = getOneResult($sql);
- $line .= get_lang('Last7days')." ; ".$count."\n";
- // today
- $sql = "SELECT count(*)
- FROM $TABLETRACK_ACCESS
- WHERE `access_cours_code` = '$_cid'
- AND ( access_date > CURDATE() )
- AND access_tool IS NULL";
- $count = getOneResult($sql);
- $line .= get_lang('Thisday')." ; ".$count."\n";
- }
- /***************************************************************************
- *
- * Tools
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[2] == '1'){
- $tempView[2] = '0';
- $title[1]= $nameTools;
- $line ='';
- $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
- WHERE `access_tool` IS NOT NULL
- AND `access_cours_code` = '$_cid'
- GROUP BY `access_tool`";
- $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";
- }
- }
- else
- {
- $line = get_lang('NoResult')."\n";
- }
- }
- /***************************************************************************
- *
- * Links
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[3] == '1'){
- $tempView[3] = '0';
- $sql = "SELECT `cl`.`title`, `cl`.`url`,count(DISTINCT `sl`.`links_user_id`), count(`cl`.`title`)
- FROM $TABLETRACK_LINKS AS sl, $TABLECOURSE_LINKS AS cl
- WHERE `sl`.`links_link_id` = `cl`.`id`
- AND `sl`.`links_cours_id` = '$_cid'
- GROUP BY `cl`.`title`, `cl`.`url`";
- $results = getManyResultsXCol($sql,4);
- $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";
- }
- }
- else
- {
- $line = get_lang('NoResult')."\n";
- }
- }
- /***************************************************************************
- *
- * Documents
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[4] == '1'){
- $tempView[4] = '0';
- $sql = "SELECT `down_doc_path`, COUNT(DISTINCT `down_user_id`), COUNT(`down_doc_path`)
- FROM $TABLETRACK_DOWNLOADS
- WHERE `down_cours_id` = '$_cid'
- GROUP BY `down_doc_path`";
- $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";
- }
- }
- else
- {
- $line=get_lang('NoResult')."\n";
- }
- }
- /***************************************************************************
- *
- * Scorm contents and Learning Path
- *
- ***************************************************************************/
- $tempView = $view;
- if($view[5] == '1'){
- $tempView[5] = '0';
- $sql = "SELECT id, name
- FROM $tbl_learnpath_main";
- //WHERE dokeosCourse='$_cid'"; we are using a table inside the course now, so no need for course id
- $result=Database::query($sql,__FILE__,__LINE__);
- $ar=Database::fetch_array($result);
- $title[1]= $nameTools;
- $line='';
- $title_line = get_lang('ScormContentColumn');
- $scormcontopen=$_REQUEST["scormcontopen"];
- $scormstudentopen=$_REQUEST["scormstudentopen"];
- 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'];
- $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.lp_id=$contentId group by u.user_id";
- //error_log($sql2,0);
- $result2=Database::query($sql2,__FILE__,__LINE__);
- if(Database::num_rows($result2)>0){
- $ar2=Database::fetch_array($result2);
- while ($ar2 != '') {
- if (isset($_REQUEST["scormstudentopen"]) && $ar2['user_id']==$scormstudentopen) {
- $line .= $ar['id']." ".$ar2['user_id']." ".$ar2['lastname']." ".$ar2['firstname'];
- }
- else{
- $line .= $ar['id']." ".$ar2['user_id']." ".$ar2['lastname']." ".$ar2['firstname'];
- }
- 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 " .
- "INNER JOIN $tbl_learnpath_view v ON iv.lp_view_id=v.id " .
- "WHERE (v.user_id=$studentId and v.lp_id=$contentId) ORDER BY v.id, i.id";
- $result3=Database::query($sql3,__FILE__,__LINE__);
- $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']);
- $title = api_htmlentities($ar3['title'],ENT_QUOTES,$lp_charset);
- $line .= $title.";".$ar3['status'].";".$ar3['score'].";".$time;
- $ar3=Database::fetch_array($result3);
- }
- }
- $line .= "\n";
- $ar2=Database::fetch_array($result2);
- }
- $title_line .= "\n";
- }
- }
- $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);
- header('Content-type: application/octet-stream');
- //header('Content-Type: application/force-download');
- header('Content-length: '.$len);
- $filename = html_entity_decode(str_replace(":","",str_replace(" ","_", $title[0].'_'.$title[1].'.csv')));
- 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'))
- {
- header('Pragma: ');
- header('Cache-Control: ');
- header('Cache-Control: public'); // IE cannot download from sessions without a cache
- }
- header('Content-Description: '.$filename);
- header('Content-transfer-encoding: binary');
- echo api_html_entity_decode($title_line, ENT_COMPAT, $charset);
- echo api_html_entity_decode($line, ENT_COMPAT, $charset);
- exit;
- }
- // not allowed
- else
- {
- if(!$_configuration['tracking_enabled'])
- {
- echo get_lang('TrackingDisabled');
- }
- else
- {
- api_not_allowed();
- }
- }
- ?>
|