Chamilo is a learning management system focused on ease of use and accessibility
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 
chamilo-lms/main/gradebook/gradebook_view_result.php

511 lines
18 KiB

<?php // $Id: $
/*
==============================================================================
Dokeos - elearning and course management software
Copyright (c) 2008 Dokeos Latinoamerica SAC
Copyright (c) 2006 Dokeos SPRL
Copyright (c) 2006 Ghent University (UGent)
Copyright (c) various contributors
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
==============================================================================
*/
$language_file[] = 'gradebook';
//$cidReset= true;
require_once ('../inc/global.inc.php');
require_once ('lib/be.inc.php');
require_once ('lib/gradebook_functions.inc.php');
require_once ('lib/fe/displaygradebook.php');
require_once ('lib/fe/evalform.class.php');
require_once ('lib/fe/dataform.class.php');
require_once (api_get_path(LIBRARY_PATH) . 'fileManage.lib.php');
require_once (api_get_path(LIBRARY_PATH) . 'export.lib.inc.php');
require_once (api_get_path(LIBRARY_PATH) . 'import.lib.php');
require_once ('lib/results_data_generator.class.php');
require_once ('lib/fe/resulttable.class.php');
require_once ('lib/fe/exportgradebook.php');
require_once ('lib/scoredisplay.class.php');
require_once (api_get_path(LIBRARY_PATH).'ezpdf/class.ezpdf.php');
api_block_anonymous_users();
block_students();
$interbreadcrumb[]= array (
'url' => $_SESSION['gradebook_dest'],
'name' => get_lang('Gradebook'
));
//load the evaluation & category
$select_eval=Security::remove_XSS($_GET['selecteval']);
if (empty($select_eval)) {
api_not_allowed();
}
$displayscore = Scoredisplay :: instance();
$eval= Evaluation :: load($select_eval);
$overwritescore= 0;
if ($eval[0]->get_category_id() < 0) {
// if category id is negative, then the evaluation's origin is a link
$link= LinkFactory :: get_evaluation_link($eval[0]->get_id());
$currentcat= Category :: load($link->get_category_id());
} else
$currentcat= Category :: load($eval[0]->get_category_id());
//load the result with the evaluation id
function overwritescore($resid, $importscore, $eval_max) {
$result= Result :: load($resid);
if ($importscore > $eval_max) {
header('Location: gradebook_view_result.php?selecteval=' .Security::remove_XSS($_GET['selecteval']) . '&overwritemax=');
exit;
}
$result[0]->set_score($importscore);
$result[0]->save();
unset ($result);
}
if (isset ($_GET['selecteval'])) {
$allresults= Result :: load(null,null,$select_eval);
$iscourse= $currentcat[0]->get_course_code() == null ? 1 : 0;
}
/**
* XML-parser: handle start of element
*/
function element_start($parser, $data) {
global $user;
global $current_tag;
switch ($data) {
case 'Result' :
$user= array ();
break;
default :
$current_tag= $data;
}
}
/**
* XML-parser: handle end of element
*/
function element_end($parser, $data) {
global $user;
global $users;
global $current_value;
switch ($data) {
case 'Result' :
$users[]= $user;
break;
default :
$user[$data]= $current_value;
break;
}
}
/**
* XML-parser: handle character data
*/
function character_data($parser, $data) {
global $current_value;
$current_value= $data;
}
/**
* Read the XML-file
* @param string $file Path to the XML-file
* @return array All userinformation read from the file
*/
function parse_xml_data($file) {
global $current_tag;
global $current_value;
global $user;
global $users;
$users= array ();
$parser= xml_parser_create();
xml_set_element_handler($parser, 'element_start', 'element_end');
xml_set_character_data_handler($parser, "character_data");
xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, false);
xml_parse($parser, file_get_contents($file));
xml_parser_free($parser);
return $users;
}
if (isset ($_GET['editres'])) {
$edit_res_xml=Security::remove_XSS($_GET['editres']);
$select_eval_edit=Security::remove_XSS($_GET['selecteval']);
$resultedit= Result :: load($edit_res_xml);
$edit_res_form= new EvalForm(EvalForm :: TYPE_RESULT_EDIT, $eval[0], $resultedit[0], 'edit_result_form', null, api_get_self() . '?editres=' . $resultedit[0]->get_id() . '&selecteval=' .$select_eval_edit);
if ($edit_res_form->validate()) {
$values= $edit_res_form->exportValues();
$result= new Result();
$resultlog=new Result();
$resultlog->add_result__log($values['hid_user_id'],$select_eval_edit);
$result->set_id($edit_res_xml);
$result->set_user_id($values['hid_user_id']);
$result->set_evaluation_id($select_eval_edit);
$row_value=isset($values['score']) ? (int)$values['score'] : 0 ;
if ((!empty ($row_value)) || ($row_value == 0)) {
$result->set_score($row_value);
}
$result->save();
unset ($result);
header('Location: gradebook_view_result.php?selecteval=' . $select_eval_edit . '&editresmessage=');
exit;
}
}
if (isset ($_GET['import'])) {
$interbreadcrumb[]= array (
'url' => 'gradebook_view_result.php?selecteval=' . Security::remove_XSS($_GET['selecteval']),
'name' => get_lang('ViewResult'
));
$import_result_form = new DataForm(DataForm :: TYPE_IMPORT, 'import_result_form', null, api_get_self() . '?import=&selecteval=' . $_GET['selecteval']);
if (!$import_result_form->validate()) {
Display :: display_header(get_lang('Import'));
}
if ($_POST['formSent'] ) {
if (!empty ($_FILES['import_file']['name'])) {
$values= $import_result_form->exportValues();
$file_type= $_POST['file_type'];
$file_name= $_FILES['import_file']['tmp_name'];
if ($file_type == 'csv') {
$results= Import :: csv_to_array($file_name);
} else {
$results= parse_xml_data($file_name);
}
$nr_results_added= 0;
foreach ($results as $index => $importedresult) {
//check username & score
$added= '0';
foreach ($allresults as $allresult) {
if (($importedresult['user_id'] == $allresult->get_user_id())) {
if ($importedresult['score'] != $allresult->get_score()) {
if (!isset ($values['overwrite'])) {
header('Location: gradebook_view_result.php?selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&import_score_error=' . $importedresult['user_id']);
exit;
break;
} else {
overwritescore($allresult->get_id(), $importedresult['score'], $eval[0]->get_max());
$overwritescore++;
$added= '1';
}
} else {
$added= '1';
}
}
}
if ($importedresult['user_id'] == null) {
header('Location: gradebook_view_result.php?selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&incorrectdata=');
exit;
}
$userinfo= get_user_info_from_id($importedresult['user_id']);
if ($userinfo['lastname'] != $importedresult['lastname'] || $userinfo['firstname'] != $importedresult['firstname'] || $userinfo['official_code'] != $importedresult['official_code']) {
if (!isset ($values['ignoreerrors'])) {
header('Location: gradebook_view_result.php?selecteval=' .Security::remove_XSS($_GET['selecteval']) . '&import_user_error=' . $importedresult['user_id']);
exit;
}
}
if ($added != '1') {
if ($importedresult['score'] > $eval[0]->get_max()) {
header('Location: gradebook_view_result.php?selecteval=' .Security::remove_XSS($_GET['selecteval']) . '&overwritemax=');
exit;
}
$result= new Result();
$result->set_user_id($importedresult['user_id']);
if (!empty ($importedresult['score'])) {
$result->set_score($importedresult['score']);
}
if (!empty ($importedresult['date'])) {
$result->set_date(strtotime($importedresult['date']));
} else {
$result->set_date(time());
}
$result->set_evaluation_id($_GET['selecteval']);
$result->add();
$nr_results_added++;
}
}
} else {
header('Location: ' . api_get_self() . '?import=&selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&importnofile=');
exit;
}
if ($overwritescore != 0) {
header('Location: ' . api_get_self() . '?selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&importoverwritescore=' . $overwritescore);
exit;
}
if ($nr_results_added == 0) {
header('Location: ' . api_get_self() . '?selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&nothingadded=');
exit;
}
header('Location: ' . api_get_self() . '?selecteval=' . Security::remove_XSS($_GET['selecteval']) . '&importok=');
exit;
}
}
if (isset ($_GET['export'])) {
$interbreadcrumb[]= array (
'url' => 'gradebook_view_result.php?selecteval=' . Security::remove_XSS($_GET['selecteval']),
'name' => get_lang('ViewResult'
));
$export_result_form= new DataForm(DataForm :: TYPE_EXPORT, 'export_result_form', null, api_get_self() . '?export=&selecteval=' . $_GET['selecteval'], '_blank');
if (!$export_result_form->validate()) {
Display :: display_header(get_lang('Export'));
}
if ($export_result_form->validate()) {
$export= $export_result_form->exportValues();
$file_type= $export['file_type'];
$filename= 'export_results_' . date('Y-m-d_H-i-s');
$results= Result :: load(null, null, Security::remove_XSS($_GET['selecteval']));
$data= array (); //when file type is csv, add a header to the output file
if ($file_type == 'csv') {
$alldata[]= array (
'user_id',
'official_code',
'lastname',
'firstname',
'score',
'date'
);
}
if ($file_type == 'pdf') {
if (($eval[0]->has_results())) {
$score= $eval[0]->calc_score();
if ($score != null) {
$average= get_lang('Average') . ' : ' . round(100 * ($score[0] / $score[1]),2) . ' %';
}
}
if ($eval[0]->get_course_code() == null) {
$course= get_lang('CourseIndependent');
} else {
$course= get_course_name_from_code($eval[0]->get_course_code());
}
$pdf= new Cezpdf();
$pdf->selectFont(api_get_path(LIBRARY_PATH).'ezpdf/fonts/Courier.afm');
$pdf->ezSetMargins(30, 30, 50, 30);
$pdf->ezSetY(800);
$pdf->ezText(get_lang('EvaluationName') . ' : ' . $eval[0]->get_name() . ' (' . date('j/n/Y g:i', $eval[0]->get_date()) . ')', 12, array (
'justification' => 'left'
));
$pdf->ezText(get_lang('Description') . ' : ' . $eval[0]->get_description());
$pdf->ezText(get_lang('Course') . ' : ' . $course, 12, array (
'justification' => 'left'
));
$pdf->ezText(get_lang('Weight') . ' : ' . $eval[0]->get_weight(), 12, array (
'justification' => 'left'
));
$pdf->ezText(get_lang('Max') . ' : ' . $eval[0]->get_max(), 12, array (
'justification' => 'left'
));
$pdf->ezText($average, 12, array (
'justification' => 'left'
));
$datagen = new ResultsDataGenerator ($eval[0],$allresults);
$data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_LASTNAME,0,null,true);
$newarray = array();
foreach ($data_array as $data) {
$newitem = array();
$newitem[] = $data['lastname'];
$newitem[] = $data['firstname'];
$newitem[] = $data['score'];
if ($displayscore->is_custom())
$newitem[] = $data['display'];
$newarray[] = $newitem;
}
$pdf->ezSetY(650);
if ($displayscore->is_custom()) {
$header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'),get_lang('Display'));
}else {
$header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'));
}
$pdf->ezTable($newarray,$header_names,'',array('showHeadings'=>1,'shaded'=>1,'showLines'=>1,'rowGap'=>3,'width'=> 500));
$pdf->ezStream();
exit;
}
foreach ($results as $result) {
$userinfo= get_user_info_from_id($result->get_user_id());
$data['user_id']= $result->get_user_id();
$data['official_code']= $userinfo['official_code'];
$data['lastname']= $userinfo['lastname'];
$data['firstname']= $userinfo['firstname'];
$data['score']= $result->get_score();
$data['date']= date('Y-n-j g:i', $result->get_date());
$alldata[]= $data;
}
switch ($file_type) {
case 'xml' :
Export :: export_table_xml($alldata, $filename, 'Result', 'XMLResults');
break;
case 'csv' :
Export :: export_table_csv($alldata, $filename);
break;
}
}
}
if (isset ($_GET['resultdelete'])) {
$result= Result :: load($_GET['resultdelete']);
$result[0]->delete();
header('Location: gradebook_view_result.php?deleteresult=&selecteval=' .Security::remove_XSS($_GET['selecteval']));
exit;
}
if (isset ($_POST['action'])) {
$number_of_selected_items= count($_POST['id']);
if ($number_of_selected_items == '0') {
Display :: display_warning_message(get_lang('NoItemsSelected'),false);
} else {
switch ($_POST['action']) {
case 'delete' :
$number_of_deleted_results= 0;
foreach ($_POST['id'] as $indexstr) {
$result= Result :: load($indexstr);
$result[0]->delete();
$number_of_deleted_results++;
}
header('Location: gradebook_view_result.php?massdelete=&selecteval=' .Security::remove_XSS($_GET['selecteval']));
exit;
break;
}
}
} // TODO - what if selecteval not set ?
$addparams= array (
'selecteval' => $eval[0]->get_id());
if (isset ($_GET['print'])) {
$datagen = new ResultsDataGenerator ($eval[0],$allresults);
$data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_LASTNAME,0,null,true);
if ($displayscore->is_custom()) {
$header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'),get_lang('Display'));
}else {
$header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'));
}
$newarray = array();
foreach ($data_array as $data) {
$newarray[] = array_slice($data, 2);
}
echo print_table($newarray, $header_names,get_lang('ViewResult'), $eval[0]->get_name());
exit;
} else
$resulttable= new ResultTable($eval[0], $allresults, $iscourse, $addparams);
$htmlHeadXtra[]= '<script type="text/javascript">
function confirmationuser ()
{
if (confirm("' . get_lang('DeleteUser') . '?"))
{return true;}
else
{return false;}
}
function confirmationall ()
{
if (confirm("' . get_lang('DeleteAll') . '?"))
{return true;}
else
{return false;}
}
</script>';
if (isset ($_GET['deleteall'])) {
$eval[0]->delete_results();
header('Location: gradebook_view_result.php?allresdeleted=&selecteval=' . Security::remove_XSS($_GET['selecteval']));
exit;
}
if ((!isset ($_GET['export'])) && (!isset ($_GET['import']))) {
if (!isset($_GET['selectcat'])) {
$interbreadcrumb[]= array (
'url' => $_SESSION['gradebook_dest'].'?selectcat=' .$currentcat[0]->get_id(),
'name' => get_lang('Details')
);
}
$interbreadcrumb[]= array (
'url' => 'gradebook_view_result.php'.'?selecteval='.Security::remove_XSS($_GET['selecteval']),
'name' => get_lang('ViewResult'
));
Display :: display_header('');
}
if (isset ($_GET['addresultnostudents'])) {
Display :: display_warning_message(get_lang('AddResultNoStudents'),false);
}
if (isset ($_GET['editresmessage'])) {
Display :: display_confirmation_message(get_lang('ResultEdited'),false);
}
if (isset ($_GET['addresult'])) {
Display :: display_confirmation_message(get_lang('ResultAdded'),false);
}
if (isset ($_GET['adduser'])) {
Display :: display_confirmation_message(get_lang('UserAdded'),false);
}
if (isset ($_GET['deleteresult'])) {
Display :: display_confirmation_message(get_lang('ResultDeleted'),false);
}
if (isset ($_GET['editallresults'])) {
Display :: display_confirmation_message(get_lang('AllResultsEdited'),false);
}
if (isset ($_GET['importok'])) {
Display :: display_confirmation_message(get_lang('FileUploadComplete'),false);
}
if (isset ($_GET['importnofile'])) {
Display :: display_warning_message(get_lang('ImportNoFile'),false);
}
if (isset ($_GET['incorrectdata'])) {
Display :: display_warning_message(get_lang('IncorrectData'),false);
}
if (isset ($_GET['nothingadded'])) {
Display :: display_warning_message(get_lang('ProblemUploadingFile'),false);
}
if (isset ($_GET['massdelete'])) {
Display :: display_confirmation_message(get_lang('ResultsDeleted'),false);
}
if (isset ($_GET['nouser'])) {
Display :: display_warning_message(get_lang('NoUser'),false);
}
if (isset ($_GET['overwritemax'])) {
Display :: display_warning_message(get_lang('OverWriteMax'),false);
}
if (isset ($_GET['importoverwritescore'])) {
Display :: display_confirmation_message(get_lang('ImportOverWriteScore') . ' ' . $_GET['importoverwritescore']);
}
if (isset ($_GET['import_user_error'])) {
$userinfo= get_user_info_from_id($_GET['import_user_error']);
Display :: display_warning_message(get_lang('UserInfoDoesNotMatch') . ' ' . $userinfo['lastname'] . ' ' . $userinfo['firstname']);
}
if (isset ($_GET['allresdeleted'])) {
Display :: display_confirmation_message(get_lang('AllResultDeleted'));
}
if (isset ($_GET['import_score_error'])) {
$userinfo= get_user_info_from_id($_GET['import_score_error']);
Display :: display_warning_message(get_lang('ScoreDoesNotMatch') . ' ' . $userinfo['lastname'] . ' ' . $userinfo['firstname']);
}
if ($file_type == null) { //show the result header
if (isset ($export_result_form) && !(isset ($edit_res_form))) {
echo '<div class ="normal-message">';
echo $export_result_form->display();
echo '</div>';
DisplayGradebook :: display_header_result($eval[0], $currentcat[0]->get_id(), 1);
} else {
if (isset ($import_result_form)){
echo '<div class ="normal-message">';
echo $import_result_form->display();
echo '</div>';
}
if (isset ($edit_res_form)) {
Display :: display_normal_message($edit_res_form->toHtml(),false);
}
DisplayGradebook :: display_header_result($eval[0], $currentcat[0]->get_id(), 1);
}
$resulttable->display();
Display :: display_footer();
}