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