[squirrelmail.git] / src / compose.php

<?
   include("../config/config.php");
   include("../functions/strings.php");
   include("../functions/page_header.php");
   include("../functions/imap.php");
   include("../functions/mailbox.php");
   include("../functions/date.php");
   include("../functions/mime.php");

   include("../src/load_prefs.php");

   echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
   $imapConnection = loginToImapServer($username, $key, $imapServerAddress);
   displayPageHeader($color, "None");

   if ($forward_id) {
      selectMailbox($imapConnection, $mailbox, $numMessages);
      $msg = fetchMessage($imapConnection, $forward_id, $mailbox);

      if (containsType($msg, "text", "html", $ent_num)) {
         $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
      } else if (containsType($msg, "text", "plain", $ent_num)) {
         $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
      }
      // add other primary displaying msg types here
      else {
         // find any type that's displayable
         if (containsType($msg, "text", "any_type", $ent_num)) {
            $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
         } else if (containsType($msg, "msg", "any_type", $ent_num)) {
            $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
         } else {
            $body = _("No Message");
         }
      }

      $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];

      $tmp = _("-------- Original Message ---------\n");
      $body_ary = explode("\n", $body);
      $body = "";
      for ($i=0;$i < count($body_ary);$i++) {
         if ($type1 == "html")
            $tmp .= strip_tags($body_ary[$i]);
         else
            $tmp .= $body_ary[$i];
         $body = "$body$tmp\n";
         $tmp = "";
      }
   }

   if ($reply_id) {
      selectMailbox($imapConnection, $mailbox, $numMessages);
      $msg = fetchMessage($imapConnection, $reply_id, $mailbox);

      if (containsType($msg, "text", "html", $ent_num)) {
         $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
      } else if (containsType($msg, "text", "plain", $ent_num)) {
         $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
      }
      // add other primary displaying msg types here
      else {
         // find any type that's displayable
         if (containsType($msg, "text", "any_type", $ent_num)) {
            $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
         } else if (containsType($msg, "msg", "any_type", $ent_num)) {
            $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
         } else {
            $body = _("No Message");
         }
      }

      $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];

      $body_ary = explode("\n", $body);
      $body = "";
      for ($i=0;$i < count($body_ary);$i++) {
         if ($type1 == "html")
            $tmp = strip_tags($body_ary[$i]);
         else
            $tmp = $body_ary[$i];
         $body = "$body> $tmp\n";
      }
   }

   // Add some decoding information
   $send_to = encodeEmailAddr($send_to);
   // parses the field and returns only the email address
   $send_to = decodeEmailAddr($send_to);

   $send_to = strtolower($send_to);
   $send_to = ereg_replace("\"", "", $send_to);
   $send_to = stripslashes($send_to);

   /** This formats a CC string if they hit "reply all" **/
   if ($send_to_cc != "") {
      $send_to_cc = ereg_replace(";", ",", $send_to_cc);
      $sendcc = explode(",", $send_to_cc);
      $send_to_cc = "";

      for ($i = 0; $i < count($sendcc); $i++) {
         $sendcc[$i] = trim($sendcc[$i]);
         if ($sendcc[$i] == "")
            continue;

         $sendcc[$i] = encodeEmailAddr($sendcc[$i]);
         $sendcc[$i] = decodeEmailAddr($sendcc[$i]);

         $whofrom = encodeEmailAddr($msg["HEADER"]["FROM"]);
         $whofrom = decodeEmailAddr($whofrom);

         $whoreplyto = encodeEmailAddr($msg["HEADER"]["REPLYTO"]);
         $whoreplyto = decodeEmailAddr($whoreplyto);

         if ((strtolower(trim($sendcc[$i])) != strtolower(trim($whofrom))) &&
             (strtolower(trim($sendcc[$i])) != strtolower(trim($whoreplyto))) &&
             (trim($sendcc[$i]) != "")) {
            $send_to_cc .= trim($sendcc[$i]) . ", ";
         }
      }
      $send_to_cc = trim($send_to_cc);
      if (substr($send_to_cc, -1) == ",") {
         $send_to_cc = substr($send_to_cc, 0, strlen($send_to_cc) - 1);
      }
   }

   echo "<FORM action=\"compose_send.php\" METHOD=POST>\n";
   echo "<TABLE COLS=2 WIDTH=50 ALIGN=CENTER CELLSPACING=0 BORDER=0>\n";
   echo "   <TR>\n";
   echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
   echo "         <FONT FACE=\"Arial,Helvetica\">";
   echo _("To:");
   echo " </FONT>\n";
   echo "      </TD><TD WIDTH=% \"$color[4]\" ALIGN=LEFT>\n";
   if ($send_to)
      echo "         <INPUT TYPE=TEXT NAME=passed_to VALUE=\"$send_to\" SIZE=60><BR>";
   else
      echo "         <INPUT TYPE=TEXT NAME=passed_to SIZE=60><BR>";
   echo "      </TD>\n";
   echo "   </TR>\n";
   echo "   <TR>\n";
   echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
   echo "         <FONT FACE=\"Arial,Helvetica\">CC:</FONT>\n";
   echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
   if ($send_to_cc)
      echo "         <INPUT TYPE=TEXT NAME=passed_cc SIZE=60 VALUE=\"$send_to_cc\"><BR>";
   else
      echo "         <INPUT TYPE=TEXT NAME=passed_cc SIZE=60><BR>";
   echo "      </TD>\n";
   echo "   </TR>\n";
   echo "   <TR>\n";
   echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
   echo "         <FONT FACE=\"Arial,Helvetica\">BCC:</FONT>\n";
   echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
   echo "         <INPUT TYPE=TEXT NAME=passed_bcc SIZE=60><BR>";
   echo "      </TD>\n";
   echo "   </TR>\n";
   echo "   <TR>\n";
   echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
   echo "         <FONT FACE=\"Arial,Helvetica\">";
   echo _("Subject:");
   echo " </FONT>\n";
   echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
   if ($reply_subj) {
      $reply_subj = str_replace("\"", "'", $reply_subj);
      $reply_subj = stripslashes($reply_subj);
      $reply_subj = trim($reply_subj);
      if (substr(strtolower($reply_subj), 0, 3) != "re:")
         $reply_subj = "Re: $reply_subj";
      echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$reply_subj\">";
   } else if ($forward_subj) {
      $forward_subj = str_replace("\"", "'", $forward_subj);
      $forward_subj = stripslashes($forward_subj);
      $forward_subj = trim($forward_subj);
      if ((substr(strtolower($forward_subj), 0, 4) != "fwd:") &&
          (substr(strtolower($forward_subj), 0, 5) != "[fwd:") &&
          (substr(strtolower($forward_subj), 0, 6) != "[ fwd:"))
         $forward_subj = "[Fwd: $forward_subj]";
      echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$forward_subj\">";
   } else {
      echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60>";
   }
   echo "&nbsp;&nbsp;<INPUT TYPE=SUBMIT VALUE=\"";
   echo _("Send");
   echo "\"><BR>";
   echo "      </TD>\n";
   echo "   </TR>\n";
   echo "   <TR>\n";
   echo "      <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
   if ($use_signature == true)
      echo "         &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
   else
      echo "         &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>";
   echo "      </TD>";
   echo "   </TR>\n";
   echo "</TABLE>\n";
   echo "<CENTER><INPUT TYPE=SUBMIT VALUE=\"";
   echo _("Send");
   echo "\"></CENTER>";
   echo "</FORM>";
