r2l by Yoav
[squirrelmail.git] / src / download.php
index d78999d1b11ce6793eac99a6c7cfa08c275753fb..be8ee42ae3c775ca86c5cab940f1d52d9a128291 100644 (file)
@@ -20,7 +20,7 @@ require_once('../functions/date.php');
 header('Pragma: ');
 header('Cache-Control: cache');
 
-function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at) {
+function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at, $imapConnection) {
     global $where, $what, $charset;
     global $startMessage;
 
@@ -46,7 +46,8 @@ function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at) {
          "<TR><TD BGCOLOR=\"$color[4]\"><TT>";
 
     if ($type1 == 'html') {
-        $body = MagicHTML( $body, $id );
+        $msg  = sqimap_get_message($imapConnection, $id, $mailbox);    
+        $body = MagicHTML( $body, $id, $msg );
     } else {
         translateText($body, $wrap_at, $charset);
     }
@@ -56,24 +57,263 @@ function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at) {
          "</TT></TD></TR></TABLE>";
 }
 
+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><TABLE WIDTH=\"100%\" BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER>";
+    if ($extracted) {
+       echo '<TR><TD width="100%"><center><h1>Message succesfully extracted</h1></center></TD></TR>';
+    }
+    echo "<TR><TD BGCOLOR=\"$color[0]\">".
+       "<B><CENTER>".  _("Viewing a message attachment") . " - ";
+    
+    echo "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&startMessage=$startMessage&show_more=0\">". _("View message") . "</a>";
+    
+    $urlmailbox = urlencode($mailbox);
+    
+    echo "</b></td><tr><tr><td><CENTER><A HREF=\"../src/download.php?absolute_dl=true&passed_id=$id&passed_ent_id=$ent_id&mailbox=$urlmailbox\">".
+       _("Download this as a file").
+       "</A></CENTER><BR>".
+       "</CENTER></B>".
+       "</TD></TR></TABLE>";
+    echo "<TABLE WIDTH=\"100%\" BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">".
+       "<TR><TD BGCOLOR=\"$color[4]\">";
+    echo "$bodyheader </TD></TR></TABLE>";          
+       
+    echo "<TABLE WIDTH=\"98%\" BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">".
+       "<TR><TD BGCOLOR=\"$color[4]\"><TT><BR>";
+       echo "$body </TT></TD></TR><table><br>";         
+    echo '<table width="100%"><tr>'.
+         "<td bgcolor=\"$color[9]\" width=\"100%\" align=\"center\">".
+           '<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></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;
+}
+
+function makeTableEntry($str, $str_name, $color) {
+    $entry = '<tr><td bgcolor="'."$color[0]".'" align right valign top>'."$str_name".'</td><td bgcolor="'."$color[0]".
+            '" valign top colspan=2><b>'."$str".'</b>&nbsp;</td></tr>'."\n";
+    return $entry;
+}
+
+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 = '';
+    
+    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 = '';
+    }
+    $url_string = urlencode($url_string);
+    $result = array();
+    $result['str'] = $string;
+    $result['url_str'] = $url_string;
+    return $result;
+    
+}
+
+
 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 sqimap_mailbox_select($imapConnection, $mailbox);
 
-/*
- * $message contains all information about the message
- * including header and body
- */
-$message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
-$top_header = $message->header;
+$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.
  */
-$message = getEntity($message, $passed_ent_id);
 
-$header = $message->header;
+$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;
@@ -96,8 +336,8 @@ if (strlen($filename) < 1) {
         $suffix = 'rtf';
     } else if ($type1 == 'postscript' && $type0 == 'application') {
         $suffix = 'ps';
-    } else if ($type1 == 'message' && $type0 == 'rfc822') {
-        $suffix = 'msg';
+    } else if ($type1 == 'rfc822' && $type0 == 'message') {
+        $suffix = 'eml';
     } else {
         $suffix = $type1;
     }
@@ -105,6 +345,7 @@ if (strlen($filename) < 1) {
     $filename = "untitled$passed_ent_id.$suffix";
 }
 
+
 /*
  * Note:
  *    The following sections display the attachment in different
@@ -141,9 +382,10 @@ if (isset($absolute_dl) && $absolute_dl == 'true') {
                  "</td></tr>\n<tr><th align=right>" . _("Date").
                  ':</th><td>' . getLongDateString($top_header->date).
                  "</td></tr>\n</table>\n<hr>\n";
-        }
+        } 
         echo $body;
         break;
+    
     default:
         DumpHeaders($type0, $type1, $filename, 1);
         mime_print_body_lines ($imapConnection, $passed_id, $passed_ent_id, $header->encoding);
@@ -155,7 +397,7 @@ if (isset($absolute_dl) && $absolute_dl == 'true') {
         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);
+            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);
@@ -164,9 +406,13 @@ if (isset($absolute_dl) && $absolute_dl == 'true') {
         }
         break;
     case 'message':
-        $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);
+       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);
@@ -184,11 +430,17 @@ function DumpHeaders($type0, $type1, $filename, $force) {
     global $HTTP_USER_AGENT;
 
     $isIE = 0;
+
     if (strstr($HTTP_USER_AGENT, 'compatible; MSIE ') !== false &&
         strstr($HTTP_USER_AGENT, 'Opera') === false) {
         $isIE = 1;
     }
 
+    if (strstr($HTTP_USER_AGENT, 'compatible; MSIE 6') !== false &&
+        strstr($HTTP_USER_AGENT, 'Opera') === false) {
+        $isIE6 = 1;
+    }
+
     $filename = ereg_replace('[^-a-zA-Z0-9\.]', '_', $filename);
 
     // A Pox on Microsoft and it's Office!
@@ -207,7 +459,7 @@ function DumpHeaders($type0, $type1, $filename, $force) {
         //
         // The best thing you can do for IE is to upgrade to the latest
         // version
-        if ($isIE) {
+        if ($isIE && !isset($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?