<?php
/* For licensing terms, see /license.txt */

/**
 *	@package chamilo.main
 *	@author Patrick Cool <patrick.cool@UGent.be>, Ghent University, Refactoring
 *	@version $Id: index.php 22368 2009-07-24 23:25:57Z iflorespaz $
 *	@todo check the different @todos in this page and really do them
 *	@todo check if the news management works as expected
 */

// Only this script should have this constant defined. This is used to activate the javascript that
// gives the login name automatic focus in header.inc.html.
/** @todo Couldn't this be done using the $HtmlHeadXtra array? */
define('DOKEOS_HOMEPAGE', true);

$language_file = array('courses', 'index');

/* Flag forcing the 'current course' reset, as we're not inside a course anymore */
// Maybe we should change this into an api function? an example: Coursemanager::unset();
$cidReset = true;

/* 	Included libraries */

/** @todo make all the library files consistent, use filename.lib.php and not filename.lib.inc.php */
require_once 'main/inc/global.inc.php';

require_once api_get_path(LIBRARY_PATH).'course.lib.php';
require_once api_get_path(LIBRARY_PATH).'events.lib.inc.php';
require_once api_get_path(LIBRARY_PATH).'system_announcements.lib.php';
require_once api_get_path(LIBRARY_PATH).'groupmanager.lib.php';
require_once api_get_path(LIBRARY_PATH).'formvalidator/FormValidator.class.php';
require_once 'main/chat/chat_functions.lib.php';

$loginFailed = isset($_GET['loginFailed']) ? true : isset($loginFailed);
$setting_show_also_closed_courses = api_get_setting('show_closed_courses') == 'true';

// the section (for the tabs)
$this_section = SECTION_CAMPUS;

/*	Action Handling */

/** @todo 	Wouldn't it make more sense if this would be done in local.inc.php so that local.inc.php become the only place where authentication is done?
 * 			by doing this you could logout from any page instead of only from index.php. From the moment there is a logout=true in the url you will be logged out
 * 			this can be usefull when you are on an open course and you need to log in to edit something and you immediately want to check how anonymous users
 * 			will see it.
 */
$my_user_id = api_get_user_id();

if (!empty($_GET['logout'])) {
	logout();
}

/* 	Table definitions */
$main_course_table 		= Database :: get_main_table(TABLE_MAIN_COURSE);
$main_category_table 	= Database :: get_main_table(TABLE_MAIN_CATEGORY);
$track_login_table 		= Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_LOGIN);

/* 	Constants and CONFIGURATION parameters */
/** @todo these configuration settings should move to the dokeos config settings */
/** defines wether or not anonymous visitors can see a list of the courses on the Dokeos homepage that are open to the world */
$_setting['display_courses_to_anonymous_users'] = 'true';

/** @todo remove this piece of code because this is not used */
if (isset($_user['user_id'])) {
	$nameTools = api_get_setting('siteName');
}

/* 		LOGIN  	*/

/**
 * @todo This piece of code should probably move to local.inc.php where the actual login / logout procedure is handled.
 * @todo consider removing this piece of code because does nothing.
 */
if (isset($_GET['submitAuth']) && $_GET['submitAuth'] == 1) {
	// nice lie!!!
	echo 'Attempted breakin - sysadmins notified.';
	session_destroy();
	die();
}

// Delete session neccesary for legal terms
if (api_get_setting('allow_terms_conditions') == 'true') {
	unset($_SESSION['update_term_and_condition']);
	unset($_SESSION['info_current_user']);
}

/**
 * @todo This piece of code should probably move to local.inc.php where the actual login procedure is handled.
 * @todo check if this code is used. I think this code is never executed because after clicking the submit button
 * 		 the code does the stuff in local.inc.php and then redirects to index.php or user_portal.php depending
 * 		 on api_get_setting('page_after_login')
 */

