1<?php
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
18/**
19 * This script creates config.php file during installation.
20 *
21 * @package    core
22 * @subpackage install
23 * @copyright  2009 Petr Skoda (http://skodak.org)
24 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
25 */
26
27if (isset($_REQUEST['lang'])) {
28    $lang = preg_replace('/[^A-Za-z0-9_-]/i', '', $_REQUEST['lang']);
29} else {
30    $lang = 'en';
31}
32
33if (isset($_REQUEST['admin'])) {
34    $admin = preg_replace('/[^A-Za-z0-9_-]/i', '', $_REQUEST['admin']);
35} else {
36    $admin = 'admin';
37}
38
39// If config.php exists we just created config.php and need to redirect to continue installation
40$configfile = './config.php';
41if (file_exists($configfile)) {
42    header("Location: $admin/index.php?lang=$lang");
43    die;
44}
45
46define('CLI_SCRIPT', false); // prevents some warnings later
47define('AJAX_SCRIPT', false); // prevents some warnings later
48define('CACHE_DISABLE_ALL', true); // Disables caching.. just in case.
49define('PHPUNIT_TEST', false);
50define('IGNORE_COMPONENT_CACHE', true);
51define('MDL_PERF_TEST', false);
52
53// Servers should define a default timezone in php.ini, but if they don't then make sure something is defined.
54if (!function_exists('date_default_timezone_set') or !function_exists('date_default_timezone_get')) {
55    echo("Timezone functions are not available.");
56    die;
57}
58date_default_timezone_set(@date_default_timezone_get());
59
60// make sure PHP errors are displayed - helps with diagnosing of problems
61@error_reporting(E_ALL);
62@ini_set('display_errors', '1');
63
64// Check that PHP is of a sufficient version as soon as possible.
65require_once(__DIR__.'/lib/phpminimumversionlib.php');
66moodle_require_minimum_php_version();
67
68// make sure iconv is available and actually works
69if (!function_exists('iconv')) {
70    // this should not happen, this must be very borked install
71    echo 'Moodle requires the iconv PHP extension. Please install or enable the iconv extension.';
72    die();
73}
74
75if (PHP_INT_SIZE > 4) {
76    // most probably 64bit PHP - we need a lot more memory
77    $minrequiredmemory = '70M';
78} else {
79    // 32bit PHP
80    $minrequiredmemory = '40M';
81}
82// increase or decrease available memory - we need to make sure moodle
83// installs even with low memory, otherwise developers would overlook
84// sudden increases of memory needs ;-)
85@ini_set('memory_limit', $minrequiredmemory);
86
87/** Used by library scripts to check they are being called by Moodle */
88define('MOODLE_INTERNAL', true);
89
90require_once(__DIR__.'/lib/classes/component.php');
91require_once(__DIR__.'/lib/installlib.php');
92
93// TODO: add lang detection here if empty $_REQUEST['lang']
94
95// distro specific customisation
96$distro = null;
97if (file_exists('install/distrolib.php')) {
98    require_once('install/distrolib.php');
99    if (function_exists('distro_get_config')) {
100        $distro = distro_get_config();
101    }
102}
103
104$config = new stdClass();
105$config->lang = $lang;
106
107if (!empty($_POST)) {
108    $config->stage = (int)$_POST['stage'];
109
110    if (isset($_POST['previous'])) {
111        $config->stage--;
112        if (INSTALL_DATABASETYPE and !empty($distro->dbtype)) {
113            $config->stage--;
114        }
115        if ($config->stage == INSTALL_ENVIRONMENT or $config->stage == INSTALL_DOWNLOADLANG) {
116            $config->stage--;
117        }
118    } else if (isset($_POST['next'])) {
119        $config->stage++;
120    }
121
122    $config->dbtype   = trim($_POST['dbtype']);
123    $config->dbhost   = trim($_POST['dbhost']);
124    $config->dbuser   = trim($_POST['dbuser']);
125    $config->dbpass   = trim($_POST['dbpass']);
126    $config->dbname   = trim($_POST['dbname']);
127    $config->prefix   = trim($_POST['prefix']);
128    $config->dbport   = (int)trim($_POST['dbport']);
129    $config->dbsocket = trim($_POST['dbsocket']);
130
131    if ($config->dbport <= 0) {
132        $config->dbport = '';
133    }
134
135    $config->admin    = empty($_POST['admin']) ? 'admin' : trim($_POST['admin']);
136
137    $config->dataroot = trim($_POST['dataroot']);
138
139} else {
140    $config->stage    = INSTALL_WELCOME;
141
142    $config->dbtype   = empty($distro->dbtype) ? '' : $distro->dbtype; // let distro skip dbtype selection
143    $config->dbhost   = empty($distro->dbhost) ? 'localhost' : $distro->dbhost; // let distros set dbhost
144    $config->dbuser   = empty($distro->dbuser) ? '' : $distro->dbuser; // let distros set dbuser
145    $config->dbpass   = '';
146    $config->dbname   = 'moodle';
147    $config->prefix   = 'mdl_';
148    $config->dbport   = empty($distro->dbport) ? '' : $distro->dbport;
149    $config->dbsocket = empty($distro->dbsocket) ? '' : $distro->dbsocket;
150
151    $config->admin    = 'admin';
152
153    $config->dataroot = empty($distro->dataroot) ? null  : $distro->dataroot; // initialised later after including libs or by distro
154}
155
156// Fake some settings so that we can use selected functions from moodlelib.php, weblib.php and filelib.php.
157global $CFG;
158$CFG = new stdClass();
159$CFG->lang                 = $config->lang;
160$CFG->dirroot              = __DIR__;
161$CFG->libdir               = "$CFG->dirroot/lib";
162$CFG->wwwroot              = install_guess_wwwroot(); // can not be changed - ppl must use the real address when installing
163$CFG->httpswwwroot         = $CFG->wwwroot;
164$CFG->dataroot             = $config->dataroot;
165$CFG->tempdir              = $CFG->dataroot.'/temp';
166$CFG->backuptempdir        = $CFG->tempdir.'/backup';
167$CFG->cachedir             = $CFG->dataroot.'/cache';
168$CFG->localcachedir        = $CFG->dataroot.'/localcache';
169$CFG->admin                = $config->admin;
170$CFG->docroot              = 'https://docs.moodle.org';
171$CFG->langotherroot        = $CFG->dataroot.'/lang';
172$CFG->langlocalroot        = $CFG->dataroot.'/lang';
173$CFG->directorypermissions = isset($distro->directorypermissions) ? $distro->directorypermissions : 00777; // let distros set dir permissions
174$CFG->filepermissions      = ($CFG->directorypermissions & 0666);
175$CFG->umaskpermissions     = (($CFG->directorypermissions & 0777) ^ 0777);
176$CFG->running_installer    = true;
177$CFG->early_install_lang   = true;
178$CFG->ostype               = (stristr(PHP_OS, 'win') && !stristr(PHP_OS, 'darwin')) ? 'WINDOWS' : 'UNIX';
179$CFG->debug                = (E_ALL | E_STRICT);
180$CFG->debugdisplay         = true;
181$CFG->debugdeveloper       = true;
182
183// Require all needed libs
184require_once($CFG->libdir.'/setuplib.php');
185
186// we need to make sure we have enough memory to load all libraries
187$memlimit = @ini_get('memory_limit');
188if (!empty($memlimit) and $memlimit != -1) {
189    if (get_real_size($memlimit) < get_real_size($minrequiredmemory)) {
190        // do NOT localise - lang strings would not work here and we CAN not move it to later place
191        echo "Moodle requires at least {$minrequiredmemory}B of PHP memory.<br />";
192        echo "Please contact server administrator to fix PHP.ini memory settings.";
193        die;
194    }
195}
196
197// Continue with lib loading
198require_once($CFG->libdir.'/classes/text.php');
199require_once($CFG->libdir.'/classes/string_manager.php');
200require_once($CFG->libdir.'/classes/string_manager_install.php');
201require_once($CFG->libdir.'/classes/string_manager_standard.php');
202require_once($CFG->libdir.'/weblib.php');
203require_once($CFG->libdir.'/outputlib.php');
204require_once($CFG->libdir.'/dmllib.php');
205require_once($CFG->libdir.'/moodlelib.php');
206require_once($CFG->libdir .'/pagelib.php');
207require_once($CFG->libdir.'/deprecatedlib.php');
208require_once($CFG->libdir.'/adminlib.php');
209require_once($CFG->libdir.'/environmentlib.php');
210require_once($CFG->libdir.'/componentlib.class.php');
211require_once($CFG->dirroot.'/cache/lib.php');
212
213//point pear include path to moodles lib/pear so that includes and requires will search there for files before anywhere else
214//the problem is that we need specific version of quickforms and hacked excel files :-(
215ini_set('include_path', $CFG->libdir.'/pear' . PATH_SEPARATOR . ini_get('include_path'));
216
217// Register our classloader, in theory somebody might want to replace it to load other hacked core classes.
218// Required because the database checks below lead to session interaction which is going to lead us to requiring autoloaded classes.
219if (defined('COMPONENT_CLASSLOADER')) {
220    spl_autoload_register(COMPONENT_CLASSLOADER);
221} else {
222    spl_autoload_register('core_component::classloader');
223}
224
225require('version.php');
226$CFG->target_release = $release;
227
228\core\session\manager::init_empty_session();
229global $SESSION;
230global $USER;
231
232global $COURSE;
233$COURSE = new stdClass();
234$COURSE->id = 1;
235
236global $SITE;
237$SITE = $COURSE;
238define('SITEID', 1);
239
240$hint_dataroot = '';
241$hint_admindir = '';
242$hint_database = '';
243
244// Are we in help mode?
245if (isset($_GET['help'])) {
246    install_print_help_page($_GET['help']);
247}
248
249//first time here? find out suitable dataroot
250if (is_null($CFG->dataroot)) {
251    $CFG->dataroot = __DIR__.'/../moodledata';
252
253    $i = 0; //safety check - dirname might return some unexpected results
254    while(is_dataroot_insecure()) {
255        $parrent = dirname($CFG->dataroot);
256        $i++;
257        if ($parrent == '/' or $parrent == '.' or preg_match('/^[a-z]:\\\?$/i', $parrent) or ($i > 100)) {
258            $CFG->dataroot = ''; //can not find secure location for dataroot
259            break;
260        }
261        $CFG->dataroot = dirname($parrent).DIRECTORY_SEPARATOR.'moodledata';
262    }
263    $config->dataroot = $CFG->dataroot;
264    $config->stage    = INSTALL_WELCOME;
265}
266
267// now let's do the stage work
268if ($config->stage < INSTALL_WELCOME) {
269    $config->stage = INSTALL_WELCOME;
270}
271if ($config->stage > INSTALL_SAVE) {
272    $config->stage = INSTALL_SAVE;
273}
274
275
276
277if ($config->stage == INSTALL_SAVE) {
278    $CFG->early_install_lang = false;
279
280    $database = moodle_database::get_driver_instance($config->dbtype, 'native');
281    if (!$database->driver_installed()) {
282        $config->stage = INSTALL_DATABASETYPE;
283    } else {
284        if (function_exists('distro_pre_create_db')) { // Hook for distros needing to do something before DB creation
285            $distro = distro_pre_create_db($database, $config->dbhost, $config->dbuser, $config->dbpass, $config->dbname, $config->prefix, array('dbpersist'=>0, 'dbport'=>$config->dbport, 'dbsocket'=>$config->dbsocket), $distro);
286        }
287        $hint_database = install_db_validate($database, $config->dbhost, $config->dbuser, $config->dbpass, $config->dbname, $config->prefix, array('dbpersist'=>0, 'dbport'=>$config->dbport, 'dbsocket'=>$config->dbsocket));
288
289        if ($hint_database === '') {
290            $configphp = install_generate_configphp($database, $CFG);
291
292            umask(0137);
293            if (($fh = @fopen($configfile, 'w')) !== false) {
294                fwrite($fh, $configphp);
295                fclose($fh);
296            }
297
298            if (file_exists($configfile)) {
299                // config created, let's continue!
300                redirect("$CFG->wwwroot/$config->admin/index.php?lang=$config->lang");
301            }
302
303            install_print_header($config, 'config.php',
304                                          get_string('configurationcompletehead', 'install'),
305                                          get_string('configurationcompletesub', 'install').get_string('configfilenotwritten', 'install'), 'alert-error');
306            echo '<div class="configphp"><pre>';
307            echo p($configphp);
308            echo '</pre></div>';
309
310            install_print_footer($config);
311            die;
312
313        } else {
314            $config->stage = INSTALL_DATABASE;
315        }
316    }
317}
318
319
320
321if ($config->stage == INSTALL_DOWNLOADLANG) {
322    if (empty($CFG->dataroot)) {
323        $config->stage = INSTALL_PATHS;
324
325    } else if (is_dataroot_insecure()) {
326        $hint_dataroot = get_string('pathsunsecuredataroot', 'install');
327        $config->stage = INSTALL_PATHS;
328
329    } else if (!file_exists($CFG->dataroot)) {
330        $a = new stdClass();
331        $a->parent = dirname($CFG->dataroot);
332        $a->dataroot = $CFG->dataroot;
333        if (!is_writable($a->parent)) {
334            $hint_dataroot = get_string('pathsroparentdataroot', 'install', $a);
335            $config->stage = INSTALL_PATHS;
336        } else {
337            if (!install_init_dataroot($CFG->dataroot, $CFG->directorypermissions)) {
338                $hint_dataroot = get_string('pathserrcreatedataroot', 'install', $a);
339                $config->stage = INSTALL_PATHS;
340            }
341        }
342
343    } else if (!install_init_dataroot($CFG->dataroot, $CFG->directorypermissions)) {
344        $hint_dataroot = get_string('pathserrcreatedataroot', 'install', array('dataroot' => $CFG->dataroot));
345        $config->stage = INSTALL_PATHS;
346    }
347
348    if (empty($hint_dataroot) and !is_writable($CFG->dataroot)) {
349        $hint_dataroot = get_string('pathsrodataroot', 'install');
350        $config->stage = INSTALL_PATHS;
351    }
352
353    if ($config->admin === '' or !file_exists($CFG->dirroot.'/'.$config->admin.'/environment.xml')) {
354        $hint_admindir = get_string('pathswrongadmindir', 'install');
355        $config->stage = INSTALL_PATHS;
356    }
357}
358
359
360
361if ($config->stage == INSTALL_DOWNLOADLANG) {
362    // no need to download anything if en lang selected
363    if ($CFG->lang == 'en') {
364        $config->stage = INSTALL_DATABASETYPE;
365    }
366}
367
368
369
370if ($config->stage == INSTALL_DATABASETYPE) {
371    // skip db selection if distro package supports only one db
372    if (!empty($distro->dbtype)) {
373        $config->stage = INSTALL_DATABASE;
374    }
375}
376
377
378if ($config->stage == INSTALL_DOWNLOADLANG) {
379    $downloaderror = '';
380
381    // download and install required lang packs, the lang dir has already been created in install_init_dataroot
382    $installer = new lang_installer($CFG->lang);
383    $results = $installer->run();
384    foreach ($results as $langcode => $langstatus) {
385        if ($langstatus === lang_installer::RESULT_DOWNLOADERROR) {
386            $a       = new stdClass();
387            $a->url  = $installer->lang_pack_url($langcode);
388            $a->dest = $CFG->dataroot.'/lang';
389            $downloaderror = get_string('remotedownloaderror', 'error', $a);
390        }
391    }
392
393    if ($downloaderror !== '') {
394        install_print_header($config, get_string('language'), get_string('langdownloaderror', 'install', $CFG->lang), $downloaderror);
395        install_print_footer($config);
396        die;
397    } else {
398        if (empty($distro->dbtype)) {
399            $config->stage = INSTALL_DATABASETYPE;
400        } else {
401            $config->stage = INSTALL_DATABASE;
402        }
403    }
404
405    // switch the string_manager instance to stop using install/lang/
406    $CFG->early_install_lang = false;
407    $CFG->langotherroot      = $CFG->dataroot.'/lang';
408    $CFG->langlocalroot      = $CFG->dataroot.'/lang';
409    get_string_manager(true);
410}
411
412
413if ($config->stage == INSTALL_DATABASE) {
414    $CFG->early_install_lang = false;
415
416    $database = moodle_database::get_driver_instance($config->dbtype, 'native');
417
418    $sub = '<h3>'.$database->get_name().'</h3>'.$database->get_configuration_help();
419
420    install_print_header($config, get_string('database', 'install'), get_string('databasehead', 'install'), $sub);
421
422    $strdbhost   = get_string('databasehost', 'install');
423    $strdbname   = get_string('databasename', 'install');
424    $strdbuser   = get_string('databaseuser', 'install');
425    $strdbpass   = get_string('databasepass', 'install');
426    $strprefix   = get_string('dbprefix', 'install');
427    $strdbport   = get_string('databaseport', 'install');
428    $strdbsocket = get_string('databasesocket', 'install');
429
430    echo '<div class="row mb-4">';
431
432    $disabled = empty($distro->dbhost) ? '' : 'disabled="disabled';
433    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dbhost">'.$strdbhost.'</label></div>';
434    echo '<div class="col-md-9" data-fieldtype="text">';
435    echo '<input id="id_dbhost" name="dbhost" '.$disabled.' type="text" class="form-control text-ltr" value="'.s($config->dbhost).'" size="50" /></div>';
436    echo '</div>';
437
438    echo '<div class="row mb-4">';
439    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dbname">'.$strdbname.'</label></div>';
440    echo '<div class="col-md-9" data-fieldtype="text">';
441    echo '<input id="id_dbname" name="dbname" type="text" class="form-control text-ltr" value="'.s($config->dbname).'" size="50" /></div>';
442    echo '</div>';
443
444    $disabled = empty($distro->dbuser) ? '' : 'disabled="disabled';
445    echo '<div class="row mb-4">';
446    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dbuser">'.$strdbuser.'</label></div>';
447    echo '<div class="col-md-9" data-fieldtype="text">';
448    echo '<input id="id_dbuser" name="dbuser" '.$disabled.' type="text" class="form-control text-ltr" value="'.s($config->dbuser).'" size="50" /></div>';
449    echo '</div>';
450
451    echo '<div class="row mb-4">';
452    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dbpass">'.$strdbpass.'</label></div>';
453    // no password field here, the password may be visible in config.php if we can not write it to disk
454    echo '<div class="col-md-9" data-fieldtype="text">';
455    echo '<input id="id_dbpass" name="dbpass" type="text" class="form-control text-ltr" value="'.s($config->dbpass).'" size="50" /></div>';
456    echo '</div>';
457
458    echo '<div class="row mb-4">';
459    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_prefix">'.$strprefix.'</label></div>';
460    echo '<div class="col-md-9" data-fieldtype="text">';
461    echo '<input id="id_prefix" name="prefix" type="text" class="form-control text-ltr" value="'.s($config->prefix).'" size="10" /></div>';
462    echo '</div>';
463
464    echo '<div class="row mb-4">';
465    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_prefix">'.$strdbport.'</label></div>';
466    echo '<div class="col-md-9" data-fieldtype="text">';
467    echo '<input id="id_dbport" name="dbport" type="text" class="form-control text-ltr" value="'.s($config->dbport).'" size="10" /></div>';
468    echo '</div>';
469
470    if (!(stristr(PHP_OS, 'win') && !stristr(PHP_OS, 'darwin'))) {
471        echo '<div class="row mb-4">';
472        echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dbsocket">'.$strdbsocket.'</label></div>';
473        echo '<div class="col-md-9" data-fieldtype="text">';
474        echo '<input id="id_dbsocket" name="dbsocket" type="text" class="form-control text-ltr" value="'.s($config->dbsocket).'" size="50" /></div>';
475        echo '</div>';
476    }
477
478    if ($hint_database !== '') {
479        echo '<div class="alert alert-danger">'.$hint_database.'</div>';
480    }
481    echo '</div>';
482    install_print_footer($config);
483    die;
484}
485
486
487if ($config->stage == INSTALL_DATABASETYPE) {
488    $CFG->early_install_lang = false;
489
490    // Finally ask for DB type
491    install_print_header($config, get_string('database', 'install'),
492                                  get_string('databasetypehead', 'install'),
493                                  get_string('databasetypesub', 'install'));
494
495    $databases = array('mysqli' => moodle_database::get_driver_instance('mysqli', 'native'),
496                       'auroramysql' => moodle_database::get_driver_instance('auroramysql', 'native'),
497                       'mariadb'=> moodle_database::get_driver_instance('mariadb', 'native'),
498                       'pgsql'  => moodle_database::get_driver_instance('pgsql',  'native'),
499                       'oci'    => moodle_database::get_driver_instance('oci',    'native'),
500                       'sqlsrv' => moodle_database::get_driver_instance('sqlsrv', 'native'), // MS SQL*Server PHP driver
501                      );
502
503    echo '<div class="row mb-4">';
504    echo '<div class="col-md-3 text-md-right pt-1"><label for="dbtype">'.get_string('dbtype', 'install').'</label></div>';
505    echo '<div class="col-md-9" data-fieldtype="select">';
506    echo '<select class="form-control" id="dbtype" name="dbtype">';
507    $disabled = array();
508    $options = array();
509    foreach ($databases as $type=>$database) {
510        if ($database->driver_installed() !== true) {
511            $disabled[$type] = $database;
512            continue;
513        }
514        echo '<option value="'.s($type).'">'.$database->get_name().'</option>';
515    }
516    if ($disabled) {
517        echo '<optgroup label="'.s(get_string('notavailable')).'">';
518        foreach ($disabled as $type=>$database) {
519            echo '<option value="'.s($type).'" class="notavailable">'.$database->get_name().'</option>';
520        }
521        echo '</optgroup>';
522    }
523    echo '</select></div></div>';
524
525    install_print_footer($config);
526    die;
527}
528
529
530
531if ($config->stage == INSTALL_ENVIRONMENT or $config->stage == INSTALL_PATHS) {
532    $curl_fail    = ($lang !== 'en' and !extension_loaded('curl')); // needed for lang pack download
533    $zip_fail     = ($lang !== 'en' and !extension_loaded('zip'));  // needed for lang pack download
534
535    if ($curl_fail or $zip_fail) {
536        $config->stage = INSTALL_ENVIRONMENT;
537
538        install_print_header($config, get_string('environmenthead', 'install'),
539                                      get_string('errorsinenvironment', 'install'),
540                                      get_string('environmentsub2', 'install'));
541
542        echo '<div id="envresult"><dl>';
543        if ($curl_fail) {
544            echo '<dt>'.get_string('phpextension', 'install', 'cURL').'</dt><dd>'.get_string('environmentrequireinstall', 'admin').'</dd>';
545        }
546        if ($zip_fail) {
547            echo '<dt>'.get_string('phpextension', 'install', 'Zip').'</dt><dd>'.get_string('environmentrequireinstall', 'admin').'</dd>';
548        }
549        echo '</dl></div>';
550
551        install_print_footer($config, true);
552        die;
553
554    } else {
555        $config->stage = INSTALL_PATHS;
556    }
557}
558
559
560
561if ($config->stage == INSTALL_PATHS) {
562    $paths = array('wwwroot'  => get_string('wwwroot', 'install'),
563                   'dirroot'  => get_string('dirroot', 'install'),
564                   'dataroot' => get_string('dataroot', 'install'));
565
566    $sub = '<dl>';
567    foreach ($paths as $path=>$name) {
568        $sub .= '<dt>'.$name.'</dt><dd>'.get_string('pathssub'.$path, 'install').'</dd>';
569    }
570    if (!file_exists("$CFG->dirroot/admin/environment.xml")) {
571        $sub .= '<dt>'.get_string('admindirname', 'install').'</dt><dd>'.get_string('pathssubadmindir', 'install').'</dd>';
572    }
573    $sub .= '</dl>';
574
575    install_print_header($config, get_string('paths', 'install'), get_string('pathshead', 'install'), $sub);
576
577    $strwwwroot      = get_string('wwwroot', 'install');
578    $strdirroot      = get_string('dirroot', 'install');
579    $strdataroot     = get_string('dataroot', 'install');
580    $stradmindirname = get_string('admindirname', 'install');
581
582    echo '<div class="row mb-4">';
583    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_wwwroot">'.$paths['wwwroot'].'</label></div>';
584    echo '<div class="col-md-9" data-fieldtype="text">';
585    echo '<input id="id_wwwroot" name="wwwroot" type="text" class="form-control text-ltr" value="'.s($CFG->wwwroot).'" disabled="disabled" size="70" /></div>';
586    echo '</div>';
587
588    echo '<div class="row mb-4">';
589    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dirroot">'.$paths['dirroot'].'</label></div>';
590    echo '<div class="col-md-9" data-fieldtype="text">';
591    echo '<input id="id_dirroot" name="dirroot" type="text" class="form-control text-ltr" value="'.s($CFG->dirroot).'" disabled="disabled" size="70" /></div>';
592    echo '</div>';
593
594    echo '<div class="row mb-4">';
595    echo '<div class="col-md-3 text-md-right pt-1"><label for="id_dataroot">'.$paths['dataroot'].'</label></div>';
596    echo '<div class="col-md-9" data-fieldtype="text">';
597    echo '<input id="id_dataroot" name="dataroot" type="text" class="form-control text-ltr" value="'.s($config->dataroot).'" size="70" /></div>';
598    echo '</div>';
599    if ($hint_dataroot !== '') {
600        echo '<div class="alert alert-danger">'.$hint_dataroot.'</div>';
601    }
602
603
604    if (!file_exists("$CFG->dirroot/admin/environment.xml")) {
605        echo '<div class="row mb-4">';
606        echo '<div class="col-md-3 text-md-right pt-1"><label for="id_admin">'.$paths['admindir'].'</label></div>';
607        echo '<div class="col-md-9" data-fieldtype="text">';
608        echo '<input id="id_admin" name="admin" type="text" class="form-control text-ltr" value="'.s($config->admin).'" size="10" /></div>';
609        echo '</div>';
610        if ($hint_admindir !== '') {
611            echo '<div class="alert alert-danger">'.$hint_admindir.'</div>';
612        }
613        echo '</div>';
614    }
615
616    echo '</div>';
617
618    install_print_footer($config);
619    die;
620}
621
622
623
624$config->stage = INSTALL_WELCOME;
625
626if ($distro) {
627    ob_start();
628    include('install/distribution.html');
629    $sub = ob_get_clean();
630
631    install_print_header($config, get_string('language'),
632                                  get_string('chooselanguagehead', 'install'),
633                                  $sub, 'alert-success');
634
635} else {
636    install_print_header($config, get_string('language'),
637                                  get_string('chooselanguagehead', 'install'),
638                                  get_string('chooselanguagesub', 'install'));
639}
640
641$languages = get_string_manager()->get_list_of_translations();
642echo '<div class="row mb-4">';
643echo '<div class="col-md-3 text-md-right pt-1"><label for="langselect">'.get_string('language').'</label></div>';
644echo '<div class="col-md-9" data-fieldtype="select">';
645echo '<select id="langselect" class="form-control" name="lang" onchange="this.form.submit()">';
646foreach ($languages as $name=>$value) {
647    $selected = ($name == $CFG->lang) ? 'selected="selected"' : '';
648    echo '<option value="'.s($name).'" '.$selected.'>'.$value.'</option>';
649}
650echo '</select></div>';
651echo '</div>';
652
653install_print_footer($config);
654die;
655
656