dirroot.'/lib/adminlib.php'); // Contains various admin-only functions $id = optional_param('id', '', PARAM_ALPHANUM); $confirmupgrade = optional_param('confirmupgrade', 0, PARAM_BOOL); /// Check that PHP is of a sufficient version if (!check_php_version("4.1.0")) { //TODO: should we bump it up to 4.3.0?? $phpversion = phpversion(); print_heading("Sorry, Moodle requires PHP 4.1.0 or later (currently using version $phpversion)"); die; } /// Check some PHP server settings $documentationlink = "please read the install documentation"; if (ini_get_bool('session.auto_start')) { error("The PHP server variable 'session.auto_start' should be Off - $documentationlink"); } if (ini_get_bool('magic_quotes_runtime')) { error("The PHP server variable 'magic_quotes_runtime' should be Off - $documentationlink"); } if (!ini_get_bool('file_uploads')) { error("The PHP server variable 'file_uploads' is not turned On - $documentationlink"); } /// Check that config.php has been edited if ($CFG->wwwroot == "http://example.com/moodle") { error("Moodle has not been configured yet. You need to edit config.php first."); } /// Check settings in config.php $dirroot = dirname(realpath("../index.php")); if (!empty($dirroot) and $dirroot != $CFG->dirroot) { error("Please fix your settings in config.php:

You have:

\$CFG->dirroot = \"".addslashes($CFG->dirroot)."\";

but it should be:

