<?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) * * @package chamilo.tracking */ /** * Code */ // 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"; require_once '../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'; /* 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(); $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 || api_is_drh(); /* MAIN 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> ";*/ if(!isset($view)) $view ="0000000"; /* Reporting */ $tempView = $view; 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." 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.c_id = $course_id AND iv.c_id = $course_id AND 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.c_id = $course_id AND iv.c_id = $course_id AND 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"; $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."' AND relation_type<>".COURSE_RELATION_TYPE_RRHH.""; $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 cl.c_id = $course_id AND 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 c_id = $course_id "; $result=Database::query($sql); $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.c_id = $course_id AND sd.lp_id=$contentId group by u.user_id"; //error_log($sql2,0); $result2=Database::query($sql2); 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']." ".api_get_person_name($ar2['firstname'], $ar2['lastname']); } else { $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']; $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 i.c_id = $course_id AND 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'); 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); } } $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 = 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(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); echo api_html_entity_decode($line, ENT_COMPAT); exit; } else { api_not_allowed(); }