//==========================================================================// /// Display or print the data /// Put the data into a string /// Try to open config file for writing. if ($nextstage == SAVE) { $str = '<?php /// Moodle Configuration File ' . "\r\n"; $str .= "\r\n"; $str .= 'unset($CFG);' . "\r\n"; $str .= "\r\n"; $str .= '$CFG->dbtype = \'' . $INSTALL['dbtype'] . "';\r\n"; $str .= '$CFG->dbhost = \'' . addslashes($INSTALL['dbhost']) . "';\r\n"; if (!empty($INSTALL['dbname'])) { $str .= '$CFG->dbname = \'' . $INSTALL['dbname'] . "';\r\n"; // support single quotes in db user/passwords $str .= '$CFG->dbuser = \'' . addsingleslashes($INSTALL['dbuser']) . "';\r\n"; $str .= '$CFG->dbpass = \'' . addsingleslashes($INSTALL['dbpass']) . "';\r\n"; } $str .= '$CFG->dbpersist = false;' . "\r\n"; $str .= '$CFG->prefix = \'' . $INSTALL['prefix'] . "';\r\n"; $str .= "\r\n"; $str .= '$CFG->wwwroot = \'' . s($INSTALL['wwwrootform'], true) . "';\r\n"; $str .= '$CFG->dirroot = \'' . s($INSTALL['dirrootform'], true) . "';\r\n"; $str .= '$CFG->dataroot = \'' . s($INSTALL['dataroot'], true) . "';\r\n"; $str .= '$CFG->admin = \'' . s($INSTALL['admindirname'], true) . "';\r\n"; $str .= "\r\n"; $str .= '$CFG->directorypermissions = 00777; // try 02777 on a server in Safe Mode' . "\r\n"; $str .= "\r\n"; $str .= 'require_once("$CFG->dirroot/lib/setup.php");' . "\r\n"; $str .= '// MAKE SURE WHEN YOU EDIT THIS FILE THAT THERE ARE NO SPACES, BLANK LINES,' . "\r\n"; $str .= '// RETURNS, OR ANYTHING ELSE AFTER THE TWO CHARACTERS ON THE NEXT LINE.' . "\r\n"; $str .= '?>';
$str .= '$CFG->dbname = \'' . $INSTALL['dbname'] . "';\r\n"; // support single quotes in db user/passwords $str .= '$CFG->dbuser = \'' . addsingleslashes($INSTALL['dbuser']) . "';\r\n"; $str .= '$CFG->dbpass = \'' . addsingleslashes($INSTALL['dbpass']) . "';\r\n"; } $str .= '$CFG->dbpersist = false;' . "\r\n"; $str .= '$CFG->prefix = \'' . $INSTALL['prefix'] . "';\r\n"; $str .= "\r\n"; $str .= '$CFG->wwwroot = \'' . s($INSTALL['wwwrootform'], true) . "';\r\n"; $str .= '$CFG->dirroot = \'' . s($INSTALL['dirrootform'], true) . "';\r\n"; $str .= '$CFG->dataroot = \'' . s($INSTALL['dataroot'], true) . "';\r\n"; $str .= '$CFG->admin = \'' . s($INSTALL['admindirname'], true) . "';\r\n"; $str .= "\r\n"; $str .= '$CFG->directorypermissions = 00777; // try 02777 on a server in Safe Mode' . "\r\n"; $str .= "\r\n"; $str .= '$CFG->passwordsaltmain = \'' . addsingleslashes(complex_random_string()) . '\';' . "\r\n"; $str .= "\r\n"; $str .= 'require_once("$CFG->dirroot/lib/setup.php");' . "\r\n"; $str .= '// MAKE SURE WHEN YOU EDIT THIS FILE THAT THERE ARE NO SPACES, BLANK LINES,' . "\r\n"; $str .= '// RETURNS, OR ANYTHING ELSE AFTER THE TWO CHARACTERS ON THE NEXT LINE.' . "\r\n"; $str .= '?>'; umask(0137); if (($configsuccess = $fh = @fopen($configfile, 'w')) !== false) { fwrite($fh, $str); fclose($fh); } $INSTALL['config'] = $str; } //==========================================================================// ?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">