| 1 | <?php |
| 2 | |
| 3 | /** |
| 4 | * move_messages.php |
| 5 | * |
| 6 | * Copyright (c) 1999-2004 The SquirrelMail Project Team |
| 7 | * Licensed under the GNU GPL. For full terms see the file COPYING. |
| 8 | * |
| 9 | * Enables message moving between folders on the IMAP server. |
| 10 | * |
| 11 | * @version $Id$ |
| 12 | * @package squirrelmail |
| 13 | */ |
| 14 | |
| 15 | /** |
| 16 | * Path for SquirrelMail required files. |
| 17 | * @ignore |
| 18 | */ |
| 19 | define('SM_PATH','../'); |
| 20 | |
| 21 | /* SquirrelMail required files. */ |
| 22 | require_once(SM_PATH . 'include/validate.php'); |
| 23 | require_once(SM_PATH . 'functions/global.php'); |
| 24 | require_once(SM_PATH . 'functions/display_messages.php'); |
| 25 | require_once(SM_PATH . 'functions/imap.php'); |
| 26 | require_once(SM_PATH . 'functions/html.php'); |
| 27 | |
| 28 | global $compose_new_win; |
| 29 | |
| 30 | if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) { |
| 31 | $composesession = 0; |
| 32 | } |
| 33 | |
| 34 | function attachSelectedMessages($msg, $imapConnection) { |
| 35 | global $username, $attachment_dir, $startMessage, |
| 36 | $data_dir, $composesession, |
| 37 | $msgs, $show_num, $compose_messages; |
| 38 | |
| 39 | if (!isset($compose_messages)) { |
| 40 | $compose_messages = array(); |
| 41 | sqsession_register($compose_messages,'compose_messages'); |
| 42 | } |
| 43 | |
| 44 | if (!$composesession) { |
| 45 | $composesession = 1; |
| 46 | sqsession_register($composesession,'composesession'); |
| 47 | } else { |
| 48 | $composesession++; |
| 49 | sqsession_register($composesession,'composesession'); |
| 50 | } |
| 51 | |
| 52 | $hashed_attachment_dir = getHashedDir($username, $attachment_dir); |
| 53 | |
| 54 | $composeMessage = new Message(); |
| 55 | $rfc822_header = new Rfc822Header(); |
| 56 | $composeMessage->rfc822_header = $rfc822_header; |
| 57 | $composeMessage->reply_rfc822_header = ''; |
| 58 | |
| 59 | foreach($msg as $id) { |
| 60 | $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822", true, $response, $readmessage, TRUE); |
| 61 | |
| 62 | if ($response == 'OK') { |
| 63 | // fetch the subject for the message with $id from msgs. |
| 64 | // is there a more efficient way to do this? |
| 65 | foreach($msgs as $k => $vals) { |
| 66 | if($vals['ID'] == $id) { |
| 67 | $subject = $msgs[$k]['SUBJECT']; |
| 68 | break; |
| 69 | } |
| 70 | } |
| 71 | |
| 72 | array_shift($body_a); |
| 73 | array_pop($body_a); |
| 74 | $body = implode('', $body_a); |
| 75 | $body .= "\r\n"; |
| 76 | |
| 77 | $localfilename = GenerateRandomString(32, 'FILE', 7); |
| 78 | $full_localfilename = "$hashed_attachment_dir/$localfilename"; |
| 79 | |
| 80 | $fp = fopen( $full_localfilename, 'wb'); |
| 81 | fwrite ($fp, $body); |
| 82 | fclose($fp); |
| 83 | $composeMessage->initAttachment('message/rfc822',$subject.'.msg', |
| 84 | $full_localfilename); |
| 85 | } |
| 86 | } |
| 87 | |
| 88 | $compose_messages[$composesession] = $composeMessage; |
| 89 | sqsession_register($compose_messages,'compose_messages'); |
| 90 | session_write_close(); |
| 91 | return $composesession; |
| 92 | } |
| 93 | |
| 94 | |
| 95 | |
| 96 | /* get globals */ |
| 97 | sqgetGlobalVar('key', $key, SQ_COOKIE); |
| 98 | sqgetGlobalVar('username', $username, SQ_SESSION); |
| 99 | sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION); |
| 100 | sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION); |
| 101 | sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION); |
| 102 | |
| 103 | sqgetGlobalVar('mailbox', $mailbox); |
| 104 | sqgetGlobalVar('startMessage', $startMessage); |
| 105 | sqgetGlobalVar('msg', $msg); |
| 106 | |
| 107 | sqgetGlobalVar('msgs', $msgs, SQ_SESSION); |
| 108 | sqgetGlobalVar('composesession', $composesession, SQ_SESSION); |
| 109 | sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION); |
| 110 | |
| 111 | sqgetGlobalVar('moveButton', $moveButton, SQ_POST); |
| 112 | sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST); |
| 113 | sqgetGlobalVar('targetMailbox', $targetMailbox, SQ_POST); |
| 114 | sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST); |
| 115 | sqgetGlobalVar('undeleteButton', $undeleteButton, SQ_POST); |
| 116 | sqgetGlobalVar('markRead', $markRead, SQ_POST); |
| 117 | sqgetGlobalVar('markUnread', $markUnread, SQ_POST); |
| 118 | sqgetGlobalVar('markFlagged', $markFlagged, SQ_POST); |
| 119 | sqgetGlobalVar('markUnflagged', $markUnflagged, SQ_POST); |
| 120 | sqgetGlobalVar('attache', $attache, SQ_POST); |
| 121 | sqgetGlobalVar('location', $location, SQ_POST); |
| 122 | sqgetGlobalVar('bypass_trash', $bypass_trash, SQ_POST); |
| 123 | sqgetGlobalVar('dmn', $is_dmn, SQ_POST); |
| 124 | |
| 125 | /* end of get globals */ |
| 126 | |
| 127 | $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); |
| 128 | $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox); |
| 129 | |
| 130 | $location = set_url_var($location,'composenew',0,false); |
| 131 | $location = set_url_var($location,'composesession',0,false); |
| 132 | $location = set_url_var($location,'session',0,false); |
| 133 | |
| 134 | /* remember changes to mailbox setting */ |
| 135 | if (!isset($lastTargetMailbox)) { |
| 136 | $lastTargetMailbox = 'INBOX'; |
| 137 | } |
| 138 | if ($targetMailbox != $lastTargetMailbox) { |
| 139 | $lastTargetMailbox = $targetMailbox; |
| 140 | sqsession_register($lastTargetMailbox, 'lastTargetMailbox'); |
| 141 | } |
| 142 | $exception = false; |
| 143 | |
| 144 | do_hook('move_before_move'); |
| 145 | |
| 146 | |
| 147 | /* |
| 148 | Move msg list sorting up here, as it is used several times, |
| 149 | makes it more efficient to do it in one place for the code |
| 150 | */ |
| 151 | $id = array(); |
| 152 | if (isset($msg) && is_array($msg)) { |
| 153 | foreach( $msg as $key=>$uid ) { |
| 154 | // using foreach removes the risk of infinite loops that was there // |
| 155 | $id[] = $uid; |
| 156 | } |
| 157 | } |
| 158 | |
| 159 | // expunge-on-demand if user isn't using move_to_trash or auto_expunge |
| 160 | if(isset($expungeButton)) { |
| 161 | $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true); |
| 162 | if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) { |
| 163 | if ($startMessage > $show_num) { |
| 164 | $location = set_url_var($location,'startMessage',$startMessage-$show_num,false); |
| 165 | } else { |
| 166 | $location = set_url_var($location,'startMessage',1,false); |
| 167 | } |
| 168 | } |
| 169 | } elseif(isset($undeleteButton)) { |
| 170 | // undelete messages if user isn't using move_to_trash or auto_expunge |
| 171 | // Removes \Deleted flag from selected messages |
| 172 | if (count($id)) { |
| 173 | sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true); |
| 174 | } else { |
| 175 | $exception = true; |
| 176 | } |
| 177 | } elseif (!isset($moveButton)) { |
| 178 | if (count($id)) { |
| 179 | $cnt = count($id); |
| 180 | if (!isset($attache)) { |
| 181 | if (isset($markRead)) { |
| 182 | sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true); |
| 183 | } else if (isset($markUnread)) { |
| 184 | sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true); |
| 185 | } else if (isset($markFlagged)) { |
| 186 | sqimap_toggle_flag($imapConnection, $id, '\\Flagged', true, true); |
| 187 | } else if (isset($markUnflagged)) { |
| 188 | sqimap_toggle_flag($imapConnection, $id, '\\Flagged', false, true); |
| 189 | } else { |
| 190 | if (!boolean_hook_function('move_messages_button_action', NULL, 1)) { |
| 191 | sqimap_msgs_list_delete($imapConnection, $mailbox, $id,$bypass_trash); |
| 192 | if ($auto_expunge) { |
| 193 | $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true); |
| 194 | } |
| 195 | } |
| 196 | } |
| 197 | } |
| 198 | if (isset($attache)) { |
| 199 | $composesession = attachSelectedMessages($id, $imapConnection); |
| 200 | $location = set_url_var($location, 'session', $composesession, false); |
| 201 | if ($compose_new_win) { |
| 202 | $location = set_url_var($location, 'composenew', 1, false); |
| 203 | } else { |
| 204 | $location = str_replace('search.php','compose.php',$location); |
| 205 | $location = str_replace('right_main.php','compose.php',$location); |
| 206 | } |
| 207 | } else { |
| 208 | if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) { |
| 209 | if ($startMessage > $show_num) { |
| 210 | $location = set_url_var($location,'startMessage',$startMessage-$show_num, false); |
| 211 | } else { |
| 212 | $location = set_url_var($location,'startMessage',1, false); |
| 213 | } |
| 214 | } |
| 215 | } |
| 216 | } else { |
| 217 | $exception = true; |
| 218 | } |
| 219 | } else { // Move messages |
| 220 | |
| 221 | $num_ids = count($id); |
| 222 | if ( $num_ids > 0 ) { |
| 223 | if ( $is_dmn && count($id) == 1 ) { |
| 224 | sqimap_msgs_list_move($imapConnection,$id[0],$targetMailbox); |
| 225 | $cnt = sqimap_mailbox_expunge_dmn($id[0]); |
| 226 | } else { |
| 227 | sqimap_msgs_list_move($imapConnection,$id,$targetMailbox); |
| 228 | if ($auto_expunge) { |
| 229 | $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true); |
| 230 | } else { |
| 231 | $cnt = 0; |
| 232 | } |
| 233 | } |
| 234 | |
| 235 | if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) { |
| 236 | if ($startMessage > $show_num) { |
| 237 | $location = set_url_var($location,'startMessage',$startMessage-$show_num, false); |
| 238 | } else { |
| 239 | $location = set_url_var($location,'startMessage',1, false); |
| 240 | } |
| 241 | } |
| 242 | } else { |
| 243 | $exception = true; |
| 244 | } |
| 245 | } |
| 246 | // Log out this session |
| 247 | sqimap_logout($imapConnection); |
| 248 | if ($exception) { |
| 249 | displayPageHeader($color, $mailbox); |
| 250 | error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color); |
| 251 | } else { |
| 252 | header("Location: $location"); |
| 253 | exit; |
| 254 | } |
| 255 | ?> |
| 256 | </BODY></HTML> |