src/read_body.php

   1 <?php
   2
   3 /**
   4  * read_body.php
   5  *
   6  * Copyright (c) 1999-2002 The SquirrelMail Project Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * This file is used for reading the msgs array and displaying
  10  * the resulting emails in the right frame.
  11  *
  12  * $Id$
  13  */
  14
  15 require_once('../src/validate.php');
  16 require_once('../functions/imap.php');
  17 require_once('../functions/mime.php');
  18 require_once('../functions/date.php');
  19 require_once('../functions/url_parser.php');
  20 require_once('../functions/smtp.php');
  21 require_once('../functions/html.php');
  22 require_once('../class/html.class');
  23 require_once('../src/view_header.php');
  24
  25 /**
  26  * Given an IMAP message id number, this will look it up in the cached
  27  * and sorted msgs array and return the index. Used for finding the next
  28  * and previous messages.
  29  *
  30  * @return the index of the next valid message from the array
  31  */
  32 function findNextMessage() {
  33     global $msort, $currentArrayIndex, $msgs, $sort,
  34            $thread_sort_messages, $allow_server_sort,
  35            $server_sort_array;
  36     if (!is_array($server_sort_array)) {
  37         $thread_sort_messages = 0;
  38         $allow_server_sort = FALSE;
  39     }
  40     $result = -1;
  41     if ($thread_sort_messages == 1 || $allow_server_sort == TRUE) {
  42         reset($server_sort_array);
  43         while(list($key, $value) = each ($server_sort_array)) {
  44             if ($currentArrayIndex == $value) {
  45                 if ($key == (count($server_sort_array) - 1)) {
  46                     $result = -1;
  47                     break;
  48                 }
  49                 $result = $server_sort_array[$key + 1];
  50                 break;
  51             }
  52         }
  53     }
  54     elseif ($sort == 6 && $allow_server_sort != TRUE &&
  55             $thread_sort_messages != 1) {
  56         if ($currentArrayIndex != 1) {
  57             $result = $currentArrayIndex - 1;
  58         }
  59     }
  60     elseif ($allow_server_sort != TRUE && $thread_sort_messages != 1 ) {
  61         if (!is_array($msort)) {
  62             return -1;
  63         }
  64         for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) {
  65             if ($currentArrayIndex == $msgs[$key]['ID']) {
  66                 next($msort);
  67                 $key = key($msort);
  68                 if (isset($key)){
  69                     $result = $msgs[$key]['ID'];
  70                     break;
  71                 }
  72             }
  73         }
  74     }
  75     return ($result);
  76 }
  77
  78 /** returns the index of the previous message from the array. */
  79 function findPreviousMessage() {
  80     global $msort, $currentArrayIndex, $sort, $msgs, $imapConnection,
  81            $mailbox, $data_dir, $username, $thread_sort_messages,
  82            $allow_server_sort, $server_sort_array;
  83     $result = -1;
  84     if (!is_array($server_sort_array)) {
  85         $thread_sort_messages = 0;
  86         $allow_server_sort = FALSE;
  87     }
  88     if ($thread_sort_messages == 1 || $allow_server_sort == TRUE) {
  89         reset($server_sort_array);
  90         while(list($key, $value) = each ($server_sort_array)) {
  91             if ($currentArrayIndex == $value) {
  92                 if ($key == 0) {
  93                     $result = -1;
  94                     break;
  95                 }
  96                 $result = $server_sort_array[$key -1];
  97                 break;
  98             }
  99         }
 100     }
 101     elseif ($sort == 6 && $allow_server_sort != TRUE &&
 102             $thread_sort_messages != 1) {
 103         $numMessages = sqimap_get_num_messages($imapConnection, $mailbox);
 104         if ($currentArrayIndex != $numMessages) {
 105             $result = $currentArrayIndex + 1;
 106         }
 107     }
 108     elseif ($thread_sort_messages != 1 && $allow_server_sort != TRUE) {
 109         if (!is_array($msort)) {
 110             return -1;
 111         }
 112         for (reset($msort); ($key = key($msort)), (isset($key)); next($msort)) {
 113             if ($currentArrayIndex == $msgs[$key]['ID']) {
 114                 prev($msort);
 115                 $key = key($msort);
 116                 if (isset($key)) {
 117                     $result = $msgs[$key]['ID'];
 118                     break;
 119                 }
 120             }
 121         }
 122     }
 123     return ($result);
 124 }
 125
 126 /**
 127  * Displays a link to a page where the message is displayed more
 128  * "printer friendly".
 129  */
 130 function printer_friendly_link() {
 131     global $passed_id, $mailbox, $ent_num, $color,
 132            $pf_subtle_link,
 133            $javascript_on;
 134
 135     if (strlen(trim($mailbox)) < 1) {
 136         $mailbox = 'INBOX';
 137     }
 138
 139     $params = '?passed_ent_id=' . $ent_num .
 140         '&mailbox=' . urlencode($mailbox) .
 141         '&passed_id=' . $passed_id;
 142
 143     $print_text = _("View Printable Version");
 144
 145     if (!$pf_subtle_link) {
 146         /* The link is large, on the bottom of the header panel. */
 147         $result = html_tag( 'tr', '', '', $color[0] ) .
 148             html_tag( 'td', '&nbsp;', 'right', '', 'class="medText" valign="top"' ) .
 149             html_tag( 'td', '', 'left', '', 'class="medText" valign="top" colspan="2"' ) . "\n";
 150     } else {
 151         /* The link is subtle, below "view full header". */
 152         $result = "\n";
 153     }
 154
 155     /* Output the link. */
 156     if ($javascript_on) {
 157         $result .= '<script language="javascript" type="text/javascript">' . "\n" .
 158                 '<!--' . "\n" .
 159                 "  function printFormat() {\n" .
 160                 '    window.open("../src/printer_friendly_main.php' .
 161                         $params . '","Print","width=800,height=600");' . "\n".
 162                 "  }\n" .
 163                 "// -->\n" .
 164                 "</script>\n" .
 165                 "<a href=\"javascript:printFormat();\">$print_text</a>\n";
 166     } else {
 167         $result .= '<A target="_blank" HREF="../src/printer_friendly_bottom.php' .
 168                 "$params\">$print_text</a>\n";
 169     }
 170
 171     if (!$pf_subtle_link) {
 172         /* The link is large, on the bottom of the header panel. */
 173         $result .=         '</td></tr>' . "\n";
 174     }
 175
 176     return ($result);
 177 }
 178
 179 function ServerMDNSupport( $read ) {
 180     /* escaping $ doesn't work -> \x36 */
 181     $ret = preg_match( '/(\x36MDNSent|\\\*)/i', $read );
 182     return ( $ret );
 183 }
 184
 185 function SendMDN ( $sender, $message) {
 186     global $imapConnection, $mailbox, $username, $attachment_dir, $SERVER_NAME,
 187            $version, $attachments, $identity, $data_dir, $passed_id;
 188
 189     $header = $message->header;
 190     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
 191
 192     $recipient_o = $header->dnt;
 193     $recipient = $recipient_o->getAddress(true);
 194
 195     // part 1 (RFC2298)
 196
 197     $senton = getLongDateString( $header->date );
 198     $to_array = $header->to;
 199     $to = '';
 200     foreach ($to_array as $line) {
 201         $to .= " $line ";
 202     }
 203
 204     $subject = $header->subject;
 205     $now = getLongDateString( time() );
 206
 207     set_my_charset();
 208
 209     $body = _("Your message") . "\r\n\r\n" .
 210             "\t" . _("To:") . ' ' . $to . "\r\n" .
 211             "\t" . _("Subject:") . ' ' . $subject . "\r\n" .
 212             "\t" . _("Sent:") . ' ' . $senton . "\r\n" .
 213             "\r\n" .
 214             sprintf( _("Was displayed on %s"), $now );
 215
 216     // part2  (RFC2298)
 217
 218     $original_recipient = $to;
 219     $original_message_id = $header->message_id;
 220
 221     $part2 = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n";
 222     if ($original_recipient != '') {
 223         $part2 .= "Original-Recipient : $original_recipient\r\n";
 224     }
 225     $final_recipient = $sender;
 226     $part2 .= "Final-Recipient: rfc822; $final_recipient\r\n" .
 227               "Original-Message-ID : $original_message_id\r\n" .
 228               "Disposition: manual-action/MDN-sent-manually; displayed\r\n";
 229
 230
 231     $localfilename = GenerateRandomString(32, 'FILE', 7);
 232     $full_localfilename = "$hashed_attachment_dir/$localfilename";
 233
 234     $fp = fopen( $full_localfilename, 'w');
 235     fwrite ($fp, $part2);
 236     fclose($fp);
 237
 238     $newAttachment = array();
 239     $newAttachment['localfilename'] = $localfilename;
 240     $newAttachment['type'] = "message/disposition-notification";
 241     $newAttachment['session']=-1;
 242     $attachments[] = $newAttachment;
 243
 244     $reply_id = 0;
 245
 246     return (SendMessage($recipient, '', '', _("Read:") . ' ' . $subject,
 247                         $body, $reply_id, True, 3, -1) );
 248 }
 249
 250
 251 function ToggleMDNflag ( $set ) {
 252     global $imapConnection, $passed_id, $mailbox, $uid_support;
 253     sqimap_mailbox_select($imapConnection, $mailbox);
 254     $sg =  $set?'+':'-';
 255     $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)';
 256     $read = sqimap_run_command ($imapConnection, $cmd, true, $response,
 257                                 $readmessage, $uid_support);
 258 }
 259
 260 function ClearAttachments() {
 261         global $username, $attachments, $attachment_dir;
 262
 263         $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
 264
 265         $rem_attachments = array();
 266         foreach ($attachments as $info) {
 267             if ($info['session'] == -1) {
 268                 $attached_file = "$hashed_attachment_dir/$info[localfilename]";
 269                 if (file_exists($attached_file)) {
 270                     unlink($attached_file);
 271                 }
 272             } else {
 273                 $rem_attachments[] = $info;
 274             }
 275         }
 276         $attachments = $rem_attachments;
 277 }
 278
 279 function formatRecipientString($recipients, $item ) {
 280     global $base_uri, $passed_id, $urlMailbox, $startMessage, $show_more_cc,
 281            $echo_more, $echo_less, $show_more, $show_more_bcc, $sort, $passed_ent_id,
 282            $PHP_SELF;
 283
 284     $i = 0;
 285     $url_string = '';
 286     if ((is_array($recipients)) && (isset($recipients[0]))) {
 287         $string = '';
 288         $ary = $recipients;
 289         $show = false;
 290
 291         if ($item == 'to') {
 292            if ($show_more) {
 293                $show = true;
 294                $url = set_url_var($PHP_SELF, 'show_more',0);
 295            } else {
 296                $url = set_url_var($PHP_SELF, 'show_more',1);
 297            }
 298         } else if ($item == 'cc') {
 299            if ($show_more_cc) {
 300                $url = set_url_var($PHP_SELF, 'show_more_cc',0);
 301                $show = true;
 302            } else {
 303               $url = set_url_var($PHP_SELF, 'show_more_cc',1);
 304            }
 305         } else if ($item == 'bcc') {
 306            if ($show_more_bcc) {
 307               $url = set_url_var($PHP_SELF, 'show_more_bcc',0);
 308               $show = true;
 309            } else {
 310               $url = set_url_var($PHP_SELF, 'show_more_bcc',1);
 311            }
 312         }
 313
 314         $cnt = count($ary);
 315         while ($i < $cnt) {
 316             $addr_o = $ary[$i];
 317             $ary[$i] = $addr_o->getAddress();
 318             $ary[$i] = decodeHeader(htmlspecialchars($ary[$i]));
 319             $url_string .= $ary[$i];
 320             if ($string) {
 321                 $string .= '<BR>'.$ary[$i];
 322             } else {
 323                 $string = $ary[$i];
 324                 if ($cnt>1) {
 325                     $string .= '&nbsp;(<A HREF="'.$url;
 326                     if ($show) {
 327                        $string .= '">'.$echo_less.'</A>)';
 328                     } else {
 329                        $string .= '">'.$echo_more.'</A>)';
 330                        break;
 331                     }
 332                 }
 333             }
 334             $i++;
 335         }
 336     }
 337     else {
 338         $string = '';
 339     }
 340     $url_string = urlencode($url_string);
 341     $result = array();
 342     $result['str'] = $string;
 343     $result['url_str'] = $url_string;
 344     return $result;
 345 }
 346
 347
 348
 349 /*
 350  *   Main of read_boby.php  --------------------------------------------------
 351  */
 352
 353 /*
 354     Urled vars
 355     ----------
 356     $passed_id
 357 */
 358
 359 global $uid_support, $sqimap_capabilities;
 360
 361 if (isset($mailbox)){
 362     $mailbox = urldecode( $mailbox );
 363 }
 364
 365 $imapConnection = sqimap_login($username, $key, $imapServerAddress,
 366                                $imapPort, 0);
 367
 368 $mbx_response = sqimap_mailbox_select($imapConnection, $mailbox, false, false, true);
 369
 370 if (!isset($messages)) {
 371     $messages = array();
 372     session_register('messages');
 373 }
 374
 375 /**
 376  * $message contains all information about the message
 377  * including header and body
 378  */
 379
 380 $uidvalidity = $mbx_response['UIDVALIDITY'];
 381
 382 if (!isset($messages[$uidvalidity])) {
 383    $messages[$uidvalidity] = array();
 384 }
 385 if (!isset($messages[$uidvalidity][$passed_id]) || !$uid_support) {
 386    $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
 387    $messages[$uidvalidity][$passed_id] = $message;
 388 } else {
 389    $message = $messages[$uidvalidity][$passed_id];
 390 }
 391 if (isset($passed_ent_id)) {
 392    $message = $message->getEntity($passed_ent_id);
 393    $message->id = $passed_id;
 394    $message->mailbox = $mailbox;
 395 }
 396 $header = $message->header;
 397
 398 //do_hook('html_top');
 399
 400 /*
 401  * The following code sets necesarry stuff for the MDN thing
 402  */
 403 if($default_use_mdn &&
 404    ($mdn_user_support = getPref($data_dir, $username, 'mdn_user_support',
 405                                 $default_use_mdn))) {
 406     $supportMDN = ServerMDNSupport($mbx_response["PERMANENTFLAGS"]);
 407     $FirstTimeSee = !$message->is_seen;
 408 }
 409
 410 $xtra = '';
 411 $xtra =  "<link rel=\"stylesheet\" href=\"../css/read_body.css\" type=\"text/css\">";
 412 //displayPageHeader($color, $mailbox);
 413
 414 /* =============================================================================
 415  *   block for handling incoming url vars
 416  *
 417  * =============================================================================
 418  */
 419
 420
 421 /*
 422  * The following code shows the header of the message and then exit
 423  */
 424 if (isset($view_hdr)) {
 425    $template_vars = array();
 426    parse_viewheader($imapConnection,$passed_id, $passed_ent_id, &$template_vars);
 427    $template_vars['return_address'] = set_url_var($PHP_SELF, 'view_hdr');
 428    view_header($template_vars, '', '</body></html>');
 429    exit;
 430 }
 431
 432 if (isset($sendreceipt)) {
 433    if ( !$message->is_mdnsent ) {
 434       if (isset($identity) ) {
 435          $final_recipient = getPref($data_dir, $username, 'email_address' . '0', '' );
 436       } else {
 437          $final_recipient = getPref($data_dir, $username, 'email_address', '' );
 438       }
 439
 440       $final_recipient = trim($final_recipient);
 441       if ($final_recipient == '' ) {
 442          $final_recipient = getPref($data_dir, $username, 'email_address', '' );
 443       }
 444
 445       if ( SendMDN( $final_recipient, $message ) > 0 && $supportMDN ) {
 446          ToggleMDNflag( true);
 447          $message->is_mdnsent = true;
 448       }
 449       ClearAttachments();
 450    }
 451 }
 452
 453 /* =============================================================================
 454  *   end block for handling incoming url vars
 455  *
 456  * =============================================================================
 457  */
 458
 459
 460 if (isset($msgs)) {
 461     $currentArrayIndex = $passed_id;
 462 } else {
 463     $currentArrayIndex = -1;
 464 }
 465 $msgs[$passed_id]['FLAG_SEEN'] = true;
 466
 467 /** translate the subject and mailbox into url-able text **/
 468 $url_subj = urlencode(trim($header->subject));
 469 $urlMailbox = urlencode($mailbox);
 470 $url_replyto = '';
 471 if (isset($header->replyto)) {
 472     $addr_o = $header->replyto;
 473     $addr_s = $addr_o->getAddress();
 474     $url_replyto = urlencode($addr_s);
 475 }
 476
 477 $url_replytoall = $url_replyto;
 478
 479 /**
 480  * If we are replying to all, then find all other addresses and
 481  * add them to the list.  Remove duplicates.
 482  */
 483
 484 $excl_arr = array();
 485
 486 /**
 487  * 1) Remove the addresses we'll be sending the message 'to'
 488  */
 489 $url_replytoall_avoid_addrs = '';
 490 if (isset($header->replyto)) {
 491     $excl_ar = $header->getAddr_a('replyto');
 492 }
 493
 494
 495 /**
 496  * 2) Remove our identities from the CC list (they still can be in the
 497  * TO list) only if $include_self_reply_all is turned off
 498  */
 499 if (!$include_self_reply_all) {
 500     $email_address = trim(getPref($data_dir, $username, 'email_address'));
 501     $excl_ar[$email_address] = '';
 502
 503     $idents = getPref($data_dir, $username, 'identities');
 504     if ($idents != '' && $idents > 1) {
 505         for ($i = 1; $i < $idents; $i ++) {
 506             $cur_email_address = getPref($data_dir, $username,
 507                                          'email_address' . $i);
 508             $cur_email_address = strtolower($cur_email_address);
 509             $excl_ar[$cur_email_address] = '';
 510         }
 511     }
 512 }
 513
 514 /**
 515  * 3) get the addresses.
 516  */
 517 $url_replytoall_ar = $header->getAddr_a(array('from','to','cc'), $excl_ar);
 518
 519 /**
 520  * 4) generate the string.
 521  */
 522 $url_replytoallcc = '';
 523 foreach( $url_replytoall_ar as $email => $personal) {
 524     if ($personal) {
 525         $url_replytoallcc .= ", \"$personal\" <$email>";
 526     } else {
 527         $url_replytoallcc .= ', '. $email;
 528     }
 529 }
 530 $url_replytoallcc = substr($url_replytoallcc,2);
 531
 532 /**
 533  * 5) urlencode() it
 534  */
 535 $url_replytoallcc = urlencode($url_replytoallcc);
 536
 537 $dateString = getLongDateString($header->date);
 538
 539 /**
 540  * What do we reply to -- text only, if possible
 541  */
 542
 543 $messagebody = '';
 544
 545 /* first step in displaying multiple entities */
 546
 547     $ent_ar = $message->findDisplayEntity(array());
 548     $i = 0;
 549     for ($i = 0; $i < count($ent_ar); $i++) {
 550         $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
 551     }
 552
 553
 554 //$ent_ar = findDisplayEntity($message,true);
 555
 556 $ent_num = $ent_ar[0];
 557 for ($i = 1 ; $i < count($ent_ar); $i++) {
 558     $ent_num .= '_'.$ent_ar[$i];
 559 }
 560 /** TEXT STRINGS DEFINITIONS **/
 561 $echo_more = _("more");
 562 $echo_less = _("less");
 563
 564 if (!isset($show_more_cc)) {
 565     $show_more_cc = FALSE;
 566 }
 567
 568 if (!isset($show_more_bcc)) {
 569     $show_more_bcc = FALSE;
 570 }
 571
 572 $use_css = false;
 573
 574 /** FORMAT THE TO STRING **/
 575 $to = formatRecipientString($message->header->to, "to");
 576 $to_string = $to['str'];
 577 $url_to_string = $to['url_str'];
 578
 579
 580 /** FORMAT THE CC STRING **/
 581
 582 $cc = formatRecipientString($header->cc, "cc");
 583 $cc_string = $cc['str'];
 584 $url_cc_string = $cc['url_str'];
 585
 586 /** FORMAT THE BCC STRING **/
 587
 588 $bcc = formatRecipientString($header->bcc, "bcc");
 589 $bcc_string = $bcc['str'];
 590 $url_bcc_string = $bcc['url_str'];
 591
 592 if ($default_use_priority) {
 593     $priority_level = substr($header->priority,0,1);
 594
 595     switch($priority_level) {
 596         /* check for a higher then normal priority. */
 597         case '1':
 598         case '2':
 599             $priority_string = _("High");
 600             break;
 601
 602         /* check for a lower then normal priority. */
 603         case '4':
 604         case '5':
 605             $priority_string = _("Low");
 606             break;
 607
 608         /* check for a normal priority. */
 609         case '3':
 610         default:
 611             $priority_level = '3';
 612             $priority_string = _("Normal");
 613             break;
 614
 615     }
 616 }
 617
 618 /** make sure everything will display in HTML format **/
 619
 620 $from_o = $header->from;
 621 if (is_object($from_o)) {
 622     $from_name = $from_o->getAddress();
 623 } else {
 624     $from_name = _("Unknown sender");
 625 }
 626 $from_name = decodeHeader(htmlspecialchars($from_name));
 627 $subject = decodeHeader(htmlspecialchars($message->header->subject));
 628 $identity = '';
 629 $idents = getPref($data_dir, $username, 'identities');
 630 if (!empty($idents) && $idents > 1) {
 631     for ($i = 1; $i < $idents; $i++) {
 632         $enc_from_name = '"'.
 633             encodeHeader(getPref($data_dir,
 634                                  $username,
 635                                  'full_name' . $i)) .
 636             '" <' . getPref($data_dir, $username,
 637                             'email_address' . $i) . '>';
 638         if (htmlspecialchars($enc_from_name) == $from_name) {
 639             $identity = $i;
 640             break;
 641         }
 642     }
 643 }
 644 /* start of prepare html fase */
 645
 646 $page = initPage();
 647 $head = initHead();
 648 $body = initBody($color);
 649 $top = getTop($color,$mailbox);
 650 $menu = getMenu($color,$mailbox);
 651
 652 GLOBAL $languages, $squirrelmail_language;
 653
 654 if ( isset( $languages[$squirrelmail_language]['DIR']) ) {
 655     $dir = $languages[$squirrelmail_language]['DIR'];
 656 } else {
 657     $dir = 'ltr';
 658 }
 659
 660 if ( $dir == 'ltr' ) {
 661     $rgt = 'right';
 662     $lft = 'left';
 663 } else {
 664     $rgt = 'left';
 665     $lft = 'right';
 666 }
 667
 668
 669
 670 //do_hook('read_body_top');
 671 /* topbar */
 672 if ($use_css) {
 673    $table_ar = array('cellpadding' => 3);
 674 } else {
 675    $table_ar = array( 'width' => '100%', 'cellpadding' => 3,
 676                       'cellspacing' => 0, 'align'=> 'center',
 677                       'border' => 0, 'bgcolor' => $color[9]);
 678 }
 679
 680 $topbar = new html('table','','','rb_tb','',$table_ar);
 681 $topbar_row = new html('tr','','','rb_tbr');
 682 $topbar_delimiter = new html ('','&nbsp;|&nbsp;');
 683
 684 $msgs_url = $base_uri . 'src/';
 685 if (isset($where) && isset($what)) {
 686     if ($pos == '') {
 687         $pos=0;
 688     }
 689     $msgs_url .= 'search.php?where='.urlencode($where).'&amp;pos='.$pos.
 690                  '&amp;what='.urlencode($what).'&amp;mailbox='.$urlMailbox;
 691 } else {
 692     $msgs_url .= 'right_main.php?sort='.$sort.'&amp;startMessage='.
 693                   $startMessage.'&amp;mailbox='.$urlMailbox;
 694 }
 695
 696 $topbar_col = new html('td','',array('small'=> true),'rb_tbc','',array('align' => $lft,
 697                             'width' => '33%'));
 698
 699 $topbar_col->addChild('a', _("Message List"),'','','',
 700                             array('href' => $msgs_url));
 701
 702 $delete_url = $base_uri . 'src/delete_message.php?mailbox='.$urlMailbox.
 703               '&amp;message='.$passed_id.'&amp;';
 704 if ($where && $what) {
 705     $delete_url .= 'where=' . urlencode($where) . '&amp;what=' . urlencode($what);
 706 } else {
 707     $delete_url .= 'sort='. $sort . '&amp;startMessage='. $startMessage;
 708 }
 709
 710 $topbar_col->htmlAdd($topbar_delimiter);
 711 $topbar_col->addChild('a', _("Delete") ,'','','',
 712                             array('href' => $delete_url));
 713
 714 if (($mailbox == $draft_folder) && ($save_as_draft)) {
 715    $comp_alt_uri = $base_uri . "src/compose.php?mailbox=$mailbox&amp;".
 716                 "identity=$identity&amp;send_to=$url_to_string&amp;".
 717                 "send_to_cc=$url_cc_string&amp;send_to_bcc=$url_bcc_string&amp;".
 718                 "subject=$url_subj&amp;mailprio=$priority_level&amp;".
 719                 "draft_id=$passed_id&amp;ent_num=$ent_num";
 720    $comp_alt_string = _("Resume Draft");
 721 }
 722 else if ($mailbox == $sent_folder) {
 723    $comp_alt_uri = $base_uri . "src/compose.php?mailbox=$mailbox&amp;".
 724                 "identity=$identity&amp;send_to=$url_to_string&amp;".
 725                 "send_to_cc=$url_cc_string&amp;send_to_bcc=$url_bcc_string&amp;".
 726                 "subject=$url_subj&amp;mailprio=$priority_level&amp;".
 727                 "ent_num=$ent_num&amp;passed_id=$passed_id&amp;edit_as_new=1";
 728    $comp_alt_string = _("Edit Message as New");
 729 }
 730 if (isset($comp_alt_uri)) {
 731     $topbar_col->htmlAdd($topbar_delimiter);
 732     if ($compose_new_win == '1') {
 733         $topbar_col->addChild('a', $comp_alt_string ,'','','',
 734                                array('href' => 'javascript:void(0)'),
 735                                array('onclick'=> 'comp_in_new(false,'.$comp_alt_uri.')'));
 736     } else {
 737         $topbar_col->addChild('a', $comp_alt_string ,'','','',
 738                                array('href' => $comp_alt_uri));
 739     }
 740 }
 741 $topbar_row->htmlAdd($topbar_col);
 742
 743 if (!(isset($where) && isset($what))) {
 744     $topbar_col = new html('td','',array('small'=> true),'rb_tbc','',array('align' => 'center',
 745                             'width' => '33%'));
 746
 747     if ($currentArrayIndex == -1) {
 748         $topbar_col->addChild('',_("Previous"));
 749         $topbar_col->htmlAdd($topbar_delimiter);
 750         $topbar_col->addChild('',_("Next"));
 751     } else {
 752         $prev = findPreviousMessage($mbx_response['EXISTS']);
 753         $next = findNextMessage();
 754
 755         if ($prev != -1) {
 756            $uri = $base_uri . 'src/read_body.php?passed_id='.$prev.
 757                  '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
 758                  '&amp;startMessage='.$startMessage.'&amp;show_more=0';
 759            $topbar_col->addChild('a',_("Previous") , '','','',
 760                                array('href' => $uri));
 761         } else {
 762            $topbar_col->addChild('',_("Previous"));
 763         }
 764         $topbar_col->htmlAdd($topbar_delimiter);
 765         if ($next != -1) {
 766            $uri = $base_uri . 'src/read_body.php?passed_id='.$next.
 767                  '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
 768                  '&amp;startMessage='.$startMessage.'&amp;show_more=0';
 769            $topbar_col->addChild('a',_("Next") ,'','','',
 770                                array('href' => $uri));
 771         } else {
 772            $topbar_col->addChild('',_("Next"));
 773         }
 774     }
 775     $topbar_row->htmlAdd($topbar_col);
 776 }
 777
 778 $topbar_col = new html('td','',array('small'=>true),'rb_tbc','',array('align' => $rgt,
 779                             'width' => '33%'));
 780
 781 $comp_uri = $base_uri . "src/compose.php?forward_id=$passed_id&amp;".
 782             "forward_subj=$url_subj&amp;".
 783             ($default_use_priority?"mailprio=$priority_level&amp;":'').
 784             "mailbox=$urlMailbox&amp;ent_num=$ent_num";
 785
 786 if ($compose_new_win == '1') {
 787     $topbar_col->addChild('a',_("Forward") ,'','','',
 788                                array('href' => 'javascript:void(0)'),
 789                                array('onclick'=> 'comp_in_new(false,'.$comp_uri.')'));
 790 } else {
 791     $topbar_col->addChild('a', _("Forward") ,'','','',
 792                                array('href' => $comp_uri));
 793 }
 794
 795 $topbar_col->htmlAdd($topbar_delimiter);
 796 $comp_uri = $base_uri . "src/compose.php?send_to=$url_replyto&amp;".
 797             "reply_subj=$url_subj&amp;".
 798             ($default_use_priority?"mailprio=$priority_level&amp;":'').
 799             "reply_id=$passed_id&amp;mailbox=$urlMailbox&amp;ent_num=$ent_num";
 800
 801 if ($compose_new_win == '1') {
 802     $topbar_col->addChild('a',_("Reply") ,'','','',
 803                                array('href' => 'javascript:void(0)'),
 804                                array('onclick'=> 'comp_in_new(false,'.$comp_uri.')'));
 805 } else {
 806     $topbar_col->addChild('a', _("Reply") ,'','','',
 807                                array('href' => $comp_uri));
 808 }
 809
 810 $comp_uri = $base_uri . "src/compose.php?send_to=$url_replytoall&amp;".
 811             "send_to_cc=$url_replytoallcc&amp;reply_subj=$url_subj&amp;".
 812             ($default_use_priority?"mailprio=$priority_level&amp;":'').
 813             "reply_id=$passed_id&amp;mailbox=$urlMailbox&amp;ent_num=$ent_num";
 814
 815 $topbar_col->htmlAdd($topbar_delimiter);
 816 if ($compose_new_win == '1') {
 817     $topbar_col->addChild('a',_("Reply All") ,'','','',
 818                                array('href' => 'javascript:void(0)'),
 819                                array('onclick'=> 'comp_in_new(false,'.$comp_uri.')'));
 820 } else {
 821     $topbar_col->addChild('a', _("Reply All") ,'','','',
 822                                array('href' => $comp_uri));
 823 }
 824 $topbar_row->htmlAdd($topbar_col);
 825 $topbar->htmlAdd($topbar_row);
 826
 827
 828 //$topbar->echoHtml();
 829 //echo '<table><tr><td></td></tr></table>';
 830
 831 /* read_body envelope */
 832
 833 /* init some formatting arrays */
 834 $use_css = false;
 835 if (!$use_css) {
 836    $ar_key = array( 'width' => '20%',
 837                  'valign' => 'top',
 838                  'bgcolor' => $color[0],
 839                  'align' => 'right');
 840
 841    $ar_val = array( 'width' => '80%',
 842                  'valign' => 'top',
 843                  'bgcolor' => $color[0],
 844                  'align' => 'left');
 845    $ar_table = array( 'width' => '100%',
 846                       'cellpadding' => '0',
 847                       'cellspacing' => '0',
 848                       'border' => '0',
 849                       'align' =>'center');
 850 } else {
 851    $ar_key = '';
 852    $ar_val = '';
 853    $ar_table = array( 'cellpadding' => '0',
 854                       'cellspacing' => '0');
 855 }
 856
 857 //echo '</table></table>';
 858
 859 $envtable = new html('table','','','rb_env','',$ar_table);
 860
 861 /* subject */
 862 $row_s = new html('tr','','','rb_r','rb_sc');
 863 $col = new html('td',_("Subject").':&nbsp;','','rb_hk','rb_sk',$ar_key);
 864 $row_s->htmlAdd($col);
 865 $col = new html('td',$subject,array('b'=> true),'rb_hv','rb_sv', $ar_val);
 866 $row_s->htmlAdd($col);
 867 $envtable->htmlAdd($row_s);
 868
 869 /* from */
 870 $row_f = new html('tr','','','rb_r','rb_fc');
 871 $col = new html('td',_("From").':&nbsp;','','rb_hk','rb_fk', $ar_key);
 872 $row_f->htmlAdd($col);
 873 $col = new html('td',$from_name,array('b'=> true),'rb_hv','rb_fv',$ar_val);
 874 $row_f->htmlAdd($col);
 875 $envtable->htmlAdd($row_f);
 876
 877 /* date */
 878 $row_d = new html('tr','','','rb_r','rb_dc');
 879 $col = new html('td',_("Date").':&nbsp;','','rb_hk','rb_dk', $ar_key);
 880 $row_d->htmlAdd($col);
 881 $col = new html('td',$dateString,array('b'=> true),'rb_hv','rb_dv',$ar_val);
 882 $row_d->htmlAdd($col);
 883 $envtable->htmlAdd($row_d);
 884
 885 /* to */
 886 $row_t = new html('tr','','','rb_r','rb_tc');
 887 $col = new html('td',_("To").':&nbsp;','','rb_hk','rb_tk', $ar_key);
 888 $row_t->htmlAdd($col);
 889 $col = new html('td',$to_string,array('b'=> true),'rb_hv','rb_tv',$ar_val);
 890 $row_t->htmlAdd($col);
 891 $envtable->htmlAdd($row_t);
 892
 893 /* cc */
 894 if (isset($cc_string) && $cc_string <> '') {
 895    $row_c = new html('tr','','','rb_r','rb_cc');
 896    $col = new html('td',_("Cc").':&nbsp;','','rb_hk','rb_ck', $ar_key);
 897    $row_c->htmlAdd($col);
 898    $col = new html('td',$cc_string,array('b'=> true),'rb_hv','rb_cv',$ar_val);
 899    $row_c->htmlAdd($col);
 900    $envtable->htmlAdd($row_c);
 901 }
 902
 903 /* bcc */
 904 if (isset($bcc_string) && $bcc_string <> '') {
 905    $row_b = new html('tr','','','rb_r','rb_bc');
 906    $col = new html('td',_("Bcc"). ':&nbsp;','','rb_hk','rb_bk', $ar_key);
 907    $row_b->htmlAdd($col);
 908    $col = new html('td',$bcc_string,array('b'=> true),'rb_hv','rb_bv',$ar_val);
 909    $row_b->htmlAdd($col);
 910    $envtable->htmlAdd($row_b);
 911 }
 912 /* priority */
 913 if ($default_use_priority && isset($priority_string) && $priority_string <> '' ) {
 914    $row_p = new html('tr','','','rb_r','rb_pc');
 915    $col = new html('td',_("Priority") . ':&nbsp;','','rb_hk','rb_pk', $ar_key);
 916    $row_p->htmlAdd($col);
 917    $col = new html('td',$priority_string ,array('b'=> true),'rb_hv','rb_pv',$ar_val);
 918    $row_p->htmlAdd($col);
 919    $envtable->htmlAdd($row_p);
 920 }
 921
 922 /* xmailer */
 923 if ($show_xmailer_default) {
 924     $mailer = $header->xmailer;
 925     if (trim($mailer)) {
 926        $row_xm = new html('tr','','','rb_r','rb_xmc');
 927        $col = new html('td',_("Mailer") . ':&nbsp;','','rb_hk','rb_xmk', $ar_key);
 928        $row_xm->htmlAdd($col);
 929        $col = new html('td',$mailer ,array('b'=> true),'rb_hv','rb_xmv',$ar_val);
 930        $row_xm->htmlAdd($col);
 931        $envtable->htmlAdd($row_xm);
 932     }
 933 }
 934
 935 if ($default_use_mdn) {
 936     if ($mdn_user_support) {
 937         if ($header->dnt) {
 938            $row_mdn = new html('tr','','','rb_r','rb_mdnc');
 939            $col = new html('td',_("Read receipt") . ':','','rb_hk','rb_mdnk', $ar_key);
 940            $row_mdn->htmlAdd($col);
 941            if ($message->is_mdnsent) {
 942               $mdn_string = _("send");
 943            } else {
 944               $mdn_string = _("requested");
 945               global $draftfolder;
 946               if ( !($mailbox == $draftfolder || $message->is_deleted)) {
 947                 $mdn_url = 'read_body.php?mailbox='.$mailbox.'&passed_id='.
 948                             $passed_id.'&startMessage='.$startMessage.
 949                             '&show_more='.$show_more.'&sendreceipt=1';
 950                 if ($FirstTimeSee && $javascript_on) {
 951                    $script = 'if (window.confirm("' .
 952                        _("The message sender has requested a response to indicate that you have read this message. Would you like to send a receipt?") .
 953                        '")) {  '."\n" .
 954                        '    window.open('.$mdn_url.',"right");' . "\n" .
 955                        '}' . "\n";
 956                    $body->scriptAdd($script);
 957                 }
 958                 $mdn_link = new html('a','[' . _("Send read receipt now") . ']','','','',
 959                             array('href' => $mdn_url));
 960               }
 961            }
 962            $col = new html('td',$mdn_string ,
 963                    array('b'=> true),'rb_hv','rb_mdnv',$ar_val);
 964            if (isset($mdn_link)) {
 965               $col->htmlAdd($mdn_link);
 966            }
 967            $row_mdn->htmlAdd($col);
 968            $envtable->htmlAdd($row_mdn);
 969         }
 970     }
 971 }
 972
 973 //$envtable->echoHtml($use_css);
 974
 975 $rb_tools_table = new html('table','','','rb_tools','',$ar_table);
 976 $row = new html('tr','','','rb_rt','',array('width'=> '100%',
 977                                             'valign'=> 'top',
 978                                             'align'=> 'right',
 979                                             'nowrap'));
 980 /* view header */
 981 $viewheader_url = $base_uri . 'src/read_body.php?mailbox=' . $urlMailbox .
 982                   '&amp;passed_id='. $passed_id. '&amp;';
 983 if ($where && $what) {
 984     $viewheader_url .= 'where=' . urlencode($where) . '&amp;what=' . urlencode($what) .
 985                        '&amp;view_hdr=1';
 986 } else {
 987     $viewheader_url .= 'startMessage=' .$startMessage. '&amp;show_more='.
 988                        $show_more .'&amp;view_hdr=1';
 989 }
 990
 991 $link = new html('a',_("View Full Header") .' | ','','','',array (
 992             'href' => $viewheader_url));
 993 $col = new html('td','',array('small'=>true),'rb_ht','rb_vht');
 994 $col->htmlAdd($link);
 995
 996 /* Output the printer friendly link if we are in subtle mode. */
 997 if ($pf_subtle_link) {
 998    $link = new html('span',printer_friendly_link(true),'','rb_ht','rb_pft');
 999    $col->htmlAdd($link);
1000 }
1001 $row->htmlAdd($col);
1002
1003 //do_hook("read_body_header_right");
1004
1005 $rb_tools_table->htmlAdd($row);
1006
1007 //$rb_tools_table->echoHtml($use_css);
1008
1009 //do_hook('read_body_header');
1010
1011 if ($use_css) {
1012    $ar_row = array('align'=>$lft);
1013 } else {
1014    $ar_row = array('align'=>$lft, 'bgcolor'=> $color[4]);
1015 }
1016
1017
1018 $rb_message_table =  new html('table','','','rb_body','',$ar_table);
1019 $row_body = new html('tr','','','rb_bd','rb_bdr');
1020 $col_body = new html('td',$messagebody,array('br'=>false),'rb_bd','rb_bdr',$ar_row);
1021 $row_body->htmlAdd($col_body);
1022 $rb_message_table->htmlAdd($row_body);
1023
1024 $row_body = new html('tr','','','rb_bd','rb_bdr');
1025 $attachements = formatAttachments($message,$ent_ar,$mailbox, $passed_id);
1026 $col_body = new html('td',$attachements,array('br'=>false),'rb_bd','rb_bdr',$ar_row);
1027 $row_body->htmlAdd($col_body);
1028 $rb_message_table->htmlAdd($row_body);
1029
1030 if ($use_css) {
1031    $ar_row = array('align'=>$lft);
1032 } else {
1033    $ar_row = array('align'=>$lft, 'bgcolor'=> $color[4], 'cellpadding' =>3);
1034 }
1035
1036 $body->htmlAdd($top);
1037 $body->htmlAdd($menu);
1038 $body->htmlAdd($topbar);
1039 $body->htmlAdd($envtable);
1040 $body->htmlAdd($rb_tools_table);
1041 $body->htmlAdd($rb_message_table);
1042
1043 $page->html_el[0]->htmlAdd($head);
1044 $page->html_el[0]->htmlAdd($body);
1045
1046 $page->echoHtml();
1047
1048
1049
1050
1051 /* show attached images inline -- if pref'fed so */
1052 if (($attachment_common_show_images) &&
1053     is_array($attachment_common_show_images_list)) {
1054
1055     foreach ($attachment_common_show_images_list as $img) {
1056         $imgurl = '../src/download.php' .
1057                 '?' .
1058                 'passed_id='     . urlencode($img['passed_id']) .
1059                 '&amp;mailbox='       . urlencode($mailbox) .
1060                 '&amp;passed_ent_id=' . urlencode($img['ent_id']) .
1061                 '&amp;absolute_dl=true';
1062
1063         echo html_tag( 'table', "\n" .
1064                     html_tag( 'tr', "\n" .
1065                         html_tag( 'td', '<img src="' . $imgurl . '">' ."\n", 'left'
1066                         )
1067                     ) ,
1068         'center', '', 'cellspacing=0 border="0" cellpadding="2"');
1069     }
1070 }
1071
1072
1073 //do_hook('read_body_bottom');
1074 //do_hook('html_bottom');
1075 sqimap_logout($imapConnection);
1076 ?>
1077