added proper rs_close($rs)
[moodle-pu.git] / index.php
blobbd2706abf34d365485a5426859b991a437c8254c
1 <?php // $Id$
2 // index.php - the front page.
4 ///////////////////////////////////////////////////////////////////////////
5 // //
6 // NOTICE OF COPYRIGHT //
7 // //
8 // Moodle - Modular Object-Oriented Dynamic Learning Environment //
9 // http://moodle.org //
10 // //
11 // Copyright (C) 1999 onwards Martin Dougiamas http://moodle.com //
12 // //
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. //
17 // //
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: //
22 // //
23 // http://www.gnu.org/copyleft/gpl.html //
24 // //
25 ///////////////////////////////////////////////////////////////////////////
28 if (!file_exists('./config.php')) {
29 header('Location: install.php');
30 die;
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');
41 if (empty($SITE)) {
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
59 @require_logout();
60 redirect("$CFG->wwwroot/$CFG->admin/");
63 if ($CFG->forcelogin) {
64 require_login();
67 if ($CFG->rolesactive) { // if already using roles system
68 if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
69 if (moodle_needs_upgrading()) {
70 redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
72 } else if (!empty($CFG->mymoodleredirect)) { // Redirect logged-in users to My Moodle overview if required
73 if (isloggedin() && $USER->username != 'guest') {
74 redirect($CFG->wwwroot .'/my/index.php');
77 } else { // if upgrading from 1.6 or below
78 if (isadmin() && moodle_needs_upgrading()) {
79 redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
84 if (get_moodle_cookie() == '') {
85 set_moodle_cookie('nobody'); // To help search for cookies on login page
88 if (!empty($USER->id)) {
89 add_to_log(SITEID, 'course', 'view', 'view.php?id='.SITEID, SITEID);
92 if (empty($CFG->langmenu)) {
93 $langmenu = '';
94 } else {
95 $currlang = current_language();
96 $langs = get_list_of_languages();
97 $langlabel = '<span class="accesshide">'.get_string('language').':</span>';
98 $langmenu = popup_form($CFG->wwwroot .'/index.php?lang=', $langs, 'chooselang', $currlang, '', '', '', true, 'self', $langlabel);
101 $PAGE = page_create_object(PAGE_COURSE_VIEW, SITEID);
102 $pageblocks = blocks_setup($PAGE);
103 $editing = $PAGE->user_is_editing();
104 $preferred_width_left = bounded_number(BLOCK_L_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT]),
105 BLOCK_L_MAX_WIDTH);
106 $preferred_width_right = bounded_number(BLOCK_R_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT]),
107 BLOCK_R_MAX_WIDTH);
109 print_header($SITE->fullname, $SITE->fullname, 'home', '',
110 '<meta name="description" content="'. s(strip_tags($SITE->summary)) .'" />',
111 true, '', user_login_string($SITE).$langmenu);
116 <table id="layout-table" summary="layout">
117 <tr>
118 <?php
119 $lt = (empty($THEME->layouttable)) ? array('left', 'middle', 'right') : $THEME->layouttable;
120 foreach ($lt as $column) {
121 switch ($column) {
122 case 'left':
123 if (blocks_have_content($pageblocks, BLOCK_POS_LEFT) || $editing) {
124 echo '<td style="width: '.$preferred_width_left.'px;" id="left-column">';
125 if (!empty($THEME->customcorners)) print_custom_corners_start();
126 blocks_print_group($PAGE, $pageblocks, BLOCK_POS_LEFT);
127 if (!empty($THEME->customcorners)) print_custom_corners_end();
128 echo '</td>';
130 break;
131 case 'middle':
132 echo '<td id="middle-column">';
134 if (!empty($THEME->customcorners)) print_custom_corners_start();
136 /// Print Section
137 if ($SITE->numsections > 0) {
139 if (!$section = get_record('course_sections', 'course', $SITE->id, 'section', 1)) {
140 delete_records('course_sections', 'course', $SITE->id, 'section', 1); // Just in case
141 $section->course = $SITE->id;
142 $section->section = 1;
143 $section->summary = '';
144 $section->sequence = '';
145 $section->visible = 1;
146 $section->id = insert_record('course_sections', $section);
149 if (!empty($section->sequence) or !empty($section->summary) or $editing) {
150 print_box_start('generalbox sitetopic');
152 /// If currently moving a file then show the current clipboard
153 if (ismoving($SITE->id)) {
154 $stractivityclipboard = strip_tags(get_string('activityclipboard', '', addslashes($USER->activitycopyname)));
155 echo '<p><font size="2">';
156 echo "$stractivityclipboard&nbsp;&nbsp;(<a href=\"course/mod.php?cancelcopy=true&amp;sesskey=$USER->sesskey\">". get_string('cancel') .'</a>)';
157 echo '</font></p>';
160 $options = NULL;
161 $options->noclean = true;
162 echo format_text($section->summary, FORMAT_HTML, $options);
164 if ($editing) {
165 $streditsummary = get_string('editsummary');
166 echo "<a title=\"$streditsummary\" ".
167 " href=\"course/editsection.php?id=$section->id\"><img src=\"$CFG->pixpath/t/edit.gif\" ".
168 " class=\"iconsmall\" alt=\"$streditsummary\" /></a><br /><br />";
171 get_all_mods($SITE->id, $mods, $modnames, $modnamesplural, $modnamesused);
172 print_section($SITE, $section, $mods, $modnamesused, true);
174 if ($editing) {
175 print_section_add_menus($SITE, $section->section, $modnames);
177 print_box_end();
181 if (isloggedin() and !isguest() and isset($CFG->frontpageloggedin)) {
182 $frontpagelayout = $CFG->frontpageloggedin;
183 } else {
184 $frontpagelayout = $CFG->frontpage;
187 foreach (explode(',',$frontpagelayout) as $v) {
188 switch ($v) { /// Display the main part of the front page.
189 case strval(FRONTPAGENEWS):
190 if ($SITE->newsitems) { // Print forums only when needed
191 require_once($CFG->dirroot .'/mod/forum/lib.php');
193 if (! $newsforum = forum_get_course_forum($SITE->id, 'news')) {
194 error('Could not find or create a main news forum for the site');
197 if (!empty($USER->id)) {
198 $SESSION->fromdiscussion = $CFG->wwwroot;
199 if (forum_is_subscribed($USER->id, $newsforum->id)) {
200 $subtext = get_string('unsubscribe', 'forum');
201 } else {
202 $subtext = get_string('subscribe', 'forum');
204 print_heading_block($newsforum->name);
205 echo '<div class="subscribelink"><a href="mod/forum/subscribe.php?id='.$newsforum->id.'">'.$subtext.'</a></div>';
206 } else {
207 print_heading_block($newsforum->name);
210 forum_print_latest_discussions($SITE, $newsforum, $SITE->newsitems, 'plain', 'p.modified DESC');
212 break;
214 case FRONTPAGECOURSELIST:
216 if (isloggedin() and !has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM)) and !isguest() and empty($CFG->disablemycourses)) {
217 print_heading_block(get_string('mycourses'));
218 print_my_moodle();
219 } else if ((!has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM)) and !isguest()) or (count_records('course') <= FRONTPAGECOURSELIMIT)) {
220 // admin should not see list of courses when there are too many of them
221 print_heading_block(get_string('availablecourses'));
222 print_courses(0, true);
224 break;
226 case FRONTPAGECATEGORYNAMES:
228 print_heading_block(get_string('categories'));
229 print_box_start('generalbox categorybox');
230 print_whole_category_list(NULL, NULL, NULL, -1, false);
231 print_box_end();
232 print_course_search('', false, 'short');
233 break;
235 case FRONTPAGECATEGORYCOMBO:
237 print_heading_block(get_string('categories'));
238 print_box_start('generalbox categorybox');
239 print_whole_category_list(NULL, NULL, NULL, -1, true);
240 print_box_end();
241 print_course_search('', false, 'short');
242 break;
244 case FRONTPAGETOPICONLY: // Do nothing!! :-)
245 break;
248 echo '<br />';
251 if (!empty($THEME->customcorners)) print_custom_corners_end();
253 echo '</td>';
254 break;
255 case 'right':
256 // The right column
257 if (blocks_have_content($pageblocks, BLOCK_POS_RIGHT) || $editing || has_capability('moodle/course:update', get_context_instance(CONTEXT_COURSE, SITEID))) {
258 echo '<td style="width: '.$preferred_width_right.'px;" id="right-column">';
259 if (!empty($THEME->customcorners)) print_custom_corners_start();
260 if (has_capability('moodle/course:update', get_context_instance(CONTEXT_COURSE, SITEID))) {
261 echo '<div style="text-align:center">'.update_course_icon($SITE->id).'</div>';
262 echo '<br />';
264 blocks_print_group($PAGE, $pageblocks, BLOCK_POS_RIGHT);
265 if (!empty($THEME->customcorners)) print_custom_corners_end();
266 echo '</td>';
268 break;
273 </tr>
274 </table>
276 <?php
277 print_footer('home'); // Please do not modify this line