index.php 11.8 KB
Newer Older
dhawes's avatar
dhawes committed
1
<?php  // $Id$
moodler's avatar
moodler committed
2
       // index.php - the front page.
3

4
5
6
7
8
9
10
///////////////////////////////////////////////////////////////////////////
//                                                                       //
// NOTICE OF COPYRIGHT                                                   //
//                                                                       //
// Moodle - Modular Object-Oriented Dynamic Learning Environment         //
//          http://moodle.org                                            //
//                                                                       //
moodler's avatar
moodler committed
11
// Copyright (C) 1999 onwards  Martin Dougiamas  http://moodle.com       //
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
//                                                                       //
// This program is free software; you can redistribute it and/or modify  //
// it under the terms of the GNU General Public License as published by  //
// the Free Software Foundation; either version 2 of the License, or     //
// (at your option) any later version.                                   //
//                                                                       //
// This program is distributed in the hope that it will be useful,       //
// but WITHOUT ANY WARRANTY; without even the implied warranty of        //
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         //
// GNU General Public License for more details:                          //
//                                                                       //
//          http://www.gnu.org/copyleft/gpl.html                         //
//                                                                       //
///////////////////////////////////////////////////////////////////////////


28
29
30
31
32
    if (!file_exists('./config.php')) {
        header('Location: install.php');
        die;
    }

33
34
35
    require_once('config.php');
    require_once($CFG->dirroot .'/course/lib.php');
    require_once($CFG->dirroot .'/lib/blocklib.php');
36

37
38
39
    if (!empty($THEME->customcorners)) {
        require_once($CFG->dirroot.'/lib/custom_corners_lib.php');
    }
40

41
42
43
44
    if (empty($SITE)) {
        redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
    }

45
46
47
48
49
50
51
52
53
54
55
    // Bounds for block widths
    // more flexible for theme designers taken from theme config.php
    $lmin = (empty($THEME->block_l_min_width)) ? 100 : $THEME->block_l_min_width;
    $lmax = (empty($THEME->block_l_max_width)) ? 210 : $THEME->block_l_max_width;
    $rmin = (empty($THEME->block_r_min_width)) ? 100 : $THEME->block_r_min_width;
    $rmax = (empty($THEME->block_r_max_width)) ? 210 : $THEME->block_r_max_width;

    define('BLOCK_L_MIN_WIDTH', $lmin);
    define('BLOCK_L_MAX_WIDTH', $lmax);
    define('BLOCK_R_MIN_WIDTH', $rmin);
    define('BLOCK_R_MAX_WIDTH', $rmax);
defacer's avatar
defacer committed
56

57
   // check if major upgrade needed - also present in login/index.php
58
59
60
61
    if ((int)$CFG->version < 2006101100) { //1.7 or older
        @require_logout();
        redirect("$CFG->wwwroot/$CFG->admin/");
    }
62
63
64
65
66
67
    // Trigger 1.9 accesslib upgrade?
    if ((int)$CFG->version < 2007090700 
        && isset($USER->id) 
        && is_siteadmin($USER->id)) { // this test is expensive, but is only triggered during the upgrade
        redirect("$CFG->wwwroot/$CFG->admin/");
    }
68

69
70
71
72
    if ($CFG->forcelogin) {
        require_login();
    }

73
    if ($CFG->rolesactive) { // if already using roles system
74
        if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
75
76
77
            if (moodle_needs_upgrading()) {
                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
81
                redirect($CFG->wwwroot .'/my/index.php');
            }
82
83
84
        }
    } else { // if upgrading from 1.6 or below
        if (isadmin() && moodle_needs_upgrading()) {
dhawes's avatar
dhawes committed
85
            redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
86
        }
87
88
    }

89

90
    if (get_moodle_cookie() == '') {
91
92
93
        set_moodle_cookie('nobody');   // To help search for cookies on login page
    }

94
    if (!empty($USER->id)) {
moodler's avatar
moodler committed
95
        add_to_log(SITEID, 'course', 'view', 'view.php?id='.SITEID, SITEID);
martin's avatar
martin committed
96
    }
97

