<?php
/* For licensing terms, see /license.txt */
/**
 * Exercise list: This script shows the list of exercises for administrators and students.
 * @package chamilo.exercise
 * @author Olivier Brouckaert, original author
 * @author Denes Nagy, HotPotatoes integration
 * @author Wolfgang Schneider, code/html cleanup
 * @author Julio Montoya <gugli100@gmail.com>, lots of cleanup + several improvements
 * Modified by hubert.borderiou (question category)
 */
/**
 * Code
 */
// name of the language file that needs to be included

use \ChamiloSession as Session;

//$language_file = array('exercice', 'tracking');

// including the global library
////require_once '../inc/global.inc.php';
$current_course_tool = TOOL_QUIZ;

require_once api_get_path(SYS_CODE_PATH).'gradebook/lib/be.inc.php';

// Setting the tabs
$this_section = SECTION_COURSES;

$htmlHeadXtra[] = api_get_js('qtip2/jquery.qtip.min.js');
$htmlHeadXtra[] = api_get_css(api_get_path(WEB_LIBRARY_JS_PATH).'qtip2/jquery.qtip.min.css');

// Access control
api_protect_course_script(true);

// including additional libraries
require_once 'exercise.class.php';
require_once 'question.class.php';
require_once 'answer.class.php';
require_once 'hotpotatoes.lib.php';

/*	Constants and variables */
$is_allowedToEdit = api_is_allowed_to_edit(null, true);
$is_tutor = api_is_allowed_to_edit(true);
$is_tutor_course = api_is_course_tutor();

$TBL_DOCUMENT = Database :: get_course_table(TABLE_DOCUMENT);
$TBL_ITEM_PROPERTY = Database :: get_course_table(TABLE_ITEM_PROPERTY);
$TBL_EXERCICE_QUESTION = Database :: get_course_table(TABLE_QUIZ_TEST_QUESTION);
$TBL_EXERCICES = Database :: get_course_table(TABLE_QUIZ_TEST);
$TBL_TRACK_EXERCICES = Database :: get_main_table(TABLE_STATISTIC_TRACK_E_EXERCICES);

// document path
$documentPath = api_get_path(SYS_COURSE_PATH).$_course['path']."/document";
// picture path
$picturePath = $documentPath.'/images';
// audio path
$audioPath = $documentPath.'/audio';

// hotpotatoes
$uploadPath = DIR_HOTPOTATOES; //defined in main_api
$exercicePath = api_get_self();
$exfile = explode('/', $exercicePath);
$exfile = strtolower($exfile[sizeof($exfile) - 1]);
$exercicePath = substr($exercicePath, 0, strpos($exercicePath, $exfile));
$exercicePath = $exercicePath."exercice.php";

// Clear the exercise session
if (isset ($_SESSION['objExercise'])) {
    Session::erase('objExercise');
}
if (isset ($_SESSION['objQuestion'])) {
    Session::erase('objQuestion');
}
if (isset ($_SESSION['objAnswer'])) {
    Session::erase('objAnswer');
}
if (isset ($_SESSION['questionList'])) {
    Session::erase('questionList');
}
if (isset ($_SESSION['exerciseResult'])) {
    Session::erase('exerciseResult');
}

//General POST/GET/SESSION/COOKIES parameters recovery
$origin = isset($_REQUEST['origin']) ? Security::remove_XSS($_REQUEST['origin']) : null;
$choice = isset($_REQUEST['choice']) ? Security::remove_XSS($_REQUEST['choice']) : null;

$hpchoice = isset($_REQUEST['hpchoice']) ? Security::remove_XSS($_REQUEST['hpchoice']) : null;
$exerciseId = isset($_REQUEST['exerciseId']) ? Security::remove_XSS($_REQUEST['exerciseId']) : null;
$file = isset($_REQUEST['file']) ? Database::escape_string($_REQUEST['file']) : null;

$learnpath_id = isset($_REQUEST['learnpath_id']) ? intval($_REQUEST['learnpath_id']) : null;
$learnpath_item_id = isset($_REQUEST['learnpath_item_id']) ? intval($_REQUEST['learnpath_item_id']) : null;
$page = isset($_REQUEST['page']) ? intval($_REQUEST['page']) : null;

$course_info = api_get_course_info();
$course_id = api_get_course_int_id();

if ($page < 0) {
    $page = 1;
}

if (!empty($_GET['gradebook']) && $_GET['gradebook'] == 'view') {
    $_SESSION['gradebook'] = Security::remove_XSS($_GET['gradebook']);
    $gradebook = $_SESSION['gradebook'];
} elseif (empty($_GET['gradebook'])) {
    unset($_SESSION['gradebook']);
    $gradebook = '';
}

if (!empty($gradebook) && $gradebook == 'view') {
    $interbreadcrumb[] = array(
        'url' => '../gradebook/'.$_SESSION['gradebook_dest'],
        'name' => get_lang('ToolGradebook')
    );
}

$nameTools = get_lang('Exercices');

