<?php

/*
==============================================================================
	Dokeos - elearning and course management software

	Copyright (c) 2008 Dokeos SPRL

	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, rue du Corbeau, 108, B-1030 Brussels, Belgium
	Mail: info@dokeos.com
==============================================================================
*/
/**
 * This script displays statistics on the current learning path (scorm)
 * 
 * This script must be included by lp_controller.php to get basic initialisation
 * @package dokeos.learnpath
 * @author Yannick Warnier <ywarnier@beeznest.org>
 */

require_once('learnpath.class.php');
//require_once('scorm.class.php');
require_once ('resourcelinker.inc.php');
require_once ('../inc/lib/tracking.lib.php');
require_once ('../inc/lib/course.lib.php');

if(empty($_SESSION['_course']['id']) && isset($_GET['course']))
{
	$course_code = Security::remove_XSS($_GET['course']);
}
else
{
	$course_code = $_SESSION['_course']['id'];
}


if (isset($_GET['student_id'])) {
	$student_id = intval($_GET['student_id']);
} 

//The two following variables have to be declared by the includer script 
//$lp_id = $_SESSION['oLP']->get_id();
//$list = $_SESSION['oLP']->get_flat_ordered_items_list($lp_id);
//$user_id = $_user['user_id'];
//$stats_charset = $_SESSION['oLP']->encoding
if(!isset($origin))
	$origin = '';
if($origin != 'tracking')
{
	if (!empty ($stats_charset)) {
		$lp_charset = $stats_charset;
	} else {
		$lp_charset = api_get_setting('platform_charset');
	}
	$charset = $lp_charset;
	//$w = $tablewidth -20;
	$htmlHeadXtra[] = ''.'<style type="text/css" media="screen, projection">
		/*<![CDATA[*/
		@import "../css/public_admin/scorm.css";
		/*]]>*/
	</style>';
	include_once ('../inc/reduced_header.inc.php');
	echo '<body>';
}
else
{
    //Get learning path's encoding
    $TBL_LP = Database :: get_course_table(TABLE_LP_MAIN);
    $sql = "SELECT default_encoding FROM $TBL_LP " .
                "WHERE id = '".(int)$_GET['lp_id']."'";
    $res = api_sql_query($sql, __FILE__, __LINE__);
    if (Database :: num_rows($res) > 0)
    {
        $row = Database::fetch_array($res);
        $lp_charset = $row['default_encoding'];
    }
}

// The dokeos interface's encoding
$dokeos_charset = api_get_setting('platform_charset');
$output = '';
//if display in fullscreen required
if (!empty($_GET['fs']) && strcmp($_GET['fs'], 'true') == 0) 
{
	$output .= '<table width="100%" align="center">';
} 
else 
{
	$output .= '<table width="100%">';
}

//check if the user asked for the "extend all" option
$extend_all_link = '';
$extend_all = 0;

if ($origin == 'tracking') {
	$url_suffix = '&course=' . Security::remove_XSS($_GET['course']) . '&student_id=' . $student_id . '&lp_id=' . Security::remove_XSS($_GET['lp_id']) . '&origin=' . Security::remove_XSS($_GET['origin']);
} else {
	$url_suffix = '';
}

if (!empty ($_GET['extend_all'])) {
	$extend_all_link = '<a href="' . api_get_self() . '?action=stats' . $url_suffix . '"><img src="../img/view_less_stats.gif" alt="fold_view" border="0" title="'.api_convert_encoding(get_lang('HideAllAttempts'), $lp_charset, $dokeos_charset).'"></a>';
	$extend_all = 1;
} else {
	$extend_all_link = '<a href="' . api_get_self() . '?action=stats&extend_all=1' . $url_suffix . '"><img src="../img/view_more_stats.gif" alt="extend_view" border="0" title="'.api_convert_encoding(get_lang('ShowAllAttempts'), $lp_charset, $dokeos_charset).'"></a>';
}

if ($origin != 'tracking') {
	$output .= "<tr><td><div class='title'>" . api_convert_encoding(get_lang('ScormMystatus'), $lp_charset, $dokeos_charset) . "</div></td></tr>";
}
$output .= "<tr><td>&nbsp;</td></tr>" . "<tr><td>" . "<table border='0' class='data_table'><tr>\n" . '<td width="16">' . $extend_all_link . '</td>' . '<td colspan="4" class="title"><div class="mystatusfirstrow">' . api_convert_encoding(get_lang('ScormLessonTitle'), $lp_charset, $dokeos_charset) . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . api_convert_encoding(get_lang('ScormStatus'), $lp_charset, $dokeos_charset) . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . api_convert_encoding(get_lang('ScormScore'), $lp_charset, $dokeos_charset) . "</div></td>\n" . '<td colspan="2" class="title"><div class="mystatusfirstrow">' . api_convert_encoding(get_lang('ScormTime'), $lp_charset, $dokeos_charset) . "</div></td><td class='title'><div class='mystatusfirstrow'>" . api_convert_encoding(get_lang('Actions'), $lp_charset, $dokeos_charset) . "</div></td></tr>\n";
//going through the items using the $items[] array instead of the database order ensures
// we get them in the same order as in the imsmanifest file, which is rather random when using
// the database table
$TBL_LP_ITEM = Database :: get_course_table('lp_item');
$TBL_LP_ITEM_VIEW = Database :: get_course_table('lp_item_view');
$TBL_LP_VIEW = Database :: get_course_table('lp_view');
$tbl_stats_exercices = Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_EXERCICES);
$tbl_stats_attempts= Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_ATTEMPT);
$tbl_quiz_questions= Database :: get_course_table(TABLE_QUIZ_QUESTION);
$sql = "SELECT max(view_count) FROM $TBL_LP_VIEW " .
"WHERE lp_id = $lp_id AND user_id = '" . $user_id . "'";
$res = api_sql_query($sql, __FILE__, __LINE__);
$view = '';
$num = 0;
if (Database :: num_rows($res) > 0) {
	$myrow = Database :: fetch_array($res);
	$view = $myrow[0];
}

