* modifications for using ent_id=0 for downloading full messages
[squirrelmail.git] / src / download.php
index b148bb1c5a36856f250e1d944fdfada31ce933c7..1be2b9ebf91a91538c9f97b90802554b136a4ae3 100644 (file)
@@ -3,7 +3,7 @@
 /**
  * download.php
  *
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
+ * Copyright (c) 1999-2003 The SquirrelMail Project Team
  * Licensed under the GNU GPL. For full terms see the file COPYING.
  *
  * Handles attachment downloads to the users computer.
  * $Id$
  */
 
-require_once('../src/validate.php');
-require_once('../functions/imap.php');
-require_once('../functions/mime.php');
-require_once('../functions/date.php');
-require_once('../functions/html.php');
+/* Path for SquirrelMail required files. */
+define('SM_PATH','../');
+
+/* SquirrelMail required files. */
+require_once(SM_PATH . 'include/validate.php');
+require_once(SM_PATH . 'functions/imap.php');
+require_once(SM_PATH . 'functions/mime.php');
 
 header('Pragma: ');
 header('Cache-Control: cache');
 
-function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at, $imapConnection) {
-    global $where, $what, $charset;
-    global $startMessage;
-
-    displayPageHeader($color, 'None');
-
-    if ($where && $what) {
-        // from a search
-        $message_link_str = "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&where=".urlencode($where)."&what=".urlencode($what)."\">". _("View message") . "</a>";
-    } else {
-        $message_link_str = "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&startMessage=$startMessage&show_more=0\">". _("View message") . "</a>";
-    }
-    $urlmailbox = urlencode($mailbox);
+/* globals */
 
-    echo '<br>' .
-        html_tag( 'table',
-            html_tag( 'tr',
-                html_tag( 'td', 
-                     '<b><center>' .
-                     _("Viewing a text attachment") . ' - ' . $message_link_str . '</b></center>',
-                'left', $color[0] )
-            ) .
-            html_tag( 'tr',
-                html_tag( 'td', 
-                     '<center>' .
-                     "<A HREF=\"../src/download.php?absolute_dl=true&passed_id=$id&passed_ent_id=$entid&mailbox=$urlmailbox\">".
-                     _("Download this as a file").
-                     "</A></CENTER><BR>",
-                'left' )
-            ),
-        'center', '', 'width="100%" border="0" cellspacing="0" cellpadding="2"' );
+$key = $_COOKIE['key'];
+$username = $_SESSION['username'];
+$onetimepad = $_SESSION['onetimepad'];
+$mailbox = $_GET['mailbox'];
+$passed_id = (int) $_GET['passed_id'];
+$ent_id = $_GET['ent_id'];
+$messages = $_SESSION['messages'];
 
-    if ($type1 == 'html') {
-        $msg  = sqimap_get_message($imapConnection, $id, $mailbox);    
-        $body = MagicHTML( $body, $id, $msg );
-    } else {
-        translateText($body, $wrap_at, $charset);
-    }
-
-    flush();
-
-         //"<TABLE WIDTH=\"98%\" BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">".
-        //"<TR><TD BGCOLOR=\"$color[4]\"><TT>";
-
-        html_tag( 'table',
-            html_tag( 'tr',
-                html_tag( 'td', '<tt>' . $body . '</tt>', 'left', $color[4] )
-            ) ,
-        'center', '', 'width="98%" border="0" cellspacing="0" cellpadding="2"' );
+if (isset($_GET['absolute_dl'])) {
+   $absolute_dl = $_GET['absolute_dl'];
 }
 
-function viewMessage($imapConnection, $id, $mailbox, $ent_id, $color, $wrap_at, $extracted) {
-    global $startMessage;
-
-
-    $msg  = sqimap_get_message($imapConnection, $id, $mailbox);    
-    $msg = getEntity($msg, $ent_id);    
-
-    $header = sqimap_get_ent_header($imapConnection,$id,$mailbox,$ent_id);
-    $header->id = $id;
-    $msg->header = $header;
-
-    $ent_ar = findDisplayEntity($msg, 0);
-    $body = '';
-    for ($i = 0; $i < count($ent_ar); $i++) {
-       $body .= formatBody($imapConnection, $msg, $color, $wrap_at, $ent_ar[$i], false);
-    }
-    
-    $bodyheader = viewHeader($header, $color);
-    displayPageHeader($color, 'None');
-
-    echo '<br>' .
-        html_tag( 'table', '', 'center', '', 'width="100%" border="0" cellspacing="0" cellpadding="2"' );
-
-    if ($extracted) {
-       echo html_tag( 'tr',
-                   html_tag( 'td', '<center><h1>Message succesfully extracted</h1></center>', 'left', '', 'width="100%"' )
-               );
-    }
-
-    $td_str = "<b><center>". _("Viewing a message attachment") . " - ";
-    $td_str .= "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&startMessage=$startMessage&show_more=0\">". _("View message") . "</a></b></center>";
-    echo html_tag( 'tr',
-               html_tag( 'td', $td_str, 'left', $color[0] )
-           );
-
-    $urlmailbox = urlencode($mailbox);
-    $td_str = "<center><b><A HREF=\"../src/download.php?absolute_dl=true&passed_id=$id&passed_ent_id=$ent_id&mailbox=$urlmailbox\">".
-       _("Download this as a file").
-       "</A><BR>".
-       "</b></center>";
-    echo html_tag( 'tr',
-               html_tag( 'td', $td_str, 'left' )
-           ) .
+/* end globals */
+$mailbox = decodeHeader($mailbox);
 
-       "</TABLE>\n" .
-    html_tag( 'table',
-                html_tag( 'tr',
-                    html_tag( 'td', $bodyheader, 'left', $color[4] )
-                ) ,
-            'center', '', 'width="100%" border="0" cellspacing="0" cellpadding="2"' ) . "\n" .
-    html_tag( 'table',
-                html_tag( 'tr',
-                    html_tag( 'td', '<tt><br>' . $body . '</tt>', 'left', $color[4] )
-                ) ,
-            'center', '', 'width="98%" border="0" cellspacing="0" cellpadding="2"' ) . "<br>\n";       
+global $uid_support;
 
-    echo html_tag( 'table', '', '', '', 'width="100%"' ) .
-                html_tag( 'tr' ) .
-                    html_tag( 'td', '', 'center', $color[9], 'width="100%"' ) .
-          '<form action="download.php" method="post"><small>'.
-          "<input type=\"hidden\" name=\"passed_id\" value=\"$id\">".
-          "<input type=\"hidden\" name=\"mailbox\" value=\"".$mailbox."\">".
-          "<input type=\"hidden\" name=\"startMessage\" value=\"$startMessage\">".
-          "<input type=\"hidden\" name=\"passed_ent_id\" value=\"$ent_id\">".
-          "<input type=\"hidden\" name=\"extract_message\" value=\"1\">".
-          _("Save to:") .
-          ' <select name="targetMailbox">';
-          get_extract_to_target_list($imapConnection); 
-    echo    '</select> '.'&nbsp'.
-            '<input type="submit" value="' . _("Extract") . '">'.
-            '</small>'.
-           '</form>'.
-         '</td></tr></table>';
-
-}
-
-function get_extract_to_target_list($imapConnection) {
-    
-    $boxes = sqimap_mailbox_list($imapConnection);
-    for ($i = 0; $i < count($boxes); $i++) {  
-        if (!in_array('noselect', $boxes[$i]['flags'])) {
-            $box = $boxes[$i]['unformatted'];
-            $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['unformatted-disp']);
-            if ( $box2 == 'INBOX' ) {
-                $box2 = _("INBOX");
-            }
-            echo "<option value=\"$box\">$box2</option>\n";
-        }
-    }
-}
-
-
-function viewHeader($header,$color) {
-
-    $bodyheader = '';
-
-    /** FORMAT THE FROM STRING **/
-    $from_name = decodeHeader(htmlspecialchars($header->from));
-    if(isset($from_name) && $from_name !='') {    
-       $bodyheader .= makeTableEntry($from_name,_("From"), $color);    
-    }
-    
-    $subject_string = decodeHeader(htmlspecialchars($header->subject));    
-    if(isset($subject_string) && $subject_string !='') {        
-       $bodyheader .= makeTableEntry($subject_string,_("Subject:"), $color);    
-    } 
-    /** FORMAT THE TO STRING **/
-    $to = formatRecipientString($header->to, "to");
-    $to_string = $to['str'];
-    $url_to_string = $to['url_str'];
-    if(isset($to_string) && $to_string !='') {
-       $bodyheader .= makeTableEntry($to_string,_("To:"), $color);
-    }
-
-    /** FORMAT THE DATE STRING **/    
-    $dateString = getLongDateString($header->date);
-    if(isset($dateString) && $dateString !='') {            
-       $bodyheader .= makeTableEntry($dateString,_("Date:"), $color);    
-    }
-    
-    /** FORMAT THE CC STRING **/
-    $cc = formatRecipientString($header->cc, "cc");
-    $cc_string = $cc['str'];
-    $url_cc_string = $cc['url_str'];
-    if(isset($cc_string) && $cc_string !='') {    
-       $bodyheader .= makeTableEntry($cc_string,_("Cc:"), $color);     
-    }
-    
-    /** FORMAT THE BCC STRING **/
-    $bcc = formatRecipientString($header->bcc, "bcc");
-    $bcc_string = $bcc['str'];
-    $url_bcc_string = $bcc['url_str'];
-    if(isset($bcc_string) && $bcc_string !='') {    
-       $bodyheader .= makeTableEntry($bcc_string,_("Bcc:"), $color);
-    }
-    
-    return $bodyheader;
-}
+$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
+$mbx_response =  sqimap_mailbox_select($imapConnection, $mailbox);
 