if ($is_allowedToEdit && !empty ($choice) && $choice == 'exportqti2') {
    require_once 'export/qti2/qti2_export.php';
    $export = export_exercise($exerciseId, true);

    $archive_path = api_get_path(SYS_ARCHIVE_PATH);
    $temp_dir_short = api_get_unique_id();
    $temp_zip_dir = $archive_path."/".$temp_dir_short;
    if (!is_dir($temp_zip_dir)) {
        mkdir($temp_zip_dir, api_get_permissions_for_new_directories());
    }
    $temp_zip_file = $temp_zip_dir."/".api_get_unique_id().".zip";
    $temp_xml_file = $temp_zip_dir."/qti2export_".$exerciseId.'.xml';
    file_put_contents($temp_xml_file, $export);
    $zip_folder = new PclZip($temp_zip_file);
    $zip_folder->add($temp_xml_file, PCLZIP_OPT_REMOVE_ALL_PATH);
    $name = 'qti2_export_'.$exerciseId.'.zip';

    //DocumentManager::string_send_for_download($export,true,'qti2export_'.$exerciseId.'.xml');
    DocumentManager :: file_send_for_download($temp_zip_file, true, $name);
    unlink($temp_zip_file);
    unlink($temp_xml_file);
    rmdir($temp_zip_dir);
    exit; //otherwise following clicks may become buggy
}

$htmlHeadXtra[] = '<script>
    $(document).ready(function() {
        //this makes google chrome to crash ...
       /* $(".link_tooltip").each(function(){
            $(this).qtip({
                content: $(this).find(".exercise_tooltip"),
                position: { at:"top right", my:"bottom left"},
                show: {
                   event: false,
                   ready: true // ... but show the tooltip when ready
                },
                hide: true, //
            });
        });*/

        $(".data_table tbody").sortable({
           cursor: "move", // works?
           update: function(event, ui) {
               var order = $(this).sortable("serialize") + "&a=update_exercise_list_order";
               $.get("'.api_get_path(WEB_AJAX_PATH).'exercise.ajax.php", order, function(reponse) {
                   $("#message").html(reponse);
               });
           },
           axis: "y",
           placeholder: "ui-state-highlight", //defines the yellow highlight
           handle: ".moved", //only the class "moved"
       });
    });
</script>';

if ($origin != 'learnpath') {
    //so we are not in learnpath tool
    Display :: display_header($nameTools, get_lang('Exercise'));
    if (isset($_GET['message'])) {
        if (in_array($_GET['message'], array('ExerciseEdited'))) {
            Display :: display_confirmation_message(get_lang($_GET['message']));
        }
    }
} else {
    Display :: display_reduced_header();
}

Event::event_access_tool(TOOL_QUIZ);

// Tool introduction
Display :: display_introduction_section(TOOL_QUIZ);

HotPotGCt($documentPath, 1, api_get_user_id());

// Only for administrator

if ($is_allowedToEdit) {
    if (!empty($choice)) {
        // Construction of Exercise
        $objExerciseTmp = new Exercise();
        $check = Security::check_token('get');
        $exercise_action_locked = api_resource_is_locked_by_gradebook($exerciseId, LINK_EXERCISE);

        if ($objExerciseTmp->read($exerciseId)) {
            if ($check) {
                switch ($choice) {
                    case 'delete': // deletes an exercise
                        if ($exercise_action_locked == false) {
                            $objExerciseTmp->delete();
                            require_once api_get_path(SYS_CODE_PATH).'gradebook/lib/gradebook_functions.inc.php';
                            $link_info = is_resource_in_course_gradebook(
                                api_get_course_id(),
                                1,
                                $exerciseId,
                                api_get_session_id()
                            );
                            if ($link_info !== false) {
                                remove_resource_from_course_gradebook($link_info['id']);
                            }
                            Display :: display_confirmation_message(get_lang('ExerciseDeleted'));
                        }
                        break;
                    case 'enable': // enables an exercise
                        $objExerciseTmp->enable();
                        $objExerciseTmp->save();
                        api_item_property_update(
                            $course_info,
                            TOOL_QUIZ,
                            $objExerciseTmp->id,
                            'visible',
                            api_get_user_id()
                        );
                        // "WHAT'S NEW" notification: update table item_property (previously last_tooledit)
                        Display :: display_confirmation_message(get_lang('VisibilityChanged'));
                        break;
                    case 'disable': // disables an exercise
                        $objExerciseTmp->disable();
                        $objExerciseTmp->save();
                        api_item_property_update(
                            $course_info,
                            TOOL_QUIZ,
                            $objExerciseTmp->id,
                            'invisible',
                            api_get_user_id()
                        );
                        Display :: display_confirmation_message(get_lang('VisibilityChanged'));
                        break;
                    case 'disable_results': //disable the results for the learners
                        $objExerciseTmp->disable_results();
                        $objExerciseTmp->save();
                        Display :: display_confirmation_message(get_lang('ResultsDisabled'));
                        break;
                    case 'enable_results': //disable the results for the learners
                        $objExerciseTmp->enable_results();
                        $objExerciseTmp->save();
                        Display :: display_confirmation_message(get_lang('ResultsEnabled'));
                        break;
                    case 'clean_results': //clean student results
                        if ($exercise_action_locked == false) {
                            $quantity_results_deleted = $objExerciseTmp->clean_results();
                            Display :: display_confirmation_message(
                                sprintf(get_lang('XResultsCleaned'), $quantity_results_deleted)
                            );
                        }
                        break;
                    case 'copy_exercise':
                        $objExerciseTmp->copy_exercise();
                        Display :: display_confirmation_message(get_lang('ExerciseCopied'));
                        break;
                    case 'set_autolaunch':
                        $objExerciseTmp->set_autolaunch();
                        Display :: display_confirmation_message(get_lang('ItemUpdated'));
                        break;
                }
            }
        }
        // destruction of Exercise
        unset($objExerciseTmp);
        Security::clear_token();
    }

    if (!empty($hpchoice)) {
        switch ($hpchoice) {
            case 'delete': // deletes an exercise
                $imgparams = array();
                $imgcount = 0;
                GetImgParams($file, $documentPath, $imgparams, $imgcount);
                $fld = GetFolderName($file);
                for ($i = 0; $i < $imgcount; $i++) {
                    FileManager::my_delete($documentPath.$uploadPath."/".$fld."/".$imgparams[$i]);
                    FileManager::update_db_info("delete", $uploadPath."/".$fld."/".$imgparams[$i]);
                }

                if (FileManager::my_delete($documentPath.$file)) {
                    FileManager::update_db_info("delete", $file);
                }
                // hotpotatoes folder may contains several tests so don't delete folder if not empty : #2165
                if (!(strstr($uploadPath, DIR_HOTPOTATOES) && !FileManager::folder_is_empty(
                    $documentPath.$uploadPath."/".$fld."/"
                ))
                ) {
                    FileManager::my_delete($documentPath.$uploadPath."/".$fld."/");
                }
                break;
            case 'enable': // enables an exercise
                $newVisibilityStatus = "1"; //"visible"
                $query = "SELECT id FROM $TBL_DOCUMENT WHERE c_id = $course_id AND path='".Database :: escape_string($file)."'";
                $res = Database::query($query);
                $row = Database :: fetch_array($res, 'ASSOC');
                api_item_property_update($_course, TOOL_DOCUMENT, $row['id'], 'visible', $_user['user_id']);
                break;
            case 'disable': // disables an exercise
                $newVisibilityStatus = "0"; //"invisible"
                $query = "SELECT id FROM $TBL_DOCUMENT WHERE c_id = $course_id AND path='".Database :: escape_string($file)."'";
                $res = Database::query($query);
                $row = Database :: fetch_array($res, 'ASSOC');
                api_item_property_update($_course, TOOL_DOCUMENT, $row['id'], 'invisible', $_user['user_id']);
                break;
            default:
                break;
        }
    }
}

