X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fread_body.php;h=7eb195682cfa67618bedd2608213ffb207bc10c7;hp=cc76a830d46167314417066f450d24581e20b75f;hb=81de00c0eba6c2f4aebcfdd24124be99a3996871;hpb=8ed0d71a42bdb66faf6ecc9db45ec594d479a610 diff --git a/src/read_body.php b/src/read_body.php index cc76a830..2e1f9987 100644 --- a/src/read_body.php +++ b/src/read_body.php @@ -3,1110 +3,1103 @@ /** * read_body.php * - * Copyright (c) 1999-2002 The SquirrelMail Project Team - * Licensed under the GNU GPL. For full terms see the file COPYING. - * * This file is used for reading the msgs array and displaying * the resulting emails in the right frame. * - * $Id$ + * @copyright © 1999-2006 The SquirrelMail Project Team + * @license http://opensource.org/licenses/gpl-license.php GNU Public License + * @version $Id$ + * @package squirrelmail */ -require_once('../src/validate.php'); -require_once('../functions/imap.php'); -require_once('../functions/mime.php'); -require_once('../functions/date.php'); -require_once('../functions/url_parser.php'); -require_once('../functions/smtp.php'); +/** + * Path for SquirrelMail required files. + * @ignore + */ +define('SM_PATH','../'); + +/* SquirrelMail required files. */ +include_once(SM_PATH . 'include/validate.php'); +//require_once(SM_PATH . 'functions/global.php'); +require_once(SM_PATH . 'functions/imap.php'); +require_once(SM_PATH . 'functions/mime.php'); +require_once(SM_PATH . 'functions/date.php'); +require_once(SM_PATH . 'functions/url_parser.php'); +require_once(SM_PATH . 'functions/html.php'); +//require_once(SM_PATH . 'functions/global.php'); +require_once(SM_PATH . 'functions/identity.php'); +include_once(SM_PATH . 'functions/arrays.php'); +include_once(SM_PATH . 'functions/mailbox_display.php'); /** * Given an IMAP message id number, this will look it up in the cached - * and sorted msgs array and return the index. Used for finding the next - * and previous messages. + * and sorted msgs array and return the index of the next message * + * @param int $passed_id The current message UID * @return the index of the next valid message from the array */ -function findNextMessage() { - global $msort, $currentArrayIndex, $msgs, $sort, - $thread_sort_messages, $allow_server_sort, - $server_sort_array; - if (!is_array($server_sort_array)) { - $thread_sort_messages = 0; - $allow_server_sort = FALSE; +function findNextMessage($uidset,$passed_id='backwards') { + if (!is_array($uidset)) { + return -1; } - $result = -1; - if ($thread_sort_messages == 1 || $allow_server_sort == TRUE) { - reset($server_sort_array); - while(list($key, $value) = each ($server_sort_array)) { - if ($currentArrayIndex == $value) { - if ($key == (count($server_sort_array) - 1)) { - $result = -1; - break; - } - $result = $server_sort_array[$key + 1]; - break; - } - } - } - elseif ($sort == 6 && $allow_server_sort != TRUE && - $thread_sort_messages != 1) { - if ($currentArrayIndex != 1) { - $result = $currentArrayIndex - 1; - } + if ($passed_id=='backwards' || !is_array($uidset)) { // check for backwards compattibilty gpg plugin + $passed_id = $uidset; } - elseif ($allow_server_sort != TRUE && $thread_sort_messages != 1 ) { - if (!is_array($msort)) { - return -1; - } - for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) { - if ($currentArrayIndex == $msgs[$key]['ID']) { - next($msort); - $key = key($msort); - if (isset($key)){ - $result = $msgs[$key]['ID']; - break; - } - } - } + $result = sqm_array_get_value_by_offset($uidset,$passed_id,1); + if ($result === false) { + return -1; + } else { + return $result; } - return ($result); } /** - * Removes just one address from the list of addresses. - * - * @param &$addr_list a by-ref array of addresses - * @param $addr an address to remove - * @return void, since it operates on a by-ref param + * Given an IMAP message id number, this will look it up in the cached + * and sorted msgs array and return the index of the previous message + * + * @param int $passed_id The current message UID + * @return the index of the next valid message from the array */ -function RemoveAddress(&$addr_list, $addr) { - if ($addr != '') { - foreach (array_keys($addr_list, $addr) as $key_to_delete) { - unset($addr_list[$key_to_delete]); - } - } -} -/** returns the index of the previous message from the array. */ -function findPreviousMessage() { - global $msort, $currentArrayIndex, $sort, $msgs, $imapConnection, - $mailbox, $data_dir, $username, $thread_sort_messages, - $allow_server_sort, $server_sort_array; - $result = -1; - if (!is_array($server_sort_array)) { - $thread_sort_messages = 0; - $allow_server_sort = FALSE; +function findPreviousMessage($uidset, $passed_id) { + if (!is_array($uidset)) { + return -1; } - if ($thread_sort_messages == 1 || $allow_server_sort == TRUE) { - reset($server_sort_array); - while(list($key, $value) = each ($server_sort_array)) { - if ($currentArrayIndex == $value) { - if ($key == 0) { - $result = -1; - break; - } - $result = $server_sort_array[$key -1]; - break; - } - } - } - elseif ($sort == 6 && $allow_server_sort != TRUE && - $thread_sort_messages != 1) { - $numMessages = sqimap_get_num_messages($imapConnection, $mailbox); - if ($currentArrayIndex != $numMessages) { - $result = $currentArrayIndex + 1; - } - } - elseif ($thread_sort_messages != 1 && $allow_server_sort != TRUE) { - if (!is_array($msort)) { - return -1; - } - for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) { - if ($currentArrayIndex == $msgs[$key]['ID']) { - prev($msort); - $key = key($msort); - if (isset($key)) { - $result = $msgs[$key]['ID']; - break; - } - } - } + $result = sqm_array_get_value_by_offset($uidset,$passed_id,-1); + if ($result === false) { + return -1; + } else { + return $result; } - return ($result); } /** * Displays a link to a page where the message is displayed more * "printer friendly". + * @param string $mailbox Name of current mailbox + * @param int $passed_id */ -function printer_friendly_link() { - global $passed_id, $mailbox, $ent_num, $color, - $pf_subtle_link, - $javascript_on; +function printer_friendly_link($mailbox, $passed_id, $passed_ent_id) { + global $javascript_on, $show_html_default; - if (strlen(trim($mailbox)) < 1) { - $mailbox = 'INBOX'; + /* hackydiehack */ + if( !sqgetGlobalVar('view_unsafe_images', $view_unsafe_images, SQ_GET) ) { + $view_unsafe_images = false; + } else { + $view_unsafe_images = true; } - - $params = '?passed_ent_id=' . $ent_num . - '&mailbox=' . urlencode($mailbox) . - '&passed_id=' . $passed_id; + $params = '?passed_ent_id=' . urlencode($passed_ent_id) . + '&mailbox=' . urlencode($mailbox) . + '&passed_id=' . urlencode($passed_id) . + '&view_unsafe_images='. (bool) $view_unsafe_images . + '&show_html_default=' . $show_html_default; $print_text = _("View Printable Version"); - if (!$pf_subtle_link) { - /* The link is large, on the bottom of the header panel. */ - $result = '' . - '' . - ' ' . - ''."\n"; - } else { - /* The link is subtle, below "view full header". */ - $result = "
\n"; - } - + $result = ''; /* Output the link. */ if ($javascript_on) { - $result .= '\n" . - "$print_text\n"; + $result = '\n" . + "$print_text\n"; } else { - $result .= '$print_text\n"; + $result = '$print_text\n"; } + return $result; +} + +function view_as_html_link($mailbox, $passed_id, $passed_ent_id, $message) { + global $base_uri, $show_html_default; - if (!$pf_subtle_link) { - /* The link is large, on the bottom of the header panel. */ - $result .= '' . "\n"; + $has_html = false; + if ($message->header->type0 == 'message' && $message->header->type1 == 'rfc822') { + $type0 = $message->rfc822_header->content_type->type0; + $type1 = $message->rfc822_header->content_type->type1; + } else { + $type0 = $message->header->type0; + $type1 = $message->header->type1; + } + if($type0 == 'multipart' && + ($type1 == 'alternative' || $type1 == 'mixed' || $type1 == 'related')) { + if ($message->findDisplayEntity(array(), array('text/html'), true)) { + $has_html = true; + } } + /* + * Normal single part message so check its type. + */ + else { + if($type0 == 'text' && $type1 == 'html') { + $has_html = true; + } + } + if($has_html == true) { + $vars = array('passed_ent_id', 'show_more', 'show_more_cc', 'override_type0', 'override_type1', 'startMessage'); + + $new_link = $base_uri . 'src/read_body.php?passed_id=' . urlencode($passed_id) . + '&passed_ent_id=' . urlencode($passed_ent_id) . + '&mailbox=' . urlencode($mailbox); + foreach($vars as $var) { + if(sqgetGlobalVar($var, $temp)) { + $new_link .= '&' . $var . '=' . urlencode($temp); + } + } - return ($result); + if($show_html_default == 1) { + $new_link .= '&show_html_default=0'; + $link = _("View as plain text"); + } else { + $new_link .= '&show_html_default=1'; + $link = _("View as HTML"); + } + return ' | ' . $link . ''; + } + return ''; } -function ServerMDNSupport( $read ) { - /* escaping $ doesn't work -> \x36 */ - $ret = preg_match( '/(\x36MDNSent|\\\*)/i', $read ); - return ( $ret ); +function ServerMDNSupport($aFlags) { + /* escaping $ doesn't work -> \x36 */ + return ( in_array('$mdnsent',$aFlags,true) || + in_array('\\*',$aFlags,true) ) ; } -function SendMDN ( $recipient , $sender) { - global $imapConnection, $mailbox, $username, $attachment_dir, $SERVER_NAME, - $version, $attachments, $identity, $data_dir, $passed_id; +function SendMDN ( $mailbox, $passed_id, $sender, $message, $imapConnection) { + global $username, $attachment_dir, $popuser, $username, $color, + $version, $squirrelmail_language, $default_charset, + $languages, $useSendmail, $domain, $sent_folder; - $header = sqimap_get_message_header($imapConnection, $passed_id, $mailbox); - $hashed_attachment_dir = getHashedDir($username, $attachment_dir); + sqgetGlobalVar('SERVER_NAME', $SERVER_NAME, SQ_SERVER); - // part 1 (RFC2298) + $header = $message->rfc822_header; + + $rfc822_header = new Rfc822Header(); + $content_type = new ContentType('multipart/report'); + $content_type->properties['report-type']='disposition-notification'; + + set_my_charset(); + if ($default_charset) { + $content_type->properties['charset']=$default_charset; + } + $rfc822_header->content_type = $content_type; + $rfc822_header->to[] = $header->dnt; + $rfc822_header->subject = _("Read:") . ' ' . encodeHeader($header->subject); + + // Patch #793504 Return Receipt Failing with <@> from Tim Craig (burny_md) + // This merely comes from compose.php and only happens when there is no + // email_addr specified in user's identity (which is the startup config) + if (ereg("^([^@%/]+)[@%/](.+)$", $username, $usernamedata)) { + $popuser = $usernamedata[1]; + $domain = $usernamedata[2]; + unset($usernamedata); + } else { + $popuser = $username; + } + $reply_to = ''; + $ident = get_identities(); + if(!isset($identity)) $identity = 0; + $full_name = $ident[$identity]['full_name']; + $from_mail = $ident[$identity]['email_address']; + $from_addr = '"'.$full_name.'" <'.$from_mail.'>'; + $reply_to = $ident[$identity]['reply_to']; + + if (!$from_mail) { + $from_mail = "$popuser@$domain"; + $from_addr = $from_mail; + } + $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true); + if ($reply_to) { + $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true); + } + + // part 1 (RFC2298) $senton = getLongDateString( $header->date ); $to_array = $header->to; $to = ''; foreach ($to_array as $line) { - $to .= " $line "; + $to .= ' '.$line->getAddress(); } - - $subject = $header->subject; $now = getLongDateString( time() ); - set_my_charset(); - $body = _("Your message") . "\r\n\r\n" . - "\t" . _("To:") . ' ' . $to . "\r\n" . - "\t" . _("Subject:") . ' ' . $subject . "\r\n" . - "\t" . _("Sent:") . ' ' . $senton . "\r\n" . + "\t" . _("To") . ': ' . decodeHeader($to,false,false) . "\r\n" . + "\t" . _("Subject") . ': ' . decodeHeader($header->subject,false,false) . "\r\n" . + "\t" . _("Sent") . ': ' . $senton . "\r\n" . "\r\n" . sprintf( _("Was displayed on %s"), $now ); - // part2 (RFC2298) + $special_encoding = ''; + if (isset($languages[$squirrelmail_language]['XTRA_CODE']) && + function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode')) { + $body = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode', $body); + if (strtolower($default_charset) == 'iso-2022-jp') { + if (mb_detect_encoding($body) == 'ASCII') { + $special_encoding = '8bit'; + } else { + $body = mb_convert_encoding($body, 'JIS'); + $special_encoding = '7bit'; + } + } + } elseif (sq_is8bit($body)) { + $special_encoding = '8bit'; + } + $part1 = new Message(); + $part1->setBody($body); + $mime_header = new MessageHeader; + $mime_header->type0 = 'text'; + $mime_header->type1 = 'plain'; + if ($special_encoding) { + $mime_header->encoding = $special_encoding; + } else { + $mime_header->encoding = 'us-ascii'; + } + if ($default_charset) { + $mime_header->parameters['charset'] = $default_charset; + } + $part1->mime_header = $mime_header; - $original_recipient = $to; + // part2 (RFC2298) + $original_recipient = $to; $original_message_id = $header->message_id; - $part2 = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n"; + $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n"; if ($original_recipient != '') { - $part2 .= "Original-Recipient : $original_recipient\r\n"; + $report .= "Original-Recipient : $original_recipient\r\n"; } $final_recipient = $sender; - $part2 .= "Final-Recipient: rfc822; $final_recipient\r\n" . + $report .= "Final-Recipient: rfc822; $final_recipient\r\n" . "Original-Message-ID : $original_message_id\r\n" . "Disposition: manual-action/MDN-sent-manually; displayed\r\n"; + $part2 = new Message(); + $part2->setBody($report); + $mime_header = new MessageHeader; + $mime_header->type0 = 'message'; + $mime_header->type1 = 'disposition-notification'; + $mime_header->encoding = 'us-ascii'; + $part2->mime_header = $mime_header; + + $composeMessage = new Message(); + $composeMessage->rfc822_header = $rfc822_header; + $composeMessage->addEntity($part1); + $composeMessage->addEntity($part2); + + + if ($useSendmail) { + require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php'); + global $sendmail_path; + $deliver = new Deliver_SendMail(); + $stream = $deliver->initStream($composeMessage,$sendmail_path); + } else { + require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php'); + $deliver = new Deliver_SMTP(); + global $smtpServerAddress, $smtpPort, $pop_before_smtp; + $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false; + get_smtp_user($user, $pass); + $stream = $deliver->initStream($composeMessage,$domain,0, + $smtpServerAddress, $smtpPort, $user, $pass, $authPop); + } + $success = false; + if ($stream) { + $length = $deliver->mail($composeMessage, $stream); + $success = $deliver->finalizeStream($stream); + } + if (!$success) { + $msg = $deliver->dlv_msg; + if (! empty($deliver->dlv_server_msg)) { + $msg.= '
' . + _("Server replied:") . ' ' . $deliver->dlv_ret_nr . ' ' . + nl2br(htmlspecialchars($deliver->dlv_server_msg)); + } + require_once(SM_PATH . 'functions/display_messages.php'); + plain_error_message($msg, $color); + } else { + unset ($deliver); + if (sqimap_mailbox_exists ($imapConnection, $sent_folder)) { + $sid = sqimap_append ($imapConnection, $sent_folder, $length); + require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); + $imap_deliver = new Deliver_IMAP(); + $imap_deliver->mail($composeMessage, $imapConnection); + sqimap_append_done ($imapConnection, $sent_folder); + unset ($imap_deliver); + } + } + return $success; +} - $localfilename = GenerateRandomString(32, 'FILE', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - - $fp = fopen( $full_localfilename, 'w'); - fwrite ($fp, $part2); - fclose($fp); - - $newAttachment = array(); - $newAttachment['localfilename'] = $localfilename; - $newAttachment['type'] = "message/disposition-notification"; - $newAttachment['session']=-1; - $attachments[] = $newAttachment; - $MDN_to = trim($recipient); - $reply_id = 0; - - return (SendMessage($MDN_to, '', '', _("Read:") . ' ' . $subject, - $body, $reply_id, True, 3, -1) ); +function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id) { + $sg = $set?'+':'-'; + $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)'; + $read = sqimap_run_command ($imapConnection, $cmd, true, $response, + $readmessage, TRUE); } +function formatRecipientString($recipients, $item ) { + global $show_more_cc, $show_more, $show_more_bcc, + $PHP_SELF; -function ToggleMDNflag ( $set ) { - global $imapConnection, $passed_id, $mailbox; - sqimap_mailbox_select($imapConnection, $mailbox); - $sg = $set?'+':'-'; - $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)'; - $read = sqimap_run_command ($imapConnection, $cmd, true, $response, - $readmessage); -} + $string = ''; + if ((is_array($recipients)) && (isset($recipients[0]))) { + $show = false; -function ClearAttachments() { - global $username, $attachments, $attachment_dir; - - $hashed_attachment_dir = getHashedDir($username, $attachment_dir); - - $rem_attachments = array(); - foreach ($attachments as $info) { - if ($info->session == -1) { - $attached_file = "$hashed_attachment_dir/$info[localfilename]"; - if (file_exists($attached_file)) { - unlink($attached_file); - } - } else { - $rem_attachments[] = $info; - } - } - $attachments = $rem_attachments; -} + if ($item == 'to') { + if ($show_more) { + $show = true; + $url = set_url_var($PHP_SELF, 'show_more',0); + } else { + $url = set_url_var($PHP_SELF, 'show_more',1); + } + } else if ($item == 'cc') { + if ($show_more_cc) { + $show = true; + $url = set_url_var($PHP_SELF, 'show_more_cc',0); + } else { + $url = set_url_var($PHP_SELF, 'show_more_cc',1); + } + } else if ($item == 'bcc') { + if ($show_more_bcc) { + $show = true; + $url = set_url_var($PHP_SELF, 'show_more_bcc',0); + } else { + $url = set_url_var($PHP_SELF, 'show_more_bcc',1); + } + } -function formatRecipientString($recipients, $item ) { - global $base_uri, $passed_id, $urlMailbox, $startMessage, $show_more_cc, - $echo_more, $echo_less, $show_more, $show_more_bcc, $sort; - - $i = 0; - $url_string = ''; - - if (isset ($recipients[0]) && trim($recipients[0])) { - $string = ''; - $ary = $recipients; - - switch ($item) { - case 'to': - $show = "&show_more=1&show_more_cc=$show_more_cc&". - "show_more_bcc=$show_more_bcc"; - $show_n = "&show_more=0&show_more_cc=$show_more_cc&". - "show_more_bcc=$show_more_bcc"; - break; - case 'cc': - $show = "&show_more=$show_more&show_more_cc=1&". - "show_more_bcc=$show_more_bcc"; - $show_n = "&show_more=$show_more&show_more_cc=0&". - "show_more_bcc=$show_more_bcc"; - $show_more = $show_more_cc; - break; - case 'bcc': - $show = "&show_more=$show_more&show_more_cc=$show_more_cc". - "&show_more_bcc=1"; - $show_n = "&show_more=$show_more&show_more_cc=". - "$show_more_cc&show_more_bcc=0"; - $show_more = $show_more_bcc; - break; - default: - $break; + $cnt = count($recipients); + foreach($recipients as $r) { + $add = decodeHeader($r->getAddress(true)); + if ($string) { + $string .= '
' . $add; + } else { + $string = $add; + if ($cnt > 1) { + $string .= ' ('._("less").')'; + } else { + $string .= '">'._("more").')'; + break; + } + } + } } - - while ($i < count($ary)) { - $ary[$i] = decodeHeader(htmlspecialchars($ary[$i])); - $url_string .= $ary[$i]; - if ($string) { - $string = "$string
$ary[$i]"; - } else { - $string = "$ary[$i]"; - } - - $i++; - if (count($ary) > 1) { - if ($show_more == false) { - if ($i == 1) { - /* From a search... */ - $string .= ' ($echo_more)"; - } else { - $string .= "sort=$sort&startMessage=". - "$startMessage"."$show\">$echo_more)"; + } + return $string; +} + +function formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, + $color, $FirstTimeSee) { + global $default_use_mdn, $default_use_priority, + $show_xmailer_default, $mdn_user_support, $PHP_SELF, $javascript_on, + $squirrelmail_language; + + $mailbox = $aMailbox['NAME']; + + $header = $message->rfc822_header; + $env = array(); + $env[_("Subject")] = str_replace(" "," ",decodeHeader($header->subject)); + + $from_name = $header->getAddr_s('from'); + if (!$from_name) + $from_name = $header->getAddr_s('sender'); + if (!$from_name) + $env[_("From")] = _("Unknown sender"); + else + $env[_("From")] = decodeHeader($from_name); + $env[_("Date")] = getLongDateString($header->date); + $env[_("To")] = formatRecipientString($header->to, "to"); + $env[_("Cc")] = formatRecipientString($header->cc, "cc"); + $env[_("Bcc")] = formatRecipientString($header->bcc, "bcc"); + if ($default_use_priority) { + $env[_("Priority")] = htmlspecialchars(getPriorityStr($header->priority)); + } + if ($show_xmailer_default) { + $env[_("Mailer")] = decodeHeader($header->xmailer); + } + if ($default_use_mdn) { + if ($mdn_user_support) { + if ($header->dnt) { + if ($message->is_mdnsent) { + $env[_("Read receipt")] = _("sent"); + } else { + $env[_("Read receipt")] = _("requested"); + if (!(handleAsSent($mailbox) || + $message->is_deleted || + $passed_ent_id)) { + $mdn_url = $PHP_SELF . '&sendreceipt=1'; + if ($FirstTimeSee && $javascript_on) { + $script = ''. "\n"; + echo $script; } - $i = count($ary); - } - } else if ($i == 1) { - /* From a search... */ - $string .= ' ($echo_less)"; - } else { - $string .= "sort=$sort&startMessage=$startMessage". - "$show_n\">$echo_less)"; - } + $env[_("Read receipt")] .= ' [' . + _("Send read receipt now") . ']'; + } } - } + } } } - else { - $string = ''; + + $s = ''; + foreach ($env as $key => $val) { + if ($val) { + $s .= ''; + $s .= html_tag('td', '' . $key . ':  ', 'right', '', 'valign="top" width="20%"') . "\n"; + $s .= html_tag('td', $val, 'left', '', 'valign="top" width="80%"') . "\n"; + $s .= ''; + } } - $url_string = urlencode($url_string); - $result = array(); - $result['str'] = $string; - $result['url_str'] = $url_string; - return $result; + echo '
'."\n"; + echo '
'."\n"; + echo $s; + do_hook('read_body_header'); + formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color); + echo '
'; + echo ''."\n"; + echo ''; } +/** + * Format message toolbar + * + * @param string $mailbox Name of current mailbox + * @param int $passed_id UID of current message + * @param int $passed_ent_id Id of entity within message + * @param object $message Current message object + * @param object $mbx_response + */ +function formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, $removedVar, $nav_on_top = TRUE) { + global $base_uri, $draft_folder, $where, $what, $color, $sort, + $startMessage, $PHP_SELF, $save_as_draft, + $enable_forward_as_attachment, $imapConnection, $lastTargetMailbox, + $username, $delete_prev_next_display, + $compose_new_win, $javascript_on, $compose_width, $compose_height; + + //FIXME cleanup argument list, use $aMailbox where possible + $mailbox = $aMailbox['NAME']; + + $topbar_delimiter = ' | '; + $double_delimiter = '    '; + $urlMailbox = urlencode($mailbox); + + $msgs_url = $base_uri . 'src/'; + + // BEGIN NAV ROW - PREV/NEXT, DEL PREV/NEXT, LINKS TO INDEX, etc. + $nav_row = ''; + + // Create Prev & Next links + // Handle nested entities first (i.e. Mime Attach parts) + if (isset($passed_ent_id) && $passed_ent_id) { + // code for navigating through attached message/rfc822 messages + $url = set_url_var($PHP_SELF, 'passed_ent_id',0); + $entities = array(); + $entity_count = array(); + $c = 0; + + foreach($message->parent->entities as $ent) { + if ($ent->type0 == 'message' && $ent->type1 == 'rfc822') { + $c++; + $entity_count[$c] = $ent->entity_id; + $entities[$ent->entity_id] = $c; + } + } + $prev_link = _("Previous"); + if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] > 1) { + $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1]; + $prev_link = '' . $prev_link . ''; + } -/* - * Main of read_boby.php -------------------------------------------------- - */ + $next_link = _("Next"); + if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] < $c) { + $next_ent_id = $entity_count[$entities[$passed_ent_id] + 1]; + $next_link = '' . $next_link . ''; + } -/* - Urled vars - ---------- - $passed_id -*/ + $par_ent_id = $message->parent->entity_id; + $up_link = ''; + if ($par_ent_id) { + $par_ent_id = substr($par_ent_id,0,-2); + if ( $par_ent_id != 0 ) { + $up_link = $topbar_delimiter; + $url = set_url_var($PHP_SELF, 'passed_ent_id',$par_ent_id); + $up_link .= ''._("Up").''; + } + } -if (isset($mailbox)){ - $mailbox = urldecode( $mailbox ); -} -$imapConnection = sqimap_login($username, $key, $imapServerAddress, - $imapPort, 0); -$read = sqimap_mailbox_select($imapConnection, $mailbox, false, false, true); + $nav_row .= $prev_link . $up_link . $topbar_delimiter . $next_link; + $nav_row .= $double_delimiter . '['._("View Message").']'; + + // Prev/Next links for regular messages + } else if ( true ) { //!(isset($where) && isset($what)) ) { + $prev = findPreviousMessage($aMailbox['UIDSET'][$what], $passed_id); + $next = findNextMessage($aMailbox['UIDSET'][$what],$passed_id); + + $prev_link = _("Previous"); + if ($prev >= 0) { + $uri = $base_uri . 'src/read_body.php?passed_id='.$prev. + '&mailbox='.$urlMailbox.'&sort='.$sort. + "&where=$where&what=$what" . + '&startMessage='.$startMessage.'&show_more=0'; + $prev_link = ''.$prev_link.''; + } -do_hook('html_top'); + $next_link = _("Next"); + if ($next >= 0) { + $uri = $base_uri . 'src/read_body.php?passed_id='.$next. + '&mailbox='.$urlMailbox.'&sort='.$sort. + "&where=$where&what=$what" . + '&startMessage='.$startMessage.'&show_more=0'; + $next_link = ''.$next_link.''; + } -/* - * The following code sets necesarry stuff for the MDN thing - */ -if($default_use_mdn && - ($mdn_user_support = getPref($data_dir, $username, 'mdn_user_support', - $default_use_mdn))) { - - $supportMDN = ServerMDNSupport($read["PERMANENTFLAGS"]); - $flags = sqimap_get_flags ($imapConnection, $passed_id); - $FirstTimeSee = !(in_array( 'Seen', $flags )); -} + // Only bother with Delete & Prev and Delete & Next IF + // top display is enabled. + if ( $delete_prev_next_display == 1 && + in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) { + $del_prev_link = _("Delete & Prev"); + if ($prev >= 0) { + $uri = $base_uri . 'src/read_body.php?passed_id='.$prev. + '&mailbox='.$urlMailbox.'&sort='.$sort. + '&startMessage='.$startMessage.'&show_more=0'. + "&where=$where&what=$what" . + '&delete_id='.$passed_id; + $del_prev_link = ''.$del_prev_link.''; + } -displayPageHeader($color, $mailbox); + $del_next_link = _("Delete & Next"); + if ($next >= 0) { + $uri = $base_uri . 'src/read_body.php?passed_id='.$next. + '&mailbox='.$urlMailbox.'&sort='.$sort. + '&startMessage='.$startMessage.'&show_more=0'. + "&where=$where&what=$what" . + '&delete_id='.$passed_id; + $del_next_link = ''.$del_next_link.''; + } + } + $nav_row .= '['.$prev_link.$topbar_delimiter.$next_link.']'; + if ( isset($del_prev_link) && isset($del_next_link) ) + $nav_row .= $double_delimiter.'['.$del_prev_link.$topbar_delimiter.$del_next_link.']'; + } -/* - * The following code shows the header of the message and then exit - */ -if (isset($view_hdr)) { - $read=sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[HEADER]", - true, $a, $b); - - echo '
' . - '' . "\n" . - "
". - _("Viewing Full Header") . ' - '. - ''; + // Start with Search Results or Message List link. + $msgs_url .= "$where?where=read_body.php&what=$what&mailbox=" . $urlMailbox. + "&startMessage=$startMessage"; + if ($where == 'search.php') { + $msgs_str = _("Search Results"); } else { - echo "&passed_id=$passed_id&startMessage=$startMessage". - "&show_more=$show_more\">"; + $msgs_str = _("Message List"); } - echo _("View message") . "
\n". - "\n". - ''; + + + // BEGIN MENU ROW - DELETE/REPLY/FORWARD/MOVE/etc. + $menu_row = '
'; - - $cnum = 0; - for ($i=1; $i < count($read); $i++) { - $line = htmlspecialchars($read[$i]); - if (eregi("^>", $line)) { - $second[$i] = $line; - $first[$i] = ' '; - $cnum++; - } else if (eregi("^[ |\t]", $line)) { - $second[$i] = $line; - $first[$i] = ''; - } else if (eregi("^([^:]+):(.+)", $line, $regs)) { - $first[$i] = $regs[1] . ':'; - $second[$i] = $regs[2]; - $cnum++; - } else { - $second[$i] = trim($line); - $first[$i] = ''; - } - } - for ($i=0; $i < count($second); $i = $j) { - if (isset($first[$i])) { - $f = $first[$i]; - } - if (isset($second[$i])) { - $s = nl2br($second[$i]); + $nav_row .= $double_delimiter . + '[' . $msgs_str . ']'; + + $nav_row .= '
'; + $comp_uri = $base_uri.'src/compose.php' . + '?passed_id=' . $passed_id . + '&mailbox=' . $urlMailbox . + '&startMessage=' . $startMessage . + (isset($passed_ent_id) ? '&passed_ent_id='.$passed_ent_id : ''); + + // Start form for reply/reply all/forward.. + $target = ''; + $on_click=''; + $method='method="post" '; + $onsubmit=''; + if ($compose_new_win == '1') { + if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) { + $compose_width = '640'; } - $j = $i + 1; - while (($first[$j] == '') && ($j < count($first))) { - $s .= '    ' . nl2br($second[$j]); - $j++; + if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) { + $compose_height = '550'; } - parseEmail($s); - if (isset($f)) { - echo "$f$s"; + if ( $javascript_on ) { + $on_click=' onclick="comp_in_new_form(\''.$comp_uri.'\', this, this.form,'. $compose_width .',' . $compose_height .')"'; + $comp_uri = 'javascript:void(0)'; + $method='method="get" '; + $onsubmit = 'onsubmit="return false" '; + } else { + $target = 'target="_blank"'; } } - echo "
\n" . - ''; - sqimap_logout($imapConnection); - exit; -} - -if (isset($msgs)) { - $currentArrayIndex = $passed_id; -} else { - $currentArrayIndex = -1; -} -for ($i = 0; $i < count($msgs); $i++) { - if ($msgs[$i]['ID'] == $passed_id) { - $msgs[$i]['FLAG_SEEN'] = true; + $menu_row .= "\n".'
'."\n"; + + // If Draft folder - create Resume link + if (($mailbox == $draft_folder) && ($save_as_draft)) { + $new_button = 'smaction_draft'; + $comp_alt_string = _("Resume Draft"); + } else if (handleAsSent($mailbox)) { + // If in Sent folder, edit as new + $new_button = 'smaction_edit_new'; + $comp_alt_string = _("Edit Message as New"); } -} - -/** - * $message contains all information about the message - * including header and body - */ -$message = sqimap_get_message($imapConnection, $passed_id, $mailbox); - -/** translate the subject and mailbox into url-able text **/ -$url_subj = urlencode(trim($message->header->subject)); -$urlMailbox = urlencode($mailbox); -$url_replyto = ''; -if (isset($message->header->replyto)) { - $url_replyto = urlencode($message->header->replyto); -} - -$url_replytoall = $url_replyto; + // Show Alt URI for Draft/Sent + if (isset($comp_alt_string)) + $menu_row .= getButton('submit', $new_button, $comp_alt_string, $on_click) . "\n"; + + $menu_row .= getButton('submit', 'smaction_reply', _("Reply"), $on_click) . "\n"; + $menu_row .= getButton('submit', 'smaction_reply_all', _("Reply All"), $on_click) ."\n"; + $menu_row .= getButton('submit', 'smaction_forward', _("Forward"), $on_click); + if ($enable_forward_as_attachment) + $menu_row .= '' . _("As Attachment") .'  '."\n"; + + $menu_row .= '
 '; + + if ( in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) { + // Form for deletion. Form is handled by the originating display in $where. This is right_main.php or search.php + $delete_url = $base_uri . "src/$where"; + $menu_row .= '
'; + + if (!(isset($passed_ent_id) && $passed_ent_id)) { + $menu_row .= addHidden('mailbox', $aMailbox['NAME']); + $menu_row .= addHidden('msg[0]', $passed_id); + $menu_row .= addHidden('startMessage', $startMessage); + $menu_row .= getButton('submit', 'delete', _("Delete")); + $menu_row .= '' . _("Bypass Trash"); + } else { + $menu_row .= getButton('submit', 'delete', _("Delete"), '', FALSE) . "\n"; // delete button is disabled + } -/** - * If we are replying to all, then find all other addresses and - * add them to the list. Remove duplicates. - * This is somewhat messy, so I'll explain: - * 1) Take all addresses (from, to, cc) (avoid nasty join errors here) - */ -$url_replytoall_extra_addrs = array_merge( - array($message->header->from), - $message->header->to, - $message->header->cc - ); + $menu_row .= '
'; + } -/** - * 2) Make one big string out of them - */ -$url_replytoall_extra_addrs = join(';', $url_replytoall_extra_addrs); + // Add top move link + $menu_row .= '
'; + if ( !(isset($passed_ent_id) && $passed_ent_id) && + in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) { -/** - * 3) Parse that into an array of addresses - */ -$url_replytoall_extra_addrs = parseAddrs($url_replytoall_extra_addrs); + $menu_row .= '
'. + ''. -/** - * 4) Make them unique -- weed out duplicates - * (Coded for PHP 4.0.0) - */ -$url_replytoall_extra_addrs = - array_keys(array_flip($url_replytoall_extra_addrs)); + addHidden('mailbox',$aMailbox['NAME']) . + addHidden('msg[0]', $passed_id) . _("Move to:") . + ' '; -$url_replytoall_avoid_addrs = parseAddrs($url_replytoall_avoid_addrs); -foreach ($url_replytoall_avoid_addrs as $addr) { - RemoveAddress($url_replytoall_extra_addrs, $addr); -} + $menu_row .= getButton('submit', 'moveButton',_("Move")) . "\n" . ''; + } + $menu_row .= ''; -/** - * 6) Remove our identities from the CC list (they still can be in the - * TO list) only if $include_self_reply_all is turned off - */ -if (!$include_self_reply_all) { - RemoveAddress($url_replytoall_extra_addrs, - getPref($data_dir, $username, 'email_address')); - $idents = getPref($data_dir, $username, 'identities'); - if ($idents != '' && $idents > 1) { - for ($i = 1; $i < $idents; $i ++) { - $cur_email_address = getPref($data_dir, $username, - 'email_address' . $i); - RemoveAddress($url_replytoall_extra_addrs, $cur_email_address); + // echo rows, with hooks + $ret = do_hook_function('read_body_menu_top', array($nav_row, $menu_row)); + if (is_array($ret)) { + if (isset($ret[0]) && !empty($ret[0])) { + $nav_row = $ret[0]; + } + if (isset($ret[1]) && !empty($ret[1])) { + $menu_row = $ret[1]; } } + echo ''; + echo $nav_on_top ? $nav_row . $menu_row : $menu_row . $nav_row; + echo '
'."\n"; + do_hook('read_body_menu_bottom'); } -/** - * 7) Smoosh back into one nice line - */ -$url_replytoallcc = getLineOfAddrs($url_replytoall_extra_addrs); - -/** - * 8) urlencode() it - */ -$url_replytoallcc = urlencode($url_replytoallcc); - -$dateString = getLongDateString($message->header->date); +function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) { + global $base_uri, $where, $what, $download_and_unsafe_link; -/** - * What do we reply to -- text only, if possible - */ -$ent_num = findDisplayEntity($message); + $urlMailbox = urlencode($mailbox); + $urlPassed_id = urlencode($passed_id); + $urlPassed_ent_id = urlencode($passed_ent_id); -/** TEXT STRINGS DEFINITIONS **/ -$echo_more = _("more"); -$echo_less = _("less"); + $query_string = 'mailbox=' . $urlMailbox . '&passed_id=' . $urlPassed_id . '&passed_ent_id=' . $urlPassed_ent_id; -if (!isset($show_more_cc)) { - $show_more_cc = FALSE; -} + if (!empty($where)) { + $query_string .= '&where=' . urlencode($where); + } -if (!isset($show_more_bcc)) { - $show_more_bcc = FALSE; -} + if (!empty($what)) { + $query_string .= '&what=' . urlencode($what); + } -/** FORMAT THE TO STRING **/ -$to = formatRecipientString($message->header->to, "to"); -$to_string = $to['str']; -$url_to_string = $to['url_str']; + $url = $base_uri.'src/view_header.php?'.$query_string; + $s = "\n" . + html_tag( 'td', '', 'right', '', 'valign="middle" width="20%"' ) . '' . _("Options") . ":  \n" . + html_tag( 'td', '', 'left', '', 'valign="middle" width="80%"' ) . '' . + ''._("View Full Header").''; -/** FORMAT THE CC STRING **/ + /* Output the printer friendly link if we are in subtle mode. */ + $s .= ' | ' . + printer_friendly_link($mailbox, $passed_id, $passed_ent_id); + echo $s; + echo view_as_html_link($mailbox, $passed_id, $passed_ent_id, $message); -$cc = formatRecipientString($message->header->cc, "cc"); -$cc_string = $cc['str']; -$url_cc_string = $cc['url_str']; + /* Output the download and/or unsafe images link/-s, if any. */ + if ($download_and_unsafe_link) { + echo $download_and_unsafe_link; + } -/** FORMAT THE BCC STRING **/ + do_hook("read_body_header_right"); + $s = "\n" . + "\n"; + echo $s; -$bcc = formatRecipientString($message->header->bcc, "bcc"); -$bcc_string = $bcc['str']; -$url_bcc_string = $bcc['url_str']; +} -if ($default_use_priority) { - $priority_level = substr($message->header->priority,0,1); +/** + * Creates button + * + * @deprecated see form functions available in 1.5.1 and 1.4.3. + * @param string $type + * @param string $name + * @param string $value + * @param string $js + * @param bool $enabled + */ +function getButton($type, $name, $value, $js = '', $enabled = TRUE) { + $disabled = ( $enabled ? '' : 'disabled ' ); + $js = ( $js ? $js.' ' : '' ); + return ''; +} - switch($priority_level) { - /* check for a higher then normal priority. */ - case '1': - case '2': - $priority_string = _("High"); - break; - /* check for a lower then normal priority. */ - case '4': - case '5': - $priority_string = _("Low"); - break; +/***************************/ +/* Main of read_body.php */ +/***************************/ - /* check for a normal priority. */ - case '3': - default: - $priority_level = '3'; - $priority_string = _("Normal"); - break; +/* get the globals we may need */ - } +sqgetGlobalVar('key', $key, SQ_COOKIE); +sqgetGlobalVar('username', $username, SQ_SESSION); +sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION); +sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION); +sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION); +sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION); +if (!sqgetGlobalVar('messages', $messages, SQ_SESSION) ) { + $messages = array(); } - -/** make sure everything will display in HTML format **/ -$from_name = decodeHeader(htmlspecialchars($message->header->from)); -$subject = decodeHeader(htmlspecialchars($message->header->subject)); -$identity = ''; -$idents = getPref($data_dir, $username, 'identities'); -if (!empty($idents) && $idents > 1) { - for ($i = 1; $i < $idents; $i++) { - $enc_from_name = '"'. - encodeHeader(getPref($data_dir, - $username, - 'full_name' . $i)) . - '" <' . getPref($data_dir, $username, - 'email_address' . $i) . '>'; - if (htmlspecialchars($enc_from_name) == $from_name) { - $identity = $i; - break; - } - } +sqgetGlobalVar('delayed_errors', $delayed_errors, SQ_SESSION); +if (is_array($delayed_errors)) { + $oErrorHandler->AssignDelayedErrors($delayed_errors); + sqsession_unregister("delayed_errors"); +} +/** GET VARS */ +sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET); +if (!sqgetGlobalVar('where', $where, SQ_GET) ) { + $where = 'right_main.php'; +} +/* + * Used as entry key to the list of uid's cached in the mailbox cache + * we use the cached uid's to get the next and prev message. + */ +if (!sqgetGlobalVar('what', $what, SQ_GET) ){ + $what = 0; +} +if ( sqgetGlobalVar('show_more', $temp, SQ_GET) ) { + $show_more = (int) $temp; +} +if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET) ) { + $show_more_cc = (int) $temp; +} +if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET) ) { + $show_more_bcc = (int) $temp; +} +if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET) ) { + $view_hdr = (int) $temp; } -do_hook('read_body_top'); -echo '
' . - '' . - '' . - '' . - '
' . - '' . - '' . - '' . - '' . - '' . - '
' . - '' . - '"; +if ( sqgetGlobalVar('account', $temp, SQ_GET) ) { + $iAccount = (int) $temp; } else { - echo "right_main.php?sort=$sort&startMessage=$startMessage&mailbox=$urlMailbox\">"; + $iAccount = 0; } -echo _("Message List") . - ' | ' . - ''; + +/** GET/POST VARS */ +sqgetGlobalVar('passed_ent_id', $passed_ent_id); +sqgetGlobalVar('mailbox', $mailbox); + +if ( sqgetGlobalVar('passed_id', $temp) ) { + $passed_id = (int) $temp; +} +if ( sqgetGlobalVar('sort', $temp) ) { + $sort = (int) $temp; +} +if ( sqgetGlobalVar('startMessage', $temp) ) { + $startMessage = (int) $temp; } else { - echo "sort=$sort&startMessage=$startMessage\">"; + $startMessage = 1; } -echo _("Delete") . ' '; -if (($mailbox == $draft_folder) && ($save_as_draft)) { - $comp_uri = $base_uri . "src/compose.php?mailbox=$mailbox&". - "identity=$identity&send_to=$url_to_string&". - "send_to_cc=$url_cc_string&send_to_bcc=$url_bcc_string&". - "subject=$url_subj&mailprio=$priority_level&". - "draft_id=$passed_id&ent_num=$ent_num"; - - if ($compose_new_win == '1') { - echo "'. - _("Resume Draft") . ''; +if(sqgetGlobalVar('show_html_default', $temp)) { + $show_html_default = (int) $temp; } -if ($mailbox == $sent_folder) { - $comp_uri = $base_uri . "src/compose.php?mailbox=$mailbox&". - "identity=$identity&send_to=$url_to_string&". - "send_to_cc=$url_cc_string&send_to_bcc=$url_bcc_string&". - "subject=$url_subj&mailprio=$priority_level&". - "ent_num=$ent_num&passed_id=$passed_id&edit_as_new=1"; - if ($compose_new_win == '1') { - echo "'. - _("Edit Message as New") . ''; +} else { + $view_unsafe_images = 0; } +/** + * Retrieve mailbox cache + */ +sqgetGlobalVar('mailbox_cache',$mailbox_cache,SQ_SESSION); -echo '  ' . - '' . - '' . - ''; +/* end of get globals */ +global $sqimap_capabilities, $lastTargetMailbox; -if ( !($where && $what) ) { - if ($currentArrayIndex == -1) { - echo 'Previous | Next'; - } else { - $prev = findPreviousMessage(); - $next = findNextMessage(); +$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); +$aMailbox = sqm_api_mailbox_select($imapConnection, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array()); - if ($prev != -1) { - echo '" . _("Previous") . " | "; - } else { - echo _("Previous") . ' | '; - } - if ($next != -1) { - echo '" . _("Next") . ""; - } else { - echo _("Next"); - } - } -} +/** + Start code to set the columns to fetch in case of hitting the next/prev link + The reason for this is the fact that the cache can be invalidated which means that the headers + to fetch aren't there anymore. Before they got calculated when the messagelist was shown. -echo '' . - '' . - '' ; - -$comp_uri = $base_uri . "src/compose.php?forward_id=$passed_id&". - "forward_subj=$url_subj&". - ($default_use_priority?"mailprio=$priority_level&":''). - "mailbox=$urlMailbox&ent_num=$ent_num"; - -if ($compose_new_win == '1') { - echo "'. - _("Forward") . - ' | '; - -$comp_uri = $base_uri . "src/compose.php?send_to=$url_replyto&". - "reply_subj=$url_subj&". - ($default_use_priority?"mailprio=$priority_level&":''). - "reply_id=$passed_id&mailbox=$urlMailbox&ent_num=$ent_num"; - -if ($compose_new_win == '1') { - echo " To in case it concerns a draft or sent folder + */ +$aColumns = array(); +if (($mailbox == $sent_folder || $mailbox == $draft_folder) && + !in_array(SQM_COL_TO,$index_order)) { + $aNewOrder = array(); // nice var name ;) + foreach($index_order as $iCol) { + if ($iCol == SQM_COL_FROM) { + $iCol = SQM_COL_TO; + } + $aColumns[$iCol] = array(); + } } else { - echo '| '. - _("Reply") . - ' | '; +$aProps = array( + 'columns' => $aColumns, // columns bound settings + 'config' => array( + 'highlight_list' => $message_highlight_list, // row highlighting rules + 'trash_folder' => $trash_folder, + 'sent_folder' => $sent_folder, + 'draft_folder' => $draft_folder)); -$comp_uri = $base_uri . "src/compose.php?send_to=$url_replytoall&". - "send_to_cc=$url_replytoallcc&reply_subj=$url_subj&". - ($default_use_priority?"mailprio=$priority_level&":''). - "reply_id=$passed_id&mailbox=$urlMailbox&ent_num=$ent_num"; +calcFetchColumns($aMailbox,$aProps); -if ($compose_new_win == '1') { - echo "'. - _("Reply All") . - '  ' . - '' . - '
' . - '
' . - '' . "\n" . - '' . "\n"; - -/** subject **/ -echo "\n" . - '' . - ' '; - -/** from **/ -echo '' . - '' . - ''; -/** date **/ -echo '' . "\n" . - '' . "\n" . - '' . "\n"; - -/** to **/ -echo "\n" . - "' . "\n" . - '' . "\n"; -/** cc **/ -if (isset($cc_string) && $cc_string <> '') { - echo '' . - "' . - '' . "\n"; +/** + * Check if cache is still valid, $what contains the key + * which gives us acces to the array with uid's. At this moment + * 0 is used for a normal message list and search uses 1 as key. This can be + * changed / extended in the future. + * If on a select of a mailbox we detect that the cache should be invalidated due to + * the delete of messages or due to new messages we empty the list with uid's and + * that's what we detect below. + */ +if (!is_array($aMailbox['UIDSET'][$what])) { + fetchMessageHeaders($imapConnection, $aMailbox); } -/** bcc **/ -if (isset($bcc_string) && $bcc_string <> '') { - echo ''. - "' . - '' . "\n"; -} -if ($default_use_priority && isset($priority_string) && $priority_string <> '' ) { - echo '' . - "' . - "" . "\n"; -} +$iSetIndex = $aMailbox['SETINDEX']; +$aMailbox['CURRENT_MSG'][$iSetIndex] = $passed_id; -if ($show_xmailer_default) { - $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY.PEEK[HEADER.FIELDS (X-Mailer User-Agent)]", true, - $response, $readmessage); - $mailer = substr($read[1], strpos($read[1], " ")); - if (trim($mailer)) { - echo '' . - "' . - "" . "\n"; - } +/** + * Update the seen state + * and ignore in_array('\\seen',$aMailbox['PERMANENTFLAGS'],true) + */ +if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) { + $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\seen'] = true; } -/* Output the printer friendly link if we are not in subtle mode. */ -if (!$pf_subtle_link) { - echo printer_friendly_link(true); +/** + * Process Delete from delete-move-next + * but only if delete_id was set + */ +if ( sqgetGlobalVar('delete_id', $delete_id, SQ_GET) ) { + handleMessageListForm($imapConnection,$aMailbox,$sButton='setDeleted', array($delete_id)); } -if ($default_use_mdn) { - if ($mdn_user_support) { - - // debug gives you the capability to remove mdn-flags - // $MDNDebug = false; - $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY.PEEK[HEADER.FIELDS (Disposition-Notification-To)]", true, - $response, $readmessage); - $MDN_to = substr($read[1], strpos($read[1], ' ')); - $MDN_flag_present = false; - - $read = sqimap_run_command ($imapConnection, "FETCH $passed_id FLAGS", true, - $response, $readmessage); - $MDN_flag_present = preg_match( '/.*\$MDNSent/i', $read[0]); - - if (trim($MDN_to) && - (!isset( $sendreceipt ) || $sendreceipt == '' ) ) { - - if ( $MDN_flag_present && $supportMDN) { - $sendreceipt = 'removeMDN'; - $url = "\"read_body.php?mailbox=$mailbox&passed_id=$passed_id&startMessage=$startMessage&show_more=$show_more&sendreceipt=$sendreceipt\""; - $sendreceipt=''; - /* - if ($MDNDebug ) { - echo '' . - "' . - '' . "\n"; - } else { - */ - echo '' . - "' . - '' . "\n"; - /* - } - */ - - } // when deleted or draft flag is set don't offer to send a MDN response - else if ( ereg('\\Draft',$read[0] || ereg('\\Deleted',$read[0])) ) { - echo '' . - "' . - '' . "\n"; - } - // if no MDNsupport don't use the annoying popup messages - else if ( !$FirstTimeSee ) { - $sendreceipt = 'send'; - $url = "\"read_body.php?mailbox=$mailbox&passed_id=$passed_id&startMessage=$startMessage&show_more=$show_more&sendreceipt=$sendreceipt\""; - echo '' . - "' . - '' . "\n"; - $sendreceipt=''; - } - else { - $sendreceipt = 'send'; - $url = "\"read_body.php?mailbox=$mailbox&passed_id=$passed_id&startMessage=$startMessage&show_more=$show_more&sendreceipt=$sendreceipt\""; - if ($javascript_on) { - echo "' . "\n"; - } - echo '' . - "' . - '' . "\n"; - $sendreceipt = ''; - } - } - - if ( !isset( $sendreceipt ) || $sendreceipt == '' ) { - } else if ( $sendreceipt == 'send' ) { - if ( !$MDN_flag_present) { - if (isset($identity) ) { - $final_recipient = getPref($data_dir, $username, 'email_address' . '0', '' ); - } else { - $final_recipient = getPref($data_dir, $username, 'email_address', '' ); - } - - $final_recipient = trim($final_recipient); - if ($final_recipient == '' ) { - $final_recipient = getPref($data_dir, $username, 'email_address', '' ); - } - - if ( SendMDN( $MDN_to, $final_recipient ) > 0 && $supportMDN ) { - ToggleMDNflag( true); - } - } - $sendreceipt = 'removeMDN'; - $url = "\"read_body.php?mailbox=$mailbox&passed_id=$passed_id&startMessage=$startMessage&show_more=$show_more&sendreceipt=$sendreceipt\""; - $sendreceipt=''; - /* - if ($MDNDebug && $supportMDN) { - echo " \n" . - " ' . "\n" . - ' ' . "\n"; - } else { - */ - echo " \n" . - " ' . "\n" . - ' ' . "\n"; - /* - } - */ - } - elseif ($sendreceipt == 'removeMDN' ) { - ToggleMDNflag ( false ); - - $sendreceipt = 'send'; - $url = "\"read_body.php?mailbox=$mailbox&passed_id=$passed_id&startMessage=$startMessage&show_more=$show_more&sendreceipt=$sendreceipt\""; - echo ''. - "' . - '' . "\n"; - $sendreceipt = ''; +/** + * $message contains all information about the message + * including header and body + */ - } +if (isset($aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'])) { + $message = $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT']; + $FirstTimeSee = !$message->is_seen; +} else { + $message = sqimap_get_message($imapConnection, $passed_id, $mailbox); + $FirstTimeSee = !$message->is_seen; + $message->is_seen = true; + $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message; +} +if (isset($passed_ent_id) && $passed_ent_id) { + $message = $message->getEntity($passed_ent_id); + if ($message->type0 != 'message' && $message->type1 != 'rfc822') { + $message = $message->parent; } + $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, TRUE); + $rfc822_header = new Rfc822Header(); + $rfc822_header->parseHeader($read); + $message->rfc822_header = $rfc822_header; +} else if ($message->type0 == 'message' && $message->type1 == 'rfc822' && isset($message->entities[0])) { + $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[1.HEADER]", true, $response, $msg, TRUE); + $rfc822_header = new Rfc822Header(); + $rfc822_header->parseHeader($read); + $message->rfc822_header = $rfc822_header; +} else { + $passed_ent_id = 0; } +$header = $message->header; + + +/****************************************/ +/* Block for handling incoming url vars */ +/****************************************/ + +if (isset($sendreceipt)) { + if ( !$message->is_mdnsent ) { + $final_recipient = ''; + if ((isset($identity)) && ($identity != 0)) //Main identity + $final_recipient = trim(getPref($data_dir, $username, 'email_address' . $identity, '' )); + if ($final_recipient == '' ) + $final_recipient = trim(getPref($data_dir, $username, 'email_address', '' )); + $supportMDN = ServerMDNSupport($aMailbox["PERMANENTFLAGS"]); + if ( SendMDN( $mailbox, $passed_id, $final_recipient, $message, $imapConnection ) > 0 && $supportMDN ) { + ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id); + $message->is_mdnsent = true; + $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message; + } + } +} +/***********************************************/ +/* End of block for handling incoming url vars */ +/***********************************************/ -do_hook('read_body_header'); - -echo '
\n" . - _("Subject:") . - "\n" . - "$subject \n" . - "'. - '
' . - _("From:") . - '' . - "$from_name \n" . - '
' . "\n" . - _("Date:") . - "\n" . - "$dateString \n" . - '
\n" . - _("To:") . - '' . "\n" . - "$to_string \n" . - '
" . - 'Cc:' . - "" . - "$cc_string " . - '
" . - 'Bcc:' . - "" . - "$bcc_string " . - '
" . - _("Priority") . ': '. - "" . - "$priority_string " . - '
" . - _("Mailer") . ': '. - "" . - "$mailer " . - '
" . - _("Read receipt") . ': ' . - "" . - '' . - _("send") . - " [" . _("Remove MDN flag") . '] ' . - '
" . - _("Read receipt") . ': ' . - "" . - ''._("send").''. - '
" . - _("Read receipt") . ': '. - "" . - '' . _("requested") . "" . - '
" . - _("Read receipt") . ': ' . - "" . - '' . _("requested") . - "   [" . _("Send read receipt now") . "]" . - '
" . - _("Read receipt") . ': ' . - "" . - '' . _("requested") . "  " . '[' . - _("Send read receipt now") . '] ' ." \n" . - '
\n" . - " "._("Read receipt").": \n". - " \n" . - ' '._("send").''." " . '[' . _("Remove MDN flag") . '] ' . "\n" . - '
\n" . - " "._("Read receipt").": \n". - " \n" . - ' '._("send").''. "\n" . - '
" . - _("Read receipt") . ': ' . - "" . - '' . _("requested") . - "   [" . _("Send read receipt now") . "]" . - '
' . - '
'; -flush(); +$messagebody = ''; +do_hook('read_body_top'); +if ($show_html_default == 1) { + $ent_ar = $message->findDisplayEntity(array()); +} else { + $ent_ar = $message->findDisplayEntity(array(), array('text/plain')); +} +$cnt = count($ent_ar); +for ($i = 0; $i < $cnt; $i++) { + $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox); + if ($i != $cnt-1) { + $messagebody .= '
'; + } +} -echo "\n" . - "
\n" . - '
'. - formatBody($imapConnection, $message, $color, $wrap_at). - '
' . - '' . "\n" . - " " . - '
 
' . "\n"; +displayPageHeader($color, $mailbox,'',''); +formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message,false); +formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee); +echo ''; +echo ' '; + +echo ''."\n"; + +$attachmentsdisplay = formatAttachments($message,$ent_ar,$mailbox, $passed_id); +if ($attachmentsdisplay) { + echo '
'; +echo ' '; +echo ' '; +echo '
'; +echo ' '; +echo ' '; +echo '
'; +// echo ' '; +echo html_tag( 'table' ,'' , 'left', '', 'width="100%" cellpadding="1" cellspacing="5" border="0"' ); +echo ' ' . html_tag( 'td', '
'. $messagebody."\n", 'left') + . ''; +echo '
'; +echo '
'; +echo '
'; + echo ' '; + echo ' '; + echo ''; +} +echo '
'; + echo ' '; + echo ' ' . html_tag( 'td', '', 'left', $color[9] ); + echo ' ' . _("Attachments") . ':'; + echo ' '; + echo '
'; + echo '
'; + echo $attachmentsdisplay; + echo '
'; + echo '
'; + echo '
'; /* show attached images inline -- if pref'fed so */ if (($attachment_common_show_images) && is_array($attachment_common_show_images_list)) { - foreach ($attachment_common_show_images_list as $img) { - $imgurl = '../src/download.php' . + $imgurl = SM_PATH . 'src/download.php' . '?' . 'passed_id=' . urlencode($img['passed_id']) . '&mailbox=' . urlencode($mailbox) . - '&passed_ent_id=' . urlencode($img['ent_id']) . + '&ent_id=' . urlencode($img['ent_id']) . '&absolute_dl=true'; - echo "\n" . - '' . - '\n" . - "\n" . - "
' . - "\n" . - "
\n"; - + echo html_tag( 'table', "\n" . + html_tag( 'tr', "\n" . + html_tag( 'td', '' ."\n", 'left' + ) + ) , + 'center', '', 'cellspacing="0" border="0" cellpadding="2"'); } } +formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message, false, FALSE); do_hook('read_body_bottom'); -do_hook('html_bottom'); sqimap_logout($imapConnection); + +/** + * Write mailbox with updated seen flag information back to cache. + */ +$mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox; +sqsession_register($mailbox_cache,'mailbox_cache'); +$oTemplate->display('footer.tpl'); ?> - -