\$CFG->dirroot = \"".addslashes($dirroot)."\";", "./"); } /// Set some necessary variables during set-up to avoid PHP warnings later on this page if (!isset($CFG->framename)) { $CFG->framename = "_top"; } if (!isset($CFG->release)) { $CFG->release = ""; } if (!isset($CFG->version)) { $CFG->version = ""; } /// Turn off time limits and try to flush everything all the time, sometimes upgrades can be slow. @set_time_limit(0); @ob_implicit_flush(true); @ob_end_flush(); /// Check if the main tables have been installed yet or not. if (! $tables = $db->Metatables() ) { // No tables yet at all. $maintables = false; } else { // Check for missing main tables $maintables = true; $mtables = array("config", "course", "course_categories", "course_modules", "course_sections", "log", "log_display", "modules", "user", "user_admins", "user_students", "user_teachers"); foreach ($mtables as $mtable) { if (!in_array($CFG->prefix.$mtable, $tables)) { $maintables = false; break; } } } if (! $maintables) { if (empty($agreelicence)) { $strlicense = get_string("license"); print_header($strlicense, $strlicense, $strlicense, "", "", false, " ", " "); print_heading("Moodle - Modular Object-Oriented Dynamic Learning Environment"); print_heading(get_string("copyrightnotice")); print_simple_box_start("center"); echo text_to_html(get_string("gpl")); print_simple_box_end(); echo "
"; notice_yesno(get_string("doyouagree"), "index.php?agreelicence=true", "http://moodle.org/doc/?frame=licence.html"); exit; } $strdatabasesetup = get_string("databasesetup"); $strdatabasesuccess = get_string("databasesuccess"); print_header($strdatabasesetup, $strdatabasesetup, $strdatabasesetup, "", "", false, " ", " "); if (file_exists("$CFG->libdir/db/$CFG->dbtype.sql")) { $db->debug = true; if (modify_database("$CFG->libdir/db/$CFG->dbtype.sql")) { $db->debug = false; notify($strdatabasesuccess, "green"); } else { $db->debug = false; error("Error: Main databases NOT set up successfully"); } } else { error("Error: Your database ($CFG->dbtype) is not yet fully supported by Moodle. See the lib/db directory."); } print_continue("index.php"); die; } /// Check version of Moodle code on disk compared with database /// and upgrade if possible. include_once("$CFG->dirroot/version.php"); # defines $version include_once("$CFG->dirroot/lib/db/$CFG->dbtype.php"); # defines upgrades $stradministration = get_string("administration"); if ($CFG->version) { if ($version > $CFG->version) { // upgrade $a->oldversion = "$CFG->release ($CFG->version)"; $a->newversion = "$release ($version)"; $strdatabasechecking = get_string("databasechecking", "", $a); if (empty($confirmupgrade)) { print_header($strdatabasechecking, $stradministration, $strdatabasechecking, "", "", false, " ", " "); notice_yesno(get_string('upgradesure', 'admin', $a->newversion), 'index.php?confirmupgrade=yes', 'index.php'); exit; } else { $strdatabasesuccess = get_string("databasesuccess"); print_header($strdatabasechecking, $stradministration, $strdatabasechecking, "", "", false, " ", " "); print_heading($strdatabasechecking); $db->debug=true; if (main_upgrade($CFG->version)) { $db->debug=false; if (set_config("version", $version)) { remove_dir($CFG->dataroot . '/cache', true); // flush cache notify($strdatabasesuccess, "green"); print_continue("index.php"); exit; } else { notify("Upgrade failed! (Could not update version in config table)"); } } else { $db->debug=false; notify("Upgrade failed! See /version.php"); } } } else if ($version < $CFG->version) { notify("WARNING!!! The code you are using is OLDER than the version that made these databases!"); } } else { $strcurrentversion = get_string("currentversion"); print_header($strcurrentversion, $stradministration, $strcurrentversion, "", "", false, " ", " "); if (set_config("version", $version)) { print_heading("Moodle $release ($version)"); print_continue("index.php"); die; } else { $db->debug=true; if (main_upgrade(0)) { print_continue("index.php"); } else { error("A problem occurred inserting current version into databases"); } $db->debug=false; } } /// Updated human-readable release version if necessary if ($release <> $CFG->release) { // Update the release version $strcurrentrelease = get_string("currentrelease"); print_header($strcurrentrelease, $strcurrentrelease, $strcurrentrelease, "", "", false, " ", " "); print_heading("Moodle $release"); if (!set_config("release", $release)) { notify("ERROR: Could not update release version in database!!"); } if (!empty($CFG->unicodedb)) { $defaultlang = 'en_utf8'; } else { $defaultlang = 'en'; } print_continue("index.php"); print_simple_box_start("CENTER"); if (file_exists("$CFG->dataroot/lang/$defaultlang/docs/release.html")) { include("$CFG->dataroot/lang/$defaultlang/docs/release.html"); } else if (file_exists("$CFG->dirroot/lang/$defaultlang/docs/release.html")) { include("$CFG->dirroot/lang/$defaultlang/docs/release.html"); } print_simple_box_end(); print_continue("index.php"); exit; } /// Insert default values for any important configuration variables include_once("$CFG->dirroot/lib/defaults.php"); foreach ($defaults as $name => $value) { if (!isset($CFG->$name)) { $CFG->$name = $value; set_config($name, $value); $configchange = true; } } /// If any new configurations were found then send to the config page to check if (!empty($configchange)) { redirect("config.php"); } /// Find and check all main modules and load them up or upgrade them if necessary upgrade_activity_modules("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Upgrade backup/restore system if necessary require_once("$CFG->dirroot/backup/lib.php"); upgrade_backup_db("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Upgrade blocks system if necessary require_once("$CFG->dirroot/lib/blocklib.php"); upgrade_blocks_db("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Check all blocks and load (or upgrade them if necessary) upgrade_blocks_plugins("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Check all enrolment plugins and upgrade if necessary upgrade_enrol_plugins("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Check for local database customisations require_once("$CFG->dirroot/lib/locallib.php"); upgrade_local_db("$CFG->wwwroot/$CFG->admin/index.php"); // Return here afterwards /// Set up the overall site name etc. if (! $site = get_site()) { redirect("site.php"); } /// Define the unique site ID code if it isn't already if (empty($CFG->siteidentifier)) { // Unique site identification code set_config('siteidentifier', random_string(32)); } /// Check if the guest user exists. If not, create one. if (! record_exists("user", "username", "guest")) { $guest->auth = "manual"; $guest->username = "guest"; $guest->password = md5("guest"); $guest->firstname = addslashes(get_string("guestuser")); $guest->lastname = " "; $guest->email = "root@localhost"; $guest->description = addslashes(get_string("guestuserinfo")); $guest->confirmed = 1; $guest->lang = $CFG->lang; $guest->timemodified= time(); if (! $guest->id = insert_record("user", $guest)) { notify("Could not create guest user record !!!"); } } /// Set up the admin user if (! record_exists("user_admins")) { // No admin user yet redirect("user.php"); } /// Check for valid admin user require_login(); if (!isadmin()) { error("You need to be an admin user to use this page.", "$CFG->wwwroot/login/index.php"); } /// Check if we are returning from moodle.org registration and if so, we mark that fact to remove reminders if (!empty($id)) { if ($id == $CFG->siteidentifier) { set_config('registered', time()); } } /// At this point everything is set up and the user is an admin, so print menu $stradministration = get_string("administration"); print_header("$site->shortname: $stradministration","$site->fullname", "$stradministration"); print_simple_box_start('center', '100%', '', 20); print_heading($stradministration); /// Deprecated database! Warning!! if (!empty($CFG->migrated_to_new_db)) { print_simple_box_start('center','50%'); print_string('dbmigrationdeprecateddb','admin'); print_simple_box_end(); } if (!empty($CFG->upgrade)) { // Print notice about extra upgrading that needs to be done print_simple_box(get_string("upgrade$CFG->upgrade", "admin", "$CFG->wwwroot/$CFG->admin/upgrade$CFG->upgrade.php"), "center", '50%'); print_spacer(10,10); } if (ini_get_bool('register_globals') && !ini_get_bool('magic_quotes_gpc')) { print_simple_box(get_string('globalsquoteswarning', 'admin'), 'center', '50%'); } /// If no recently cron run $lastcron = get_field_sql('SELECT max(lastcron) FROM ' . $CFG->prefix . 'modules'); if (time() - $lastcron > 3600 * 24) { $strinstallation = get_string('installation', 'install'); $helpbutton = helpbutton('install', $strinstallation, 'moodle', true, false, '', true); print_simple_box(get_string('cronwarning', 'admin')." ".$helpbutton, 'center'); } /// Alert if we are currently in maintenance mode if (file_exists($CFG->dataroot.'/1/maintenance.html')) { print_simple_box(get_string('sitemaintenancewarning', 'admin') , 'center', '50%'); } /// Alert if we are currently in maintenance mode if (empty($CFG->unicodedb)) { print_simple_box(get_string('unicodeupgradenotice', 'admin') , 'center', '50%'); } /// Print slightly annoying registration button every six months ;-) /// You can set the "registered" variable to something far in the future /// if you really want to prevent this. eg 9999999999 if (!isset($CFG->registered) || $CFG->registered < (time() - 3600*24*30*6)) { $options = array(); $options['sesskey'] = $USER->sesskey; print_simple_box_start('center'); echo '