if (!empty($_POST['submitAuth'])) {
	// the user is already authenticated, we now find the last login of the user.
	if (isset ($_user['user_id'])) {
		$sql_last_login = "SELECT UNIX_TIMESTAMP(login_date)
								FROM $track_login_table
								WHERE login_user_id = '".$_user['user_id']."'
								ORDER BY login_date DESC LIMIT 1";
		$result_last_login = Database::query($sql_last_login);
		if (!$result_last_login) {
			if (Database::num_rows($result_last_login) > 0) {
				$user_last_login_datetime = Database::fetch_array($result_last_login);
				$user_last_login_datetime = $user_last_login_datetime[0];
				api_session_register('user_last_login_datetime');
			}
		}
		Database::free_result($result_last_login);

		//event_login();
		if (api_is_platform_admin()) {
			// decode all open event informations and fill the track_c_* tables
			include api_get_path(LIBRARY_PATH).'stats.lib.inc.php';
			decodeOpenInfos();
		}
	}

} // end login -- if ($_POST['submitAuth'])
else {
	// only if login form was not sent because if the form is sent the user was already on the page.
	event_open();
}

// the header
Display::display_header(get_lang('Homepage'));

/*
	MAIN CODE
*/

echo '<div class="maincontent" id="content">';

// Plugins for loginpage_main AND campushomepage_main
if (!api_get_user_id()) {
	api_plugin('loginpage_main');
} else {
	api_plugin('campushomepage_main');
}

$home = 'home/';
if ($_configuration['multiple_access_urls']) {
	$access_url_id = api_get_current_access_url_id();
	if ($access_url_id != -1){
		$url_info = api_get_access_url($access_url_id);
		$url = api_remove_trailing_slash(preg_replace('/https?:\/\//i', '', $url_info['url']));
		$clean_url = replace_dangerous_char($url);
		$clean_url = str_replace('/', '-', $clean_url);
		$clean_url .= '/';
		$home_old = 'home/';
		$home = 'home/'.$clean_url;
	}
}

// Including the page for the news
$page_included = false;

if (!empty($_GET['include']) && preg_match('/^[a-zA-Z0-9_-]*\.html$/', $_GET['include'])) {
	$open = @(string)file_get_contents(api_get_path(SYS_PATH).$home.$_GET['include']);
	$open = api_to_system_encoding($open, api_detect_encoding(strip_tags($open)));
	echo $open;
	$page_included = true;
} else {

	if (!empty($_SESSION['user_language_choice'])) {
		$user_selected_language = $_SESSION['user_language_choice'];
	} elseif (!empty($_SESSION['_user']['language'])) {
		$user_selected_language = $_SESSION['_user']['language'];
	} else {
		$user_selected_language = api_get_setting('platformLanguage');
	}

	if (!file_exists($home.'home_news_'.$user_selected_language.'.html')) {
		if (file_exists($home.'home_top.html')) {
			$home_top_temp = file($home.'home_top.html');
		} else {
			$home_top_temp = file($home_old.'home_top.html');
		}
		$home_top_temp = implode('', $home_top_temp);
	} else {
		if (file_exists($home.'home_top_'.$user_selected_language.'.html')) {
			$home_top_temp = file_get_contents($home.'home_top_'.$user_selected_language.'.html');
		} else {
			$home_top_temp = file_get_contents($home.'home_top.html');
		}
	}
	if(trim($home_top_temp)=='') {
		$home_top_temp = get_lang('PortalHomepageDefaultIntroduction');
	}
    $open = str_replace('{rel_path}', api_get_path(REL_PATH), $home_top_temp);
    $open = api_to_system_encoding($open, api_detect_encoding(strip_tags($open)));
    echo $open;
}

// Display System announcements
$announcement = isset($_GET['announcement']) ? $_GET['announcement'] : -1;
$announcement = intval($announcement);

if (isset($_user['user_id'])) {
	$visibility = api_is_allowed_to_create_course() ? VISIBLE_TEACHER : VISIBLE_STUDENT;
	SystemAnnouncementManager :: display_announcements($visibility, $announcement);
} else {
	SystemAnnouncementManager :: display_announcements(VISIBLE_GUEST, $announcement);
}

// Display courses and category list
if (!$page_included) {
	if (api_get_setting('display_categories_on_homepage') == 'true') {
		echo '<div class="home_cats">';
		display_anonymous_course_list();
		echo '</div>';
	}
}
echo '</div>';

// Display right menu: language form, login section + useful weblinks
echo '<div class="menu" id="menu">';
display_anonymous_right_menu();
echo '</div>';

/*
	Footer
*/
Display :: display_footer();

/*
	Functions
*/

/**
 * This function handles the logout and is called whenever there is a $_GET['logout']
 *
 * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University
 */
