src/read_body.php

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