added bugfix from 1.0.3cvs
[squirrelmail.git] / src / download.php
1 <?php
2 /**
3 ** download.php
4 **
5 ** Copyright (c) 1999-2000 The SquirrelMail development team
6 ** Licensed under the GNU GPL. For full terms see the file COPYING.
7 **
8 ** Handles attachment downloads to the users computer.
9 ** Also allows displaying of attachments when possible.
10 **
11 ** $Id$
12 **/
13
14 if (!isset($strings_php))
15 include("../functions/strings.php");
16 if (!isset($config_php))
17 include("../config/config.php");
18 if (!isset($imap_php))
19 include("../functions/imap.php");
20 if (!isset($mime_php))
21 include("../functions/mime.php");
22 if (!isset($date_php))
23 include("../functions/date.php");
24 if (!isset($i18n_php))
25 include("../functions/i18n.php");
26
27 session_start();
28 header("Pragma: ");
29 header("Cache-Control: cache");
30
31 include("../src/load_prefs.php");
32
33 function viewText($color, $body, $id, $entid, $mailbox, $type1, $wrap_at) {
34 global $where, $what, $charset;
35 global $startMessage;
36
37 displayPageHeader($color, "None");
38
39 echo "<BR><TABLE WIDTH=100% BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">";
40 echo "<B><CENTER>";
41 echo _("Viewing a text attachment") . " - ";
42 if ($where && $what) {
43 // from a search
44 echo "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&where=".urlencode($where)."&what=".urlencode($what)."\">". _("View message") . "</a>";
45 } else {
46 echo "<a href=\"read_body.php?mailbox=".urlencode($mailbox)."&passed_id=$id&startMessage=$startMessage&show_more=0\">". _("View message") . "</a>";
47 }
48
49 $urlmailbox = urlencode($mailbox);
50 echo "</b></td><tr><tr><td><CENTER><A HREF=\"../src/download.php?absolute_dl=true&passed_id=$id&passed_ent_id=$entid&mailbox=$urlmailbox\">";
51 echo _("Download this as a file");
52 echo "</A></CENTER><BR>";
53 echo "</CENTER></B>";
54 echo "</TD></TR></TABLE>";
55
56 echo "<TABLE WIDTH=98% BORDER=0 CELLSPACING=0 CELLPADDING=2 ALIGN=CENTER><TR><TD BGCOLOR=\"$color[0]\">";
57 echo "<TR><TD BGCOLOR=\"$color[4]\"><TT>";
58
59 if ($type1 != "html")
60 translateText($body, $wrap_at, $charset);
61
62 echo $body;
63
64 echo "</TT></TD></TR></TABLE>";
65 }
66
67 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
68 sqimap_mailbox_select($imapConnection, $mailbox);
69
70 // $message contains all information about the message
71 // including header and body
72 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
73 $top_header = $message->header;
74
75 // lets redefine message as this particular entity that we wish to display.
76 // it should hold only the header for this entity. We need to fetch the body
77 // yet before we can display anything.
78 $message = getEntity($message, $passed_ent_id);
79
80 $header = $message->header;
81
82 $charset = $header->charset;
83 $type0 = $header->type0;
84 $type1 = $header->type1;
85 if (isset($override_type0))
86 $type0 = $override_type0;
87 if (isset($override_type1))
88 $type1 = $override_type1;
89 $filename = decodeHeader($header->filename);
90 if (!$filename) {
91 $filename = decodeHeader($header->name);
92 }
93
94 if (strlen($filename) < 1) {
95 if ($type1 == "plain" && $type0 == "text") $suffix = "txt";
96 else if ($type1 == "richtext" && $type0 == "text") $suffix = "rtf";
97 else if ($type1 == "postscript" && $type0 == "application") $suffix = "ps";
98 else if ($type1 == "message" && $type0 == "rfc822") $suffix = "msg";
99 else $suffix = $type1;
100
101 $filename = "untitled$passed_ent_id.$suffix";
102 }
103
104 // Note:
105 // The following sections display the attachment in different
106 // ways depending on how they choose. The first way will download
107 // under any circumstance. This sets the Content-type to be
108 // applicatin/octet-stream, which should be interpreted by the
109 // browser as "download me".
110 // The second method (view) is used for images or other formats
111 // that should be able to be handled by the browser. It will
112 // most likely display the attachment inline inside the browser.
113 // And finally, the third one will be used by default. If it
114 // is displayable (text or html), it will load them up in a text
115 // viewer (built in to squirrelmail). Otherwise, it sets the
116 // content-type as application/octet-stream
117
118 if (isset($absolute_dl) && $absolute_dl == "true") {
119 switch($type0) {
120 case "text":
121 $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
122 $body = decodeBody($body, $header->encoding);
123 header("Content-Disposition: attachment; filename=\"$filename\"");
124 header("Content-type: application/octet-stream; name=\"$filename\"");
125 set_up_language(getPref($data_dir, $username, "language"));
126 if ($type1 == "plain") {
127 echo _("Subject") . ": " . decodeHeader($top_header->subject) . "\n";
128 echo " " . _("From") . ": " . decodeHeader($top_header->from) . "\n";
129 echo " " . _("To") . ": " . decodeHeader(getLineOfAddrs($top_header->to)) . "\n";
130 echo " " . _("Date") . ": " . getLongDateString($top_header->date) . "\n\n";
131 }
132 echo trim($body);
133 break;
134 default:
135 header("Content-Disposition: attachment; filename=\"$filename\"");
136 header("Content-type: application/octet-stream; name=\"$filename\"");
137 mime_print_body_lines ($imapConnection, $passed_id, $passed_ent_id, $header->encoding);
138 break;
139 }
140 } else {
141 switch ($type0) {
142 case "text":
143 if ($type1 == "plain" || $type1 == "html") {
144 $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
145 $body = decodeBody($body, $header->encoding);
146 include("../functions/page_header.php");
147 viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at);
148 } else {
149 $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
150 $body = decodeBody($body, $header->encoding);
151 header("Content-type: $type0/$type1; name=\"$filename\"");
152 header("Content-Disposition: attachment; filename=\"$filename\"");
153 echo $body;
154 }
155 break;
156 case "message":
157 $body = mime_fetch_body($imapConnection, $passed_id, $passed_ent_id);
158 $body = decodeBody($body, $header->encoding);
159 include("../functions/page_header.php");
160 viewText($color, $body, $passed_id, $passed_ent_id, $mailbox, $type1, $wrap_at);
161 break;
162 default:
163 header("Content-type: $type0/$type1; name=\"$filename\"");
164 header("Content-Disposition: attachment; filename=\"$filename\"");
165 mime_print_body_lines ($imapConnection, $passed_id, $passed_ent_id, $header->encoding);
166 break;
167 }
168 }
169
170 sqimap_logout($imapConnection);
171 ?>