function logout() {
	global $_configuration, $extAuthSource;
	// variable initialisation
	$query_string = '';

	if (!empty($_SESSION['user_language_choice'])) {
		$query_string = '?language='.$_SESSION['user_language_choice'];
	}

	// Database table definition
	$tbl_track_login = Database :: get_statistic_table(TABLE_STATISTIC_TRACK_E_LOGIN);

	// selecting the last login of the user
	$uid = intval($_GET['uid']);
	$sql_last_connection = "SELECT login_id, login_date FROM $tbl_track_login WHERE login_user_id='$uid' ORDER BY login_date DESC LIMIT 0,1";
	$q_last_connection = Database::query($sql_last_connection);
	if (Database::num_rows($q_last_connection) > 0) {
		$i_id_last_connection = Database::result($q_last_connection, 0, 'login_id');
	}

	if (!isset($_SESSION['login_as'])) {
		$current_date = date('Y-m-d H:i:s', time());
		$s_sql_update_logout_date = "UPDATE $tbl_track_login SET logout_date='".$current_date."' WHERE login_id='$i_id_last_connection'";
		Database::query($s_sql_update_logout_date);
	}
	LoginDelete($uid, $_configuration['statistics_database']); //from inc/lib/online.inc.php - removes the "online" status

	//the following code enables the use of an external logout function.
	//example: define a $extAuthSource['ldap']['logout']="file.php" in configuration.php
	// then a function called ldap_logout() inside that file
	// (using *authent_name*_logout as the function name) and the following code
	// will find and execute it
	$uinfo = api_get_user_info($uid);
	if (($uinfo['auth_source'] != PLATFORM_AUTH_SOURCE) && is_array($extAuthSource)) {
		if (is_array($extAuthSource[$uinfo['auth_source']])) {
			$subarray = $extAuthSource[$uinfo['auth_source']];
			if (!empty($subarray['logout']) && file_exists($subarray['logout'])) {
				include_once ($subarray['logout']);
				$logout_function = $uinfo['auth_source'].'_logout';
				if (function_exists($logout_function)) {
					$logout_function($uinfo);
				}
			}
		}
	}
	exit_of_chat($uid);
	api_session_destroy();
	header("Location: index.php$query_string");
	exit();
}

/**
 * This function checks if there are courses that are open to the world in the platform course categories (=faculties)
 *
 * @param unknown_type $category
 * @return boolean
 */
function category_has_open_courses($category) {
	global $setting_show_also_closed_courses;

	$user_identified = (api_get_user_id() > 0 && !api_is_anonymous());
	$main_course_table = Database :: get_main_table(TABLE_MAIN_COURSE);
	$sql_query = "SELECT * FROM $main_course_table WHERE category_code='$category'";
	$sql_result = Database::query($sql_query);
	while ($course = Database::fetch_array($sql_result)) {
		if (!$setting_show_also_closed_courses) {
			if ((api_get_user_id() > 0
				&& $course['visibility'] == COURSE_VISIBILITY_OPEN_PLATFORM)
				|| ($course['visibility'] == COURSE_VISIBILITY_OPEN_WORLD)) {
				return true; //at least one open course
			}
		} else {
			if (isset($course['visibility'])) {
				return true; //at least one course (does not matter weither it's open or not because $setting_show_also_closed_courses = true
			}
		}
	}
	return false;
}

/**
 * Display create course link
 */
function display_create_course_link() {
	echo '<li><a href="main/create_course/add_course.php">'.get_lang('CourseCreate').'</a></li>';
}

/**
 * Display edit course list links
 */
function display_edit_course_list_links() {
	echo '<li><a href="main/auth/courses.php">'.get_lang('CourseManagement').'</a></li>';
}

/**
 * Display dashboard link
 */
function display_dashboard_link() {
	echo '<li><a href="main/dashboard/index.php">'.get_lang('Dashboard').'</a></li>';
}

/**
 * Displays the right-hand menu for anonymous users:
 * login form, useful links, help section
 * Warning: function defines globals
 * @version 1.0.1
 * @todo does $_plugins need to be global?
 */
