chamilo-lms/main/tracking/exams.php

<?php
/* For licensing terms, see /license.txt */
/**
 * Exams script
 * @package chamilo.tracking
 */
/**
 * Code
 */

$language_file = array ('registration', 'index', 'tracking', 'exercice','survey');
require_once '../inc/global.inc.php';
require_once api_get_path(LIBRARY_PATH).'pear/Spreadsheet_Excel_Writer/Writer.php';

$this_section = SECTION_TRACKING;

$is_allowedToTrack = $is_courseAdmin || $is_platformAdmin || $is_courseCoach || $is_sessionAdmin;

if(!$is_allowedToTrack) {
	api_not_allowed();
}

$export_to_xls = false;
if (isset($_GET['export'])) {
	$export_to_xls = true;
}

$tbl_stats_exercices 	= Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_EXERCICES);

if (api_is_platform_admin() ) {
	$global = true;
} else {
	$global = false;
}

if ($global) {
	$temp_course_list = CourseManager :: get_courses_list();
	foreach($temp_course_list  as $temp_course_item) {
		$course_item = CourseManager ::get_course_information($temp_course_item['code']);
		$course_list[]= array(	'db_name' 	=> $course_item['db_name'],
								'code'		=> $course_item['code'],
								'real_id'	=> $course_item['real_id'],
								'title'		=> $course_item['title']);
	}
} else {
	$current_course['db_name'] 	= $_course['dbName'];
	$current_course['real_id'] 	= $_course['real_id'];
	$current_course['code'] 	= $_course['id'];
	$course_list = array($current_course);
}

$form = new FormValidator('search_simple','POST','','',null,false);
$form->addElement('text','score',get_lang('Percentage'));
if ($global) {
	$form->addElement('hidden','view','admin');
} else {
	//Get exam lists
	$t_quiz = Database::get_course_table(TABLE_QUIZ_TEST);
    $course_id = api_get_course_int_id();
	$sqlExercices = "	SELECT quiz.title,id FROM ".$t_quiz." AS quiz WHERE c_id = $course_id AND active='1' ORDER BY quiz.title ASC";
	$resultExercices = Database::query($sqlExercices);
	$exercise_list[0] = get_lang('All');
	while($a_exercices = Database::fetch_array($resultExercices)) {
		$exercise_list[$a_exercices['id']] = $a_exercices['title'];
	}

	$form->addElement('select', 'exercise_id', get_lang('Exercise'), $exercise_list);
}

//$form->addElement('submit','submit',get_lang('Filter'));
$form->addElement('style_submit_button','submit', get_lang('Filter'),'class="search"' );


if (!empty($_REQUEST['score']))	$filter_score = intval($_REQUEST['score']); else $filter_score = 70;
if (!empty($_REQUEST['exercise_id']))	$exercise_id = intval($_REQUEST['exercise_id']); else $exercise_id = 0;

$form->setDefaults(array('score'=>$filter_score));

if (!$export_to_xls) {
	Display :: display_header(get_lang('Reporting'));
	echo '<div class="actions">';
	if ($global) {

	    echo '<a href="'.api_get_path(WEB_CODE_PATH).'auth/my_progress.php">'.
        Display::return_icon('stats.png', get_lang('MyStats'),'',ICON_SIZE_MEDIUM);
        echo '</a>';

        echo '<span style="float:right">';
        echo '<a href="'.api_get_self().'?export=1&score='.$filter_score.'&exercise_id='.$exercise_id.'">'.Display::return_icon('export_excel.png',get_lang('ExportAsXLS'),'',ICON_SIZE_MEDIUM).'</a>';
        echo '<a href="javascript: void(0);" onclick="javascript: window.print()">'.Display::return_icon('printer.png',get_lang('Print'),'',ICON_SIZE_MEDIUM).'</a>';
        echo '</span>';

        $menu_items[] = Display::url(Display::return_icon('teacher.png', get_lang('TeacherInterface'), array(), 32), api_get_path(WEB_CODE_PATH).'mySpace/?view=teacher');
        if (api_is_platform_admin()) {
        	$menu_items[] = Display::url(Display::return_icon('star.png', get_lang('AdminInterface'), array(), 32), api_get_path(WEB_CODE_PATH).'mySpace/?view=admin');
        } else {
        	$menu_items[] = Display::url(Display::return_icon('star.png', get_lang('CoachInterface'), array(), 32), api_get_path(WEB_CODE_PATH).'mySpace/?view=coach');
        }
        $menu_items[] = Display::return_icon('quiz_na.png', get_lang('ExamTracking'), array(), 32);

		$nb_menu_items = count($menu_items);
		if($nb_menu_items>1) {
			foreach($menu_items as $key=> $item) {
				echo $item;
			}
		}
	} else {
	   echo '<a href="courseLog.php?'.api_get_cidreq().'&studentlist=true">'.get_lang('StudentsTracking').'</a>&nbsp;|
		     <a href="courseLog.php?'.api_get_cidreq().'&studentlist=false">'.get_lang('CourseTracking').'</a>&nbsp;|&nbsp';
       echo '<a href="courseLog.php?'.api_get_cidreq().'&studentlist=resources">'.get_lang('ResourcesTracking').'</a>';
		echo ' | '.get_lang('ExamTracking').'';
         echo '<a href="'.api_get_self().'?export=1&score='.$filter_score.'&exercise_id='.$exercise_id.'"><img align="absbottom" src="../img/excel.gif">&nbsp;'.get_lang('ExportAsXLS').'</a>';

	}
	echo '</div>';

	$form->display();
	echo '<h3>'.sprintf(get_lang('FilteringWithScoreX'), $filter_score).'%</h3>';
}

