MDL-10107 Fixed the definition of message providers ... it now works through files...
[moodle.git] / admin / index.php
1 <?php // $Id$
3 /// Check that config.php exists, if not then call the install script
4     if (!file_exists('../config.php')) {
5         header('Location: ../install.php');
6         die;
7     }
9 /// Check that PHP is of a sufficient version
10 /// Moved here because older versions do not allow while(@ob_end_clean());
11     if (version_compare(phpversion(), "5.2.0") < 0) {
12         $phpversion = phpversion();
13         echo "Sorry, Moodle requires PHP 5.2.0 or later (currently using version $phpversion)";
14         die;
15     }
17 /// Turn off time limits and try to flush everything all the time, sometimes upgrades can be slow.
19     @set_time_limit(0);
20     @ob_implicit_flush(true);
21     while(@ob_end_clean()); // ob_end_flush prevents sending of headers
24     require_once('../config.php');
25     require_once($CFG->libdir.'/adminlib.php');  // Contains various admin-only functions
26     require_once($CFG->libdir.'/db/upgradelib.php');  // Upgrade-related functions
28     $id             = optional_param('id', '', PARAM_TEXT);
29     $confirmupgrade = optional_param('confirmupgrade', 0, PARAM_BOOL);
30     $confirmrelease = optional_param('confirmrelease', 0, PARAM_BOOL);
31     $agreelicense   = optional_param('agreelicense', 0, PARAM_BOOL);
32     $autopilot      = optional_param('autopilot', 0, PARAM_BOOL);
33     $ignoreupgradewarning = optional_param('ignoreupgradewarning', 0, PARAM_BOOL);
34     $confirmplugincheck = optional_param('confirmplugincheck', 0, PARAM_BOOL);
36 /// check upgrade status first
37     if ($ignoreupgradewarning) {
38         $SESSION->upgraderunning = 0;
39     }
40     upgrade_check_running("Upgrade already running in this session, please wait!<br />Click on the exclamation marks to ignore this warning (<a href=\"index.php?ignoreupgradewarning=1\">!!!</a>).", 10);
42 /// set install/upgrade autocontinue session flag
43     if ($autopilot) {
44         $SESSION->installautopilot = $autopilot;
45     }
47 /// Check some PHP server settings
49     $documentationlink = '<a href="http://docs.moodle.org/en/Installation">Installation docs</a>';
51     if (ini_get_bool('session.auto_start')) {
52         print_error('phpvaroff', 'debug', '', array('session.auto_start', $documentationlink));
53     }
55     if (ini_get_bool('magic_quotes_runtime')) {
56         print_error('phpvaroff', 'debug', '', array('magic_quotes_runtime', $documentationlink));
57     }
59     if (!ini_get_bool('file_uploads')) {
60         print_error('phpvaron', 'debug', '', array('file_uploads', $documentationlink));
61     }
63 /// Check that config.php has been edited
65     if ($CFG->wwwroot == "http://example.com/moodle") {
66         print_error('configmoodle', 'debug');
67     }
70 /// Check settings in config.php
72     $dirroot = dirname(realpath("../index.php"));
73     if (!empty($dirroot) and $dirroot != $CFG->dirroot) {
74         print_error('fixsetting', 'debug', '', array($CFG->dirroot, $dirroot));
75     }
77 /// Set some necessary variables during set-up to avoid PHP warnings later on this page
78     if (!isset($CFG->framename)) {
79         $CFG->framename = "_top";
80     }
81     if (!isset($CFG->release)) {
82         $CFG->release = "";
83     }
84     if (!isset($CFG->version)) {
85         $CFG->version = "";
86     }
88     if (is_readable("$CFG->dirroot/version.php")) {
89         include_once("$CFG->dirroot/version.php");              // defines $version
90     }
92     if (!$version or !$release) {
93         print_error('withoutversion', 'debug'); // without version, stop
94     }
96 /// Check if the main tables have been installed yet or not.
97     if (!$tables = $DB->get_tables() ) {    // No tables yet at all.
98         $maintables = false;
100     } else {                                 // Check for missing main tables
101         $maintables = true;
102         $mtables = array("config", "course", "course_categories", "course_modules",
103                          "course_sections", "log", "log_display", "modules",
104                          "user");
105         foreach ($mtables as $mtable) {
106             if (!in_array($mtable, $tables)) {
107                 $maintables = false;
108                 break;
109             }
110         }
111     }
113     if (! $maintables) {
114     /// hide errors from headers in case debug enabled in config.php
115         $origdebug = $CFG->debug;
116         $CFG->debug = DEBUG_MINIMAL;
117         error_reporting($CFG->debug);
118         if (empty($agreelicense)) {
119             $strlicense = get_string('license');
120             $navigation = build_navigation(array(array('name'=>$strlicense, 'link'=>null, 'type'=>'misc')));
121             print_header($strlicense, $strlicense, $navigation, "", "", false, "&nbsp;", "&nbsp;");
122             print_heading("<a href=\"http://moodle.org\">Moodle</a> - Modular Object-Oriented Dynamic Learning Environment");
123             print_heading(get_string('copyrightnotice'));
124             print_box(text_to_html(get_string('gpl')), 'copyrightnotice');
125             echo "<br />";
126             notice_yesno(get_string('doyouagree'), "index.php?agreelicense=1",
127                                                    "http://docs.moodle.org/en/License");
128             print_footer('none');
129             exit;
130         }
131         if (empty($confirmrelease)) {
132             $strcurrentrelease = get_string("currentrelease");
133             $navigation = build_navigation(array(array('name'=>$strcurrentrelease, 'link'=>null, 'type'=>'misc')));
134             print_header($strcurrentrelease, $strcurrentrelease, $navigation, "", "", false, "&nbsp;", "&nbsp;");
135             print_heading("Moodle $release");
136             print_box(get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes'), 'generalbox boxaligncenter boxwidthwide');
137             echo '<form action="index.php"><div>';
138             echo '<input type="hidden" name="agreelicense" value="1" />';
139             echo '<input type="hidden" name="confirmrelease" value="1" />';
140             echo '</div>';
141             echo '<div class="continuebutton"><input name="autopilot" id="autopilot" type="checkbox" value="1" /><label for="autopilot">'.get_string('unattendedoperation', 'admin').'</label>';
142             echo '<br /><br /><input type="submit" value="'.get_string('continue').'" /></div>';
143             echo '</form>';
144             print_footer('none');
145             die;
146         }
148         $strdatabasesetup    = get_string("databasesetup");
149         $strdatabasesuccess  = get_string("databasesuccess");
150         $navigation = build_navigation(array(array('name'=>$strdatabasesetup, 'link'=>null, 'type'=>'misc')));
151         print_header($strdatabasesetup, $strdatabasesetup, $navigation,
152                         "", upgrade_get_javascript(), false, "&nbsp;", "&nbsp;");
153     /// return to original debugging level
154         $CFG->debug = $origdebug;
155         error_reporting($CFG->debug);
156         upgrade_log_start();
157         $DB->set_debug(true);
159     /// Both old .sql files and new install.xml are supported
160     /// But we prioritise install.xml (XMLDB) if present
162         if (!$DB->setup_is_unicodedb()) {
163             if (!$DB->change_db_encoding()) {
164                 // If could not convert successfully, throw error, and prevent installation
165                 print_error('unicoderequired', 'admin');
166             }
167         }
169         $DB->get_manager()->install_from_xmldb_file("$CFG->libdir/db/install.xml"); //New method
171         // all new installs are in unicode - keep for backwards compatibility and 1.8 upgrade checks
172         set_config('unicodedb', 1);
174     /// Continue with the instalation
175         $DB->set_debug(false);
177         /// Groups install is now in core above.
179         // Install the roles system.
180         moodle_install_roles();
182         // Install core event handlers
183         events_update_definition();
185         // Install core message providers
186         require_once($CFG->libdir .'/messagelib.php');      // Messagelib functions
187         message_update_providers();
189         /// This is used to handle any settings that must exist in $CFG but which do not exist in
190         /// admin_get_root()/$ADMIN as admin_setting objects (there are some exceptions).
191         apply_default_exception_settings(array('auth' => 'email',
192                                                'auth_pop3mailbox' => 'INBOX',
193                                                'enrol' => 'manual',
194                                                'enrol_plugins_enabled' => 'manual',
195                                                'style' => 'default',
196                                                'template' => 'default',
197                                                'theme' => 'standardwhite',
198                                                'filter_multilang_converted' => 1));
200         // Write default settings unconditionally (i.e. even if a setting is already set, overwrite it)
201         // (this should only have any effect during initial install).
202         admin_apply_default_settings(NULL, true);
204         notify($strdatabasesuccess, "green");
205         require_once $CFG->dirroot.'/mnet/lib.php';
207         print_continue('index.php');
208         print_footer('none');
209         die;
210     }
213 /// Check version of Moodle code on disk compared with database
214 /// and upgrade if possible.
215     require_once("$CFG->dirroot/lib/db/upgrade.php");  # defines new upgrades
217     $stradministration = get_string("administration");
219     if ($CFG->version) {
220         if ($version > $CFG->version) {  // upgrade
222         /// If the database is not already Unicode then we do not allow upgrading!
223         /// Instead, we print an error telling them to upgrade to 1.7 first.  MDL-6857
224             if (empty($CFG->unicodedb)) {
225                 print_error('unicodeupgradeerror', 'error', '', $version);
226             }
228             $a->oldversion = "$CFG->release ($CFG->version)";
229             $a->newversion = "$release ($version)";
230             $strdatabasechecking = get_string("databasechecking", "", $a);
232             // hide errors from headers in case debug is enabled
233             $origdebug = $CFG->debug;
234             $CFG->debug = DEBUG_MINIMAL;
235             error_reporting($CFG->debug);
237             // logo ut in case we are upgrading from pre 1.9 version in order to prevent
238             // weird session/role problems caused by incorrect data in USER and SESSION
239             if ($CFG->version < 2007101500) {
240                 require_logout();
241             }
243             if (empty($confirmupgrade)) {
244                 $navigation = build_navigation(array(array('name'=>$strdatabasechecking, 'link'=>null, 'type'=>'misc')));
245                 print_header($strdatabasechecking, $stradministration, $navigation,
246                         "", "", false, "&nbsp;", "&nbsp;");
248                 notice_yesno(get_string('upgradesure', 'admin', $a->newversion), 'index.php?confirmupgrade=1', 'index.php');
249                 print_footer('none');
250                 exit;
252             } else if (empty($confirmrelease)){
253                 $strcurrentrelease = get_string("currentrelease");
254                 $navigation = build_navigation(array(array('name'=>$strcurrentrelease, 'link'=>null, 'type'=>'misc')));
255                 print_header($strcurrentrelease, $strcurrentrelease, $navigation, "", "", false, "&nbsp;", "&nbsp;");
256                 print_heading("Moodle $release");
257                 print_box(get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes'));
259                 require_once($CFG->libdir.'/environmentlib.php');
260                 print_heading(get_string('environment', 'admin'));
261                 if (!check_moodle_environment($release, $environment_results, true)) {
262                     print_box_start('generalbox', 'notice'); // MDL-8330
263                     print_string('langpackwillbeupdated', 'admin');
264                     print_box_end();
265                     notice_yesno(get_string('environmenterrorupgrade', 'admin'),
266                                  'index.php?confirmupgrade=1&confirmrelease=1', 'index.php');
267                 } else {
268                     notify(get_string('environmentok', 'admin'), 'notifysuccess');
269                     print_box_start('generalbox', 'notice'); // MDL-8330
270                     print_string('langpackwillbeupdated', 'admin');
271                     print_box_end();
272                     echo '<form action="index.php"><div>';
273                     echo '<input type="hidden" name="confirmupgrade" value="1" />';
274                     echo '<input type="hidden" name="confirmrelease" value="1" />';
275                     echo '</div>';
276                     echo '<div class="continuebutton">';
277                     echo '<br /><br /><input type="submit" value="'.get_string('continue').'" /></div>';
278                     echo '</form>';
279                 }
281                 print_footer('none');
282                 die;
283             } elseif (empty($confirmplugincheck)) {
284                 $strplugincheck = get_string('plugincheck');
285                 $navigation = build_navigation(array(array('name'=>$strplugincheck, 'link'=>null, 'type'=>'misc')));
286                 print_header($strplugincheck, $strplugincheck, $navigation, "", "", false, "&nbsp;", "&nbsp;");
287                 print_heading($strplugincheck);
288                 print_box_start('generalbox', 'notice'); // MDL-8330
289                 print_string('pluginchecknotice');
290                 print_box_end();
291                 print_plugin_tables();
292                 echo "<br />";
293                 echo '<div class="continuebutton">';
294                 print_single_button('index.php', array('confirmupgrade' => 1, 'confirmrelease' => 1), get_string('reload'), 'get');
295                 echo '</div><br />';
296                 echo '<form action="index.php"><div>';
297                 echo '<input type="hidden" name="confirmupgrade" value="1" />';
298                 echo '<input type="hidden" name="confirmrelease" value="1" />';
299                 echo '<input type="hidden" name="confirmplugincheck" value="1" />';
300                 echo '</div>';
301                 echo '<div class="continuebutton"><input name="autopilot" id="autopilot" type="checkbox" value="1" /><label for="autopilot">'.get_string('unattendedoperation', 'admin').'</label>';
302                 echo '<br /><br /><input type="submit" value="'.get_string('continue').'" /></div>';
303                 echo '</form>';
304                 print_footer('none');
305                 die();
307             } else {
308                 $strdatabasesuccess  = get_string("databasesuccess");
309                 $navigation = build_navigation(array(array('name'=>$strdatabasesuccess, 'link'=>null, 'type'=>'misc')));
310                 print_header($strdatabasechecking, $stradministration, $navigation,
311                         "", upgrade_get_javascript(), false, "&nbsp;", "&nbsp;");
313             /// return to original debugging level
314                 $CFG->debug = $origdebug;
315                 error_reporting($CFG->debug);
316                 upgrade_log_start();
318             /// Upgrade current language pack if we can
319                 upgrade_language_pack();
321                 print_heading($strdatabasechecking);
322                 $DB->set_debug(true);
323             /// Launch the old main upgrade (if exists)
324                 $status = true;
325                 if (function_exists('main_upgrade')) {
326                     $status = main_upgrade($CFG->version);
327                 }
328             /// If succesful and exists launch the new main upgrade (XMLDB), called xmldb_main_upgrade
329                 if ($status && function_exists('xmldb_main_upgrade')) {
330                     $status = xmldb_main_upgrade($CFG->version);
331                 }
332                 $DB->set_debug(false);
333             /// If successful, continue upgrading roles and setting everything properly
334                 if ($status) {
335                     if (!update_capabilities()) {
336                         print_error('cannotupgradecapabilities', 'debug');
337                     }
339                     // Update core events
340                     events_update_definition();
342                     // Update core message providers
343                     require_once($CFG->libdir .'/messagelib.php');      // Messagelib functions
344                     message_update_providers();
346                     if (set_config("version", $version)) {
347                         remove_dir($CFG->dataroot . '/cache', true); // flush cache
348                         notify($strdatabasesuccess, "green");
349                         print_continue("upgradesettings.php");
350                         print_footer('none');
351                         exit;
352                     } else {
353                         print_error('cannotupdateversion', 'debug');
354                     }
355             /// Main upgrade not success
356                 } else {
357                     notify('Main Upgrade failed!  See lib/db/upgrade.php');
358                     print_continue('index.php?confirmupgrade=1&amp;confirmrelease=1&amp;confirmplugincheck=1');
359                     print_footer('none');
360                     die;
361                 }
362                 upgrade_log_finish();
363             }
364         } else if ($version < $CFG->version) {
365             upgrade_log_start();
366             notify("WARNING!!!  The code you are using is OLDER than the version that made these databases!");
367             upgrade_log_finish();
368         }
369     } else {
370         if (!set_config("version", $version)) {
371             print_error('cannotupdateversion', 'debug');
372         }
373     }
375 /// Updated human-readable release version if necessary
377     if ($release <> $CFG->release) {  // Update the release version
378         if (!set_config("release", $release)) {
379             print_error("cannotupdaterelease", 'debug');
380         }
381     }
383 /// Groups install/upgrade is now in core above.
386 /// Find and check all main modules and load them up or upgrade them if necessary
387 /// first old *.php update and then the new upgrade.php script
388     upgrade_activity_modules("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
390 /// Check all questiontype plugins and upgrade if necessary
391 /// first old *.php update and then the new upgrade.php script
392 /// It is important that this is done AFTER the quiz module has been upgraded
393     upgrade_plugins('qtype', 'question/type', "$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
395 /// Upgrade backup/restore system if necessary
396 /// first old *.php update and then the new upgrade.php script
397     require_once("$CFG->dirroot/backup/lib.php");
398     upgrade_backup_db("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
400 /// Upgrade blocks system if necessary
401 /// first old *.php update and then the new upgrade.php script
402     require_once("$CFG->dirroot/lib/blocklib.php");
403     upgrade_blocks_db("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
405 /// Check all blocks and load (or upgrade them if necessary)
406 /// first old *.php update and then the new upgrade.php script
407     upgrade_blocks_plugins("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
409 /// Check all enrolment plugins and upgrade if necessary
410 /// first old *.php update and then the new upgrade.php script
411     upgrade_plugins('enrol', 'enrol', "$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
413 /// Check all auth plugins and upgrade if necessary
414     upgrade_plugins('auth','auth',"$CFG->wwwroot/$CFG->admin/index.php");
416 /// Check all course formats and upgrade if necessary
417     upgrade_plugins('format','course/format',"$CFG->wwwroot/$CFG->admin/index.php");
419 /// Check for local database customisations
420 /// first old *.php update and then the new upgrade.php script
421     require_once("$CFG->dirroot/lib/locallib.php");
422     upgrade_local_db("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
424 /// Check for changes to RPC functions
425     require_once("$CFG->dirroot/$CFG->admin/mnet/adminlib.php");
426     upgrade_RPC_functions("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
428 /// Upgrade all plugins for gradebook
429     upgrade_plugins('gradeexport', 'grade/export', "$CFG->wwwroot/$CFG->admin/index.php");
430     upgrade_plugins('gradeimport', 'grade/import', "$CFG->wwwroot/$CFG->admin/index.php");
431     upgrade_plugins('gradereport', 'grade/report', "$CFG->wwwroot/$CFG->admin/index.php");
433 /// Check all message output plugins and upgrade if necessary
434     upgrade_plugins('message','message/output',"$CFG->wwwroot/$CFG->admin/index.php");
436 /// Check all admin report plugins and upgrade if necessary
437     upgrade_plugins('report', $CFG->admin.'/report', "$CFG->wwwroot/$CFG->admin/index.php");
439 /// Check all quiz report plugins and upgrade if necessary
440     upgrade_plugins('quizreport', 'mod/quiz/report', "$CFG->wwwroot/$CFG->admin/index.php");
442 /// Check all portfolio plugins and upgrade if necessary
443     upgrade_plugins('portfolio', 'portfolio/type', "$CFG->wwwroot/$CFG->admin/index.php");
445 /// just make sure upgrade logging is properly terminated
446     upgrade_log_finish();
448     unset($SESSION->installautopilot);
450 /// Set up the blank site - to be customized later at the end of install.
451     if (! $site = get_site()) {
452         // We are about to create the site "course"
453         require_once($CFG->libdir.'/blocklib.php');
455         $newsite = new object();
456         $newsite->fullname = "";
457         $newsite->shortname = "";
458         $newsite->summary = NULL;
459         $newsite->newsitems = 3;
460         $newsite->numsections = 0;
461         $newsite->category = 0;
462         $newsite->format = 'site';  // Only for this course
463         $newsite->teacher = get_string("defaultcourseteacher");
464         $newsite->teachers = get_string("defaultcourseteachers");
465         $newsite->student = get_string("defaultcoursestudent");
466         $newsite->students = get_string("defaultcoursestudents");
467         $newsite->timemodified = time();
469         if (!$newid = $DB->insert_record('course', $newsite)) {
470             print_error('cannotsetupsite', 'error');
471         }
472         // make sure course context exists
473         get_context_instance(CONTEXT_COURSE, $newid);
475         // Site created, add blocks for it
476         $page = page_create_object(PAGE_COURSE_VIEW, $newid);
477         blocks_repopulate_page($page); // Return value not checked because you can always edit later
479         // create default course category
480         $cat = get_course_category();
482         redirect('index.php');
483     }
485     // initialise default blocks on admin and site page if needed
486     if (empty($CFG->adminblocks_initialised)) {
487         require_once("$CFG->dirroot/$CFG->admin/pagelib.php");
488         require_once($CFG->libdir.'/blocklib.php');
489         page_map_class(PAGE_ADMIN, 'page_admin');
490         $page = page_create_object(PAGE_ADMIN, 0); // there must be some id number
491         blocks_repopulate_page($page);
493         //add admin_tree block to site if not already present
494         if ($admintree = $DB->get_record('block', array('name'=>'admin_tree'))) {
495             $page = page_create_object(PAGE_COURSE_VIEW, SITEID);
496             $pageblocks=blocks_get_by_page($page);
497             blocks_execute_action($page, $pageblocks, 'add', (int)$admintree->id, false, false);
498             if ($admintreeinstance = $DB->get_record('block_instance', array('pagetype'=>$page->type, 'pageid'=>SITEID, 'blockid'=>$admintree->id))) {
499                 $pageblocks=blocks_get_by_page($page);
500                 blocks_execute_action($page, $pageblocks, 'moveleft', $admintreeinstance, false, false);
501             }
502         }
504         set_config('adminblocks_initialised', 1);
505     }
507 /// Define the unique site ID code if it isn't already
508     if (empty($CFG->siteidentifier)) {    // Unique site identification code
509         set_config('siteidentifier', random_string(32).$_SERVER['HTTP_HOST']);
510     }
512 /// ugly hack - if mnet is not initialised include the mnet lib, it adds needed mnet records and configures config options  
513 ///             we should not do such crazy stuff in lib functions!!!
514     if (empty($CFG->mnet_localhost_id)) {
515         require_once $CFG->dirroot.'/mnet/lib.php';
516     }
518 /// Check if the guest user exists.  If not, create one.
519     if (!$DB->record_exists('user', array('username'=>'guest'))) {
520         if (! $guest = create_guest_record()) {
521             notify("Could not create guest user record !!!");
522         }
523     }
525 /// Set up the admin user
526     if (empty($CFG->rolesactive)) {
527         build_context_path(); // just in case - should not be needed
528         create_admin_user();
529     }
531 /// Check for valid admin user - no guest autologin
532     require_login(0, false);
534     $context = get_context_instance(CONTEXT_SYSTEM);
536     require_capability('moodle/site:config', $context);
538 /// check that site is properly customized
539     if (empty($site->shortname)) {
540         // probably new installation - lets return to frontpage after this step
541         // remove settings that we want uninitialised
542         unset_config('registerauth');
543         redirect('upgradesettings.php?return=site');
544     }
546 /// Check if we are returning from moodle.org registration and if so, we mark that fact to remove reminders
548     if (!empty($id)) {
549         if ($id == $CFG->siteidentifier) {
550             set_config('registered', time());
551         }
552     }
554     $adminroot =& admin_get_root();
556 /// Check if there are any new admin settings which have still yet to be set
557     if (any_new_admin_settings($adminroot)){
558         redirect('upgradesettings.php');
559     }
561 /// Everything should now be set up, and the user is an admin
563 /// Print default admin page with notifications.
565     admin_externalpage_setup('adminnotifications');
566     admin_externalpage_print_header();
568 /// Deprecated database! Warning!!
569     if (!empty($CFG->migrated_to_new_db)) {
570         print_box(print_string('dbmigrationdeprecateddb', 'admin'), 'generalbox adminwarning');
571     }
573 /// Check for any special upgrades that might need to be run
574     if (!empty($CFG->upgrade)) {
575         print_box(get_string("upgrade$CFG->upgrade", "admin", "$CFG->wwwroot/$CFG->admin/upgrade$CFG->upgrade.php"));
576     }
578     if (ini_get_bool('register_globals')) {
579         print_box(get_string('globalswarning', 'admin'), 'generalbox adminwarning');
580     }
582     if (is_dataroot_insecure()) {
583         print_box(get_string('datarootsecuritywarning', 'admin', $CFG->dataroot), 'generalbox adminwarning');
584     }
586     if (defined('WARN_DISPLAY_ERRORS_ENABLED')) {
587         print_box(get_string('displayerrorswarning', 'admin'), 'generalbox adminwarning');
588     }
590     if (substr($CFG->wwwroot, -1) == '/') {
591         print_box(get_string('cfgwwwrootslashwarning', 'admin'), 'generalbox adminwarning');
592     }
593     if (strpos($ME, $CFG->httpswwwroot.'/') === false) {
594         print_box(get_string('cfgwwwrootwarning', 'admin'), 'generalbox adminwarning');
595     }
597 /// If no recently cron run
598     $lastcron = $DB->get_field_sql('SELECT MAX(lastcron) FROM {modules}');
599     if (time() - $lastcron > 3600 * 24) {
600         $strinstallation = get_string('installation', 'install');
601         $helpbutton = helpbutton('install', $strinstallation, 'moodle', true, false, '', true);
602         print_box(get_string('cronwarning', 'admin')."&nbsp;".$helpbutton, 'generalbox adminwarning');
603     }
605 /// Print multilang upgrade notice if needed
606     if (empty($CFG->filter_multilang_converted)) {
607         print_box(get_string('multilangupgradenotice', 'admin'), 'generalbox adminwarning');
608     }
610 /// Alert if we are currently in maintenance mode
611     if (file_exists($CFG->dataroot.'/1/maintenance.html')) {
612         print_box(get_string('sitemaintenancewarning', 'admin'), 'generalbox adminwarning');
613     }
616 /// Print slightly annoying registration button
617     $options = array();
618     $options['sesskey'] = $USER->sesskey;
619     print_box_start('generalbox adminwarning');
620     if(!isset($CFG->registered)) {
621        print_string('pleaseregister', 'admin');
622     }
623     else { /* if (isset($CFG->registered) && $CFG->registered < (time() - 3600*24*30*6)) { */
624        print_string('pleaserefreshregistration', 'admin', userdate($CFG->registered));
625     }
626     print_single_button('register.php', $options, get_string('registration'));
627     print_box_end();
630     //////////////////////////////////////////////////////////////////////////////////////////////////
631     ////  IT IS ILLEGAL AND A VIOLATION OF THE GPL TO HIDE, REMOVE OR MODIFY THIS COPYRIGHT NOTICE ///
632     $copyrighttext = '<a href="http://moodle.org/">Moodle</a> '.
633                      '<a href="http://docs.moodle.org/en/Release" title="'.$CFG->version.'">'.$CFG->release.'</a><br />'.
634                      'Copyright &copy; 1999 onwards, Martin Dougiamas<br />'.
635                      'and <a href="http://docs.moodle.org/en/Credits">many other contributors</a>.<br />'.
636                      '<a href="http://docs.moodle.org/en/License">GNU Public License</a>';
637     print_box($copyrighttext, 'copyright');
638     //////////////////////////////////////////////////////////////////////////////////////////////////
640     admin_externalpage_print_footer();
642 ?>