$counter = 0;
//error_log('New LP - Querying views for latest attempt: '.$sql,0);
$total_score = 0;
$total_max_score = 0;
$total_time = 0;
$h = api_convert_encoding(get_lang('h'), $lp_charset, $dokeos_charset);

if (!empty($export_csv)) {
	$csv_content[] = array (
		api_convert_encoding(get_lang('ScormLessonTitle'), $lp_charset, $dokeos_charset),
		api_convert_encoding(get_lang('ScormStatus'), $lp_charset, $dokeos_charset),
		api_convert_encoding(get_lang('ScormScore'), $lp_charset, $dokeos_charset),
		api_convert_encoding(get_lang('ScormTime'), $lp_charset, $dokeos_charset)
	);
}

// get attempts of a exercise
if (isset($_GET['lp_id']) && isset($_GET['my_lp_id'])) {
	$clean_lp_item_id = Database::escape_string($_GET['my_lp_id']);
	$clean_lp_id = Database::escape_string($_GET['lp_id']);
	$clean_course_code = Database :: escape_string($course_code);
	$sql_path = "SELECT path FROM $TBL_LP_ITEM WHERE id = '$clean_lp_item_id' AND lp_id = '$clean_lp_id'";
	$res_path = api_sql_query($sql_path,__FILE__,__LINE__); 
	$row_path = Database::fetch_array($res_path);
	
	if (Database::num_rows($res_path) > 0 ){		
		if ($origin != 'tracking') {		    
			$sql_attempts = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . (int)$row_path['path'] . '" AND exe_user_id="' . (int)api_get_user_id() . '" AND orig_lp_id = "'.(int)$clean_lp_id.'" AND orig_lp_item_id = "'.(int)$clean_lp_item_id.'" AND exe_cours_id="' . $clean_course_code. '" AND status <> "incomplete" ORDER BY exe_date';
		} else {										
			$sql_attempts = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . (int)$row_path['path'] . '" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.(int)$clean_lp_id.'" AND orig_lp_item_id = "'.(int)$clean_lp_item_id.'" AND exe_cours_id="' . $clean_course_code. '" AND status <> "incomplete" ORDER BY exe_date';
		}		
	}					
						
}

$TBL_QUIZ = Database :: get_course_table('quiz');

