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.
278 lines
11 KiB
278 lines
11 KiB
<?php
|
|
/* For licensing terms, see /license.txt */
|
|
|
|
/**
|
|
* @package chamilo.admin
|
|
*/
|
|
|
|
// name of the language file that needs to be included
|
|
$language_file = 'admin';
|
|
|
|
$cidReset = true;
|
|
|
|
require_once '../inc/global.inc.php';
|
|
|
|
// setting the section (for the tabs)
|
|
$this_section = SECTION_PLATFORM_ADMIN;
|
|
|
|
api_protect_admin_script(true);
|
|
|
|
$session_id = intval($_GET['session_id']);
|
|
$formSent = 0;
|
|
$errorMsg = '';
|
|
|
|
// Database Table Definitions
|
|
$tbl_user = Database::get_main_table(TABLE_MAIN_USER);
|
|
$tbl_course = Database::get_main_table(TABLE_MAIN_COURSE);
|
|
$tbl_session = Database::get_main_table(TABLE_MAIN_SESSION);
|
|
$tbl_session_user = Database::get_main_table(TABLE_MAIN_SESSION_USER);
|
|
$tbl_session_course_user = Database::get_main_table(TABLE_MAIN_SESSION_COURSE_USER);
|
|
|
|
$archivePath = api_get_path(SYS_ARCHIVE_PATH);
|
|
$archiveURL = api_get_path(WEB_CODE_PATH) . 'course_info/download.php?archive=';
|
|
|
|
$tool_name = get_lang('ExportSessionListXMLCSV');
|
|
|
|
global $_configuration;
|
|
|
|
$interbreadcrumb[] = array('url' => 'index.php', "name" => get_lang('Sessions'));
|
|
|
|
set_time_limit(0);
|
|
|
|
if ($_POST['formSent']) {
|
|
$formSent = $_POST['formSent'];
|
|
$file_type = ($_POST['file_type'] == 'csv') ? 'csv' : 'xml';
|
|
$session_id = $_POST['session_id'];
|
|
if (empty($session_id)) {
|
|
$sql = "SELECT id,name,id_coach,username,access_start_date,access_end_date,visibility,session_category_id
|
|
FROM $tbl_session INNER JOIN $tbl_user
|
|
ON $tbl_user.user_id = $tbl_session.id_coach ORDER BY id";
|
|
if ($_configuration['multiple_access_urls']) {
|
|
$tbl_session_rel_access_url = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_SESSION);
|
|
$access_url_id = api_get_current_access_url_id();
|
|
if ($access_url_id != -1) {
|
|
$sql = "SELECT id, name,id_coach,username,access_start_date,access_end_date,visibility,session_category_id
|
|
FROM $tbl_session s INNER JOIN $tbl_session_rel_access_url as session_rel_url
|
|
ON (s.id= session_rel_url.session_id) INNER JOIN $tbl_user u ON (u.user_id = s.id_coach)
|
|
WHERE access_url_id = $access_url_id
|
|
ORDER BY id";
|
|
}
|
|
}
|
|
$result = Database::query($sql);
|
|
} else {
|
|
$sql = "SELECT id,name,username,access_start_date,access_end_date,visibility,session_category_id
|
|
FROM $tbl_session
|
|
INNER JOIN $tbl_user
|
|
ON $tbl_user.user_id = $tbl_session.id_coach
|
|
WHERE id='$session_id'";
|
|
|
|
$result = Database::query($sql);
|
|
}
|
|
|
|
if (Database::num_rows($result)) {
|
|
if (!file_exists($archivePath)) {
|
|
mkdir($archivePath, api_get_permissions_for_new_directories(), true);
|
|
}
|
|
|
|
if (!file_exists($archivePath . 'index.html')) {
|
|
$fp = fopen($archivePath . 'index.html', 'w');
|
|
|
|
fputs($fp, '<html><head></head><body></body></html>');
|
|
|
|
fclose($fp);
|
|
}
|
|
|
|
$archiveFile = 'export_sessions_' . $session_id . '_' . date('Y-m-d_H-i-s') . '.' . $file_type;
|
|
|
|
while (file_exists($archivePath . $archiveFile)) {
|
|
$archiveFile = 'export_users_' . $session_id . '_' . date('Y-m-d_H-i-s') . '_' . uniqid('') . '.' . $file_type;
|
|
}
|
|
$fp = fopen($archivePath . $archiveFile, 'w');
|
|
|
|
if ($file_type == 'csv') {
|
|
$cvs = true;
|
|
fputs($fp, "SessionName;Coach;DateStart;DateEnd;Visibility;SessionCategory;Users;Courses;\n");
|
|
} else {
|
|
$cvs = false;
|
|
fputs($fp, "<?xml version=\"1.0\" encoding=\"" . api_get_system_encoding() . "\"?>\n<Sessions>\n");
|
|
}
|
|
|
|
while ($row = Database::fetch_array($result)) {
|
|
$add = '';
|
|
$row['name'] = str_replace(';', ',', $row['name']);
|
|
$row['username'] = str_replace(';', ',', $row['username']);
|
|
$row['access_start_date'] = str_replace(';', ',', api_get_local_time($row['access_start_date'], null, null, true));
|
|
$row['access_end_date'] = str_replace(';', ',', api_get_local_time($row['access_end_date'], null, null, true));
|
|
$row['visibility'] = str_replace(';', ',', $row['visibility']);
|
|
$row['session_category'] = str_replace(';', ',', $row['session_category_id']);
|
|
if ($cvs) {
|
|
$add.= $row['name'] . ';' . $row['username'] . ';' . $row['access_start_date'] . ';' . $row['access_end_date'] . ';' . $row['visibility'] . ';' . $row['session_category'] . ';';
|
|
} else {
|
|
$add = "\t<Session>\n"
|
|
. "\t\t<SessionName>$row[name]</SessionName>\n"
|
|
. "\t\t<Coach>$row[username]</Coach>\n"
|
|
. "\t\t<DateStart>$row[access_start_date]</DateStart>\n"
|
|
. "\t\t<DateEnd>$row[access_end_date]</DateEnd>\n"
|
|
. "\t\t<Visibility>$row[visibility]</Visibility>\n"
|
|
. "\t\t<SessionCategory>$row[session_category]</SessionCategory>\n";
|
|
}
|
|
|
|
//users
|
|
$sql = "SELECT DISTINCT $tbl_user.username FROM $tbl_user
|
|
INNER JOIN $tbl_session_user
|
|
ON $tbl_user.user_id = $tbl_session_user.id_user AND $tbl_session_user.relation_type<>" . SESSION_RELATION_TYPE_RRHH . "
|
|
AND $tbl_session_user.id_session = '" . $row['id'] . "'";
|
|
|
|
$rsUsers = Database::query($sql);
|
|
$users = '';
|
|
while ($rowUsers = Database::fetch_array($rsUsers)) {
|
|
if ($cvs) {
|
|
$users .= str_replace(';', ',', $rowUsers['username']) . '|';
|
|
} else {
|
|
$users .= "\t\t<User>$rowUsers[username]</User>\n";
|
|
}
|
|
}
|
|
if (!empty($users) && $cvs)
|
|
$users = api_substr($users, 0, api_strlen($users) - 1);
|
|
|
|
if ($cvs)
|
|
$users .= ';';
|
|
|
|
$add .= $users;
|
|
|
|
//courses
|
|
$sql = "SELECT DISTINCT $tbl_course.id, $tbl_course.code
|
|
FROM $tbl_course
|
|
INNER JOIN $tbl_session_course_user
|
|
ON $tbl_course.id = $tbl_session_course_user.c_id
|
|
AND $tbl_session_course_user.id_session = '" . $row['id'] . "'";
|
|
|
|
$rsCourses = Database::query($sql);
|
|
|
|
$courses = '';
|
|
while ($rowCourses = Database::fetch_array($rsCourses)) {
|
|
|
|
// Get coachs from a course
|
|
$sql = "SELECT u.username
|
|
FROM $tbl_session_course_user scu
|
|
INNER JOIN $tbl_user u ON u.user_id = scu.id_user
|
|
WHERE scu.c_id = '{$rowCourses['id']}' AND
|
|
scu.id_session = '" . $row['id'] . "' AND
|
|
scu.status = 2 ";
|
|
|
|
$rs_coachs = Database::query($sql);
|
|
$coachs = array();
|
|
while ($row_coachs = Database::fetch_array($rs_coachs)) {
|
|
$coachs[] = $row_coachs['username'];
|
|
}
|
|
|
|
$coachs = implode(",", $coachs);
|
|
if ($cvs) {
|
|
$courses .= str_replace(';', ',', $rowCourses['code']);
|
|
$courses .= '[' . str_replace(';', ',', $coachs) . '][';
|
|
} else {
|
|
$courses .= "\t\t<Course>\n";
|
|
$courses .= "\t\t\t<CourseCode>$rowCourses[code]</CourseCode>\n";
|
|
$courses .= "\t\t\t<Coach>$coachs</Coach>\n";
|
|
}
|
|
|
|
// rel user courses
|
|
$sql = "SELECT DISTINCT u.username
|
|
FROM $tbl_session_course_user scu
|
|
INNER JOIN $tbl_session_user su ON scu.id_user = su.id_user AND scu.id_session = su.id_session AND su.relation_type<>" . SESSION_RELATION_TYPE_RRHH . "
|
|
INNER JOIN $tbl_user u
|
|
ON scu.id_user = u.user_id
|
|
AND scu.c_id='" . $rowCourses['id'] . "'
|
|
AND scu.id_session='" . $row['id'] . "'";
|
|
|
|
$rsUsersCourse = Database::query($sql);
|
|
$userscourse = '';
|
|
while ($rowUsersCourse = Database::fetch_array($rsUsersCourse)) {
|
|
|
|
if ($cvs) {
|
|
$userscourse .= str_replace(';', ',', $rowUsersCourse['username']) . ',';
|
|
} else {
|
|
$courses .= "\t\t\t<User>$rowUsersCourse[username]</User>\n";
|
|
}
|
|
}
|
|
if ($cvs) {
|
|
if (!empty($userscourse))
|
|
$userscourse = api_substr($userscourse, 0, api_strlen($userscourse) - 1);
|
|
|
|
$courses .= $userscourse . ']|';
|
|
}
|
|
else {
|
|
$courses .= "\t\t</Course>\n";
|
|
}
|
|
}
|
|
|
|
if (!empty($courses) && $cvs)
|
|
$courses = api_substr($courses, 0, api_strlen($courses) - 1);
|
|
$add .= $courses;
|
|
|
|
if ($cvs) {
|
|
$breakline = api_is_windows_os() ? "\r\n" : "\n";
|
|
$add .= ";$breakline";
|
|
} else {
|
|
$add .= "\t</Session>\n";
|
|
}
|
|
|
|
fputs($fp, $add);
|
|
}
|
|
|
|
if (!$cvs)
|
|
fputs($fp, "</Sessions>\n");
|
|
fclose($fp);
|
|
|
|
$errorMsg = get_lang('UserListHasBeenExported') . '<br/><a class="btn" href="' . $archiveURL . $archiveFile . '">' . get_lang('ClickHereToDownloadTheFile') . '</a>';
|
|
}
|
|
}
|
|
|
|
// display the header
|
|
Display::display_header($tool_name);
|
|
|
|
//select of sessions
|
|
$sql = "SELECT id, name FROM $tbl_session ORDER BY name";
|
|
|
|
if (api_is_multiple_url_enabled()) {
|
|
$tbl_session_rel_access_url = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_SESSION);
|
|
$access_url_id = api_get_current_access_url_id();
|
|
if ($access_url_id != -1) {
|
|
$sql = "SELECT id, name FROM $tbl_session s INNER JOIN $tbl_session_rel_access_url as session_rel_url
|
|
ON (s.id= session_rel_url.session_id)
|
|
WHERE access_url_id = $access_url_id
|
|
ORDER BY name";
|
|
}
|
|
}
|
|
|
|
$result = Database::query($sql);
|
|
$Sessions = Database::store_result($result);
|
|
|
|
echo '<div class="actions">';
|
|
echo '<a href="../admin/index.php">' . Display::return_icon('back.png', get_lang('BackTo') . ' ' . get_lang('PlatformAdmin'), '', ICON_SIZE_MEDIUM) . '</a>';
|
|
echo '</div>';
|
|
|
|
if (!empty($errorMsg)) {
|
|
Display::display_normal_message($errorMsg, false); //main API
|
|
}
|
|
|
|
$form = new FormValidator('session_export', 'post', api_get_self());
|
|
$form->addElement('hidden', 'formSent', 1);
|
|
$form->addElement('radio', 'file_type', get_lang('OutputFileType'), 'CSV', 'csv', null, array('id' => 'file_type_csv'));
|
|
$form->addElement('radio', 'file_type', null, 'XML', 'xml', null, array('id' => 'file_type_xml'));
|
|
|
|
$options = array();
|
|
$options['0'] = get_lang('AllSessions');
|
|
foreach ($Sessions as $enreg) {
|
|
$options[$enreg['id']] = $enreg['name'];
|
|
}
|
|
|
|
$form->addElement('select', 'session_id', get_lang('WhichSessionToExport'), $options);
|
|
$form->addElement('button', 'submit', get_lang('ExportSession'));
|
|
|
|
$defaults = array();
|
|
$defaults['file_type'] = 'csv';
|
|
$form->setDefaults($defaults);
|
|
$form->display();
|
|
unset($Courses);
|
|
Display::display_footer(); |