MDL-24368 prevent infinite loops when caching can not be disabled
[moodle.git] / admin / 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  * Main administration script.
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 // Check that config.php exists, if not then call the install script
27 if (!file_exists('../config.php')) {
28     header('Location: ../install.php');
29     die;
30 }
32 // Check that PHP is of a sufficient version as soon as possible
33 if (version_compare(phpversion(), '5.2.0') < 0) {
34     $phpversion = phpversion();
35     // do NOT localise - lang strings would not work here and we CAN NOT move it to later place
36     echo "Sorry, Moodle 2.0 requires PHP 5.2.8 or later (currently using version $phpversion). ";
37     echo "Please upgrade your server software or use latest Moodle 1.9.x instead.";
38     die;
39 }
41 // try to flush everything all the time
42 @ob_implicit_flush(true);
43 while(ob_get_level()) {
44     if (!ob_end_clean()) {
45         // prevent infinite loop
46         break;
47     }
48 }
50 require('../config.php');
51 require_once($CFG->libdir.'/adminlib.php');    // various admin-only functions
52 require_once($CFG->libdir.'/upgradelib.php');  // general upgrade/install related functions
54 $id             = optional_param('id', '', PARAM_TEXT);
55 $confirmupgrade = optional_param('confirmupgrade', 0, PARAM_BOOL);
56 $confirmrelease = optional_param('confirmrelease', 0, PARAM_BOOL);
57 $confirmplugins = optional_param('confirmplugincheck', 0, PARAM_BOOL);
58 $agreelicense   = optional_param('agreelicense', 0, PARAM_BOOL);
60 // Check some PHP server settings
62 $PAGE->set_url('/admin/index.php');
64 $documentationlink = '<a href="http://docs.moodle.org/en/Installation">Installation docs</a>';
66 if (ini_get_bool('session.auto_start')) {
67     print_error('phpvaroff', 'debug', '', (object)array('name'=>'session.auto_start', 'link'=>$documentationlink));
68 }
70 if (ini_get_bool('magic_quotes_runtime')) {
71     print_error('phpvaroff', 'debug', '', (object)array('name'=>'magic_quotes_runtime', 'link'=>$documentationlink));
72 }
74 if (!ini_get_bool('file_uploads')) {
75     print_error('phpvaron', 'debug', '', (object)array('name'=>'file_uploads', 'link'=>$documentationlink));
76 }
78 if (is_float_problem()) {
79     print_error('phpfloatproblem', 'admin', '', $documentationlink);
80 }
82 // Set some necessary variables during set-up to avoid PHP warnings later on this page
83 if (!isset($CFG->framename)) {
84     $CFG->framename = '_top';
85 }
86 if (!isset($CFG->release)) {
87     $CFG->release = '';
88 }
89 if (!isset($CFG->version)) {
90     $CFG->version = '';
91 }
93 $version = null;
94 $release = null;
95 require("$CFG->dirroot/version.php");       // defines $version and $release
96 $CFG->target_release = $release;            // used during installation and upgrades
98 if (!$version or !$release) {
99     print_error('withoutversion', 'debug'); // without version, stop
102 // Turn off xmlstrictheaders during upgrade.
103 $origxmlstrictheaders = !empty($CFG->xmlstrictheaders);
104 $CFG->xmlstrictheaders = false;
106 if (!core_tables_exist()) {
107     $PAGE->set_pagelayout('maintenance');
109     // fake some settings
110     $CFG->docroot = 'http://docs.moodle.org';
112     $strinstallation = get_string('installation', 'install');
114     // remove current session content completely
115     session_get_instance()->terminate_current();
117     if (empty($agreelicense)) {
118         $strlicense = get_string('license');
119         $PAGE->navbar->add($strlicense);
120         $PAGE->set_title($strinstallation.' - Moodle '.$CFG->target_release);
121         $PAGE->set_heading($strinstallation);
122         $PAGE->set_cacheable(false);
123         echo $OUTPUT->header();
124         echo $OUTPUT->heading('<a href="http://moodle.org">Moodle</a> - Modular Object-Oriented Dynamic Learning Environment');
125         echo $OUTPUT->heading(get_string('copyrightnotice'));
126         $copyrightnotice = text_to_html(get_string('gpl3'));
127         $copyrightnotice = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $copyrightnotice); // extremely ugly validation hack
128         echo $OUTPUT->box($copyrightnotice, 'copyrightnotice');
129         echo '<br />';
130         $continue = new single_button(new moodle_url('/admin/index.php', array('lang'=>$CFG->lang, 'agreelicense'=>1)), get_string('continue'), 'get');
131         echo $OUTPUT->confirm(get_string('doyouagree'), $continue, "http://docs.moodle.org/en/License");
132         echo $OUTPUT->footer();
133         die;
134     }
135     if (empty($confirmrelease)) {
136         $strcurrentrelease = get_string('currentrelease');
137         $PAGE->navbar->add($strcurrentrelease);
138         $PAGE->set_title($strinstallation.' - Moodle '.$CFG->target_release);
139         $PAGE->set_heading($strinstallation);
140         $PAGE->set_cacheable(false);
141         echo $OUTPUT->header();
142         echo $OUTPUT->heading("Moodle $release");
143         $releasenoteslink = get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes');
144         $releasenoteslink = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $releasenoteslink); // extremely ugly validation hack
145         echo $OUTPUT->box($releasenoteslink, 'generalbox boxaligncenter boxwidthwide');
147         require_once($CFG->libdir.'/environmentlib.php');
148         if (!check_moodle_environment($release, $environment_results, true, ENV_SELECT_RELEASE)) {
149             print_upgrade_reload("index.php?agreelicense=1&amp;lang=$CFG->lang");
150         } else {
151             echo $OUTPUT->notification(get_string('environmentok', 'admin'), 'notifysuccess');
152             echo $OUTPUT->continue_button(new moodle_url('/admin/index.php', array('agreelicense'=>1, 'confirmrelease'=>1, 'lang'=>$CFG->lang)));
153         }
155         echo $OUTPUT->footer();
156         die;
157     }
159     $strdatabasesetup = get_string('databasesetup');
160     upgrade_init_javascript();
161     $PAGE->navbar->add($strdatabasesetup);
162     $PAGE->set_title($strinstallation.' - Moodle '.$CFG->target_release);
163     $PAGE->set_heading($strinstallation);
164     $PAGE->set_cacheable(false);
165     echo $OUTPUT->header();
167     if (!$DB->setup_is_unicodedb()) {
168         if (!$DB->change_db_encoding()) {
169             // If could not convert successfully, throw error, and prevent installation
170             print_error('unicoderequired', 'admin');
171         }
172     }
174     install_core($version, true);
178 // Check version of Moodle code on disk compared with database
179 // and upgrade if possible.
181 $stradministration = get_string('administration');
182 $PAGE->set_context(get_context_instance(CONTEXT_SYSTEM));
184 if (empty($CFG->version)) {
185     print_error('missingconfigversion', 'debug');
188 if ($version > $CFG->version) {  // upgrade
189     $PAGE->set_pagelayout('maintenance');
191     $a->oldversion = "$CFG->release ($CFG->version)";
192     $a->newversion = "$release ($version)";
193     $strdatabasechecking = get_string('databasechecking', '', $a);
195     if (empty($confirmupgrade)) {
196         $PAGE->navbar->add($strdatabasechecking);
197         $PAGE->set_title($strdatabasechecking);
198         $PAGE->set_heading($stradministration);
199         $PAGE->set_cacheable(false);
200         echo $OUTPUT->header();
201         $continueurl = new moodle_url('index.php', array('confirmupgrade' => 1));
202         $cancelurl = new moodle_url('index.php');
203         echo $OUTPUT->confirm(get_string('upgradesure', 'admin', $a->newversion), $continueurl, $cancelurl);
204         echo $OUTPUT->footer();
205         exit;
207     } else if (empty($confirmrelease)){
208         $strcurrentrelease = get_string('currentrelease');
209         $PAGE->navbar->add($strcurrentrelease);
210         $PAGE->set_title($strcurrentrelease);
211         $PAGE->set_heading($strcurrentrelease);
212         $PAGE->set_cacheable(false);
213         echo $OUTPUT->header();
214         echo $OUTPUT->heading("Moodle $release");
215         $releasenoteslink = get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes');
216         $releasenoteslink = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $releasenoteslink); // extremely ugly validation hack
217         echo $OUTPUT->box($releasenoteslink);
219         require_once($CFG->libdir.'/environmentlib.php');
220         if (!check_moodle_environment($release, $environment_results, true, ENV_SELECT_RELEASE)) {
221             print_upgrade_reload('index.php?confirmupgrade=1');
222         } else {
223             echo $OUTPUT->notification(get_string('environmentok', 'admin'), 'notifysuccess');
224             if (empty($CFG->skiplangupgrade)) {
225                 echo $OUTPUT->box_start('generalbox', 'notice');
226                 print_string('langpackwillbeupdated', 'admin');
227                 echo $OUTPUT->box_end();
228             }
229             echo $OUTPUT->continue_button('index.php?confirmupgrade=1&confirmrelease=1');
230         }
232         echo $OUTPUT->footer();
233         die;
235     } elseif (empty($confirmplugins)) {
236         $strplugincheck = get_string('plugincheck');
237         $PAGE->navbar->add($strplugincheck);
238         $PAGE->set_title($strplugincheck);
239         $PAGE->set_heading($strplugincheck);
240         $PAGE->set_cacheable(false);
241         echo $OUTPUT->header();
242         echo $OUTPUT->heading($strplugincheck);
243         echo $OUTPUT->box_start('generalbox', 'notice');
244         print_string('pluginchecknotice');
245         echo $OUTPUT->box_end();
246         print_plugin_tables();
247         print_upgrade_reload('index.php?confirmupgrade=1&amp;confirmrelease=1');
248         $button = new single_button(new moodle_url('index.php', array('confirmupgrade'=>1, 'confirmrelease'=>1, 'confirmplugincheck'=>1)), get_string('upgradestart', 'admin'), 'get');
249         $button->class = 'continuebutton';
250         echo $OUTPUT->render($button);
251         echo $OUTPUT->footer();
252         die();
254     } else {
255         // Launch main upgrade
256         upgrade_core($version, true);
257     }
258 } else if ($version < $CFG->version) {
259     // better stop here, we can not continue with plugin upgrades or anything else
260     throw new moodle_exception('downgradedcore', 'error', new moodle_url('/admin/'));
263 // Updated human-readable release version if necessary
264 if ($release <> $CFG->release) {  // Update the release version
265     set_config('release', $release);
268 if (moodle_needs_upgrading()) {
269     if (!$PAGE->headerprinted) {
270         // means core upgrade or installation was not already done
271         if (!$confirmplugins) {
272             $PAGE->set_pagelayout('maintenance');
273             $strplugincheck = get_string('plugincheck');
274             $PAGE->navbar->add($strplugincheck);
275             $PAGE->set_title($strplugincheck);
276             $PAGE->set_heading($strplugincheck);
277             $PAGE->set_cacheable(false);
278             echo $OUTPUT->header();
279             echo $OUTPUT->heading($strplugincheck);
280             echo $OUTPUT->box_start('generalbox', 'notice');
281             print_string('pluginchecknotice');
282             echo $OUTPUT->box_end();
283             print_plugin_tables();
284             print_upgrade_reload('index.php');
285             $button = new single_button(new moodle_url('index.php', array('confirmplugincheck'=>1)), get_string('upgradestart', 'admin'), 'get');
286             $button->class = 'continuebutton';
287             echo $OUTPUT->render($button);
288             echo $OUTPUT->footer();
289             die();
290         }
291     }
292     // install/upgrade all plugins and other parts
293     upgrade_noncore(true);
296 // If this is the first install, indicate that this site is fully configured
297 // except the admin password
298 if (during_initial_install()) {
299     set_config('rolesactive', 1); // after this, during_initial_install will return false.
300     set_config('adminsetuppending', 1);
301     // we need this redirect to setup proper session
302     upgrade_finished("index.php?sessionstarted=1&amp;lang=$CFG->lang");
305 // make sure admin user is created - this is the last step because we need
306 // session to be working properly in order to edit admin account
307  if (!empty($CFG->adminsetuppending)) {
308     $sessionstarted = optional_param('sessionstarted', 0, PARAM_BOOL);
309     if (!$sessionstarted) {
310         redirect("index.php?sessionstarted=1&lang=$CFG->lang");
311     } else {
312         $sessionverify = optional_param('sessionverify', 0, PARAM_BOOL);
313         if (!$sessionverify) {
314             $SESSION->sessionverify = 1;
315             redirect("index.php?sessionstarted=1&sessionverify=1&lang=$CFG->lang");
316         } else {
317             if (empty($SESSION->sessionverify)) {
318                 print_error('installsessionerror', 'admin', "index.php?sessionstarted=1&lang=$CFG->lang");
319             }
320             unset($SESSION->sessionverify);
321         }
322     }
324     // at this stage there can be only one admin - users may change username, so do not rely on that
325     $adminuser = get_complete_user_data('id', $CFG->siteadmins);
327     if ($adminuser->password === 'adminsetuppending') {
328         // prevent installation hijacking
329         if ($adminuser->lastip !== getremoteaddr()) {
330             print_error('installhijacked', 'admin');
331         }
332         // login user and let him set password and admin details
333         $adminuser->newadminuser = 1;
334         message_set_default_message_preferences($adminuser);
335         complete_user_login($adminuser, false);
336         redirect("$CFG->wwwroot/user/editadvanced.php?id=$adminuser->id"); // Edit thyself
338     } else {
339         unset_config('adminsetuppending');
340     }
342 } else {
343     // just make sure upgrade logging is properly terminated
344     upgrade_finished('upgradesettings.php');
347 // Turn xmlstrictheaders back on now.
348 $CFG->xmlstrictheaders = $origxmlstrictheaders;
349 unset($origxmlstrictheaders);
351 // Check for valid admin user - no guest autologin
352 require_login(0, false);
353 $context = get_context_instance(CONTEXT_SYSTEM);
354 require_capability('moodle/site:config', $context);
356 // check that site is properly customized
357 $site = get_site();
358 if (empty($site->shortname)) {
359     // probably new installation - lets return to frontpage after this step
360     // remove settings that we want uninitialised
361     unset_config('registerauth');
362     redirect('upgradesettings.php?return=site');
365 // Check if we are returning from moodle.org registration and if so, we mark that fact to remove reminders
366 if (!empty($id) and $id == $CFG->siteidentifier) {
367     set_config('registered', time());
370 // setup critical warnings before printing admin tree block
371 $insecuredataroot = is_dataroot_insecure(true);
372 $SESSION->admin_critical_warning = ($insecuredataroot==INSECURE_DATAROOT_ERROR);
374 $adminroot = admin_get_root();
376 // Check if there are any new admin settings which have still yet to be set
377 if (any_new_admin_settings($adminroot)){
378     redirect('upgradesettings.php');
381 // Everything should now be set up, and the user is an admin
383 // Print default admin page with notifications.
384 admin_externalpage_setup('adminnotifications');
385 echo $OUTPUT->header();
387 if ($insecuredataroot == INSECURE_DATAROOT_WARNING) {
388     echo $OUTPUT->box(get_string('datarootsecuritywarning', 'admin', $CFG->dataroot), 'generalbox adminwarning');
389 } else if ($insecuredataroot == INSECURE_DATAROOT_ERROR) {
390     echo $OUTPUT->box(get_string('datarootsecurityerror', 'admin', $CFG->dataroot), 'generalbox adminerror');
394 if (defined('WARN_DISPLAY_ERRORS_ENABLED')) {
395     echo $OUTPUT->box(get_string('displayerrorswarning', 'admin'), 'generalbox adminwarning');
398 // If no recently cron run
399 $lastcron = $DB->get_field_sql('SELECT MAX(lastcron) FROM {modules}');
400 if (time() - $lastcron > 3600 * 24) {
401     $helpbutton = $OUTPUT->help_icon('cron', 'admin');
402     echo $OUTPUT->box(get_string('cronwarning', 'admin').'&nbsp;'.$helpbutton, 'generalbox adminwarning');
405 // Hidden bloglevel upgrade
406 $showbloglevelupgrade = ($CFG->bloglevel == BLOG_COURSE_LEVEL || $CFG->bloglevel == BLOG_GROUP_LEVEL) && empty($CFG->bloglevel_upgrade_complete);
407 if ($showbloglevelupgrade) {
408     echo $OUTPUT->box(get_string('bloglevelupgradenotice', 'admin'), 'generalbox adminwarning');
411 // diagnose DB, especially the sloppy MyISAM tables
412 $diagnose = $DB->diagnose();
413 if ($diagnose !== NULL) {
414     echo $OUTPUT->box($diagnose, 'generalbox adminwarning');
417 // Alert if we are currently in maintenance mode
418 if (!empty($CFG->maintenance_enabled)) {
419     echo $OUTPUT->box(get_string('sitemaintenancewarning2', 'admin', "$CFG->wwwroot/$CFG->admin/settings.php?section=maintenancemode"), 'generalbox adminwarning');
422 //////////////////////////////////////////////////////////////////////////////////////////////////
423 ////  IT IS ILLEGAL AND A VIOLATION OF THE GPL TO HIDE, REMOVE OR MODIFY THIS COPYRIGHT NOTICE ///
424 $copyrighttext = '<a href="http://moodle.org/">Moodle</a> '.
425                  '<a href="http://docs.moodle.org/en/Release" title="'.$CFG->version.'">'.$CFG->release.'</a><br />'.
426                  'Copyright &copy; 1999 onwards, Martin Dougiamas<br />'.
427                  'and <a href="http://docs.moodle.org/en/Credits">many other contributors</a>.<br />'.
428                  '<a href="http://docs.moodle.org/en/License">GNU Public License</a>';
429 echo $OUTPUT->box($copyrighttext, 'copyright');
430 //////////////////////////////////////////////////////////////////////////////////////////////////
432 echo $OUTPUT->footer();