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