translator moved to other address
[squirrelmail.git] / src / move_messages.php
CommitLineData
59177427 1<?php
895905c0 2
35586184 3/**
4 * move_messages.php
5 *
82d304a0 6 * Copyright (c) 1999-2004 The SquirrelMail Project Team
35586184 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 *
30967a1e 11 * @version $Id$
8f6f9ba5 12 * @package squirrelmail
35586184 13 */
ef870322 14
30967a1e 15/**
16 * Path for SquirrelMail required files.
17 * @ignore
18 */
86725763 19define('SM_PATH','../');
20
21/* SquirrelMail required files. */
08185f2a 22require_once(SM_PATH . 'include/validate.php');
8650e9e1 23require_once(SM_PATH . 'functions/global.php');
86725763 24require_once(SM_PATH . 'functions/display_messages.php');
25require_once(SM_PATH . 'functions/imap.php');
26require_once(SM_PATH . 'functions/html.php');
27
acc28bac 28global $compose_new_win;
29
1e12d1ff 30if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
2cb178e3 31 $composesession = 0;
1e12d1ff 32}
33
acc28bac 34function attachSelectedMessages($msg, $imapConnection) {
133b9a0e 35 global $username, $attachment_dir, $startMessage,
6201339c 36 $data_dir, $composesession,
2cb178e3 37 $msgs, $show_num, $compose_messages;
a2a30ee7 38
a2a30ee7 39 if (!isset($compose_messages)) {
11fd4a7b 40 $compose_messages = array();
2cb178e3 41 sqsession_register($compose_messages,'compose_messages');
acc28bac 42 }
43
07abb0f3 44 if (!$composesession) {
11fd4a7b 45 $composesession = 1;
2cb178e3 46 sqsession_register($composesession,'composesession');
acc28bac 47 } else {
11fd4a7b 48 $composesession++;
49 sqsession_register($composesession,'composesession');
acc28bac 50 }
51
21f3c131 52 $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
a2a30ee7 53
54 $composeMessage = new Message();
55 $rfc822_header = new Rfc822Header();
56 $composeMessage->rfc822_header = $rfc822_header;
57 $composeMessage->reply_rfc822_header = '';
58
2cb178e3 59 foreach($msg as $id) {
6201339c 60 $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822", true, $response, $readmessage, TRUE);
11fd4a7b 61
2cb178e3 62 if ($response == 'OK') {
2cb178e3 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;
a2388eb7 69 }
2cb178e3 70 }
a2388eb7 71
2cb178e3 72 array_shift($body_a);
c2517a3b 73 array_pop($body_a);
2cb178e3 74 $body = implode('', $body_a);
75 $body .= "\r\n";
a2388eb7 76
2cb178e3 77 $localfilename = GenerateRandomString(32, 'FILE', 7);
78 $full_localfilename = "$hashed_attachment_dir/$localfilename";
a2388eb7 79
2cb178e3 80 $fp = fopen( $full_localfilename, 'wb');
81 fwrite ($fp, $body);
82 fclose($fp);
745fca27 83 $composeMessage->initAttachment('message/rfc822',$subject.'.msg',
2cb178e3 84 $full_localfilename);
a2388eb7 85 }
acc28bac 86 }
2cb178e3 87
a2a30ee7 88 $compose_messages[$composesession] = $composeMessage;
87d5f199 89 sqsession_register($compose_messages,'compose_messages');
90 session_write_close();
acc28bac 91 return $composesession;
92}
93
9c22eb94 94
9837b0a5 95
96/* get globals */
1e12d1ff 97sqgetGlobalVar('key', $key, SQ_COOKIE);
98sqgetGlobalVar('username', $username, SQ_SESSION);
99sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION);
100sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
101sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
102
103sqgetGlobalVar('mailbox', $mailbox);
104sqgetGlobalVar('startMessage', $startMessage);
105sqgetGlobalVar('msg', $msg);
106
107sqgetGlobalVar('msgs', $msgs, SQ_SESSION);
108sqgetGlobalVar('composesession', $composesession, SQ_SESSION);
109sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
110
111sqgetGlobalVar('moveButton', $moveButton, SQ_POST);
112sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
113sqgetGlobalVar('targetMailbox', $targetMailbox, SQ_POST);
114sqgetGlobalVar('expungeButton', $expungeButton, SQ_POST);
115sqgetGlobalVar('undeleteButton', $undeleteButton, SQ_POST);
116sqgetGlobalVar('markRead', $markRead, SQ_POST);
117sqgetGlobalVar('markUnread', $markUnread, SQ_POST);
057dbe18 118sqgetGlobalVar('markFlagged', $markFlagged, SQ_POST);
119sqgetGlobalVar('markUnflagged', $markUnflagged, SQ_POST);
1e12d1ff 120sqgetGlobalVar('attache', $attache, SQ_POST);
121sqgetGlobalVar('location', $location, SQ_POST);
6c540963 122sqgetGlobalVar('bypass_trash', $bypass_trash, SQ_POST);
11026a30 123sqgetGlobalVar('dmn', $is_dmn, SQ_POST);
9837b0a5 124
9837b0a5 125/* end of get globals */
126
65c3ec94 127$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
9c22eb94 128$mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
65c3ec94 129
87d5f199 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);
8c33aaf7 133
cd885078 134/* remember changes to mailbox setting */
135if (!isset($lastTargetMailbox)) {
136 $lastTargetMailbox = 'INBOX';
137}
138if ($targetMailbox != $lastTargetMailbox) {
139 $lastTargetMailbox = $targetMailbox;
9837b0a5 140 sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
cd885078 141}
87d5f199 142$exception = false;
00f9181e 143
144do_hook('move_before_move');
145
11fd4a7b 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();
152if (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
65c3ec94 159// expunge-on-demand if user isn't using move_to_trash or auto_expunge
160if(isset($expungeButton)) {
9c22eb94 161 $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
162 if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
163 if ($startMessage > $show_num) {
11fd4a7b 164 $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
165 } else {
166 $location = set_url_var($location,'startMessage',1,false);
167 }
9c22eb94 168 }
65c3ec94 169} elseif(isset($undeleteButton)) {
170 // undelete messages if user isn't using move_to_trash or auto_expunge
11fd4a7b 171 // Removes \Deleted flag from selected messages
172 if (count($id)) {
173 sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
65c3ec94 174 } else {
11fd4a7b 175 $exception = true;
65c3ec94 176 }
177} elseif (!isset($moveButton)) {
11fd4a7b 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);
fd181f53 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);
11fd4a7b 189 } else {
fd181f53 190 if (!boolean_hook_function('move_messages_button_action', NULL, 1)) {
6c540963 191 sqimap_msgs_list_delete($imapConnection, $mailbox, $id,$bypass_trash);
d3714d3a 192 if ($auto_expunge) {
193 $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
194 }
11fd4a7b 195 }
2d7d3c2a 196 }
ce2c797b 197 }
8c33aaf7 198 if (isset($attache)) {
11fd4a7b 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 }
65c3ec94 216 } else {
11fd4a7b 217 $exception = true;
65c3ec94 218 }
219} else { // Move messages
11fd4a7b 220
11026a30 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]);
11fd4a7b 226 } else {
11026a30 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 }
11fd4a7b 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 }
65c3ec94 242 } else {
11fd4a7b 243 $exception = true;
65c3ec94 244 }
245}
65c3ec94 246// Log out this session
247sqimap_logout($imapConnection);
87d5f199 248if ($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}
dcc1cc82 255?>
256</BODY></HTML>