Rewrote MIME support and made it much, MUCH quicker. All parsing of the
[squirrelmail.git] / src / download.php
1 <?php
2 session_start();
3
4 if (!isset($config_php))
5 include("../config/config.php");
6 if (!isset($strings_php))
7 include("../functions/strings.php");
8 if (!isset($page_header_php))
9 include("../functions/page_header.php");
10 if (!isset($imap_php))
11 include("../functions/imap.php");
12 if (!isset($mime_php))
13 include("../functions/mime.php");
14 if (!isset($date_php))
15 include("../functions/date.php");
16
17 include("../src/load_prefs.php");
18
19 function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at) {
20 displayPageHeader($color, "None");
21
22 echo "<BR><TABLE WIDTH=90% BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">";
23 echo "<B><CENTER>";
24 echo _("Viewing a plain text attachment");
25 echo "</CENTER></B>";
26 echo "</TD></TR><TR><TD BGCOLOR=\"$color[4]\">";
27 $urlmailbox = urlencode($mailbox);
28 echo "<CENTER><A HREF=\"../src/download.php?absolute_dl=true&passed_id=$id&passed_ent_id=$entid&mailbox=$urlmailbox\">";
29 echo _("Download this as a file");
30 echo "</A></CENTER><BR><BR><TT>";
31 if ($type1 == "html")
32 echo $body;
33 else
34 echo translateText($body, $wrap_at);
35
36 echo "</TT></TD></TR></TABLE>";
37 }
38
39 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
40 sqimap_mailbox_select($imapConnection, $mailbox);
41
42 // $message contains all information about the message
43 // including header and body
44 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
45
46 // lets redefine message as this particular entity that we wish to display.
47 // it should hold only the header for this entity. We need to fetch the body
48 // yet before we can display anything.
49 $message = getEntity($message, $passed_ent_id);
50
51 $header = $message->header;
52 $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
53
54 $type0 = $header->type0;
55 $type1 = $header->type1;
56 $filename = $header->filename;
57
58 if (strlen($filename) < 1) {
59 $filename = "untitled$passed_ent_id";
60 }
61
62 if ($absolute_dl == "true") {
63 switch($type0) {
64 case "text":
65 $body = decodeBody($body, $header->encoding);
66 header("Content-type: $type0/$type1; name=\"$filename\"");
67 header("Content-Disposition: attachment; filename=\"$filename\"");
68 echo trim($body);
69 break;
70 default:
71 $body = decodeBody($body, $header->encoding);
72 header("Content-type: $type0/$type1; name=\"$filename\"");
73 header("Content-Disposition: attachment; filename=\"$filename\"");
74 echo $body;
75 break;
76 }
77 } else {
78 switch ($type0) {
79 case "text":
80 $body = decodeBody($body, $header->encoding);
81 viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at);
82 break;
83 case "message":
84 $body = decodeBody($body, $header->encoding);
85 viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at);
86 break;
87 default:
88 $body = decodeBody($body, $header->encoding);
89 header("Content-type: $type0/$type1; name=\"$filename\"");
90 header("Content-Disposition: attachment; filename=\"$filename\"");
91 echo $body;
92 break;
93 }
94 }
95
96 sqimap_logout($imapConnection);
97 ?>