MDL-37085 Load modchooser only when needed
[moodle.git] / index.php
1 <?php
3 // This file is part of Moodle - http://moodle.org/
4 //
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
9 //
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 // GNU General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
18 /**
19  * Moodle frontpage.
20  *
21  * @package    core
22  * @copyright  1999 onwards Martin Dougiamas (http://dougiamas.com)
23  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24  */
26     if (!file_exists('./config.php')) {
27         header('Location: install.php');
28         die;
29     }
31     require_once('config.php');
32     require_once($CFG->dirroot .'/course/lib.php');
33     require_once($CFG->libdir .'/filelib.php');
35     redirect_if_major_upgrade_required();
37     $urlparams = array();
38     if (!empty($CFG->defaulthomepage) && ($CFG->defaulthomepage == HOMEPAGE_MY) && optional_param('redirect', 1, PARAM_BOOL) === 0) {
39         $urlparams['redirect'] = 0;
40     }
41     $PAGE->set_url('/', $urlparams);
42     $PAGE->set_course($SITE);
44     // Prevent caching of this page to stop confusion when changing page after making AJAX changes
45     $PAGE->set_cacheable(false);
47     if ($CFG->forcelogin) {
48         require_login();
49     } else {
50         user_accesstime_log();
51     }
53     $hassiteconfig = has_capability('moodle/site:config', context_system::instance());
55 /// If the site is currently under maintenance, then print a message
56     if (!empty($CFG->maintenance_enabled) and !$hassiteconfig) {
57         print_maintenance_message();
58     }
60     if ($hassiteconfig && moodle_needs_upgrading()) {
61         redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
62     }
64     if (get_home_page() != HOMEPAGE_SITE) {
65         // Redirect logged-in users to My Moodle overview if required
66         if (optional_param('setdefaulthome', false, PARAM_BOOL)) {
67             set_user_preference('user_home_page_preference', HOMEPAGE_SITE);
68         } else if (!empty($CFG->defaulthomepage) && ($CFG->defaulthomepage == HOMEPAGE_MY) && optional_param('redirect', 1, PARAM_BOOL) === 1) {
69             redirect($CFG->wwwroot .'/my/');
70         } else if (!empty($CFG->defaulthomepage) && ($CFG->defaulthomepage == HOMEPAGE_USER)) {
71             $PAGE->settingsnav->get('usercurrentsettings')->add(get_string('makethismyhome'), new moodle_url('/', array('setdefaulthome'=>true)), navigation_node::TYPE_SETTING);
72         }
73     }
75     if (isloggedin()) {
76         add_to_log(SITEID, 'course', 'view', 'view.php?id='.SITEID, SITEID);
77     }
79 /// If the hub plugin is installed then we let it take over the homepage here
80     if (file_exists($CFG->dirroot.'/local/hub/lib.php') and get_config('local_hub', 'hubenabled')) {
81         require_once($CFG->dirroot.'/local/hub/lib.php');
82         $hub = new local_hub();
83         $continue = $hub->display_homepage();
84         //display_homepage() return true if the hub home page is not displayed
85         //mostly when search form is not displayed for not logged users
86         if (empty($continue)) {
87             exit;
88         }
89     }
91     $PAGE->set_pagetype('site-index');
92     $PAGE->set_other_editing_capability('moodle/course:manageactivities');
93     $PAGE->set_docs_path('');
94     $PAGE->set_pagelayout('frontpage');
95     $editing = $PAGE->user_is_editing();
96     $PAGE->set_title($SITE->fullname);
97     $PAGE->set_heading($SITE->fullname);
98     echo $OUTPUT->header();
100 /// Print Section or custom info
101     $siteformatoptions = course_get_format($SITE)->get_format_options();
102     $modinfo = get_fast_modinfo($SITE);
103     $modnames = get_module_types_names();
104     $modnamesplural = get_module_types_names(true);
105     $modnamesused = $modinfo->get_used_module_names();
106     $mods = $modinfo->get_cms();
108     if (!empty($CFG->customfrontpageinclude)) {
109         include($CFG->customfrontpageinclude);
111     } else if ($siteformatoptions['numsections'] > 0) {
112         if ($editing) {
113             // make sure section with number 1 exists
114             course_create_sections_if_missing($SITE, 1);
115             // re-request modinfo in case section was created
116             $modinfo = get_fast_modinfo($SITE);
117         }
118         $section = $modinfo->get_section_info(1);
119         if (($section && (!empty($modinfo->sections[1]) or !empty($section->summary))) or $editing) {
120             echo $OUTPUT->box_start('generalbox sitetopic');
122             /// If currently moving a file then show the current clipboard
123             if (ismoving($SITE->id)) {
124                 $stractivityclipboard = strip_tags(get_string('activityclipboard', '', $USER->activitycopyname));
125                 echo '<p><font size="2">';
126                 echo "$stractivityclipboard&nbsp;&nbsp;(<a href=\"course/mod.php?cancelcopy=true&amp;sesskey=".sesskey()."\">". get_string('cancel') .'</a>)';
127                 echo '</font></p>';
128             }
130             $context = context_course::instance(SITEID);
131             $summarytext = file_rewrite_pluginfile_urls($section->summary, 'pluginfile.php', $context->id, 'course', 'section', $section->id);
132             $summaryformatoptions = new stdClass();
133             $summaryformatoptions->noclean = true;
134             $summaryformatoptions->overflowdiv = true;
136             echo format_text($summarytext, $section->summaryformat, $summaryformatoptions);
138             if ($editing) {
139                 $streditsummary = get_string('editsummary');
140                 echo "<a title=\"$streditsummary\" ".
141                      " href=\"course/editsection.php?id=$section->id\"><img src=\"" . $OUTPUT->pix_url('t/edit') . "\" ".
142                      " class=\"iconsmall\" alt=\"$streditsummary\" /></a><br /><br />";
143             }
145             print_section($SITE, $section, $mods, $modnamesused, true);
147             if ($editing) {
148                 print_section_add_menus($SITE, $section->section, $modnames);
149             }
150             echo $OUTPUT->box_end();
151         }
152     }
153     // Include course AJAX
154     include_course_ajax($SITE, $modnamesused);
156     if (isloggedin() and !isguestuser() and isset($CFG->frontpageloggedin)) {
157         $frontpagelayout = $CFG->frontpageloggedin;
158     } else {
159         $frontpagelayout = $CFG->frontpage;
160     }
162     foreach (explode(',',$frontpagelayout) as $v) {
163         switch ($v) {     /// Display the main part of the front page.
164             case FRONTPAGENEWS:
165                 if ($SITE->newsitems) { // Print forums only when needed
166                     require_once($CFG->dirroot .'/mod/forum/lib.php');
168                     if (! $newsforum = forum_get_course_forum($SITE->id, 'news')) {
169                         print_error('cannotfindorcreateforum', 'forum');
170                     }
172                     // fetch news forum context for proper filtering to happen
173                     $newsforumcm = get_coursemodule_from_instance('forum', $newsforum->id, $SITE->id, false, MUST_EXIST);
174                     $newsforumcontext = context_module::instance($newsforumcm->id, MUST_EXIST);
176                     $forumname = format_string($newsforum->name, true, array('context' => $newsforumcontext));
177                     echo html_writer::tag('a', get_string('skipa', 'access', textlib::strtolower(strip_tags($forumname))), array('href'=>'#skipsitenews', 'class'=>'skip-block'));
179                     if (isloggedin()) {
180                         $SESSION->fromdiscussion = $CFG->wwwroot;
181                         $subtext = '';
182                         if (forum_is_subscribed($USER->id, $newsforum)) {
183                             if (!forum_is_forcesubscribed($newsforum)) {
184                                 $subtext = get_string('unsubscribe', 'forum');
185                             }
186                         } else {
187                             $subtext = get_string('subscribe', 'forum');
188                         }
189                         echo $OUTPUT->heading($forumname, 2, 'headingblock header');
190                         $suburl = new moodle_url('/mod/forum/subscribe.php', array('id' => $newsforum->id, 'sesskey' => sesskey()));
191                         echo html_writer::tag('div', html_writer::link($suburl, $subtext), array('class' => 'subscribelink'));
192                     } else {
193                         echo $OUTPUT->heading($forumname, 2, 'headingblock header');
194                     }
196                     forum_print_latest_discussions($SITE, $newsforum, $SITE->newsitems, 'plain', 'p.modified DESC');
197                     echo html_writer::tag('span', '', array('class'=>'skip-block-to', 'id'=>'skipsitenews'));
198                 }
199             break;
201             case FRONTPAGECOURSELIST:
202                 $ncourses = $DB->count_records('course');
203                 if (isloggedin() and !$hassiteconfig and !isguestuser() and empty($CFG->disablemycourses)) {
204                     echo html_writer::tag('a', get_string('skipa', 'access', textlib::strtolower(get_string('mycourses'))), array('href'=>'#skipmycourses', 'class'=>'skip-block'));
205                     echo $OUTPUT->heading(get_string('mycourses'), 2, 'headingblock header');
206                     print_my_moodle();
207                     echo html_writer::tag('span', '', array('class'=>'skip-block-to', 'id'=>'skipmycourses'));
208                 } else if ((!$hassiteconfig and !isguestuser()) or ($ncourses <= FRONTPAGECOURSELIMIT)) {
209                     // admin should not see list of courses when there are too many of them
210                     echo html_writer::tag('a', get_string('skipa', 'access', textlib::strtolower(get_string('availablecourses'))), array('href'=>'#skipavailablecourses', 'class'=>'skip-block'));
211                     echo $OUTPUT->heading(get_string('availablecourses'), 2, 'headingblock header');
212                     print_courses(0);
213                     echo html_writer::tag('span', '', array('class'=>'skip-block-to', 'id'=>'skipavailablecourses'));
214                 } else {
215                     echo html_writer::tag('div', get_string('therearecourses', '', $ncourses), array('class' => 'notifyproblem'));
216                     print_course_search('', false, 'short');
217                 }
218             break;
220             case FRONTPAGECATEGORYNAMES:
221                 echo html_writer::tag('a', get_string('skipa', 'access', textlib::strtolower(get_string('categories'))), array('href'=>'#skipcategories', 'class'=>'skip-block'));
222                 echo $OUTPUT->heading(get_string('categories'), 2, 'headingblock header');
223                 echo $OUTPUT->box_start('generalbox categorybox');
224                 print_whole_category_list(NULL, NULL, NULL, -1, false);
225                 echo $OUTPUT->box_end();
226                 print_course_search('', false, 'short');
227                 echo html_writer::tag('span', '', array('class'=>'skip-block-to', 'id'=>'skipcategories'));
228             break;
230             case FRONTPAGECATEGORYCOMBO:
231                 echo html_writer::tag('a', get_string('skipa', 'access', textlib::strtolower(get_string('courses'))), array('href'=>'#skipcourses', 'class'=>'skip-block'));
232                 echo $OUTPUT->heading(get_string('courses'), 2, 'headingblock header');
233                 $renderer = $PAGE->get_renderer('core','course');
234                 // if there are too many courses, budiling course category tree could be slow,
235                 // users should go to course index page to see the whole list.
236                 $coursecount = $DB->count_records('course');
237                 if (empty($CFG->numcoursesincombo)) {
238                     // if $CFG->numcoursesincombo hasn't been set, use default value 500
239                     $CFG->numcoursesincombo = 500;
240                 }
241                 if ($coursecount > $CFG->numcoursesincombo) {
242                     $link = new moodle_url('/course/');
243                     echo $OUTPUT->notification(get_string('maxnumcoursesincombo', 'moodle', array('link'=>$link->out(), 'maxnumofcourses'=>$CFG->numcoursesincombo, 'numberofcourses'=>$coursecount)));
244                 } else {
245                     echo $renderer->course_category_tree(get_course_category_tree());
246                 }
247                 print_course_search('', false, 'short');
248                 echo html_writer::tag('span', '', array('class'=>'skip-block-to', 'id'=>'skipcourses'));
249             break;
251             case FRONTPAGETOPICONLY:    // Do nothing!!  :-)
252             break;
254         }
255         echo '<br />';
256     }
258     echo $OUTPUT->footer();