// Actions div bar
if ($is_allowedToEdit) {
    echo '<div class="actions">';
}

// Selects $limit exercises at the same time
// maximum number of exercises on a same page
$limit = 50;

// Display the next and previous link if needed
$from = $page * $limit;
HotPotGCt($documentPath, 1, api_get_user_id());

//condition for the session
$course_code = api_get_course_id();
$courseId = api_get_course_int_id();
$session_id = api_get_session_id();
$condition_session = api_get_session_condition($session_id, true, true);

// Only for administrators
if ($is_allowedToEdit) {
    $total_sql = "SELECT count(iid) as count FROM $TBL_EXERCICES WHERE c_id = $course_id AND active<>'-1' $condition_session ";
    $sql = "SELECT * FROM $TBL_EXERCICES WHERE c_id = $course_id AND active<>'-1' $condition_session ORDER BY title LIMIT ".$from.",".$limit;
} else {
    // Only for students
    $total_sql = "SELECT count(iid) as count FROM $TBL_EXERCICES WHERE c_id = $course_id AND active = '1' $condition_session ";
    $sql = "SELECT * FROM $TBL_EXERCICES
            WHERE c_id = $course_id AND
                  active='1' $condition_session
            ORDER BY title LIMIT ".$from.",".$limit;
}

$result = Database::query($sql);
$exercises_count = Database :: num_rows($result);

$result_total = Database::query($total_sql);
$total_exercises = 0;

if (Database :: num_rows($result_total)) {
    $result_total = Database::fetch_array($result_total);
    $total_exercises = $result_total['count'];
}

// Get HotPotatoes files (active and inactive)
if ($is_allowedToEdit) {
    $sql = "SELECT * FROM $TBL_DOCUMENT WHERE c_id = $course_id AND path LIKE '".Database :: escape_string($uploadPath)."/%/%'";
    $res = Database::query($sql);
    $hp_count = Database :: num_rows($res);
} else {
    $sql = "SELECT * FROM $TBL_DOCUMENT d, $TBL_ITEM_PROPERTY ip
            WHERE   d.id = ip.ref AND
                    ip.tool = '".TOOL_DOCUMENT."' AND
                    d.path LIKE '".Database :: escape_string($uploadPath)."/%/%' AND
                    ip.visibility ='1' AND
                    d.c_id      = ".$course_id." AND
                    ip.c_id     = ".$course_id;
    $res = Database::query($sql);
    $hp_count = Database :: num_rows($res);
}
$total = $total_exercises + $hp_count;

if ($is_allowedToEdit && $origin != 'learnpath') {
    echo '<a href="exercise_admin.php?'.api_get_cidreq().'">'.Display :: return_icon(
        'new_exercice.png',
        get_lang('NewEx'),
        '',
        ICON_SIZE_MEDIUM
    ).'</a>';
    echo '<a href="question_create.php?'.api_get_cidreq().'">'.Display :: return_icon(
        'new_question.png',
        get_lang('AddQ'),
        '',
        ICON_SIZE_MEDIUM
    ).'</a>';
    // Question category
    echo '<a href="tests_category.php">';
    echo Display::return_icon('question_category_show.gif', get_lang('QuestionCategory'));
    echo '</a>';
    if (api_is_platform_admin()) {
        echo '<a href="tests_category.php?type=global">';
        echo Display::return_icon('folder_global_category.png', get_lang('QuestionGlobalCategory'), array(), ICON_SIZE_MEDIUM);
        echo '</a>';
    }

    echo '<a href="'.api_get_path(WEB_PUBLIC_PATH).'courses/'.api_get_course_path().'/'.api_get_session_id().'/exercise/question-pool">';
    echo Display::return_icon('database.png', get_lang('QuestionPool'), array('style' => 'width:32px'));
    echo '</a>';

    echo '<a href="media.php?'.api_get_cidreq().'">';
    echo Display::return_icon('media.png', get_lang('Media'), array(), ICON_SIZE_MEDIUM);
    echo '</a>';
    // end question category
    echo '<a href="hotpotatoes.php?'.api_get_cidreq().'">'.Display :: return_icon(
        'import_hotpotatoes.png',
        get_lang('ImportHotPotatoesQuiz'),
        '',
        ICON_SIZE_MEDIUM
    ).'</a>';
    // link to import qti2 ...
    echo '<a href="qti2.php?'.api_get_cidreq().'">'.Display :: return_icon(
        'import_qti2.png',
        get_lang('ImportQtiQuiz'),
        '',
        ICON_SIZE_MEDIUM
    ).'</a>';
    echo '<a href="upload_exercise.php?'.api_get_cidreq().'">'.Display :: return_icon(
        'import_excel.png',
        get_lang('ImportExcelQuiz'),
        '',
        ICON_SIZE_MEDIUM
    ).'</a>';
}

