[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);

   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] = encodeEmailAddr($sendcc[$i]);
         $sendcc[$i] = decodeEmailAddr($sendcc[$i]);
         if ($i == count($send_cc) - 1)
            $send_to_cc .= trim($sendcc[$i]);
         else
            $send_to_cc .= trim($sendcc[$i]) . ", ";
      }
   }

   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\">To: </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\">Subject:</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=\"Send\"><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=\"Send\"></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 {
	33	$body = "No Message";
	34	}
	35	}
	36
	37	$type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
	38
e39d73e5	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 {
	69	$body = "No Message";
	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
4bfed9f3	95	if ($send_to_cc != "") {
7c6cb7ca	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	}
4bfed9f3	108	}
4bfed9f3	109
b8ea4ed6	110	echo "<FORM action=\"compose_send.php\" METHOD=POST>\n";
5c55c295	111	echo "<TABLE COLS=2 WIDTH=50 ALIGN=CENTER CELLSPACING=0 BORDER=0>\n";
40ee9452	112	echo " <TR>\n";
f8f9bed9	113	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	114	echo " <FONT FACE=\"Arial,Helvetica\">To: </FONT>\n";
f8f9bed9	115	echo " </TD><TD WIDTH=% \"$color[4]\" ALIGN=LEFT>\n";
31f3d7c0	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>";
40ee9452	120	echo " </TD>\n";
	121	echo " </TR>\n";
	122	echo " <TR>\n";
f8f9bed9	123	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	124	echo " <FONT FACE=\"Arial,Helvetica\">CC:</FONT>\n";
f8f9bed9	125	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
4bfed9f3	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>";
40ee9452	130	echo " </TD>\n";
	131	echo " </TR>\n";
	132	echo " <TR>\n";
f8f9bed9	133	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	134	echo " <FONT FACE=\"Arial,Helvetica\">BCC:</FONT>\n";
f8f9bed9	135	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
40ee9452	136	echo " <INPUT TYPE=TEXT NAME=passed_bcc SIZE=60><BR>";
	137	echo " </TD>\n";
	138	echo " </TR>\n";
ff89ac8a	139
40ee9452	140	echo " <TR>\n";
f8f9bed9	141	echo " <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
40ee9452	142	echo " <FONT FACE=\"Arial,Helvetica\">Subject:</FONT>\n";
f8f9bed9	143	echo " </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
40884065	144	if ($reply_subj) {
	145	$reply_subj = str_replace("\"", "'", $reply_subj);
	146	$reply_subj = stripslashes($reply_subj);
5c55c295	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\">";
40884065	151	} else if ($forward_subj) {
5c55c295	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\">";
40884065	160	} else {
ff89ac8a	161	echo " <INPUT TYPE=TEXT NAME=passed_subject SIZE=60>";
40884065	162	}
ff89ac8a	163	echo "  <INPUT TYPE=SUBMIT VALUE=\"Send\"><BR>";
40ee9452	164	echo " </TD>\n";
40ee9452	165	echo " </TR>\n";
ff89ac8a	166	echo " <TR>\n";
f8f9bed9	167	echo " <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
f804972b	168	if ($use_signature == true)
	169	echo "   <TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
	170	else
	171	echo "   <TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>";
ff89ac8a	172	echo " </TD>";
ff89ac8a	173	echo " </TR>\n";
40ee9452	174	echo "</TABLE>\n";
ff89ac8a	175	echo "<CENTER><INPUT TYPE=SUBMIT VALUE=\"Send\"></CENTER>";
8467bf00	176	echo "</FORM>";
8467bf00	177	?>