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