if ($is_allowedToEdit) {
    echo '</div>'; // closing the actions div
    echo '<div id="message"></div>';
}

if ($total > $limit) {
    echo '<div style="float:right;height:20px;">';
    //show pages navigation link for previous page
    if ($page) {
        echo "<a href=\"".api_get_self()."?".api_get_cidreq()."&amp;page=".($page - 1)."\">".Display :: return_icon(
            'action_prev.png',
            get_lang('PreviousPage')
        )."</a>";
    } elseif ($total_exercises + $hp_count > $limit) {
        echo Display :: return_icon('action_prev_na.png', get_lang('PreviousPage'));
    }

    //show pages navigation link for previous page
    if ($total_exercises > $from + $limit || $hp_count > $from + $limit) {
        echo ' '."<a href=\"".api_get_self()."?".api_get_cidreq()."&amp;page=".($page + 1)."\">".Display::return_icon(
            'action_next.png',
            get_lang('NextPage')
        )."</a>";
    } elseif ($page) {
        echo ' '.Display :: return_icon('action_next_na.png', get_lang('NextPage'));
    }
    echo '</div>';
}

$i = 1;

$online_icon = Display::return_icon('online.png', get_lang('Visible'), array('width' => '12px'));
$offline_icon = Display::return_icon('offline.png', get_lang('Invisible'), array('width' => '12px'));

$exercise_list = array();
$exercise_obj = new Exercise();
$list_ordered = $exercise_obj->get_exercise_list_ordered();

while ($row = Database :: fetch_array($result, 'ASSOC')) {
    $exercise_list[$row['iid']] = $row;
}

if (isset($list_ordered) && !empty($list_ordered)) {
    $new_question_list = array();
    foreach ($list_ordered as $exercise_id) {
        if (isset($exercise_list[$exercise_id])) {
            $new_question_list[] = $exercise_list[$exercise_id];
        }
    }
    $exercise_list = $new_question_list;
}

echo '<table class="'.Display::return_default_table_class().'">';

