2002-12-07 07:27:18 +00:00
|
|
|
<?PHP // $Id$
|
|
|
|
// index.php - the front page.
|
2004-05-28 10:53:54 +00:00
|
|
|
|
2004-08-12 15:53:32 +00:00
|
|
|
if (!file_exists('./config.php')) {
|
|
|
|
header('Location: install.php');
|
|
|
|
die;
|
|
|
|
}
|
|
|
|
|
|
|
|
/// Bounds for block widths on this page
|
2004-06-01 13:47:55 +00:00
|
|
|
define('BLOCK_L_MIN_WIDTH', 160);
|
|
|
|
define('BLOCK_L_MAX_WIDTH', 210);
|
|
|
|
define('BLOCK_R_MIN_WIDTH', 160);
|
|
|
|
define('BLOCK_R_MAX_WIDTH', 210);
|
|
|
|
|
2004-09-07 13:39:41 +00:00
|
|
|
require_once('config.php');
|
2004-09-07 14:15:17 +00:00
|
|
|
require_once($CFG->dirroot.'/course/lib.php');
|
|
|
|
require_once($CFG->dirroot.'/lib/blocklib.php');
|
|
|
|
require_once($CFG->dirroot.'/mod/resource/lib.php');
|
|
|
|
require_once($CFG->dirroot.'/mod/forum/lib.php');
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
optional_param('blockaction');
|
|
|
|
optional_param('instanceid', 0, PARAM_INT);
|
|
|
|
optional_param('blockid', 0, PARAM_INT);
|
|
|
|
|
2002-07-11 05:30:57 +00:00
|
|
|
if (! $site = get_site()) {
|
2003-10-19 02:40:03 +00:00
|
|
|
redirect("$CFG->wwwroot/$CFG->admin/index.php");
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
|
2004-01-14 08:27:18 +00:00
|
|
|
if ($CFG->forcelogin) {
|
|
|
|
require_login();
|
|
|
|
}
|
|
|
|
|
2002-08-09 02:45:15 +00:00
|
|
|
if (isadmin()) {
|
|
|
|
if (moodle_needs_upgrading()) {
|
2003-10-19 02:40:03 +00:00
|
|
|
redirect("$CFG->wwwroot/$CFG->admin/index.php");
|
2002-08-09 02:45:15 +00:00
|
|
|
}
|
2003-05-03 05:57:29 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
if (empty($USER->id)) {
|
2004-06-19 16:13:28 +00:00
|
|
|
if (empty($CFG->loginhttps)) {
|
|
|
|
$wwwroot = $CFG->wwwroot;
|
|
|
|
} else {
|
|
|
|
$wwwroot = str_replace('http','https',$CFG->wwwroot);
|
|
|
|
}
|
2004-09-12 21:55:34 +00:00
|
|
|
$loginstring = "<font size=\"2\"><a href=\"$wwwroot/login/index.php\">".get_string("login")."</a></font>";
|
2002-08-17 07:02:35 +00:00
|
|
|
} else {
|
2004-09-12 21:55:34 +00:00
|
|
|
$loginstring = "<font size=\"1\">".user_login_string($site)."</font>";
|
2002-06-16 03:25:10 +00:00
|
|
|
}
|
2003-01-20 08:01:46 +00:00
|
|
|
|
2003-05-03 06:50:29 +00:00
|
|
|
if (empty($CFG->langmenu)) {
|
|
|
|
$langmenu = "";
|
|
|
|
} else {
|
|
|
|
$currlang = current_language();
|
|
|
|
$langs = get_list_of_languages();
|
2004-04-07 13:07:38 +00:00
|
|
|
$langmenu = popup_form ("$CFG->wwwroot/index.php?lang=", $langs, "chooselang", $currlang, "", "", "", true);
|
2003-05-03 06:50:29 +00:00
|
|
|
}
|
2003-01-20 08:01:46 +00:00
|
|
|
|
2003-06-03 03:23:29 +00:00
|
|
|
print_header(strip_tags($site->fullname), "$site->fullname", "home", "",
|
2004-09-12 21:43:59 +00:00
|
|
|
"<meta name=\"description\" content=\"".s(strip_tags($site->summary))."\" />",
|
2004-02-15 13:54:47 +00:00
|
|
|
true, "", "$loginstring$langmenu");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2004-05-28 10:53:54 +00:00
|
|
|
$editing = isediting($site->id);
|
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
$page = new stdClass;
|
|
|
|
$page->id = SITEID;
|
|
|
|
$page->type = MOODLE_PAGE_COURSE;
|
2004-05-28 10:53:54 +00:00
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
$pageblocks = blocks_get_by_page($page);
|
2003-08-07 16:15:14 +00:00
|
|
|
|
2004-05-28 10:53:54 +00:00
|
|
|
if($editing) {
|
2004-10-19 21:04:28 +00:00
|
|
|
if (!empty($blockaction) && confirm_sesskey()) {
|
|
|
|
if (!empty($blockid)) {
|
|
|
|
blocks_execute_action($page, $pageblocks, strtolower($blockaction), intval($blockid));
|
|
|
|
|
2004-05-28 10:53:54 +00:00
|
|
|
}
|
2004-10-19 21:04:28 +00:00
|
|
|
else if (!empty($instanceid)) {
|
|
|
|
$instance = blocks_find_instance($instanceid, $pageblocks);
|
|
|
|
blocks_execute_action($page, $pageblocks, strtolower($blockaction), $instance);
|
2004-05-28 10:53:54 +00:00
|
|
|
}
|
2004-10-19 21:04:28 +00:00
|
|
|
// This re-query could be eliminated by judicious programming in blocks_execute_action(),
|
|
|
|
// but I 'm not sure if it's worth the complexity increase...
|
|
|
|
$pageblocks = blocks_get_by_page($page);
|
2004-05-28 10:53:54 +00:00
|
|
|
}
|
2003-08-07 16:15:14 +00:00
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
$missingblocks = blocks_get_missing($page, $pageblocks);
|
2004-05-28 10:53:54 +00:00
|
|
|
}
|
2003-08-07 16:15:14 +00:00
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
optional_variable($preferred_width_left, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT]));
|
|
|
|
optional_variable($preferred_width_right, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT]));
|
2004-06-01 13:47:55 +00:00
|
|
|
$preferred_width_left = min($preferred_width_left, BLOCK_L_MAX_WIDTH);
|
|
|
|
$preferred_width_left = max($preferred_width_left, BLOCK_L_MIN_WIDTH);
|
|
|
|
$preferred_width_right = min($preferred_width_right, BLOCK_R_MAX_WIDTH);
|
|
|
|
$preferred_width_right = max($preferred_width_right, BLOCK_R_MIN_WIDTH);
|
|
|
|
|
2001-11-22 06:23:56 +00:00
|
|
|
?>
|
|
|
|
|
2001-11-25 15:45:35 +00:00
|
|
|
|
2003-05-03 05:57:29 +00:00
|
|
|
<table width="100%" border="0" cellspacing="5" cellpadding="5">
|
|
|
|
<tr>
|
2004-05-28 10:53:54 +00:00
|
|
|
<?PHP
|
|
|
|
|
2004-10-19 21:04:28 +00:00
|
|
|
if(blocks_have_content($pageblocks[BLOCK_POS_LEFT]) || $editing) {
|
2004-05-28 10:53:54 +00:00
|
|
|
echo '<td style="vertical-align: top; width: '.$preferred_width_left.'px;">';
|
2004-10-19 21:04:28 +00:00
|
|
|
blocks_print_group($page, $pageblocks[BLOCK_POS_LEFT]);
|
2004-05-28 10:53:54 +00:00
|
|
|
echo '</td>';
|
|
|
|
}
|
|
|
|
|
|
|
|
echo '<td style="vertical-align: top;">';
|
2004-07-02 09:32:17 +00:00
|
|
|
|
|
|
|
|
|
|
|
/// Print Section
|
|
|
|
if ($site->numsections > 0) {
|
2004-07-09 05:33:07 +00:00
|
|
|
print_simple_box_start('center', '100%', $THEME->cellcontent, 5, 'sitetopic');
|
2004-07-02 09:32:17 +00:00
|
|
|
|
|
|
|
/// If currently moving a file then show the current clipboard
|
|
|
|
if (ismoving($site->id)) {
|
|
|
|
$stractivityclipboard = strip_tags(get_string("activityclipboard", "", addslashes($USER->activitycopyname)));
|
2004-09-12 21:55:34 +00:00
|
|
|
echo "<p><font size=\"2\">";
|
2004-07-09 05:33:07 +00:00
|
|
|
echo "$stractivityclipboard (<a href=\"course/mod.php?cancelcopy=true\">".get_string("cancel")."</a>)";
|
2004-07-02 09:32:17 +00:00
|
|
|
echo "</font></p>";
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2004-07-09 05:33:07 +00:00
|
|
|
if (!$section = get_record('course_sections', 'course', $site->id, 'section', 1)) {
|
|
|
|
delete_records('course_sections', 'course', $site->id, 'section', 1); // Just in case
|
|
|
|
$section->course = $site->id;
|
|
|
|
$section->section = 1;
|
|
|
|
$section->summary = '';
|
|
|
|
$section->visible = 1;
|
|
|
|
$section->id = insert_record('course_sections', $section);
|
|
|
|
}
|
2004-07-02 09:32:17 +00:00
|
|
|
|
2004-07-09 05:33:07 +00:00
|
|
|
echo format_text($section->summary, FORMAT_HTML);
|
2004-07-02 09:32:17 +00:00
|
|
|
|
|
|
|
if ($editing) {
|
2004-07-09 05:33:07 +00:00
|
|
|
$streditsummary = get_string('editsummary');
|
2004-07-02 09:32:17 +00:00
|
|
|
echo "<a title=\"$streditsummary\" ".
|
2004-07-09 05:33:07 +00:00
|
|
|
" href=\"course/editsection.php?id=$section->id\"><img src=\"$CFG->pixpath/t/edit.gif\" ".
|
2004-09-30 18:56:08 +00:00
|
|
|
" height=\"11\" width=\"11\" border=\"0\" alt=\"$streditsummary\" /></a><br /><br />";
|
2004-07-02 09:32:17 +00:00
|
|
|
}
|
|
|
|
|
2004-07-09 05:33:07 +00:00
|
|
|
get_all_mods($site->id, $mods, $modnames, $modnamesplural, $modnamesused);
|
|
|
|
print_section($site, $section, $mods, $modnamesused, true);
|
2004-07-02 09:32:17 +00:00
|
|
|
|
|
|
|
if ($editing) {
|
2004-07-26 16:22:45 +00:00
|
|
|
print_section_add_menus($site, $section->section, $modnames);
|
2004-07-02 09:32:17 +00:00
|
|
|
}
|
2004-07-09 05:33:07 +00:00
|
|
|
print_simple_box_end();
|
|
|
|
print_spacer(10);
|
2004-07-02 09:32:17 +00:00
|
|
|
}
|
|
|
|
|
2004-05-28 10:53:54 +00:00
|
|
|
switch ($CFG->frontpage) { /// Display the main part of the front page.
|
|
|
|
case FRONTPAGENEWS:
|
|
|
|
if (! $newsforum = forum_get_course_forum($site->id, "news")) {
|
|
|
|
error("Could not find or create a main news forum for the site");
|
|
|
|
}
|
|
|
|
|
|
|
|
if (isset($USER->id)) {
|
|
|
|
$SESSION->fromdiscussion = "$CFG->wwwroot";
|
|
|
|
if (forum_is_subscribed($USER->id, $newsforum->id)) {
|
|
|
|
$subtext = get_string("unsubscribe", "forum");
|
|
|
|
} else {
|
|
|
|
$subtext = get_string("subscribe", "forum");
|
|
|
|
}
|
2004-09-12 21:55:34 +00:00
|
|
|
$headertext = "<table border=\"0\" width=\"100%\" cellpadding=\"0\" cellspacing=\"0\" class=\"headingblockcontent\"><tr>
|
2004-05-28 10:53:54 +00:00
|
|
|
<td>$newsforum->name</td>
|
2004-09-12 21:55:34 +00:00
|
|
|
<td align=\"right\"><font size=\"1\">
|
2004-05-28 10:53:54 +00:00
|
|
|
<a href=\"mod/forum/subscribe.php?id=$newsforum->id\">$subtext</a>
|
|
|
|
</td></tr></table>";
|
|
|
|
} else {
|
|
|
|
$headertext = $newsforum->name;
|
|
|
|
}
|
|
|
|
print_heading_block($headertext);
|
|
|
|
print_spacer(8,1);
|
|
|
|
forum_print_latest_discussions($newsforum->id, $site->newsitems);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case FRONTPAGECOURSELIST:
|
|
|
|
case FRONTPAGECATEGORYNAMES:
|
|
|
|
if (isset($USER->id) and !isset($USER->admin)) {
|
|
|
|
print_heading_block(get_string("mycourses"));
|
|
|
|
print_spacer(8,1);
|
|
|
|
print_my_moodle();
|
|
|
|
} else {
|
|
|
|
if (count_records("course_categories") > 1) {
|
|
|
|
if ($CFG->frontpage == FRONTPAGECOURSELIST) {
|
|
|
|
print_heading_block(get_string("availablecourses"));
|
|
|
|
} else {
|
|
|
|
print_heading_block(get_string("categories"));
|
|
|
|
}
|
|
|
|
print_spacer(8,1);
|
|
|
|
print_simple_box_start("center", "100%");
|
|
|
|
print_whole_category_list();
|
|
|
|
print_simple_box_end();
|
|
|
|
print_course_search("", false, "short");
|
|
|
|
} else {
|
|
|
|
print_heading_block(get_string("availablecourses"));
|
|
|
|
print_spacer(8,1);
|
|
|
|
print_courses(0, "100%");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
echo '</td>';
|
2004-10-19 21:04:28 +00:00
|
|
|
|
|
|
|
|
|
|
|
// The right column
|
|
|
|
if(blocks_have_content($pageblocks[BLOCK_POS_RIGHT]) || $editing || isadmin()) {
|
2004-05-28 10:53:54 +00:00
|
|
|
echo '<td style="vertical-align: top; width: '.$preferred_width_right.'px;">';
|
|
|
|
if (isadmin()) {
|
|
|
|
echo '<div align="center">'.update_course_icon($site->id).'</div>';
|
|
|
|
echo '<br />';
|
|
|
|
}
|
2004-10-19 21:04:28 +00:00
|
|
|
blocks_print_group($page, $pageblocks[BLOCK_POS_RIGHT]);
|
2004-05-28 10:53:54 +00:00
|
|
|
if ($editing && !empty($missingblocks)) {
|
2004-10-19 21:04:28 +00:00
|
|
|
blocks_print_adminblock($page, $missingblocks);
|
2004-05-28 10:53:54 +00:00
|
|
|
}
|
|
|
|
echo '</td>';
|
|
|
|
}
|
|
|
|
?>
|
2002-06-10 05:19:03 +00:00
|
|
|
|
2003-05-03 05:57:29 +00:00
|
|
|
</tr>
|
|
|
|
</table>
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2004-05-28 10:53:54 +00:00
|
|
|
<?PHP print_footer('home'); // Please do not modify this line ?>
|