123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540 |
- <?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']) . '¬hingadded=');
- 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);
- if (api_sort_by_first_name()) {
- $data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_FIRSTNAME, 0, null, true);
- } else {
- $data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_LASTNAME,0,null,true);
- }
- $newarray = array();
- $is_western_name_order = api_is_western_name_order();
- foreach ($data_array as $data) {
- $newitem = array();
- if ($is_western_name_order) {
- $newitem[] = $data['firstname'];
- $newitem[] = $data['lastname'];
- } else {
- $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()) {
- if ($is_western_name_order) {
- $header_names = array(get_lang('FirstName'),get_lang('LastName'),get_lang('Score'),get_lang('Display'));
- } else {
- $header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'),get_lang('Display'));
- }
- } else {
- if ($is_western_name_order) {
- $header_names = array(get_lang('FirstName'),get_lang('LastName'),get_lang('Score'));
- } 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);
- if (api_sort_by_first_name()) {
- $data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_FIRSTNAME, 0, null, true);
- } else {
- $data_array = $datagen->get_data(ResultsDataGenerator :: RDG_SORT_LASTNAME,0,null,true);
- }
- if ($displayscore->is_custom()) {
- if (api_is_western_name_order()) {
- $header_names = array(get_lang('FirstName'),get_lang('LastName'),get_lang('Score'),get_lang('Display'));
- } else {
- $header_names = array(get_lang('LastName'),get_lang('FirstName'),get_lang('Score'),get_lang('Display'));
- }
- } else {
- if (api_is_western_name_order()) {
- $header_names = array(get_lang('FirstName'),get_lang('LastName'),get_lang('Score'));
- }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') . ' ' . api_get_person_name($userinfo['firstname'], $userinfo['lastname']));
- }
- 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') . ' ' . api_get_person_name($userinfo['firstname'], $userinfo['lastname']));
- }
- 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();
- }
|