/*  Listing exercises  */
if (!empty($exercise_list)) {
    if ($origin != 'learnpath') {
        //avoid sending empty parameters
        $myorigin = (empty($origin) ? '' : '&origin='.$origin);
        $mylpid = (empty($learnpath_id) ? '' : '&learnpath_id='.$learnpath_id);
        $mylpitemid = (empty($learnpath_item_id) ? '' : '&learnpath_item_id='.$learnpath_item_id);

        $token = Security::get_token();
        $i = 1;

        if ($is_allowedToEdit) {
            $headers = array(
                array('name' => get_lang('ExerciseName')),
                array('name' => get_lang('QuantityQuestions'), 'params' => array('width' => '100px')),
                array('name' => get_lang('Actions'), 'params' => array('width' => '180px'))
            );
        } else {
            $headers = array(
                array('name' => get_lang('ExerciseName')),
                array('name' => get_lang('Status')),
            );
        }

        $header_list = '';
        foreach ($headers as $header) {
            $params = isset($header['params']) ? $header['params'] : null;
            $header_list .= Display::tag('th', $header['name'], $params);
        }
        echo Display::tag('tr', $header_list);

        $autolaunch_setting_on = api_get_course_setting('enable_exercise_auto_launch') == 1;

        $count = 0;
        if (!empty($exercise_list)) {
            foreach ($exercise_list as $row) {
                $my_exercise_id = $row['iid'];

                $exercise_obj = new Exercise();
                $exercise_obj->read($my_exercise_id, false);

                $locked = $exercise_obj->is_gradebook_locked;

                //echo '<div  id="tabs-'.$i.'">';
                $i++;
                // Validation when belongs to a session
                $session_img = api_get_session_image($row['session_id'], $_user['status']);

                $time_limits = false;
                if ($row['start_time'] != '0000-00-00 00:00:00' || $row['end_time'] != '0000-00-00 00:00:00') {
                    $time_limits = true;
                }

                if ($time_limits) {
                    // check if start time
                    $start_time = false;
                    if ($row['start_time'] != '0000-00-00 00:00:00') {
                        $start_time = api_strtotime($row['start_time'], 'UTC');
                    }
                    $end_time = false;
                    if ($row['end_time'] != '0000-00-00 00:00:00') {
                        $end_time = api_strtotime($row['end_time'], 'UTC');
                    }
                    $now = time();
                    $is_actived_time = false;

                    //If both "clocks" are enable
                    if ($start_time && $end_time) {
                        if ($now > $start_time && $end_time > $now) {
                            $is_actived_time = true;
                        }
                    } else {
                        //we check the start and end
                        if ($start_time) {
                            if ($now > $start_time) {
                                $is_actived_time = true;
                            }
                        }
                        if ($end_time) {
                            if ($end_time > $now) {
                                $is_actived_time = true;
                            }
                        }
                    }
                }

                //Blocking empty start times see BT#2800
                global $_custom;
                if (isset($_custom['exercises_hidden_when_no_start_date']) && $_custom['exercises_hidden_when_no_start_date']) {
                    if (empty($row['start_time']) || $row['start_time'] == '0000-00-00 00:00:00') {
                        $time_limits = true;
                        $is_actived_time = false;
                    }
                }

                $cut_title = $exercise_obj->getCutTitle();
                $alt_title = '';
                if ($cut_title != $row['title']) {
                    $alt_title = ' title = "'.$row['title'].'" ';
                }

                // Teacher only
                if ($is_allowedToEdit) {
                    $lp_blocked = null;
                    if ($exercise_obj->exercise_was_added_in_lp == true) {
                        $lp_blocked = Display::div(
                            get_lang('AddedToLPCannotBeAccessed'),
                            array('class' => 'lp_content_type_label')
                        );
                    }

                    $visibility = api_get_item_visibility($course_info, TOOL_QUIZ, $my_exercise_id);

                    if ($row['active'] == 0 || $visibility == 0) {
                        $title = Display::tag('font', $cut_title, array('style' => 'color:grey'));
                    } else {
                        $title = $cut_title;
                    }

                    $count_exercise_not_validated = intval(
                        count_exercise_result_not_validated($my_exercise_id, $courseId, $session_id)
                    );

                    $move = Display::return_icon(
                        'all_directions.png',
                        get_lang('Move'),
                        array('class' => 'moved', 'style' => 'margin-bottom:-0.5em;')
                    );

                    $class_tip = '';
                    if (!empty($count_exercise_not_validated)) {
                        $results_text = $count_exercise_not_validated == 1 ? get_lang('ResultNotRevised') : get_lang(
                            'ResultsNotRevised'
                        );
                        $title .= '<span class="exercise_tooltip" style="display: none;">'.$count_exercise_not_validated.' '.$results_text.' </span>';
                        $class_tip = 'link_tooltip';
                    }
                    //$class_tip = 'exercise_link';
                    $urlOverview =  'overview.php?'.api_get_cidreq().$myorigin.$mylpid.$mylpitemid.'&exerciseId='.$my_exercise_id;
                    $url = $move.'<a '.$alt_title.' class="'.$class_tip.'" id="tooltip_'.$my_exercise_id.'" href="'.$urlOverview.'">'.Display::return_icon('quiz.gif').' '.$title.' </a>';

                    $item = Display::tag('td', $url.' '.$session_img.$lp_blocked);

                    //Count number exercice - teacher
                    $sqlquery = "SELECT count(*) FROM $TBL_EXERCICE_QUESTION WHERE c_id = $course_id AND exercice_id = $my_exercise_id";
                    $sqlresult = Database::query($sqlquery);
                    $rowi = Database :: result($sqlresult, 0);

                    if ($session_id == $row['session_id']) {
                        //Settings
                        $actions = Display::url(Display::return_icon('edit.png', get_lang('Edit'), '', ICON_SIZE_SMALL), 'admin.php?'.api_get_cidreq().'&exerciseId='.$my_exercise_id);

                        //Exercise results
                        $actions .='<a href="exercise_report.php?'.api_get_cidreq().'&exerciseId='.$my_exercise_id.'">'.Display :: return_icon('test_results.png', get_lang('Results'), '', ICON_SIZE_SMALL).'</a>';

                        //Export
                        $actions .= Display::url(Display::return_icon('cd.gif', get_lang('CopyExercise')), '', array('onclick' => "javascript:if(!confirm('".addslashes(get_lang('AreYouSureToCopy'))." ".addslashes($row['title'])."?"."')) return false;", 'href' => 'exercice.php?'.api_get_cidreq().'&choice=copy_exercise&sec_token='.$token.'&exerciseId='.$my_exercise_id));

                        if ($autolaunch_setting_on) {
                            $icon = Display::return_icon('launch.png', get_lang('AutoLaunch'));
                            if ($row['autolaunch'] == 0) {
                                $icon = Display::return_icon('launch_na.png', get_lang('AutoLaunch'));
                            }
                            $actions .= Display::url($icon, 'exercice.php?'.api_get_cidreq().'&choice=set_autolaunch&sec_token='.$token.'&exerciseId='.$my_exercise_id);
                        }

                        //Clean exercise
                        if ($locked == false) {
                            $actions .= Display::url(Display::return_icon('clean.png', get_lang('CleanStudentResults'), '', ICON_SIZE_SMALL), '', array('onclick' => "javascript:if(!confirm('".addslashes(api_htmlentities(get_lang('AreYouSureToDeleteResults'), ENT_QUOTES, $charset))." ".addslashes($row['title'])."?"."')) return false;", 'href' => 'exercice.php?'.api_get_cidreq().'&choice=clean_results&sec_token='.$token.'&exerciseId='.$my_exercise_id));
                        } else {
                            $actions .= Display::return_icon('clean_na.png', get_lang('ResourceLockedByGradebook'), '', ICON_SIZE_SMALL);
                        }

                        //Visible / invisible
                        //Check if this exercise was added in a LP
                        if ($exercise_obj->exercise_was_added_in_lp == true) {
                            $actions .= Display::return_icon('invisible.png', get_lang('AddedToLPCannotBeAccessed'), '', ICON_SIZE_SMALL);
                        } else {
                            if ($row['active'] == 0 || $visibility == 0) {
                                $actions .= Display::url(Display::return_icon('invisible.png', get_lang('Activate'), '', ICON_SIZE_SMALL), 'exercice.php?'.api_get_cidreq().'&choice=enable&sec_token='.$token.'&page='.$page.'&exerciseId='.$my_exercise_id);
                            } else {
                                // else if not active
                                $actions .= Display::url(Display::return_icon('visible.png', get_lang('Deactivate'), '', ICON_SIZE_SMALL), 'exercice.php?'.api_get_cidreq().'&choice=disable&sec_token='.$token.'&page='.$page.'&exerciseId='.$my_exercise_id);
                            }
                        }
                        // Export qti ...
                        $actions .= Display::url(Display::return_icon('export_qti2.png', 'IMS/QTI', '', ICON_SIZE_SMALL), 'exercice.php?choice=exportqti2&exerciseId='.$my_exercise_id);
                    } else {
                        // not session
                        $actions = Display::return_icon('edit_na.png', get_lang('ExerciseEditionNotAvailableInSession'));
                        $actions .='<a href="exercise_report.php?'.api_get_cidreq().'&exerciseId='.$my_exercise_id.'">'.Display :: return_icon('test_results.png', get_lang('Results'), '', ICON_SIZE_SMALL).'</a>';
                        $actions .= Display::url(Display::return_icon('cd.gif', get_lang('CopyExercise')), '', array('onclick' => "javascript:if(!confirm('".addslashes(get_lang('AreYouSureToCopy'))." ".addslashes($row['title'])."?"."')) return false;", 'href' => 'exercice.php?'.api_get_cidreq().'&choice=copy_exercise&sec_token='.$token.'&exerciseId='.$my_exercise_id));
                    }

                    //Delete
                    if ($session_id == $row['session_id']) {
                        if ($locked == false) {
                            $actions .= Display::url(Display::return_icon('delete.png', get_lang('Delete'), '', ICON_SIZE_SMALL), '', array('onclick' => "javascript:if(!confirm('".addslashes(get_lang('AreYouSureToDelete'))." ".addslashes($row['title'])."?"."')) return false;", 'href' => 'exercice.php?'.api_get_cidreq().'&choice=delete&sec_token='.$token.'&exerciseId='.$my_exercise_id));
                        } else {
                            $actions .= Display::return_icon('delete_na.png', get_lang('ResourceLockedByGradebook'), '', ICON_SIZE_SMALL);
                        }
                        /*if ($rowi > 50) {
                            // Showing the direct link to exercise settings only
                            // if there are more than 50 questions, so the list of
                            // questions does not slow down everything
                            $actions .=  Display::url(Display::return_icon('settings.png',get_lang('EditSettings'),'',ICON_SIZE_SMALL), 'exercise_admin.php?'.api_get_cidreq().'&modifyExercise=yes&exerciseId='.$row['id']);
                        }*/
                    }

                    // Number of questions
                    /*
                    $random_label = null;
                    if ($row['random'] > 0 || $row['random'] == -1) {
                        // if random == -1 means use random questions with all questions
                        $random_number_of_question = $row['random'];
                        if ($random_number_of_question == -1) {
                            $random_number_of_question = $rowi;
                        }

                        if ($row['random_by_category'] > 0) {
                            $nbQuestionsTotal = $exercise_obj->getNumberQuestionExerciseCategory();
                            //$real_question_count = count($exercise_obj->selectQuestionList());
                            $warning = null;
                            if ($nbQuestionsTotal != $real_question_count) {
                                $warning = Display::return_icon('warning.png', get_lang('CheckThatYouHaveEnoughQuestionsInYourCategories'));
                            }
                            $number_of_questions = $nbQuestionsTotal." ".$warning;
                        } else {
                            $random_label = ' ('.get_lang('Random').') ';
                            $number_of_questions = $random_number_of_question.' '.$random_label;
                            //Bug if we set a random value bigger than the real number of questions
                            if ($random_number_of_question > $rowi) {
                                $number_of_questions = $rowi.' '.$random_label;
                            }
                        }
                    } else {
                        $number_of_questions = $rowi;
                    }*/

                    $number_of_questions = $exercise_obj->getQuestionCount();
                    if ($row['random'] > 0 && $row['random'] != -1) {
                        $number_of_questions = $number_of_questions.' ('.$row['random'].' '.get_lang('Random').') ';
                    }

                    //Attempts
                    //$attempts = get_count_exam_results($my_exercise_id).' '.get_lang('Attempts');
                    //$item .=  Display::tag('td',$attempts);
                    $item .= Display::tag('td', $number_of_questions);

                } else {
                    // Student only

                    $visibility = api_get_item_visibility($course_info, TOOL_QUIZ, $my_exercise_id);

                    if ($visibility == 0) {
                        continue;
                    }

                    // if time is actived show link to exercise

                    if ($time_limits) {
                        if ($is_actived_time) {
                            $url = '<a '.$alt_title.'  href="overview.php?'.api_get_cidreq().$myorigin.$mylpid.$mylpitemid.'&exerciseId='.$my_exercise_id.'">'.$cut_title.'</a>';
                        } else {
                            $url = $row['title'];
                        }
                    } else {
                        $url = '<a '.$alt_title.'  href="overview.php?'.api_get_cidreq().$myorigin.$mylpid.$mylpitemid.'&exerciseId='.$my_exercise_id.'">'.$cut_title.'</a>';
                    }

                    //Link of the exercise
                    $item = Display::tag('td', $url.' '.$session_img);

                    //count number exercise questions
                    $sqlquery = "SELECT count(*) FROM $TBL_EXERCICE_QUESTION WHERE c_id = $course_id AND exercice_id = ".$my_exercise_id;
                    $sqlresult = Database::query($sqlquery);
                    $rowi = Database::result($sqlresult, 0);

                    if ($row['random'] > 0) {
                        $row['random'].' '.api_strtolower(get_lang(($row['random'] > 1 ? 'Questions' : 'Question')));
                    } else {
                        //show results student
                        $rowi.' '.api_strtolower(get_lang(($rowi > 1 ? 'Questions' : 'Question')));
                    }

                    //This query might be improved later on by ordering by the new "tms" field rather than by exe_id
                    //Don't remove this marker: note-query-exe-results
                    $qry = "SELECT * FROM $TBL_TRACK_EXERCICES
                        WHERE   exe_exo_id      = ".$my_exercise_id." AND
                                exe_user_id     = ".api_get_user_id()." AND
                                c_id    = '".api_get_course_int_id()."' AND
                                status          <> 'incomplete' AND
                                orig_lp_id      = 0 AND
                                orig_lp_item_id = 0 AND
                                session_id      =  '".api_get_session_id()."'
                        ORDER BY exe_id DESC";
                    $qryres = Database::query($qry);
                    $num = Database :: num_rows($qryres);

                    //Hide the results
                    $my_result_disabled = $row['results_disabled'];

                    //Time limits are on
                    if ($time_limits) {
                        // Examn is ready to be taken
                        if ($is_actived_time) {
                            //Show results
                            if ($my_result_disabled == 0 || $my_result_disabled == 2) {
                                //More than one attempt
                                if ($num > 0) {
                                    $row_track = Database :: fetch_array($qryres);
                                    $attempt_text = get_lang('LatestAttempt').' : ';
                                    $attempt_text .= ExerciseLib::show_score($row_track['exe_result'], $row_track['exe_weighting']);
                                } else {
                                    //No attempts
                                    $attempt_text = get_lang('NotAttempted');
                                }
                            } else {
                                $attempt_text = get_lang('CantShowResults');
                            }
                        } else {
                            //Quiz not ready due to time limits

                            //@todo use the is_visible function
                            if ($row['start_time'] != '0000-00-00 00:00:00' && $row['end_time'] != '0000-00-00 00:00:00') {
                                $attempt_text = sprintf(
                                    get_lang('ExerciseWillBeActivatedFromXToY'),
                                    api_convert_and_format_date($row['start_time']),
                                    api_convert_and_format_date($row['end_time'])
                                );
                            } else {
                                //$attempt_text = get_lang('ExamNotAvailableAtThisTime');
                                if ($row['start_time'] != '0000-00-00 00:00:00') {
                                    $attempt_text = sprintf(
                                        get_lang('ExerciseAvailableFromX'),
                                        api_convert_and_format_date($row['start_time'])
                                    );
                                }
                                if ($row['end_time'] != '0000-00-00 00:00:00') {
                                    $attempt_text = sprintf(
                                        get_lang('ExerciseAvailableUntilX'),
                                        api_convert_and_format_date($row['end_time'])
                                    );
                                }
                            }
                        }
                    } else {
                        //Normal behaviour
                        //Show results
                        if ($my_result_disabled == 0 || $my_result_disabled == 2) {
                            if ($num > 0) {
                                $row_track = Database :: fetch_array($qryres);
                                $attempt_text = get_lang('LatestAttempt').' : ';
                                $attempt_text .= ExerciseLib::show_score($row_track['exe_result'], $row_track['exe_weighting']);
                            } else {
                                $attempt_text = get_lang('NotAttempted');
                            }
                        } else {
                            $attempt_text = get_lang('CantShowResults');
                        }
                    }

                    $class_tip = '';

                    if (empty($num)) {
                        $num = '';
                    } else {
                        $class_tip = 'link_tooltip';
                        //@todo use sprintf and show the results validated by the teacher
                        if ($num == 1) {
                            $num = $num.' '.get_lang('Result');
                        } else {
                            $num = $num.' '.get_lang('Results');
                        }
                        $num = '<span class="tooltip" style="display: none;">'.$num.'</span>';
                    }
                    $item .= Display::tag('td', $attempt_text);
                }
                $class = 'row_even';
                if ($count % 2) {
                    $class = 'row_odd';
                }

                if ($is_allowedToEdit) {
                    $item .= Display::tag('td', $actions, array('class' => 'td_actions'));
                }
                echo Display::tag('tr', $item, array('id' => 'exercise_list_'.$my_exercise_id, 'class' => $class));

                $count++;
            }
        } // end foreach()
    }
}
// end exercise list

