X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Fprinter_friendly_bottom.php;h=350c466b637ca91a0ef3012e95ac856a4d281b66;hb=7111b0daa5f74c1c96d3bcf87da7a05e4ba6e189;hp=1977d4fe10ff00a0a2fc0e9f60c47ef51d43953d;hpb=f226cba750d5d3330126b17f9b8dc928a97e76fa;p=squirrelmail.git diff --git a/src/printer_friendly_bottom.php b/src/printer_friendly_bottom.php index 1977d4fe..350c466b 100644 --- a/src/printer_friendly_bottom.php +++ b/src/printer_friendly_bottom.php @@ -1,124 +1,181 @@ header->from); - $date = getLongDateString($message->header->date); - - // we can clean these up if the list is too long... - $cc = decodeHeader(getLineOfAddrs($message->header->cc)); - $to = decodeHeader(getLineOfAddrs($message->header->to)); - - // and Body and Subject could easily stream off the page... - $body = mime_fetch_body($imap_stream, $passed_id, $passed_ent_id); - $body = str_replace("\n", "\n", trim(decodeBody($body, $message->header->encoding))); - $subject = trim(decodeHeader($message->header->subject)); - - // now, if they choose to, we clean up the display a bit... - if ( empty($pf_cleandisplay) || $pf_cleandisplay != 'no' ) - { - - $num_leading_spaces = 9; // nine leading spaces for indentation - - // sometimes I see ',,' instead of ',' seperating addresses *shrug* - $cc = pf_clean_string(str_replace(',,', ',', $cc), $num_leading_spaces); - $to = pf_clean_string(str_replace(',,', ',', $to), $num_leading_spaces); - - // the body should have no leading zeros - $body = pf_clean_string($body, 0); - - // clean up everything else... - $subject = pf_clean_string($subject, $num_leading_spaces); - $from = pf_clean_string($from, $num_leading_spaces); - $date = pf_clean_string($date, $num_leading_spaces); - - } // end cleanup +/** + * printer_friendly_bottom.php + * + * with javascript on, it is the bottom frame of printer_friendly_main.php + * else, it is alone in a new window + * + * - this is the page that does all the work, really. + * + * @copyright © 1999-2006 The SquirrelMail Project Team + * @license http://opensource.org/licenses/gpl-license.php GNU Public License + * @version $Id$ + * @package squirrelmail + */ + +/** + * Include the SquirrelMail initialization file. + */ +require('../include/init.php'); + +/* SquirrelMail required files. */ +require_once(SM_PATH . 'functions/imap_general.php'); +require_once(SM_PATH . 'functions/imap_messages.php'); +require_once(SM_PATH . 'functions/date.php'); +require_once(SM_PATH . 'functions/mime.php'); +require_once(SM_PATH . 'functions/url_parser.php'); + +/* get some of these globals */ +sqgetGlobalVar('username', $username, SQ_SESSION); +sqgetGlobalVar('key', $key, SQ_COOKIE); +sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION); + +sqgetGlobalVar('passed_id', $passed_id, SQ_GET); +sqgetGlobalVar('mailbox', $mailbox, SQ_GET); + +if (! sqgetGlobalVar('passed_ent_id', $passed_ent_id, SQ_GET) ) { + $passed_ent_id = ''; +} +sqgetGlobalVar('show_html_default', $show_html_default, SQ_FORM); +/* end globals */ + +$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); +$mbx_response = sqimap_mailbox_select($imapConnection, $mailbox); +if (isset($messages[$mbx_response['UIDVALIDITY']][$passed_id])) { + $message = $messages[$mbx_response['UIDVALIDITY']][$passed_id]; +} else { + $message = sqimap_get_message($imapConnection, $passed_id, $mailbox); +} +if ($passed_ent_id) { + $message = $message->getEntity($passed_ent_id); +} + +/* --start display setup-- */ + +$rfc822_header = $message->rfc822_header; +/* From and Date are usually fine as they are... */ +$from = $rfc822_header->getAddr_s('from'); +$date = getLongDateString($rfc822_header->date); +$subject = trim($rfc822_header->subject); + +/* we can clean these up if the list is too long... */ +$cc = $rfc822_header->getAddr_s('cc'); +$to = $rfc822_header->getAddr_s('to'); + +if ($show_html_default == 1) { + $ent_ar = $message->findDisplayEntity(array()); +} else { + $ent_ar = $message->findDisplayEntity(array(), array('text/plain')); +} +$body = ''; +if ($ent_ar[0] != '') { + for ($i = 0; $i < count($ent_ar); $i++) { + $body .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox, TRUE); + $body .= '
'; + } + $hookResults = do_hook('message_body', $body); + $body = $hookResults[1]; +} else { + $body = _("Message not printable"); +} + +/* now we clean up the display a bit... */ + +$num_leading_spaces = 9; // nine leading spaces for indentation + +// sometimes I see ',,' instead of ',' separating addresses *shrug* +$cc = pf_clean_string(str_replace(',,', ',', $cc), $num_leading_spaces); +$to = pf_clean_string(str_replace(',,', ',', $to), $num_leading_spaces); + +// clean up everything else... +$subject = pf_clean_string($subject, $num_leading_spaces); +$from = pf_clean_string($from, $num_leading_spaces); +$date = pf_clean_string($date, $num_leading_spaces); + +// end cleanup + +$to = decodeHeader($to); +$cc = decodeHeader($cc); +$from = decodeHeader($from); +$subject = decodeHeader($subject); + +$attachments = pf_show_attachments($message,$ent_ar,$mailbox,$passed_id); // --end display setup-- -// --start browser output-- - -?> - - - - - <?php echo _("Printable View"); ?> - - -', $theme_css); - echo "\n"; - } - - printf('', - $color[8], $color[4], $color[7], $color[7], $color[7]); - - echo "\n
";
-
-     // headers
-    echo "   " . _("From") . ': ' . htmlentities($from) . "\n";
-    echo "     " . _("To") . ': ' . htmlentities($to) . "\n";
-    if ( strlen($cc) > 0 ) // only show CC: if it's there...
-        echo "     " . _("CC") . ': ' . htmlentities($cc) . "\n";
-    echo "   " . _("Date") . ': ' . htmlentities($date) . "\n";
-    echo _("Subject") . ': ' . htmlentities($subject) . "\n\n";
-
-     // body
-    echo "
\n";
-    echo htmlentities($body);
-
-// --end browser output--
-
-
-?>
- - - -'."\n" . + /* headers (we use table because translations are not all the same width) */ + html_tag( 'table', '', 'center', '', 'cellspacing="0" cellpadding="0" border="0" width="100%"' ) . + html_tag( 'tr', + html_tag( 'td', ''._("From").': ', 'left' ,'','valign="top"') . + html_tag( 'td', $from, 'left' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', ''._("Subject").': ', 'left','','valign="top"' ) . + html_tag( 'td', $subject, 'left' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', ''._("Date").': ', 'left' ) . + html_tag( 'td', htmlspecialchars($date), 'left' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', ''._("To").': ', 'left','','valign="top"' ) . + html_tag( 'td', $to, 'left' ) + ) . "\n"; + if ( strlen($cc) > 0 ) { /* only show Cc: if it's there... */ + echo html_tag( 'tr', + html_tag( 'td', ''._("Cc").': ', 'left','','valign="top"' ) . + html_tag( 'td', $cc, 'left' ) + ); + } + /* body */ + echo html_tag( 'tr', + html_tag( 'td', '

' . "\n" . $body, 'left', '', 'colspan="2"' ) + ) . "\n" ; + + if (! empty($attachments)) { + // attachments title + echo html_tag( 'tr', + html_tag( 'td',''._("Attachments:").'', 'left', '', 'colspan="2"' ) + ) . "\n" ; + // list of attachments + echo html_tag( 'tr', + html_tag( 'td',$attachments, 'left', '', 'colspan="2"' ) + ) . "\n" ; + // add separator line + echo html_tag( 'tr', + html_tag( 'td', '
', 'left', '', 'colspan="2"' ) + ) . "\n" ; + } + + echo '' . "\n"; +$oTemplate->display('footer.tpl'); + +/* --end browser output-- */ + + +/* --start pf-specific functions-- */ + +/** + * Function should clean layout of printed messages when user + * enables "Printer Friendly Clean Display" option. + * For example: $string = pf_clean_string($string, 9); + * + * @param string unclean_string + * @param integer num_leading_spaces + * @return string + * @access private + */ function pf_clean_string ( $unclean_string, $num_leading_spaces ) { global $data_dir, $username; - - $wrap_at = getPref($data_dir, $username, 'wrap_at'); - $wrap_at = $wrap_at - $num_leading_spaces; // header stuff + $unclean_string = str_replace(' ',' ',$unclean_string); + $wrap_at = getPref($data_dir, $username, 'wrap_at', 86); + $wrap_at = $wrap_at - $num_leading_spaces; /* header stuff */ $leading_spaces = ''; while ( strlen($leading_spaces) < $num_leading_spaces ) @@ -128,7 +185,7 @@ function pf_clean_string ( $unclean_string, $num_leading_spaces ) { while ( strlen($unclean_string) > $wrap_at ) { $this_line = substr($unclean_string, 0, $wrap_at); - if ( strrpos( $this_line, "\n" ) ) // this should NEVER happen with anything but the $body + if ( strrpos( $this_line, "\n" ) ) /* this should NEVER happen with anything but the $body */ { $clean_string .= substr( $this_line, 0, strrpos( $this_line, "\n" )); $clean_string .= $leading_spaces; @@ -136,16 +193,93 @@ function pf_clean_string ( $unclean_string, $num_leading_spaces ) { } else { - $clean_string .= substr( $this_line, 0, strrpos( $this_line, ' ' )); + $i = strrpos( $this_line, ' '); + $clean_string .= substr( $this_line, 0, $i); $clean_string .= "\n" . $leading_spaces; - $unclean_string = substr($unclean_string, (1+strrpos( $this_line, ' ' ))); + $unclean_string = substr($unclean_string, 1+$i); } } $clean_string .= $unclean_string; return $clean_string; -} // end pf_clean_string() function +} /* end pf_clean_string() function */ + +/** + * Displays attachment information + * + * Stripped version of formatAttachments() function from functions/mime.php. + * @param object $message SquirrelMail message object + * @param array $exclude_id message parts that are not attachments. + * @param string $mailbox mailbox name + * @param integer $id message id + * @return string html formated attachment information. + */ +function pf_show_attachments($message, $exclude_id, $mailbox, $id) { + global $where, $what, $startMessage, $color, $passed_ent_id; + + $att_ar = $message->getAttachments($exclude_id); + + if (!count($att_ar)) return ''; + + $attachments = ''; + + $urlMailbox = urlencode($mailbox); + + foreach ($att_ar as $att) { + $ent = $att->entity_id; + $header = $att->header; + $type0 = strtolower($header->type0); + $type1 = strtolower($header->type1); + $name = ''; + + if ($type0 =='message' && $type1 == 'rfc822') { + $rfc822_header = $att->rfc822_header; + $filename = $rfc822_header->subject; + if (trim( $filename ) == '') { + $filename = 'untitled-[' . $ent . ']' ; + } + $from_o = $rfc822_header->from; + if (is_object($from_o)) { + $from_name = decodeHeader($from_o->getAddress(true)); + } else { + $from_name = _("Unknown sender"); + } + $description = ''. + html_tag( 'td',_("From:"), 'right') . + html_tag( 'td',$from_name, 'left') . + ''; + } else { + $filename = $att->getFilename(); + if ($header->description) { + $description = ''. + html_tag( 'td',_("Info:"), 'right') . + html_tag( 'td',decodeHeader($header->description), 'left') . + ''; + } else { + $description = ''; + } + } + + $display_filename = $filename; + + // TODO: maybe make it nicer? + $attachments .= '' . + ''. + html_tag( 'td',_("Size:"), 'right', '', 'width="25%"') . + html_tag( 'td',show_readable_size($header->size), 'left', '', 'width="75%"') . + '' . "\n" . + html_tag( 'td',_("Type:"), 'right', '', 'width="25%"') . + html_tag( 'td',htmlspecialchars($type0).'/'.htmlspecialchars($type1), 'left', '', 'width="75%"') . + ''; + if (! empty($description)) { + $attachments .= $description; + } + $attachments .= "
'.decodeHeader($display_filename).'
\n"; + } + return $attachments; +} + -// --end pf-specific functions +/* --end pf-specific functions */ ?>