-function makeTableEntry($str, $str_name, $color) {
-    $entry = html_tag( 'tr',
-                     html_tag( 'td', $str_name, 'right', $color[0], 'valign="top"' ) .
-                     html_tag( 'td', '<b>' . $str .'</b>&nbsp;', 'left', $color[0], 'valign="top" colspan="2"' )
-                 );
-    return $entry;
+$message = &$messages[$mbx_response['UIDVALIDITY']]["$passed_id"];
+if (!is_object($message)) {
+    $message = sqimap_get_message($imapConnection,$passed_id, $mailbox);
 }
-
-function formatRecipientString($recipients, $item ) {
-    global $base_uri, $passed_id, $startMessage, $show_more_cc, $show_more, $show_more_bcc, $passed_ent_id;
-    global $where, $what, $mailbox, $sort;
-
-    /** TEXT STRINGS DEFINITIONS **/
-    $echo_more = _("more");
-    $echo_less = _("less");
-
-    if (!isset($show_more_cc)) {
-       $show_more_cc = FALSE;
-    }
-    if (!isset($show_more_bcc)) {
-       $show_more_bcc = FALSE;
-    }
-
-
-    $urlMailbox = urlencode($mailbox);
-    $i = 0;
-    $url_string = '';
+$subject = $message->rfc822_header->subject;
+if ($ent_id) {
+    $message = &$message->getEntity($ent_id);
+    $header = $message->header;
     
-    if (isset ($recipients[0]) && trim($recipients[0])) {
-       $string = '';
-        $ary = explode(",",$recipients[0]);
-
-       switch ($item) {
-           case 'to':
-               $show = "&amp;show_more=1&amp;show_more_cc=$show_more_cc&amp;show_more_bcc=$show_more_bcc";
-               $show_n = "&amp;show_more=0&amp;show_more_cc=$show_more_cc&amp;show_more_bcc=$show_more_bcc";
-               break;
-           case 'cc':
-               $show = "&amp;show_more=$show_more&amp;show_more_cc=1&amp;show_more_bcc=$show_more_bcc";
-               $show_n = "&amp;show_more=$show_more&amp;show_more_cc=0&amp;show_more_bcc=$show_more_bcc";
-               $show_more = $show_more_cc;
-               break;
-           case 'bcc':
-               $show = "&amp;show_more=$show_more&amp;show_more_cc=$show_more_cc&amp;show_more_bcc=1";
-               $show_n = "&amp;show_more=$show_more&amp;show_more_cc=$show_more_cc&amp;show_more_bcc=0";
-               $show_more = $show_more_bcc;
-               break;
-           default:
-               $break;
-       }
-
-       while ($i < count($ary)) {
-           $ary[$i] = htmlspecialchars(decodeHeader($ary[$i]));
-           $url_string .= $ary[$i];
-           if ($string) {
-               $string = "$string<BR>$ary[$i]";
-           } else {
-               $string = "$ary[$i]";
-           }
-
-           $i++;
-           if (count($ary) > 1) {
-               if ($show_more == false) {
-                   if ($i == 1) {
-
-                       $string .= '&nbsp;(<A HREF="' . $base_uri .
-                                   "src/download.php?mailbox=$urlMailbox&amp;passed_id=$passed_id&amp;";
-                       if (isset($where) && isset($what)) {
-                           $string .= 'what=' . urlencode($what)."&amp;where=".urlencode($where)."&amp;passed_ent_id=$passed_ent_id$show\">$echo_more</A>)";
-                       } else {
-                           $string .= "sort=$sort&amp;startMessage=$startMessage"."&amp;passed_ent_id=$passed_ent_id$show\">$echo_more</A>)";
-                       }
-                       $i = count($ary);
-                   }
-               } else if ($i == 1) {
-
-                   $string .= '&nbsp;(<A HREF="' . $base_uri .
-                               "src/download.php?mailbox=$urlMailbox&amp;passed_id=$passed_id&amp;";
-                   if (isset($where) && isset($what)) {
-                       $string .= 'what=' . urlencode($what)."&amp;where=".urlencode($where)."&amp;passed_ent_id=$passed_ent_id$show_n\">$echo_less</A>)";
-                   } else {
-                       $string .= "sort=$sort&amp;startMessage=$startMessage"."&amp;passed_ent_id=$passed_ent_id$show_n\">$echo_less</A>)";
-                   }
-               }
-           }
-
-       }
-    }
-    else {
-       $string = '';
+    if ($message->rfc822_header) {
+       $subject = $message->rfc822_header->subject;
+       $charset = $header->content_type->properties['charset'];
+    } else {
+       $header = $message->header;
+       $charset = $header->getParameter('charset');
     }
-    $url_string = urlencode($url_string);
-    $result = array();
-    $result['str'] = $string;
-    $result['url_str'] = $url_string;
-    return $result;
-    
+    $type0 = $header->type0;
+    $type1 = $header->type1;
+    $encoding = strtolower($header->encoding);
+} else {
+    /* raw message */
+    $type0 = 'message';
+    $type1 = 'rfc822';
+    $encoding = "US-ASCII";
 }
 
-
-$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
-sqimap_mailbox_select($imapConnection, $mailbox);
-
-$extracted = false;
-if (isset($extract_message) && $extract_message) {
-  $cmd = "FETCH $passed_id BODY[$passed_ent_id]";
-  $read = sqimap_run_command ($imapConnection, $cmd, true, $response, $message);
-  $cnt = count($read);
-  $body = '';
-  $length = 0;
-  for ($i=1;$i<$cnt;$i++) {
-      $length = $length + strlen($read[$i]);
-      $body .= $read[$i];
-  }
-  if (isset($targetMailbox) && $length>0) {
-      sqimap_append ($imapConnection, $targetMailbox, $length);
-      fputs($imapConnection,$body);
-      sqimap_append_done ($imapConnection);
-      $extracted = true;
-  }
-}   
-
-if (isset($showHeaders)) {
-  $top_header = sqimap_get_message_header ($imapConnection, $passed_id, $mailbox);
-}
 /*
  * lets redefine message as this particular entity that we wish to display.
  * it should hold only the header for this entity.  We need to fetch the body
  * yet before we can display anything.
  */
 
-$header = sqimap_get_mime_ent_header ($imapConnection, $passed_id, $mailbox, $passed_ent_id);
-$header->entity_id = $passed_ent_id;
-$header->mailbox = $mailbox;
-
-$charset = $header->charset;
-$type0 = $header->type0;
-$type1 = $header->type1;
 if (isset($override_type0)) {
     $type0 = $override_type0;
 }
 if (isset($override_type1)) {
     $type1 = $override_type1;
 }
-$filename = decodeHeader($header->filename);
-if (!$filename) {
-    $filename = decodeHeader($header->name);
+$filename = '';
+if (is_object($message->header->disposition)) {
+    $filename = decodeHeader($header->disposition->getProperty('filename'));
+    if (!$filename) {
+       $filename = decodeHeader($header->disposition->getProperty('name'));
+    }
+    if (!$filename) {
+        $filename = decodeHeader($header->getParameter('name'));
+    }    
 }
-
 if (strlen($filename) < 1) {
     if ($type1 == 'plain' && $type0 == 'text') {
         $suffix = 'txt';
+       $filename = $subject . '.txt';
     } else if ($type1 == 'richtext' && $type0 == 'text') {
         $suffix = 'rtf';
+       $filename = $subject . '.rtf';
     } else if ($type1 == 'postscript' && $type0 == 'application') {
         $suffix = 'ps';
+       $filename = $subject . '.ps';
     } else if ($type1 == 'rfc822' && $type0 == 'message') {
         $suffix = 'eml';
+       $filename = $subject . '.msg';
     } else {
         $suffix = $type1;
     }
 
-    $filename = "untitled$passed_ent_id.$suffix";
+    if (strlen($filename) < 1) {
+       $filename = 'untitled'.strip_tags($ent_id).$suffix;
+    } else {
+       $filename = "$filename.$suffix";
+    }
 }
 
-
 /*
  * Note:
  *    The following sections display the attachment in different
@@ -392,78 +132,24 @@ if (strlen($filename) < 1) {
  *    viewer (built in to squirrelmail).  Otherwise, it sets the
  *    content-type as application/octet-stream
  */
-if (isset($absolute_dl) && $absolute_dl == 'true') {
-    switch($type0) {
-    case 'text':
-        DumpHeaders($type0, $type1, $filename, 1);
-        $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
-        $body = decodeBody($body, $header->encoding);
-        if ($type1 == 'plain' && isset($showHeaders)) {
-            echo _("Subject") . ": " . decodeHeader($top_header->subject) . "\n".
-                 "   " . _("From") . ": " . decodeHeader($top_header->from) . "\n".
-                 "     " . _("To") . ": " . decodeHeader(getLineOfAddrs($top_header->to)) . "\n".
-                 "   " . _("Date") . ": " . getLongDateString($top_header->date) . "\n\n";
-        } elseif ($type1 == 'html' && isset($showHeaders)) {
-            echo html_tag( 'table',
-                       html_tag( 'tr',
-                           html_tag( 'th', _("Subject") . ':', 'right' ) .
-                           html_tag( 'th', decodeHeader($top_header->subject), 'left' ) . "\n" .
-                           html_tag( 'th', _("From") . ':', 'right' ) .
-                           html_tag( 'th', decodeHeader($top_header->from), 'left' ) . "\n" .
-                           html_tag( 'th', _("To") . ':', 'right' ) .
-                           html_tag( 'th', decodeHeader(getLineOfAddrs($top_header->to)), 'left' ) . "\n" .
-                           html_tag( 'th', _("Date") . ':', 'right' ) .
-                           html_tag( 'th', getLongDateString($top_header->date), 'left' ) . "\n"
-                       )
-                    ) . "\n<hr>\n";
-        } 
-        echo $body;
-        break;
-    
-    default:
-        DumpHeaders($type0, $type1, $filename, 1);
-        mime_print_body_lines ($imapConnection, $passed_id, $passed_ent_id, $header->encoding);
-        break;
-    }
+if (isset($absolute_dl) && $absolute_dl) {
+    DumpHeaders($type0, $type1, $filename, 1);
 } else {
-    switch ($type0) {
-    case 'text':
-        if ($type1 == 'plain' || $type1 == 'html') {
-            $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
-            $body = decodeBody($body, $header->encoding);
-            viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at, $imapConnection);
-        } else {
-            DumpHeaders($type0, $type1, $filename, 0);
-            $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
-            $body = decodeBody($body, $header->encoding);
-            echo $body;
-        }
-        break;
-    case 'message':
-       if ($type1 == 'rfc822' ) {
-           viewMessage($imapConnection, $passed_id, $mailbox, $passed_ent_id, $color, $wrap_at, $extracted);
-       } else {
-           $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
-           $body = decodeBody($body, $msgheader->encoding);
-           viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at, $imapConnection);
-        }
-        break;
-    default:
-        DumpHeaders($type0, $type1, $filename, 0);
-        mime_print_body_lines ($imapConnection, $passed_id, $passed_ent_id, $header->encoding);
-        break;
-    }
+    DumpHeaders($type0, $type1, $filename, 0);
 }
-
+/* be aware that any warning caused by download.php will corrupt the
+ * attachment in case of ERROR reporting = E_ALL and the output is the screen */
+mime_print_body_lines ($imapConnection, $passed_id, $ent_id, $encoding);
 
 /*
  * This function is verified to work with Netscape and the *very latest*
  * version of IE.  I don't know if it works with Opera, but it should now.
  */
 function DumpHeaders($type0, $type1, $filename, $force) {
-    global $HTTP_USER_AGENT;
+    global $_SERVER, $languages, $squirrelmail_language;
+    $isIE = $isIE6 = 0;
 
-    $isIE = 0;
+    $HTTP_USER_AGENT = $_SERVER['HTTP_USER_AGENT'];
 
     if (strstr($HTTP_USER_AGENT, 'compatible; MSIE ') !== false &&
         strstr($HTTP_USER_AGENT, 'Opera') === false) {
@@ -475,10 +161,16 @@ function DumpHeaders($type0, $type1, $filename, $force) {
         $isIE6 = 1;
     }
 
-    $filename = ereg_replace('[^-a-zA-Z0-9\.]', '_', $filename);
+    if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
+        function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) {
+        $filename = 
+            $languages[$squirrelmail_language]['XTRA_CODE']('downloadfilename', $filename, $HTTP_USER_AGENT);
+    } else {
+       $filename = ereg_replace('[^-a-zA-Z0-9\.]', '_', $filename);
+    }
 
     // A Pox on Microsoft and it's Office!
-    if (! $force) {
+    if (!$force) {
         // Try to show in browser window
         header("Content-Disposition: inline; filename=\"$filename\"");
         header("Content-Type: $type0/$type1; name=\"$filename\"");
@@ -493,7 +185,7 @@ function DumpHeaders($type0, $type1, $filename, $force) {
         //
         // The best thing you can do for IE is to upgrade to the latest
         // version
-        if ($isIE && !isset($isIE6)) {
+        if ($isIE && !$isIE6) {
             // http://support.microsoft.com/support/kb/articles/Q182/3/15.asp
             // Do not have quotes around filename, but that applied to
             // "attachment"... does it apply to inline too?
@@ -501,7 +193,6 @@ function DumpHeaders($type0, $type1, $filename, $force) {
             // This combination seems to work mostly.  IE 5.5 SP 1 has
             // known issues (see the Microsoft Knowledge Base)
             header("Content-Disposition: inline; filename=$filename");
-
             // This works for most types, but doesn't work with Word files
             header("Content-Type: application/download; name=\"$filename\"");