//Hotpotatoes results
$hotpotatoes_exist = false;

if ($is_allowedToEdit) {
    $sql = "SELECT d.path as path, d.comment as comment, ip.visibility as visibility
            FROM $TBL_DOCUMENT d, $TBL_ITEM_PROPERTY ip
            WHERE   d.c_id = $course_id AND
                    ip.c_id = $course_id AND
                    d.id = ip.ref AND
                    ip.tool = '".TOOL_DOCUMENT."' AND
                    (d.path LIKE '%htm%') AND
                    d.path  LIKE '".Database :: escape_string($uploadPath)."/%/%'
                    LIMIT ".$from.",".$limit; // only .htm or .html files listed
} else {
    $sql = "SELECT d.path as path, d.comment as comment, ip.visibility as visibility
            FROM $TBL_DOCUMENT d, $TBL_ITEM_PROPERTY ip
            WHERE d.c_id = $course_id AND
                    ip.c_id = $course_id AND
            d.id = ip.ref AND ip.tool = '".TOOL_DOCUMENT."' AND (d.path LIKE '%htm%')
            AND   d.path  LIKE '".Database :: escape_string($uploadPath)."/%/%' AND ip.visibility='1'
            LIMIT ".$from.",".$limit;
}

$result = Database::query($sql);