?>
Commit	Line	Data
8467bf00	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");
f7fb20fe	8	include("../functions/mime.php");
f7fb20fe	9
d3cdb279	10	include("../src/load_prefs.php");
8467bf00	11
f8f9bed9	12	echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
8467bf00	13	$imapConnection = loginToImapServer($username, $key, $imapServerAddress);
f8f9bed9	14	displayPageHeader($color, "None");
31f3d7c0	15
e39d73e5	16	if ($forward_id) {
2844086d	17	selectMailbox($imapConnection, $mailbox, $numMessages);
97be2168	18	$msg = fetchMessage($imapConnection, $forward_id, $mailbox);
e39d73e5	19
78509c54	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 {
da79853a	33	$body = _("No Message");
78509c54	34	}
	35	}
	36
	37	$type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
	38
da79853a	39	$tmp = _("-------- Original Message ---------\n");
78509c54	40	$body_ary = explode("\n", $body);
78509c54	41	$body = "";
e39d73e5	42	for ($i=0;$i < count($body_ary);$i++) {
78509c54	43	if ($type1 == "html")
	44	$tmp .= strip_tags($body_ary[$i]);
	45	else
	46	$tmp .= $body_ary[$i];
	47	$body = "$body$tmp\n";
e39d73e5	48	$tmp = "";
	49	}
	50	}
	51
	52	if ($reply_id) {
	53	selectMailbox($imapConnection, $mailbox, $numMessages);
97be2168	54	$msg = fetchMessage($imapConnection, $reply_id, $mailbox);
5c55c295	55
78509c54	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 {
da79853a	69	$body = _("No Message");
78509c54	70	}
	71	}
	72
	73	$type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
	74
	75	$body_ary = explode("\n", $body);
	76	$body = "";
