|
|
|
<?php
|
|
|
|
/* For licensing terms, see /license.txt */
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Class HotpotatoesExerciseResult
|
|
|
|
* Allows you to export exercises results in multiple presentation forms
|
|
|
|
* @package chamilo.exercise
|
|
|
|
*/
|
|
|
|
class HotpotatoesExerciseResult
|
|
|
|
{
|
|
|
|
//stores the list of exercises
|
|
|
|
private $exercises_list = [];
|
|
|
|
|
|
|
|
//stores the results
|
|
|
|
private $results = [];
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Gets the results of all students (or just one student if access is limited)
|
|
|
|
* @param string The document path (for HotPotatoes retrieval)
|
|
|
|
* @param integer User ID. Optional. If no user ID is provided, we take all the results. Defauts to null
|
|
|
|
* @param string $document_path
|
|
|
|
* @return bool
|
|
|
|
*/
|
|
|
|
public function getExercisesReporting($document_path, $hotpotato_name)
|
|
|
|
{
|
|
|
|
$return = [];
|
|
|
|
$TBL_USER = Database::get_main_table(TABLE_MAIN_USER);
|
|
|
|
$TBL_TRACK_HOTPOTATOES = Database::get_main_table(TABLE_STATISTIC_TRACK_E_HOTPOTATOES);
|
|
|
|
|
|
|
|
$cid = api_get_course_id();
|
|
|
|
$course_id = api_get_course_int_id();
|
|
|
|
//$user_id = intval($user_id);
|
|
|
|
$user_id = null;
|
|
|
|
$session_id_and = ' AND te.session_id = '.api_get_session_id().' ';
|
|
|
|
$hotpotato_name = Database::escape_string($hotpotato_name);
|
|
|
|
|
|
|
|
if (!empty($exercise_id)) {
|
|
|
|
$session_id_and .= " AND exe_exo_id = $exercise_id ";
|
|
|
|
}
|
|
|
|
|
|
|
|
if (empty($user_id)) {
|
|
|
|
$sql = "SELECT firstname as userpart1, lastname as userpart2 ,
|
|
|
|
email,
|
|
|
|
tth.exe_name,
|
|
|
|
tth.exe_result,
|
|
|
|
tth.exe_weighting,
|
|
|
|
tth.exe_date
|
|
|
|
FROM $TBL_TRACK_HOTPOTATOES tth, $TBL_USER tu
|
|
|
|
WHERE tu.user_id=tth.exe_user_id AND
|
|
|
|
tth.c_id = $course_id AND
|
|
|
|
tth.exe_name = '$hotpotato_name'
|
|
|
|
ORDER BY tth.c_id ASC, tth.exe_date ASC";
|
|
|
|
} else {
|
|
|
|
// get only this user's results
|
|
|
|
$sql = "SELECT '', exe_name, exe_result , exe_weighting, exe_date
|
|
|
|
FROM $TBL_TRACK_HOTPOTATOES
|
|
|
|
WHERE
|
|
|
|
exe_user_id = '".$user_id."' AND
|
|
|
|
c_id = $course_id AND
|
|
|
|
tth.exe_name = '$hotpotato_name'
|
|
|
|
ORDER BY c_id ASC, exe_date ASC";
|
|
|
|
}
|
|
|
|
|
|
|
|
$results = [];
|
|
|
|
|
|
|
|
$resx = Database::query($sql);
|
|
|
|
while ($rowx = Database::fetch_array($resx, 'ASSOC')) {
|
|
|
|
$results[] = $rowx;
|
|
|
|
}
|
|
|
|
|
|
|
|
$hpresults = [];
|
|
|
|
$resx = Database::query($sql);
|
|
|
|
while ($rowx = Database::fetch_array($resx, 'ASSOC')) {
|
|
|
|
$hpresults[] = $rowx;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Print the Result of Hotpotatoes Tests
|
|
|
|
if (is_array($hpresults)) {
|
|
|
|
for ($i = 0; $i < sizeof($hpresults); $i++) {
|
|
|
|
$return[$i] = [];
|
|
|
|
$title = GetQuizName($hpresults[$i]['exe_name'], $document_path);
|
|
|
|
if ($title == '') {
|
|
|
|
$title = basename($hpresults[$i]['exe_name']);
|
|
|
|
}
|
|
|
|
if (empty($user_id)) {
|
|
|
|
$return[$i]['email'] = $hpresults[$i]['email'];
|
|
|
|
$return[$i]['first_name'] = $hpresults[$i]['userpart1'];
|
|
|
|
$return[$i]['last_name'] = $hpresults[$i]['userpart2'];
|
|
|
|
}
|
|
|
|
$return[$i]['title'] = $title;
|
|
|
|
$return[$i]['exe_date'] = $hpresults[$i]['exe_date'];
|
|
|
|
|
|
|
|
$return[$i]['result'] = $hpresults[$i]['exe_result'];
|
|
|
|
$return[$i]['max'] = $hpresults[$i]['exe_weighting'];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
$this->results = $return;
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Exports the complete report as a CSV file
|
|
|
|
* @param string $document_path Document path inside the document tool
|
|
|
|
* @param string $hotpotato_name
|
|
|
|
|
|
|
|
* @return boolean False on error
|
|
|
|
*/
|
|
|
|
public function exportCompleteReportCSV($document_path = '', $hotpotato_name = '')
|
|
|
|
{
|
|
|
|
global $charset;
|
|
|
|
$this->getExercisesReporting($document_path, $hotpotato_name);
|
|
|
|
$filename = 'exercise_results_'.date('YmdGis').'.csv';
|
|
|
|
if (!empty($user_id)) {
|
|
|
|
$filename = 'exercise_results_user_'.$user_id.'_'.date('YmdGis').'.csv';
|
|
|
|
}
|
|
|
|
$data = '';
|
|
|
|
|
|
|
|
if (api_is_western_name_order()) {
|
|
|
|
if (!empty($this->results[0]['first_name'])) {
|
|
|
|
$data .= get_lang('FirstName').';';
|
|
|
|
}
|
|
|
|
if (!empty($this->results[0]['last_name'])) {
|
|
|
|
$data .= get_lang('LastName').';';
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
if (!empty($this->results[0]['last_name'])) {
|
|
|
|
$data .= get_lang('LastName').';';
|
|
|
|
}
|
|
|
|
if (!empty($this->results[0]['first_name'])) {
|
|
|
|
$data .= get_lang('FirstName').';';
|
|
|
|
}
|
|
|
|
}
|
|
|
|
$data .= get_lang('Email').';';
|
|
|
|
$data .= get_lang('Title').';';
|
|
|
|
$data .= get_lang('StartDate').';';
|
|
|
|
$data .= get_lang('Score').';';
|
|
|
|
$data .= get_lang('Total').';';
|
|
|
|
$data .= "\n";
|
|
|
|
|
|
|
|
// Results
|
|
|
|
foreach ($this->results as $row) {
|
|
|
|
if (api_is_western_name_order()) {
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['first_name']), ENT_QUOTES, $charset)).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['last_name']), ENT_QUOTES, $charset)).';';
|
|
|
|
} else {
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['last_name']), ENT_QUOTES, $charset)).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['first_name']), ENT_QUOTES, $charset)).';';
|
|
|
|
}
|
|
|
|
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['email']), ENT_QUOTES, $charset)).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', api_html_entity_decode(strip_tags($row['title']), ENT_QUOTES, $charset)).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', $row['exe_date']).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', $row['result']).';';
|
|
|
|
$data .= str_replace("\r\n", ' ', $row['max']).';';
|
|
|
|
$data .= "\n";
|
|
|
|
}
|
|
|
|
|
|
|
|
//output the results
|
|
|
|
$len = strlen($data);
|
|
|
|
header('Content-type: application/octet-stream');
|
|
|
|
header('Content-Type: application/force-download');
|
|
|
|
header('Content-length: '.$len);
|
|
|
|
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');
|
|
|
|
// @todo add this utf-8 header for all csv files
|
|
|
|
echo "\xEF\xBB\xBF"; // force utf-8 header of csv file
|
|
|
|
echo $data;
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Exports the complete report as an XLS file
|
|
|
|
* @param string $document_path
|
|
|
|
* @param null $user_id
|
|
|
|
* @param bool $export_user_fields
|
|
|
|
* @param int $export_filter
|
|
|
|
* @param int $exercise_id
|
|
|
|
* @param null $hotpotato_name
|
|
|
|
* @return bool
|
|
|
|
*/
|
|
|
|
public function exportCompleteReportXLS(
|
|
|
|
$document_path = '',
|
|
|
|
$user_id = null,
|
|
|
|
$export_user_fields = false,
|
|
|
|
$export_filter = 0,
|
|
|
|
$exercise_id = 0,
|
|
|
|
$hotpotato_name = null
|
|
|
|
) {
|
|
|
|
global $charset;
|
|
|
|
$this->getExercisesReporting(
|
|
|
|
$document_path,
|
|
|
|
$user_id,
|
|
|
|
$export_filter,
|
|
|
|
$exercise_id,
|
|
|
|
$hotpotato_name
|
|
|
|
);
|
|
|
|
$filename = 'exercise_results_'.api_get_local_time().'.xls';
|
|
|
|
if (!empty($user_id)) {
|
|
|
|
$filename = 'exercise_results_user_'.$user_id.'_'.api_get_local_time().'.xls';
|
|
|
|
}
|
|
|
|
|
|
|
|
$spreadsheet = new PHPExcel();
|
|
|
|
$spreadsheet->setActiveSheetIndex(0);
|
|
|
|
$worksheet = $spreadsheet->getActiveSheet();
|
|
|
|
|
|
|
|
$line = 0;
|
|
|
|
$column = 0; //skip the first column (row titles)
|
|
|
|
|
|
|
|
// check if exists column 'user'
|
|
|
|
$with_column_user = false;
|
|
|
|
foreach ($this->results as $result) {
|
|
|
|
if (!empty($result['last_name']) && !empty($result['first_name'])) {
|
|
|
|
$with_column_user = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($with_column_user) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Email')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
if (api_is_western_name_order()) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('FirstName')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('LastName')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
} else {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('LastName')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('FirstName')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($export_user_fields) {
|
|
|
|
//show user fields section with a big th colspan that spans over all fields
|
|
|
|
$extra_user_fields = UserManager::get_extra_fields(
|
|
|
|
0,
|
|
|
|
1000,
|
|
|
|
5,
|
|
|
|
'ASC',
|
|
|
|
false,
|
|
|
|
1
|
|
|
|
);
|
|
|
|
|
|
|
|
//show the fields names for user fields
|
|
|
|
foreach ($extra_user_fields as $field) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($field[3]),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Title')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('StartDate')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('EndDate')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Duration').' ('.get_lang('MinMinutes').')'
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Score')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Total')
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
get_lang('Status')
|
|
|
|
);
|
|
|
|
$line++;
|
|
|
|
|
|
|
|
foreach ($this->results as $row) {
|
|
|
|
$column = 0;
|
|
|
|
|
|
|
|
if ($with_column_user) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($row['email']),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
|
|
|
|
if (api_is_western_name_order()) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($row['first_name']),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($row['last_name']),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
} else {
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($row['last_name']),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow(
|
|
|
|
$column,
|
|
|
|
$line,
|
|
|
|
api_html_entity_decode(
|
|
|
|
strip_tags($row['first_name']),
|
|
|
|
ENT_QUOTES,
|
|
|
|
$charset
|
|
|
|
)
|
|
|
|
);
|
|
|
|
$column++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($export_user_fields) {
|
|
|
|
//show user fields data, if any, for this user
|
|
|
|
$user_fields_values = UserManager::get_extra_user_data(
|
|
|
|
$row['user_id'],
|
|
|
|
false,
|
|
|
|
false,
|
|
|
|
false,
|
|
|
|
true
|
|
|
|
);
|
|
|
|
foreach ($user_fields_values as $value) {
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, api_html_entity_decode(strip_tags($value), ENT_QUOTES, $charset));
|
|
|
|
$column++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, api_html_entity_decode(strip_tags($row['title']), ENT_QUOTES, $charset));
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['start_date']);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['end_date']);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['duration']);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['result']);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['max']);
|
|
|
|
$column++;
|
|
|
|
$worksheet->setCellValueByColumnAndRow($column, $line, $row['status']);
|
|
|
|
$line++;
|
|
|
|
}
|
|
|
|
|
|
|
|
$file = api_get_path(SYS_ARCHIVE_PATH).api_replace_dangerous_char($filename);
|
|
|
|
$writer = new PHPExcel_Writer_Excel2007($spreadsheet);
|
|
|
|
$writer->save($file);
|
|
|
|
DocumentManager::file_send_for_download($file, true, $filename);
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
}
|