if ($global) {
	$html_result .= '<table  class="data_table">';
	$html_result .= '<tr><th>'.get_lang('Courses').'</th>';
	$html_result .= '<th>'.get_lang('Quiz').'</th>';
	$html_result .= '<th>'.get_lang('ExamTaken').'</th>';
	$html_result .= '<th>'.get_lang('ExamNotTaken').'</th>';
	$html_result .= '<th>'.sprintf(get_lang('ExamPassX'), $filter_score).'%</th>';
	$html_result .= '<th>'.get_lang('ExamFail').'</th>';
	$html_result .= '<th>'.get_lang('TotalStudents').'</th>';
	$html_result .= '</tr>';
} else {
	$html_result .= '<table  class="data_table">';
	$html_result .= '<tr><th>'.get_lang('Quiz').'</th>';
	$html_result .= '<th>'.get_lang('User').'</th>';
	//$html_result .= '<th>'.sprintf(get_lang('ExamPassX'), $filter_score).'</th>';
	$html_result .= '<th>'.get_lang('Percentage').' %</th>';
	$html_result .= '<th>'.get_lang('Status').'</th>';
	$html_result .= '<th>'.get_lang('Attempts').'</th>';
	$html_result .= '</tr>';
}
$table = Database::get_course_table(TABLE_TOOL_LIST);
$t_quiz = Database::get_course_table(TABLE_QUIZ_TEST);