if (is_array($list) && count($list) > 0){
	foreach ($list as $my_item_id) {
		$extend_this = 0;
		$qry_order = 'DESC';
		if ((!empty ($_GET['extend_id']) and $_GET['extend_id'] == $my_item_id) OR $extend_all) {
			$extend_this = 1;
			$qry_order = 'ASC';
		}
		//prepare statement to go through each attempt
	
		if (!empty ($view)) {
			$sql = "SELECT iv.status as mystatus, v.view_count as mycount, " .
			"iv.score as myscore, iv.total_time as mytime, i.id as myid, i.lp_id as mylpid, iv.lp_view_id as mylpviewid, " .
			"i.title as mytitle, i.max_score as mymaxscore, " .
			"iv.max_score as myviewmaxscore, " .
			"i.item_type as item_type, iv.view_count as iv_view_count, " .
			"iv.id as iv_id, path as path" .
			" FROM $TBL_LP_ITEM as i, $TBL_LP_ITEM_VIEW as iv, $TBL_LP_VIEW as v" .
			" WHERE i.id = iv.lp_item_id " .
			" AND i.id = $my_item_id " .
			" AND iv.lp_view_id = v.id " .
			" AND i.lp_id = $lp_id " .
			" AND v.user_id = " . $user_id . " " .
			" AND v.view_count = $view " .
			" ORDER BY iv.view_count $qry_order ";
		} else {
			$sql = "SELECT iv.status as mystatus, v.view_count as mycount, " .
			"iv.score as myscore, iv.total_time as mytime, i.id as myid, i.lp_id as mylpid, iv.lp_view_id as mylpviewid, " .
			"i.title as mytitle, i.max_score as mymaxscore, " .
			"iv.max_score as myviewmaxscore, " .
			"i.item_type as item_type, iv.view_count as iv_view_count, " .
			"iv.id as iv_id, path as path " .
			" FROM $TBL_LP_ITEM as i, $TBL_LP_ITEM_VIEW as iv, $TBL_LP_VIEW as v " .
			" WHERE i.id = iv.lp_item_id " .
			" AND i.id = $my_item_id " .
			" AND iv.lp_view_id = v.id " .
			" AND i.lp_id = $lp_id " .
			" AND v.user_id = " . $user_id . " " .
			" ORDER BY iv.view_count $qry_order ";
		}
		
		$result = api_sql_query($sql, __FILE__, __LINE__);
		$num = Database :: num_rows($result);	
		$time_for_total = 'NaN';
		
		if (($extend_this || $extend_all) && $num > 0) {
			$row = Database :: fetch_array($result);
			$result_disabled_ext_all = false;
			if($row['item_type'] == 'quiz') {
				//check results_disabled in quiz table
				$my_path = Database::escape_string($row['path']);  
								
				$sql = "SELECT results_disabled FROM $TBL_QUIZ WHERE id ='".(int)$my_path."'";
				$res_result_disabled = api_sql_query($sql,__FILE__,__LINE__);
				$row_result_disabled = Database::fetch_row($res_result_disabled);
				
				if (Database::num_rows($res_result_disabled) > 0 && (int)$row_result_disabled[0]===1) {
					$result_disabled_ext_all = true;
				}
			}
					
			//echo '<br><pre>'; print_r($row); echo '</pre><br>';
			//if there are several attempts, and the link to extend has been clicked, show each attempt...
			if (($counter % 2) == 0) {
				$oddclass = "row_odd";
			} else {
				$oddclass = "row_even";
			}
	        $extend_link='';
			if (!empty($inter_num)) {
				$extend_link = '<a href="' . api_get_self() . '?action=stats&fold_id=' . $my_item_id . $url_suffix . '"><img src="../img/visible.gif" alt="'.api_convert_encoding(get_lang('HideAttemptView'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('HideAttemptView'), $lp_charset, $dokeos_charset).'"  border="0"></a>' . "\n";
			}
			$title = $row['mytitle'];
			
			if (empty ($title)) {
				$title = rl_get_resource_name(api_get_course_id(), $lp_id, $row['myid']);
			}
			
			if ($row['item_type'] != 'dokeos_chapter') {			
				$correct_test_link = '-';
				//api_convert_encoding($title, $lp_charset, $lp_charset)
				$title = Security::remove_XSS($title);
				$output .= "<tr class='$oddclass'>\n" . "<td>$extend_link</td>\n" . '<td colspan="4" class="content"><div class="mystatus">' . $title . "</div></td>\n" . '<td colspan="2" class="content"></td>' . "\n" . '<td colspan="2" class="content"></td>' . "\n" . '<td colspan="2" class="content"></td><td class="content"></td>' . "\n" . "</tr>\n";
			}
	
			$counter++;
			do {
				//check if there are interactions below
				$extend_attempt_link = '';
				$extend_this_attempt = 0;
				if ((learnpath :: get_interactions_count_from_db($row['iv_id']) > 0 || learnpath :: get_objectives_count_from_db($row['iv_id']) > 0) && !$extend_all) {
					if (!empty ($_GET['extend_attempt_id']) && $_GET['extend_attempt_id'] == $row['iv_id']) {
						//the extend button for this attempt has been clicked
						$extend_this_attempt = 1;
						$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&fold_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/visible.gif" alt="'.api_convert_encoding(get_lang('HideAttemptView'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('HideAttemptView'), $lp_charset, $dokeos_charset).'" border="0"></a>' . "\n";
					} else { //same case if fold_attempt_id is set, so not implemented explicitly
						//the extend button for this attempt has not been clicked
						$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.api_convert_encoding(get_lang('ExtendAttemptView'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('ExtendAttemptView'), $lp_charset, $dokeos_charset).'"  border="0"></a>' . "\n";
					}
				}
	
				if (($counter % 2) == 0) {
					$oddclass = "row_odd";
				} else {
					$oddclass = "row_even";
				}
				$lesson_status = $row['mystatus'];
				$score = $row['myscore'];
				$time_for_total = $row['mytime'];
				$time = learnpathItem :: get_scorm_time('js', $row['mytime']);
				$type;
				$scoIdentifier = $row['myid'];
				if ($score == 0) {
					$maxscore = $row['mymaxscore'];
				} else {
					if ($row['item_type'] == 'sco') {
	
						if (!empty ($row['myviewmaxscore']) && $row['myviewmaxscore'] > 0) {
							$maxscore = $row['myviewmaxscore'];
						}
						elseif ($row['myviewmaxscore'] === '') {
							$maxscore = 0;
						} else {
							$maxscore = $row['mymaxscore'];
						}
					}
					else 
					{
						$maxscore = $row['mymaxscore'];
					}
				}
				//Remove "NaN" if any (@todo: locate the source of these NaN)
				$time = str_replace('NaN', '00' . $h . '00\'00"', $time);
				if (($lesson_status == 'completed') or ($lesson_status == 'passed')) {
					$color = 'green';
				} else {
					$color = 'black';
				}
				$mylanglist = array (
					'completed' => 'ScormCompstatus',
					'incomplete' => 'ScormIncomplete',
					'failed' => 'ScormFailed',
					'passed' => 'ScormPassed',
					'browsed' => 'ScormBrowsed',
					'not attempted' => 'ScormNotAttempted',
					
				);
				
				$my_lesson_status = api_convert_encoding(get_lang($mylanglist[$lesson_status]), $lp_charset, $dokeos_charset);			
				
				if ($row['item_type'] != 'dokeos_chapter') {
					if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
						$view_score = '/';
					} else {
						$view_score = ($score == 0 ? '/' : ($maxscore === 0 ? $score : $score . '/' . float_format($maxscore, 1)));
					}
					$output .= "<tr class='$oddclass'>\n" . "<td></td>\n" . "<td>$extend_attempt_link</td>\n" . '<td colspan="3">' . api_convert_encoding(get_lang('Attempt'), $lp_charset, $dokeos_charset) . ' ' . $row['iv_view_count'] . "</td>\n"
					//."<td><font color='$color'><div class='mystatus'>".htmlentities($array_status[$lesson_status],ENT_QUOTES,$lp_charset)."</div></font></td>\n"
					 . '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . "</div></font></td>\n" . '<td colspan="2"><div class="mystatus" align="center">' . $view_score . "</div></td>\n" . '<td colspan="2"><div class="mystatus">'.$time.'</div></td><td></td></tr>';
					
					if (!empty($export_csv)) {
						$temp = array ();						
						$temp[] = $title = Security::remove_XSS($title); 
						$temp[] = Security::remove_XSS($my_lesson_status);
						
						if ($row['item_type'] == 'quiz') {
							
							if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
								$temp[] =  '/';
							} else {
								$temp[] = ($score == 0 ? '0/'.$maxscore : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
							}
							
						} else {
							$temp[] = ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
						}
						
						$temp[] = $time;
						$csv_content[] = $temp;
					}				
				}
				
				$counter++;
				
				if ($extend_this_attempt OR $extend_all) {
					$list1 = learnpath :: get_iv_interactions_array($row['iv_id']);
					foreach ($list1 as $id => $interaction) {
						if (($counter % 2) == 0) {
							$oddclass = "row_odd";
						} else {
							$oddclass = "row_even";
						}
						$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td>&nbsp;</td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td>' . $interaction['id'] . '</td>' . "\n"
						//."<td><font color='$color'><div class='mystatus'>".api_convert_encoding($array_status[$lesson_status],$lp_charset,$lp_charset)."</div></font></td>\n"
						 . '<td colspan="2">' . $interaction['type'] . "</td>\n"
						//.'<td>'.$interaction['correct_responses']."</td>\n"
						 . '<td>' . urldecode($interaction['student_response']) . "</td>\n" . '<td>' . $interaction['result'] . "</td>\n" . '<td>' . $interaction['latency'] . "</td>\n" . '<td>' . $interaction['time'] . "</td>\n<td></td>\n</tr>\n";
						$counter++;
					}
					$list2 = learnpath :: get_iv_objectives_array($row['iv_id']);
					foreach ($list2 as $id => $interaction) {
						if (($counter % 2) == 0) {
							$oddclass = "row_odd";
						} else {
							$oddclass = "row_even";
						}
						$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td>&nbsp;</td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td colspan="2">' . $interaction['objective_id'] . '</td>' . "\n" .
						'<td colspan="2">' . $interaction['status'] . "</td>\n" .
						'<td>' . $interaction['score_raw'] . "</td>\n" . '<td>' . $interaction['score_max'] . "</td>\n" . '<td>' . $interaction['score_min'] . "</td>\n<td></td>\n</tr>\n";
						$counter++;
					}
				}
			} while ($row = Database :: fetch_array($result));	
		}
		elseif ($num > 0) {
			$row = Database :: fetch_array($result);
			$my_id = $row['myid'];
			$my_lp_id = $row['mylpid'];
			$my_lp_view_id = $row['mylpviewid'];
			$my_path = $row['path'];			
			
			$result_disabled_ext_all = false;
			
			if($row['item_type'] == 'quiz') {
				//check results_disabled in quiz table
				$my_path = Database::escape_string($my_path);  
								
				$sql = "SELECT results_disabled FROM $TBL_QUIZ WHERE id ='".(int)$my_path."'";
				$res_result_disabled = api_sql_query($sql,__FILE__,__LINE__);
				$row_result_disabled = Database::fetch_row($res_result_disabled);
				
				if (Database::num_rows($res_result_disabled) > 0 && (int)$row_result_disabled[0]===1) {
					$result_disabled_ext_all = true;
				}
			}				
						
			//check if there are interactions below
			$extend_attempt_link = '';
			$extend_this_attempt = 0;
			$inter_num = learnpath :: get_interactions_count_from_db($row['iv_id']);
			$objec_num = learnpath :: get_objectives_count_from_db($row['iv_id']);
			if (($inter_num > 0 || $objec_num > 0) && !$extend_all) {
				if (!empty ($_GET['extend_attempt_id']) && $_GET['extend_attempt_id'] == $row['iv_id']) {
					//the extend button for this attempt has been clicked
					$extend_this_attempt = 1;
					$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&fold_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/visible.gif" alt="'.api_convert_encoding(get_lang('HideAttemptView'),$lp_charset,$charset).'" title="'.api_convert_encoding(get_lang('HideAttemptView'),$lp_charset,$charset).'" border="0"></a>' . "\n";
				} else { //same case if fold_attempt_id is set, so not implemented explicitly
					//the extend button for this attempt has not been clicked
					$extend_attempt_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.api_convert_encoding(get_lang('ExtendAttemptView'),$lp_charset,$charset).'" title="'.api_convert_encoding(get_lang('ExtendAttemptView'),$lp_charset,$charset).'" border="0"></a>' . "\n";
				}
			}
	
			if (($counter % 2) == 0) {
				$oddclass = "row_odd";
			} else {
				$oddclass = "row_even";
			}
			//$extend_link = '<img src="../img/invisible.gif" alt="extend_disabled">';
			$extend_link = '';
			if ($inter_num > 1) {
				$extend_link = '<a href="' . api_get_self() . '?action=stats&extend_id=' . $my_item_id . '&extend_attempt_id=' . $row['iv_id'] . $url_suffix . '"><img src="../img/invisible.gif" alt="'.api_convert_encoding(get_lang('ExtendAttemptView'),$lp_charset,$charset).'" title="'.api_convert_encoding(get_lang('ExtendAttemptView'),$lp_charset,$charset).'"  border="0"></a>';
			}
			if (($counter % 2) == 0) {
				$oddclass = "row_odd";
			} else {
				$oddclass = "row_even";
			}
			$lesson_status = $row['mystatus'];
			$score = $row['myscore'];
			$subtotal_time = $row['mytime'];
			//if($row['mytime']==0){
			while ($tmp_row = Database :: fetch_array($result)) {
				$subtotal_time += $tmp_row['mytime'];
			}
			//}
			//$time_for_total = $subtotal_time;
			//$time = learnpathItem :: get_scorm_time('js', $subtotal_time);
			$scoIdentifier = $row['myid'];
			$title = $row['mytitle'];
			
			// selecting the exe_id from stats attempts tables in order to look the max score value
			if ($origin != 'tracking') {
				$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . api_get_user_id() . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" ORDER BY exe_date DESC limit 1';
			} else {
				$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" ORDER BY exe_date DESC limit 1';
			}
			
			$resultLastAttempt = api_sql_query($sql_last_attempt, __FILE__, __LINE__);
			$num = Database :: num_rows($resultLastAttempt);
			if ($num > 0) {
				while ($rowLA = Database :: fetch_array($resultLastAttempt)) {
					$id_last_attempt = $rowLA['exe_id'];
				}
			}
	
			if ($score == 0)
			{
				$maxscore = $row['mymaxscore'];
			}
			else 
			{
				if ($row['item_type'] == 'sco') 
				{
					if (!empty ($row['myviewmaxscore']) and $row['myviewmaxscore'] > 0) {
						$maxscore = $row['myviewmaxscore'];
					}
					elseif ($row['myviewmaxscore'] === '') {
						$maxscore = 0;
					} else {
						$maxscore = $row['mymaxscore'];
					}
				} 
				else
				{
					if ($row['item_type'] == 'quiz') 
					{
						// get score and total time from last attempt of a exercise en lp					
						$sql = "SELECT score FROM $TBL_LP_ITEM_VIEW WHERE lp_item_id = '".(int)$my_id."' and lp_view_id = '".(int)$my_lp_view_id."'
								ORDER BY view_count DESC limit 1";
						$res_score = api_sql_query($sql,__FILE__,__LINE__);
						$row_score = Database::fetch_array($res_score);
						
						$sql = "SELECT SUM(total_time) as total_time FROM $TBL_LP_ITEM_VIEW WHERE lp_item_id = '".(int)$my_id."' and lp_view_id = '".(int)$my_lp_view_id."'";
						$res_time = api_sql_query($sql,__FILE__,__LINE__);
						$row_time = Database::fetch_array($res_time);
						
						if (Database::num_rows($res_score) > 0 && Database::num_rows($res_time) > 0) { 
							$score = (float)$row_score['score'];
							$subtotal_time = (int)$row_time['total_time'];																
						} else {
							$score = 0;
							$subtotal_time =  0;
						}
							
						//$time = learnpathItem :: get_scorm_time('js', $subtotal_time);																				
						// selecting the max score from an attempt
						$sql = "SELECT SUM(t.ponderation) as maxscore from ( SELECT distinct question_id, marks,ponderation FROM $tbl_stats_attempts as at " .
							  "INNER JOIN  $tbl_quiz_questions as q  on(q.id = at.question_id) where exe_id ='$id_last_attempt' ) as t";
																	
						$result = api_sql_query($sql, __FILE__, __LINE__);
						$row_max_score = Database :: fetch_array($result);							
						$maxscore = $row_max_score['maxscore'];
					}
					else
					{
						$maxscore = $row['mymaxscore'];
					}
				}
			}
			$time_for_total = $subtotal_time;
			$time = learnpathItem :: get_scorm_time('js', $subtotal_time);			
			if (empty ($title)) {
				$title = rl_get_resource_name(api_get_course_id(), $lp_id, $row['myid']);
			}
			//Remove "NaN" if any (@todo: locate the source of these NaN)
			//$time = str_replace('NaN', '00'.$h.'00\'00"', $time);
	
			if (($lesson_status == 'completed') or ($lesson_status == 'passed')) {
				$color = 'green';
			} else {
				$color = 'black';
			}
			$mylanglist = array (
				'completed' => 'ScormCompstatus',
				'incomplete' => 'ScormIncomplete',
				'failed' => 'ScormFailed',
				'passed' => 'ScormPassed',
				'browsed' => 'ScormBrowsed',
				'not attempted' => 'ScormNotAttempted',
	
			);
			$my_lesson_status = api_convert_encoding(get_lang($mylanglist[$lesson_status]), $lp_charset, $dokeos_charset);
			
			if ($row['item_type'] != 'dokeos_chapter') {
				if ($row['item_type'] == 'quiz') {
					$correct_test_link = '';
					$my_url_suffix ='';
					if ($origin != 'tracking' && $origin != 'tracking_course') {
						$my_url_suffix = '&course=' . api_get_course_id() . '&student_id=' . api_get_user_id() . '&lp_id=' . Security::remove_XSS($row['mylpid']);
						$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . api_get_user_id() . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . $course_code . '" AND status <> "incomplete" ORDER BY exe_date DESC ';
					} else {
						$my_url_suffix = '&course=' . Security::remove_XSS($_GET['course']) . '&student_id=' . $student_id . '&lp_id=' . Security::remove_XSS($row['mylpid']).'&origin=' . Security::remove_XSS($_GET['origin']);
						$sql_last_attempt = 'SELECT * FROM ' . $tbl_stats_exercices . ' WHERE exe_exo_id="' . $row['path'] . '" AND exe_user_id="' . $student_id . '" AND orig_lp_id = "'.$lp_id.'" AND orig_lp_item_id = "'.$row['myid'].'" AND exe_cours_id="' . Database :: escape_string($_GET['course']) . '" AND status <> "incomplete"  ORDER BY exe_date DESC ';
					}
	
					$resultLastAttempt = api_sql_query($sql_last_attempt, __FILE__, __LINE__);
					$num = Database :: num_rows($resultLastAttempt);
					if ($num > 0) {																																							
						if (isset($_GET['extend_attempt']) && $_GET['extend_attempt'] == 1 && (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id)  ) {						
							$correct_test_link = '<a href="' . api_get_self() . '?action=stats' . $my_url_suffix . '&my_ext_lp_id='.$my_id.'"><img src="../img/view_less_stats.gif" alt="fold_view" border="0" title="'.api_convert_encoding(get_lang('HideAllAttempts'),$lp_charset,$charset).'"></a>';
							$extend_attempt = 1;
						} else {						
							$correct_test_link = '<a href="' . api_get_self() . '?action=stats&extend_attempt=1'.$my_url_suffix.'&my_lp_id='.$my_id.'"><img src="../img/view_more_stats.gif" alt="extend_view" border="0" title="'.api_convert_encoding(get_lang('ShowAllAttemptsByExercise'),$lp_charset,$charset).'"></a>';
						}
					} else {
						$correct_test_link = '-';
					}
				} else {
					$correct_test_link = '-';
				}
				
				//."<td><font color='$color'><div class='mystatus'>".htmlentities($array_status[$lesson_status],ENT_QUOTES,$lp_charset)."</div></font></td>\n"
				$title = Security::remove_XSS($title);
				if ( (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id ) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id)) {					
					$output .= "<tr class='$oddclass' >\n" . "<td>$extend_link</td>\n" . '<td colspan="4"><div class="mystatus">' .$title. '</div></td>' . "\n";				
					$output .= '<td colspan="2">&nbsp;</td><td colspan="2">&nbsp;</td><td colspan="2">&nbsp;</td><td>'.$correct_test_link.'</td></tr>';
					$output .= "</tr>\n";						 
				} else {
					if ( (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id ) && (isset($_GET['my_ext_lp_id']) && $_GET['my_ext_lp_id'] == $my_id)) {
						$output .= "<tr class='$oddclass' >\n"; 
					} else {
						$output .= "<tr class='$oddclass'>\n";	
					}
					$output .= "<td>$extend_link</td>\n" . '<td colspan="4"><div class="mystatus">' .$title. '</div></td>' . "\n";							
					$output .= '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . "</div></font></td>\n" . '<td colspan="2"><div class="mystatus" align="center">';			  
					 if ($row['item_type'] == 'quiz') {
					 	
					 	if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
							$output .=  '/';
						} else {						
							$output .= ($score == 0 ? '0/'.float_format($maxscore, 1) : ($maxscore == 0 ? $score : float_format($score, 1) . '/' . float_format($maxscore, 1)));	
						}
						
					 } else {
					    $output .= ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . $maxscore));	
					 }			 			  
					 $output .= "</div></td>\n" . '<td colspan="2"><div class="mystatus">' . $time . "</div></td><td>$correct_test_link</td>\n";
					 $output .= "</tr>\n";	
				}
				
				if (!empty($export_csv)) {
					$temp = array ();
					$temp[] = api_html_entity_decode($title, ENT_QUOTES, $lp_charset);
					$temp[] = api_html_entity_decode($my_lesson_status, ENT_QUOTES, $lp_charset);
					
					if ($row['item_type'] == 'quiz') {
						
						if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
							$temp[] =  '/';
						} else {
							$temp[] = ($score == 0 ? '0/'.$maxscore : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
						}
						
					} else {
						$temp[] = ($score == 0 ? '/' : ($maxscore == 0 ? $score : $score . '/' . float_format($maxscore, 1)));
					}
					
					$temp[] = $time;
					$csv_content[] = $temp;
				}
				
			}
			
			$counter++;
			
			if ($extend_this_attempt OR $extend_all) {
				$list1 = learnpath :: get_iv_interactions_array($row['iv_id']);
				foreach ($list1 as $id => $interaction) {
					if (($counter % 2) == 0) {
						$oddclass = "row_odd";
					} else {
						$oddclass = "row_even";
					}
					$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td>&nbsp;</td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td>' . $interaction['id'] . '</td>' . "\n"
					//."<td><font color='$color'><div class='mystatus'>"api_convert_encoding($array_status[$lesson_status],$lp_charset,$lp_charset)."</div></font></td>\n"
					 . '<td colspan="2">' . $interaction['type'] . "</td>\n"
					//.'<td>'.$interaction['correct_responses']."</td>\n"
					 . '<td>' . urldecode($interaction['student_response']) . "</td>\n" . '<td>' . $interaction['result'] . "</td>\n" . '<td>' . $interaction['latency'] . "</td>\n" . '<td>' . $interaction['time'] . "</td>\n<td></td>\n</tr>\n";
					$counter++;
				}
				$list2 = learnpath :: get_iv_objectives_array($row['iv_id']);
				foreach ($list2 as $id => $interaction) {
					if (($counter % 2) == 0) {
						$oddclass = "row_odd";
					} else {
						$oddclass = "row_even";
					}
					$output .= "<tr class='$oddclass'>\n" . '<td></td>' . "\n" . '<td></td>' . "\n" . '<td>&nbsp;</td>' . "\n" . '<td>' . $interaction['order_id'] . '</td>' . "\n" . '<td colspan="2">' . $interaction['objective_id'] . '</td>' . "\n" .
					'<td colspan="2">' . $interaction['status'] . "</td>\n" .
					'<td>' . $interaction['score_raw'] . "</td>\n" . '<td>' . $interaction['score_max'] . "</td>\n" . '<td>' . $interaction['score_min'] . "</td>\n<td></td>\n</tr>\n";
					$counter++;
				}
			}
																																									
			// attempts list by exercise 
			if ( (isset($_GET['lp_id']) && $_GET['lp_id'] == $my_lp_id ) && (isset($_GET['my_lp_id']) && $_GET['my_lp_id'] == $my_id)) {
	
					$res_attempts = api_sql_query($sql_attempts,__FILE__,__LINE__);
					$num_attempts = Database :: num_rows($res_attempts);																	
					if ($row['item_type'] === 'quiz') {									
						if ($num_attempts > 0) {					
							$n=1;										
							while ($row_attempts = Database :: fetch_array($res_attempts)) {
								$my_score = $row_attempts['exe_result'];
								$my_maxscore = $row_attempts['exe_weighting'];
								$my_exe_id	= $row_attempts['exe_id'];
								$my_orig_lp = $row_attempts['orig_lp_id'];
								$my_orig_lp_item = $row_attempts['orig_lp_item_id'];
								$my_exo_exe_id=$row_attempts['exe_exo_id'];												
								$mktime_start_date = convert_mysql_date($row_attempts['start_date']);
								$mktime_exe_date = convert_mysql_date($row_attempts['exe_date']);
								$mytime = ((int)$mktime_exe_date-(int)$mktime_start_date);					 
								$time_attemp = learnpathItem :: get_scorm_time('js', $mytime);
								$time_attemp = str_replace('NaN', '00' . $h . '00\'00"', $time_attemp);
								
								if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
									$view_score =  '-';
								} else {
									//show only float when need it
									$my_score  = float_format( $my_score, 1); 
									$my_maxscore =float_format($my_maxscore, 1);								 
									if ($my_score == 0 ){
										$view_score = 	'0/'.$my_maxscore;
									} else {
										if ($my_maxscore==0) 
											$view_score = $my_score;
										else 
											$view_score = $my_score . '/' . $my_maxscore;									
									}
									//$view_score = ($my_score == 0 ? '0.00/'.$my_maxscore : ($my_maxscore == 0 ? $my_score : $my_score . '/' . $my_maxscore));	
								}
																				
								$output .= '<tr class="'.$oddclass.'" ><td>&nbsp;</td><td>'.$extend_attempt_link.'</td><td colspan="3">' . api_convert_encoding(get_lang('Attempt'), $lp_charset, $dokeos_charset) . ' ' . $n . '</td>'				
							 			. '<td colspan="2"><font color="' . $color . '"><div class="mystatus">' . $my_lesson_status . '</div></font></td><td colspan="2"><div class="mystatus" align="center">' . $view_score  . '</div></td><td colspan="2"><div class="mystatus">' . $time_attemp . '</div></td>';
							 	if ($origin != 'tracking') {
							 		if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
										$output .= '<td><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz_na.gif" alt="'.api_convert_encoding(get_lang('ShowAttempt'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('ShowAttempt'), $lp_charset, $dokeos_charset).'"></td>';
									} else {
										$output .= '<td><a href="../exercice/exercise_show.php?origin=student_progress&myid='.$my_orig_lp.'&my_lp_id='.$my_orig_lp_item.'&id=' . $my_exe_id . '&cidReq=' . $course_code . '&student=' . $student_id . '" target="_parent"><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz.gif" alt="'.api_convert_encoding(get_lang('ShowAttempt'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('ShowAttempt'), $lp_charset, $dokeos_charset).'"></a></td>';	
									}
							 								
								} else {
									if (!api_is_allowed_to_edit() && $result_disabled_ext_all) {
										$output .= '<td><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz_na.gif" alt="'.api_convert_encoding(get_lang('ShowAndQualifyAttempt'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('ShowAndQualifyAttempt'), $lp_charset, $dokeos_charset).'"></td>';
									} else {
										$output .= '<td><a href="../exercice/exercise_show.php?origin=tracking_course&myid='.$my_orig_lp.'&my_lp_id='.$my_orig_lp_item.'&id=' . $my_exe_id . '&cidReq=' . $course_code . '&student=' . $student_id . '&total_time='.$mytime.'&my_exe_exo_id='.$my_exo_exe_id.' " target="_parent"><img src="' . api_get_path(WEB_IMG_PATH) . 'quiz.gif" alt="'.api_convert_encoding(get_lang('ShowAndQualifyAttempt'), $lp_charset, $dokeos_charset).'" title="'.api_convert_encoding(get_lang('ShowAndQualifyAttempt'), $lp_charset, $dokeos_charset).'"></a></td>';	
									}															
								}		 				 	        
							 	$output .= '</tr>';
								$n++;												
							}																								
						}
						$output .= '<tr><td colspan="12">&nbsp;</td></tr>';							
					}								
				}
		}
		
		$total_time += $time_for_total;
		//QUIZZ IN LP
		$a_my_id = array();	
		if (!empty($my_lp_id)) {
			$a_my_id[] = $my_lp_id;	
		}
	}
}

