MDL-21146 removing incorrect license defaults, setup.php is not the right place for...
[moodle.git] / lib / setup.php
CommitLineData
da8759cb 1<?php
b37eac91 2
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/>.
17
da8759cb 18/**
19 * setup.php - Sets up sessions, connects to databases and so on
20 *
75249234 21 * Normally this is only called by the main config.php file
22 * Normally this file does not need to be edited.
b37eac91 23 *
24 * @package moodlecore
25 * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com}
26 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
da8759cb 27 */
28
da8759cb 29/**
e1d1b796 30 * Holds the core settings that affect how Moodle works. Some of its fields
31 * are set in config.php, and the rest are loaded from the config table.
32 *
33 * Some typical settings in the $CFG global:
34 * - $CFG->wwwroot - Path to moodle index directory in url format.
35 * - $CFG->dataroot - Path to moodle index directory on server's filesystem.
36 * - $CFG->libdir - Path to moodle's library folder on server's filesystem.
37 *
38 * @global object $CFG
b37eac91 39 * @name $CFG
e1d1b796 40 */
41global $CFG;
42
60f2c866
PS
43// Set up some paths.
44$CFG->libdir = $CFG->dirroot .'/lib';
45
46// exact version of currently used yui2 and 3 library
47$CFG->yui2version = '2.8.0r4';
48$CFG->yui3version = '3.0.0';
49
50// special support for highly optimised scripts that do not need libraries and DB connection
51if (defined('ABORT_AFTER_CONFIG')) {
52 if (!defined('ABORT_AFTER_CONFIG_CANCEL')) {
0037dcc9
PS
53 // hide debugging if not enabled in config.php - we do not want to disclose sensitive info
54 if (isset($CFG->debug)) {
55 error_reporting($CFG->debug);
56 } else {
57 error_reporting(0);
58 }
59 if (empty($CFG->debugdisplay)) {
60 @ini_set('display_errors', '0');
61 @ini_set('log_errors', '1');
62 } else {
63 @ini_set('display_errors', '1');
64 }
60f2c866
PS
65 require_once("$CFG->dirroot/lib/configonlylib.php");
66 return;
67 }
68}
69
e1d1b796 70/**
71 * Database connection. Used for all access to the database.
72 * @global moodle_database $DB
b37eac91 73 * @name $DB
e1d1b796 74 */
75global $DB;
76
77/**
78 * Moodle's wrapper round PHP's $_SESSION.
79 *
80 * @global object $SESSION
b37eac91 81 * @name $SESSION
e1d1b796 82 */
83global $SESSION;
84
85/**
86 * Holds the user table record for the current user. Will be the 'guest'
87 * user record for people who are not logged in.
88 *
89 * $USER is stored in the session.
da8759cb 90 *
735b8567 91 * Items found in the user record:
da8759cb 92 * - $USER->emailstop - Does the user want email sent to them?
93 * - $USER->email - The user's email address.
94 * - $USER->id - The unique integer identified of this user in the 'user' table.
95 * - $USER->email - The user's email address.
96 * - $USER->firstname - The user's first name.
97 * - $USER->lastname - The user's last name.
98 * - $USER->username - The user's login username.
99 * - $USER->secret - The user's ?.
100 * - $USER->lang - The user's language choice.
101 *
e1d1b796 102 * @global object $USER
b37eac91 103 * @name $USER
da8759cb 104 */
674fb525 105global $USER;
e1d1b796 106
c13a5e71 107/**
108 * A central store of information about the current page we are
109 * generating in response to the user's request.
110 *
111 * @global moodle_page $PAGE
b37eac91 112 * @name $PAGE
c13a5e71 113 */
114global $PAGE;
115
da8759cb 116/**
e1d1b796 117 * The current course. An alias for $PAGE->course.
118 * @global object $COURSE
b37eac91 119 * @name $COURSE
da8759cb 120 */
121global $COURSE;
e1d1b796 122
da8759cb 123/**
78946b9b 124 * $OUTPUT is an instance of core_renderer or one of its subclasses. Use
34a2777c 125 * it to generate HTML for output.
da8759cb 126 *
c84a2dbe 127 * $OUTPUT is initialised the first time it is used. See {@link bootstrap_renderer}
128 * for the magic that does that. After $OUTPUT has been initialised, any attempt
129 * to change something that affects the current theme ($PAGE->course, logged in use,
130 * httpsrequried ... will result in an exception.)
34a2777c 131 *
cbcc9852
PS
132 * Please note the $OUTPUT is replacing the old global $THEME object.
133 *
34a2777c 134 * @global object $OUTPUT
135 * @name $OUTPUT
136 */
137global $OUTPUT;
138
9d0dd812 139/**
e1d1b796 140 * Shared memory cache.
141 * @global object $MCACHE
b37eac91 142 * @name $MCACHE
e1d1b796 143 */
144global $MCACHE;
145
146/**
147 * A global to define if the page being displayed must run under HTTPS.
6800d78e 148 *
e1d1b796 149 * Its primary goal is to allow 100% HTTPS pages when $CFG->loginhttps is enabled. Default to false.
b7009474 150 * Its enabled only by the $PAGE->https_required() function and used in some pages to update some URLs
b37eac91 151 *
152 * @global bool $HTTPSPAGEREQUIRED
153 * @name $HTTPSPAGEREQUIRED
154 */
9d0dd812 155global $HTTPSPAGEREQUIRED;
156
b37eac91 157/**
158 * Full script path including all params, slash arguments, scheme and host.
159 * @global string $FULLME
160 * @name $FULLME
161 */
11e7b506 162global $FULLME;
e1d1b796 163
b37eac91 164/**
165 * Script path including query string and slash arguments without host.
166 * @global string $ME
167 * @name $ME
168 */
11e7b506 169global $ME;
e1d1b796 170
b37eac91 171/**
172 * $FULLME without slasharguments and query string.
173 * @global string $FULLSCRIPT
174 * @name $FULLSCRIPT
175 */
11e7b506 176global $FULLSCRIPT;
e1d1b796 177
b37eac91 178/**
179 * Relative moodle script path '/course/view.php'
180 * @global string $SCRIPT
181 * @name $SCRIPT
182 */
11e7b506 183global $SCRIPT;
9d0dd812 184
2e9b772f
PS
185// Scripts may request no debug and error messages in output
186// please note it must be defined before including the config.php script
187// and in some cases you also need to set custom default exception handler
188if (!defined('NO_DEBUG_DISPLAY')) {
189 define('NO_DEBUG_DISPLAY', false);
190}
191
ccda6d68
PS
192// wwwroot is mandatory
193if (!isset($CFG->wwwroot)) {
194 // trigger_error() is not correct here, no need to log this
47c2811b
PS
195 header($_SERVER['SERVER_PROTOCOL'] . ' 503 Service Unavailable');
196 echo('Fatal: $CFG->wwwroot is not configured! Exiting.');
197 exit(1);
ccda6d68 198}
75249234 199
4dffc775
PS
200// Detect CLI scripts - CLI scripts are executed from command line, do not have session and we do not want HTML in output
201if (!defined('CLI_SCRIPT')) { // CLI_SCRIPT might be defined in 'fake' CLI scripts like admin/cron.php
202 if (isset($_SERVER['REMOTE_ADDR'])) {
203 define('CLI_SCRIPT', false);
204 } else {
205 /** @ignore */
206 define('CLI_SCRIPT', true);
a91b910e 207 }
4dffc775 208}
a91b910e 209
1adaa404
PS
210// Detect ajax scripts - they are similar to CLI because we can not redirect, output html, etc.
211if (!defined('AJAX_SCRIPT')) {
212 define('AJAX_SCRIPT', false);
213}
214
4dffc775
PS
215// sometimes default PHP settings are borked on shared hosting servers, I wonder why they have to do that??
216@ini_set('precision', 14); // needed for upgrades and gradebook
133b5929 217
4dffc775
PS
218// The current directory in PHP version 4.3.0 and above isn't necessarily the
219// directory of the script when run from the command line. The require_once()
220// would fail, so we'll have to chdir()
221if (!isset($_SERVER['REMOTE_ADDR']) && isset($_SERVER['argv'][0])) {
222 chdir(dirname($_SERVER['argv'][0]));
223}
133b5929 224
4dffc775
PS
225// Store settings from config.php in array in $CFG - we can use it later to detect problems and overrides
226$CFG->config_php_settings = (array)$CFG;
a91b910e 227
4dffc775
PS
228// Set httpswwwroot default value (this variable will replace $CFG->wwwroot
229// inside some URLs used in HTTPSPAGEREQUIRED pages.
230$CFG->httpswwwroot = $CFG->wwwroot;
d3f9f1f8 231
4dffc775 232require_once($CFG->libdir .'/setuplib.php'); // Functions that MUST be loaded first
17da2e6f 233
4dffc775
PS
234// Time to start counting
235init_performance_info();
b7009474 236
4dffc775
PS
237// Put $OUTPUT in place, so errors can be displayed.
238$OUTPUT = new bootstrap_renderer();
9d0dd812 239
4c1c9175 240// set handler for uncaught exceptions - equivalent to print_error() call
4dffc775 241set_exception_handler('default_exception_handler');
6800d78e 242
4dffc775
PS
243// If there are any errors in the standard libraries we want to know!
244error_reporting(E_ALL);
c84a2dbe 245
4dffc775
PS
246// Just say no to link prefetching (Moz prefetching, Google Web Accelerator, others)
247// http://www.google.com/webmasters/faq.html#prefetchblock
248if (!empty($_SERVER['HTTP_X_moz']) && $_SERVER['HTTP_X_moz'] === 'prefetch'){
249 header($_SERVER['SERVER_PROTOCOL'] . ' 404 Prefetch Forbidden');
250 echo('Prefetch request forbidden.');
251 exit(1);
252}
b8cea9b2 253
4dffc775
PS
254// Define admin directory
255if (!isset($CFG->admin)) { // Just in case it isn't defined in config.php
256 $CFG->admin = 'admin'; // This is relative to the wwwroot and dirroot
257}
f9903ed0 258
4dffc775
PS
259if (!isset($CFG->prefix)) { // Just in case it isn't defined in config.php
260 $CFG->prefix = '';
261}
d7196099 262
3d732d84
EL
263//point pear include path to moodles lib/pear so that includes and requires will search there for files before anywhere else
264//the problem is that we need specific version of quickforms and hacked excel files :-(
265ini_set('include_path', $CFG->libdir.'/pear' . PATH_SEPARATOR . ini_get('include_path'));
266//point zend include path to moodles lib/zend so that includes and requires will search there for files before anywhere else
267//please note zend library is supposed to be used only from web service protocol classes, it may be removed in future
268ini_set('include_path', $CFG->libdir.'/zend' . PATH_SEPARATOR . ini_get('include_path'));
269
4dffc775
PS
270// Load up standard libraries
271require_once($CFG->libdir .'/textlib.class.php'); // Functions to handle multibyte strings
272require_once($CFG->libdir .'/filterlib.php'); // Functions for filtering test as it is output
273require_once($CFG->libdir .'/ajax/ajaxlib.php'); // Functions for managing our use of JavaScript and YUI
274require_once($CFG->libdir .'/weblib.php'); // Functions relating to HTTP and content
275require_once($CFG->libdir .'/outputlib.php'); // Functions for generating output
276require_once($CFG->libdir .'/navigationlib.php'); // Class for generating Navigation structure
277require_once($CFG->libdir .'/dmllib.php'); // Database access
278require_once($CFG->libdir .'/datalib.php'); // Legacy lib with a big-mix of functions.
279require_once($CFG->libdir .'/accesslib.php'); // Access control functions
280require_once($CFG->libdir .'/deprecatedlib.php'); // Deprecated functions included for backward compatibility
281require_once($CFG->libdir .'/moodlelib.php'); // Other general-purpose functions
282require_once($CFG->libdir .'/pagelib.php'); // Library that defines the moodle_page class, used for $PAGE
283require_once($CFG->libdir .'/blocklib.php'); // Library for controlling blocks
284require_once($CFG->libdir .'/eventslib.php'); // Events functions
285require_once($CFG->libdir .'/grouplib.php'); // Groups functions
286require_once($CFG->libdir .'/sessionlib.php'); // All session and cookie related stuff
287require_once($CFG->libdir .'/editorlib.php'); // All text editor related functions and classes
7c7d3afa 288require_once($CFG->libdir .'/messagelib.php'); // Messagelib functions
4dffc775 289
4dffc775
PS
290// make sure PHP is not severly misconfigured
291setup_validate_php_configuration();
292
293// Increase memory limits if possible
294raise_memory_limit('96M'); // We should never NEED this much but just in case...
295
296// Connect to the database
297setup_DB();
298
299// Disable errors for now - needed for installation when debug enabled in config.php
300if (isset($CFG->debug)) {
301 $originalconfigdebug = $CFG->debug;
302 unset($CFG->debug);
303} else {
304 $originalconfigdebug = -1;
305}
dae73c05 306
4dffc775
PS
307// Load up any configuration from the config table
308try {
309 $CFG = get_config();
310} catch (dml_read_exception $e) {
311 // most probably empty db, going to install soon
312}
a8a71844 313
4dffc775
PS
314// Verify upgrade is not running unless we are in a script that needs to execute in any case
315if (!defined('NO_UPGRADE_CHECK') and isset($CFG->upgraderunning)) {
316 if ($CFG->upgraderunning < time()) {
317 unset_config('upgraderunning');
aa893d6b 318 } else {
4dffc775 319 print_error('upgraderunning');
aa893d6b 320 }
4dffc775 321}
aa893d6b 322
4dffc775
PS
323// Turn on SQL logging if required
324if (!empty($CFG->logsql)) {
325 $DB->set_logging(true);
326}
f9903ed0 327
4dffc775
PS
328// Prevent warnings from roles when upgrading with debug on
329if (isset($CFG->debug)) {
330 $originaldatabasedebug = $CFG->debug;
331 unset($CFG->debug);
332} else {
333 $originaldatabasedebug = -1;
334}
775f811a 335
1e3e716f 336
4dffc775
PS
337// For now, only needed under apache (and probably unstable in other contexts)
338if (function_exists('register_shutdown_function')) {
339 register_shutdown_function('moodle_request_shutdown');
340}
4fd7ccc0 341
4dffc775
PS
342// Defining the site
343try {
344 $SITE = get_site();
4dffc775
PS
345 /**
346 * If $SITE global from {@link get_site()} is set then SITEID to $SITE->id, otherwise set to 1.
347 */
348 define('SITEID', $SITE->id);
7b51fb61
PS
349 // And the 'default' course - this will usually get reset later in require_login() etc.
350 $COURSE = clone($SITE);
351} catch (dml_read_exception $e) {
352 $SITE = null;
353 if (empty($CFG->version)) {
354 // we are just installing
355 /**
356 * @ignore
357 */
358 define('SITEID', 1);
359 // And the 'default' course
360 $COURSE = new object(); // no site created yet
361 $COURSE->id = 1;
362 } else {
363 throw $e;
364 }
4dffc775 365}
cf8133c4 366
4dffc775
PS
367// define SYSCONTEXTID in config.php if you want to save some queries (after install or upgrade!)
368if (!defined('SYSCONTEXTID')) {
369 get_system_context();
370}
c23b0ea1 371
4dffc775
PS
372// Set error reporting back to normal
373if ($originaldatabasedebug == -1) {
374 $CFG->debug = DEBUG_MINIMAL;
375} else {
376 $CFG->debug = $originaldatabasedebug;
377}
378if ($originalconfigdebug !== -1) {
379 $CFG->debug = $originalconfigdebug;
380}
381unset($originalconfigdebug);
382unset($originaldatabasedebug);
383error_reporting($CFG->debug);
384
385// find out if PHP cofigured to display warnings,
386// this is a security problem because some moodle scripts may
387// disclose sensitive information
388if (ini_get_bool('display_errors')) {
389 define('WARN_DISPLAY_ERRORS_ENABLED', true);
390}
391// If we want to display Moodle errors, then try and set PHP errors to match
392if (!isset($CFG->debugdisplay)) {
393 // keep it "as is" during installation
394} else if (NO_DEBUG_DISPLAY) {
395 // some parts of Moodle cannot display errors and debug at all.
396 @ini_set('display_errors', '0');
397 @ini_set('log_errors', '1');
398} else if (empty($CFG->debugdisplay)) {
399 @ini_set('display_errors', '0');
400 @ini_set('log_errors', '1');
401} else {
402 // This is very problematic in XHTML strict mode!
403 @ini_set('display_errors', '1');
404}
475e9de8 405
4dffc775
PS
406// detect unsupported upgrade jump as soon as possible - do not change anything, do not use system functions
407if (!empty($CFG->version) and $CFG->version < 2007101509) {
408 print_error('upgraderequires19', 'error');
409 die;
410}
475e9de8 411
4dffc775
PS
412// Shared-Memory cache init -- will set $MCACHE
413// $MCACHE is a global object that offers at least add(), set() and delete()
414// with similar semantics to the memcached PHP API http://php.net/memcache
415// Ensure we define rcache - so we can later check for it
416// with a really fast and unambiguous $CFG->rcache === false
417if (!empty($CFG->cachetype)) {
418 if (empty($CFG->rcache)) {
419 $CFG->rcache = false;
25338300 420 } else {
4dffc775 421 $CFG->rcache = true;
25338300 422 }
423
4dffc775
PS
424 // do not try to initialize if cache disabled
425 if (!$CFG->rcache) {
426 $CFG->cachetype = '';
f9955801 427 }
428
4dffc775
PS
429 if ($CFG->cachetype === 'memcached' && !empty($CFG->memcachedhosts)) {
430 if (!init_memcached()) {
431 debugging("Error initialising memcached");
432 $CFG->cachetype = '';
392e7363 433 $CFG->rcache = false;
392e7363 434 }
4dffc775
PS
435 } else if ($CFG->cachetype === 'eaccelerator') {
436 if (!init_eaccelerator()) {
437 debugging("Error initialising eaccelerator cache");
392e7363 438 $CFG->cachetype = '';
4dffc775 439 $CFG->rcache = false;
392e7363 440 }
2142d492 441 }
aa893d6b 442
4dffc775
PS
443} else { // just make sure it is defined
444 $CFG->cachetype = '';
445 $CFG->rcache = false;
446}
0182c65c 447
4dffc775
PS
448// File permissions on created directories in the $CFG->dataroot
449if (empty($CFG->directorypermissions)) {
450 $CFG->directorypermissions = 0777; // Must be octal (that's why it's here)
451}
452if (empty($CFG->filepermissions)) {
453 $CFG->filepermissions = ($CFG->directorypermissions & 0666); // strip execute flags
454}
455// better also set default umask because recursive mkdir() does not apply permissions recursively otherwise
456umask(0000);
457
458// Calculate and set $CFG->ostype to be used everywhere. Possible values are:
459// - WINDOWS: for any Windows flavour.
460// - UNIX: for the rest
461// Also, $CFG->os can continue being used if more specialization is required
462if (stristr(PHP_OS, 'win') && !stristr(PHP_OS, 'darwin')) {
463 $CFG->ostype = 'WINDOWS';
464} else {
465 $CFG->ostype = 'UNIX';
466}
467$CFG->os = PHP_OS;
820743c5 468
4dffc775
PS
469// Setup cache dir for Smarty and others
470if (!file_exists($CFG->dataroot .'/cache')) {
471 make_upload_directory('cache');
472}
d6ead3a2 473
4dffc775
PS
474// Configure ampersands in URLs
475@ini_set('arg_separator.output', '&amp;');
de7e4ac9 476
4dffc775
PS
477// Work around for a PHP bug see MDL-11237
478@ini_set('pcre.backtrack_limit', 20971520); // 20 MB
e7aa5a88 479
4dffc775 480// Location of standard files
4c1c9175
PS
481$CFG->wordlist = $CFG->libdir .'/wordlist.txt';
482$CFG->moddata = 'moddata';
f9903ed0 483
4dffc775
PS
484// Create the $PAGE global.
485if (!empty($CFG->moodlepageclass)) {
486 $classname = $CFG->moodlepageclass;
487} else {
488 $classname = 'moodle_page';
489}
490$PAGE = new $classname();
491unset($classname);
492
493// A hack to get around magic_quotes_gpc being turned on
494// It is strongly recommended to disable "magic_quotes_gpc"!
495if (ini_get_bool('magic_quotes_gpc')) {
496 function stripslashes_deep($value) {
497 $value = is_array($value) ?
498 array_map('stripslashes_deep', $value) :
499 stripslashes($value);
500 return $value;
c84a2dbe 501 }
4dffc775
PS
502 $_POST = array_map('stripslashes_deep', $_POST);
503 $_GET = array_map('stripslashes_deep', $_GET);
504 $_COOKIE = array_map('stripslashes_deep', $_COOKIE);
505 $_REQUEST = array_map('stripslashes_deep', $_REQUEST);
506 if (!empty($_SERVER['REQUEST_URI'])) {
507 $_SERVER['REQUEST_URI'] = stripslashes($_SERVER['REQUEST_URI']);
f98cfb53 508 }
4dffc775
PS
509 if (!empty($_SERVER['QUERY_STRING'])) {
510 $_SERVER['QUERY_STRING'] = stripslashes($_SERVER['QUERY_STRING']);
511 }
512 if (!empty($_SERVER['HTTP_REFERER'])) {
513 $_SERVER['HTTP_REFERER'] = stripslashes($_SERVER['HTTP_REFERER']);
aa6af0f8 514 }
4dffc775
PS
515 if (!empty($_SERVER['PATH_INFO'])) {
516 $_SERVER['PATH_INFO'] = stripslashes($_SERVER['PATH_INFO']);
517 }
518 if (!empty($_SERVER['PHP_SELF'])) {
519 $_SERVER['PHP_SELF'] = stripslashes($_SERVER['PHP_SELF']);
520 }
521 if (!empty($_SERVER['PATH_TRANSLATED'])) {
522 $_SERVER['PATH_TRANSLATED'] = stripslashes($_SERVER['PATH_TRANSLATED']);
523 }
524}
7a302afc 525
4dffc775
PS
526// neutralise nasty chars in PHP_SELF
527if (isset($_SERVER['PHP_SELF'])) {
528 $phppos = strpos($_SERVER['PHP_SELF'], '.php');
529 if ($phppos !== false) {
530 $_SERVER['PHP_SELF'] = substr($_SERVER['PHP_SELF'], 0, $phppos+4);
18b9d664 531 }
4dffc775
PS
532 unset($phppos);
533}
534
535// initialise ME's
536initialise_fullme();
537
538// start session and prepare global $SESSION, $USER
539session_get_instance();
540$SESSION = &$_SESSION['SESSION'];
541$USER = &$_SESSION['USER'];
18b9d664 542
4dffc775 543// Process theme change in the URL.
998999e7
PS
544if (!empty($CFG->allowthemechangeonurl) and !empty($_GET['theme'])) {
545 // we have to use _GET directly because we do not want this to interfere with _POST
546 $urlthemename = optional_param('theme', '', PARAM_SAFEDIR);
4dffc775 547 try {
998999e7
PS
548 $themeconfig = theme_config::load($urlthemename);
549 // Makes sure the theme can be loaded without errors.
550 if ($themeconfig->name === $urlthemename) {
551 $SESSION->theme = $urlthemename;
552 } else {
553 unset($SESSION->theme);
554 }
555 unset($themeconfig);
556 unset($urlthemename);
4dffc775
PS
557 } catch (Exception $e) {
558 debugging('Failed to set the theme from the URL.', DEBUG_DEVELOPER, $e->getTrace());
18b9d664 559 }
4dffc775
PS
560}
561unset($urlthemename);
18b9d664 562
4dffc775
PS
563// Ensure a valid theme is set.
564if (!isset($CFG->theme)) {
565 $CFG->theme = 'standardwhite';
566}
567
568// Set language/locale of printed times. If user has chosen a language that
569// that is different from the site language, then use the locale specified
570// in the language file. Otherwise, if the admin hasn't specified a locale
571// then use the one from the default language. Otherwise (and this is the
572// majority of cases), use the stored locale specified by admin.
573if (($lang = optional_param('lang', '', PARAM_SAFEDIR))) {
574 if (file_exists($CFG->dataroot .'/lang/'. $lang) or
575 file_exists($CFG->dirroot .'/lang/'. $lang)) {
576 $SESSION->lang = $lang;
3e9b5d5a 577 }
4dffc775
PS
578}
579unset($lang);
ab036ed9 580
4dffc775 581setup_lang_from_browser();
ab036ed9 582
4dffc775
PS
583if (empty($CFG->lang)) {
584 if (empty($SESSION->lang)) {
3a915b06 585 $CFG->lang = 'en';
4dffc775
PS
586 } else {
587 $CFG->lang = $SESSION->lang;
16ba7351 588 }
4dffc775 589}
6800d78e 590
00dadbe1
PS
591// Set the default site locale, a lot of the stuff may depend on this
592// it is definitely too late to call this first in require_login()!
593moodle_setlocale();
4dffc775
PS
594
595if (!empty($CFG->debugvalidators) and !empty($CFG->guestloginbutton)) {
596 if ($CFG->theme == 'standard' or $CFG->theme == 'standardwhite') { // Temporary measure to help with XHTML validation
597 if (isset($_SERVER['HTTP_USER_AGENT']) and empty($USER->id)) { // Allow W3CValidator in as user called w3cvalidator (or guest)
598 if ((strpos($_SERVER['HTTP_USER_AGENT'], 'W3C_Validator') !== false) or
599 (strpos($_SERVER['HTTP_USER_AGENT'], 'Cynthia') !== false )) {
600 if ($user = get_complete_user_data("username", "w3cvalidator")) {
601 $user->ignoresesskey = true;
602 } else {
603 $user = guest_user();
9610a66e 604 }
4dffc775 605 session_set_user($user);
9610a66e 606 }
607 }
608 }
4dffc775 609}
9610a66e 610
4c1c9175 611// Apache log integration. In apache conf file one can use ${MOODULEUSER}n in
4dffc775
PS
612// LogFormat to get the current logged in username in moodle.
613if ($USER && function_exists('apache_note')
614 && !empty($CFG->apacheloguser) && isset($USER->username)) {
615 $apachelog_userid = $USER->id;
616 $apachelog_username = clean_filename($USER->username);
617 $apachelog_name = '';
618 if (isset($USER->firstname)) {
619 // We can assume both will be set
620 // - even if to empty.
621 $apachelog_name = clean_filename($USER->firstname . " " .
622 $USER->lastname);
623 }
624 if (session_is_loggedinas()) {
625 $realuser = session_get_realuser();
626 $apachelog_username = clean_filename($realuser->username." as ".$apachelog_username);
627 $apachelog_name = clean_filename($realuser->firstname." ".$realuser->lastname ." as ".$apachelog_name);
628 $apachelog_userid = clean_filename($realuser->id." as ".$apachelog_userid);
629 }
630 switch ($CFG->apacheloguser) {
631 case 3:
632 $logname = $apachelog_username;
633 break;
634 case 2:
635 $logname = $apachelog_name;
636 break;
637 case 1:
638 default:
639 $logname = $apachelog_userid;
640 break;
641 }
642 apache_note('MOODLEUSER', $logname);
643}
a559eee6 644
4dffc775
PS
645// Adjust ALLOWED_TAGS
646adjust_allowed_tags();
5982740d 647
4dffc775
PS
648// Use a custom script replacement if one exists
649if (!empty($CFG->customscripts)) {
650 if (($customscript = custom_script_path()) !== false) {
651 require ($customscript);
18259d4f 652 }
4dffc775 653}
18259d4f 654
4dffc775
PS
655// in the first case, ip in allowed list will be performed first
656// for example, client IP is 192.168.1.1
657// 192.168 subnet is an entry in allowed list
658// 192.168.1.1 is banned in blocked list
659// This ip will be banned finally
660if (!empty($CFG->allowbeforeblock)) { // allowed list processed before blocked list?
661 if (!empty($CFG->allowedip)) {
662 if (!remoteip_in_list($CFG->allowedip)) {
663 die(get_string('ipblocked', 'admin'));
ab99c8f0 664 }
4dffc775
PS
665 }
666 // need further check, client ip may a part of
667 // allowed subnet, but a IP address are listed
668 // in blocked list.
669 if (!empty($CFG->blockedip)) {
670 if (remoteip_in_list($CFG->blockedip)) {
671 die(get_string('ipblocked', 'admin'));
5035228f 672 }
4dffc775 673 }
d255c6e9 674
4dffc775
PS
675} else {
676 // in this case, IPs in blocked list will be performed first
677 // for example, client IP is 192.168.1.1
678 // 192.168 subnet is an entry in blocked list
679 // 192.168.1.1 is allowed in allowed list
680 // This ip will be allowed finally
681 if (!empty($CFG->blockedip)) {
682 if (remoteip_in_list($CFG->blockedip)) {
683 // if the allowed ip list is not empty
684 // IPs are not included in the allowed list will be
685 // blocked too
686 if (!empty($CFG->allowedip)) {
687 if (!remoteip_in_list($CFG->allowedip)) {
d255c6e9 688 die(get_string('ipblocked', 'admin'));
689 }
4dffc775 690 } else {
d255c6e9 691 die(get_string('ipblocked', 'admin'));
692 }
5035228f 693 }
4dffc775
PS
694 }
695 // if blocked list is null
696 // allowed list should be tested
697 if(!empty($CFG->allowedip)) {
698 if (!remoteip_in_list($CFG->allowedip)) {
699 die(get_string('ipblocked', 'admin'));
700 }
ab99c8f0 701 }
702
4dffc775 703}
092bfaf1 704
4dffc775
PS
705// note: we can not block non utf-8 installations here, because empty mysql database
706// might be converted to utf-8 in admin/index.php during installation
d5fac1cf
PS
707
708
709
710// this is a funny trick to make Eclipse believe that $OUTPUT and other globals
711// contains an instance of core_renderer, etc. which in turn fixes autocompletion ;-)
712if (false) {
713 $DB = new moodle_database();
714 $OUTPUT = new core_renderer(null, null);
715 $PAGE = new moodle_page();
716}