$export_array_global = $export_array =  array();
if(!empty($course_list) && is_array($course_list))
foreach ($course_list as $current_course) {
	$global_row = $row_not_global = array();
    $course_id = $current_course['real_id'];

	$a_students = CourseManager :: get_student_list_from_course_code($current_course['code'], false);
	$total_students = count($a_students);

	$sqlExercices		= "SELECT count(id) as count FROM ".$t_quiz." AS quiz WHERE active='1' AND c_id = $course_id ";
	$resultExercices 	= Database::query($sqlExercices);
	$data_exercises  	= Database::store_result($resultExercices);
	$exercise_count 	= $data_exercises[0]['count'];
	if ($global) {
        if ($exercise_count == 0) {
        	$exercise_count = 2;
        }
		$html_result .= "<tr class='$s_css_class'>
							<td rowspan=$exercise_count>";
		$html_result .= $current_course['title'];
		$html_result .= "</td>";
	}

	$sql = "SELECT visibility FROM $table WHERE c_id = $course_id AND name='quiz'";
	$resultVisibilityQuizz = Database::query($sql);

	if (Database::result($resultVisibilityQuizz, 0 ,'visibility') == 1) {
		$sqlExercices = "	SELECT quiz.title,id FROM ".$t_quiz." AS quiz WHERE c_id = $course_id  AND active='1' ORDER BY quiz.title ASC";
		//Getting the exam list
		if (!$global) {
			if (!empty($exercise_id)) {
				$sqlExercices = "	SELECT quiz.title,id FROM ".$t_quiz." AS quiz WHERE c_id = $course_id  AND active='1' AND id = $exercise_id ORDER BY quiz.title ASC";
			}
		}
		$resultExercices = Database::query($sqlExercices);
		$i = 0;
		if (Database::num_rows($resultExercices) > 0) {
			while($a_exercices = Database::fetch_array($resultExercices)) {
				$global_row[]= $current_course['title'];
				if (!$global) {
					$html_result .= "<tr class='$s_css_class'>";
				}
				if (!$global) {
					$html_result .= '<td ROWSPAN="'.$total_students.'">';
				} else {
					$html_result .= '<td>';
				}

				$html_result .= $a_exercices['title'];
				$html_result .= '</td>';

				$global_row[]=$a_exercices['title'];
				$row_not_global['exercise']= $a_exercices['title'];

				$taken = 0;
				$total_with_parameter = 0;
				$fail = 0;
				$not_taken = 0;

				$total_with_parameter_score = 0;
				$total_with_parameter_porcentage = 0;

				$student_result = array();

				foreach ($a_students as $student ) {
					$current_student_id = $student['user_id'];
					$sqlEssais = "	SELECT COUNT(ex.exe_id) as essais
									FROM $tbl_stats_exercices AS ex
									WHERE  ex.exe_cours_id = '".$current_course['code']."'
									AND ex.exe_exo_id = ".$a_exercices['id']."
									AND exe_user_id='".$current_student_id."'";


					$resultEssais = Database::query($sqlEssais);
					$a_essais = Database::fetch_array($resultEssais);

					$sqlScore = "SELECT exe_id, exe_result,exe_weighting
							 FROM $tbl_stats_exercices
							 WHERE exe_user_id = ".$current_student_id."
							 AND exe_cours_id = '".$current_course['code']."'
							 AND exe_exo_id = ".$a_exercices['id']."
							 ORDER BY exe_result DESC LIMIT 1"; // we take the higher value
							 //ORDER BY exe_date DESC LIMIT 1";

					$resultScore = Database::query($sqlScore);
					$score = 0;

					while($a_score = Database::fetch_array($resultScore)) {
						$score = $score + $a_score['exe_result'];
						$weighting = $weighting + $a_score['exe_weighting'];
						$exe_id = $a_score['exe_id'];
					}

					$pourcentageScore = 0;
					if ($weighting!=0) {
						$pourcentageScore = round(($score*100)/$weighting);
					}

					$weighting = 0;

					if($i%2==0){
						$s_css_class="row_odd";
					} else {
						$s_css_class="row_even";
					}
					$i++;

					/*echo "	<td align='right'>
						  ";
					echo 		$current_student_id.' ';
					echo "	</td>";
					*/

					//var_dump($pourcentageScore);
			/*		echo "	<td align='right'>
						  ";
					echo 		$pourcentageScore.' %';
					echo "	</td>";

					echo "<td align='right'>
						 ";
						 /*
					echo 		$a_essais['essais'];
					echo "	</td>
							<td align='center'>
						 ";*/

					if ($a_essais['essais'] > 0 ) {
						$taken++;
					}

					if ($pourcentageScore >= $parameter_porcentage) {
						$total_with_parameter_porcentage++;
					}

					if ($pourcentageScore >= $filter_score) {
						$total_with_parameter_score++;
					}

					if (!$global) {
						$user_info = api_get_user_info($current_student_id);

						//User
						$user_row = '<td >';
						$user_row .= 		$user_info['firstName'].' '.$user_info['lastName'];
						$user_row .= '</td>';
						$user_info = $user_info['firstName'].' '.$user_info['lastName'];

						//Best result
						if (!empty($a_essais['essais'])) {
							$user_row .= '<td  >';
							$user_row .= 		$pourcentageScore;
							$temp_array [] = 		$pourcentageScore;
							$user_row .= '</td>';

							if ($pourcentageScore >= $filter_score ) {
								$user_row .= '<td  style="background-color:#DFFFA8">';
								$user_row .= get_lang('PassExam').'</td>';
								$temp_array [] = 		get_lang('PassExam');
							} else {
								$user_row .= '<td  style="background-color:#FC9A9E"  >';
								$user_row .= get_lang('ExamFail').'</td>';
								$temp_array [] = 		get_lang('ExamFail');
							}

							$user_row .= '<td >';
							$user_row .= $a_essais['essais'];
							$temp_array [] = 		$a_essais['essais'];
							$user_row .= '</td>';
						} else {
							$score = '-';
							$user_row .= '<td  >';
							$user_row .=  '-';
							$temp_array [] = 		'-';
							$user_row .= '</td>';

							$user_row .= '<td   style="background-color:#FCE89A">';
							$user_row .= get_lang('NoAttempt');
							$temp_array [] = 	get_lang('NoAttempt');
							$user_row .= '</td>';
							$user_row .= '<td >';
							$user_row .= 0;
							$temp_array [] = 0;
							$user_row .= '</td>';
						}
						$user_row .= '</tr>';
						$student_result[$current_student_id]  = array('html'=>$user_row,'score'=>$score,'array'=>$temp_array,'user'=>$user_info);
						$temp_array = array();
					}
				}

				if (!$global) {
					if (!empty($student_result)) {
						$student_result_empty = $student_result_content = array();
						foreach($student_result as $row) {
							if ($row['score'] == '-') {
								$student_result_empty[] = $row;
							} else {
								$student_result_content[] = $row;
							}
						}
						//Sort only users with content
						usort($student_result_content, 'sort_user');
						$student_result = array_merge($student_result_content, $student_result_empty );

						foreach($student_result as $row) {
							$html_result .=$row['html'];
							$row_not_global['results'][]= $row['array'];
                            $row_not_global['users'][]   = $row['user'];
						}
						$export_array[] = $row_not_global;
						$row_not_global = array();
					}
				}
				if ($global) {
					//Exam taken
					$html_result .= '<td >';
					$html_result .= 		$taken;
					$global_row[]= $taken;
					//echo 		$total.' /  '.$total_students;
					$html_result .= '</td>';

					//Exam NOT taken
					$html_result .= '<td >';
					$html_result .= 		$not_taken = $total_students - $taken;
					$global_row[]= $not_taken;
					$html_result .= '</td>';

					//Examn pass
					if (!empty($total_with_parameter_score)) {
						$html_result .= '<td   style="background-color:#DFFFA8" >';
					} else {
						$html_result .= '<td   style="background-color:#FCE89A"  >';
					}

					$html_result .= $total_with_parameter_score;
					$global_row[]= $total_with_parameter_score;
					$html_result .= '</td>';

					//Exam fail
					$html_result .= '<td >';

					$html_result .= 		$fail = $taken - $total_with_parameter_score;
					$global_row[]= $fail;
					$html_result .= '</td>';

					$html_result .= '<td >';
					$html_result .= 		$total_students;
					$global_row[]= $total_students;

					$global_counter++;
					$html_result .= '</td>';
					$html_result .= '</tr>';
					$export_array_global[] = $global_row;
					$global_row = array();
				}
			}
		} else {
			$html_result .= "	<tr>
						<td colspan='6'>
							".get_lang('NoExercise')."
						</td>
					</tr>
				 ";
		}
	} else {
		$html_result .= "	<tr>
					<td colspan='6'>
						".get_lang('NoExercise')."
					</td>
				</tr>
			 ";
	}
}

