Fix broken MDN functionality
[squirrelmail.git] / src / read_body.php
CommitLineData
59177427 1<?php
134e4174 2
35586184 3/**
4 * read_body.php
5 *
35586184 6 * This file is used for reading the msgs array and displaying
7 * the resulting emails in the right frame.
8 *
4b5049de 9 * @copyright &copy; 1999-2007 The SquirrelMail Project Team
4b4abf93 10 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
30967a1e 11 * @version $Id$
8f6f9ba5 12 * @package squirrelmail
a07cd1a4 13 */
35586184 14
ebd2391c 15/** This is the read_body page */
16define('PAGE_NAME', 'read_body');
17
30967a1e 18/**
202bcbcc 19 * Include the SquirrelMail initialization file.
30967a1e 20 */
202bcbcc 21require('../include/init.php');
86725763 22
23/* SquirrelMail required files. */
86725763 24require_once(SM_PATH . 'functions/imap.php');
202bcbcc 25require_once(SM_PATH . 'functions/imap_asearch.php'); // => move to mailbox_display
86725763 26require_once(SM_PATH . 'functions/mime.php');
27require_once(SM_PATH . 'functions/date.php');
28require_once(SM_PATH . 'functions/url_parser.php');
6d021521 29require_once(SM_PATH . 'functions/identity.php');
202bcbcc 30require_once(SM_PATH . 'functions/mailbox_display.php');
31require_once(SM_PATH . 'functions/forms.php');
32require_once(SM_PATH . 'functions/attachment_common.php');
628bce99 33require_once(SM_PATH . 'functions/compose.php');
38c944cc 34
a07cd1a4 35/**
1fca12b5 36 * Given an IMAP message id number, this will look it up in the cached
1e150c97 37 * and sorted msgs array and return the index of the next message
1fca12b5 38 *
1e150c97 39 * @param int $passed_id The current message UID
1fca12b5 40 * @return the index of the next valid message from the array
41 */
e0e30169 42function findNextMessage($uidset,$passed_id='backwards') {
324ac3c5 43 if (!is_array($uidset)) {
44 return -1;
45 }
e0e30169 46 if ($passed_id=='backwards' || !is_array($uidset)) { // check for backwards compattibilty gpg plugin
47 $passed_id = $uidset;
e0e30169 48 }
91c27aee 49 $result = sqm_array_get_value_by_offset($uidset,$passed_id,1);
50 if ($result === false) {
51 return -1;
52 } else {
53 return $result;
10f0ce72 54 }
a07cd1a4 55}
56
1e150c97 57/**
58 * Given an IMAP message id number, this will look it up in the cached
59 * and sorted msgs array and return the index of the previous message
60 *
61 * @param int $passed_id The current message UID
62 * @return the index of the next valid message from the array
63 */
e0e30169 64
65function findPreviousMessage($uidset, $passed_id) {
324ac3c5 66 if (!is_array($uidset)) {
67 return -1;
e0e30169 68 }
91c27aee 69 $result = sqm_array_get_value_by_offset($uidset,$passed_id,-1);
70 if ($result === false) {
71 return -1;
72 } else {
73 return $result;
a07cd1a4 74 }
a07cd1a4 75}
10f0ce72 76
7d020720 77function html_toggle_href ($mailbox, $passed_id, $passed_ent_id, $message) {
7277191e 78 global $base_uri, $show_html_default;
79
80 $has_html = false;
81 if ($message->header->type0 == 'message' && $message->header->type1 == 'rfc822') {
82 $type0 = $message->rfc822_header->content_type->type0;
83 $type1 = $message->rfc822_header->content_type->type1;
84 } else {
85 $type0 = $message->header->type0;
86 $type1 = $message->header->type1;
87 }
88 if($type0 == 'multipart' &&
7d020720 89 ($type1 == 'alternative' || $type1 == 'mixed' || $type1 == 'related' || $type1=='signed')) {
7277191e 90 if ($message->findDisplayEntity(array(), array('text/html'), true)) {
91 $has_html = true;
92 }
93 }
94 /*
95 * Normal single part message so check its type.
96 */
97 else {
98 if($type0 == 'text' && $type1 == 'html') {
99 $has_html = true;
100 }
101 }
102 if($has_html == true) {
202bcbcc 103 $vars = array('passed_ent_id', 'show_more', 'show_more_cc', 'override_type0', 'override_type1', 'startMessage','where', 'what');
7277191e 104
105 $new_link = $base_uri . 'src/read_body.php?passed_id=' . urlencode($passed_id) .
106 '&amp;passed_ent_id=' . urlencode($passed_ent_id) .
107 '&amp;mailbox=' . urlencode($mailbox);
108 foreach($vars as $var) {
109 if(sqgetGlobalVar($var, $temp)) {
110 $new_link .= '&amp;' . $var . '=' . urlencode($temp);
111 }
112 }
113
114 if($show_html_default == 1) {
115 $new_link .= '&amp;show_html_default=0';
7277191e 116 } else {
117 $new_link .= '&amp;show_html_default=1';
7277191e 118 }
7d020720 119 return $new_link;
7277191e 120 }
121 return '';
122}
123
4669e892 124function ServerMDNSupport($aFlags) {
125 /* escaping $ doesn't work -> \x36 */
c075fcfe 126 return ( in_array('$mdnsent',$aFlags,true) ||
127 in_array('\\*',$aFlags,true) ) ;
57257333 128}
129
40e07136 130function SendMDN ( $mailbox, $passed_id, $message, $imapConnection) {
f08f23b8 131 global $squirrelmail_language, $default_charset, $default_move_to_sent,
132 $languages, $useSendmail, $domain, $sent_folder, $username,
133 $data_dir;
57257333 134
e95c04ec 135 sqgetGlobalVar('SERVER_NAME', $SERVER_NAME, SQ_SERVER);
0b97a708 136
38bca81c 137 $header = $message->rfc822_header;
57257333 138
fc224f68 139 $rfc822_header = new Rfc822Header();
d9c1dccc 140 $content_type = new ContentType('multipart/report');
fc224f68 141 $content_type->properties['report-type']='disposition-notification';
d9c1dccc 142
fc224f68 143 set_my_charset();
144 if ($default_charset) {
d9c1dccc 145 $content_type->properties['charset']=$default_charset;
fc224f68 146 }
147 $rfc822_header->content_type = $content_type;
148 $rfc822_header->to[] = $header->dnt;
2229a3ae 149 $rfc822_header->subject = _("Read:") . ' ' . decodeHeader($header->subject,true,false);
fc224f68 150
40e07136 151 $idents = get_identities();
152 $needles = array();
153 if ($header->to) {
154 foreach ($header->to as $message_to) {
155 $needles[] = $message_to->mailbox.'@'.$message_to->host;
156 }
27a1d10a 157 }
40e07136 158 $identity = find_identity($needles);
159 $from_addr = build_from_header($identity);
160 $reply_to = isset($idents[$identity]['reply_to']) ? $idents[$identity]['reply_to'] : '';
161 // FIXME: this must actually be the envelope address of the orginal message,
162 // but do we have that information? For now the first identity is our best guess.
163 $final_recipient = $idents[0]['email_address'];
fc224f68 164
fc224f68 165 $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true);
166 if ($reply_to) {
167 $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true);
168 }
d9c1dccc 169
57257333 170 // part 1 (RFC2298)
3aaa3214 171 $senton = getLongDateString( $header->date, $header->date_unparsed );
57257333 172 $to_array = $header->to;
173 $to = '';
174 foreach ($to_array as $line) {
af568a82 175 $to .= ' '.$line->getAddress();
57257333 176 }
57257333 177 $now = getLongDateString( time() );
78db1583 178 set_my_charset();
46bb8da8 179 $body = _("Your message") . "\r\n\r\n" .
48027e89 180 "\t" . _("To") . ': ' . decodeHeader($to,false,false) . "\r\n" .
181 "\t" . _("Subject") . ': ' . decodeHeader($header->subject,false,false) . "\r\n" .
182 "\t" . _("Sent") . ': ' . $senton . "\r\n" .
46bb8da8 183 "\r\n" .
184 sprintf( _("Was displayed on %s"), $now );
f69feefe 185
fc224f68 186 $special_encoding = '';
4669e892 187 if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
f4bb5d22 188 function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode')) {
189 $body = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode', $body);
d9c1dccc 190 if (strtolower($default_charset) == 'iso-2022-jp') {
191 if (mb_detect_encoding($body) == 'ASCII') {
192 $special_encoding = '8bit';
193 } else {
194 $body = mb_convert_encoding($body, 'JIS');
195 $special_encoding = '7bit';
196 }
197 }
21461ca4 198 } elseif (sq_is8bit($body)) {
199 $special_encoding = '8bit';
6fbd125b 200 }
fc224f68 201 $part1 = new Message();
202 $part1->setBody($body);
203 $mime_header = new MessageHeader;
204 $mime_header->type0 = 'text';
205 $mime_header->type1 = 'plain';
206 if ($special_encoding) {
207 $mime_header->encoding = $special_encoding;
d9c1dccc 208 } else {
fc224f68 209 $mime_header->encoding = 'us-ascii';
210 }
211 if ($default_charset) {
212 $mime_header->parameters['charset'] = $default_charset;
213 }
214 $part1->mime_header = $mime_header;
215
57257333 216 // part2 (RFC2298)
d9c1dccc 217 $original_recipient = $to;
57257333 218 $original_message_id = $header->message_id;
219
b37e457f 220 $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version " . SM_VERSION . ") \r\n";
57257333 221 if ($original_recipient != '') {
fc224f68 222 $report .= "Original-Recipient : $original_recipient\r\n";
57257333 223 }
fc224f68 224 $report .= "Final-Recipient: rfc822; $final_recipient\r\n" .
57257333 225 "Original-Message-ID : $original_message_id\r\n" .
226 "Disposition: manual-action/MDN-sent-manually; displayed\r\n";
227
fc224f68 228 $part2 = new Message();
229 $part2->setBody($report);
230 $mime_header = new MessageHeader;
231 $mime_header->type0 = 'message';
232 $mime_header->type1 = 'disposition-notification';
233 $mime_header->encoding = 'us-ascii';
234 $part2->mime_header = $mime_header;
235
236 $composeMessage = new Message();
237 $composeMessage->rfc822_header = $rfc822_header;
238 $composeMessage->addEntity($part1);
239 $composeMessage->addEntity($part2);
240
241
d9c1dccc 242 if ($useSendmail) {
243 require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php');
f3dc9c62 244 global $sendmail_path, $sendmail_args;
245 // Check for outdated configuration
246 if (!isset($sendmail_args)) {
247 if ($sendmail_path=='/var/qmail/bin/qmail-inject') {
248 $sendmail_args = '';
249 } else {
250 $sendmail_args = '-i -t';
251 }
252 }
253 $deliver = new Deliver_SendMail(array('sendmail_args'=>$sendmail_args));
d9c1dccc 254 $stream = $deliver->initStream($composeMessage,$sendmail_path);
fc224f68 255 } else {
d9c1dccc 256 require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php');
257 $deliver = new Deliver_SMTP();
ce68b76b 258 global $smtpServerAddress, $smtpPort, $pop_before_smtp;
d9c1dccc 259 $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false;
9bd3b1e6 260 get_smtp_user($user, $pass);
d9c1dccc 261 $stream = $deliver->initStream($composeMessage,$domain,0,
70ce2218 262 $smtpServerAddress, $smtpPort, $user, $pass, $authPop);
d9c1dccc 263 }
264 $success = false;
fc224f68 265 if ($stream) {
f08f23b8 266 $deliver->mail($composeMessage, $stream);
d9c1dccc 267 $success = $deliver->finalizeStream($stream);
fc224f68 268 }
d9c1dccc 269 if (!$success) {
6c3d00b5 270 $msg = _("Message not sent.") . "<br />\n" .
271 $deliver->dlv_msg;
a15f9d93 272 if (! empty($deliver->dlv_server_msg)) {
273 $msg.= '<br />' .
0cc4fb0d 274 _("Server replied:") . ' ' . $deliver->dlv_ret_nr . ' ' .
a15f9d93 275 nl2br(htmlspecialchars($deliver->dlv_server_msg));
276 }
856e58ef 277 plain_error_message($msg);
fc224f68 278 } else {
279 unset ($deliver);
f08f23b8 280
281 // move to sent folder
282 //
283 $move_to_sent = getPref($data_dir,$username,'move_to_sent');
284 if (isset($default_move_to_sent) && ($default_move_to_sent != 0)) {
285 $svr_allow_sent = true;
286 } else {
287 $svr_allow_sent = false;
288 }
289
290 if (isset($sent_folder) && (($sent_folder != '') || ($sent_folder != 'none'))
291 && sqimap_mailbox_exists( $imapConnection, $sent_folder)) {
292 $fld_sent = true;
293 } else {
294 $fld_sent = false;
295 }
296
297 if ((isset($move_to_sent) && ($move_to_sent != 0)) || (!isset($move_to_sent))) {
298 $lcl_allow_sent = true;
299 } else {
300 $lcl_allow_sent = false;
301 }
302
303 if (($fld_sent && $svr_allow_sent && !$lcl_allow_sent) || ($fld_sent && $lcl_allow_sent)) {
304 $save_reply_with_orig=getPref($data_dir,$username,'save_reply_with_orig');
305 if ($save_reply_with_orig) {
306 $sent_folder = $mailbox;
307 }
d9c1dccc 308 require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php');
309 $imap_deliver = new Deliver_IMAP();
f08f23b8 310 $imap_deliver->mail($composeMessage, $imapConnection, 0, 0, $sent_folder);
d9c1dccc 311 unset ($imap_deliver);
312 }
313 }
314 return $success;
57257333 315}
316
6201339c 317function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id) {
d9c1dccc 318 $sg = $set?'+':'-';
319 $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)';
4669e892 320 $read = sqimap_run_command ($imapConnection, $cmd, true, $response,
6201339c 321 $readmessage, TRUE);
57257333 322}
323
4d0cd98b 324function formatRecipientString($recipients, $item ) {
856e58ef 325 global $show_more, $show_more_cc, $show_more_bcc,
7d020720 326 $PHP_SELF, $oTemplate;
4d0cd98b 327
d9c1dccc 328 $string = '';
38c944cc 329 if ((is_array($recipients)) && (isset($recipients[0]))) {
d9c1dccc 330 $show = false;
38c944cc 331
332 if ($item == 'to') {
d9c1dccc 333 if ($show_more) {
334 $show = true;
335 $url = set_url_var($PHP_SELF, 'show_more',0);
336 } else {
337 $url = set_url_var($PHP_SELF, 'show_more',1);
338 }
339 } else if ($item == 'cc') {
340 if ($show_more_cc) {
341 $show = true;
342 $url = set_url_var($PHP_SELF, 'show_more_cc',0);
343 } else {
344 $url = set_url_var($PHP_SELF, 'show_more_cc',1);
345 }
346 } else if ($item == 'bcc') {
347 if ($show_more_bcc) {
348 $show = true;
349 $url = set_url_var($PHP_SELF, 'show_more_bcc',0);
350 } else {
351 $url = set_url_var($PHP_SELF, 'show_more_bcc',1);
352 }
353 }
67dc67bb 354
7d020720 355 $a = array();
356 foreach ($recipients as $r) {
357 $a[] = array(
358 'Name' => htmlspecialchars($r->getAddress(false)),
359 'Email' => htmlspecialchars($r->getEmail()),
360 'Full' => htmlspecialchars($r->getAddress(true))
361 );
1fca12b5 362 }
67dc67bb 363
7d020720 364 $oTemplate->assign('which_field', $item);
365 $oTemplate->assign('recipients', $a);
366 $oTemplate->assign('more_less_toggle_href', $url);
367 $oTemplate->assign('show_more', $show);
67dc67bb 368
7d020720 369 $string = $oTemplate->fetch('read_recipient_list.tpl');
4d0cd98b 370 }
c615b1da 371 return $string;
372}
373
e0e30169 374function formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message,
af568a82 375 $color, $FirstTimeSee) {
ce68b76b 376 global $default_use_mdn, $default_use_priority,
457e8593 377 $show_xmailer_default, $mdn_user_support, $PHP_SELF,
7d020720 378 $squirrelmail_language, $oTemplate;
38bca81c 379
134e4174 380 $mailbox = $aMailbox['NAME'];
e0e30169 381
d9c1dccc 382 $header = $message->rfc822_header;
383 $env = array();
bdb9ce72 384 $env[_("Subject")] = str_replace("&nbsp;"," ",decodeHeader($header->subject));
7893c8a5 385
d9c1dccc 386 $from_name = $header->getAddr_s('from');
d6b6d221 387 if (!$from_name)
d9c1dccc 388 $from_name = $header->getAddr_s('sender');
d6b6d221 389 if (!$from_name)
390 $env[_("From")] = _("Unknown sender");
391 else
392 $env[_("From")] = decodeHeader($from_name);
3aaa3214 393 $env[_("Date")] = getLongDateString($header->date, $header->date_unparsed);
d9c1dccc 394 $env[_("To")] = formatRecipientString($header->to, "to");
395 $env[_("Cc")] = formatRecipientString($header->cc, "cc");
396 $env[_("Bcc")] = formatRecipientString($header->bcc, "bcc");
397 if ($default_use_priority) {
7d020720 398 $oTemplate->assign('message_priority', $header->priority);
399 $env[_("Priority")] = $oTemplate->fetch('read_message_priority.tpl');
d9c1dccc 400 }
401 if ($show_xmailer_default) {
7d020720 402 $oTemplate->assign('xmailer', decodeHeader($header->xmailer));
403 $env[_("Mailer")] = $oTemplate->fetch('read_xmailer.tpl');
d9c1dccc 404 }
e0d7bbf4 405
406 // this is used for both mdn and also general use for plugins, etc
407 $oTemplate->assign('first_time_reading', $FirstTimeSee);
408
d9c1dccc 409 if ($default_use_mdn) {
410 if ($mdn_user_support) {
411 if ($header->dnt) {
7d020720 412 $mdn_url = $PHP_SELF;
ef3e6c1f 413 $mdn_url = set_url_var($mdn_url, 'mailbox', urlencode($mailbox));
414 $mdn_url = set_url_var($mdn_url, 'passed_id', $passed_id);
415 $mdn_url = set_url_var($mdn_url, 'passed_ent_id', $passed_ent_id);
416 $mdn_url = set_url_var($mdn_url, 'sendreceipt', 1);
7d020720 417
418 $oTemplate->assign('read_receipt_sent', $message->is_mdnsent);
7d020720 419 $oTemplate->assign('send_receipt_href', $mdn_url);
67dc67bb 420
7d020720 421 $env[_("Read Receipt")] = $oTemplate->fetch('read_handle_receipt.tpl');
d9c1dccc 422 }
423 }
424 }
1c3d4412 425
426 $statuses = array();
67dc67bb 427 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
428 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\deleted']) &&
429 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\deleted'] === true) {
430 $statuses[] = _("deleted");
431 }
432 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\answered']) &&
433 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\answered'] === true) {
434 $statuses[] = _("answered");
435 }
436 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\draft']) &&
437 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\draft'] === true) {
438 $statuses[] = _("draft");
439 }
440 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\flagged']) &&
441 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\flagged'] === true) {
442 $statuses[] = _("flagged");
443 }
444 if ( count($statuses) ) {
445 $env[_("Status")] = implode(', ', $statuses);
446 }
1c3d4412 447 }
67dc67bb 448
7d020720 449 $env[_("Options")] = formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color);
c615b1da 450
1c3d4412 451
7d020720 452 $oTemplate->assign('headers_to_display', $env);
67dc67bb 453
7d020720 454 $oTemplate->display('read_headers.tpl');
d9c1dccc 455}
c615b1da 456
1e150c97 457/**
4669e892 458 * Format message toolbar
459 *
c4dcda23 460 * @param array $aMailbox Current mailbox information array
1e150c97 461 * @param int $passed_id UID of current message
462 * @param int $passed_ent_id Id of entity within message
463 * @param object $message Current message object
464 * @param object $mbx_response
465 */
324ac3c5 466function formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, $removedVar, $nav_on_top = TRUE) {
7d020720 467 global $base_uri, $draft_folder, $where, $what, $sort,
4669e892 468 $startMessage, $PHP_SELF, $save_as_draft,
1e150c97 469 $enable_forward_as_attachment, $imapConnection, $lastTargetMailbox,
7d020720 470 $delete_prev_next_display, $show_copy_buttons,
457e8593 471 $compose_new_win, $compose_width, $compose_height,
7d020720 472 $oTemplate;
c615b1da 473
e0e30169 474 //FIXME cleanup argument list, use $aMailbox where possible
475 $mailbox = $aMailbox['NAME'];
476
d9c1dccc 477 $urlMailbox = urlencode($mailbox);
c615b1da 478
1e150c97 479 // Create Prev & Next links
480 // Handle nested entities first (i.e. Mime Attach parts)
7d020720 481 $prev_href = $next_href = $up_href = $del_href = $del_prev_href = $del_next_href = '';
67dc67bb 482 $msg_list_href = $search_href = $view_msg_href = '';
1e150c97 483 if (isset($passed_ent_id) && $passed_ent_id) {
484 // code for navigating through attached message/rfc822 messages
d9c1dccc 485 $url = set_url_var($PHP_SELF, 'passed_ent_id',0);
70bdc740 486 $entities = array();
487 $entity_count = array();
488 $c = 0;
f2f03410 489
70bdc740 490 foreach($message->parent->entities as $ent) {
9f42bfc8 491 if ($ent->type0 == 'message' && $ent->type1 == 'rfc822') {
67dc67bb 492
9f42bfc8 493 $c++;
494 $entity_count[$c] = $ent->entity_id;
495 $entities[$ent->entity_id] = $c;
496 }
70bdc740 497 }
1e150c97 498
91c27aee 499 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] > 1) {
70bdc740 500 $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1];
7d020720 501 $prev_href = set_url_var($PHP_SELF, 'passed_ent_id', $prev_ent_id);
70bdc740 502 }
1e150c97 503
91c27aee 504 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] < $c) {
70bdc740 505 $next_ent_id = $entity_count[$entities[$passed_ent_id] + 1];
7d020720 506 $next_href = set_url_var($PHP_SELF, 'passed_ent_id', $next_ent_id);
70bdc740 507 }
1e150c97 508
d9c1dccc 509 $par_ent_id = $message->parent->entity_id;
510 if ($par_ent_id) {
511 $par_ent_id = substr($par_ent_id,0,-2);
1e150c97 512 if ( $par_ent_id != 0 ) {
7d020720 513 $up_href = set_url_var($PHP_SELF, 'passed_ent_id',$par_ent_id);
1e150c97 514 }
515 }
516
7d020720 517 $view_msg_href = $url;
1e150c97 518
519 // Prev/Next links for regular messages
324ac3c5 520 } else if ( true ) { //!(isset($where) && isset($what)) ) {
324ac3c5 521 $prev = findPreviousMessage($aMailbox['UIDSET'][$what], $passed_id);
522 $next = findNextMessage($aMailbox['UIDSET'][$what],$passed_id);
1e150c97 523
1e150c97 524 if ($prev >= 0) {
7d020720 525 $prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
1e150c97 526 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
324ac3c5 527 "&amp;where=$where&amp;what=$what" .
1e150c97 528 '&amp;startMessage='.$startMessage.'&amp;show_more=0';
d9c1dccc 529 }
1e150c97 530
1e150c97 531 if ($next >= 0) {
7d020720 532 $next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
1e150c97 533 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
324ac3c5 534 "&amp;where=$where&amp;what=$what" .
1e150c97 535 '&amp;startMessage='.$startMessage.'&amp;show_more=0';
1e150c97 536 }
537
1e150c97 538 // Only bother with Delete & Prev and Delete & Next IF
6201339c 539 // top display is enabled.
4669e892 540 if ( $delete_prev_next_display == 1 &&
324ac3c5 541 in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) {
1e150c97 542 if ($prev >= 0) {
7d020720 543 $del_prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
1e150c97 544 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
545 '&amp;startMessage='.$startMessage.'&amp;show_more=0'.
324ac3c5 546 "&amp;where=$where&amp;what=$what" .
1e150c97 547 '&amp;delete_id='.$passed_id;
1e150c97 548 }
549
1e150c97 550 if ($next >= 0) {
7d020720 551 $del_next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
1e150c97 552 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
553 '&amp;startMessage='.$startMessage.'&amp;show_more=0'.
324ac3c5 554 "&amp;where=$where&amp;what=$what" .
1e150c97 555 '&amp;delete_id='.$passed_id;
1e150c97 556 }
1e150c97 557 }
558 }
559
c4dcda23 560 $msg_list_href = get_message_list_uri($aMailbox['NAME'], $startMessage, $what);
561 if ($where == 'search.php')
562 $search_href = str_replace('read_body.php', 'search.php', $msg_list_href);
563 else
564 $search_href = '';
1e150c97 565
98a9cc03 566 $comp_uri = $base_uri.'src/compose.php' .
567 '?passed_id=' . $passed_id .
568 '&amp;mailbox=' . $urlMailbox .
569 '&amp;startMessage=' . $startMessage .
570 (isset($passed_ent_id) ? '&amp;passed_ent_id='.$passed_ent_id : '');
4669e892 571
572 // Start form for reply/reply all/forward..
1a531551 573 $target = '';
574 $on_click='';
89a067ff 575 $method='post';
6190378c 576 $onsubmit='';
1a531551 577 if ($compose_new_win == '1') {
91c27aee 578 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
579 $compose_width = '640';
580 }
581 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
582 $compose_height = '550';
583 }
457e8593 584 if ( checkForJavascript() ) {
0be2024f 585 $on_click='comp_in_new_form(\''.$comp_uri.'\', this, this.form,'. $compose_width .',' . $compose_height .')';
1a531551 586 $comp_uri = 'javascript:void(0)';
89a067ff 587 $method='get';
588 $onsubmit = 'return false';
1a531551 589 } else {
89a067ff 590 $target = '_blank';
1a531551 591 }
592 }
593
7d020720 594 $oTemplate->assign('nav_on_top', $nav_on_top);
98a9cc03 595
7d020720 596 $oTemplate->assign('prev_href', $prev_href);
597 $oTemplate->assign('up_href', $up_href);
598 $oTemplate->assign('next_href', $next_href);
599 $oTemplate->assign('del_prev_href', $del_prev_href);
600 $oTemplate->assign('del_next_href', $del_next_href);
601 $oTemplate->assign('view_msg_href', $view_msg_href);
602
603 $oTemplate->assign('message_list_href', $msg_list_href);
604 $oTemplate->assign('search_href', $search_href);
605
89a067ff 606 $oTemplate->assign('form_extra', '');
607 $oTemplate->assign('form_method', $method);
608 $oTemplate->assign('form_target', $target);
609 $oTemplate->assign('form_onsubmit', $onsubmit);
7d020720 610 $oTemplate->assign('compose_href', $comp_uri);
611 $oTemplate->assign('button_onclick', $on_click);
612 $oTemplate->assign('forward_as_attachment_enabled', $enable_forward_as_attachment==1);
67dc67bb 613
d08a5945 614 //FIXME: I am surprised these aren't already given to the template; probably needs to be given at a higher level, so I have NO IDEA if this is the right place to do this... adding them so template can construct its own API calls... we can build those herein too if preferrable
615 $oTemplate->assign('mailbox', $aMailbox['NAME']);
616 $oTemplate->assign('passed_id', $passed_id);
617 $oTemplate->assign('what', $what);
618
1e150c97 619 // If Draft folder - create Resume link
67dc67bb 620 $resume_draft = $edit_as_new = false;
1e150c97 621 if (($mailbox == $draft_folder) && ($save_as_draft)) {
7d020720 622 $resume_draft = true; 'smaction_draft';
1e150c97 623 } else if (handleAsSent($mailbox)) {
7d020720 624 $edit_as_new = true;
1e150c97 625 }
7d020720 626 $oTemplate->assign('can_resume_draft', $resume_draft);
67dc67bb 627 $oTemplate->assign('can_edit_as_new', $edit_as_new);
628
7d020720 629 $oTemplate->assign('mailboxes', sqimap_mailbox_option_array($imapConnection));
630 if (in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true)) {
324ac3c5 631 $delete_url = $base_uri . "src/$where";
7d020720 632 $oTemplate->assign('can_be_deleted', true);
633 $oTemplate->assign('move_delete_form_action', $base_uri.'src/'.$where);
634 $oTemplate->assign('delete_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
635 addHidden('msg[0]', $passed_id)."\n" .
636 addHidden('startMessage', $startMessage)."\n" );
4669e892 637 if (!(isset($passed_ent_id) && $passed_ent_id)) {
7d020720 638 $oTemplate->assign('can_be_moved', true);
639 $oTemplate->assign('move_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
640 addHidden('msg[0]', $passed_id)."\n" );
641 $oTemplate->assign('last_move_target', isset($lastTargetMailbox) && !empty($lastTargetMailbox) ? $lastTargetMailbox : '');
642 $oTemplate->assign('can_be_copied', $show_copy_buttons==1);
1e150c97 643 } else {
7d020720 644 $oTemplate->assign('can_be_moved', false);
645 $oTemplate->assign('move_form_extra', '');
646 $oTemplate->assign('last_move_target', '');
647 $oTemplate->assign('can_be_copied', false);
988e24f6 648 }
7d020720 649 } else {
650 $oTemplate->assign('can_be_deleted', false);
651 $oTemplate->assign('move_delete_form_action', '');
652 $oTemplate->assign('delete_form_extra', '');
653 $oTemplate->assign('can_be_moved', false);
654 $oTemplate->assign('move_form_extra', '');
655 $oTemplate->assign('last_move_target', '');
656 $oTemplate->assign('can_be_copied', false);
657 }
67dc67bb 658
2d97bb26 659 global $null;
660 do_hook('read_body_menu', $null);
661
7d020720 662 if ($nav_on_top) {
663 $oTemplate->display('read_menubar_nav.tpl');
664 $oTemplate->display('read_menubar_buttons.tpl');
665 } else {
666 $oTemplate->display('read_menubar_buttons.tpl');
667 $oTemplate->display('read_menubar_nav.tpl');
764971df 668 }
67dc67bb 669
c615b1da 670}
671
672function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) {
7d020720 673 global $base_uri, $where, $what, $show_html_default,
67dc67bb 674 $oTemplate, $download_href,
7d020720 675 $unsafe_image_toggle_href, $unsafe_image_toggle_text;
4669e892 676
d9c1dccc 677 $urlMailbox = urlencode($mailbox);
78909469 678 $urlPassed_id = urlencode($passed_id);
679 $urlPassed_ent_id = urlencode($passed_ent_id);
4669e892 680
78909469 681 $query_string = 'mailbox=' . $urlMailbox . '&amp;passed_id=' . $urlPassed_id . '&amp;passed_ent_id=' . $urlPassed_ent_id;
78909469 682 if (!empty($where)) {
683 $query_string .= '&amp;where=' . urlencode($where);
684 }
78909469 685 if (!empty($what)) {
686 $query_string .= '&amp;what=' . urlencode($what);
687 }
e95c04ec 688 $url = $base_uri.'src/view_header.php?'.$query_string;
d9c1dccc 689
d9c1dccc 690
7d020720 691 // Build the printer friend link
692 /* hackydiehack */
693 if( !sqgetGlobalVar('view_unsafe_images', $view_unsafe_images, SQ_GET) ) {
694 $view_unsafe_images = false;
695 } else {
696 $view_unsafe_images = true;
40a34e57 697 }
7d020720 698 $pf_params = '?passed_ent_id=' . $urlPassed_ent_id .
699 '&mailbox=' . $urlMailbox .
700 '&passed_id=' . $urlPassed_id .
701 '&view_unsafe_images='. (bool) $view_unsafe_images .
67dc67bb 702 '&show_html_default=' . $show_html_default;
7d020720 703 $links = array();
704 $links[] = array (
705 'URL' => $url,
706 'Text' => _("View Full Header")
707 );
708 $links[] = array (
709 'URL' => $pf_params,
710 'Text' => _("View Printable Version")
711 );
712 $links[] = array (
713 'URL' => $download_href,
210b5bb5 714 'Text' => _("Download this as a file")
7d020720 715 );
716 $toggle = html_toggle_href($mailbox, $passed_id, $passed_ent_id, $message);
717 if (!empty($toggle)) {
718 $links[] = array (
719 'URL' => $toggle,
720 'Text' => $show_html_default==1 ? _("View as plain text") : _("View as HTML")
721 );
722 }
723 if (!empty($unsafe_image_toggle_href)) {
724 $links[] = array (
725 'URL' => $unsafe_image_toggle_href,
726 'Text' => $unsafe_image_toggle_text
727 );
728 }
729
730 do_hook('read_body_header_right', $links);
731
732 $oTemplate->assign('links', $links);
67dc67bb 733
7d020720 734 return $oTemplate->fetch('read_toolbar.tpl');
91c27aee 735}
736
6206f6c4 737/***************************/
2ffa3f57 738/* Main of read_body.php */
6206f6c4 739/***************************/
57257333 740
0b97a708 741/* get the globals we may need */
742
e95c04ec 743sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
e95c04ec 744sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
e95c04ec 745if (!sqgetGlobalVar('messages', $messages, SQ_SESSION) ) {
746 $messages = array();
ce274df9 747}
81de00c0 748sqgetGlobalVar('delayed_errors', $delayed_errors, SQ_SESSION);
749if (is_array($delayed_errors)) {
750 $oErrorHandler->AssignDelayedErrors($delayed_errors);
751 sqsession_unregister("delayed_errors");
752}
e95c04ec 753/** GET VARS */
754sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET);
324ac3c5 755if (!sqgetGlobalVar('where', $where, SQ_GET) ) {
756 $where = 'right_main.php';
757}
d0b119a5 758/*
759 * Used as entry key to the list of uid's cached in the mailbox cache
760 * we use the cached uid's to get the next and prev message.
761 */
324ac3c5 762if (!sqgetGlobalVar('what', $what, SQ_GET) ){
763 $what = 0;
764}
e95c04ec 765if ( sqgetGlobalVar('show_more', $temp, SQ_GET) ) {
766 $show_more = (int) $temp;
1b9f3c04 767}
e95c04ec 768if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET) ) {
769 $show_more_cc = (int) $temp;
0b97a708 770}
e95c04ec 771if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET) ) {
772 $show_more_bcc = (int) $temp;
0b97a708 773}
e95c04ec 774if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET) ) {
775 $view_hdr = (int) $temp;
0b97a708 776}
e95c04ec 777
91c27aee 778if ( sqgetGlobalVar('account', $temp, SQ_GET) ) {
779 $iAccount = (int) $temp;
780} else {
781 $iAccount = 0;
782}
783
e95c04ec 784/** GET/POST VARS */
785sqgetGlobalVar('passed_ent_id', $passed_ent_id);
786sqgetGlobalVar('mailbox', $mailbox);
787
788if ( sqgetGlobalVar('passed_id', $temp) ) {
789 $passed_id = (int) $temp;
0b97a708 790}
e95c04ec 791if ( sqgetGlobalVar('sort', $temp) ) {
792 $sort = (int) $temp;
0b97a708 793}
e95c04ec 794if ( sqgetGlobalVar('startMessage', $temp) ) {
795 $startMessage = (int) $temp;
324ac3c5 796} else {
797 $startMessage = 1;
ce274df9 798}
7277191e 799if(sqgetGlobalVar('show_html_default', $temp)) {
800 $show_html_default = (int) $temp;
801}
802
803if(sqgetGlobalVar('view_unsafe_images', $temp)) {
804 $view_unsafe_images = (int) $temp;
805 if($view_unsafe_images == 1) {
806 $show_html_default = 1;
807 }
808} else {
809 $view_unsafe_images = 0;
810}
324ac3c5 811/**
812 * Retrieve mailbox cache
813 */
814sqgetGlobalVar('mailbox_cache',$mailbox_cache,SQ_SESSION);
0b97a708 815
ce274df9 816/* end of get globals */
38c944cc 817
906f7e9f 818$imapConnection = sqimap_login($username, false, $imapServerAddress, $imapPort, 0);
91c27aee 819$aMailbox = sqm_api_mailbox_select($imapConnection, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array());
820
c3731db5 821
91c27aee 822/**
c3731db5 823 Start code to set the columns to fetch in case of hitting the next/prev link
824 The reason for this is the fact that the cache can be invalidated which means that the headers
825 to fetch aren't there anymore. Before they got calculated when the messagelist was shown.
826
827 Todo, better central handling of setting the mailbox options so we do not need to do the stuff below
828*/
829
830/**
831 * Replace From => To in case it concerns a draft or sent folder
832 */
199ff86a 833$aColumns = array();
c3731db5 834if (($mailbox == $sent_folder || $mailbox == $draft_folder) &&
835 !in_array(SQM_COL_TO,$index_order)) {
836 $aNewOrder = array(); // nice var name ;)
837 foreach($index_order as $iCol) {
838 if ($iCol == SQM_COL_FROM) {
839 $iCol = SQM_COL_TO;
840 }
199ff86a 841 $aColumns[$iCol] = array();
c3731db5 842 }
c3731db5 843} else {
199ff86a 844 foreach ($index_order as $iCol) {
845 $aColumns[$iCol] = array();
846 }
c3731db5 847}
848
849$aProps = array(
850 'columns' => $aColumns, // columns bound settings
851 'config' => array(
852 'highlight_list' => $message_highlight_list, // row highlighting rules
853 'trash_folder' => $trash_folder,
854 'sent_folder' => $sent_folder,
855 'draft_folder' => $draft_folder));
856
857calcFetchColumns($aMailbox,$aProps);
858
859/**
860 End code to set the columns to fetch in case of hitting the next/prev link
861*/
862
863
864
865/**
866 * Check if cache is still valid, $what contains the key
867 * which gives us acces to the array with uid's. At this moment
868 * 0 is used for a normal message list and search uses 1 as key. This can be
869 * changed / extended in the future.
870 * If on a select of a mailbox we detect that the cache should be invalidated due to
871 * the delete of messages or due to new messages we empty the list with uid's and
872 * that's what we detect below.
873 */
91c27aee 874if (!is_array($aMailbox['UIDSET'][$what])) {
d0b119a5 875 fetchMessageHeaders($imapConnection, $aMailbox);
91c27aee 876}
38c944cc 877
d0b119a5 878$iSetIndex = $aMailbox['SETINDEX'];
879$aMailbox['CURRENT_MSG'][$iSetIndex] = $passed_id;
880
324ac3c5 881/**
882 * Update the seen state
883 * and ignore in_array('\\seen',$aMailbox['PERMANENTFLAGS'],true)
884 */
885if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
886 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\seen'] = true;
e0e30169 887}
e0e30169 888
1e150c97 889/**
890 * Process Delete from delete-move-next
891 * but only if delete_id was set
892 */
893if ( sqgetGlobalVar('delete_id', $delete_id, SQ_GET) ) {
324ac3c5 894 handleMessageListForm($imapConnection,$aMailbox,$sButton='setDeleted', array($delete_id));
1e150c97 895}
896
897/**
38c944cc 898 * $message contains all information about the message
899 * including header and body
900 */
37d2a6ee 901
324ac3c5 902if (isset($aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'])) {
903 $message = $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'];
904 $FirstTimeSee = !$message->is_seen;
38c944cc 905} else {
324ac3c5 906 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
907 $FirstTimeSee = !$message->is_seen;
5200c026 908}
bdfa0f9a 909
910/**
911 * update message seen status and put in cache
912 */
913$message->is_seen = true;
914$aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
915
dd628162 916if (isset($passed_ent_id) && $passed_ent_id) {
324ac3c5 917 $message = $message->getEntity($passed_ent_id);
918 if ($message->type0 != 'message' && $message->type1 != 'rfc822') {
919 $message = $message->parent;
920 }
921 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, TRUE);
922 $rfc822_header = new Rfc822Header();
923 $rfc822_header->parseHeader($read);
924 $message->rfc822_header = $rfc822_header;
91c27aee 925} else if ($message->type0 == 'message' && $message->type1 == 'rfc822' && isset($message->entities[0])) {
926 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[1.HEADER]", true, $response, $msg, TRUE);
927 $rfc822_header = new Rfc822Header();
928 $rfc822_header->parseHeader($read);
929 $message->rfc822_header = $rfc822_header;
c615b1da 930} else {
324ac3c5 931 $passed_ent_id = 0;
38c944cc 932}
5200c026 933$header = $message->header;
57257333 934
57257333 935
6206f6c4 936/****************************************/
937/* Block for handling incoming url vars */
938/****************************************/
5200c026 939
5200c026 940if (isset($sendreceipt)) {
941 if ( !$message->is_mdnsent ) {
324ac3c5 942 $supportMDN = ServerMDNSupport($aMailbox["PERMANENTFLAGS"]);
40e07136 943 if ( SendMDN( $mailbox, $passed_id, $message, $imapConnection ) > 0 && $supportMDN ) {
6201339c 944 ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id);
5200c026 945 $message->is_mdnsent = true;
1012f961 946 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
5200c026 947 }
5200c026 948 }
949}
6206f6c4 950/***********************************************/
951/* End of block for handling incoming url vars */
952/***********************************************/
953
9f42bfc8 954$messagebody = '';
6e515418 955do_hook('read_body_top', $null);
c4ad259b 956if ($show_html_default == 1) {
957 $ent_ar = $message->findDisplayEntity(array());
958} else {
959 $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
960}
a128c967 961$cnt = count($ent_ar);
962for ($i = 0; $i < $cnt; $i++) {
6a108031 963 $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
a128c967 964 if ($i != $cnt-1) {
7d020720 965 $messagebody .= '<hr />';
a128c967 966 }
38c944cc 967}
e55c441a 968
202bcbcc 969/**
970 * Write mailbox with updated seen flag information back to cache.
971 */
972$mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox;
973sqsession_register($mailbox_cache,'mailbox_cache');
974$_SESSION['mailbox_cache'] = $mailbox_cache;
202bcbcc 975
c4dcda23 976// message list URI is used in page header when on read_body
977$oTemplate->assign('message_list_href', get_message_list_uri($aMailbox['NAME'], $startMessage, $what));
978
b89ceca6 979displayPageHeader($color, $mailbox,'','');
9ad07d9a 980formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message,false);
e0e30169 981formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee);
7d020720 982
983$oTemplate->assign('message_body', $messagebody);
984$oTemplate->display('read_message_body.tpl');
985
986formatAttachments($message,$ent_ar,$mailbox, $passed_id);
a07cd1a4 987
988/* show attached images inline -- if pref'fed so */
7d020720 989if ($attachment_common_show_images && is_array($attachment_common_show_images_list)) {
990 $images = array();
a07cd1a4 991 foreach ($attachment_common_show_images_list as $img) {
ce274df9 992 $imgurl = SM_PATH . 'src/download.php' .
57257333 993 '?' .
cd7b8833 994 'passed_id=' . urlencode($img['passed_id']) .
3d570ba0 995 '&amp;mailbox=' . urlencode($mailbox) .
ff9d4297 996 '&amp;ent_id=' . urlencode($img['ent_id']) .
3d570ba0 997 '&amp;absolute_dl=true';
7d020720 998 $a = array();
999 $a['Name'] = $img['name'];
1000 $a['DisplayURL'] = $imgurl;
1001 $a['DownloadURL'] = $img['download_href'];
1002 $images[] = $a;
10f0ce72 1003 }
67dc67bb 1004
7d020720 1005 $oTemplate->assign('images', $images);
1006 $oTemplate->display('read_display_images_inline.tpl');
a07cd1a4 1007}
1008
9ad07d9a 1009formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, false, FALSE);
1e150c97 1010
6e515418 1011do_hook('read_body_bottom', $null);
a07cd1a4 1012sqimap_logout($imapConnection);
51d66ea2 1013$oTemplate->display('footer.tpl');