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