if (!empty($a_my_id)) {
	$my_studen_id = 0;
	$my_course_id = '';
	if ($origin == 'tracking') {
		$my_studen_id = $student_id;
		$my_course_id = Database::escape_string($_GET['course']);
	} else {
		$my_studen_id = intval(api_get_user_id());
		$my_course_id = Database::escape_string(api_get_course_id());
	}		
	$total_score = Tracking::get_avg_student_score($my_studen_id, $my_course_id, $a_my_id);			
} else {
	$total_score = 0;
}

$total_time = learnpathItem :: get_scorm_time('js', $total_time);
//$total_time = str_replace('NaN','00:00:00',$total_time);
$total_time = str_replace('NaN', '00' . $h . '00\'00"', $total_time);
$lp_type = learnpath :: get_type_static($lp_id);
$total_percent = 0;
$final_score = $total_score.'%';

if (($counter % 2) == 0) {
	$oddclass = "row_odd";
} else {
	$oddclass = "row_even";
}

if (empty($extend_all)) {
	$output .= "<tr class='$oddclass'>\n" . "<td></td>\n" . '<td colspan="4"><div class="mystatus"><i>' . api_convert_encoding(get_lang('AccomplishedStepsTotal') , $lp_charset, $dokeos_charset) . "</i></div></td>\n"
 			. '<td colspan="2"></td>' . "\n" . '<td colspan="2"><div class="mystatus" align="center">' . $final_score . "</div></td>\n" . '<td colspan="2"><div class="mystatus">' . $total_time . '</div></td><td></td>' . "\n" . "</tr>\n";		
}

$output .= "</table></td></tr></table>";

if (!empty($export_csv)) {
	$temp = array (
		'',
		'',
		'',
		''
	);
	$csv_content[] = $temp;
	$temp = array (
		api_convert_encoding(get_lang('AccomplishedStepsTotal') , $lp_charset, $dokeos_charset),
		'',
		$final_score,
		$total_time
	);
	$csv_content[] = $temp;
	ob_end_clean();
	Export :: export_table_csv($csv_content, 'reporting_learning_path_details');
}

if ($origin != 'tracking') {
	$output .= "</body></html>";
}

if (empty($export_csv)) {
	echo $output;
}
