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


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

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