<?php
- /**
- ** move_messages.php
- **
- ** Copyright (c) 1999-2000 The SquirrelMail development team
- ** Licensed under the GNU GPL. For full terms see the file COPYING.
- **
- ** Enables message moving between folders on the IMAP server.
- **/
-
- session_start();
-
- if (!isset($config_php))
- include("../config/config.php");
- if (!isset($strings_php))
- include("../functions/strings.php");
- if (!isset($page_header_php))
- include("../functions/page_header.php");
- if (!isset($display_messages_php))
- include("../functions/display_messages.php");
- if (!isset($imap_php))
- include("../functions/imap.php");
-
- include("../src/load_prefs.php");
-
- function putSelectedMessagesIntoString($msg) {
- $j = 0;
- $i = 0;
- $firstLoop = true;
-
- // If they have selected nothing msg is size one still, but will
- // be an infinite loop because we never increment j. so check to
- // see if msg[0] is set or not to fix this.
- while (($j < count($msg)) && ($msg[0])) {
- if ($msg[$i]) {
- if ($firstLoop != true)
- $selectedMessages .= "&";
- else
- $firstLoop = false;
-
- $selectedMessages .= "selMsg[$j]=$msg[$i]";
-
- $j++;
- }
- $i++;
- }
- }
-
- $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
- sqimap_mailbox_select($imapConnection, $mailbox);
-
- // If the delete button was pressed, the moveButton variable will not be set.
- if (!$moveButton) {
- if (is_array($msg) == 1) {
- // Marks the selected messages ad 'Deleted'
- $j = 0;
- $i = 0;
-
- // If they have selected nothing msg is size one still, but will be an infinite
- // loop because we never increment j. so check to see if msg[0] is set or not to fix this.
- while ($j < count($msg)) {
- if ($msg[$i]) {
- sqimap_messages_delete($imapConnection, $msg[$i], $msg[$i], $mailbox);
- $j++;
+exit;
+/**
+ * move_messages.php
+ *
+ * Copyright (c) 1999-2004 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * Enables message moving between folders on the IMAP server.
+ *
+ * @version $Id$
+ * @package squirrelmail
+ */
+
+/**
+ * Path for SquirrelMail required files.
+ * @ignore
+ */
+
+
+/**
+ * FIX ME REMOVE ME FIX ME REMOVE ME I DON'T DESERVE TO EXIST
+ *
+ * Integrate this is a clean manner in right_main.php and rename right_main to
+ * messageslist or whatever
+ **/
+
+
+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/display_messages.php');
+require_once(SM_PATH . 'functions/imap.php');
+require_once(SM_PATH . 'functions/html.php');
+
+global $compose_new_win;
+
+if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
+ $composesession = 0;
+}
+
+function attachSelectedMessages($msg, $imapConnection) {
+ global $username, $attachment_dir, $startMessage,
+ $data_dir, $composesession,
+ $msgs, $show_num, $compose_messages;
+
+ if (!isset($compose_messages)) {
+ $compose_messages = array();
+ sqsession_register($compose_messages,'compose_messages');
+ }
+
+ if (!$composesession) {
+ $composesession = 1;
+ sqsession_register($composesession,'composesession');
+ } else {
+ $composesession++;
+ sqsession_register($composesession,'composesession');
+ }
+
+ $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
+
+ $composeMessage = new Message();
+ $rfc822_header = new Rfc822Header();
+ $composeMessage->rfc822_header = $rfc822_header;
+ $composeMessage->reply_rfc822_header = '';
+
+ foreach($msg as $id) {
+ $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822", true, $response, $readmessage, TRUE);
+
+ if ($response == 'OK') {
+ // fetch the subject for the message with $id from msgs.
+ // is there a more efficient way to do this?
+ foreach($msgs as $k => $vals) {
+ if($vals['ID'] == $id) {
+ $subject = $msgs[$k]['SUBJECT'];
+ break;
+ }
+ }
+
+ array_shift($body_a);
+ array_pop($body_a);
+ $body = implode('', $body_a);
+ $body .= "\r\n";
+
+ $localfilename = GenerateRandomString(32, 'FILE', 7);
+ $full_localfilename = "$hashed_attachment_dir/$localfilename";
+
+ $fp = fopen( $full_localfilename, 'wb');
+ fwrite ($fp, $body);
+ fclose($fp);
+ $composeMessage->initAttachment('message/rfc822',$subject.'.msg',
+ $full_localfilename);
+ }
+ }
+
+ $compose_messages[$composesession] = $composeMessage;
+ sqsession_register($compose_messages,'compose_messages');
+ session_write_close();
+ return $composesession;
+}
+
+/* get globals */
+sqgetGlobalVar('key', $key, SQ_COOKIE);
+sqgetGlobalVar('username', $username, SQ_SESSION);
+sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION);
+sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
+sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
+
+sqgetGlobalVar('mailbox', $mailbox);
+sqgetGlobalVar('startMessage', $startMessage);
+sqgetGlobalVar('msg', $msg);
+
+sqgetGlobalVar('msgs', $msgs, SQ_SESSION);
+sqgetGlobalVar('composesession', $composesession, SQ_SESSION);
+sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
+
+sqgetGlobalVar('moveButton', $moveButton, SQ_POST);
+sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
+sqgetGlobalVar('targetMailbox', $targetMailbox, SQ_POST);
+sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
+sqgetGlobalVar('undeleteButton', $undeleteButton, SQ_POST);
+sqgetGlobalVar('markRead', $markRead, SQ_POST);
+sqgetGlobalVar('markUnread', $markUnread, SQ_POST);
+sqgetGlobalVar('markFlagged', $markFlagged, SQ_POST);
+sqgetGlobalVar('markUnflagged', $markUnflagged, SQ_POST);
+sqgetGlobalVar('attache', $attache, SQ_POST);
+sqgetGlobalVar('location', $location, SQ_POST);
+sqgetGlobalVar('bypass_trash', $bypass_trash, SQ_POST);
+sqgetGlobalVar('dmn', $is_dmn, SQ_POST);
+
+
+
+/* end of get globals */
+
+$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
+$mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
+
+
+global $allow_thread_sort, $auto_expunge;
+
+if ($allow_thread_sort && getPref($data_dir, $username, "thread_$mailbox",0)) {
+ $aMailbox['SORT_METHOD'] = 'THREAD';
+} else if ($allow_server_sort) {
+ $aMailbox['SORT_METHOD'] = 'SERVER';
+} else {
+ $aMailbox['SORT_METHOD'] = 'SQUIRREL';
+}
+sqgetGlobalVar('aLastSelectedMailbox',$aMailbox,SQ_SESSION);
+sqgetGlobalVar('server_sort_array', $server_sort_array, SQ_SESSION);
+$aMailbox['UIDSET'] = $server_sort_array;
+$aMailbox['SORT'] = $sort;
+$aMailbox['NAME'] = $mailbox;
+$aMailbox['EXISTS'] = $mbx_response['EXISTS'];
+$aMailbox['AUTO_EXPUNGE'] = $auto_expunge;
+$aMailbox['MSG_HEADERS'] = $msgs;
+
+$location = set_url_var($location,'composenew',0,false);
+$location = set_url_var($location,'composesession',0,false);
+$location = set_url_var($location,'session',0,false);
+
+/* remember changes to mailbox setting */
+if (!isset($lastTargetMailbox)) {
+ $lastTargetMailbox = 'INBOX';
+}
+if ($targetMailbox != $lastTargetMailbox) {
+ $lastTargetMailbox = $targetMailbox;
+ sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
+}
+$exception = false;
+$change = false;
+
+do_hook('move_before_move');
+
+/*
+ Move msg list sorting up here, as it is used several times,
+ makes it more efficient to do it in one place for the code
+*/
+$id = array();
+if (isset($msg) && is_array($msg)) {
+ foreach( $msg as $key=>$uid ) {
+ // using foreach removes the risk of infinite loops that was there //
+ $id[] = $uid;
+ }
+}
+$num_ids = count($id);
+
+// expunge-on-demand if user isn't using move_to_trash or auto_expunge
+if(isset($expungeButton)) {
+ $num_ids = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
+ $change = true;
+} elseif(isset($undeleteButton)) {
+ // undelete messages if user isn't using move_to_trash or auto_expunge
+ // Removes \Deleted flag from selected messages
+ if ($num_ids) {
+ sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
+ } else {
+ $exception = true;
+ }
+} elseif (!isset($moveButton)) {
+ if ($num_ids) {
+ if (!isset($attache)) {
+ if (isset($markRead)) {
+ sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
+ } else if (isset($markUnread)) {
+ sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
+ } else if (isset($markFlagged)) {
+ sqimap_toggle_flag($imapConnection, $id, '\\Flagged', true, true);
+ } else if (isset($markUnflagged)) {
+ sqimap_toggle_flag($imapConnection, $id, '\\Flagged', false, true);
+ } else { // Delete messages
+ if (!boolean_hook_function('move_messages_button_action', NULL, 1)) {
+ sqimap_msgs_list_delete($imapConnection, $mailbox, $id,$bypass_trash);
+ if ($auto_expunge) {
+ $num_ids = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
+ }
+ $change = true;
+ }
+ }
+ } else {
+ $composesession = attachSelectedMessages($id, $imapConnection);
+ $location = set_url_var($location, 'session', $composesession, false);
+ if ($compose_new_win) {
+ $location = set_url_var($location, 'composenew', 1, false);
+ } else {
+ $location = str_replace('search.php','compose.php',$location);
+ $location = str_replace('right_main.php','compose.php',$location);
+ }
+ }
+ } else {
+ $exception = true;
+ }
+} else { // Move messages
+ if ( $num_ids > 0 ) {
+ if ( $is_dmn && $num_ids == 1 ) {
+ sqimap_msgs_list_move($imapConnection,$id[0],$targetMailbox);
+ $num_ids = sqimap_mailbox_expunge_dmn($imapConnection,$aMailbox, $id[0]);
+ } else {
+ sqimap_msgs_list_move($imapConnection,$id,$targetMailbox);
+ if ($auto_expunge) {
+ $num_ids = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
+ }
+ }
+ $change = true;
+ } else {
+ $exception = true;
+ }
+}
+if($change) { // Change the startMessage number if the mailbox was changed
+ if (($startMessage+$num_ids-1) >= $mbx_response['EXISTS']) {
+ if ($startMessage > $show_num) {
+ $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
+ } else {
+ $location = set_url_var($location,'startMessage',1,false);
+ }
+ }
+}
+// Log out this session
+sqimap_logout($imapConnection);
+if ($exception) {
+ displayPageHeader($color, $mailbox);
+ error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
+} else {
+ header("Location: $location");
+ exit;
+}
+
+function handleMessageListForm($imapConnection,&$aMailbox) {
+ /* incoming formdata */
+ sqgetGlobalVar('moveButton', $moveButton, SQ_POST);
+ sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
+ sqgetGlobalVar('targetMailbox', $targetMailbox, SQ_POST);
+ sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
+ sqgetGlobalVar('undeleteButton', $undeleteButton, SQ_POST);
+ sqgetGlobalVar('markRead', $markRead, SQ_POST);
+ sqgetGlobalVar('markUnread', $markUnread, SQ_POST);
+ sqgetGlobalVar('markFlagged', $markFlagged, SQ_POST);
+ sqgetGlobalVar('markUnflagged', $markUnflagged, SQ_POST);
+ sqgetGlobalVar('attache', $attache, SQ_POST);
+ sqgetGlobalVar('location', $location, SQ_POST);
+ sqgetGlobalVar('bypass_trash', $bypass_trash, SQ_POST);
+ sqgetGlobalVar('msg', $msg, SQ_POST);
+
+ $sError = '';
+ /* retrieve the check boxes */
+ $aUid = array();
+ if (isset($msg) && is_array($msg)) {
+ foreach( $msg as $key=>$iUid ) {
+ // using foreach removes the risk of infinite loops that was there //
+ $aUid[] = $iUid;
+ }
+ }
+ $num_ids = count($id);
+
+ if (count($num_ids) && !isset($expungeButton)) {
+ /* handle submit buttons */
+ $sButton = '';
+ $sButton = (isset($expungeButton)) ? 'expunge' : $sButton;
+ $sButton = (isset($attache)) ? 'attache' : $sButton;
+ $sButton = (isset($moveButton)) ? 'move' : $sButton;
+ $sButton = (isset($copyButton)) ? 'copy' : $sButton;
+ $sButton = (isset($markDelete)) ? 'setDeleted' : $sButton;
+ $sButton = (isset($markUndelete)) ? 'unsetDeleted' : $sButton;
+ $sButton = (isset($markSeen)) ? 'setSeen' : $sButton;
+ $sButton = (isset($markUnseen)) ? 'unsetSeen' : $sButton;
+ $sButton = (isset($markFlagged)) ? 'setFlagged' : $sButton;
+ $sButton = (isset($markUnflagged)) ? 'unsetFlagged' : $sButton;
+
+ $aUpdatedMsgs = false;
+ $bExpunge = false;
+ switch ($sButton) {
+ case 'setDeleted':
+ // What kind of hook is this, can it be removed?
+ if (!boolean_hook_function('move_messages_button_action', NULL, 1)) {
+ $aUpdatedMsgs = sqimap_msgs_list_delete($imapConnection, $mailbox, $aUid,$bypass_trash);
+ $bExpunge = true;
+ }
+ break;
+ case 'unsetDeleted':
+ case 'setSeen':
+ case 'unsetSeen':
+ case 'setFlagged':
+ case 'unsetFlagged':
+ // get flag
+ $sFlag = (substr($sButton,0,3) == 'set') ? '\\'.substr($sButton,3) : '\\'.substr($sButton,5);
+ $bSet = (substr($sButton,0,3) == 'set') ? true : false;
+ $aUpdatedMsgs = sqimap_toggle_flag($imapConnection, $aUid, $sFlag, $bSet, true);
+ break;
+ case 'move':
+ $aUpdatedMsgs = sqimap_msgs_list_move($imapConnection,$aId,$targetMailbox);
+ $bExpunge = true;
+ break;
+ case 'attache':
+ $composesession = attachSelectedMessages($id, $imapConnection);
+ // dirty hack, add info to $aMailbox
+ $aMailbox['FORWARD_SESSION'] = $composesession;
+ break;
+ }
+
+ if ($aUpdatedMsgs) {
+ foreach ($aUpdatedMsgs as $iUid => $aMsg) {
+ if (isset($aMsg['FLAGS'])) {
+ $aMailbox['MSG_HEADERS'][$iUid]['FLAGS'] = $aMsg['FLAGS'];
+ }
}
- $i++;
- }
- if ($auto_expunge) {
- sqimap_mailbox_expunge($imapConnection, $mailbox);
- }
- $location = get_location();
- if ($where && $what)
- header ("Location: $location/search.php?mailbox=".urlencode($mailbox)."&what=".urlencode($what)."&where=".urlencode($where));
- else
- header ("Location: $location/right_main.php?sort=$sort&startMessage=$startMessage&mailbox=". urlencode($mailbox));
- } else {
- displayPageHeader($color, $mailbox);
- error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
- }
- } else { // Move messages
- // lets check to see if they selected any messages
- if (is_array($msg) == 1) {
- $j = 0;
- $i = 0;
-
- // If they have selected nothing msg is size one still, but will be an infinite
- // loop because we never increment j. so check to see if msg[0] is set or not to fix this.
- while ($j < count($msg)) {
- if ($msg[$i]) {
- /** check if they would like to move it to the trash folder or not */
- sqimap_messages_copy($imapConnection, $msg[$i], $msg[$i], $targetMailbox);
- sqimap_messages_flag($imapConnection, $msg[$i], $msg[$i], "Deleted");
- $j++;
+ if ($bExpunge && $aMailbox['AUTO_EXPUNGE'] &&
+ $iExpungedMessages = sqimap_mailbox_expunge($imapConnection, $aMailbox['NAME'], true))
+ {
+ if (count($aUpdateMsgs != $iExpungedMessages)) {
+ // there are more messages deleted permanently then we expected
+ // invalidate the cache
+ $aMailbox['UIDSET'] = false;
+ $aMailbox['MSG_HEADERS'] = false;
+ } else {
+ // remove expunged messages from cache
+ $aUidSet = $aMailbox['UIDSET'];
+ $aDeleted = array();
+ foreach ($aUpdatedMsgs as $iUid => $aValue) {
+ if (isset($aValue['FLAGS']['\\deleted']) && $aValue['FLAGS']['\\deleted']) {
+ $aDeleted[] = $iUid;
+ }
+ }
+ if (count($aDeleted)) {
+ // create a UID => array index temp array
+ $aUidSetDummy = array_flip($aUidSet);
+ foreach ($aDeleted as $iUid) {
+ unset($aUidSetDummy[$iUid]);
+ }
+ $aUidSet = array_keys($aUidSetDummy);
+ $aMailbox['UIDSET'] = $aUidSet;
+ // update EXISTS info
+ $aMailbox['EXISTS'] -= $iExpungedMessages;
+ }
+ }
+ // Change the startMessage number if the mailbox was changed
+ if (($aMailbox['PAGEOFFSET']+$iExpungedMessages-1) >= $aMailbox['EXISTS']) {
+ $aMailbox['PAGEOFFSET'] = ($aMailbox['PAGEOFFSET'] > $aMailbox['LIMIT']) ?
+ $aMailbox['PAGEOFFSET'] - $aMailbox['LIMIT'] : 1;
+ }
}
- $i++;
- }
- if ($auto_expunge == true)
- sqimap_mailbox_expunge($imapConnection, $mailbox);
-
- $location = get_location();
- if ($where && $what)
- header ("Location: $location/search.php?mailbox=".urlencode($mailbox)."&what=".urlencode($what)."&where=".urlencode($where));
- else
- header ("Location: $location/right_main.php?sort=$sort&startMessage=$startMessage&mailbox=". urlencode($mailbox));
- } else {
- displayPageHeader($color, $mailbox);
- error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
- }
- }
-
- // Log out this session
- sqimap_logout($imapConnection);
+ }
+ } else {
+ if (isset($expungeButton)) {
+ // on expunge we do not know which messages will be deleted
+ // so it's useless to try to sync the cache
+ // Close the mailbox so we do not need to parse the untagged expunge responses
+ sqimap_run_command($imapConnection,'CLOSE',false,$result,$message);
+ $aMbxResponse = sqimap_select($imapConnection,$aMailbox['NAME'];
+ // update the $aMailbox array
+ $aMailbox['EXISTS'] = $aMbxResponse['EXISTS'];
+ $aMailbox['UIDSET'] = false;
+ } else {
+ $sError = _("No messages were selected.");
+ }
+ }
+}
?>
</BODY></HTML>
projects / squirrelmail.git / blobdiff