admin/index.php

   1 <?PHP // $Id$
   2
   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     }
   8
   9     require_once("../config.php");
  10     include_once("$CFG->dirroot/lib/adminlib.php");  // Contains various admin-only functions
  11
  12
  13 /// Check that PHP is of a sufficient version
  14
  15     if (!check_php_version("4.1.0")) {
  16         $version = phpversion();
  17         print_heading("Sorry, Moodle requires PHP 4.1.0 or later (currently using version $version)");
  18         die;
  19     }
  20
  21
  22 /// Check some PHP server settings
  23
  24     $documentationlink = "please read the <A HREF=\"../doc/?frame=install.html&sub=webserver\">install documentation</A>";
  25
  26     if (ini_get_bool('session.auto_start')) {
  27         error("The PHP server variable 'session.auto_start' should be Off - $documentationlink");
  28     }
  29
  30     if (ini_get_bool('magic_quotes_runtime')) {
  31         error("The PHP server variable 'magic_quotes_runtime' should be Off - $documentationlink");
  32     }
  33
  34     if (!ini_get_bool('file_uploads')) {
  35         error("The PHP server variable 'file_uploads' is not turned On - $documentationlink");
  36     }
  37
  38
  39 /// Check that config.php has been edited
  40
  41     if ($CFG->wwwroot == "http://example.com/moodle") {
  42         error("Moodle has not been configured yet.  You need to to edit config.php first.");
  43     }
  44
  45
  46 /// Check settings in config.php
  47
  48     $dirroot = dirname(realpath("../index.php"));
  49     if (!empty($dirroot) and $dirroot != $CFG->dirroot) {
  50         error("Please fix your settings in config.php:
  51               <P>You have:
  52               <P>\$CFG->dirroot = \"".addslashes($CFG->dirroot)."\";
  53               <P>but it should be:
  54               <P>\$CFG->dirroot = \"".addslashes($dirroot)."\";",
  55               "./");
  56     }
  57
  58 /// Set some necessary variables during set-up to avoid PHP warnings later on this page
  59     if (!isset($CFG->framename)) {
  60         $CFG->framename = "_top";
  61     }
  62     if (!isset($CFG->release)) {
  63         $CFG->release = "";
  64     }
  65     if (!isset($CFG->version)) {
  66         $CFG->version = "";
  67     }
  68
  69 /// Turn off time limits, sometimes upgrades can be slow.
  70
  71     @set_time_limit(0);
  72
  73 /// Check if the main tables have been installed yet or not.
  74
  75     if (! $tables = $db->Metatables() ) {    // No tables yet at all.
  76         $maintables = false;
  77
  78     } else {                                 // Check for missing main tables
  79         $maintables = true;
  80         $mtables = array("config", "course", "course_categories", "course_modules",
  81                          "course_sections", "log", "log_display", "modules",
  82                          "user", "user_admins", "user_students", "user_teachers");
  83         foreach ($mtables as $mtable) {
  84             if (!in_array($CFG->prefix.$mtable, $tables)) {
  85                 $maintables = false;
  86                 break;
  87             }
  88         }
  89     }
  90
  91     if (! $maintables) {
  92         if (empty($agreelicence)) {
  93             $strlicense = get_string("license");
  94             print_header($strlicense, $strlicense, $strlicense, "", "", false, "&nbsp;", "&nbsp;");
  95             print_heading("<A HREF=\"http://moodle.org\">Moodle</A> - Modular Object-Oriented Dynamic Learning Environment");
  96             print_heading(get_string("copyrightnotice"));
  97             print_simple_box_start("center");
  98             echo text_to_html(get_string("gpl"));
  99             print_simple_box_end();
 100             echo "<br />";
 101             notice_yesno(get_string("doyouagree"), "index.php?agreelicence=true",
 102                                                    "http://moodle.org/doc/?frame=licence.html");
 103             exit;
 104         }
 105
 106         $strdatabasesetup    = get_string("databasesetup");
 107         $strdatabasesuccess  = get_string("databasesuccess");
 108         print_header($strdatabasesetup, $strdatabasesetup, $strdatabasesetup, "", "", false, "&nbsp;", "&nbsp;");
 109         if (file_exists("$CFG->libdir/db/$CFG->dbtype.sql")) {
 110             $db->debug = true;
 111             if (modify_database("$CFG->libdir/db/$CFG->dbtype.sql")) {
 112                 $db->debug = false;
 113                 notify($strdatabasesuccess, "green");
 114             } else {
 115                 $db->debug = false;
 116                 error("Error: Main databases NOT set up successfully");
 117             }
 118         } else {
 119             error("Error: Your database ($CFG->dbtype) is not yet fully supported by Moodle.  See the lib/db directory.");
 120         }
 121         print_continue("index.php");
 122         die;
 123     }
 124
 125
 126 /// Insert default values for any important configuration variables
 127
 128     include_once("$CFG->dirroot/lib/defaults.php");
 129
 130     foreach ($defaults as $name => $value) {
 131         if (!isset($CFG->$name)) {
 132             $CFG->$name = $value;
 133             set_config($name, $value);
 134             $configchange = true;
 135         }
 136     }
 137
 138 /// If any new configurations were found then send to the config page to check
 139
 140     if (!empty($configchange)) {
 141         redirect("config.php");
 142     }
 143
 144
 145 /// Check version of Moodle code on disk compared with database
 146 /// and upgrade if possible.
 147
 148     include_once("$CFG->dirroot/version.php");              # defines $version
 149     include_once("$CFG->dirroot/lib/db/$CFG->dbtype.php");  # defines upgrades
 150
 151     if ($CFG->version) {
 152         if ($version > $CFG->version) {  // upgrade
 153             $a->oldversion = $CFG->version;
 154             $a->newversion = $version;
 155             $strdatabasechecking = get_string("databasechecking", "", $a);
 156             $strdatabasesuccess  = get_string("databasesuccess");
 157             print_header($strdatabasechecking, $strdatabasechecking, $strdatabasechecking,
 158                          "", "", false, "&nbsp;", "&nbsp;");
 159             print_heading($strdatabasechecking);
 160             $db->debug=true;
 161             if (main_upgrade($CFG->version)) {
 162                 $db->debug=false;
 163                 if (set_config("version", $version)) {
 164                     notify($strdatabasesuccess, "green");
 165                     print_continue("index.php");
 166                     die;
 167                 } else {
 168                     notify("Upgrade failed!  (Could not update version in config table)");
 169                 }
 170             } else {
 171                 $db->debug=false;
 172                 notify("Upgrade failed!  See /version.php");
 173             }
 174         } else if ($version < $CFG->version) {
 175             notify("WARNING!!!  The code you are using is OLDER than the version that made these databases!");
 176         }
 177
 178     } else {
 179         $strcurrentversion = get_string("currentversion");
 180         print_header($strcurrentversion, $strcurrentversion, $strcurrentversion,
 181                      "", "", false, "&nbsp;", "&nbsp;");
 182
 183         if (set_config("version", $version)) {
 184             print_heading("You are currently using Moodle version $version (Release $release)");
 185             print_continue("index.php");
 186             die;
 187         } else {
 188             $db->debug=true;
 189             if (main_upgrade(0)) {
 190                 print_continue("index.php");
 191             } else {
 192                 error("A problem occurred inserting current version into databases");
 193             }
 194             $db->debug=false;
 195         }
 196     }
 197
 198 /// Updated human-readable release version if necessary
 199
 200     if ($release <> $CFG->release) {  // Update the release version
 201         $strcurrentrelease = get_string("currentrelease");
 202         print_header($strcurrentrelease, $strcurrentrelease, $strcurrentrelease, "", "", false, "&nbsp;", "&nbsp;");
 203         print_heading("Moodle $release");
 204         if (!set_config("release", $release)) {
 205             notify("ERROR: Could not update release version in database!!");
 206         }
 207         print_continue("index.php");
 208         print_simple_box_start("CENTER");
 209         include("$CFG->dirroot/lang/en/docs/release.html");
 210         print_simple_box_end();
 211         print_continue("index.php");
 212         exit;
 213     }
 214
 215
 216 /// Upgrade backup/restore system if necessary
 217     require_once("$CFG->dirroot/backup/lib.php");
 218     upgrade_backup_db("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
 219
 220 /// Upgrade blocks system if necessary
 221     require_once("$CFG->dirroot/lib/blocklib.php");
 222     upgrade_blocks_db("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
 223
 224 /// Check all blocks and load (or upgrade them if necessary)
 225     upgrade_blocks_plugins("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
 226
 227 /// Check all enrolment plugins and upgrade if necessary
 228     upgrade_enrol_plugins("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
 229
 230 /// Find and check all main modules and load them up or upgrade them if necessary
 231     upgrade_activity_modules("$CFG->wwwroot/$CFG->admin/index.php");  // Return here afterwards
 232
 233
 234
 235 /// Set up the overall site name etc.
 236     if (! $site = get_site()) {
 237         redirect("site.php");
 238     }
 239
 240 /// Set up the admin user
 241     if (! record_exists("user_admins")) {   // No admin user yet
 242         redirect("user.php");
 243     }
 244
 245 /// Check for valid admin user
 246     require_login();
 247
 248     if (!isadmin()) {
 249         error("You need to be an admin user to use this page.", "$CFG->wwwroot/login/index.php");
 250     }
 251
 252
 253 /// At this point everything is set up and the user is an admin, so print menu
 254
 255     $stradministration = get_string("administration");
 256     print_header("$site->shortname: $stradministration","$site->fullname", "$stradministration");
 257     print_simple_box_start("center", "100%", "$THEME->cellcontent2", 20);
 258     print_heading($stradministration);
 259
 260     if (!empty($CFG->upgrade)) {  // Print notice about extra upgrading that needs to be done
 261         print_simple_box(get_string("upgrade$CFG->upgrade", "admin",
 262                                     "$CFG->wwwroot/$CFG->admin/upgrade$CFG->upgrade.php"), "center");
 263         print_spacer(10,10);
 264     }
 265
 266     $table->tablealign = "right";
 267     $table->align = array ("right", "left");
 268     $table->wrap = array ("nowrap", "nowrap");
 269     $table->cellpadding = 4;
 270     $table->cellspacing = 3;
 271     $table->width = "40%";
 272
 273     $configdata  = "<font size=+1>&nbsp;</font><a href=\"config.php\">".get_string("configvariables")."</a> - <font size=1>".
 274                     get_string("adminhelpconfigvariables")."</font><br />";
 275     $configdata .= "<font size=+1>&nbsp;</font><a href=\"site.php\">".get_string("sitesettings")."</a> - <font size=1>".
 276                     get_string("adminhelpsitesettings")."</font><br />";
 277     $configdata .= "<font size=+1>&nbsp;</font><a href=\"../theme/index.php\">".get_string("themes")."</a> - <font size=1>".
 278                     get_string("adminhelpthemes")."</font><br />";
 279     $configdata .= "<font size=+1>&nbsp;</font><a href=\"lang.php\">".get_string("language")."</a> - <font size=1>".
 280                     get_string("adminhelplanguage")."</font><br />";
 281     $configdata .= "<font size=+1>&nbsp;</font><a href=\"modules.php\">".get_string("managemodules")."</a> - <font size=1>".
 282                     get_string("adminhelpmanagemodules")."</font><br />";
 283     $configdata .= "<font size=+1>&nbsp;</font><a href=\"blocks.php\">".get_string("manageblocks")."</a> - <font size=1>".
 284                     get_string("adminhelpmanageblocks")."</font><br />";
 285     $configdata .= "<font size=+1>&nbsp;</font><a href=\"filters.php?sesskey=$USER->sesskey\">".get_string("managefilters")."</a> - <font size=1>".
 286                     get_string("adminhelpmanagefilters")."</font><br />";
 287     if (!isset($CFG->disablescheduledbackups)) {
 288         $configdata .= "<font size=+1>&nbsp;</font><a href=\"backup.php?sesskey=$USER->sesskey\">".get_string("backup")."</a> - <font size=1>".
 289                         get_string("adminhelpbackup")."</font><br />";
 290     }
 291     $configdata .= "<font size=+1>&nbsp;</font><a href=\"editor.php?sesskey=$USER->sesskey\">". get_string("editorsettings") ."</a> - <font size=1>".
 292                     get_string("adminhelpeditorsettings")."</font><br />";
 293
 294     $table->data[] = array("<font size=+1><b><a href=\"configure.php\">".get_string("configuration")."</a></b>",
 295                             $configdata);
 296
 297
 298     $userdata = "<font size=+1>&nbsp;</font><a href=\"auth.php?sesskey=$USER->sesskey\">".get_string("authentication")."</a> - <font size=1>".
 299                  get_string("adminhelpauthentication")."</font><br />";
 300     $userdata .= "<font size=+1>&nbsp;</font><a href=\"user.php\">".get_string("edituser")."</a> - <font size=1>".
 301                  get_string("adminhelpedituser")."</font><br />";
 302     $userdata .= "<font size=+1>&nbsp;</font><a href=\"$CFG->wwwroot/$CFG->admin/user.php?newuser=true&sesskey=$USER->sesskey\">".
 303                  get_string("addnewuser")."</a> - <font size=1>".
 304                  get_string("adminhelpaddnewuser")."</font><br />";
 305     $userdata .= "<font size=+1>&nbsp;</font><a href=\"$CFG->wwwroot/$CFG->admin/uploaduser.php?sesskey=$USER->sesskey\">".
 306                  get_string("uploadusers")."</a> - <font size=1>".
 307                  get_string("adminhelpuploadusers")."</font><br />";
 308
 309     $userdata .= "<hr><font size=+1>&nbsp;</font><a href=\"enrol.php?sesskey=$USER->sesskey\">".get_string("enrolments")."</a> - <font size=1>".
 310                  get_string("adminhelpenrolments")."</font><br />";
 311     $userdata .= "<font size=+1>&nbsp;</font><a href=\"../course/index.php?edit=off&sesskey=$USER->sesskey\">".get_string("assignstudents")."</a> - <font size=1>".
 312                  get_string("adminhelpassignstudents")."</font><br />";
 313
 314     $userdata .= "<font size=+1>&nbsp;</font><a href=\"../course/index.php?edit=on&sesskey=$USER->sesskey\">".get_string("assignteachers")."</a> - <font size=1>".
 315                  get_string("adminhelpassignteachers").
 316                  " <img src=\"../pix/t/user.gif\" height=11 width=11></font><br />";
 317     $userdata .= "<font size=+1>&nbsp;</font><a href=\"creators.php?sesskey=$USER->sesskey\">".get_string("assigncreators")."</a> - <font size=1>".
 318                  get_string("adminhelpassigncreators")."</font><br />";
 319     $userdata .= "<font size=+1>&nbsp;</font><a href=\"admin.php?sesskey=$USER->sesskey\">".get_string("assignadmins")."</a> - <font size=1>".
 320                  get_string("adminhelpassignadmins")."</font><br />";
 321
 322     $table->data[] = array("<font size=+1><b><a href=\"users.php\">".get_string("users")."</a></b>", $userdata);
 323
 324     $table->data[] = array("<font size=+1><b><a href=\"../course/index.php?edit=on&sesskey=$USER->sesskey\">".get_string("courses")."</a></b>",
 325                            "<font size=+1>&nbsp;</font>".get_string("adminhelpcourses"));
 326     $table->data[] = array("<font size=+1><b><a href=\"../course/log.php?id=$site->id\">".get_string("logs")."</a></b>",
 327                            "<font size=+1>&nbsp;</font>".get_string("adminhelplogs"));
 328     $table->data[] = array("<font size=+1><b><a href=\"../files/index.php?id=$site->id\">".get_string("sitefiles")."</a></b>",
 329                            "<font size=+1>&nbsp;</font>".get_string("adminhelpsitefiles"));
 330     if (file_exists("$CFG->dirroot/$CFG->admin/$CFG->dbtype")) {
 331         $table->data[] = array("<font size=+1><b><a href=\"$CFG->dbtype/frame.php\">".get_string("managedatabase")."</a></b>",
 332                                "<font size=+1>&nbsp;</font>".get_string("adminhelpmanagedatabase"));
 333     }
 334
 335     print_table($table);
 336
 337     //////////////////////////////////////////////////////////////////////////////////////////////////
 338     ////  IT IS ILLEGAL AND A VIOLATION OF THE GPL TO REMOVE OR MODIFY THE COPYRIGHT NOTICE BELOW ////
 339     $copyrighttext = "<a href=\"http://moodle.org/\">Moodle</a> ".
 340                      "<a href=\"../doc/?frame=release.html\">$CFG->release</a> ($CFG->version)<br />".
 341                      "Copyright &copy; 1999-2004 Martin Dougiamas<br />".
 342                      "<a href=\"../doc/?frame=licence.html\">GNU Public License</a>";
 343     echo "<center><p><font size=1>$copyrighttext</font></p></center>";
 344     //////////////////////////////////////////////////////////////////////////////////////////////////
 345
 346
 347     echo "<table border=0 align=center width=100%><tr>";
 348     echo "<td align=center width=33%>";
 349     print_single_button("$CFG->wwwroot/doc", NULL, get_string("documentation"));
 350     echo "</td>";
 351
 352     echo "<td align=center width=33%>";
 353     print_single_button("phpinfo.php", NULL, get_string("phpinfo"));
 354     echo "</td>";
 355
 356     echo "<td align=center width=33%>";
 357     $options['sesskey'] = $USER->sesskey;
 358     print_single_button("register.php", $options, get_string("registration"));
 359     echo "</td>";
 360     echo "<tr></table>";
 361
 362     print_simple_box_end();
 363
 364     print_footer($site);
 365
 366 ?>