31f3d7c0	77	for ($i=0;$i < count($body_ary);$i++) {
78509c54	78	if ($type1 == "html")
	79	$tmp = strip_tags($body_ary[$i]);
	80	else
	81	$tmp = $body_ary[$i];
	82	$body = "$body> $tmp\n";
31f3d7c0	83	}
31f3d7c0	84	}
8467bf00	85
7ce342dc	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);
e39d73e5	92	$send_to = ereg_replace("\"", "", $send_to);
	93	$send_to = stripslashes($send_to);
	94
b278172f	95	/ This formats a CC string if they hit "reply all" /
4bfed9f3	96	if ($send_to_cc != "") {
7c6cb7ca	97	$send_to_cc = ereg_replace(";", ",", $send_to_cc);
	98	$sendcc = explode(",", $send_to_cc);
	99	$send_to_cc = "";
	100
	101	for ($i = 0; $i < count($sendcc); $i++) {
b278172f	102	$sendcc[$i] = trim($sendcc[$i]);
	103	if ($sendcc[$i] == "")
	104	continue;
	105
7c6cb7ca	106	$sendcc[$i] = encodeEmailAddr($sendcc[$i]);
7c6cb7ca	107	$sendcc[$i] = decodeEmailAddr($sendcc[$i]);
b278172f	108
	109	$whofrom = encodeEmailAddr($msg["HEADER"]["FROM"]);
	110	$whofrom = decodeEmailAddr($whofrom);
	111
	112	$whoreplyto = encodeEmailAddr($msg["HEADER"]["REPLYTO"]);
	113	$whoreplyto = decodeEmailAddr($whoreplyto);
	114
	115	if ((strtolower(trim($sendcc[$i])) != strtolower(trim($whofrom))) &&
	116	(strtolower(trim($sendcc[$i])) != strtolower(trim($whoreplyto))) &&
	117	(trim($sendcc[$i]) != "")) {
fa276b14	118	$send_to_cc .= trim($sendcc[$i]) . ", ";
b278172f	119	}
	120	}
	121	$send_to_cc = trim($send_to_cc);
	122	if (substr($send_to_cc, -1) == ",") {
	123	$send_to_cc = substr($send_to_cc, 0, strlen($send_to_cc) - 1);
7c6cb7ca	124	}
4bfed9f3	125	}
4bfed9f3	126
b8ea4ed6	127	echo "<FORM action=\"compose_send.php\" METHOD=POST>\n";
5c55c295	128	echo "<TABLE COLS=2 WIDTH=50 ALIGN=CENTER CELLSPACING=0 BORDER=0>\n";
40ee9452	129	echo " <TR>\n";
f8f9bed9	130	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
da79853a	131	echo " <FONT FACE=\"Arial,Helvetica\">";
	132	echo _("To:");
	133	echo " </FONT>\n";