function display_anonymous_right_menu() {
	global $loginFailed, $_plugins, $_user, $menu_navigation;

	$platformLanguage = api_get_setting('platformLanguage');
	$sys_path = api_get_path(SYS_PATH);

	if (!($_user['user_id']) || api_is_anonymous($_user['user_id']) ) { // Only display if the user isn't logged in
		api_display_language_form(true);
		echo '<br />';
		display_login_form();

		if ($loginFailed) {
			echo '<br />';
			handle_login_failed();
		}
		if (api_get_setting('allow_lostpassword') == 'true' || api_get_setting('allow_registration') == 'true') {
			echo '<div class="menusection"><span class="menusectioncaption">'.get_lang('MenuUser').'</span><ul class="menulist">';
			if (api_get_setting('allow_registration') != 'false') {
				echo '<li><a href="main/auth/inscription.php">'.get_lang('Reg').'</a></li>';
			}
			if (api_get_setting('allow_lostpassword') == 'true') {
				display_lost_password_info();
			}
			echo '</ul></div>';
		}
		if (api_number_of_plugins('loginpage_menu') > 0) {
			echo '<div class="note" style="background: none">';
			api_plugin('loginpage_menu');
			echo '</div>';
		}
	}


	// My Account section
	if (isset($_SESSION['_user']['user_id']) && $_SESSION['_user']['user_id'] != 0) {
		// tabs that are deactivated are added here

		$show_menu = false;
		$show_create_link = false;
		$show_course_link = false;

		$display_add_course_link = api_is_allowed_to_create_course() && ($_SESSION['studentview'] != 'studentenview');

		if ($display_add_course_link) {
			//display_create_course_link();
			$show_menu = true;
			$show_create_link = true;
		}

		if (api_is_platform_admin() || api_is_course_admin() || api_is_allowed_to_create_course()) {
			$show_menu = true;
			$show_course_link = true;
		} else {
			if (api_get_setting('allow_students_to_browse_courses') == 'true') {
				$show_menu = true;
				$show_course_link = true;
			}
		}

		if ($show_menu) {
			echo '<div class="menusection">';
			echo '<span class="menusectioncaption">'.get_lang('MenuUser').'</span>';
			echo '<ul class="menulist">';
			if ($show_create_link) {
				display_create_course_link();
			}
			if ($show_course_link) {
				if (!api_is_drh() && !api_is_session_admin()) {
					display_edit_course_list_links();
				} else {
					display_dashboard_link();
				}
			}
			echo '</ul></div>';
		}

		// Deleting the myprofile link
		if (api_get_setting('allow_social_tool') == 'true') {
			unset($menu_navigation['myprofile']);
		}

		if (!empty($menu_navigation)) {
			echo '<div class="menusection">';
			echo '<span class="menusectioncaption">'.get_lang('MainNavigation').'</span>';
			echo '<ul class="menulist">';
			foreach ($menu_navigation as $section => $navigation_info) {
				$current = $section == $GLOBALS['this_section'] ? ' id="current"' : '';
				echo '<li'.$current.'><a href="'.$navigation_info['url'].'" target="_self">'.$navigation_info['title'].'</a></li>', "\n";
			}
			echo '</ul></div>';
		}
	}

	// Help section
	/*** Hide right menu "general" and other parts on anonymous right menu *****/

	$user_selected_language = api_get_interface_language();
	global $home, $home_old;
	if (!isset($user_selected_language)) {
		$user_selected_language = $platformLanguage;
	}

	$home_menu = @(string)file_get_contents($sys_path.$home.'home_menu_'.$user_selected_language.'.html');
	if (empty($home_menu)) {
		$home_menu = @(string)file_get_contents($sys_path.$home_old.'home_menu_'.$user_selected_language.'.html');
	}
	if (empty($home_menu)) {
		$home_menu = @(string)file_get_contents($sys_path.$home.'home_menu.html');
	}
	if (empty($home_menu)) {
		$home_menu = @(string)file_get_contents($sys_path.$home_old.'home_menu.html');
	}
	if (!empty($home_menu)) {
		echo '<div class="menusection">', '<span class="menusectioncaption">'.get_lang('MenuGeneral').'</span>';
	 	echo '<ul class="menulist">';
	 	$home_menu = api_to_system_encoding($home_menu, api_detect_encoding(strip_tags($home_menu)));
	 	echo $home_menu;
		echo '</ul></div>';
	}

	if ($_user['user_id'] && api_number_of_plugins('campushomepage_menu') > 0) {
		echo '<div class="note" style="background: none">';
		api_plugin('campushomepage_menu');
		echo '</div>';
	}

	// includes for any files to be displayed below anonymous right menu

	$home_notice = @(string)file_get_contents($sys_path.$home.'home_notice_'.$user_selected_language.'.html');
	if (empty($home_notice)) {
		$home_notice = @(string)file_get_contents($sys_path.$home.'home_notice.html');
	}
	if (!empty($home_notice)) {
		echo '<div class="note">';
		$home_notice = api_to_system_encoding($home_notice, api_detect_encoding(strip_tags($home_notice)));
	 	echo $home_notice;
		echo '</div>';
	}
}

