//==========================================================================//
/// 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">