$html_result .= '</table>';

if (!$export_to_xls) {
	echo $html_result;
}
$filename = 'exam-reporting-'.date('Y-m-d-h:i:s').'.xls';
if ($export_to_xls) {
	if ($global) {
		export_complete_report_xls($filename, $export_array_global);
	} else {
		export_complete_report_xls($filename, $export_array);
	}
	exit;
}

function sort_user($a, $b) {
	if (is_numeric($a['score']) && is_numeric($b['score'])) {
		//echo $a['score'].' : '.$b['score']; echo '<br />';
		if ($a['score'] < $b['score']) {
			return 1;
		}
		return 0;
	}
	return 1;
}

function export_complete_report_xls($filename, $array) {
		global $charset, $global, $filter_score;
		$workbook = new Spreadsheet_Excel_Writer();
		$workbook ->setTempDir(api_get_path(SYS_ARCHIVE_PATH));
		$workbook->send($filename);
		$workbook->setVersion(8); // BIFF8
		$worksheet =& $workbook->addWorksheet('Report');
		//$worksheet->setInputEncoding(api_get_system_encoding());
		$worksheet->setInputEncoding($charset);

		$line = 0;
		$column = 0; //skip the first column (row titles)

		if ($global) {
			$worksheet->write($line,$column,get_lang('Courses'));
			$column++;
			$worksheet->write($line,$column,get_lang('Exercises'));
			$column++;
			$worksheet->write($line,$column,get_lang('ExamTaken'));
			$column++;
			$worksheet->write($line,$column,get_lang('ExamNotTaken'));
			$column++;
			$worksheet->write($line,$column,sprintf(get_lang('ExamPassX'), $filter_score).'%');
			$column++;
			$worksheet->write($line,$column,get_lang('ExamFail'));
			$column++;
			$worksheet->write($line,$column,get_lang('TotalStudents'));
			$column++;
			$line++;
			foreach ($array as $row) {
				$column = 0;
				foreach ($row as $item) {
					$worksheet->write($line,$column,html_entity_decode(strip_tags($item)));
					$column++;
				}
				$line++;
			}
			$line++;
		} else {
			$worksheet->write($line,$column,get_lang('Exercises'));
			$column++;
			$worksheet->write($line,$column,get_lang('User'));
			$column++;
			$worksheet->write($line,$column,get_lang('Percentage'));
			$column++;
			$worksheet->write($line,$column,get_lang('Status'));
			$column++;
			$worksheet->write($line,$column,get_lang('Attempts'));
			$column++;
			$line++;
			foreach ($array as $row) {
				$column = 0;
				$worksheet->write($line,$column,html_entity_decode(strip_tags($row['exercise'])));
				$column++;
				foreach ($row['users'] as $key=>$user) {
					$column = 1;
					$worksheet->write($line,$column,html_entity_decode(strip_tags($user)));
					$column++;
					foreach ($row['results'][$key] as $result_item) {
						$worksheet->write($line,$column,html_entity_decode(strip_tags($result_item)));
						$column++;
					}
					$line++;
				}
			}
			$line++;
		}
		$workbook->close();
		exit;
}
Display :: display_footer();