/**
*	Reacts on a failed login:
*	Displays an explanation with a link to the registration form.
*
*	@version 1.0.1
*/
function handle_login_failed() {
	if (!isset($_GET['error'])) {
		$message = get_lang('InvalidId');
		if (api_is_self_registration_allowed()) {
			$message = get_lang('InvalidForSelfRegistration');
		}
	} else {
		switch ($_GET['error']) {
			case '':
				$message = get_lang('InvalidId');
				if (api_is_self_registration_allowed()) {
					$message = get_lang('InvalidForSelfRegistration');
				}
				break;
			case 'account_expired':
				$message = get_lang('AccountExpired');
				break;
			case 'account_inactive':
				$message = get_lang('AccountInactive');
				break;
			case 'user_password_incorrect':
				$message = get_lang('InvalidId');
				break;
			case 'access_url_inactive':
				$message = get_lang('AccountURLInactive');
				break;
		}
	}
	echo '<div id="login_fail">'.$message.'</div>';
}

/**
*	Adds a form to let users login
*	@version 1.1
*/
function display_login_form() {
	$form = new FormValidator('formLogin');
	$form->addElement('text', 'login', get_lang('UserName'), array('size' => 17));
	$form->addElement('password', 'password', get_lang('Pass'), array('size' => 17));
	$form->addElement('style_submit_button','submitAuth', get_lang('LoginEnter'), array('class' => 'login'));
	$renderer =& $form->defaultRenderer();
	$renderer->setElementTemplate('<div><label>{label}</label></div><div>{element}</div>');
	$form->display();
	if (api_get_setting('openid_authentication') == 'true') {
		include_once 'main/auth/openid/login.php';
		echo '<div>'.openid_form().'</div>';
	}
}

/**
 * Displays a link to the lost password section
 */
function display_lost_password_info() {
	echo '<li><a href="main/auth/lostPassword.php">'.get_lang('LostPassword').'</a></li>';
}