98
    if (empty($CFG->langmenu)) {
dhawes's avatar
dhawes committed
99
        $langmenu = '';
100
101
102
    } else {
        $currlang = current_language();
        $langs = get_list_of_languages();
103
104
        $langlabel = '<span class="accesshide">'.get_string('language').':</span>';
        $langmenu = popup_form($CFG->wwwroot .'/index.php?lang=', $langs, 'chooselang', $currlang, '', '', '', true, 'self', $langlabel);
105
    }
106

defacer's avatar
   
defacer committed
107
    $PAGE       = page_create_object(PAGE_COURSE_VIEW, SITEID);
defacer's avatar
   
defacer committed
108
    $pageblocks = blocks_setup($PAGE);
defacer's avatar
   
defacer committed
109
    $editing    = $PAGE->user_is_editing();
110
    $preferred_width_left  = bounded_number(BLOCK_L_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT]),
111
                                            BLOCK_L_MAX_WIDTH);
112
    $preferred_width_right = bounded_number(BLOCK_R_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT]),
113
                                            BLOCK_R_MAX_WIDTH);
moodler's avatar
moodler committed
114
    print_header($SITE->fullname, $SITE->fullname, 'home', '',
moodler's avatar
moodler committed
115
                 '<meta name="description" content="'. s(strip_tags($SITE->summary)) .'" />',
116
                 true, '', user_login_string($SITE).$langmenu);
defacer's avatar
   
defacer committed
117

martin's avatar
martin committed
118
119
?>

120

moodler's avatar
moodler committed
121
<table id="layout-table" summary="layout">
122
  <tr>
123
  <?php
