2 // index.php - the front page.
4 ///////////////////////////////////////////////////////////////////////////
6 // NOTICE OF COPYRIGHT //
8 // Moodle - Modular Object-Oriented Dynamic Learning Environment //
9 // http://moodle.org //
11 // Copyright (C) 1999 onwards Martin Dougiamas http://moodle.com //
13 // This program is free software; you can redistribute it and/or modify //
14 // it under the terms of the GNU General Public License as published by //
15 // the Free Software Foundation; either version 2 of the License, or //
16 // (at your option) any later version. //
18 // This program is distributed in the hope that it will be useful, //
19 // but WITHOUT ANY WARRANTY; without even the implied warranty of //
20 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
21 // GNU General Public License for more details: //
23 // http://www.gnu.org/copyleft/gpl.html //
25 ///////////////////////////////////////////////////////////////////////////
28 if (!file_exists('./config.php')) {
29 header('Location: install.php');
33 require_once('config.php');
34 require_once($CFG->dirroot
.'/course/lib.php');
35 require_once($CFG->dirroot
.'/lib/blocklib.php');
37 if (!empty($THEME->customcorners
)) {
38 require_once($CFG->dirroot
.'/lib/custom_corners_lib.php');
42 redirect($CFG->wwwroot
.'/'. $CFG->admin
.'/index.php');
45 // Bounds for block widths
46 // more flexible for theme designers taken from theme config.php
47 $lmin = (empty($THEME->block_l_min_width
)) ?
100 : $THEME->block_l_min_width
;
48 $lmax = (empty($THEME->block_l_max_width
)) ?
210 : $THEME->block_l_max_width
;
49 $rmin = (empty($THEME->block_r_min_width
)) ?
100 : $THEME->block_r_min_width
;
50 $rmax = (empty($THEME->block_r_max_width
)) ?
210 : $THEME->block_r_max_width
;
52 define('BLOCK_L_MIN_WIDTH', $lmin);
53 define('BLOCK_L_MAX_WIDTH', $lmax);
54 define('BLOCK_R_MIN_WIDTH', $rmin);
55 define('BLOCK_R_MAX_WIDTH', $rmax);
57 // check if major upgrade needed - also present in login/index.php
58 if ((int)$CFG->version
< 2006101100) { //1.7 or older
60 redirect("$CFG->wwwroot/$CFG->admin/");
62 // Trigger 1.9 accesslib upgrade?
63 if ((int)$CFG->version
< 2007092000
65 && is_siteadmin($USER->id
)) { // this test is expensive, but is only triggered during the upgrade
66 redirect("$CFG->wwwroot/$CFG->admin/");
69 if ($CFG->forcelogin
) {
73 if ($CFG->rolesactive
) { // if already using roles system
74 if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM
))) {
75 if (moodle_needs_upgrading()) {
76 redirect($CFG->wwwroot
.'/'. $CFG->admin
.'/index.php');
78 } else if (!empty($CFG->mymoodleredirect
)) { // Redirect logged-in users to My Moodle overview if required
79 if (isloggedin() && $USER->username
!= 'guest') {
80 redirect($CFG->wwwroot
.'/my/index.php');
83 } else { // if upgrading from 1.6 or below
84 if (isadmin() && moodle_needs_upgrading()) {
85 redirect($CFG->wwwroot
.'/'. $CFG->admin
.'/index.php');
90 if (get_moodle_cookie() == '') {
91 set_moodle_cookie('nobody'); // To help search for cookies on login page
94 if (!empty($USER->id
)) {
95 add_to_log(SITEID
, 'course', 'view', 'view.php?id='.SITEID
, SITEID
);
98 if (empty($CFG->langmenu
)) {
101 $currlang = current_language();
102 $langs = get_list_of_languages();
103 $langlabel = '<span class="accesshide">'.get_string('language').':</span>';
104 $langmenu = popup_form($CFG->wwwroot
.'/index.php?lang=', $langs, 'chooselang', $currlang, '', '', '', true, 'self', $langlabel);
107 $PAGE = page_create_object(PAGE_COURSE_VIEW
, SITEID
);
108 $pageblocks = blocks_setup($PAGE);
109 $editing = $PAGE->user_is_editing();
110 $preferred_width_left = bounded_number(BLOCK_L_MIN_WIDTH
, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT
]),
112 $preferred_width_right = bounded_number(BLOCK_R_MIN_WIDTH
, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT
]),
114 print_header($SITE->fullname
, $SITE->fullname
, 'home', '',
115 '<meta name="description" content="'. s(strip_tags($SITE->summary
)) .'" />',
116 true, '', user_login_string($SITE).$langmenu);
121 <table id
="layout-table" summary
="layout">
124 $lt = (empty($THEME->layouttable
)) ?
array('left', 'middle', 'right') : $THEME->layouttable
;
125 foreach ($lt as $column) {
128 if (blocks_have_content($pageblocks, BLOCK_POS_LEFT
) ||
$editing) {
129 echo '<td style="width: '.$preferred_width_left.'px;" id="left-column">';
130 if (!empty($THEME->customcorners
)) print_custom_corners_start();
131 blocks_print_group($PAGE, $pageblocks, BLOCK_POS_LEFT
);
132 if (!empty($THEME->customcorners
)) print_custom_corners_end();
137 echo '<td id="middle-column">';
139 if (!empty($THEME->customcorners
)) print_custom_corners_start();
142 if ($SITE->numsections
> 0) {
144 if (!$section = get_record('course_sections', 'course', $SITE->id
, 'section', 1)) {
145 delete_records('course_sections', 'course', $SITE->id
, 'section', 1); // Just in case
146 $section->course
= $SITE->id
;
147 $section->section
= 1;
148 $section->summary
= '';
149 $section->sequence
= '';
150 $section->visible
= 1;
151 $section->id
= insert_record('course_sections', $section);
154 if (!empty($section->sequence
) or !empty($section->summary
) or $editing) {
155 print_box_start('generalbox sitetopic');
157 /// If currently moving a file then show the current clipboard
158 if (ismoving($SITE->id
)) {
159 $stractivityclipboard = strip_tags(get_string('activityclipboard', '', addslashes($USER->activitycopyname
)));
160 echo '<p><font size="2">';
161 echo "$stractivityclipboard (<a href=\"course/mod.php?cancelcopy=true&sesskey=$USER->sesskey\">". get_string('cancel') .'</a>)';
166 $options->noclean
= true;
167 echo format_text($section->summary
, FORMAT_HTML
, $options);
170 $streditsummary = get_string('editsummary');
171 echo "<a title=\"$streditsummary\" ".
172 " href=\"course/editsection.php?id=$section->id\"><img src=\"$CFG->pixpath/t/edit.gif\" ".
173 " class=\"iconsmall\" alt=\"$streditsummary\" /></a><br /><br />";
176 get_all_mods($SITE->id
, $mods, $modnames, $modnamesplural, $modnamesused);
177 print_section($SITE, $section, $mods, $modnamesused, true);
180 print_section_add_menus($SITE, $section->section
, $modnames);
186 if (isloggedin() and !isguest() and isset($CFG->frontpageloggedin
)) {
187 $frontpagelayout = $CFG->frontpageloggedin
;
189 $frontpagelayout = $CFG->frontpage
;
192 foreach (explode(',',$frontpagelayout) as $v) {
193 switch ($v) { /// Display the main part of the front page.
194 case strval(FRONTPAGENEWS
):
195 if ($SITE->newsitems
) { // Print forums only when needed
196 require_once($CFG->dirroot
.'/mod/forum/lib.php');
198 if (! $newsforum = forum_get_course_forum($SITE->id
, 'news')) {
199 error('Could not find or create a main news forum for the site');
202 if (!empty($USER->id
)) {
203 $SESSION->fromdiscussion
= $CFG->wwwroot
;
204 if (forum_is_subscribed($USER->id
, $newsforum->id
)) {
205 $subtext = get_string('unsubscribe', 'forum');
207 $subtext = get_string('subscribe', 'forum');
209 print_heading_block($newsforum->name
);
210 echo '<div class="subscribelink"><a href="mod/forum/subscribe.php?id='.$newsforum->id
.'">'.$subtext.'</a></div>';
212 print_heading_block($newsforum->name
);
215 forum_print_latest_discussions($SITE, $newsforum, $SITE->newsitems
, 'plain', 'p.modified DESC');
219 case FRONTPAGECOURSELIST
:
221 if (isloggedin() and !has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM
)) and !isguest() and empty($CFG->disablemycourses
)) {
222 print_heading_block(get_string('mycourses'));
224 } else if ((!has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM
)) and !isguest()) or (count_records('course') <= FRONTPAGECOURSELIMIT
)) {
225 // admin should not see list of courses when there are too many of them
226 print_heading_block(get_string('availablecourses'));
231 case FRONTPAGECATEGORYNAMES
:
233 print_heading_block(get_string('categories'));
234 print_box_start('generalbox categorybox');
235 print_whole_category_list(NULL, NULL, NULL, -1, false);
237 print_course_search('', false, 'short');
240 case FRONTPAGECATEGORYCOMBO
:
242 print_heading_block(get_string('categories'));
243 print_box_start('generalbox categorybox');
244 print_whole_category_list(NULL, NULL, NULL, -1, true);
246 print_course_search('', false, 'short');
249 case FRONTPAGETOPICONLY
: // Do nothing!! :-)
256 if (!empty($THEME->customcorners
)) print_custom_corners_end();
262 if (blocks_have_content($pageblocks, BLOCK_POS_RIGHT
) ||
$editing ||
$PAGE->user_allowed_editing()) {
263 echo '<td style="width: '.$preferred_width_right.'px;" id="right-column">';
264 if (!empty($THEME->customcorners
)) print_custom_corners_start();
265 if ($PAGE->user_allowed_editing()) {
266 echo '<div style="text-align:center">'.update_course_icon($SITE->id
).'</div>';
269 blocks_print_group($PAGE, $pageblocks, BLOCK_POS_RIGHT
);
270 if (!empty($THEME->customcorners
)) print_custom_corners_end();
282 print_footer('home'); // Please do not modify this line