Source for file printer_friendly_bottom.php

Documentation is available at printer_friendly_bottom.php

  1. <?php
  2.  
  3. /**
  4.  * printer_friendly_bottom.php
  5.  *
  6.  * with javascript on, it is the bottom frame of printer_friendly_main.php
  7.  * else, it is alone in a new window
  8.  *
  9.  * - this is the page that does all the work, really.
  10.  *
  11.  * @copyright 1999-2020 The SquirrelMail Project Team
  12.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  13.  * @version $Id: printer_friendly_bottom.php 14840 2020-01-07 07:42:38Z pdontthink $
  14.  * @package squirrelmail
  15.  */
  16.  
  17. /** This is the printer_friendly_bottom page */
  18. define('PAGE_NAME', 'printer_friendly_bottom');
  19.  
  20. /**
  21.  * Path for SquirrelMail required files.
  22.  * @ignore
  23.  */
  24. define('SM_PATH','../');
  25.  
  26. /* SquirrelMail required files. */
  27. require_once(SM_PATH . 'include/validate.php');
  28. require_once(SM_PATH . 'functions/imap.php');
  29.  
  30. /* get some of these globals */
  31. sqgetGlobalVar('username', $username, SQ_SESSION);
  32. sqgetGlobalVar('key', $key, SQ_COOKIE);
  33. sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
  34. sqgetGlobalVar('messages', $messages, SQ_SESSION);
  35. sqgetGlobalVar('passed_id', $passed_id, SQ_GET);
  36. sqgetGlobalVar('mailbox', $mailbox, SQ_GET);
  37.  
  38. if (! sqgetGlobalVar('passed_ent_id', $passed_ent_id, SQ_GET) ||
  39.     ! preg_match('/^\d+(\.\d+)*$/', $passed_ent_id) ) {
  40.     $passed_ent_id = '';
  41. } 
  42. /* end globals */
  43.  
  44. $pf_cleandisplay = getPref($data_dir, $username, 'pf_cleandisplay', false);
  45. global $imap_stream_options; // in case not defined in config
  46. $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0, $imap_stream_options);
  47. $mbx_response = sqimap_mailbox_select($imapConnection, $mailbox);
  48. if (isset($messages[$mbx_response['UIDVALIDITY']][$passed_id])) {
  49.     $message = $messages[$mbx_response['UIDVALIDITY']][$passed_id];
  50. } else {
  51.     $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
  52. }
  53. if ($passed_ent_id) {
  54.     $message = $message->getEntity($passed_ent_id);
  55. }
  56.  
  57. /* --start display setup-- */
  58.  
  59. $rfc822_header = $message->rfc822_header; 
  60. /* From and Date are usually fine as they are... */
  61. $from = $rfc822_header->getAddr_s('from');
  62. $date = getLongDateString($rfc822_header->date, $rfc822_header->date_unparsed);
  63. $subject = trim($rfc822_header->subject);
  64.  
  65. /* we can clean these up if the list is too long... */
  66. $cc = $rfc822_header->getAddr_s('cc');
  67. $to = $rfc822_header->getAddr_s('to');
  68.  
  69. if ($show_html_default == 1) {
  70.     $ent_ar = $message->findDisplayEntity(array());
  71. } else {
  72.     $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
  73. }
  74. $body = '';
  75. if ($ent_ar[0] != '') {
  76.   for ($i = 0; $i < count($ent_ar); $i++) {
  77.      $body .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox, true);
  78.      $body .= '<hr noshade size="1" />';
  79.   }
  80.   $hookResults = do_hook('message_body', $body);
  81.   $body = $hookResults[1];
  82. } else {
  83.   $body = _("Message not printable");
  84. }
  85.  
  86.  /* now, if they choose to, we clean up the display a bit... */
  87.  
  88. if ($pf_cleandisplay) {
  89.  
  90.     $num_leading_spaces = 9; // nine leading spaces for indentation
  91.  
  92.      // sometimes I see ',,' instead of ',' seperating addresses *shrug*
  93.     $cc = pf_clean_string(str_replace(',,', ',', $cc), $num_leading_spaces);
  94.     $to = pf_clean_string(str_replace(',,', ',', $to), $num_leading_spaces);
  95.  
  96.      // the body should have no leading zeros
  97.     // disabled because it destroys html mail
  98.  
  99. //    $body = pf_clean_string($body, 0);
  100.  
  101.      // clean up everything else...
  102.     $subject = pf_clean_string($subject, $num_leading_spaces);
  103.     $from = pf_clean_string($from, $num_leading_spaces);
  104.     $date = pf_clean_string($date, $num_leading_spaces);
  105.  
  106. } // end cleanup
  107.  
  108. $to = decodeHeader($to);
  109. $cc = decodeHeader($cc);
  110. $from = decodeHeader($from);
  111. $subject = decodeHeader($subject);
  112.  
  113. // load attachments
  114. $attachments = pf_show_attachments($message,$ent_ar,$mailbox,$passed_id);
  115.  
  116. // --end display setup--
  117.  
  118.  
  119. /* --start browser output-- */
  120. displayHtmlHeader( $subject, '', FALSE );
  121.  
  122. echo '<body text="#000000" bgcolor="#FFFFFF" link="#000000" vlink="#000000" alink="#000000">'."\n" .
  123.      /* headers (we use table because translations are not all the same width) */
  124.      html_tag( 'table', '', 'center', '', 'cellspacing="0" cellpadding="0" border="0" width="100%"' ) .
  125.      html_tag( 'tr',
  126.          html_tag( 'td', _("From").':&nbsp;', 'left' ,'','valign="top"') .
  127.          html_tag( 'td', $from, 'left' )
  128.      ) . "\n" .
  129.      html_tag( 'tr',
  130.          html_tag( 'td', _("Subject").':&nbsp;', 'left','','valign="top"' ) .
  131.          html_tag( 'td', $subject, 'left' )
  132.      ) . "\n" .
  133.      html_tag( 'tr',
  134.          html_tag( 'td', _("Date").':&nbsp;', 'left' ) .
  135.          html_tag( 'td', sm_encode_html_special_chars($date), 'left' )
  136.      ) . "\n" .
  137.      html_tag( 'tr',
  138.          html_tag( 'td', _("To").':&nbsp;', 'left','','valign="top"' ) .
  139.          html_tag( 'td', $to, 'left' )
  140.     ) . "\n";
  141.     if ( strlen($cc) > 0 ) { /* only show Cc: if it's there... */
  142.          echo html_tag( 'tr',
  143.              html_tag( 'td', _("Cc").':&nbsp;', 'left','','valign="top"' ) .
  144.              html_tag( 'td', $cc, 'left' )
  145.          );
  146.      }
  147.      /* body */
  148.      echo html_tag( 'tr',
  149.          html_tag( 'td', '<hr noshade size="1" /><br />' . "\n" . $body, 'left', '', 'colspan="2"' )
  150.                     ) . "\n";
  151.  
  152.      if (! empty($attachments)) {
  153.          // attachments title
  154.          echo html_tag( 'tr',
  155.              html_tag( 'td','<b>'._("Attachments:").'</b>', 'left', '', 'colspan="2"' )
  156.          ) . "\n" ;
  157.          // list of attachments
  158.          echo html_tag( 'tr',
  159.              html_tag( 'td',$attachments, 'left', '', 'colspan="2"' )
  160.          ) . "\n" ;
  161.          // add separator line
  162.          echo html_tag( 'tr',
  163.              html_tag( 'td', '<hr style="height: 1px;" />', 'left', '', 'colspan="2"' )
  164.          ) . "\n" ;
  165.      }
  166.  
  167.      echo '</table>' . "\n" .
  168.      '</body></html>';
  169.  
  170. /* --end browser output-- */
  171.  
  172.  
  173. /* --start pf-specific functions-- */
  174.  
  175. /**
  176.  * Function should clean layout of printed messages when user
  177.  * enables "Printer Friendly Clean Display" option.
  178.  *
  179.  * @param string unclean_string
  180.  * @param integer num_leading_spaces
  181.  * @return string 
  182.  * @example $string = pf_clean_string($string, 9);
  183.  * @access private
  184.  */
  185. function pf_clean_string ( $unclean_string, $num_leading_spaces ) {
  186.     global $data_dir, $username;
  187.     $unclean_string = str_replace('&nbsp;',' ',$unclean_string);
  188.     $wrap_at = getPref($data_dir, $username, 'wrap_at', 86);
  189.     $wrap_at = $wrap_at - $num_leading_spaces; /* header stuff */
  190.  
  191.     $leading_spaces = '';
  192.     while ( strlen($leading_spaces) < $num_leading_spaces )
  193.         $leading_spaces .= ' ';
  194.  
  195.     $clean_string = '';
  196.     while ( strlen($unclean_string) > $wrap_at )
  197.     {
  198.         $this_line = substr($unclean_string, 0, $wrap_at);
  199.         if ( strrpos( $this_line, "\n" ) ) /* this should NEVER happen with anything but the $body */
  200.         {
  201.             $clean_string .= substr( $this_line, 0, strrpos( $this_line, "\n" ));
  202.             $clean_string .= $leading_spaces;
  203.             $unclean_string = substr($unclean_string, strrpos( $this_line, "\n" ));
  204.         }
  205.         else
  206.         {
  207.             $i = strrpos( $this_line, ' ');
  208.             $clean_string .= substr( $this_line, 0, $i);
  209.             $clean_string .= "\n" . $leading_spaces;
  210.             $unclean_string = substr($unclean_string, 1+$i);
  211.         }
  212.     }
  213.     $clean_string .= $unclean_string;
  214.  
  215.     return $clean_string;
  216. } /* end pf_clean_string() function */
  217.  
  218. /**
  219.  * Displays attachment information
  220.  *
  221.  * Stripped version of formatAttachments() function from functions/mime.php.
  222.  * @param object $message SquirrelMail message object
  223.  * @param array $exclude_id message parts that are not attachments.
  224.  * @param string $mailbox mailbox name
  225.  * @param integer $id message id
  226.  * @since 1.5.1 and 1.4.6
  227.  * @return string html formated attachment information.
  228.  */
  229. function pf_show_attachments($message, $exclude_id, $mailbox, $id) {
  230.     global $where, $what, $startMessage, $color, $passed_ent_id;
  231.  
  232.     $att_ar = $message->getAttachments($exclude_id);
  233.  
  234.     if (!count($att_ar)) return '';
  235.  
  236.     $attachments = '';
  237.  
  238.     $urlMailbox = urlencode($mailbox);
  239.  
  240.     foreach ($att_ar as $att) {
  241.         $ent = $att->entity_id;
  242.         $header = $att->header;
  243.         $type0 = strtolower($header->type0);
  244.         $type1 = strtolower($header->type1);
  245.         $name = '';
  246.  
  247.         if ($type0 =='message' && $type1 == 'rfc822') {
  248.             $rfc822_header = $att->rfc822_header;
  249.             $filename = $rfc822_header->subject;
  250.             if (trim( $filename ) == '') {
  251.                 $filename = 'untitled-[' . $ent . ']' ;
  252.             }
  253.             $from_o = $rfc822_header->from;
  254.             if (is_object($from_o)) {
  255.                 $from_name = decodeHeader($from_o->getAddress(true));
  256.             } else {
  257.                 $from_name = _("Unknown sender");
  258.             }
  259.             $description = '<tr>'.
  260.                 html_tag( 'td',_("From:"), 'right') .
  261.                 html_tag( 'td',$from_name, 'left') .
  262.                 '</tr>';
  263.         } else {
  264.             $filename = $att->getFilename();
  265.             if ($header->description) {
  266.                 $description = '<tr>'.
  267.                     html_tag( 'td',_("Info:"), 'right') .
  268.                     html_tag( 'td',decodeHeader($header->description), 'left') .
  269.                     '</tr>';
  270.             } else {
  271.                 $description = '';
  272.             }
  273.         }
  274.  
  275.         $display_filename = $filename;
  276.  
  277.         // TODO: maybe make it nicer?
  278.         $attachments .= '<table cellpadding="0" cellspacing="0" border="1"><tr><th colspan="2">'.decodeHeader($display_filename).'</th></tr>' .
  279.             '<tr border="0">'.
  280.             html_tag( 'td',_("Size:"), 'right') .
  281.             html_tag( 'td',show_readable_size($header->size), 'left') .
  282.             '</tr><tr>' .
  283.             html_tag( 'td',_("Type:"), 'right') .
  284.             html_tag( 'td',sm_encode_html_special_chars($type0).'/'.sm_encode_html_special_chars($type1), 'left') . 
  285.             '</tr>';
  286.         if (! empty($description)) {
  287.             $attachments .= $description;
  288.         }
  289.         $attachments .= "</table>\n";
  290.     }
  291.     return $attachments;
  292. }
  293.  
  294.  
  295. /* --end pf-specific functions */

Documentation generated on Mon, 13 Jan 2020 04:25:11 +0100 by phpDocumentor 1.4.3