59177427 |
1 | <?php |
895905c0 |
2 | |
35586184 |
3 | /** |
4 | * read_body.php |
5 | * |
76911253 |
6 | * Copyright (c) 1999-2003 The SquirrelMail Project Team |
35586184 |
7 | * Licensed under the GNU GPL. For full terms see the file COPYING. |
8 | * |
9 | * This file is used for reading the msgs array and displaying |
10 | * the resulting emails in the right frame. |
11 | * |
12 | * $Id$ |
8f6f9ba5 |
13 | * @package squirrelmail |
a07cd1a4 |
14 | */ |
35586184 |
15 | |
8f6f9ba5 |
16 | /** Path for SquirrelMail required files. */ |
86725763 |
17 | define('SM_PATH','../'); |
18 | |
19 | /* SquirrelMail required files. */ |
08185f2a |
20 | require_once(SM_PATH . 'include/validate.php'); |
8650e9e1 |
21 | require_once(SM_PATH . 'functions/global.php'); |
86725763 |
22 | require_once(SM_PATH . 'functions/imap.php'); |
23 | require_once(SM_PATH . 'functions/mime.php'); |
24 | require_once(SM_PATH . 'functions/date.php'); |
25 | require_once(SM_PATH . 'functions/url_parser.php'); |
26 | require_once(SM_PATH . 'functions/html.php'); |
e95c04ec |
27 | require_once(SM_PATH . 'functions/global.php'); |
6d021521 |
28 | require_once(SM_PATH . 'functions/identity.php'); |
d6b6d221 |
29 | require_once(SM_PATH . 'functions/mailbox_display.php'); |
38c944cc |
30 | |
a07cd1a4 |
31 | /** |
1fca12b5 |
32 | * Given an IMAP message id number, this will look it up in the cached |
33 | * and sorted msgs array and return the index. Used for finding the next |
34 | * and previous messages. |
35 | * |
36 | * @return the index of the next valid message from the array |
37 | */ |
c615b1da |
38 | function findNextMessage($passed_id) { |
39 | global $msort, $msgs, $sort, |
cf710efe |
40 | $thread_sort_messages, $allow_server_sort, |
60a3e687 |
41 | $server_sort_array; |
2728fa19 |
42 | if (!is_array($server_sort_array)) { |
43 | $thread_sort_messages = 0; |
794d59c0 |
44 | $allow_server_sort = FALSE; |
2728fa19 |
45 | } |
a07cd1a4 |
46 | $result = -1; |
c615b1da |
47 | if ($thread_sort_messages || $allow_server_sort) { |
d9c1dccc |
48 | $count = count($server_sort_array) - 1; |
49 | foreach($server_sort_array as $key=>$value) { |
c615b1da |
50 | if ($passed_id == $value) { |
d9c1dccc |
51 | if ($key == $count) { |
60a3e687 |
52 | break; |
53 | } |
1fca12b5 |
54 | $result = $server_sort_array[$key + 1]; |
60a3e687 |
55 | break; |
789b4d79 |
56 | } |
60a3e687 |
57 | } |
d9c1dccc |
58 | } else { |
7e818af0 |
59 | if (is_array($msort)) { |
60 | for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) { |
61 | if ($passed_id == $msgs[$key]['ID']) { |
62 | next($msort); |
63 | $key = key($msort); |
64 | if (isset($key)){ |
65 | $result = $msgs[$key]['ID']; |
66 | break; |
d9c1dccc |
67 | } |
1fca12b5 |
68 | } |
10f0ce72 |
69 | } |
70 | } |
10f0ce72 |
71 | } |
d9c1dccc |
72 | return $result; |
a07cd1a4 |
73 | } |
74 | |
a07cd1a4 |
75 | /** returns the index of the previous message from the array. */ |
c615b1da |
76 | function findPreviousMessage($numMessages, $passed_id) { |
77 | global $msort, $sort, $msgs, |
78 | $thread_sort_messages, |
60a3e687 |
79 | $allow_server_sort, $server_sort_array; |
a07cd1a4 |
80 | $result = -1; |
2728fa19 |
81 | if (!is_array($server_sort_array)) { |
82 | $thread_sort_messages = 0; |
794d59c0 |
83 | $allow_server_sort = FALSE; |
2728fa19 |
84 | } |
c615b1da |
85 | if ($thread_sort_messages || $allow_server_sort ) { |
d9c1dccc |
86 | foreach($server_sort_array as $key=>$value) { |
c615b1da |
87 | if ($passed_id == $value) { |
60a3e687 |
88 | if ($key == 0) { |
60a3e687 |
89 | break; |
90 | } |
d9c1dccc |
91 | $result = $server_sort_array[$key - 1]; |
60a3e687 |
92 | break; |
789b4d79 |
93 | } |
60a3e687 |
94 | } |
d9c1dccc |
95 | } else { |
7e818af0 |
96 | if (is_array($msort)) { |
97 | for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) { |
98 | if ($passed_id == $msgs[$key]['ID']) { |
99 | prev($msort); |
100 | $key = key($msort); |
101 | if (isset($key)) { |
102 | $result = $msgs[$key]['ID']; |
103 | break; |
d9c1dccc |
104 | } |
10f0ce72 |
105 | } |
106 | } |
10f0ce72 |
107 | } |
a07cd1a4 |
108 | } |
d9c1dccc |
109 | return $result; |
a07cd1a4 |
110 | } |
10f0ce72 |
111 | |
a07cd1a4 |
112 | /** |
1fca12b5 |
113 | * Displays a link to a page where the message is displayed more |
114 | * "printer friendly". |
115 | */ |
c615b1da |
116 | function printer_friendly_link($mailbox, $passed_id, $passed_ent_id, $color) { |
117 | global $javascript_on; |
a07cd1a4 |
118 | |
c615b1da |
119 | $params = '?passed_ent_id=' . $passed_ent_id . |
c2324b26 |
120 | '&mailbox=' . urlencode($mailbox) . |
121 | '&passed_id=' . $passed_id; |
10f0ce72 |
122 | |
a07cd1a4 |
123 | $print_text = _("View Printable Version"); |
10f0ce72 |
124 | |
c615b1da |
125 | $result = ''; |
a07cd1a4 |
126 | /* Output the link. */ |
127 | if ($javascript_on) { |
9f42bfc8 |
128 | $result = '<script language="javascript" type="text/javascript">' . "\n" . |
129 | '<!--' . "\n" . |
130 | " function printFormat() {\n" . |
131 | ' window.open("../src/printer_friendly_main.php' . |
132 | $params . '","Print","width=800,height=600");' . "\n". |
133 | " }\n" . |
134 | "// -->\n" . |
135 | "</script>\n" . |
136 | "<a href=\"javascript:printFormat();\">$print_text</a>\n"; |
a07cd1a4 |
137 | } else { |
c2324b26 |
138 | $result = '<a target="_blank" href="../src/printer_friendly_bottom.php' . |
9f42bfc8 |
139 | "$params\">$print_text</a>\n"; |
a07cd1a4 |
140 | } |
d9c1dccc |
141 | return $result; |
a07cd1a4 |
142 | } |
143 | |
d9c1dccc |
144 | function ServerMDNSupport($read) { |
f69feefe |
145 | /* escaping $ doesn't work -> \x36 */ |
781b93d4 |
146 | $ret = preg_match('/(\x36MDNSent|\\\\\*)/i', $read); |
d9c1dccc |
147 | return $ret; |
57257333 |
148 | } |
149 | |
fc224f68 |
150 | function SendMDN ( $mailbox, $passed_id, $sender, $message, $imapConnection) { |
e95c04ec |
151 | global $username, $attachment_dir, |
fc224f68 |
152 | $version, $attachments, $squirrelmail_language, $default_charset, |
d9c1dccc |
153 | $languages, $useSendmail, $domain, $sent_folder, |
154 | $popuser, $data_dir, $username; |
57257333 |
155 | |
e95c04ec |
156 | sqgetGlobalVar('SERVER_NAME', $SERVER_NAME, SQ_SERVER); |
0b97a708 |
157 | |
38bca81c |
158 | $header = $message->rfc822_header; |
57257333 |
159 | $hashed_attachment_dir = getHashedDir($username, $attachment_dir); |
160 | |
fc224f68 |
161 | $rfc822_header = new Rfc822Header(); |
d9c1dccc |
162 | $content_type = new ContentType('multipart/report'); |
fc224f68 |
163 | $content_type->properties['report-type']='disposition-notification'; |
d9c1dccc |
164 | |
fc224f68 |
165 | set_my_charset(); |
166 | if ($default_charset) { |
d9c1dccc |
167 | $content_type->properties['charset']=$default_charset; |
fc224f68 |
168 | } |
169 | $rfc822_header->content_type = $content_type; |
170 | $rfc822_header->to[] = $header->dnt; |
a20855e4 |
171 | $rfc822_header->subject = _("Read:") . ' ' . encodeHeader($header->subject); |
fc224f68 |
172 | |
27a1d10a |
173 | // Patch #793504 Return Receipt Failing with <@> from Tim Craig (burny_md) |
174 | // This merely comes from compose.php and only happens when there is no |
175 | // email_addr specified in user's identity (which is the startup config) |
176 | if (ereg("^([^@%/]+)[@%/](.+)$", $username, $usernamedata)) { |
177 | $popuser = $usernamedata[1]; |
178 | $domain = $usernamedata[2]; |
179 | unset($usernamedata); |
180 | } else { |
181 | $popuser = $username; |
182 | } |
fc224f68 |
183 | |
184 | $reply_to = ''; |
6d021521 |
185 | $ident = get_identities(); |
186 | if(!isset($identity)) $identity = 0; |
187 | $full_name = $ident[$identity]['full_name']; |
188 | $from_mail = $ident[$identity]['email_address']; |
189 | $from_addr = '"'.$full_name.'" <'.$from_mail.'>'; |
190 | $reply_to = $ident[$identity]['reply_to']; |
191 | |
27a1d10a |
192 | if (!$from_mail) { |
193 | $from_mail = "$popuser@$domain"; |
194 | $from_addr = $from_mail; |
fc224f68 |
195 | } |
196 | $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true); |
197 | if ($reply_to) { |
198 | $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true); |
199 | } |
d9c1dccc |
200 | |
57257333 |
201 | // part 1 (RFC2298) |
57257333 |
202 | $senton = getLongDateString( $header->date ); |
203 | $to_array = $header->to; |
204 | $to = ''; |
205 | foreach ($to_array as $line) { |
af568a82 |
206 | $to .= ' '.$line->getAddress(); |
57257333 |
207 | } |
57257333 |
208 | $now = getLongDateString( time() ); |
78db1583 |
209 | set_my_charset(); |
46bb8da8 |
210 | $body = _("Your message") . "\r\n\r\n" . |
d39b7293 |
211 | "\t" . _("To:") . ' ' . decodeHeader($to,false,false) . "\r\n" . |
212 | "\t" . _("Subject:") . ' ' . decodeHeader($header->subject,false,false) . "\r\n" . |
46bb8da8 |
213 | "\t" . _("Sent:") . ' ' . $senton . "\r\n" . |
214 | "\r\n" . |
215 | sprintf( _("Was displayed on %s"), $now ); |
f69feefe |
216 | |
fc224f68 |
217 | $special_encoding = ''; |
218 | if (isset($languages[$squirrelmail_language]['XTRA_CODE']) && |
219 | function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) { |
6fbd125b |
220 | $body = $languages[$squirrelmail_language]['XTRA_CODE']('encode', $body); |
d9c1dccc |
221 | if (strtolower($default_charset) == 'iso-2022-jp') { |
222 | if (mb_detect_encoding($body) == 'ASCII') { |
223 | $special_encoding = '8bit'; |
224 | } else { |
225 | $body = mb_convert_encoding($body, 'JIS'); |
226 | $special_encoding = '7bit'; |
227 | } |
228 | } |
6fbd125b |
229 | } |
fc224f68 |
230 | $part1 = new Message(); |
231 | $part1->setBody($body); |
232 | $mime_header = new MessageHeader; |
233 | $mime_header->type0 = 'text'; |
234 | $mime_header->type1 = 'plain'; |
235 | if ($special_encoding) { |
236 | $mime_header->encoding = $special_encoding; |
d9c1dccc |
237 | } else { |
fc224f68 |
238 | $mime_header->encoding = 'us-ascii'; |
239 | } |
240 | if ($default_charset) { |
241 | $mime_header->parameters['charset'] = $default_charset; |
242 | } |
243 | $part1->mime_header = $mime_header; |
244 | |
57257333 |
245 | // part2 (RFC2298) |
d9c1dccc |
246 | $original_recipient = $to; |
57257333 |
247 | $original_message_id = $header->message_id; |
248 | |
fc224f68 |
249 | $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n"; |
57257333 |
250 | if ($original_recipient != '') { |
fc224f68 |
251 | $report .= "Original-Recipient : $original_recipient\r\n"; |
57257333 |
252 | } |
253 | $final_recipient = $sender; |
fc224f68 |
254 | $report .= "Final-Recipient: rfc822; $final_recipient\r\n" . |
57257333 |
255 | "Original-Message-ID : $original_message_id\r\n" . |
256 | "Disposition: manual-action/MDN-sent-manually; displayed\r\n"; |
257 | |
fc224f68 |
258 | $part2 = new Message(); |
259 | $part2->setBody($report); |
260 | $mime_header = new MessageHeader; |
261 | $mime_header->type0 = 'message'; |
262 | $mime_header->type1 = 'disposition-notification'; |
263 | $mime_header->encoding = 'us-ascii'; |
264 | $part2->mime_header = $mime_header; |
265 | |
266 | $composeMessage = new Message(); |
267 | $composeMessage->rfc822_header = $rfc822_header; |
268 | $composeMessage->addEntity($part1); |
269 | $composeMessage->addEntity($part2); |
270 | |
271 | |
d9c1dccc |
272 | if ($useSendmail) { |
273 | require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php'); |
274 | global $sendmail_path; |
275 | $deliver = new Deliver_SendMail(); |
276 | $stream = $deliver->initStream($composeMessage,$sendmail_path); |
fc224f68 |
277 | } else { |
d9c1dccc |
278 | require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php'); |
279 | $deliver = new Deliver_SMTP(); |
47a29326 |
280 | global $smtpServerAddress, $smtpPort, $smtp_auth_mech, $pop_before_smtp; |
a20855e4 |
281 | if ($smtp_auth_mech == 'none') { |
282 | $user = ''; |
283 | $pass = ''; |
284 | } else { |
d9c1dccc |
285 | global $key, $onetimepad; |
286 | $user = $username; |
287 | $pass = OneTimePadDecrypt($key, $onetimepad); |
d9c1dccc |
288 | } |
289 | $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false; |
290 | $stream = $deliver->initStream($composeMessage,$domain,0, |
70ce2218 |
291 | $smtpServerAddress, $smtpPort, $user, $pass, $authPop); |
d9c1dccc |
292 | } |
293 | $success = false; |
fc224f68 |
294 | if ($stream) { |
d9c1dccc |
295 | $length = $deliver->mail($composeMessage, $stream); |
296 | $success = $deliver->finalizeStream($stream); |
fc224f68 |
297 | } |
d9c1dccc |
298 | if (!$success) { |
00ac2f42 |
299 | $msg = $deliver->dlv_msg . '<br>' . |
300 | _("Server replied: ") . $deliver->dlv_ret_nr . ' '. |
301 | $deliver->dlv_server_msg; |
d9c1dccc |
302 | require_once(SM_PATH . 'functions/display_messages.php'); |
fc224f68 |
303 | plain_error_message($msg, $color); |
304 | } else { |
305 | unset ($deliver); |
d9c1dccc |
306 | if (sqimap_mailbox_exists ($imapConnection, $sent_folder)) { |
307 | sqimap_append ($imapConnection, $sent_folder, $length); |
308 | require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); |
309 | $imap_deliver = new Deliver_IMAP(); |
310 | $imap_deliver->mail($composeMessage, $imapConnection); |
311 | sqimap_append_done ($imapConnection); |
312 | unset ($imap_deliver); |
313 | } |
314 | } |
315 | return $success; |
57257333 |
316 | } |
317 | |
d9c1dccc |
318 | function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id, $uid_support) { |
319 | $sg = $set?'+':'-'; |
320 | $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)'; |
0892e427 |
321 | $read = sqimap_run_command ($imapConnection, $cmd, true, $response, |
507d14ea |
322 | $readmessage, $uid_support); |
57257333 |
323 | } |
324 | |
325 | function ClearAttachments() { |
d9c1dccc |
326 | global $username, $attachments, $attachment_dir; |
327 | |
328 | $hashed_attachment_dir = getHashedDir($username, $attachment_dir); |
329 | |
330 | $rem_attachments = array(); |
6191bcb1 |
331 | if (isset($attachments)) { |
332 | foreach ($attachments as $info) { |
333 | if ($info['session'] == -1) { |
334 | $attached_file = "$hashed_attachment_dir/$info[localfilename]"; |
335 | if (file_exists($attached_file)) { |
336 | unlink($attached_file); |
337 | } |
338 | } else { |
339 | $rem_attachments[] = $info; |
340 | } |
341 | } |
d9c1dccc |
342 | } |
343 | $attachments = $rem_attachments; |
57257333 |
344 | } |
345 | |
4d0cd98b |
346 | function formatRecipientString($recipients, $item ) { |
d9c1dccc |
347 | global $show_more_cc, $show_more, $show_more_bcc, |
348 | $PHP_SELF; |
4d0cd98b |
349 | |
d9c1dccc |
350 | $string = ''; |
38c944cc |
351 | if ((is_array($recipients)) && (isset($recipients[0]))) { |
d9c1dccc |
352 | $show = false; |
38c944cc |
353 | |
354 | if ($item == 'to') { |
d9c1dccc |
355 | if ($show_more) { |
356 | $show = true; |
357 | $url = set_url_var($PHP_SELF, 'show_more',0); |
358 | } else { |
359 | $url = set_url_var($PHP_SELF, 'show_more',1); |
360 | } |
361 | } else if ($item == 'cc') { |
362 | if ($show_more_cc) { |
363 | $show = true; |
364 | $url = set_url_var($PHP_SELF, 'show_more_cc',0); |
365 | } else { |
366 | $url = set_url_var($PHP_SELF, 'show_more_cc',1); |
367 | } |
368 | } else if ($item == 'bcc') { |
369 | if ($show_more_bcc) { |
370 | $show = true; |
371 | $url = set_url_var($PHP_SELF, 'show_more_bcc',0); |
372 | } else { |
373 | $url = set_url_var($PHP_SELF, 'show_more_bcc',1); |
374 | } |
375 | } |
376 | |
377 | $cnt = count($recipients); |
378 | foreach($recipients as $r) { |
a91189d6 |
379 | $add = decodeHeader($r->getAddress(true)); |
d9c1dccc |
380 | if ($string) { |
381 | $string .= '<BR>' . $add; |
382 | } else { |
383 | $string = $add; |
384 | if ($cnt > 1) { |
38c944cc |
385 | $string .= ' (<A HREF="'.$url; |
d9c1dccc |
386 | if ($show) { |
387 | $string .= '">'._("less").'</A>)'; |
388 | } else { |
389 | $string .= '">'._("more").'</A>)'; |
390 | break; |
391 | } |
392 | } |
393 | } |
1fca12b5 |
394 | } |
4d0cd98b |
395 | } |
c615b1da |
396 | return $string; |
397 | } |
398 | |
af568a82 |
399 | function formatEnvheader($mailbox, $passed_id, $passed_ent_id, $message, |
400 | $color, $FirstTimeSee) { |
a94c1db1 |
401 | global $msn_user_support, $default_use_mdn, $default_use_priority, |
77836429 |
402 | $show_xmailer_default, $mdn_user_support, $PHP_SELF, $javascript_on, |
403 | $squirrelmail_language; |
38bca81c |
404 | |
d9c1dccc |
405 | $header = $message->rfc822_header; |
406 | $env = array(); |
bdb9ce72 |
407 | $env[_("Subject")] = str_replace(" "," ",decodeHeader($header->subject)); |
7893c8a5 |
408 | |
d9c1dccc |
409 | $from_name = $header->getAddr_s('from'); |
d6b6d221 |
410 | if (!$from_name) |
d9c1dccc |
411 | $from_name = $header->getAddr_s('sender'); |
d6b6d221 |
412 | if (!$from_name) |
413 | $env[_("From")] = _("Unknown sender"); |
414 | else |
415 | $env[_("From")] = decodeHeader($from_name); |
d9c1dccc |
416 | $env[_("Date")] = getLongDateString($header->date); |
417 | $env[_("To")] = formatRecipientString($header->to, "to"); |
418 | $env[_("Cc")] = formatRecipientString($header->cc, "cc"); |
419 | $env[_("Bcc")] = formatRecipientString($header->bcc, "bcc"); |
420 | if ($default_use_priority) { |
0e8006dc |
421 | $env[_("Priority")] = htmlspecialchars(getPriorityStr($header->priority)); |
d9c1dccc |
422 | } |
423 | if ($show_xmailer_default) { |
a91189d6 |
424 | $env[_("Mailer")] = decodeHeader($header->xmailer); |
d9c1dccc |
425 | } |
426 | if ($default_use_mdn) { |
427 | if ($mdn_user_support) { |
428 | if ($header->dnt) { |
429 | if ($message->is_mdnsent) { |
509ce88e |
430 | $env[_("Read receipt")] = _("sent"); |
d9c1dccc |
431 | } else { |
432 | $env[_("Read receipt")] = _("requested"); |
8e1d27aa |
433 | if (!(handleAsSent($mailbox) || |
d9c1dccc |
434 | $message->is_deleted || |
435 | $passed_ent_id)) { |
436 | $mdn_url = $PHP_SELF . '&sendreceipt=1'; |
437 | if ($FirstTimeSee && $javascript_on) { |
438 | $script = '<script language="JavaScript" type="text/javascript">' . "\n"; |
439 | $script .= '<!--'. "\n"; |
440 | $script .= 'if(window.confirm("' . |
441 | _("The message sender has requested a response to indicate that you have read this message. Would you like to send a receipt?") . |
442 | '")) { '."\n" . |
443 | ' sendMDN()'. |
444 | '}' . "\n"; |
445 | $script .= '// -->'. "\n"; |
446 | $script .= '</script>'. "\n"; |
447 | echo $script; |
448 | } |
449 | $env[_("Read receipt")] .= ' <a href="' . $mdn_url . '">[' . |
450 | _("Send read receipt now") . ']</a>'; |
451 | } |
452 | } |
453 | } |
454 | } |
455 | } |
c615b1da |
456 | |
a94c1db1 |
457 | $s = '<TABLE WIDTH="100%" CELLPADDING="0" CELLSPACING="2" BORDER="0"'; |
0e02d604 |
458 | $s .= ' ALIGN="center" BGCOLOR="'.$color[0].'">'; |
d9c1dccc |
459 | foreach ($env as $key => $val) { |
460 | if ($val) { |
461 | $s .= '<TR>'; |
462 | $s .= html_tag('TD', '<B>' . $key . ': </B>', 'RIGHT', '', 'VALIGN="TOP" WIDTH="20%"') . "\n"; |
463 | $s .= html_tag('TD', $val, 'left', '', 'VALIGN="TOP" WIDTH="80%"') . "\n"; |
464 | $s .= '</TR>'; |
465 | } |
466 | } |
a94c1db1 |
467 | echo '<TABLE BGCOLOR="'.$color[9].'" WIDTH="100%" CELLPADDING="1"'. |
da9a8410 |
468 | ' CELLSPACING="0" BORDER="0" ALIGN="center">'."\n"; |
a94c1db1 |
469 | echo '<TR><TD HEIGHT="5" COLSPAN="2" BGCOLOR="'. |
470 | $color[4].'"></TD></TR><TR><TD align=center>'."\n"; |
d9c1dccc |
471 | echo $s; |
00ac2f42 |
472 | do_hook('read_body_header'); |
d9c1dccc |
473 | formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color); |
474 | echo '</TABLE>'; |
a94c1db1 |
475 | echo '</TD></TR><TR><TD HEIGHT="5" COLSPAN="2" BGCOLOR="'.$color[4].'"></TD></TR>'."\n"; |
feb5ec1b |
476 | echo '</TABLE>'; |
d9c1dccc |
477 | } |
c615b1da |
478 | |
7172cad7 |
479 | function formatMenubar($mailbox, $passed_id, $passed_ent_id, $message, $mbx_response) { |
a94c1db1 |
480 | global $base_uri, $draft_folder, $where, $what, $color, $sort, |
d62c4938 |
481 | $startMessage, $PHP_SELF, $save_as_draft, |
d9c1dccc |
482 | $enable_forward_as_attachment; |
c615b1da |
483 | |
d9c1dccc |
484 | $topbar_delimiter = ' | '; |
485 | $urlMailbox = urlencode($mailbox); |
a94c1db1 |
486 | $s = '<table width="100%" cellpadding="3" cellspacing="0" align="center"'. |
98fb28fd |
487 | ' border="0" bgcolor="'.$color[9].'"><tr>' . |
488 | html_tag( 'td', '', 'left', '', 'width="33%"' ) . '<small>'; |
e55c441a |
489 | |
d9c1dccc |
490 | $msgs_url = $base_uri . 'src/'; |
491 | if (isset($where) && isset($what)) { |
492 | $msgs_url .= 'search.php?where=' . urlencode($where) . |
493 | '&what=' . urlencode($what) . '&mailbox=' . $urlMailbox; |
494 | $msgs_str = _("Search results"); |
495 | } else { |
496 | $msgs_url .= 'right_main.php?sort=' . $sort . '&startMessage=' . |
497 | $startMessage . '&mailbox=' . $urlMailbox; |
498 | $msgs_str = _("Message List"); |
499 | } |
e55c441a |
500 | $s .= '<a href="' . $msgs_url . '">' . $msgs_str . '</a>'; |
d9c1dccc |
501 | |
502 | $delete_url = $base_uri . 'src/delete_message.php?mailbox=' . $urlMailbox . |
503 | '&message=' . $passed_id . '&'; |
504 | if (!(isset($passed_ent_id) && $passed_ent_id)) { |
505 | if ($where && $what) { |
506 | $delete_url .= 'where=' . urlencode($where) . '&what=' . urlencode($what); |
507 | } else { |
508 | $delete_url .= 'sort=' . $sort . '&startMessage=' . $startMessage; |
509 | } |
9f42bfc8 |
510 | $s .= $topbar_delimiter; |
e55c441a |
511 | $s .= '<a href="' . $delete_url . '">' . _("Delete") . '</a>'; |
d9c1dccc |
512 | } |
c615b1da |
513 | |
d62c4938 |
514 | $comp_uri = 'src/compose.php' . |
d9c1dccc |
515 | '?passed_id=' . $passed_id . |
516 | '&mailbox=' . $urlMailbox . |
4a1788b3 |
517 | '&startMessage=' . $startMessage . |
d9c1dccc |
518 | (isset($passed_ent_id)?'&passed_ent_id='.$passed_ent_id:''); |
2ffa3f57 |
519 | |
d9c1dccc |
520 | if (($mailbox == $draft_folder) && ($save_as_draft)) { |
6f09fb70 |
521 | $comp_alt_uri = $comp_uri . '&smaction=draft'; |
d9c1dccc |
522 | $comp_alt_string = _("Resume Draft"); |
8e1d27aa |
523 | } else if (handleAsSent($mailbox)) { |
6f09fb70 |
524 | $comp_alt_uri = $comp_uri . '&smaction=edit_as_new'; |
d9c1dccc |
525 | $comp_alt_string = _("Edit Message as New"); |
526 | } |
527 | if (isset($comp_alt_uri)) { |
e55c441a |
528 | $s .= $topbar_delimiter; |
d62c4938 |
529 | $s .= makeComposeLink($comp_alt_uri, $comp_alt_string); |
d9c1dccc |
530 | } |
2ffa3f57 |
531 | |
e55c441a |
532 | $s .= '</small></td><td align="center" width="33%"><small>'; |
533 | |
d9c1dccc |
534 | if (!(isset($where) && isset($what)) && !$passed_ent_id) { |
535 | $prev = findPreviousMessage($mbx_response['EXISTS'], $passed_id); |
536 | $next = findNextMessage($passed_id); |
537 | if ($prev != -1) { |
538 | $uri = $base_uri . 'src/read_body.php?passed_id='.$prev. |
539 | '&mailbox='.$urlMailbox.'&sort='.$sort. |
540 | '&startMessage='.$startMessage.'&show_more=0'; |
e55c441a |
541 | $s .= '<a href="'.$uri.'">'._("Previous").'</a>'; |
d9c1dccc |
542 | } else { |
e55c441a |
543 | $s .= _("Previous"); |
d9c1dccc |
544 | } |
e55c441a |
545 | $s .= $topbar_delimiter; |
d9c1dccc |
546 | if ($next != -1) { |
547 | $uri = $base_uri . 'src/read_body.php?passed_id='.$next. |
548 | '&mailbox='.$urlMailbox.'&sort='.$sort. |
549 | '&startMessage='.$startMessage.'&show_more=0'; |
e55c441a |
550 | $s .= '<a href="'.$uri.'">'._("Next").'</a>'; |
d9c1dccc |
551 | } else { |
e55c441a |
552 | $s .= _("Next"); |
d9c1dccc |
553 | } |
554 | } else if (isset($passed_ent_id) && $passed_ent_id) { |
555 | /* code for navigating through attached message/rfc822 messages */ |
556 | $url = set_url_var($PHP_SELF, 'passed_ent_id',0); |
e55c441a |
557 | $s .= '<a href="'.$url.'">'._("View Message").'</a>'; |
70bdc740 |
558 | $entities = array(); |
559 | $entity_count = array(); |
560 | $c = 0; |
f2f03410 |
561 | |
70bdc740 |
562 | foreach($message->parent->entities as $ent) { |
9f42bfc8 |
563 | if ($ent->type0 == 'message' && $ent->type1 == 'rfc822') { |
564 | $c++; |
565 | $entity_count[$c] = $ent->entity_id; |
566 | $entities[$ent->entity_id] = $c; |
567 | } |
70bdc740 |
568 | } |
569 | $prev_link = _("Previous"); |
570 | $next_link = _("Next"); |
571 | if($entities[$passed_ent_id] > 1) { |
572 | $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1]; |
573 | $prev_link = '<a href="' |
574 | . set_url_var($PHP_SELF, 'passed_ent_id', $prev_ent_id) |
575 | . '">' . $prev_link . '</a>'; |
576 | } |
577 | if($entities[$passed_ent_id] < $c) { |
578 | $next_ent_id = $entity_count[$entities[$passed_ent_id] + 1]; |
579 | $next_link = '<a href="' |
580 | . set_url_var($PHP_SELF, 'passed_ent_id', $next_ent_id) |
581 | . '">' . $next_link . '</a>'; |
582 | } |
e55c441a |
583 | $s .= $topbar_delimiter . $prev_link; |
d9c1dccc |
584 | $par_ent_id = $message->parent->entity_id; |
585 | if ($par_ent_id) { |
586 | $par_ent_id = substr($par_ent_id,0,-2); |
e55c441a |
587 | $s .= $topbar_delimiter; |
d9c1dccc |
588 | $url = set_url_var($PHP_SELF, 'passed_ent_id',$par_ent_id); |
e55c441a |
589 | $s .= '<a href="'.$url.'">'._("Up").'</a>'; |
d9c1dccc |
590 | } |
e55c441a |
591 | $s .= $topbar_delimiter . $next_link; |
d9c1dccc |
592 | } |
c615b1da |
593 | |
98fb28fd |
594 | $s .= '</small></td>' . "\n" . |
595 | html_tag( 'td', '', 'right', '', 'width="33%" nowrap' ) . '<small>'; |
6f09fb70 |
596 | $comp_action_uri = $comp_uri . '&smaction=forward'; |
d62c4938 |
597 | $s .= makeComposeLink($comp_action_uri, _("Forward")); |
c615b1da |
598 | |
d9c1dccc |
599 | if ($enable_forward_as_attachment) { |
6f09fb70 |
600 | $comp_action_uri = $comp_uri . '&smaction=forward_as_attachment'; |
e55c441a |
601 | $s .= $topbar_delimiter; |
d62c4938 |
602 | $s .= makeComposeLink($comp_action_uri, _("Forward as Attachment")); |
d9c1dccc |
603 | } |
a128c967 |
604 | |
6f09fb70 |
605 | $comp_action_uri = $comp_uri . '&smaction=reply'; |
e55c441a |
606 | $s .= $topbar_delimiter; |
d62c4938 |
607 | $s .= makeComposeLink($comp_action_uri, _("Reply")); |
d9c1dccc |
608 | |
6f09fb70 |
609 | $comp_action_uri = $comp_uri . '&smaction=reply_all'; |
9f42bfc8 |
610 | $s .= $topbar_delimiter; |
d62c4938 |
611 | $s .= makeComposeLink($comp_action_uri, _("Reply All")); |
e55c441a |
612 | $s .= '</small></td></tr></table>'; |
d62c4938 |
613 | do_hook('read_body_menu_top'); |
e55c441a |
614 | echo $s; |
d62c4938 |
615 | do_hook('read_body_menu_bottom'); |
c615b1da |
616 | } |
617 | |
618 | function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) { |
a94c1db1 |
619 | global $base_uri; |
fe369c70 |
620 | |
d9c1dccc |
621 | $urlMailbox = urlencode($mailbox); |
e95c04ec |
622 | sqgetGlobalVar('QUERY_STRING', $query_string, SQ_SERVER); |
623 | $url = $base_uri.'src/view_header.php?'.$query_string; |
d9c1dccc |
624 | |
a94c1db1 |
625 | $s = "<TR>\n" . |
98fb28fd |
626 | html_tag( 'td', '', 'right', '', 'VALIGN="MIDDLE" WIDTH="20%"' ) . '<B>' . _("Options") . ": </B></TD>\n" . |
627 | html_tag( 'td', '', 'left', '', 'VALIGN="MIDDLE" WIDTH="80%"' ) . '<SMALL>' . |
d9c1dccc |
628 | '<a href="'.$url.'">'._("View Full Header").'</a>'; |
629 | |
630 | /* Output the printer friendly link if we are in subtle mode. */ |
631 | $s .= ' | ' . |
632 | printer_friendly_link($mailbox, $passed_id, $passed_ent_id, $color); |
633 | echo $s; |
634 | do_hook("read_body_header_right"); |
635 | $s = "</SMALL></TD>\n" . |
636 | "</TR>\n"; |
637 | echo $s; |
a128c967 |
638 | |
4d0cd98b |
639 | } |
640 | |
6206f6c4 |
641 | /***************************/ |
2ffa3f57 |
642 | /* Main of read_body.php */ |
6206f6c4 |
643 | /***************************/ |
57257333 |
644 | |
0b97a708 |
645 | /* get the globals we may need */ |
646 | |
1e12d1ff |
647 | sqgetGlobalVar('key', $key, SQ_COOKIE); |
e95c04ec |
648 | sqgetGlobalVar('username', $username, SQ_SESSION); |
649 | sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION); |
e95c04ec |
650 | sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION); |
1e12d1ff |
651 | sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION); |
652 | |
e95c04ec |
653 | sqgetGlobalVar('msgs', $msgs, SQ_SESSION); |
654 | sqgetGlobalVar('msort', $msort, SQ_SESSION); |
655 | sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION); |
656 | sqgetGlobalVar('server_sort_array', $server_sort_array, SQ_SESSION); |
657 | if (!sqgetGlobalVar('messages', $messages, SQ_SESSION) ) { |
658 | $messages = array(); |
ce274df9 |
659 | } |
660 | |
e95c04ec |
661 | /** GET VARS */ |
662 | sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET); |
663 | sqgetGlobalVar('where', $where, SQ_GET); |
664 | sqgetGlobalVar('what', $what, SQ_GET); |
665 | if ( sqgetGlobalVar('show_more', $temp, SQ_GET) ) { |
666 | $show_more = (int) $temp; |
1b9f3c04 |
667 | } |
e95c04ec |
668 | if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET) ) { |
669 | $show_more_cc = (int) $temp; |
0b97a708 |
670 | } |
e95c04ec |
671 | if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET) ) { |
672 | $show_more_bcc = (int) $temp; |
0b97a708 |
673 | } |
e95c04ec |
674 | if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET) ) { |
675 | $view_hdr = (int) $temp; |
0b97a708 |
676 | } |
e95c04ec |
677 | |
678 | /** POST VARS */ |
679 | sqgetGlobalVar('move_id', $move_id, SQ_POST); |
680 | |
681 | /** GET/POST VARS */ |
682 | sqgetGlobalVar('passed_ent_id', $passed_ent_id); |
683 | sqgetGlobalVar('mailbox', $mailbox); |
684 | |
685 | if ( sqgetGlobalVar('passed_id', $temp) ) { |
686 | $passed_id = (int) $temp; |
0b97a708 |
687 | } |
e95c04ec |
688 | if ( sqgetGlobalVar('sort', $temp) ) { |
689 | $sort = (int) $temp; |
0b97a708 |
690 | } |
e95c04ec |
691 | if ( sqgetGlobalVar('startMessage', $temp) ) { |
692 | $startMessage = (int) $temp; |
ce274df9 |
693 | } |
0b97a708 |
694 | |
ce274df9 |
695 | /* end of get globals */ |
38c944cc |
696 | global $uid_support, $sqimap_capabilities; |
697 | |
6206f6c4 |
698 | $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); |
9f42bfc8 |
699 | $mbx_response = sqimap_mailbox_select($imapConnection, $mailbox, false, false, true); |
38c944cc |
700 | |
38c944cc |
701 | |
702 | /** |
703 | * $message contains all information about the message |
704 | * including header and body |
705 | */ |
37d2a6ee |
706 | |
707 | $uidvalidity = $mbx_response['UIDVALIDITY']; |
9f42bfc8 |
708 | |
37d2a6ee |
709 | if (!isset($messages[$uidvalidity])) { |
710 | $messages[$uidvalidity] = array(); |
9f42bfc8 |
711 | } |
5200c026 |
712 | if (!isset($messages[$uidvalidity][$passed_id]) || !$uid_support) { |
713 | $message = sqimap_get_message($imapConnection, $passed_id, $mailbox); |
fc224f68 |
714 | $FirstTimeSee = !$message->is_seen; |
715 | $message->is_seen = true; |
5200c026 |
716 | $messages[$uidvalidity][$passed_id] = $message; |
38c944cc |
717 | } else { |
fc224f68 |
718 | // $message = sqimap_get_message($imapConnection, $passed_id, $mailbox); |
719 | $message = $messages[$uidvalidity][$passed_id]; |
720 | $FirstTimeSee = !$message->is_seen; |
5200c026 |
721 | } |
af568a82 |
722 | |
dd628162 |
723 | if (isset($passed_ent_id) && $passed_ent_id) { |
5200c026 |
724 | $message = $message->getEntity($passed_ent_id); |
ff9d4297 |
725 | if ($message->type0 != 'message' && $message->type1 != 'rfc822') { |
726 | $message = $message->parent; |
727 | } |
141a16b2 |
728 | $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, $uid_support); |
19d470aa |
729 | $rfc822_header = new Rfc822Header(); |
141a16b2 |
730 | $rfc822_header->parseHeader($read); |
731 | $message->rfc822_header = $rfc822_header; |
c615b1da |
732 | } else { |
733 | $passed_ent_id = 0; |
38c944cc |
734 | } |
5200c026 |
735 | $header = $message->header; |
57257333 |
736 | |
6c31f818 |
737 | do_hook('html_top'); |
57257333 |
738 | |
6206f6c4 |
739 | /****************************************/ |
740 | /* Block for handling incoming url vars */ |
741 | /****************************************/ |
5200c026 |
742 | |
5200c026 |
743 | if (isset($sendreceipt)) { |
744 | if ( !$message->is_mdnsent ) { |
27a1d10a |
745 | $final_recipient = ''; |
746 | if ((isset($identity)) && ($identity != 0)) //Main identity |
747 | $final_recipient = trim(getPref($data_dir, $username, 'email_address' . $identity, '' )); |
748 | if ($final_recipient == '' ) |
749 | $final_recipient = trim(getPref($data_dir, $username, 'email_address', '' )); |
af568a82 |
750 | $supportMDN = ServerMDNSupport($mbx_response["PERMANENTFLAGS"]); |
fc224f68 |
751 | if ( SendMDN( $mailbox, $passed_id, $final_recipient, $message, $imapConnection ) > 0 && $supportMDN ) { |
c615b1da |
752 | ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id, $uid_support); |
5200c026 |
753 | $message->is_mdnsent = true; |
6a108031 |
754 | $messages[$uidvalidity][$passed_id]=$message; |
5200c026 |
755 | } |
756 | ClearAttachments(); |
757 | } |
758 | } |
6206f6c4 |
759 | /***********************************************/ |
760 | /* End of block for handling incoming url vars */ |
761 | /***********************************************/ |
762 | |
38c944cc |
763 | $msgs[$passed_id]['FLAG_SEEN'] = true; |
9f42bfc8 |
764 | |
765 | $messagebody = ''; |
c4ad259b |
766 | do_hook('read_body_top'); |
767 | if ($show_html_default == 1) { |
768 | $ent_ar = $message->findDisplayEntity(array()); |
769 | } else { |
770 | $ent_ar = $message->findDisplayEntity(array(), array('text/plain')); |
771 | } |
a128c967 |
772 | $cnt = count($ent_ar); |
773 | for ($i = 0; $i < $cnt; $i++) { |
6a108031 |
774 | $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox); |
a128c967 |
775 | if ($i != $cnt-1) { |
776 | $messagebody .= '<hr noshade size=1>'; |
777 | } |
38c944cc |
778 | } |
e55c441a |
779 | |
c615b1da |
780 | displayPageHeader($color, $mailbox); |
7172cad7 |
781 | formatMenuBar($mailbox, $passed_id, $passed_ent_id, $message, $mbx_response); |
af568a82 |
782 | formatEnvheader($mailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee); |
a94c1db1 |
783 | echo '<table width="100%" cellpadding="0" cellspacing="0" align="center" border="0">'; |
6206f6c4 |
784 | echo ' <tr><td>'; |
a94c1db1 |
785 | echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center" border="0" bgcolor="'.$color[9].'">'; |
a128c967 |
786 | echo ' <tr><td>'; |
a94c1db1 |
787 | echo ' <table width="100%" cellpadding="3" cellspacing="0" align="center" border="0">'; |
6206f6c4 |
788 | echo ' <tr bgcolor="'.$color[4].'"><td>'; |
98fb28fd |
789 | // echo ' <table cellpadding="1" cellspacing="5" align="left" border="0">'; |
790 | echo html_tag( 'table' ,'' , 'left', '', 'cellpadding="1" cellspacing="5" border="0"' ); |
ce810ea7 |
791 | echo ' <tr>' . html_tag( 'td', '<br>'. $messagebody."\n", 'left') |
6c7b5d8c |
792 | . '</tr>'; |
6206f6c4 |
793 | echo ' </table>'; |
794 | echo ' </td></tr>'; |
795 | echo ' </table></td></tr>'; |
2ffa3f57 |
796 | echo ' </table>'; |
797 | echo ' </td></tr>'; |
a128c967 |
798 | |
d0a2476a |
799 | echo '<TR><TD HEIGHT="5" COLSPAN="2" BGCOLOR="'. |
6c7b5d8c |
800 | $color[4].'"></TD></TR>'."\n"; |
d0a2476a |
801 | |
a128c967 |
802 | $attachmentsdisplay = formatAttachments($message,$ent_ar,$mailbox, $passed_id); |
803 | if ($attachmentsdisplay) { |
8acd2fb5 |
804 | echo ' </table>'; |
6206f6c4 |
805 | echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center"'.' border="0" bgcolor="'.$color[9].'">'; |
2ffa3f57 |
806 | echo ' <tr><td>'; |
d0a2476a |
807 | echo ' <table width="100%" cellpadding="0" cellspacing="0" align="center" border="0" bgcolor="'.$color[4].'">'; |
98fb28fd |
808 | echo ' <tr>' . html_tag( 'td', '', 'left', $color[9] ); |
6206f6c4 |
809 | echo ' <b>' . _("Attachments") . ':</b>'; |
810 | echo ' </td></tr>'; |
811 | echo ' <tr><td>'; |
812 | echo ' <table width="100%" cellpadding="2" cellspacing="2" align="center"'.' border="0" bgcolor="'.$color[0].'"><tr><td>'; |
813 | echo $attachmentsdisplay; |
814 | echo ' </td></tr></table>'; |
6c7b5d8c |
815 | echo ' </td></tr></table>'; |
6206f6c4 |
816 | echo ' </td></tr>'; |
6c7b5d8c |
817 | echo '<TR><TD HEIGHT="5" COLSPAN="2" BGCOLOR="'. |
818 | $color[4].'"></TD></TR>'; |
a128c967 |
819 | } |
c615b1da |
820 | echo '</table>'; |
a07cd1a4 |
821 | |
822 | /* show attached images inline -- if pref'fed so */ |
5be9f195 |
823 | if (($attachment_common_show_images) && |
a07cd1a4 |
824 | is_array($attachment_common_show_images_list)) { |
825 | foreach ($attachment_common_show_images_list as $img) { |
ce274df9 |
826 | $imgurl = SM_PATH . 'src/download.php' . |
57257333 |
827 | '?' . |
cd7b8833 |
828 | 'passed_id=' . urlencode($img['passed_id']) . |
3d570ba0 |
829 | '&mailbox=' . urlencode($mailbox) . |
ff9d4297 |
830 | '&ent_id=' . urlencode($img['ent_id']) . |
3d570ba0 |
831 | '&absolute_dl=true'; |
5be9f195 |
832 | |
b5058e9e |
833 | echo html_tag( 'table', "\n" . |
d9c1dccc |
834 | html_tag( 'tr', "\n" . |
835 | html_tag( 'td', '<img src="' . $imgurl . '">' ."\n", 'left' |
836 | ) |
837 | ) , |
b5058e9e |
838 | 'center', '', 'cellspacing=0 border="0" cellpadding="2"'); |
10f0ce72 |
839 | } |
a07cd1a4 |
840 | } |
841 | |
c615b1da |
842 | do_hook('read_body_bottom'); |
843 | do_hook('html_bottom'); |
a07cd1a4 |
844 | sqimap_logout($imapConnection); |
ce274df9 |
845 | /* sessions are written at the end of the script. it's better to register |
846 | them at the end so we avoid double session_register calls */ |
847 | sqsession_register($messages,'messages'); |
e55c441a |
848 | |
dcc1cc82 |
849 | ?> |
850 | </body> |
851 | </html> |