/**
* Display list of courses in a category.
* (for anonymous users)
*
* @version 1.1
* @author Patrick Cool <patrick.cool@UGent.be>, Ghent University - refactoring and code cleaning
*/
function display_anonymous_course_list() {
	$ctok = $_SESSION['sec_token'];
	$stok = Security::get_token();

	//init
	$user_identified = (api_get_user_id() > 0 && !api_is_anonymous());
	$web_course_path = api_get_path(WEB_COURSE_PATH);
	$category = Database::escape_string($_GET['category']);
	global $setting_show_also_closed_courses;

	// Database table definitions
	$main_course_table 		= Database :: get_main_table(TABLE_MAIN_COURSE);
	$main_category_table 	= Database :: get_main_table(TABLE_MAIN_CATEGORY);

	$platformLanguage = api_get_setting('platformLanguage');

	//get list of courses in category $category
	$sql_get_course_list = "SELECT * FROM $main_course_table cours
								WHERE category_code = '".Database::escape_string($_GET['category'])."'
								ORDER BY title, UPPER(visual_code)";

	//showing only the courses of the current access_url_id
	global $_configuration;
	if ($_configuration['multiple_access_urls']) {
		$url_access_id = api_get_current_access_url_id();
		if ($url_access_id != -1) {
			$tbl_url_rel_course = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
			$sql_get_course_list = "SELECT * FROM $main_course_table as course INNER JOIN $tbl_url_rel_course as url_rel_course
					ON (url_rel_course.course_code=course.code)
					WHERE access_url_id = $url_access_id AND category_code = '".Database::escape_string($_GET['category'])."' ORDER BY title, UPPER(visual_code)";
		}
	}

	// Removed: AND cours.visibility='".COURSE_VISIBILITY_OPEN_WORLD."'
	$sql_result_courses = Database::query($sql_get_course_list);

	while ($course_result = Database::fetch_array($sql_result_courses)) {
		$course_list[] = $course_result;
	}

	$platform_visible_courses = '';
	// $setting_show_also_closed_courses
	if($user_identified) {
		if ($setting_show_also_closed_courses) {
			$platform_visible_courses = '';
		} else {
			$platform_visible_courses = "  AND (t3.visibility='".COURSE_VISIBILITY_OPEN_WORLD."' OR t3.visibility='".COURSE_VISIBILITY_OPEN_PLATFORM."' )";
		}
	} else {
		if ($setting_show_also_closed_courses) {
			$platform_visible_courses = '';
		} else {
			$platform_visible_courses = "  AND (t3.visibility='".COURSE_VISIBILITY_OPEN_WORLD."' )";
		}
	}
	$sqlGetSubCatList = "
				SELECT t1.name,t1.code,t1.parent_id,t1.children_count,COUNT(DISTINCT t3.code) AS nbCourse
				FROM $main_category_table t1
				LEFT JOIN $main_category_table t2 ON t1.code=t2.parent_id
				LEFT JOIN $main_course_table t3 ON (t3.category_code=t1.code $platform_visible_courses)
				WHERE t1.parent_id ". (empty ($category) ? "IS NULL" : "='$category'")."
				GROUP BY t1.name,t1.code,t1.parent_id,t1.children_count ORDER BY t1.tree_pos, t1.name";


	// Showing only the category of courses of the current access_url_id
	global $_configuration;
	if ($_configuration['multiple_access_urls']) {
		$url_access_id = api_get_current_access_url_id();
		if ($url_access_id != -1) {
			$tbl_url_rel_course = Database::get_main_table(TABLE_MAIN_ACCESS_URL_REL_COURSE);
			$sqlGetSubCatList = "
				SELECT t1.name,t1.code,t1.parent_id,t1.children_count,COUNT(DISTINCT t3.code) AS nbCourse
				FROM $main_category_table t1
				LEFT JOIN $main_category_table t2 ON t1.code=t2.parent_id
				LEFT JOIN $main_course_table t3 ON (t3.category_code=t1.code $platform_visible_courses)
				INNER JOIN $tbl_url_rel_course as url_rel_course
					ON (url_rel_course.course_code=t3.code)
				WHERE access_url_id = $url_access_id AND t1.parent_id ".(empty($category) ? "IS NULL" : "='$category'")."
				GROUP BY t1.name,t1.code,t1.parent_id,t1.children_count ORDER BY t1.tree_pos, t1.name";
		}
	}

	$resCats = Database::query($sqlGetSubCatList);
	$thereIsSubCat = false;
	if (Database::num_rows($resCats) > 0) {
		$htmlListCat = '<h4 style="margin-top: 0px;">'.get_lang('CatList').'</h4><ul>';
		while ($catLine = Database::fetch_array($resCats)) {
			if ($catLine['code'] != $category) {

				$category_has_open_courses = category_has_open_courses($catLine['code']);
				if ($category_has_open_courses) {
					// The category contains courses accessible to anonymous visitors
					$htmlListCat .= '<li>';
					$htmlListCat .= '<a href="'.api_get_self().'?category='.$catLine['code'].'">'.$catLine['name'].'</a>';
					if (api_get_setting('show_number_of_courses') == 'true') {
						$htmlListCat .= ' ('.$catLine['nbCourse'].' '.get_lang('Courses').')';
					}
					$htmlListCat .= "</li>\n";
					$thereIsSubCat = true;
				} elseif ($catLine['children_count'] > 0) {
					// The category has children, subcategories
					$htmlListCat .= '<li>';
					$htmlListCat .= '<a href="'.api_get_self().'?category='.$catLine['code'].'">'.$catLine['name'].'</a>';
					$htmlListCat .= "</li>\n";
					$thereIsSubCat = true;
				}
				/************************************************************************
				 end changed code to eliminate the (0 courses) after empty categories
				 ************************************************************************/
				elseif (api_get_setting('show_empty_course_categories') == 'true') {
					$htmlListCat .= '<li>';
					$htmlListCat .= $catLine['name'];
					$htmlListCat .= "</li>\n";
					$thereIsSubCat = true;
				} //else don't set thereIsSubCat to true to avoid printing things if not requested
			} else {
				$htmlTitre = '<p>';
				if (api_get_setting('show_back_link_on_top_of_tree') == 'true') {
					$htmlTitre .= '<a href="'.api_get_self().'">&lt;&lt; '.get_lang('BackToHomePage').'</a>';
				}
				if (!is_null($catLine['parent_id']) || (api_get_setting('show_back_link_on_top_of_tree') != 'true' && !is_null($catLine['code']))) {
					$htmlTitre .= '<a href="'.api_get_self().'?category='.$catLine['parent_id'].'">&lt;&lt; '.get_lang('Up').'</a>';
				}
				$htmlTitre .= "</p>\n";
				if ($category != "" && !is_null($catLine['code'])) {
					$htmlTitre .= '<h3>'.$catLine['name']."</h3>\n";
				} else {
					$htmlTitre .= '<h3>'.get_lang('Categories')."</h3>\n";
				}
			}
		}
		$htmlListCat .= "</ul>\n";
	}
	echo $htmlTitre;
	if ($thereIsSubCat) {
		echo $htmlListCat;
	}
	while ($categoryName = Database::fetch_array($resCats)) {
		echo '<h3>', $categoryName['name'], "</h3>\n";
	}
	$numrows = Database::num_rows($sql_result_courses);
	$courses_list_string = '';
	$courses_shown = 0;
	if ($numrows > 0) {
		if ($thereIsSubCat) {
			$courses_list_string .= "<hr size=\"1\" noshade=\"noshade\">\n";
		}
		$courses_list_string .= '<h4 style="margin-top: 0px;">'.get_lang('CourseList')."</h4>\n<ul>\n";

		if (api_get_user_id()) {
			$courses_of_user = get_courses_of_user(api_get_user_id());
		}

		foreach ($course_list as $course) {
			// $setting_show_also_closed_courses

			if (!$setting_show_also_closed_courses) {
				// If we do not show the closed courses
				// we only show the courses that are open to the world (to everybody)
				// and the courses that are open to the platform (if the current user is a registered user
				if( ($user_identified && $course['visibility'] == COURSE_VISIBILITY_OPEN_PLATFORM) || ($course['visibility'] == COURSE_VISIBILITY_OPEN_WORLD)) {
					$courses_shown++;
					$courses_list_string .= "<li>\n";
					$courses_list_string .= '<a href="'.$web_course_path.$course['directory'].'/">'.$course['title'].'</a><br />';
					if (api_get_setting('display_coursecode_in_courselist') == 'true') {
						$courses_list_string .= $course['visual_code'];
					}
					if (api_get_setting('display_coursecode_in_courselist') == 'true' && api_get_setting('display_teacher_in_courselist') == 'true') {
						$courses_list_string .= ' - ';
					}
					if (api_get_setting('display_teacher_in_courselist') == 'true') {
						$courses_list_string .= $course['tutor_name'];
					}
					if (api_get_setting('show_different_course_language') == 'true' && $course['course_language'] != api_get_setting('platformLanguage')) {
						$courses_list_string .= ' - '.$course['course_language'];
					}
					$courses_list_string .= "</li>\n";
				}
			}
			// We DO show the closed courses.
			// The course is accessible if (link to the course homepage)
			// 1. the course is open to the world (doesn't matter if the user is logged in or not): $course['visibility'] == COURSE_VISIBILITY_OPEN_WORLD)
			// 2. the user is logged in and the course is open to the world or open to the platform: ($user_identified && $course['visibility'] == COURSE_VISIBILITY_OPEN_PLATFORM)
			// 3. the user is logged in and the user is subscribed to the course and the course visibility is not COURSE_VISIBILITY_CLOSED
			// 4. the user is logged in and the user is course admin of te course (regardless of the course visibility setting)
			// 5. the user is the platform admin api_is_platform_admin()
			//
			else {
				$courses_shown++;
				$courses_list_string .= "<li>\n";
				if ($course['visibility'] == COURSE_VISIBILITY_OPEN_WORLD
						|| ($user_identified && $course['visibility'] == COURSE_VISIBILITY_OPEN_PLATFORM)
						|| ($user_identified && key_exists($course['code'], $courses_of_user) && $course['visibility'] != COURSE_VISIBILITY_CLOSED)
						|| $courses_of_user[$course['code']]['status'] == '1'
						|| api_is_platform_admin()) {
					$courses_list_string .= '<a href="'.$web_course_path.$course['directory'].'/">';
				}
				$courses_list_string .= $course['title'];
				if ($course['visibility'] == COURSE_VISIBILITY_OPEN_WORLD
						|| ($user_identified && $course['visibility'] == COURSE_VISIBILITY_OPEN_PLATFORM)
						|| ($user_identified && key_exists($course['code'], $courses_of_user) && $course['visibility'] != COURSE_VISIBILITY_CLOSED)
						|| $courses_of_user[$course['code']]['status'] == '1'
						|| api_is_platform_admin()) {
					$courses_list_string .= '</a><br />';
				}
				if (api_get_setting('display_coursecode_in_courselist') == 'true') {
					$courses_list_string .= ' '.$course['visual_code'];
				}
				if (api_get_setting('display_coursecode_in_courselist') == 'true' && api_get_setting('display_teacher_in_courselist') == 'true') {
					$courses_list_string .= ' - ';
				}
				if (api_get_setting('display_teacher_in_courselist') == 'true') {
					$courses_list_string .= $course['tutor_name'];
				}
				if (api_get_setting('show_different_course_language') == 'true' && $course['course_language'] != api_get_setting('platformLanguage')) {
					$courses_list_string .= ' - '.$course['course_language'];
				}
				if (api_get_setting('show_different_course_language') == 'true' && $course['course_language'] != api_get_setting('platformLanguage')) {
					$courses_list_string .= ' - '.$course['course_language'];
				}
				// We display a subscription link if
				// 1. it is allowed to register for the course and if the course is not already in the courselist of the user and if the user is identiefied
				// 2
				if ($user_identified && !key_exists($course['code'], $courses_of_user)) {
					if ($course['subscribe'] == '1') {
						$courses_list_string .= '<form action="main/auth/courses.php?action=subscribe&category='.Security::remove_XSS($_GET['category']).'" method="post">';
						$courses_list_string .= '<input type="hidden" name="sec_token" value="'.$stok.'">';
						$courses_list_string .= '<input type="hidden" name="subscribe" value="'.$course['code'].'" />';
						$courses_list_string .= '<input type="image" name="unsub" src="main/img/enroll.gif" alt="'.get_lang('Subscribe').'" />'.get_lang('Subscribe').'</form>';
					} else {
						$courses_list_string .= '<br />'.get_lang('SubscribingNotAllowed');
					}
				}
				$courses_list_string .= "</li>\n";
			}
		}
		$courses_list_string .= "</ul>\n";
	} else {
		// echo '<blockquote>', get_lang('_No_course_publicly_available'), "</blockquote>\n";
	}
	if ($courses_shown > 0) { //only display the list of courses and categories if there was more than
		// 0 courses visible to the world (we're in the anonymous list here)
		echo $courses_list_string;
	}
	if ($category != '') {
		echo '<p><a href="'.api_get_self().'"> ', Display :: return_icon('back.png', get_lang('BackToHomePage')), get_lang('BackToHomePage'), '</a></p>', "\n";
	}
}