'; print_string('pleaseregister', 'admin'); print_single_button('register.php', $options, get_string('registration')); echo '
'; print_simple_box_end(); } $table->tablealign = "right"; $table->align = array ("right", "left"); $table->wrap = array ("nowrap", "nowrap"); $table->cellpadding = 5; $table->cellspacing = 0; $table->width = "40%"; $configdata = ''; $configdata .= ''; $configdata .= ''; $configdata .= ''; $configdata .= ''; $configdata .= ''; $configdata .= ''; if (!isset($CFG->disablescheduledbackups)) { $configdata .= ''; } $configdata .= ''; $configdata .= ''; $configdata .= ''; $table->data[] = array(''.get_string('configuration').'', $configdata); $userdata = ''; $userdata .= ''; $userdata .= ''; $userdata .= ''; $userdata .= '
'; $userdata .= ''; $userdata .= ''; $userdata .= ''; $userdata .= ''; $table->data[] = array(''.get_string('users').'', $userdata); $table->data[] = array(''.get_string('courses').'', '
'.get_string('adminhelpcourses').'
'); $table->data[] = array(''.get_string('logs').'', '
'.get_string('adminhelplogs').'
'); $table->data[] = array(''.get_string('sitefiles').'', '
'.get_string('adminhelpsitefiles').'
'); $table->data[] = array(''.get_string('stickyblocks','admin').'', '
'.get_string('adminhelpstickyblocks').'
'); if (!empty($CFG->enablestats)) { $table->data[] = array(''.get_string('reports').'', '
'.get_string('adminhelpreports').'
'); } $table->data[] = array(''.get_string('environment','admin').'', '
'.get_string('adminhelpenvironment').'
'); if (file_exists("$CFG->dirroot/$CFG->admin/$CFG->dbtype")) { $table->data[] = array("dbtype/frame.php\">".get_string('managedatabase').'', get_string('adminhelpmanagedatabase')); } print_table($table); ////////////////////////////////////////////////////////////////////////////////////////////////// //// IT IS ILLEGAL AND A VIOLATION OF THE GPL TO REMOVE OR MODIFY THE COPYRIGHT NOTICE BELOW //// $copyrighttext = 'Moodle '. ''.$CFG->release.' ('.$CFG->version.')
'. 'Copyright © 1999 onwards, Martin Dougiamas
'. 'GNU Public License'; echo ''; ////////////////////////////////////////////////////////////////////////////////////////////////// echo ''; echo ''; echo ''; echo '
'; print_single_button($CFG->wwwroot.'/doc/', NULL, get_string('documentation')); echo ''; print_single_button('phpinfo.php', NULL, get_string('phpinfo')); echo ''; $options = array(); $options['sesskey'] = $USER->sesskey; print_single_button('register.php', $options, get_string('registration')); echo '
'; print_simple_box_end(); print_simple_box_start(); //////DUMMY FUNCTION HERE if (optional_param('dbmigrate')) { require_once($CFG->dirroot.'/admin/utfdbmigrate.php'); db_migrate2utf8(); } print_simple_box_end(); print_footer($site); ?>