while ($row = Database :: fetch_array($result, 'ASSOC')) {
    $attribute['path'][] = $row['path'];
    $attribute['visibility'][] = $row['visibility'];
    $attribute['comment'][] = $row['comment'];
}

$nbrActiveTests = 0;
if (isset($attribute['path']) && is_array($attribute['path'])) {
    $hotpotatoes_exist = true;
    while (list($key, $path) = each($attribute['path'])) {
        $item = '';
        list ($a, $vis) = each($attribute['visibility']);
        if (strcmp($vis, "1") == 0) {
            $active = 1;
        } else {
            $active = 0;
        }
        $title = GetQuizName($path, $documentPath);
        if ($title == '') {
            $title = basename($path);
        }

        $class = 'row_even';
        if ($count % 2) {
            $class = 'row_odd';
        }

        // prof only
        if ($is_allowedToEdit) {
            $item = Display::tag(
                'td',
                Display::return_icon('hotpotatoes_s.png').'
                <a href="showinframes.php?file='.$path.'&cid='.api_get_course_id(
                ).'&uid='.api_get_user_id().'"'.(!$active ? 'class="invisible"' : '').'>'.$title.'</a> '
            );
            $item .= Display::tag('td', '-');

            $actions = Display::url(
                Display::return_icon('edit.png', get_lang('Edit'), '', ICON_SIZE_SMALL),
                'adminhp.php?'.api_get_cidreq().'&hotpotatoesName='.$path
            );
            $actions .= '<a href="hotpotatoes_exercise_report.php?'.api_get_cidreq(
            ).'&path='.$path.'">'.Display :: return_icon(
                'test_results.png',
                get_lang('Results'),
                '',
                ICON_SIZE_SMALL
            ).'</a>';

            // if active
            if ($active) {
                $nbrActiveTests = $nbrActiveTests + 1;
                $actions .= '      <a href="'.$exercicePath.'?'.api_get_cidreq(
                ).'&hpchoice=disable&amp;page='.$page.'&amp;file='.$path.'">'.Display::return_icon(
                    'visible.png',
                    get_lang('Deactivate'),
                    '',
                    ICON_SIZE_SMALL
                ).'</a>';
            } else { // else if not active
                $actions .= '    <a href="'.$exercicePath.'?'.api_get_cidreq(
                ).'&hpchoice=enable&amp;page='.$page.'&amp;file='.$path.'">'.Display::return_icon(
                    'invisible.png',
                    get_lang('Activate'),
                    '',
                    ICON_SIZE_SMALL
                ).'</a>';
            }
            $actions .= '<a href="'.$exercicePath.'?'.api_get_cidreq(
            ).'&amp;hpchoice=delete&amp;file='.$path.'" onclick="javascript:if(!confirm(\''.addslashes(
                api_htmlentities(get_lang('AreYouSureToDelete'), ENT_QUOTES, $charset).' '.$title."?"
            ).'\')) return false;">'.Display::return_icon('delete.png', get_lang('Delete'), '', ICON_SIZE_SMALL).'</a>';

            $item .= Display::tag('td', $actions);
            echo Display::tag('tr', $item, array('class' => $class));
        } else {
            // Student only
            if ($active == 1) {
                $nbrActiveTests = $nbrActiveTests + 1;
                $item .= Display::tag(
                    'td',
                    '<a href="showinframes.php?'.api_get_cidreq().'&file='.$path.'&cid='.api_get_course_id(
                    ).'&uid='.api_get_user_id().'"'.(!$active ? 'class="invisible"' : '').'">'.$title.'</a>'
                );
                //$item .= Display::tag('td', '');
                $actions = '<a href="hotpotatoes_exercise_report.php?'.api_get_cidreq(
                ).'&path='.$path.'&filter_by_user='.api_get_user_id().'">'.Display :: return_icon(
                    'test_results.png',
                    get_lang('Results'),
                    '',
                    ICON_SIZE_SMALL
                ).'</a>';
                $item .= Display::tag('td', $actions);
                echo Display::tag('tr', $item, array('class' => $class));
            }
        }
        $count++;
    }
}
echo '</table>';

if (empty($exercise_list) && $hotpotatoes_exist == false) {
    if ($is_allowedToEdit && $origin != 'learnpath') {
        echo '<div id="no-data-view">';
        echo '<h2>'.get_lang('Quiz').'</h2>';
        echo Display::return_icon('quiz.png', '', array(), 64);
        echo '<div class="controls">';
        echo Display::url(get_lang('NewEx'), 'exercise_admin.php?'.api_get_cidreq(), array('class' => 'btn'));
        echo '</div>';
        echo '</div>';
    }
}
if ($origin != 'learnpath') { //so we are not in learnpath tool
    Display :: display_footer();
}

Session::erase('objExercise');
Session::erase('objQuestion');
Session::erase('objAnswer');