mirror of
https://github.com/moodle/moodle.git
synced 2025-01-18 14:03:52 +01:00
b4cf937102
If Google can do something like http://translate.google.com/, surely we can do something just as good in Moodle. Here is a first attempt. It is a bit rough around the edges, and only a couple of target lananguages have been implemented so far. (More and better attempts welcome!) In order to ensure that this gets adequate testing, I have made sure that it gets turn on by default. However, if you really don't like it, you can turn it off under Administration > Development -> Experimental settings.
467 lines
20 KiB
PHP
467 lines
20 KiB
PHP
<?php // $Id$
|
|
|
|
/// Check that config.php exists, if not then call the install script
|
|
if (!file_exists('../config.php')) {
|
|
header('Location: ../install.php');
|
|
die;
|
|
}
|
|
|
|
/// Check that PHP is of a sufficient version as soon as possible
|
|
if (version_compare(phpversion(), "5.2.0") < 0) {
|
|
$phpversion = phpversion();
|
|
// do NOT localise - lang strings would not work here and we CAN not move it to later palce
|
|
echo "Sorry, Moodle 2.0 requires PHP 5.2.8 or later (currently using version $phpversion). ";
|
|
echo "Please upgrade your server software or use latest Moodle 1.9.x instead.";
|
|
die;
|
|
}
|
|
|
|
/// try to flush everything all the time
|
|
@ob_implicit_flush(true);
|
|
while(@ob_end_clean()); // ob_end_flush prevents sending of headers
|
|
|
|
|
|
require('../config.php');
|
|
require_once($CFG->libdir.'/adminlib.php'); // Contains various admin-only functions
|
|
require_once($CFG->libdir.'/upgradelib.php');
|
|
|
|
$id = optional_param('id', '', PARAM_TEXT);
|
|
$confirmupgrade = optional_param('confirmupgrade', 0, PARAM_BOOL);
|
|
$confirmrelease = optional_param('confirmrelease', 0, PARAM_BOOL);
|
|
$confirmplugins = optional_param('confirmplugincheck', 0, PARAM_BOOL);
|
|
$agreelicense = optional_param('agreelicense', 0, PARAM_BOOL);
|
|
|
|
/// Check some PHP server settings
|
|
|
|
$documentationlink = '<a href="http://docs.moodle.org/en/Installation">Installation docs</a>';
|
|
|
|
if (ini_get_bool('session.auto_start')) {
|
|
print_error('phpvaroff', 'debug', '', (object)array('name'=>'session.auto_start', 'link'=>$documentationlink));
|
|
}
|
|
|
|
if (ini_get_bool('magic_quotes_runtime')) {
|
|
print_error('phpvaroff', 'debug', '', (object)array('name'=>'magic_quotes_runtime', 'link'=>$documentationlink));
|
|
}
|
|
|
|
if (!ini_get_bool('file_uploads')) {
|
|
print_error('phpvaron', 'debug', '', (object)array('name'=>'file_uploads', 'link'=>$documentationlink));
|
|
}
|
|
|
|
if (is_float_problem()) {
|
|
print_error('phpfloatproblem', 'admin', '', $documentationlink);
|
|
}
|
|
|
|
/// Check settings in config.php
|
|
|
|
$dirroot = dirname(realpath("../index.php"));
|
|
/// Check correct dirroot, ignoring slashes (though should be always forward slashes). MDL-18195
|
|
if (!empty($dirroot) and str_replace('\\', '/', $dirroot) != str_replace('\\', '/', $CFG->dirroot)) {
|
|
print_error('fixsetting', 'debug', '', (object)array('current'=>$CFG->dirroot, 'found'=>str_replace('\\', '/', $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 = "";
|
|
}
|
|
|
|
$version = null;
|
|
$release = null;
|
|
require("$CFG->dirroot/version.php"); // defines $version and $release
|
|
$CFG->target_release = $release; // used during installation and upgrades
|
|
|
|
if (!$version or !$release) {
|
|
print_error('withoutversion', 'debug'); // without version, stop
|
|
}
|
|
|
|
/// Check if the main tables have been installed yet or not.
|
|
if (!$tables = $DB->get_tables() ) { // No tables yet at all.
|
|
$maintables = false;
|
|
|
|
} else { // Check for missing main tables
|
|
$maintables = true;
|
|
$mtables = array('config', 'course', 'groupings'); // some tables used in 1.9 and 2.0, preferable something from the start and end of install.xml
|
|
foreach ($mtables as $mtable) {
|
|
if (!in_array($mtable, $tables)) {
|
|
$maintables = false;
|
|
break;
|
|
}
|
|
}
|
|
unset($mtables);
|
|
}
|
|
unset($tables);
|
|
|
|
// Turn off xmlstrictheaders during upgrade.
|
|
$origxmlstrictheaders = !empty($CFG->xmlstrictheaders);
|
|
$CFG->xmlstrictheaders = false;
|
|
|
|
if (!$maintables) {
|
|
/// hide errors from headers in case debug enabled in config.php
|
|
|
|
/// fake some settings
|
|
$CFG->docroot = 'http://docs.moodle.org';
|
|
|
|
$strinstallation = get_string('installation', 'install');
|
|
|
|
/// remove current session content completely
|
|
session_get_instance()->terminate_current();
|
|
|
|
if (empty($agreelicense)) {
|
|
$strlicense = get_string('license');
|
|
$navigation = build_navigation(array(array('name'=>$strlicense, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strinstallation.' - Moodle '.$CFG->target_release, $strinstallation, $navigation, "", "", false, " ", " ");
|
|
print_heading("<a href=\"http://moodle.org\">Moodle</a> - Modular Object-Oriented Dynamic Learning Environment");
|
|
print_heading(get_string('copyrightnotice'));
|
|
$copyrightnotice = text_to_html(get_string('gpl'));
|
|
$copyrightnotice = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $copyrightnotice); // extremely ugly validation hack
|
|
print_box($copyrightnotice, 'copyrightnotice');
|
|
echo "<br />";
|
|
notice_yesno(get_string('doyouagree'), "index.php?agreelicense=1&lang=$CFG->lang",
|
|
"http://docs.moodle.org/en/License");
|
|
print_footer('upgrade');
|
|
die;
|
|
}
|
|
if (empty($confirmrelease)) {
|
|
$strcurrentrelease = get_string("currentrelease");
|
|
$navigation = build_navigation(array(array('name'=>$strcurrentrelease, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strinstallation.' - Moodle '.$CFG->target_release, $strinstallation, $navigation, "", "", false, " ", " ");
|
|
print_heading("Moodle $release");
|
|
$releasenoteslink = get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes');
|
|
$releasenoteslink = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $releasenoteslink); // extremely ugly validation hack
|
|
print_box($releasenoteslink, 'generalbox boxaligncenter boxwidthwide');
|
|
|
|
require_once($CFG->libdir.'/environmentlib.php');
|
|
if (!check_moodle_environment($release, $environment_results, true, ENV_SELECT_RELEASE)) {
|
|
print_upgrade_reload("index.php?agreelicense=1&lang=$CFG->lang");
|
|
} else {
|
|
notify(get_string('environmentok', 'admin'), 'notifysuccess');
|
|
print_continue("index.php?agreelicense=1&confirmrelease=1&lang=$CFG->lang");
|
|
}
|
|
|
|
print_footer('upgrade');
|
|
die;
|
|
}
|
|
|
|
$strdatabasesetup = get_string("databasesetup");
|
|
$navigation = build_navigation(array(array('name'=>$strdatabasesetup, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strinstallation.' - Moodle '.$CFG->target_release, $strinstallation, $navigation, "", upgrade_get_javascript(), false, " ", " ");
|
|
|
|
if (!$DB->setup_is_unicodedb()) {
|
|
if (!$DB->change_db_encoding()) {
|
|
// If could not convert successfully, throw error, and prevent installation
|
|
print_error('unicoderequired', 'admin');
|
|
}
|
|
}
|
|
|
|
try {
|
|
print_upgrade_part_start('moodle', true); // does not store upgrade running flag
|
|
|
|
$DB->get_manager()->install_from_xmldb_file("$CFG->libdir/db/install.xml");
|
|
upgrade_started(); // we want the flag to be stored in config table ;-)
|
|
|
|
/// set all core default records and default settings
|
|
require_once("$CFG->libdir/db/install.php");
|
|
xmldb_main_install();
|
|
|
|
/// store version
|
|
upgrade_main_savepoint(true, $version, false);
|
|
|
|
/// Continue with the instalation
|
|
events_update_definition('moodle');
|
|
message_update_providers('moodle');
|
|
message_update_providers('message');
|
|
|
|
/// Write default settings unconditionlly
|
|
admin_apply_default_settings(NULL, true);
|
|
|
|
print_upgrade_part_end(null, true);
|
|
} catch (exception $ex) {
|
|
upgrade_handle_exception($ex);
|
|
}
|
|
}
|
|
|
|
|
|
/// Check version of Moodle code on disk compared with database
|
|
/// and upgrade if possible.
|
|
|
|
$stradministration = get_string('administration');
|
|
|
|
if (empty($CFG->version)) {
|
|
print_error('missingconfigversion', 'debug');
|
|
}
|
|
|
|
if ($version > $CFG->version) { // upgrade
|
|
require_once($CFG->libdir.'/db/upgrade.php'); // Defines upgrades
|
|
require_once($CFG->libdir.'/db/upgradelib.php'); // Upgrade-related functions
|
|
|
|
$a->oldversion = "$CFG->release ($CFG->version)";
|
|
$a->newversion = "$release ($version)";
|
|
$strdatabasechecking = get_string("databasechecking", "", $a);
|
|
|
|
if (empty($confirmupgrade)) {
|
|
$navigation = build_navigation(array(array('name'=>$strdatabasechecking, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strdatabasechecking, $stradministration, $navigation, "", "", false, " ", " ");
|
|
|
|
notice_yesno(get_string('upgradesure', 'admin', $a->newversion), 'index.php?confirmupgrade=1', 'index.php');
|
|
print_footer('upgrade');
|
|
exit;
|
|
|
|
} else if (empty($confirmrelease)){
|
|
$strcurrentrelease = get_string("currentrelease");
|
|
$navigation = build_navigation(array(array('name'=>$strcurrentrelease, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strcurrentrelease, $strcurrentrelease, $navigation, "", "", false, " ", " ");
|
|
print_heading("Moodle $release");
|
|
$releasenoteslink = get_string('releasenoteslink', 'admin', 'http://docs.moodle.org/en/Release_Notes');
|
|
$releasenoteslink = str_replace('target="_blank"', 'onclick="this.target=\'_blank\'"', $releasenoteslink); // extremely ugly validation hack
|
|
print_box($releasenoteslink);
|
|
|
|
require_once($CFG->libdir.'/environmentlib.php');
|
|
if (!check_moodle_environment($release, $environment_results, true, ENV_SELECT_RELEASE)) {
|
|
print_upgrade_reload('index.php?confirmupgrade=1');
|
|
} else {
|
|
notify(get_string('environmentok', 'admin'), 'notifysuccess');
|
|
if (empty($CFG->skiplangupgrade)) {
|
|
print_box_start('generalbox', 'notice');
|
|
print_string('langpackwillbeupdated', 'admin');
|
|
print_box_end();
|
|
}
|
|
print_continue('index.php?confirmupgrade=1&confirmrelease=1');
|
|
}
|
|
|
|
print_footer('upgrade');
|
|
die;
|
|
|
|
} elseif (empty($confirmplugins)) {
|
|
$strplugincheck = get_string('plugincheck');
|
|
$navigation = build_navigation(array(array('name'=>$strplugincheck, 'link'=>null, 'type'=>'misc')));
|
|
print_header($strplugincheck, $strplugincheck, $navigation, "", "", false, " ", " ");
|
|
print_heading($strplugincheck);
|
|
print_box_start('generalbox', 'notice');
|
|
print_string('pluginchecknotice');
|
|
print_box_end();
|
|
print_plugin_tables();
|
|
print_upgrade_reload('index.php?confirmupgrade=1&confirmrelease=1');
|
|
print_continue('index.php?confirmupgrade=1&confirmrelease=1&confirmplugincheck=1');
|
|
print_footer('none');
|
|
die();
|
|
|
|
} else {
|
|
|
|
/// Launch main upgrade
|
|
try {
|
|
|
|
// Upgrade current language pack if we can
|
|
if (empty($CFG->skiplangupgrade)) {
|
|
upgrade_language_pack(false);
|
|
}
|
|
|
|
print_upgrade_part_start('moodle', false);
|
|
|
|
$result = xmldb_main_upgrade($CFG->version);
|
|
if ($version > $CFG->version) {
|
|
// store version if not already there
|
|
upgrade_main_savepoint($result, $version, false);
|
|
}
|
|
|
|
// perform all other component upgrade routines
|
|
update_capabilities('moodle');
|
|
events_update_definition('moodle');
|
|
message_update_providers('moodle');
|
|
message_update_providers('message');
|
|
|
|
remove_dir($CFG->dataroot . '/cache', true); // flush cache
|
|
|
|
print_upgrade_part_end('moodle', false);
|
|
} catch (Exception $ex) {
|
|
upgrade_handle_exception($ex);
|
|
}
|
|
}
|
|
} else if ($version < $CFG->version) {
|
|
notify("WARNING!!! The code you are using is OLDER than the version that made these databases!");
|
|
}
|
|
|
|
/// Updated human-readable release version if necessary
|
|
|
|
if ($release <> $CFG->release) { // Update the release version
|
|
set_config("release", $release);
|
|
}
|
|
|
|
/// upgrade all plugins types
|
|
try {
|
|
$plugintypes = get_plugin_types();
|
|
foreach ($plugintypes as $type=>$location) {
|
|
upgrade_plugins($type, $location, 'print_upgrade_part_start', 'print_upgrade_part_end');
|
|
}
|
|
} catch (Exception $ex) {
|
|
upgrade_handle_exception($ex);
|
|
}
|
|
|
|
/// Check for changes to RPC functions
|
|
if ($CFG->mnet_dispatcher_mode != 'off') {
|
|
try {
|
|
// this needs a full rewrite, sorry to mention that :-(
|
|
require_once("$CFG->dirroot/$CFG->admin/mnet/adminlib.php");
|
|
upgrade_RPC_functions(); // Return here afterwards
|
|
} catch (Exception $ex) {
|
|
upgrade_handle_exception($ex);
|
|
}
|
|
}
|
|
|
|
/// Check for local database customisations
|
|
try {
|
|
require_once("$CFG->dirroot/lib/locallib.php");
|
|
upgrade_local_db('print_upgrade_part_start', 'print_upgrade_part_end');
|
|
} catch (Exception $ex) {
|
|
upgrade_handle_exception($ex);
|
|
}
|
|
|
|
/// indicate that this site is fully configured except the admin password
|
|
if (empty($CFG->rolesactive)) {
|
|
set_config('rolesactive', 1);
|
|
set_config('adminsetuppending', 1);
|
|
unset_config('autotranslatetolang');
|
|
// we neeed this redirect to setup proper session
|
|
upgrade_finished("index.php?sessionstarted=1&lang=$CFG->lang");
|
|
}
|
|
|
|
/// make sure admin user is created - this is the last step because we need
|
|
/// session to be working properly in order to edit admin account
|
|
if (!empty($CFG->adminsetuppending)) {
|
|
$sessionstarted = optional_param('sessionstarted', 0, PARAM_BOOL);
|
|
if (!$sessionstarted) {
|
|
redirect("index.php?sessionstarted=1&lang=$CFG->lang");
|
|
} else {
|
|
$sessionverify = optional_param('sessionverify', 0, PARAM_BOOL);
|
|
if (!$sessionverify) {
|
|
$SESSION->sessionverify = 1;
|
|
redirect("index.php?sessionstarted=1&sessionverify=1&lang=$CFG->lang");
|
|
} else {
|
|
if (empty($SESSION->sessionverify)) {
|
|
print_error('installsessionerror', 'admin', "index.php?sessionstarted=1&lang=$CFG->lang");
|
|
}
|
|
unset($SESSION->sessionverify);
|
|
}
|
|
}
|
|
|
|
$adminuser = get_complete_user_data('username', 'admin');
|
|
|
|
if ($adminuser->password === 'adminsetuppending') {
|
|
// prevent installation hijacking
|
|
if ($adminuser->lastip !== getremoteaddr()) {
|
|
print_error('installhijacked', 'admin');
|
|
}
|
|
// login user and let him set password and admin details
|
|
$adminuser->newadminuser = 1;
|
|
message_set_default_message_preferences($adminuser);
|
|
complete_user_login($adminuser, false);
|
|
redirect("$CFG->wwwroot/user/editadvanced.php?id=$adminuser->id"); // Edit thyself
|
|
|
|
} else {
|
|
unset_config('adminsetuppending');
|
|
}
|
|
|
|
} else {
|
|
/// just make sure upgrade logging is properly terminated
|
|
upgrade_finished('upgradesettings.php');
|
|
}
|
|
|
|
// Turn xmlstrictheaders back on now.
|
|
$CFG->xmlstrictheaders = $origxmlstrictheaders;
|
|
unset($origxmlstrictheaders);
|
|
|
|
/// Check for valid admin user - no guest autologin
|
|
require_login(0, false);
|
|
$context = get_context_instance(CONTEXT_SYSTEM);
|
|
require_capability('moodle/site:config', $context);
|
|
|
|
/// check that site is properly customized
|
|
$site = get_site();
|
|
if (empty($site->shortname)) {
|
|
// probably new installation - lets return to frontpage after this step
|
|
// remove settings that we want uninitialised
|
|
unset_config('registerauth');
|
|
redirect('upgradesettings.php?return=site');
|
|
}
|
|
|
|
/// Check if we are returning from moodle.org registration and if so, we mark that fact to remove reminders
|
|
if (!empty($id) and $id == $CFG->siteidentifier) {
|
|
set_config('registered', time());
|
|
}
|
|
|
|
/// setup critical warnings before printing admin tree block
|
|
$insecuredataroot = is_dataroot_insecure(true);
|
|
|
|
$SESSION->admin_critical_warning = ($insecuredataroot==INSECURE_DATAROOT_ERROR);
|
|
|
|
$adminroot = admin_get_root();
|
|
|
|
/// Check if there are any new admin settings which have still yet to be set
|
|
if (any_new_admin_settings($adminroot)){
|
|
redirect('upgradesettings.php');
|
|
}
|
|
|
|
/// Everything should now be set up, and the user is an admin
|
|
|
|
/// Print default admin page with notifications.
|
|
|
|
admin_externalpage_setup('adminnotifications');
|
|
admin_externalpage_print_header();
|
|
|
|
/// Deprecated database! Warning!!
|
|
if (!empty($CFG->migrated_to_new_db)) {
|
|
print_box(print_string('dbmigrationdeprecateddb', 'admin'), 'generalbox adminwarning');
|
|
}
|
|
|
|
/// Check for any special upgrades that might need to be run
|
|
if (!empty($CFG->upgrade)) {
|
|
print_box(get_string("upgrade$CFG->upgrade", "admin", "$CFG->wwwroot/$CFG->admin/upgrade$CFG->upgrade.php"));
|
|
}
|
|
|
|
if ($insecuredataroot == INSECURE_DATAROOT_WARNING) {
|
|
print_box(get_string('datarootsecuritywarning', 'admin', $CFG->dataroot), 'generalbox adminwarning');
|
|
} else if ($insecuredataroot == INSECURE_DATAROOT_ERROR) {
|
|
print_box(get_string('datarootsecurityerror', 'admin', $CFG->dataroot), 'generalbox adminerror');
|
|
|
|
}
|
|
|
|
if (defined('WARN_DISPLAY_ERRORS_ENABLED')) {
|
|
print_box(get_string('displayerrorswarning', 'admin'), 'generalbox adminwarning');
|
|
}
|
|
|
|
/// If no recently cron run
|
|
$lastcron = $DB->get_field_sql('SELECT MAX(lastcron) FROM {modules}');
|
|
if (time() - $lastcron > 3600 * 24) {
|
|
$strinstallation = get_string('installation', 'install');
|
|
$helpbutton = helpbutton('install', $strinstallation, 'moodle', true, false, '', true);
|
|
print_box(get_string('cronwarning', 'admin')." ".$helpbutton, 'generalbox adminwarning');
|
|
}
|
|
|
|
/// Print multilang upgrade notice if needed
|
|
if (empty($CFG->filter_multilang_converted)) {
|
|
print_box(get_string('multilangupgradenotice', 'admin'), 'generalbox adminwarning');
|
|
}
|
|
|
|
/// Alert if we are currently in maintenance mode
|
|
if (file_exists($CFG->dataroot.'/1/maintenance.html')) {
|
|
print_box(get_string('sitemaintenancewarning', 'admin'), 'generalbox adminwarning');
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////////////////////////////
|
|
//// IT IS ILLEGAL AND A VIOLATION OF THE GPL TO HIDE, REMOVE OR MODIFY THIS COPYRIGHT NOTICE ///
|
|
$copyrighttext = '<a href="http://moodle.org/">Moodle</a> '.
|
|
'<a href="http://docs.moodle.org/en/Release" title="'.$CFG->version.'">'.$CFG->release.'</a><br />'.
|
|
'Copyright © 1999 onwards, Martin Dougiamas<br />'.
|
|
'and <a href="http://docs.moodle.org/en/Credits">many other contributors</a>.<br />'.
|
|
'<a href="http://docs.moodle.org/en/License">GNU Public License</a>';
|
|
print_box($copyrighttext, 'copyright');
|
|
//////////////////////////////////////////////////////////////////////////////////////////////////
|
|
|
|
admin_externalpage_print_footer();
|
|
|
|
?>
|