X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Fprinter_friendly_bottom.php;h=2f0839d8a0ecbe5172f54ca89341d65bc24291b8;hb=2b9d3f0b226c885d7d0e3acfc8cb4080303849bd;hp=cbfc2604d0133ccf5ee7bb2294264c8fb3fb9043;hpb=15e6162eacc97158393bc75aed3afeb7b19c24a6;p=squirrelmail.git diff --git a/src/printer_friendly_bottom.php b/src/printer_friendly_bottom.php index cbfc2604..2f0839d8 100644 --- a/src/printer_friendly_bottom.php +++ b/src/printer_friendly_bottom.php @@ -14,113 +14,140 @@ * $Id$ */ -/*****************************************************************/ -/*** THIS FILE NEEDS TO HAVE ITS FORMATTING FIXED!!! ***/ -/*** PLEASE DO SO AND REMOVE THIS COMMENT SECTION. ***/ -/*** + Base level indent should begin at left margin, as ***/ -/*** the require_once below looks. ***/ -/*** + All identation should consist of four space blocks ***/ -/*** + Tab characters are evil. ***/ -/*** + all comments should use "slash-star ... star-slash" ***/ -/*** style -- no pound characters, no slash-slash style ***/ -/*** + FLOW CONTROL STATEMENTS (if, while, etc) SHOULD ***/ -/*** ALWAYS USE { AND } CHARACTERS!!! ***/ -/*** + Please use ' instead of ", when possible. Note " ***/ -/*** should always be used in _( ) function calls. ***/ -/*** Thank you for your help making the SM code more readable. ***/ -/*****************************************************************/ - -require_once('../src/validate.php'); -require_once('../functions/strings.php'); -require_once('../config/config.php'); -require_once('../src/load_prefs.php'); -require_once('../functions/imap.php'); -require_once('../functions/page_header.php'); - - $pf_cleandisplay = getPref($data_dir, $username, 'pf_cleandisplay'); - - $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); - sqimap_mailbox_select($imap_stream, $mailbox); - $message = sqimap_get_message($imap_stream, $passed_id, $mailbox); - - -// --start display setup-- - - // From and Date are usually fine as they are... - $from = decodeHeader($message->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 - - // --end display setup-- - - - // --start browser output-- - displayHtmlHeader( _("Printer Friendly"), '', FALSE ); - - echo "\n" . - // headers (we use table becasue translations are not all the same width) - ''. - '\n". - '\n"; - if ( strlen($cc) > 0 ) { // only show CC: if it's there... - echo '\n"; - } - echo '\n". - '\n". - '
' . _("From") . ':' . htmlentities($from) . "
' . _("To") . ':' . htmlentities($to) . "
' . _("CC") . ':' . htmlentities($cc) . "
' . _("Date") . ':' . htmlentities($date) . "
' . _("Subject") . ':' . htmlentities($subject) . "
'. - "\n
";
-
-
-     // body
-    echo "
\n";
-    echo htmlentities($body);
-
-// --end browser output--
-
-
-?>
- - - -getEntity($passed_ent_id); +} + + +/* --start display setup-- */ + +$rfc822_header = $message->rfc822_header; +/* From and Date are usually fine as they are... */ +$from = decodeHeader($rfc822_header->getAddr_s('from')); +$date = getLongDateString($rfc822_header->date); +$subject = trim(decodeHeader($rfc822_header->subject)); + +/* we can clean these up if the list is too long... */ +$cc = decodeHeader($rfc822_header->getAddr_s('cc')); +$to = decodeHeader($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); + $body .= '
'; + } + $hookResults = do_hook('message_body', $body); + $body = $hookResults[1]; +} else { + $body = _("Message not printable"); +} + + /* 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 + // disabled because it destroys html mail + +// $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 + +// --end display setup-- + + +/* --start browser output-- */ +displayHtmlHeader( _("Printer Friendly"), '', FALSE ); + +echo "\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', htmlspecialchars($from), 'left' ) + ) . "\n" . + html_tag( 'tr', + html_tag( 'td', _("Subject").' ', 'left','','valign="top"' ) . + html_tag( 'td', htmlspecialchars($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', htmlspecialchars($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', htmlspecialchars($cc), 'left' ) + ); + } + /* body */ + echo html_tag( 'tr', + html_tag( 'td', '

' . "\n" . $body, 'left', '', 'colspan="2"' ) + ) . "\n" . + + '' . "\n" . + ''; + +/* --end browser output-- */ + + +/* --start pf-specific functions-- */ + +/* $string = pf_clean_string($string, 9); */ 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 + $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 ) @@ -130,7 +157,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; @@ -143,11 +170,12 @@ function pf_clean_string ( $unclean_string, $num_leading_spaces ) { $unclean_string = substr($unclean_string, (1+strrpos( $this_line, ' ' ))); } } + $clean_string .= $unclean_string; return $clean_string; -} // end pf_clean_string() function +} /* end pf_clean_string() function */ -// --end pf-specific functions +/* --end pf-specific functions */ ?>