f8f9bed9	134	echo " </TD><TD WIDTH=% \"$color[4]\" ALIGN=LEFT>\n";
31f3d7c0	135	if ($send_to)
	136	echo " <INPUT TYPE=TEXT NAME=passed_to VALUE=\"$send_to\" SIZE=60><BR>";
	137	else
	138	echo " <INPUT TYPE=TEXT NAME=passed_to SIZE=60><BR>";
40ee9452	139	echo " </TD>\n";
	140	echo " </TR>\n";
	141	echo " <TR>\n";
f8f9bed9	142	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	143	echo " <FONT FACE=\"Arial,Helvetica\">CC:</FONT>\n";
f8f9bed9	144	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
4bfed9f3	145	if ($send_to_cc)
	146	echo " <INPUT TYPE=TEXT NAME=passed_cc SIZE=60 VALUE=\"$send_to_cc\"><BR>";
	147	else
	148	echo " <INPUT TYPE=TEXT NAME=passed_cc SIZE=60><BR>";
40ee9452	149	echo " </TD>\n";
	150	echo " </TR>\n";
	151	echo " <TR>\n";
f8f9bed9	152	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	153	echo " <FONT FACE=\"Arial,Helvetica\">BCC:</FONT>\n";
f8f9bed9	154	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
40ee9452	155	echo " <INPUT TYPE=TEXT NAME=passed_bcc SIZE=60><BR>";
	156	echo " </TD>\n";
	157	echo " </TR>\n";
	158	echo " <TR>\n";
f8f9bed9	159	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
da79853a	160	echo " <FONT FACE=\"Arial,Helvetica\">";
	161	echo _("Subject:");
	162	echo " </FONT>\n";
f8f9bed9	163	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
40884065	164	if ($reply_subj) {
	165	$reply_subj = str_replace("\"", "'", $reply_subj);
	166	$reply_subj = stripslashes($reply_subj);
5c55c295	167	$reply_subj = trim($reply_subj);
	168	if (substr(strtolower($reply_subj), 0, 3) != "re:")
	169	$reply_subj = "Re: $reply_subj";
	170	echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$reply_subj\">";
40884065	171	} else if ($forward_subj) {
5c55c295	172	$forward_subj = str_replace("\"", "'", $forward_subj);
	173	$forward_subj = stripslashes($forward_subj);
	174	$forward_subj = trim($forward_subj);
	175	if ((substr(strtolower($forward_subj), 0, 4) != "fwd:") &&
	176	(substr(strtolower($forward_subj), 0, 5) != "[fwd:") &&
	177	(substr(strtolower($forward_subj), 0, 6) != "[ fwd:"))
	178	$forward_subj = "[Fwd: $forward_subj]";
	179	echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$forward_subj\">";
40884065	180	} else {
ff89ac8a	181	echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60>";
40884065	182	}
da79853a	183	echo "  <INPUT TYPE=SUBMIT VALUE=\"";
	184	echo _("Send");
	185	echo "\"><BR>";
40ee9452	186	echo " </TD>\n";
40ee9452	187	echo " </TR>\n";
ff89ac8a	188	echo " <TR>\n";
f8f9bed9	189	echo " <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
f804972b	190	if ($use_signature == true)
	191	echo "   <TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
	192	else
	193	echo "   <TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>";
ff89ac8a	194	echo " </TD>";
ff89ac8a	195	echo " </TR>\n";
40ee9452	196	echo "</TABLE>\n";
da79853a	197	echo "<CENTER><INPUT TYPE=SUBMIT VALUE=\"";
	198	echo _("Send");
	199	echo "\"></CENTER>";
8467bf00	200	echo "</FORM>";
da79853a	201	?>