/**
* folders_rename_do.php
*
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
+ * Copyright (c) 1999-2003 The SquirrelMail Project Team
* Licensed under the GNU GPL. For full terms see the file COPYING.
*
* Does the actual renaming of files on the IMAP server.
* Called from the folders.php
*
* $Id$
+ * @package squirrelmail
*/
-/* Path for SquirrelMail required files. */
+/** Path for SquirrelMail required files. */
define('SM_PATH','../');
/* SquirrelMail required files. */
require_once(SM_PATH . 'include/validate.php');
+require_once(SM_PATH . 'functions/global.php');
require_once(SM_PATH . 'functions/imap.php');
+require_once(SM_PATH . 'functions/display_messages.php');
/* globals */
-$username = $_SESSION['username'];
-$key = $_COOKIE['key'];
-$delimiter = $_SESSION['delimiter'];
-$onetimepad = $_SESSION['onetimepad'];
-$base_uri = $_SESSION['base_uri'];
-
-$orig = $_POST['orig'];
-$old_name = $_POST['old_name'];
-$new_name = $_POST['new_name'];
-
+sqgetGlobalVar('key', $key, SQ_COOKIE);
+sqgetGlobalVar('username', $username, SQ_SESSION);
+sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
+sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION);
+sqgetGlobalVar('orig', $orig, SQ_POST);
+sqgetGlobalVar('old_name', $old_name, SQ_POST);
+sqgetGlobalVar('new_name', $new_name, SQ_POST);
/* end globals */
$new_name = trim($new_name);
+if (substr_count($new_name, '"') || substr_count($new_name, "\\") ||
+ substr_count($new_name, $delimiter) || ($new_name == '')) {
+ displayPageHeader($color, 'None');
+
+ plain_error_message(_("Illegal folder name. Please select a different name.").
+ '<BR><A HREF="../src/folders.php">'._("Click here to go back").'</A>.', $color);
+
+ exit;
+}
+
+$orig = imap_utf7_encode_local($orig);
+$old_name = imap_utf7_encode_local($old_name);
+$new_name = imap_utf7_encode_local($new_name);
+
if ($old_name <> $new_name) {
$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
$newone = $new_name;
}
- // Renaming a folder doesn't renames the folder but leaves you unsubscribed
+ // Renaming a folder doesn't rename the folder but leaves you unsubscribed
// at least on Cyrus IMAP servers.
if (isset($isfolder)) {
$newone = $newone.$delimiter;
sqimap_logout($imapConnection);
}
-header ('Location: ' . $base_uri . 'src/folders.php?success=rename');
+
+header ('Location: ' . get_location() . '/folders.php?success=rename');
+
?>