* SquirrelMail configuration file.
*
* @author Philippe Mingo
- * @copyright © 1999-2007 The SquirrelMail Project Team
+ * @copyright 1999-2018 The SquirrelMail Project Team
* @license http://opensource.org/licenses/gpl-license.php GNU Public License
* @version $Id$
* @package plugins
* @subpackage administrator
*/
+define('PAGE_NAME', 'administrator_options');
+
/**
* parse the config file
*
* empty_string --> ''
* ../images/logo.gif --> SM_PATH . 'images/logo.gif'
* images/logo.gif --> SM_PATH . 'config/images/logo.gif'
+ * C:/absolute/win/path --> 'C:/absolute/win/path'
* /absolute/path/logo.gif --> '/absolute/path/logo.gif'
* http://whatever/ --> 'http://whatever'
*
function change_to_sm_path($old_path) {
if ( $old_path === '' || $old_path == "''" ) {
return "''";
- } elseif ( preg_match("/^(\/|http)/", $old_path) ) {
+ } elseif ( preg_match("/^(\/|http)/", $old_path) ||
+ substr($old_path,1,2) == ':/' ) {
return "'" . $old_path . "'";
} elseif ( preg_match("/^(\$|SM_PATH)/", $old_path) ) {
return $old_path;
}
echo "<tr><td valign=\"top\">$name</td><td>"
."<textarea cols=\"$size\" rows=\"4\" name=\"adm_$n\">"
- .htmlspecialchars(stripslashes(substr( $v, 1, strlen( $v ) - 2 )))
+ .sm_encode_html_special_chars(stripslashes(substr( $v, 1, strlen( $v ) - 2 )))
."</textarea>";
if ( isset( $defcfg[$k]['comment'] ) ) {
echo ' ' . $defcfg[$k]['comment'];
}
echo "<tr><td>$name</td><td>"
."<input size=\"$size\" name=\"adm_$n\" value=\""
- .htmlspecialchars(stripslashes(substr( $v, 1, strlen( $v ) - 2 )))
+ .sm_encode_html_special_chars(stripslashes(substr( $v, 1, strlen( $v ) - 2 )))
.'" />';
if ( isset( $defcfg[$k]['comment'] ) ) {
echo ' ' . $defcfg[$k]['comment'];
Write the options to the file.
*/
+// Test/debug
+// $cfgfile = '/tmp/config.php';
if ( $fp = @fopen( $cfgfile, 'w' ) ) {
fwrite( $fp, "<?php\n".
"/**\n".
" * SquirrelMail Configuration File\n".
" * Created using the Administrator Plugin\n".
" */\n".
- "\n".
- "global \$version;\n" );
+ "\n" );
foreach ( $newcfg as $k => $v ) {
if ( $k{0} == '$' && $v <> '' || is_int($v)) {