"MDL-14129,fix print_error"
[moodle.git] / install.php
1 <?php /// $Id$
2       /// install.php - helps admin user to create a config.php file
4 /// If config.php exists already then we are not needed.
6 if (file_exists('./config.php')) {
7     header('Location: index.php');
8     die;
9 } else {
10     $configfile = './config.php';
11 }
13 ///==========================================================================//
14 /// We are doing this in stages
15 define ('WELCOME',            0); /// 0. Welcome and language settings
16 define ('COMPATIBILITY',      1); /// 1. Compatibility
17 define ('DIRECTORY',          2); /// 2. Directory settings
18 define ('DATABASE',           3); /// 2. Database settings
19 define ('ADMIN',              4); /// 4. Administration directory name
20 define ('ENVIRONMENT',        5); /// 5. Administration directory name
21 define ('DOWNLOADLANG',       6); /// 6. Load complete lang from download.moodle.org
22 define ('SAVE',               7); /// 7. Save or display the settings
23 define ('REDIRECT',           8); /// 8. Redirect to index.php
24 ///==========================================================================//
27 /// This has to be defined to avoid a notice in current_language()
28 define('SITEID', 0);
30 /// Begin the session as we are holding all information in a session
31 /// variable until the end.
33 session_name('MoodleSession');
34 @session_start();
36 /// make sure PHP errors are displayed to help diagnose problems
37 @error_reporting(1023); //E_ALL not used because we do not want strict notices in PHP5 yet
38 @ini_set('display_errors', '1');
40 if (! isset($_SESSION['INSTALL'])) {
41     $_SESSION['INSTALL'] = array();
42 }
44 $INSTALL = &$_SESSION['INSTALL'];   // Makes it easier to reference
46 /// detect if install was attempted from diferent directory, if yes reset session to prevent errors,
47 /// dirroot location now fixed in installer
48 if (!empty($INSTALL['dirroot']) and $INSTALL['dirroot'] != dirname(__FILE__)) {
49     $_SESSION['INSTALL'] = array();
50 }
52 /// If it's our first time through this script then we need to set some default values
54 if ( empty($INSTALL['language']) and empty($_POST['language']) ) {
56     /// set defaults
57     $INSTALL['language']        = 'en_utf8';
59     $INSTALL['dbhost']          = 'localhost';
60     $INSTALL['dbuser']          = '';
61     $INSTALL['dbpass']          = '';
62     $INSTALL['dbtype']          = 'mysqli_adodb';
63     $INSTALL['dbname']          = 'moodle';
64     $INSTALL['prefix']          = 'mdl_';
66     $INSTALL['downloadlangpack']       = false;
67     $INSTALL['showdownloadlangpack']   = true;
68     $INSTALL['downloadlangpackerror']  = '';
70 /// To be used by the Installer
71     $INSTALL['wwwroot']         = '';
72     $INSTALL['dirroot']         = dirname(__FILE__);
73     $INSTALL['dataroot']        = dirname(dirname(__FILE__)) . DIRECTORY_SEPARATOR . 'moodledata';
75 /// To be configured in the Installer
76     $INSTALL['wwwrootform']         = '';
77     $INSTALL['dirrootform']         = dirname(__FILE__);
79     $INSTALL['admindirname']    = 'admin';
81     $INSTALL['stage'] = WELCOME;
82 }
84 //==========================================================================//
86 /// Set the page to Unicode always
88 header('Content-Type: text/html; charset=UTF-8');
90 /// Was data submitted?
92 if (isset($_POST['stage'])) {
94     /// Get the stage for which the form was set and the next stage we are going to
96     $gpc = ini_get('magic_quotes_gpc');
97     $gpc = ($gpc == '1' or strtolower($gpc) == 'on');
99     /// Store any posted data
100     foreach ($_POST as $setting=>$value) {
101         if ($gpc) {
102             $value = stripslashes($value);
103         }
105         $INSTALL[$setting] = $value;
106     }
108     if ( $goforward = (! empty( $_POST['next'] )) ) {
109         $nextstage = $_POST['stage'] + 1;
110     } else if (! empty( $_POST['prev'])) {
111         $nextstage = $_POST['stage'] - 1;
112         $INSTALL['stage'] = $_POST['stage'] - 1;
113     } else if (! empty( $_POST['same'] )) {
114         $nextstage = $_POST['stage'];
115     }
117     $nextstage = (int)$nextstage;
119     if ($nextstage < 0) {
120         $nextstage = WELCOME;
121     }
124 } else {
126     $goforward = true;
127     $nextstage = WELCOME;
131 //==========================================================================//
133 /// Fake some settings so that we can use selected functions from moodlelib.php and weblib.php
135 $SESSION->lang = (!empty($_POST['language'])) ? $_POST['language'] : $INSTALL['language'];
136 $CFG->dirroot = $INSTALL['dirroot'];
137 $CFG->libdir = $INSTALL['dirroot'].'/lib';
138 $CFG->dataroot = $INSTALL['dataroot'];
139 $CFG->admin = $INSTALL['admindirname'];
140 $CFG->directorypermissions = 00777;
141 $CFG->running_installer = true;
142 $CFG->docroot = 'http://docs.moodle.org';
143 $CFG->httpswwwroot = $INSTALL['wwwrootform']; // Needed by doc_link() in Server Checks page.
144 $COURSE->id = 0;
146 /// Include some moodle libraries
148 require_once($CFG->libdir.'/setuplib.php');
149 require_once($CFG->libdir.'/weblib.php');
150 require_once($CFG->libdir.'/dmllib.php');
151 require_once($CFG->libdir.'/deprecatedlib.php');
152 require_once($CFG->libdir.'/moodlelib.php');
153 require_once($CFG->libdir.'/adminlib.php');
154 require_once($CFG->libdir.'/environmentlib.php');
155 require_once($CFG->libdir.'/xmlize.php');
156 require_once($CFG->libdir.'/componentlib.class.php');
157 require_once($CFG->dirroot.'/version.php');
159 /// Set version and release
160 $INSTALL['version'] = $version;
161 $INSTALL['release'] = $release;
163 /// list all supported drivers - unsupported must be installed manually ;-)
164 $supported = array (
165     'mysqli_adodb',
166     'mysql_adodb',
167     'postgres7_adodb',
168     'mssql_n_adodb',
169     'mssql_adodb',
170     'odbc_mssql_adodb',
171     'oci8po_adodb'
172 );
173 $databases = array ();
174 foreach($supported as $driver) {
175     $classname = $driver.'_moodle_database';
176     require_once ("$CFG->libdir/dml/$classname.php");
177     $databases[$driver] = new $classname ();
180 /// guess the www root
181 if ($INSTALL['wwwroot'] == '') {
182     list($INSTALL['wwwroot'], $xtra) = explode('/install.php', qualified_me());
183     $INSTALL['wwwrootform'] = $INSTALL['wwwroot'];
185     // now try to guess the correct dataroot not accessible via web
186     $CFG->wwwroot = $INSTALL['wwwroot'];
187     $i = 0; //safety check - dirname might return some unexpected results
188     while(is_dataroot_insecure()) {
189         $parrent = dirname($CFG->dataroot);
190         $i++;
191         if ($parrent == '/' or $parrent == '.' or preg_match('/^[a-z]:\\\?$/i', $parrent) or ($i > 100)) {
192             $CFG->dataroot = ''; //can not find secure location for dataroot
193             break;
194         }
195         $CFG->dataroot = dirname($parrent).'/moodledata';
196     }
197         $INSTALL['dataroot'] = $CFG->dataroot;
200 $headstagetext = array(WELCOME       => get_string('chooselanguagehead', 'install'),
201                        COMPATIBILITY => get_string('compatibilitysettingshead', 'install'),
202                        DIRECTORY     => get_string('directorysettingshead', 'install'),
203                        DATABASE      => get_string('databasesettingshead', 'install'),
204                        ADMIN         => get_string('admindirsettinghead', 'install'),
205                        ENVIRONMENT   => get_string('environmenthead', 'install'),
206                        DOWNLOADLANG  => get_string('downloadlanguagehead', 'install'),
207                        SAVE          => get_string('configurationcompletehead', 'install')
208                         );
210 $substagetext = array(WELCOME       => get_string('chooselanguagesub', 'install'),
211                       COMPATIBILITY => get_string('compatibilitysettingssub', 'install'),
212                       DIRECTORY     => get_string('directorysettingssub', 'install'),
213                       DATABASE      => get_string('databasesettingssub', 'install'),
214                       ADMIN         => get_string('admindirsettingsub', 'install'),
215                       ENVIRONMENT   => get_string('environmentsub', 'install'),
216                       DOWNLOADLANG  => get_string('downloadlanguagesub', 'install'),
217                       SAVE          => get_string('configurationcompletesub', 'install')
218                        );
222 //==========================================================================//
224 /// Are we in help mode?
226 if (isset($_GET['help'])) {
227     $nextstage = -1;
232 //==========================================================================//
234 /// Are we in config download mode?
236 if (isset($_GET['download'])) {
237     header("Content-Type: application/x-forcedownload\n");
238     header("Content-Disposition: attachment; filename=\"config.php\"");
239     echo $INSTALL['config'];
240     exit;
247 //==========================================================================//
249 /// Check the directory settings
251 if ($INSTALL['stage'] == DIRECTORY) {
253     error_reporting(0);
255     /// check wwwroot
256     if (ini_get('allow_url_fopen') && false) { /// This was not reliable
257         if (($fh = @fopen($INSTALL['wwwrootform'].'/install.php', 'r')) === false) {
258             $errormsg .= get_string('wwwrooterror', 'install').'<br />';
259             $INSTALL['wwwrootform'] = $INSTALL['wwwroot'];
260             fclose($fh);
261         }
262     }
264     /// check dirroot
265     if (($fh = @fopen($INSTALL['dirrootform'].'/install.php', 'r')) === false) {
266         $errormsg .= get_string('dirrooterror', 'install').'<br />';
267         $INSTALL['dirrootform'] = $INSTALL['dirroot'];
268         fclose($fh);
269     }
271     /// check dataroot
272     $CFG->dataroot = $INSTALL['dataroot'];
273     if (make_upload_directory('sessions', false) === false) {
274         $errormsg .= get_string('datarooterror', 'install').'<br />';
275     }
277     if (!empty($errormsg)) {
278         $nextstage = DIRECTORY;
279     }
281     error_reporting(38911);
286 //==========================================================================//
288 /// Check database settings if stage 3 data submitted
289 /// Try to connect to the database. If that fails then try to create the database
291 if ($INSTALL['stage'] == DATABASE) {
293     $DB = $databases[$INSTALL['dbtype']];
295     $dbfamily = $DB->get_dbfamily();
296     $errormsg = $DB->driver_installed();
298     if ($errormsg === true) {
299         $errormsg = '';
300     } else {
301         $nextstage = DATABASE;
302     }
304     if (empty($INSTALL['prefix']) and $dbfamily != 'mysql') { // All DBs but MySQL require prefix (reserv. words)
305         $errormsg = get_string('dbwrongprefix', 'install');
306         $nextstage = DATABASE;
307     }
309     if ($dbfamily == 'oracle' and strlen($INSTALL['prefix']) > 2) { // Oracle max prefix = 2cc (30cc limit)
310         $errormsg = get_string('dbwrongprefix', 'install');
311         $nextstage = DATABASE;
312     }
314     if ($dbfamily == 'oracle' and !empty ($INSTALL['dbhost'])) { // Oracle host must be blank (tnsnames.ora has it)
315         $errormsg = get_string('dbwronghostserver', 'install');
316         $nextstage = DATABASE;
317     }
319     if (empty($errormsg)) {
320         error_reporting(0);  // Hide errors
322         if (! $dbconnected = $DB->connect($INSTALL['dbhost'], $INSTALL['dbuser'], $INSTALL['dbpass'], $INSTALL['dbname'], false, $INSTALL['prefix'])) {
323             if (!$DB->create_database($INSTALL['dbhost'], $INSTALL['dbuser'], $INSTALL['dbpass'])) {
324                  $errormsg = get_string('dbcreationerror', 'install');
325                  $nextstage = DATABASE;
326             } else {
327                 $dbconnected = $DB->connect($INSTALL['dbhost'], $INSTALL['dbuser'], $INSTALL['dbpass'], $INSTALL['dbname'], false, $INSTALL['prefix']);
328             }
329         } else {
330 // TODO: db encoding checks ??
331         }
332     }
334     error_reporting(38911);
336 /// Output db connection error
337     if ((empty($errormsg) and ($dbconnected === false)) ) {
338         $errormsg = get_string('dbconnectionerror', 'install');
339         $nextstage = DATABASE;
340     }
345 //==========================================================================//
347 /// If the next stage is admin directory settings OR we have just come from there then
348 /// check the admin directory.
349 /// If we can open a file then we know that the admin name is correct.
351 if ($nextstage == ADMIN or $INSTALL['stage'] == ADMIN) {
352     if (!ini_get('allow_url_fopen')) {
353         $nextstage = ($goforward) ? ENVIRONMENT : DATABASE;
354     } else if (($fh = @fopen($INSTALL['wwwrootform'].'/'.$INSTALL['admindirname'].'/environment.xml', 'r')) !== false) {
355         $nextstage = ($goforward) ? ENVIRONMENT : DATABASE;
356         fclose($fh);
357     } else {
358         $nextstage = ($goforward) ? ENVIRONMENT : DATABASE;
359         //if ($nextstage != ADMIN) {
360         //    $errormsg = get_string('admindirerror', 'install');
361         //    $nextstage = ADMIN;
362         // }
363     }
366 //==========================================================================//
368 // Check if we can navigate from the environemt page (because it's ok)
370 if ($INSTALL['stage'] == ENVIRONMENT) {
371     $DB = $databases[$INSTALL['dbtype']];
373     error_reporting(0);  // Hide errors
374     $dbconnected = $DB->connect($INSTALL['dbhost'], $INSTALL['dbuser'], $INSTALL['dbpass'], $INSTALL['dbname'], false, $INSTALL['prefix']);
375     error_reporting(38911);  // Show errors
376     if ($dbconnected) {
377     /// Execute environment check, printing results
378         if (!check_moodle_environment($INSTALL['release'], $environment_results, false)) {
379              $nextstage = ENVIRONMENT;
380         }
381     } else {
382     /// We never should reach this because DB has been tested before arriving here
383         $errormsg = get_string('dbconnectionerror', 'install');
384         $nextstage = DATABASE;
385     }
390 //==========================================================================//
392 // Try to download the lang pack if it has been selected
394 if ($INSTALL['stage'] == DOWNLOADLANG && $INSTALL['downloadlangpack']) {
396     $downloadsuccess = false;
397     $downloaderror = '';
399     error_reporting(0);  // Hide errors
401 /// Create necessary lang dir
402     if (!make_upload_directory('lang', false)) {
403         $downloaderror = get_string('cannotcreatelangdir', 'error');
404     }
406 /// Download and install component
407     if (($cd = new component_installer('http://download.moodle.org', 'lang16',
408         $INSTALL['language'].'.zip', 'languages.md5', 'lang')) && empty($errormsg)) {
409         $status = $cd->install(); //returns COMPONENT_(ERROR | UPTODATE | INSTALLED)
410         switch ($status) {
411             case COMPONENT_ERROR:
412                 if ($cd->get_error() == 'remotedownloaderror') {
413                     $a = new stdClass();
414                     $a->url = 'http://download.moodle.org/lang16/'.$INSTALL['language'].'.zip';
415                     $a->dest= $CFG->dataroot.'/lang';
416                     $downloaderror = get_string($cd->get_error(), 'error', $a);
417                 } else {
418                     $downloaderror = get_string($cd->get_error(), 'error');
419                 }
420             break;
421             case COMPONENT_UPTODATE:
422             case COMPONENT_INSTALLED:
423                 $downloadsuccess = true;
424             break;
425             default:
426                 //We shouldn't reach this point
427         }
428     } else {
429         //We shouldn't reach this point
430     }
432     error_reporting(38911);  // Show errors
434     if ($downloadsuccess) {
435         $INSTALL['downloadlangpack']       = false;
436         $INSTALL['showdownloadlangpack']   = false;
437         $INSTALL['downloadlangpackerror']  = $downloaderror;
438     } else {
439         $INSTALL['downloadlangpack']       = false;
440         $INSTALL['showdownloadlangpack']   = false;
441         $INSTALL['downloadlangpackerror']  = $downloaderror;
442     }
447 //==========================================================================//
449 /// Display or print the data
450 /// Put the data into a string
451 /// Try to open config file for writing.
453 if ($nextstage == SAVE) {
455     $str = '<?php  /// Moodle Configuration File ' . "\r\n";
456     $str .= "\r\n";
458     $str .= 'unset($CFG);'."\r\n";
459     $str .= '$CFG = new stdClass();'."\r\n"; // prevent PHP5 strict warnings
460     $str .= "\r\n";
462     $database = $databases[$INSTALL['dbtype']];
463     $database->connect($INSTALL['dbhost'], $INSTALL['dbuser'], $INSTALL['dbpass'], $INSTALL['dbname'], false, $INSTALL['prefix']);
464     $dbconfig = $database->export_dbconfig();
465     $dbconfig->persistent = false;
467     foreach ($dbconfig as $key=>$value) {
468         $key = str_pad($key, 9);
469         if (is_bool($value)) {
470             if ($value) {
471                 $str .= '$CFG->'.$key.' = true;'."\r\n";
472             } else {
473                 $str .= '$CFG->'.$key.' = false;'."\r\n";
474             }
475         } else {
476             $str .= '$CFG->'.$key.' = \''.addsingleslashes($value)."';\r\n";
477         }
478     }
479     $str .= "\r\n";
481     $str .= '$CFG->wwwroot   = \''.addsingleslashes($INSTALL['wwwrootform'])."';\r\n";
482     $str .= '$CFG->dirroot   = \''.addsingleslashes($INSTALL['dirrootform'])."';\r\n";
483     $str .= '$CFG->dataroot  = \''.addsingleslashes($INSTALL['dataroot'])."';\r\n";
484     $str .= '$CFG->admin     = \''.addsingleslashes($INSTALL['admindirname'])."';\r\n";
485     $str .= "\r\n";
487     $str .= '$CFG->directorypermissions = 00777;  // try 02777 on a server in Safe Mode'."\r\n";
488     $str .= "\r\n";
490     $str .= 'require_once("$CFG->dirroot/lib/setup.php");'."\r\n";
491     $str .= '// MAKE SURE WHEN YOU EDIT THIS FILE THAT THERE ARE NO SPACES, BLANK LINES,'."\r\n";
492     $str .= '// RETURNS, OR ANYTHING ELSE AFTER THE TWO CHARACTERS ON THE NEXT LINE.'."\r\n";
493     $str .= '?>';
495     umask(0137);
497     if (( $configsuccess = ($fh = @fopen($configfile, 'w')) ) !== false) {
498         fwrite($fh, $str);
499         fclose($fh);
500     }
503     $INSTALL['config'] = $str;
508 //==========================================================================//
510 ?>
511 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
512 <html dir="<?php echo (right_to_left() ? 'rtl' : 'ltr'); ?>">
513 <head>
514 <link rel="shortcut icon" href="theme/standard/favicon.ico" />
515 <title>Moodle Install</title>
516 <meta http-equiv="content-type" content="text/html; charset=UTF-8" />
517 <?php css_styles($databases) ?>
518 <?php database_js($databases) ?>
520 </head>
522 <body>
525 <?php
526 if (isset($_GET['help'])) {
527     print_install_help($_GET['help']);
528     close_window_button();
529 } else {
530 ?>
533 <table class="main" cellpadding="3" cellspacing="0">
534     <tr>
535         <td class="td_mainlogo">
536             <p class="p_mainlogo"><img src="pix/moodlelogo-med.gif" width="240" height="60" alt="Moodle logo"/></p>
537         </td>
538         <td class="td_mainlogo" valign="bottom">
539             <p class="p_mainheader"><?php print_string('installation', 'install') ?></p>
540         </td>
541     </tr>
543     <tr>
544         <td class="td_mainheading" colspan="2">
545             <p class="p_mainheading"><?php echo $headstagetext[$nextstage] ?></p>
546             <?php /// Exceptionaly, depending of the DB selected, we show some different text
547                   /// from the standard one to show better instructions for each DB
548                 if ($nextstage == DATABASE) {
549                     foreach ($databases as $driver=>$database) {
550                         echo '<script type="text/javascript" defer="defer">window.onload=toggledbinfo;</script>';
551                         echo '<div id="'.$driver.'">' . $database->get_configuration_hints();
552                         echo '<p style="text-align: center">' . get_string('databasesettingswillbecreated', 'install') . '</p>';
553                         echo '</div>';
554                     }
555                 } else {
556                     if (!empty($substagetext[$nextstage])) {
557                         echo '<p class="p_subheading">' . $substagetext[$nextstage] . '</p>';
558                     }
559                 }
560             ?>
561         </td>
562     </tr>
564     <tr>
565         <td class="td_main" colspan="2">
567 <?php
569 if (!empty($errormsg)) echo "<p class=\"errormsg\" style=\"text-align:center\">$errormsg</p>\n";
572 if ($nextstage == SAVE) {
573     $INSTALL['stage'] = WELCOME;
574     $options = array();
575     $options['lang'] = $INSTALL['language'];
576     if ($configsuccess) {
577         echo "<p class=\"p_install\">".get_string('configfilewritten', 'install')."</p>\n";
579         echo "<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"100%\">\n";
580         echo "<tr>\n";
581         echo "<td>&nbsp;</td>\n";
582         echo "<td>&nbsp;</td>\n";
583         echo "<td align=\"right\">\n";
584         print_single_button("index.php", $options, get_string('continue'));
585         echo "</td>\n";
586         echo "</tr>\n";
587         echo "</table>\n";
589     } else {
590         echo "<p class=\"errormsg\">".get_string('configfilenotwritten', 'install')."</p>";
592         echo "<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"100%\">\n";
593         echo "<tr>\n";
594         echo "<td>&nbsp;</td>\n";
595         echo "<td align=\"center\">\n";
596         $installoptions = array();
597         $installoptions['download'] = 1;
598         print_single_button("install.php", $installoptions, get_string('download', 'install'));
599         echo "</td>\n";
600         echo "<td align=\"right\">\n";
601         print_single_button("index.php", $options, get_string('continue'));
602         echo "</td>\n";
603         echo "</tr>\n";
604         echo "</table>\n";
606         echo "<hr />\n";
607         echo "<div style=\"text-align: ".fix_align_rtl("left")."\">\n";
608         echo "<pre>\n";
609         p($INSTALL['config']);
610         echo "</pre>\n";
611         echo "</div>\n";
612     }
613 } else {
614     $formaction = (isset($_GET['configfile'])) ? "install.php?configfile=".$_GET['configfile'] : "install.php";
615     form_table($nextstage, $formaction, $databases);
618 ?>
620         </td>
621     </tr>
622 </table>
624 <?php
626 ?>
628 </body>
629 </html>
640 <?php
643 //==========================================================================//
645 function form_table($nextstage, $formaction, $databases) {
646     global $INSTALL, $DB;
648     /// Print the standard form if we aren't in the DOWNLOADLANG page
649     /// because it has its own form.
650     if ($nextstage != DOWNLOADLANG) {
651         $needtoopenform = false;
652 ?>
653         <form id="installform" method="post" action="<?php echo $formaction ?>">
654         <div><input type="hidden" name="stage" value="<?php echo $nextstage ?>" /></div>
656 <?php
657     } else {
658         $needtoopenform = true;
659     }
660 ?>
661     <table class="install_table" cellspacing="3" cellpadding="3">
663 <?php
664     /// what we do depends on the stage we're at
665     switch ($nextstage) {
666         case WELCOME: /// Welcome and language settings
667 ?>
668             <tr>
669                 <td class="td_left"><p class="p_install"><?php print_string('language') ?></p></td>
670                 <td class="td_right">
671                 <?php choose_from_menu (get_installer_list_of_languages(), 'language', $INSTALL['language'], '') ?>
672                 </td>
673             </tr>
675 <?php
676             break;
677         case COMPATIBILITY: /// Compatibilty check
678             $compatsuccess = true;
680             /// Check that PHP is of a sufficient version
681             print_compatibility_row(inst_check_php_version(), get_string('phpversion', 'install'), get_string('php52versionerror', 'install'), 'php52versionhelp');
682             /// Check session auto start
683             print_compatibility_row(!ini_get_bool('session.auto_start'), get_string('sessionautostart', 'install'), get_string('sessionautostarterror', 'install'), 'sessionautostarthelp');
684             /// Check magic quotes
685             print_compatibility_row(!ini_get_bool('magic_quotes_runtime'), get_string('magicquotesruntime', 'install'), get_string('magicquotesruntimeerror', 'install'), 'magicquotesruntimehelp');
686             /// Check unsupported PHP configuration
687             print_compatibility_row(ini_get_bool('magic_quotes_gpc') || (!ini_get_bool('register_globals')), get_string('globalsquotes', 'install'), get_string('globalsquoteserror', 'install'), 'globalsquoteshelp');
688             /// Check safe mode
689             print_compatibility_row(!ini_get_bool('safe_mode'), get_string('safemode', 'install'), get_string('safemodeerror', 'install'), 'safemodehelp', true);
690             /// Check file uploads
691             print_compatibility_row(ini_get_bool('file_uploads'), get_string('fileuploads', 'install'), get_string('fileuploadserror', 'install'), 'fileuploadshelp', true);
692             /// Check GD version
693             print_compatibility_row(check_gd_version(), get_string('gdversion', 'install'), get_string('gdversionerror', 'install'), 'gdversionhelp', true);
694             /// Check memory limit
695             print_compatibility_row(check_memory_limit(), get_string('memorylimit', 'install'), get_string('memorylimiterror', 'install'), 'memorylimithelp', true);
698             break;
699         case DIRECTORY: /// Directory settings
700 ?>
702             <tr>
703                 <td class="td_left"><p class="p_install"><?php print_string('wwwroot', 'install') ?></p></td>
704                 <td class="td_right">
705                     <input type="text" size="40"name="wwwrootform" value="<?php p($INSTALL['wwwrootform'],true) ?>" />
706                 </td>
707             </tr>
708             <tr>
709                 <td class="td_left"><p class="p_install"><?php print_string('dirroot', 'install') ?></p></td>
710                 <td class="td_right">
711                     <input type="text" size="40" name="dirrootform" disabled="disabled" value="<?php p($INSTALL['dirrootform'],true) ?>" />
712                 </td>
713             </tr>
714             <tr>
715                 <td class="td_left"><p class="p_install"><?php print_string('dataroot', 'install') ?></p></td>
716                 <td class="td_right">
717                     <input type="text" size="40" name="dataroot" value="<?php p($INSTALL['dataroot'],true) ?>" />
718                 </td>
719             </tr>
721 <?php
722             break;
723         case DATABASE: /// Database settings
724 ?>
726             <tr>
727                 <td class="td_left"><p class="p_install"><?php print_string('dbtype', 'install') ?></p></td>
728                 <td class="td_right">
730                 <?php
732             $options = array ();
733             foreach ($databases as $type => $database) {
734                 $name = $database->get_name();
735                 if ($database->driver_installed() !== true) {
736                     $name = "$name - driver not installed"; // TODO: improve missing driver notification
737                 }
738                 $options[$type] = $name;
739             }
740             choose_from_menu($options, 'dbtype', $INSTALL['dbtype'], '', 'toggledbinfo();')
741 ?>
742                 </td>
743             </tr>
744             <tr>
745                 <td class="td_left"><p class="p_install"><?php print_string('dbhost', 'install') ?></p></td>
746                 <td class="td_right">
747                     <input type="text" class="input_database" name="dbhost" value="<?php p($INSTALL['dbhost']) ?>" />
748                 </td>
749             </tr>
750             <tr>
751                 <td class="td_left"><p class="p_install"><?php print_string('database', 'install') ?></p></td>
752                 <td class="td_right">
753                     <input type="text" class="input_database" name="dbname" value="<?php p($INSTALL['dbname']) ?>" />
754                 </td>
755             </tr>
756             <tr>
757                 <td class="td_left"><p class="p_install"><?php print_string('user') ?></p></td>
758                 <td class="td_right">
759                     <input type="text" class="input_database" name="dbuser" value="<?php p($INSTALL['dbuser']) ?>" />
760                 </td>
761             </tr>
762             <tr>
763                 <td class="td_left"><p class="p_install"><?php print_string('password') ?></p></td>
764                 <td class="td_right">
765                     <input type="password" class="input_database" name="dbpass" value="<?php p($INSTALL['dbpass']) ?>" />
766                 </td>
767             </tr>
768             <tr>
769                 <td class="td_left"><p class="p_install"><?php print_string('dbprefix', 'install') ?></p></td>
770                 <td class="td_right">
771                     <input type="text" class="input_database" name="prefix" value="<?php p($INSTALL['prefix']) ?>" />
772                 </td>
773             </tr>
775 <?php
776             break;
777         case ADMIN: /// Administration directory setting
778 ?>
780             <tr>
781                 <td class="td_left"><p class="p_install"><?php print_string('admindirname', 'install') ?></p></td>
782                 <td class="td_right">
783                     <input type="text" size="40" name="admindirname" value="<?php p($INSTALL['admindirname']) ?>" />
784                 </td>
785             </tr>
788 <?php
789             break;
790         case ENVIRONMENT: /// Environment checks
791 ?>
793             <tr>
794                 <td colspan="2">
795                 <?php
796                     error_reporting(0);  // Hide errors
797                     $dbconnected = $DB->Connect($INSTALL['dbhost'],$INSTALL['dbuser'],$INSTALL['dbpass'],$INSTALL['dbname'], false, $INSTALL['prefix']);
798                     error_reporting(38911);  // Show errors
799                     if ($dbconnected) {
800                     /// Execute environment check, printing results
801                         check_moodle_environment($INSTALL['release'], $environment_results, true);
802                     } else {
803                     /// We never should reach this because DB has been tested before arriving here
804                         $errormsg = get_string('dbconnectionerror', 'install');
805                         $nextstage = DATABASE;
806                         echo '<p class="errormsg" style="text-align:center">'.get_string('dbconnectionerror', 'install').'</p>';
807                     }
808                 ?>
809                 </td>
810             </tr>
812 <?php
813             break;
814         case DOWNLOADLANG: /// Download language from download.moodle.org
815 ?>
817             <tr>
818                 <td colspan="2">
819                 <?php
820                 /// Get array of languages, we are going to use it
821                     $languages=get_installer_list_of_languages();
822                 /// Print the download form (button) if necessary
823                     if ($INSTALL['showdownloadlangpack'] == true && substr($INSTALL['language'],0,2) != 'en') {
824                         $options = array();
825                         $options['downloadlangpack'] = true;
826                         $options['stage'] = DOWNLOADLANG;
827                         $options['same'] = true;
828                         print_simple_box_start('center');
829                         print_single_button('install.php', $options, get_string('downloadlanguagebutton','install', $languages[$INSTALL['language']]), 'post');
830                         print_simple_box_end();
831                     } else {
832                 /// Show result info
833                     /// English lang packs aren't downloaded
834                         if (substr($INSTALL['language'],0,2) == 'en') {
835                             print_simple_box(get_string('downloadlanguagenotneeded', 'install', $languages[$INSTALL['language']]), 'center', '80%');
836                         } else {
837                             if ($INSTALL['downloadlangpackerror']) {
838                                 echo "<p class=\"errormsg\" align=\"center\">".$INSTALL['downloadlangpackerror']."</p>\n";
839                                 print_simple_box(get_string('langdownloaderror', 'install', $languages[$INSTALL['language']]), 'center', '80%');
840                             } else {
841                                 print_simple_box(get_string('langdownloadok', 'install', $languages[$INSTALL['language']]), 'center', '80%');
842                             }
843                         }
844                     }
845                 ?>
846                 </td>
847             </tr>
849 <?php
850             break;
851         default:
852     }
853 ?>
855     <tr>
856         <td colspan="<?php echo ($nextstage == COMPATIBILITY) ? 3 : 2; ?>">
858 <?php
859     if ($needtoopenform) {
860 ?>
861             <form id="installform" method="post" action="<?php echo $formaction ?>">
862             <div><input type="hidden" name="stage" value="<?php echo $nextstage ?>" /></div>
863 <?php
864     }
865 ?>
867             <?php echo ($nextstage < SAVE) ? "<div><input type=\"submit\" name=\"next\" value=\"".get_string('next')."  &raquo;\" style=\"float: ".fix_align_rtl("right")."\"/></div>\n" : "&nbsp;\n" ?>
868             <?php echo ($nextstage > WELCOME) ? "<div><input type=\"submit\" name=\"prev\" value=\"&laquo;  ".get_string('previous')."\" style=\"float: ".fix_align_rtl("left")."\"/></div>\n" : "&nbsp;\n" ?>
870 <?php
871     if ($needtoopenform) {
872 ?>
873             </form>
874 <?php
875     }
876 ?>
879         </td>
881     </tr>
883     </table>
884 <?php
885     if (!$needtoopenform) {
886 ?>
887     </form>
888 <?php
889     }
890 ?>
892 <?php
897 //==========================================================================//
899 function print_compatibility_row($success, $testtext, $errormessage, $helpfield='', $caution=false) {
900     echo "<tr>\n";
901     echo "<td class=\"td_left_nowrap\" valign=\"top\"><p class=\"p_install\">$testtext</p></td>\n";
902     if ($success) {
903         echo "<td valign=\"top\"><p class=\"p_pass\">".get_string('pass', 'install')."</p></td>\n";
904         echo "<td valign=\"top\">&nbsp;</td>\n";
905     } else {
906         echo "<td valign=\"top\">";
907         echo ($caution) ? "<p class=\"p_caution\">".get_string('caution', 'install') : "<p class=\"p_fail\">".get_string('fail', 'install');
908         echo "</p></td>\n";
909         echo "<td valign=\"top\">";
910         echo "<p class=\"p_install\">$errormessage ";
911         install_helpbutton("install.php?help=$helpfield");
912         echo "</p></td>\n";
913     }
914     echo "</tr>\n";
915     return $success;
919 //==========================================================================//
921 function install_helpbutton($url, $title='') {
922     if ($title == '') {
923         $title = get_string('help');
924     }
925     echo "<a href=\"javascript:void(0)\" ";
926     echo "onclick=\"return window.open('$url','Help','menubar=0,location=0,scrollbars,resizable,width=500,height=400')\"";
927     echo ">";
928     echo "<img src=\"pix/help.gif\" class=\"iconhelp\" alt=\"$title\" title=\"$title\"/>";
929     echo "</a>\n";
934 //==========================================================================//
936 function print_install_help($help) {
937     switch ($help) {
938         case 'phpversionhelp':
939             print_string($help, 'install', phpversion());
940             break;
941         case 'memorylimithelp':
942             print_string($help, 'install', get_memory_limit());
943             break;
944         default:
945             print_string($help, 'install');
946     }
950 //==========================================================================//
952 function get_memory_limit() {
953     if ($limit = ini_get('memory_limit')) {
954         return $limit;
955     } else {
956         return get_cfg_var('memory_limit');
957     }
960 //==========================================================================//
962 function check_memory_limit() {
964     /// if limit is already 40 or more then we don't care if we can change it or not
965     if ((int)str_replace('M', '', get_memory_limit()) >= 40) {
966         return true;
967     }
969     /// Otherwise, see if we can change it ourselves
970     @ini_set('memory_limit', '40M');
971     return ((int)str_replace('M', '', get_memory_limit()) >= 40);
974 //==========================================================================//
976 function inst_check_php_version() {
977     return check_php_version("5.2.0");
979 //==========================================================================//
981 /* This function returns a list of languages and their full names. The
982  * list of available languages is fetched from install/lang/xx/installer.php
983  * and it's used exclusively by the installation process
984  * @return array An associative array with contents in the form of LanguageCode => LanguageName
985  */
986 function get_installer_list_of_languages() {
988     global $CFG;
990     $languages = array();
992 /// Get raw list of lang directories
993     $langdirs = get_list_of_plugins('install/lang');
994     asort($langdirs);
995 /// Get some info from each lang
996     foreach ($langdirs as $lang) {
997         if (file_exists($CFG->dirroot .'/install/lang/'. $lang .'/installer.php')) {
998             include($CFG->dirroot .'/install/lang/'. $lang .'/installer.php');
999             if (substr($lang, -5) == '_utf8') {   //Remove the _utf8 suffix from the lang to show
1000                 $shortlang = substr($lang, 0, -5);
1001             } else {
1002                 $shortlang = $lang;
1003             }
1004             if ($lang == 'en') {  //Explain this is non-utf8 en
1005                 $shortlang = 'non-utf8 en';
1006             }
1007             if (!empty($string['thislanguage'])) {
1008                 $languages[$lang] = $string['thislanguage'] .' ('. $shortlang .')';
1009             }
1010             unset($string);
1011         }
1012     }
1013 /// Return array
1014     return $languages;
1017 //==========================================================================//
1019 function css_styles($databases) {
1020 ?>
1022 <style type="text/css">
1024     body { background-color: #ffeece; }
1025     p, li, td {
1026         font-family: helvetica, arial, sans-serif;
1027         font-size: 10pt;
1028     }
1029     a { text-decoration: none; color: blue; }
1030     a img {
1031         border: none;
1032     }
1033     .errormsg {
1034         color: red;
1035         font-weight: bold;
1036     }
1037     blockquote {
1038         font-family: courier, monospace;
1039         font-size: 10pt;
1040     }
1041     .input_database {
1042         width: 270px;
1043     }
1044     .install_table {
1045         width: 500px;
1046         margin-left:auto;
1047         margin-right:auto;
1048     }
1049     .td_left {
1050         text-align: <?php echo fix_align_rtl("right") ?>;
1051         font-weight: bold;
1052     }
1053     .td_left_nowrap{
1054         text-align: <?php echo fix_align_rtl("right") ?>;
1055         font-weight: bold;
1056         white-space: nowrap;
1057         width: 160px;
1058         padding-left: 10px;
1059     }
1060     .td_right {
1061         text-align: <?php echo fix_align_rtl("left") ?>;
1062     }
1063     .main {
1064         width: 80%;
1065         border-width: 1px;
1066         border-style: solid;
1067         border-color: #ffc85f;
1068         margin-left:auto;
1069         margin-right:auto;
1070         -moz-border-radius-bottomleft: 15px;
1071         -moz-border-radius-bottomright: 15px;
1072     }
1073     .td_mainheading {
1074         background-color: #fee6b9;
1075         padding-left: 10px;
1076     }
1077     .td_main {
1078         text-align: center;
1079     }
1080     .td_mainlogo {
1081         vertical-align: middle;
1082     }
1083     .p_mainlogo {
1084         margin-top: 0px;
1085         margin-bottom: 0px;
1086     }
1087     .p_mainheading {
1088         font-size: 11pt;
1089         margin-top: 16px;
1090         margin-bottom: 16px;
1091     }
1092     .p_subheading {
1093         font-size: 10pt;
1094         padding-left: 10px;
1095         margin-top: 16px;
1096         margin-bottom: 16px;
1097     }
1098     .p_mainheader{
1099         text-align: right;
1100         font-size: 20pt;
1101         font-weight: bold;
1102         margin-top: 0px;
1103         margin-bottom: 0px;
1104     }
1105     .p_pass {
1106         color: green;
1107         font-weight: bold;
1108         margin-top: 0px;
1109         margin-bottom: 0px;
1110     }
1111     .p_fail {
1112         color: red;
1113         font-weight: bold;
1114         margin-top: 0px;
1115         margin-bottom: 0px;
1116     }
1117     .p_caution {
1118         color: #ff6600;
1119         font-weight: bold;
1120         margin-top: 0px;
1121         margin-bottom: 0px;
1122     }
1123     .p_help {
1124         text-align: center;
1125         font-family: helvetica, arial, sans-serif;
1126         font-size: 14pt;
1127         font-weight: bold;
1128         color: #333333;
1129         margin-top: 0px;
1130         margin-bottom: 0px;
1131     }
1132     /* This override the p tag for every p tag in this installation script,
1133        but not in lang\xxx\installer.php
1134       */
1135     .p_install {
1136         margin-top: 0px;
1137         margin-bottom: 0px;
1138     }
1139     .environmenttable {
1140         font-size: 10pt;
1141         border-color: #ffc85f;
1142     }
1143     table.environmenttable .error {
1144         background-color : red;
1145         color : inherit;
1146     }
1148     table.environmenttable .warn {
1149         background-color : yellow;
1150     }
1152     table.environmenttable .ok {
1153         background-color : lightgreen;
1154     }
1155     .header {
1156         background-color: #fee6b9;
1157         font-size: 10pt;
1158     }
1159     .cell {
1160         background-color: #ffeece;
1161         font-size: 10pt;
1162     }
1163     .error {
1164         color: #ff0000;
1165     }
1166     .errorboxcontent {
1167         text-align: center;
1168         font-weight: bold;
1169         padding-left: 20px;
1170         color: #ff0000;
1171     }
1172     .invisiblefieldset {
1173       display:inline;
1174       border:0px;
1175       padding:0px;
1176       margin:0px;
1177     }
1178     <?php
1179         $list = array();
1180         foreach ($databases as $driver=>$unused) {
1181             $list[] = '#'.$driver;
1182         }
1183         $list = implode(',', $list);
1184         echo ($list);
1185     ?> {
1186         display: none;
1187     }
1189 </style>
1191 <?php
1194 //==========================================================================//
1196 function database_js($databases) {
1197 ?>
1199 <script type="text/javascript" defer="defer">
1200 function toggledbinfo() {
1201     //Calculate selected value
1202     var showid = 'mysql';
1203     if (document.getElementById('installform').dbtype.value) {
1204         showid = document.getElementById('installform').dbtype.value;
1205     }
1206     if (document.getElementById) {
1207         //Hide all the divs
1208     <?php
1209         $list = array();
1210         foreach ($databases as $driver=>$unused) {
1211             echo "document.getElementById('$driver').style.display = '';";
1212         }
1213     ?>
1214         //Show the selected div
1215         document.getElementById(showid).style.display = 'block';
1216     } else if (document.all) {
1217         //This is the way old msie versions work
1218         //Hide all the divs
1219     <?php
1220         $list = array();
1221         foreach ($databases as $driver=>$unused) {
1222             echo "document.all['$driver'].style.display = '';";
1223         }
1224     ?>
1225         //Show the selected div
1226         document.all[showid].style.display = 'block';
1227     } else if (document.layers) {
1228         //This is the way nn4 works
1229         //Hide all the divs
1230     <?php
1231         $list = array();
1232         foreach ($databases as $driver=>$unused) {
1233             echo "document.layers['$driver'].style.display = '';";
1234         }
1235     ?>
1236         //Show the selected div
1237         document.layers[showid].style.display = 'block';
1238     }
1240 </script>
1242 <?php
1245 /**
1246  * Add slashes for single quotes and backslashes
1247  * so they can be included in single quoted string
1248  * (for config.php)
1249  */
1250 function addsingleslashes($input){
1251     return preg_replace("/(['\\\])/", "\\\\$1", $input);
1253 ?>