bugfixes to reply all
[squirrelmail.git] / src / compose.php
1 <?
2 include("../config/config.php");
3 include("../functions/strings.php");
4 include("../functions/page_header.php");
5 include("../functions/imap.php");
6 include("../functions/mailbox.php");
7 include("../functions/date.php");
8 include("../functions/mime.php");
9
10 include("../src/load_prefs.php");
11
12 echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
13 $imapConnection = loginToImapServer($username, $key, $imapServerAddress);
14 displayPageHeader($color, "None");
15
16 if ($forward_id) {
17 selectMailbox($imapConnection, $mailbox, $numMessages);
18 $msg = fetchMessage($imapConnection, $forward_id, $mailbox);
19
20 if (containsType($msg, "text", "html", $ent_num)) {
21 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
22 } else if (containsType($msg, "text", "plain", $ent_num)) {
23 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
24 }
25 // add other primary displaying msg types here
26 else {
27 // find any type that's displayable
28 if (containsType($msg, "text", "any_type", $ent_num)) {
29 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
30 } else if (containsType($msg, "msg", "any_type", $ent_num)) {
31 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
32 } else {
33 $body = "No Message";
34 }
35 }
36
37 $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
38
39 $tmp = "-------- Original Message ---------\n";
40 $body_ary = explode("\n", $body);
41 $body = "";
42 for ($i=0;$i < count($body_ary);$i++) {
43 if ($type1 == "html")
44 $tmp .= strip_tags($body_ary[$i]);
45 else
46 $tmp .= $body_ary[$i];
47 $body = "$body$tmp\n";
48 $tmp = "";
49 }
50 }
51
52 if ($reply_id) {
53 selectMailbox($imapConnection, $mailbox, $numMessages);
54 $msg = fetchMessage($imapConnection, $reply_id, $mailbox);
55
56 if (containsType($msg, "text", "html", $ent_num)) {
57 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
58 } else if (containsType($msg, "text", "plain", $ent_num)) {
59 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
60 }
61 // add other primary displaying msg types here
62 else {
63 // find any type that's displayable
64 if (containsType($msg, "text", "any_type", $ent_num)) {
65 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
66 } else if (containsType($msg, "msg", "any_type", $ent_num)) {
67 $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
68 } else {
69 $body = "No Message";
70 }
71 }
72
73 $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
74
75 $body_ary = explode("\n", $body);
76 $body = "";
77 for ($i=0;$i < count($body_ary);$i++) {
78 if ($type1 == "html")
79 $tmp = strip_tags($body_ary[$i]);
80 else
81 $tmp = $body_ary[$i];
82 $body = "$body> $tmp\n";
83 }
84 }
85
86 // Add some decoding information
87 $send_to = encodeEmailAddr($send_to);
88 // parses the field and returns only the email address
89 $send_to = decodeEmailAddr($send_to);
90
91 $send_to = strtolower($send_to);
92 $send_to = ereg_replace("\"", "", $send_to);
93 $send_to = stripslashes($send_to);
94
95 if ($send_to_cc != "") {
96 $send_to_cc = ereg_replace(";", ",", $send_to_cc);
97 $sendcc = explode(",", $send_to_cc);
98 $send_to_cc = "";
99
100 for ($i = 0; $i < count($sendcc); $i++) {
101 $sendcc[$i] = encodeEmailAddr($sendcc[$i]);
102 $sendcc[$i] = decodeEmailAddr($sendcc[$i]);
103 if ($i == count($send_cc) - 1)
104 $send_to_cc .= trim($sendcc[$i]);
105 else
106 $send_to_cc .= trim($sendcc[$i]) . ", ";
107 }
108 }
109
110 echo "<FORM action=\"compose_send.php\" METHOD=POST>\n";
111 echo "<TABLE COLS=2 WIDTH=50 ALIGN=CENTER CELLSPACING=0 BORDER=0>\n";
112 echo " <TR>\n";
113 echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
114 echo " <FONT FACE=\"Arial,Helvetica\">To: </FONT>\n";
115 echo " </TD><TD WIDTH=% \"$color[4]\" ALIGN=LEFT>\n";
116 if ($send_to)
117 echo " <INPUT TYPE=TEXT NAME=passed_to VALUE=\"$send_to\" SIZE=60><BR>";
118 else
119 echo " <INPUT TYPE=TEXT NAME=passed_to SIZE=60><BR>";
120 echo " </TD>\n";
121 echo " </TR>\n";
122 echo " <TR>\n";
123 echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
124 echo " <FONT FACE=\"Arial,Helvetica\">CC:</FONT>\n";
125 echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
126 if ($send_to_cc)
127 echo " <INPUT TYPE=TEXT NAME=passed_cc SIZE=60 VALUE=\"$send_to_cc\"><BR>";
128 else
129 echo " <INPUT TYPE=TEXT NAME=passed_cc SIZE=60><BR>";
130 echo " </TD>\n";
131 echo " </TR>\n";
132 echo " <TR>\n";
133 echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
134 echo " <FONT FACE=\"Arial,Helvetica\">BCC:</FONT>\n";
135 echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
136 echo " <INPUT TYPE=TEXT NAME=passed_bcc SIZE=60><BR>";
137 echo " </TD>\n";
138 echo " </TR>\n";
139
140 echo " <TR>\n";
141 echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
142 echo " <FONT FACE=\"Arial,Helvetica\">Subject:</FONT>\n";
143 echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
144 if ($reply_subj) {
145 $reply_subj = str_replace("\"", "'", $reply_subj);
146 $reply_subj = stripslashes($reply_subj);
147 $reply_subj = trim($reply_subj);
148 if (substr(strtolower($reply_subj), 0, 3) != "re:")
149 $reply_subj = "Re: $reply_subj";
150 echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$reply_subj\">";
151 } else if ($forward_subj) {
152 $forward_subj = str_replace("\"", "'", $forward_subj);
153 $forward_subj = stripslashes($forward_subj);
154 $forward_subj = trim($forward_subj);
155 if ((substr(strtolower($forward_subj), 0, 4) != "fwd:") &&
156 (substr(strtolower($forward_subj), 0, 5) != "[fwd:") &&
157 (substr(strtolower($forward_subj), 0, 6) != "[ fwd:"))
158 $forward_subj = "[Fwd: $forward_subj]";
159 echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$forward_subj\">";
160 } else {
161 echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60>";
162 }
163 echo "&nbsp;&nbsp;<INPUT TYPE=SUBMIT VALUE=\"Send\"><BR>";
164 echo " </TD>\n";
165 echo " </TR>\n";
166 echo " <TR>\n";
167 echo " <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
168 if ($use_signature == true)
169 echo " &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
170 else
171 echo " &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>";
172 echo " </TD>";
173 echo " </TR>\n";
174 echo "</TABLE>\n";
175 echo "<CENTER><INPUT TYPE=SUBMIT VALUE=\"Send\"></CENTER>";
176 echo "</FORM>";
177 ?>