/**
 * retrieves all the courses that the user has already subscribed to
 * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University, Belgium
 * @param int $user_id: the id of the user
 * @return array an array containing all the information of the courses of the given user
*/
function get_courses_of_user($user_id) {
	$table_course		= Database::get_main_table(TABLE_MAIN_COURSE);
	$table_course_user	= Database::get_main_table(TABLE_MAIN_COURSE_USER);
	// Secondly we select the courses that are in a category (user_course_cat <> 0) and sort these according to the sort of the category
	$user_id = intval($user_id);
	$sql_select_courses = "SELECT course.code k, course.visual_code  vc, course.subscribe subscr, course.unsubscribe unsubscr,
								course.title i, course.tutor_name t, course.db_name db, course.directory dir, course_rel_user.status status,
								course_rel_user.sort sort, course_rel_user.user_course_cat user_course_cat
								FROM    $table_course       course,
										$table_course_user  course_rel_user
								WHERE course.code = course_rel_user.course_code
								AND   course_rel_user.user_id = '".$user_id."'
								AND course_rel_user.relation_type<>".COURSE_RELATION_TYPE_RRHH."
								ORDER BY course_rel_user.sort ASC";
	$result = Database::query($sql_select_courses);
	$courses = array();
	while ($row = Database::fetch_array($result)) {
		// We only need the database name of the course
		$courses[$row['k']] = array('db' => $row['db'], 'code' => $row['k'], 'visual_code' => $row['vc'], 'title' => $row['i'], 'directory' => $row['dir'], 'status' => $row['status'], 'tutor' => $row['t'], 'subscribe' => $row['subscr'], 'unsubscribe' => $row['unsubscr'], 'sort' => $row['sort'], 'user_course_category' => $row['user_course_cat']);
	}
	return $courses;
}