6 * This file is used for reading the msgs array and displaying
7 * the resulting emails in the right frame.
9 * @copyright © 1999-2007 The SquirrelMail Project Team
10 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
12 * @package squirrelmail
15 /** This is the read_body page */
16 define('PAGE_NAME', 'read_body');
19 * Include the SquirrelMail initialization file.
21 require('../include/init.php');
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');
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
39 * @param int $passed_id The current message UID
40 * @return the index of the next valid message from the array
42 function findNextMessage($uidset,$passed_id='backwards') {
43 if (!is_array($uidset)) {
46 if ($passed_id=='backwards' ||
!is_array($uidset)) { // check for backwards compattibilty gpg plugin
49 $result = sqm_array_get_value_by_offset($uidset,$passed_id,1);
50 if ($result === false) {
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
61 * @param int $passed_id The current message UID
62 * @return the index of the next valid message from the array
65 function findPreviousMessage($uidset, $passed_id) {
66 if (!is_array($uidset)) {
69 $result = sqm_array_get_value_by_offset($uidset,$passed_id,-1);
70 if ($result === false) {
77 function html_toggle_href ($mailbox, $passed_id, $passed_ent_id, $message) {
78 global $base_uri, $show_html_default;
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
;
85 $type0 = $message->header
->type0
;
86 $type1 = $message->header
->type1
;
88 if($type0 == 'multipart' &&
89 ($type1 == 'alternative' ||
$type1 == 'mixed' ||
$type1 == 'related' ||
$type1=='signed')) {
90 if ($message->findDisplayEntity(array(), array('text/html'), true)) {
95 * Normal single part message so check its type.
98 if($type0 == 'text' && $type1 == 'html') {
102 if($has_html == true) {
103 $vars = array('passed_ent_id', 'show_more', 'show_more_cc', 'override_type0', 'override_type1', 'startMessage','where', 'what');
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);
114 if($show_html_default == 1) {
115 $new_link .= '&show_html_default=0';
117 $new_link .= '&show_html_default=1';
124 function ServerMDNSupport($aFlags) {
125 /* escaping $ doesn't work -> \x36 */
126 return ( in_array('$mdnsent',$aFlags,true) ||
127 in_array('\\*',$aFlags,true) ) ;
130 function SendMDN ( $mailbox, $passed_id, $message, $imapConnection) {
131 global $squirrelmail_language, $default_charset,
132 $languages, $useSendmail, $domain, $sent_folder;
134 sqgetGlobalVar('SERVER_NAME', $SERVER_NAME, SQ_SERVER
);
136 $header = $message->rfc822_header
;
138 $rfc822_header = new Rfc822Header();
139 $content_type = new ContentType('multipart/report');
140 $content_type->properties
['report-type']='disposition-notification';
143 if ($default_charset) {
144 $content_type->properties
['charset']=$default_charset;
146 $rfc822_header->content_type
= $content_type;
147 $rfc822_header->to
[] = $header->dnt
;
148 $rfc822_header->subject
= _("Read:") . ' ' . decodeHeader($header->subject
,true,false);
150 $idents = get_identities();
153 foreach ($header->to
as $message_to) {
154 $needles[] = $message_to->mailbox
.'@'.$message_to->host
;
157 $identity = find_identity($needles);
158 $from_addr = build_from_header($identity);
159 $reply_to = isset($idents[$identity]['reply_to']) ?
$idents[$identity]['reply_to'] : '';
160 // FIXME: this must actually be the envelope address of the orginal message,
161 // but do we have that information? For now the first identity is our best guess.
162 $final_recipient = $idents[0]['email_address'];
164 $rfc822_header->from
= $rfc822_header->parseAddress($from_addr,true);
166 $rfc822_header->reply_to
= $rfc822_header->parseAddress($reply_to,true);
170 $senton = getLongDateString( $header->date
, $header->date_unparsed
);
171 $to_array = $header->to
;
173 foreach ($to_array as $line) {
174 $to .= ' '.$line->getAddress();
176 $now = getLongDateString( time() );
178 $body = _("Your message") . "\r\n\r\n" .
179 "\t" . _("To") . ': ' . decodeHeader($to,false,false) . "\r\n" .
180 "\t" . _("Subject") . ': ' . decodeHeader($header->subject
,false,false) . "\r\n" .
181 "\t" . _("Sent") . ': ' . $senton . "\r\n" .
183 sprintf( _("Was displayed on %s"), $now );
185 $special_encoding = '';
186 if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
187 function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode')) {
188 $body = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode', $body);
189 if (strtolower($default_charset) == 'iso-2022-jp') {
190 if (mb_detect_encoding($body) == 'ASCII') {
191 $special_encoding = '8bit';
193 $body = mb_convert_encoding($body, 'JIS');
194 $special_encoding = '7bit';
197 } elseif (sq_is8bit($body)) {
198 $special_encoding = '8bit';
200 $part1 = new Message();
201 $part1->setBody($body);
202 $mime_header = new MessageHeader
;
203 $mime_header->type0
= 'text';
204 $mime_header->type1
= 'plain';
205 if ($special_encoding) {
206 $mime_header->encoding
= $special_encoding;
208 $mime_header->encoding
= 'us-ascii';
210 if ($default_charset) {
211 $mime_header->parameters
['charset'] = $default_charset;
213 $part1->mime_header
= $mime_header;
216 $original_recipient = $to;
217 $original_message_id = $header->message_id
;
219 $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version " . SM_VERSION
. ") \r\n";
220 if ($original_recipient != '') {
221 $report .= "Original-Recipient : $original_recipient\r\n";
223 $report .= "Final-Recipient: rfc822; $final_recipient\r\n" .
224 "Original-Message-ID : $original_message_id\r\n" .
225 "Disposition: manual-action/MDN-sent-manually; displayed\r\n";
227 $part2 = new Message();
228 $part2->setBody($report);
229 $mime_header = new MessageHeader
;
230 $mime_header->type0
= 'message';
231 $mime_header->type1
= 'disposition-notification';
232 $mime_header->encoding
= 'us-ascii';
233 $part2->mime_header
= $mime_header;
235 $composeMessage = new Message();
236 $composeMessage->rfc822_header
= $rfc822_header;
237 $composeMessage->addEntity($part1);
238 $composeMessage->addEntity($part2);
242 require_once(SM_PATH
. 'class/deliver/Deliver_SendMail.class.php');
243 global $sendmail_path, $sendmail_args;
244 // Check for outdated configuration
245 if (!isset($sendmail_args)) {
246 if ($sendmail_path=='/var/qmail/bin/qmail-inject') {
249 $sendmail_args = '-i -t';
252 $deliver = new Deliver_SendMail(array('sendmail_args'=>$sendmail_args));
253 $stream = $deliver->initStream($composeMessage,$sendmail_path);
255 require_once(SM_PATH
. 'class/deliver/Deliver_SMTP.class.php');
256 $deliver = new Deliver_SMTP();
257 global $smtpServerAddress, $smtpPort, $pop_before_smtp;
258 $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ?
true : false;
259 get_smtp_user($user, $pass);
260 $stream = $deliver->initStream($composeMessage,$domain,0,
261 $smtpServerAddress, $smtpPort, $user, $pass, $authPop);
265 $length = $deliver->mail($composeMessage, $stream);
266 $success = $deliver->finalizeStream($stream);
269 $msg = _("Message not sent.") . "<br />\n" .
271 if (! empty($deliver->dlv_server_msg
)) {
273 _("Server replied:") . ' ' . $deliver->dlv_ret_nr
. ' ' .
274 nl2br(htmlspecialchars($deliver->dlv_server_msg
));
276 plain_error_message($msg);
279 if (sqimap_mailbox_exists ($imapConnection, $sent_folder)) {
280 $sid = sqimap_append ($imapConnection, $sent_folder, $length);
281 require_once(SM_PATH
. 'class/deliver/Deliver_IMAP.class.php');
282 $imap_deliver = new Deliver_IMAP();
283 $imap_deliver->mail($composeMessage, $imapConnection);
284 sqimap_append_done ($imapConnection, $sent_folder);
285 unset ($imap_deliver);
291 function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id) {
293 $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)';
294 $read = sqimap_run_command ($imapConnection, $cmd, true, $response,
298 function formatRecipientString($recipients, $item ) {
299 global $show_more, $show_more_cc, $show_more_bcc,
300 $PHP_SELF, $oTemplate;
303 if ((is_array($recipients)) && (isset($recipients[0]))) {
309 $url = set_url_var($PHP_SELF, 'show_more',0);
311 $url = set_url_var($PHP_SELF, 'show_more',1);
313 } else if ($item == 'cc') {
316 $url = set_url_var($PHP_SELF, 'show_more_cc',0);
318 $url = set_url_var($PHP_SELF, 'show_more_cc',1);
320 } else if ($item == 'bcc') {
321 if ($show_more_bcc) {
323 $url = set_url_var($PHP_SELF, 'show_more_bcc',0);
325 $url = set_url_var($PHP_SELF, 'show_more_bcc',1);
330 foreach ($recipients as $r) {
332 'Name' => htmlspecialchars($r->getAddress(false)),
333 'Email' => htmlspecialchars($r->getEmail()),
334 'Full' => htmlspecialchars($r->getAddress(true))
338 $oTemplate->assign('which_field', $item);
339 $oTemplate->assign('recipients', $a);
340 $oTemplate->assign('more_less_toggle_href', $url);
341 $oTemplate->assign('show_more', $show);
343 $string = $oTemplate->fetch('read_recipient_list.tpl');
348 function formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message,
349 $color, $FirstTimeSee) {
350 global $default_use_mdn, $default_use_priority,
351 $show_xmailer_default, $mdn_user_support, $PHP_SELF,
352 $squirrelmail_language, $oTemplate;
354 $mailbox = $aMailbox['NAME'];
356 $header = $message->rfc822_header
;
358 $env[_("Subject")] = str_replace(" "," ",decodeHeader($header->subject
));
360 $from_name = $header->getAddr_s('from');
362 $from_name = $header->getAddr_s('sender');
364 $env[_("From")] = _("Unknown sender");
366 $env[_("From")] = decodeHeader($from_name);
367 $env[_("Date")] = getLongDateString($header->date
, $header->date_unparsed
);
368 $env[_("To")] = formatRecipientString($header->to
, "to");
369 $env[_("Cc")] = formatRecipientString($header->cc
, "cc");
370 $env[_("Bcc")] = formatRecipientString($header->bcc
, "bcc");
371 if ($default_use_priority) {
372 $oTemplate->assign('message_priority', $header->priority
);
373 $env[_("Priority")] = $oTemplate->fetch('read_message_priority.tpl');
375 if ($show_xmailer_default) {
376 $oTemplate->assign('xmailer', decodeHeader($header->xmailer
));
377 $env[_("Mailer")] = $oTemplate->fetch('read_xmailer.tpl');
380 // this is used for both mdn and also general use for plugins, etc
381 $oTemplate->assign('first_time_reading', $FirstTimeSee);
383 if ($default_use_mdn) {
384 if ($mdn_user_support) {
386 $mdn_url = $PHP_SELF;
387 $mdn_url = set_url_var($mdn_url, 'mailbox', urlencode($mailbox));
388 $mdn_url = set_url_var($mdn_url, 'passed_id', $passed_id);
389 $mdn_url = set_url_var($mdn_url, 'passed_ent_id', $passed_ent_id);
390 $mdn_url = set_url_var($mdn_url, 'sendreceipt', 1);
392 $oTemplate->assign('read_receipt_sent', $message->is_mdnsent
);
393 $oTemplate->assign('send_receipt_href', $mdn_url);
395 $env[_("Read Receipt")] = $oTemplate->fetch('read_handle_receipt.tpl');
401 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
402 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\deleted']) &&
403 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\deleted'] === true) {
404 $statuses[] = _("deleted");
406 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\answered']) &&
407 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\answered'] === true) {
408 $statuses[] = _("answered");
410 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\draft']) &&
411 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\draft'] === true) {
412 $statuses[] = _("draft");
414 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\flagged']) &&
415 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\flagged'] === true) {
416 $statuses[] = _("flagged");
418 if ( count($statuses) ) {
419 $env[_("Status")] = implode(', ', $statuses);
423 $env[_("Options")] = formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color);
426 $oTemplate->assign('headers_to_display', $env);
428 $oTemplate->display('read_headers.tpl');
432 * Format message toolbar
434 * @param array $aMailbox Current mailbox information array
435 * @param int $passed_id UID of current message
436 * @param int $passed_ent_id Id of entity within message
437 * @param object $message Current message object
438 * @param object $mbx_response
440 function formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, $removedVar, $nav_on_top = TRUE) {
441 global $base_uri, $draft_folder, $where, $what, $sort,
442 $startMessage, $PHP_SELF, $save_as_draft,
443 $enable_forward_as_attachment, $imapConnection, $lastTargetMailbox,
444 $delete_prev_next_display, $show_copy_buttons,
445 $compose_new_win, $compose_width, $compose_height,
448 //FIXME cleanup argument list, use $aMailbox where possible
449 $mailbox = $aMailbox['NAME'];
451 $urlMailbox = urlencode($mailbox);
453 // Create Prev & Next links
454 // Handle nested entities first (i.e. Mime Attach parts)
455 $prev_href = $next_href = $up_href = $del_href = $del_prev_href = $del_next_href = '';
456 $msg_list_href = $search_href = $view_msg_href = '';
457 if (isset($passed_ent_id) && $passed_ent_id) {
458 // code for navigating through attached message/rfc822 messages
459 $url = set_url_var($PHP_SELF, 'passed_ent_id',0);
461 $entity_count = array();
464 foreach($message->parent
->entities
as $ent) {
465 if ($ent->type0
== 'message' && $ent->type1
== 'rfc822') {
468 $entity_count[$c] = $ent->entity_id
;
469 $entities[$ent->entity_id
] = $c;
473 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] > 1) {
474 $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1];
475 $prev_href = set_url_var($PHP_SELF, 'passed_ent_id', $prev_ent_id);
478 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] < $c) {
479 $next_ent_id = $entity_count[$entities[$passed_ent_id] +
1];
480 $next_href = set_url_var($PHP_SELF, 'passed_ent_id', $next_ent_id);
483 $par_ent_id = $message->parent
->entity_id
;
485 $par_ent_id = substr($par_ent_id,0,-2);
486 if ( $par_ent_id != 0 ) {
487 $up_href = set_url_var($PHP_SELF, 'passed_ent_id',$par_ent_id);
491 $view_msg_href = $url;
493 // Prev/Next links for regular messages
494 } else if ( true ) { //!(isset($where) && isset($what)) ) {
495 $prev = findPreviousMessage($aMailbox['UIDSET'][$what], $passed_id);
496 $next = findNextMessage($aMailbox['UIDSET'][$what],$passed_id);
499 $prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
500 '&mailbox='.$urlMailbox.'&sort='.$sort.
501 "&where=$where&what=$what" .
502 '&startMessage='.$startMessage.'&show_more=0';
506 $next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
507 '&mailbox='.$urlMailbox.'&sort='.$sort.
508 "&where=$where&what=$what" .
509 '&startMessage='.$startMessage.'&show_more=0';
512 // Only bother with Delete & Prev and Delete & Next IF
513 // top display is enabled.
514 if ( $delete_prev_next_display == 1 &&
515 in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) {
517 $del_prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
518 '&mailbox='.$urlMailbox.'&sort='.$sort.
519 '&startMessage='.$startMessage.'&show_more=0'.
520 "&where=$where&what=$what" .
521 '&delete_id='.$passed_id;
525 $del_next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
526 '&mailbox='.$urlMailbox.'&sort='.$sort.
527 '&startMessage='.$startMessage.'&show_more=0'.
528 "&where=$where&what=$what" .
529 '&delete_id='.$passed_id;
534 $msg_list_href = get_message_list_uri($aMailbox['NAME'], $startMessage, $what);
535 if ($where == 'search.php')
536 $search_href = str_replace('read_body.php', 'search.php', $msg_list_href);
540 $comp_uri = $base_uri.'src/compose.php' .
541 '?passed_id=' . $passed_id .
542 '&mailbox=' . $urlMailbox .
543 '&startMessage=' . $startMessage .
544 (isset($passed_ent_id) ?
'&passed_ent_id='.$passed_ent_id : '');
546 // Start form for reply/reply all/forward..
551 if ($compose_new_win == '1') {
552 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
553 $compose_width = '640';
555 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
556 $compose_height = '550';
558 if ( checkForJavascript() ) {
559 $on_click='comp_in_new_form(\''.$comp_uri.'\', this, this.form,'. $compose_width .',' . $compose_height .')';
560 $comp_uri = 'javascript:void(0)';
562 $onsubmit = 'return false';
568 $oTemplate->assign('nav_on_top', $nav_on_top);
570 $oTemplate->assign('prev_href', $prev_href);
571 $oTemplate->assign('up_href', $up_href);
572 $oTemplate->assign('next_href', $next_href);
573 $oTemplate->assign('del_prev_href', $del_prev_href);
574 $oTemplate->assign('del_next_href', $del_next_href);
575 $oTemplate->assign('view_msg_href', $view_msg_href);
577 $oTemplate->assign('message_list_href', $msg_list_href);
578 $oTemplate->assign('search_href', $search_href);
580 $oTemplate->assign('form_extra', '');
581 $oTemplate->assign('form_method', $method);
582 $oTemplate->assign('form_target', $target);
583 $oTemplate->assign('form_onsubmit', $onsubmit);
584 $oTemplate->assign('compose_href', $comp_uri);
585 $oTemplate->assign('button_onclick', $on_click);
586 $oTemplate->assign('forward_as_attachment_enabled', $enable_forward_as_attachment==1);
588 //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
589 $oTemplate->assign('mailbox', $aMailbox['NAME']);
590 $oTemplate->assign('passed_id', $passed_id);
591 $oTemplate->assign('what', $what);
593 // If Draft folder - create Resume link
594 $resume_draft = $edit_as_new = false;
595 if (($mailbox == $draft_folder) && ($save_as_draft)) {
596 $resume_draft = true; 'smaction_draft';
597 } else if (handleAsSent($mailbox)) {
600 $oTemplate->assign('can_resume_draft', $resume_draft);
601 $oTemplate->assign('can_edit_as_new', $edit_as_new);
603 $oTemplate->assign('mailboxes', sqimap_mailbox_option_array($imapConnection));
604 if (in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true)) {
605 $delete_url = $base_uri . "src/$where";
606 $oTemplate->assign('can_be_deleted', true);
607 $oTemplate->assign('move_delete_form_action', $base_uri.'src/'.$where);
608 $oTemplate->assign('delete_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
609 addHidden('msg[0]', $passed_id)."\n" .
610 addHidden('startMessage', $startMessage)."\n" );
611 if (!(isset($passed_ent_id) && $passed_ent_id)) {
612 $oTemplate->assign('can_be_moved', true);
613 $oTemplate->assign('move_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
614 addHidden('msg[0]', $passed_id)."\n" );
615 $oTemplate->assign('last_move_target', isset($lastTargetMailbox) && !empty($lastTargetMailbox) ?
$lastTargetMailbox : '');
616 $oTemplate->assign('can_be_copied', $show_copy_buttons==1);
618 $oTemplate->assign('can_be_moved', false);
619 $oTemplate->assign('move_form_extra', '');
620 $oTemplate->assign('last_move_target', '');
621 $oTemplate->assign('can_be_copied', false);
624 $oTemplate->assign('can_be_deleted', false);
625 $oTemplate->assign('move_delete_form_action', '');
626 $oTemplate->assign('delete_form_extra', '');
627 $oTemplate->assign('can_be_moved', false);
628 $oTemplate->assign('move_form_extra', '');
629 $oTemplate->assign('last_move_target', '');
630 $oTemplate->assign('can_be_copied', false);
634 do_hook('read_body_menu', $null);
637 $oTemplate->display('read_menubar_nav.tpl');
638 $oTemplate->display('read_menubar_buttons.tpl');
640 $oTemplate->display('read_menubar_buttons.tpl');
641 $oTemplate->display('read_menubar_nav.tpl');
646 function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) {
647 global $base_uri, $where, $what, $show_html_default,
648 $oTemplate, $download_href,
649 $unsafe_image_toggle_href, $unsafe_image_toggle_text;
651 $urlMailbox = urlencode($mailbox);
652 $urlPassed_id = urlencode($passed_id);
653 $urlPassed_ent_id = urlencode($passed_ent_id);
655 $query_string = 'mailbox=' . $urlMailbox . '&passed_id=' . $urlPassed_id . '&passed_ent_id=' . $urlPassed_ent_id;
656 if (!empty($where)) {
657 $query_string .= '&where=' . urlencode($where);
660 $query_string .= '&what=' . urlencode($what);
662 $url = $base_uri.'src/view_header.php?'.$query_string;
665 // Build the printer friend link
667 if( !sqgetGlobalVar('view_unsafe_images', $view_unsafe_images, SQ_GET
) ) {
668 $view_unsafe_images = false;
670 $view_unsafe_images = true;
672 $pf_params = '?passed_ent_id=' . $urlPassed_ent_id .
673 '&mailbox=' . $urlMailbox .
674 '&passed_id=' . $urlPassed_id .
675 '&view_unsafe_images='. (bool) $view_unsafe_images .
676 '&show_html_default=' . $show_html_default;
680 'Text' => _("View Full Header")
684 'Text' => _("View Printable Version")
687 'URL' => $download_href,
688 'Text' => _("Download this as a file")
690 $toggle = html_toggle_href($mailbox, $passed_id, $passed_ent_id, $message);
691 if (!empty($toggle)) {
694 'Text' => $show_html_default==1 ?
_("View as plain text") : _("View as HTML")
697 if (!empty($unsafe_image_toggle_href)) {
699 'URL' => $unsafe_image_toggle_href,
700 'Text' => $unsafe_image_toggle_text
704 do_hook('read_body_header_right', $links);
706 $oTemplate->assign('links', $links);
708 return $oTemplate->fetch('read_toolbar.tpl');
711 /***************************/
712 /* Main of read_body.php */
713 /***************************/
715 /* get the globals we may need */
717 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION
);
718 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION
);
719 if (!sqgetGlobalVar('messages', $messages, SQ_SESSION
) ) {
722 sqgetGlobalVar('delayed_errors', $delayed_errors, SQ_SESSION
);
723 if (is_array($delayed_errors)) {
724 $oErrorHandler->AssignDelayedErrors($delayed_errors);
725 sqsession_unregister("delayed_errors");
728 sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET
);
729 if (!sqgetGlobalVar('where', $where, SQ_GET
) ) {
730 $where = 'right_main.php';
733 * Used as entry key to the list of uid's cached in the mailbox cache
734 * we use the cached uid's to get the next and prev message.
736 if (!sqgetGlobalVar('what', $what, SQ_GET
) ){
739 if ( sqgetGlobalVar('show_more', $temp, SQ_GET
) ) {
740 $show_more = (int) $temp;
742 if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET
) ) {
743 $show_more_cc = (int) $temp;
745 if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET
) ) {
746 $show_more_bcc = (int) $temp;
748 if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET
) ) {
749 $view_hdr = (int) $temp;
752 if ( sqgetGlobalVar('account', $temp, SQ_GET
) ) {
753 $iAccount = (int) $temp;
759 sqgetGlobalVar('passed_ent_id', $passed_ent_id);
760 sqgetGlobalVar('mailbox', $mailbox);
762 if ( sqgetGlobalVar('passed_id', $temp) ) {
763 $passed_id = (int) $temp;
765 if ( sqgetGlobalVar('sort', $temp) ) {
768 if ( sqgetGlobalVar('startMessage', $temp) ) {
769 $startMessage = (int) $temp;
773 if(sqgetGlobalVar('show_html_default', $temp)) {
774 $show_html_default = (int) $temp;
777 if(sqgetGlobalVar('view_unsafe_images', $temp)) {
778 $view_unsafe_images = (int) $temp;
779 if($view_unsafe_images == 1) {
780 $show_html_default = 1;
783 $view_unsafe_images = 0;
786 * Retrieve mailbox cache
788 sqgetGlobalVar('mailbox_cache',$mailbox_cache,SQ_SESSION
);
790 /* end of get globals */
792 $imapConnection = sqimap_login($username, false, $imapServerAddress, $imapPort, 0);
793 $aMailbox = sqm_api_mailbox_select($imapConnection, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array());
797 Start code to set the columns to fetch in case of hitting the next/prev link
798 The reason for this is the fact that the cache can be invalidated which means that the headers
799 to fetch aren't there anymore. Before they got calculated when the messagelist was shown.
801 Todo, better central handling of setting the mailbox options so we do not need to do the stuff below
805 * Replace From => To in case it concerns a draft or sent folder
808 if (($mailbox == $sent_folder ||
$mailbox == $draft_folder) &&
809 !in_array(SQM_COL_TO
,$index_order)) {
810 $aNewOrder = array(); // nice var name ;)
811 foreach($index_order as $iCol) {
812 if ($iCol == SQM_COL_FROM
) {
815 $aColumns[$iCol] = array();
818 foreach ($index_order as $iCol) {
819 $aColumns[$iCol] = array();
824 'columns' => $aColumns, // columns bound settings
826 'highlight_list' => $message_highlight_list, // row highlighting rules
827 'trash_folder' => $trash_folder,
828 'sent_folder' => $sent_folder,
829 'draft_folder' => $draft_folder));
831 calcFetchColumns($aMailbox,$aProps);
834 End code to set the columns to fetch in case of hitting the next/prev link
840 * Check if cache is still valid, $what contains the key
841 * which gives us acces to the array with uid's. At this moment
842 * 0 is used for a normal message list and search uses 1 as key. This can be
843 * changed / extended in the future.
844 * If on a select of a mailbox we detect that the cache should be invalidated due to
845 * the delete of messages or due to new messages we empty the list with uid's and
846 * that's what we detect below.
848 if (!is_array($aMailbox['UIDSET'][$what])) {
849 fetchMessageHeaders($imapConnection, $aMailbox);
852 $iSetIndex = $aMailbox['SETINDEX'];
853 $aMailbox['CURRENT_MSG'][$iSetIndex] = $passed_id;
856 * Update the seen state
857 * and ignore in_array('\\seen',$aMailbox['PERMANENTFLAGS'],true)
859 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
860 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\seen'] = true;
864 * Process Delete from delete-move-next
865 * but only if delete_id was set
867 if ( sqgetGlobalVar('delete_id', $delete_id, SQ_GET
) ) {
868 handleMessageListForm($imapConnection,$aMailbox,$sButton='setDeleted', array($delete_id));
872 * $message contains all information about the message
873 * including header and body
876 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'])) {
877 $message = $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'];
878 $FirstTimeSee = !$message->is_seen
;
880 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
881 $FirstTimeSee = !$message->is_seen
;
885 * update message seen status and put in cache
887 $message->is_seen
= true;
888 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
890 if (isset($passed_ent_id) && $passed_ent_id) {
891 $message = $message->getEntity($passed_ent_id);
892 if ($message->type0
!= 'message' && $message->type1
!= 'rfc822') {
893 $message = $message->parent
;
895 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, TRUE);
896 $rfc822_header = new Rfc822Header();
897 $rfc822_header->parseHeader($read);
898 $message->rfc822_header
= $rfc822_header;
899 } else if ($message->type0
== 'message' && $message->type1
== 'rfc822' && isset($message->entities
[0])) {
900 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[1.HEADER]", true, $response, $msg, TRUE);
901 $rfc822_header = new Rfc822Header();
902 $rfc822_header->parseHeader($read);
903 $message->rfc822_header
= $rfc822_header;
907 $header = $message->header
;
910 /****************************************/
911 /* Block for handling incoming url vars */
912 /****************************************/
914 if (isset($sendreceipt)) {
915 if ( !$message->is_mdnsent
) {
916 $supportMDN = ServerMDNSupport($aMailbox["PERMANENTFLAGS"]);
917 if ( SendMDN( $mailbox, $passed_id, $message, $imapConnection ) > 0 && $supportMDN ) {
918 ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id);
919 $message->is_mdnsent
= true;
920 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
924 /***********************************************/
925 /* End of block for handling incoming url vars */
926 /***********************************************/
929 do_hook('read_body_top', $null);
930 if ($show_html_default == 1) {
931 $ent_ar = $message->findDisplayEntity(array());
933 $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
935 $cnt = count($ent_ar);
936 for ($i = 0; $i < $cnt; $i++
) {
937 $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
939 $messagebody .= '<hr />';
944 * Write mailbox with updated seen flag information back to cache.
946 $mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox;
947 sqsession_register($mailbox_cache,'mailbox_cache');
948 $_SESSION['mailbox_cache'] = $mailbox_cache;
950 // message list URI is used in page header when on read_body
951 $oTemplate->assign('message_list_href', get_message_list_uri($aMailbox['NAME'], $startMessage, $what));
953 displayPageHeader($color, $mailbox,'','');
954 formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message,false);
955 formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee);
957 $oTemplate->assign('message_body', $messagebody);
958 $oTemplate->display('read_message_body.tpl');
960 formatAttachments($message,$ent_ar,$mailbox, $passed_id);
962 /* show attached images inline -- if pref'fed so */
963 if ($attachment_common_show_images && is_array($attachment_common_show_images_list)) {
965 foreach ($attachment_common_show_images_list as $img) {
966 $imgurl = SM_PATH
. 'src/download.php' .
968 'passed_id=' . urlencode($img['passed_id']) .
969 '&mailbox=' . urlencode($mailbox) .
970 '&ent_id=' . urlencode($img['ent_id']) .
971 '&absolute_dl=true';
973 $a['Name'] = $img['name'];
974 $a['DisplayURL'] = $imgurl;
975 $a['DownloadURL'] = $img['download_href'];
979 $oTemplate->assign('images', $images);
980 $oTemplate->display('read_display_images_inline.tpl');
983 formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, false, FALSE);
985 do_hook('read_body_bottom', $null);
986 sqimap_logout($imapConnection);
987 $oTemplate->display('footer.tpl');