124
125
126
127
    $lt = (empty($THEME->layouttable)) ? array('left', 'middle', 'right') : $THEME->layouttable;
    foreach ($lt as $column) {
        switch ($column) {
            case 'left':
128
    if (blocks_have_content($pageblocks, BLOCK_POS_LEFT) || $editing) {
defacer's avatar
   
defacer committed
129
        echo '<td style="width: '.$preferred_width_left.'px;" id="left-column">';
130
        if (!empty($THEME->customcorners)) print_custom_corners_start();
defacer's avatar
   
defacer committed
131
        blocks_print_group($PAGE, $pageblocks, BLOCK_POS_LEFT);
132
        if (!empty($THEME->customcorners)) print_custom_corners_end();
133
134
        echo '</td>';
    }
135
136
            break;
            case 'middle':
defacer's avatar
   
defacer committed
137
    echo '<td id="middle-column">';
urs_hunkler's avatar
urs_hunkler committed
138

139
    if (!empty($THEME->customcorners)) print_custom_corners_start();
urs_hunkler's avatar
urs_hunkler committed
140

141
/// Print Section
moodler's avatar
moodler committed
142
    if ($SITE->numsections > 0) {
143

moodler's avatar
moodler committed
144
145
146
        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;
moodler's avatar
moodler committed
147
148
            $section->section = 1;
            $section->summary = '';
149
            $section->sequence = '';
moodler's avatar
moodler committed
150
151
152
            $section->visible = 1;
            $section->id = insert_record('course_sections', $section);
        }
153

154
        if (!empty($section->sequence) or !empty($section->summary) or $editing) {
155
            print_box_start('generalbox sitetopic');
156

157
158
159
160
            /// If currently moving a file then show the current clipboard
            if (ismoving($SITE->id)) {
                $stractivityclipboard = strip_tags(get_string('activityclipboard', '', addslashes($USER->activitycopyname)));
                echo '<p><font size="2">';
161
                echo "$stractivityclipboard&nbsp;&nbsp;(<a href=\"course/mod.php?cancelcopy=true&amp;sesskey=$USER->sesskey\">". get_string('cancel') .'</a>)';
162
163
                echo '</font></p>';
            }
164

165
166
167
            $options = NULL;
            $options->noclean = true;
            echo format_text($section->summary, FORMAT_HTML, $options);
168

169
170
171
172
            if ($editing) {
                $streditsummary = get_string('editsummary');
                echo "<a title=\"$streditsummary\" ".
                     " href=\"course/editsection.php?id=$section->id\"><img src=\"$CFG->pixpath/t/edit.gif\" ".
173
                     " class=\"iconsmall\" alt=\"$streditsummary\" /></a><br /><br />";
174
175
176
177
            }

            get_all_mods($SITE->id, $mods, $modnames, $modnamesplural, $modnamesused);
            print_section($SITE, $section, $mods, $modnamesused, true);
178

179
180
181
            if ($editing) {
                print_section_add_menus($SITE, $section->section, $modnames);
            }
182
            print_box_end();
183
184
185
        }
    }

186
187
188
189
190
191
192
    if (isloggedin() and !isguest() and isset($CFG->frontpageloggedin)) {
        $frontpagelayout = $CFG->frontpageloggedin;
    } else {
        $frontpagelayout = $CFG->frontpage;
    }

    foreach (explode(',',$frontpagelayout) as $v) {
193
194
195
196
197
198
199
200
201
        switch ($v) {     /// Display the main part of the front page.
            case strval(FRONTPAGENEWS):
                if ($SITE->newsitems) { // Print forums only when needed
                    require_once($CFG->dirroot .'/mod/forum/lib.php');

                    if (! $newsforum = forum_get_course_forum($SITE->id, 'news')) {
                        error('Could not find or create a main news forum for the site');
                    }

202
                    if (!empty($USER->id)) {
203
204
205
206
207
208
                        $SESSION->fromdiscussion = $CFG->wwwroot;
                        if (forum_is_subscribed($USER->id, $newsforum->id)) {
                            $subtext = get_string('unsubscribe', 'forum');
                        } else {
                            $subtext = get_string('subscribe', 'forum');
                        }
209
210
                        print_heading_block($newsforum->name);
                        echo '<div class="subscribelink"><a href="mod/forum/subscribe.php?id='.$newsforum->id.'">'.$subtext.'</a></div>';
211
                    } else {
212
                        print_heading_block($newsforum->name);
213
                    }
214

215
                    forum_print_latest_discussions($SITE, $newsforum, $SITE->newsitems, 'plain', 'p.modified DESC');
216
                }
217
            break;
218

219
            case FRONTPAGECOURSELIST:
220

221
                if (isloggedin() and !has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM)) and !isguest() and empty($CFG->disablemycourses)) {
222
223
                    print_heading_block(get_string('mycourses'));
                    print_my_moodle();
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'));
227
                    print_courses(0);
228
                }
229
            break;
230

231
232
233
            case FRONTPAGECATEGORYNAMES:

                print_heading_block(get_string('categories'));
234
                print_box_start('generalbox categorybox');
235
                print_whole_category_list(NULL, NULL, NULL, -1, false);
236
                print_box_end();
237
238
239
                print_course_search('', false, 'short');
            break;

240
241
242
            case FRONTPAGECATEGORYCOMBO:

                print_heading_block(get_string('categories'));
243
                print_box_start('generalbox categorybox');
244
                print_whole_category_list(NULL, NULL, NULL, -1, true);
245
                print_box_end();
246
247
248
                print_course_search('', false, 'short');
            break;

249
250
            case FRONTPAGETOPICONLY:    // Do nothing!!  :-)
            break;
251

252
253
        }
        echo '<br />';
254
255
    }

256
    if (!empty($THEME->customcorners)) print_custom_corners_end();
257

258
    echo '</td>';
259
260
            break;
            case 'right':
261
    // The right column
262
    if (blocks_have_content($pageblocks, BLOCK_POS_RIGHT) || $editing || $PAGE->user_allowed_editing()) {
defacer's avatar
   
defacer committed
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()) {
skodak's avatar
skodak committed
266
            echo '<div style="text-align:center">'.update_course_icon($SITE->id).'</div>';
267
268
            echo '<br />';
        }
defacer's avatar
   
defacer committed
269
        blocks_print_group($PAGE, $pageblocks, BLOCK_POS_RIGHT);
270
        if (!empty($THEME->customcorners)) print_custom_corners_end();
271
272
        echo '</td>';
    }
273
274
275
            break;
        }
    }
276
?>
277

278
279
  </tr>
</table>
martin's avatar
martin committed
280

urs_hunkler's avatar
urs_hunkler committed
281
282
<?php
    print_footer('home');     // Please do not modify this line
moodler's avatar
moodler committed
283
?>