Restructured code for sending. compose_send.php is no longer used.
authorgustavf <gustavf@7612ce4b-ef26-0410-bec9-ea0150e637f0>
Fri, 28 Jan 2000 12:25:24 +0000 (12:25 +0000)
committergustavf <gustavf@7612ce4b-ef26-0410-bec9-ea0150e637f0>
Fri, 28 Jan 2000 12:25:24 +0000 (12:25 +0000)
Made a framework for sending attachments.

git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@184 7612ce4b-ef26-0410-bec9-ea0150e637f0

functions/smtp.php
src/compose.php

index 9ca0091821ba80207b37bbc8177f1c630ae60a28..259b698e2a9ae3d8adbb698fb456aab91e290266 100644 (file)
@@ -5,20 +5,38 @@
     ** an smtp server or sendmail.
     **/
 
-   function sendMessage($t, $c, $b, $subject, $body) {
-      global $useSendmail;
 
-      if ($useSendmail==true) {  
-        sendSendmail($t, $c, $b, $subject, $body);
-      } else {
-        sendSMTP($t, $c, $b, $subject, $body);
+   /* These next 2 functions are stub functions for implementations of 
+      attachments */
+
+   // Returns true only if this message is multipart
+   function isMultipart () {
+      return true;
+   }
+
+   // Attach the files that are due to be attached
+   function attachFile ($fp) {
+      return false;
+   }
+
+   // Return a nice MIME-boundary
+   function mimeBoundary () {
+      global $mimeBoundaryString, $version, $REMOTE_ADDR, $SERVER_NAME,
+         $REMOTE_PORT;
+
+      if ($mimeBoundaryString == "") {
+         $temp = "SquirrelMail".$version.$REMOTE_ADDR.$SERVER_NAME.
+            $REMOTE_PORT;
+         $mimeBoundaryString = "=-=_=-SqMB.".substr(md5($temp),1,15);
       }
-    
+
+      return $mimeBoundaryString;
    }
 
+   /* Print all the needed RFC822 headers */
    function write822Header ($fp, $t, $c, $b, $subject) {
       global $REMOTE_ADDR, $SERVER_NAME;
-      global $data_dir, $username, $domain, $version;
+      global $data_dir, $username, $domain, $version, $useSendmail;
 
       $to = parseAddrs($t);
       $cc = parseAddrs($c);
       else
          $from = $from . " <$from_addr>";
 
+      /* This creates an RFC 822 date showing GMT */
       $date = date("D, j M Y H:i:s +0000", gmmktime());
 
-      /* Make a RFC822 Received: line */
+      /* Make an RFC822 Received: line */
       fputs ($fp, "Received: from $REMOTE_ADDR by $SERVER_NAME with HTTP; ");
       fputs ($fp, "$date\n");
 
+      /* The rest of the header */
       fputs ($fp, "Date: $date\n");
       fputs ($fp, "Subject: $subject\n"); // Subject
       fputs ($fp, "From: $from\n"); // Subject
       if ($cc_list) {
          fputs($fp, "Cc: $cc_list\n"); // Who the CCs are
       }
-      if ($bcc_list) {
-         fputs($fp, "Bcc: $bcc_list\n"); // BCCs is removed from header by sendmail
+
+      if ($reply_to != "")
+         fputs($fp, "Reply-To: $reply_to\n");
+
+      if ($useSendmail) {
+         if ($bcc_list) {
+            // BCCs is removed from header by sendmail
+            fputs($fp, "Bcc: $bcc_list\n"); 
+         }
       }
+
       fputs($fp, "X-Mailer: SquirrelMail (version $version)\n"); // Identify SquirrelMail
+
+      // Do the MIME-stuff
       fputs($fp, "MIME-Version: 1.0\n");
-      fputs($fp, "Content-Type: text/plain\n");
-      if ($reply_to != "")
-         fputs($fp, "Reply-To: $reply_to\n");
+
+      if (isMultipart()) {
+         fputs ($fp, "Content-Type: multipart/mixed; boundary=\"");
+         fputs ($fp, mimeBoundary());
+         fputs ($fp, "\"\n");
+      } else {
+         fputs($fp, "Content-Type: text/plain; charset=ISO-8859-1\n");
+         fputs($fp, "Content-Transfer-Encoding: 8bit\n");
+      }
+   }
+
+   // Send the body
+   function writeBody ($fp, $body) {
+     if (isMultipart()) {
+        fputs ($fp, "--".mimeBoundary()."\n");
+        fputs ($fp, "Content-Type: text/plain; charset=ISO-8859-1\n");
+        fputs ($fp, "Content-Transfer-Encoding: 8bit\n\n");
+        fputs ($fp, "$body\n");
+        fputs ($fp, "\n--".mimeBoundary()."--\n");
+     } else {
+       fputs ($fp, "$body\n");
+     }
    }
 
    // Send mail using the sendmail command
       global $sendmail_path, $username, $domain;
       
       // open pipe to sendmail
-      $fp = popen ("$sendmail_path -t -f$username@$domain", "w");
+      $fp = popen (escapeshellcmd("$sendmail_path -t -f$username@$domain"), "w");
       
       write822Header ($fp, $t, $c, $b, $subject);
-      fputs($fp, "\n$body\n"); // send the body of the message
+      writeBody($fp, $body);
 
       pclose($fp);
    }
 
       write822Header ($smtpConnection, $t, $c, $b, $subject);
 
-      fputs($smtpConnection, "$body\n"); // send the body of the message
+      writeBody($smtpConnection, $body); // send the body of the message
 
       fputs($smtpConnection, ".\n"); // end the DATA part
       $tmp = nl2br(htmlspecialchars(fgets($smtpConnection, 1024)));
       }
       return $err_num;
    }
+
+   function sendMessage($t, $c, $b, $subject, $body) {
+      global $useSendmail;
+
+      if ($useSendmail==true) {  
+        sendSendmail($t, $c, $b, $subject, $body);
+      } else {
+        sendSMTP($t, $c, $b, $subject, $body);
+      }
+    
+   }
+
 ?>
index e13c8a257c156237b34c1a550624c1249c690818..1ba81ee270e792deba71df912065c63802ce66d6 100644 (file)
@@ -1,4 +1,12 @@
 <?
+   /** This code sends a mail.
+    **
+    ** There are 3 modes of operation:
+    **  - Start new mail
+    **  - Add an attachment
+    **  - Send mail
+    **/
+
    include("../config/config.php");
    include("../functions/strings.php");
    include("../functions/page_header.php");
@@ -6,6 +14,8 @@
    include("../functions/mailbox.php");
    include("../functions/date.php");
    include("../functions/mime.php");
+   include("../functions/smtp.php");
+   include("../functions/display_messages.php");
 
    include("../src/load_prefs.php");
 
    $imapConnection = loginToImapServer($username, $key, $imapServerAddress, 0);
    displayPageHeader($color, "None");
 
-   if ($forward_id) {
-      selectMailbox($imapConnection, $mailbox, $numMessages);
-      $msg = fetchMessage($imapConnection, $forward_id, $mailbox);
+   // This function is used 
+   function newMail () {
+      global $forward_id, $imapConnection, $msg, $ent_num, $body_ary, $body,
+         $reply_id, $send_to, $send_to_cc, $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)) {
+      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, "msg", "any_type", $ent_num)) {
+         } else if (containsType($msg, "text", "plain", $ent_num)) {
             $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"]);
-         } else {
-            $body = _("No Message");
+         }
+         // 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 = "";
          }
       }
-
-      $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)) {
+      
+      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, "msg", "any_type", $ent_num)) {
+         } else if (containsType($msg, "text", "plain", $ent_num)) {
             $body = decodeBody($msg["ENTITIES"][$ent_num]["BODY"], $msg["ENTITIES"][$ent_num]["ENCODING"], false);
-         } else {
-            $body = _("No Message");
+         }
+         // 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);
+         }
+      }
+   } // function newMail()
 
-      $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"];
+   function showInputForm () {
+      global $send_to, $send_to_cc, $reply_subj, $forward_subj, $body,
+         $passed_body, $color, $use_signature, $signature, $editor_size;
 
-      $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";
+      echo "\n<FORM action=\"compose.php\" METHOD=GET>\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=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
+      if ($send_to)
+         echo "         <INPUT TYPE=TEXT NAME=send_to VALUE=\"$send_to\" SIZE=60><BR>";
+      else
+         echo "         <INPUT TYPE=TEXT NAME=send_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=send_to_cc SIZE=60 VALUE=\"$send_to_cc\"><BR>";
+      else
+         echo "         <INPUT TYPE=TEXT NAME=send_to_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";
+      if ($send_to_bcc)
+         echo "         <INPUT TYPE=TEXT NAME=send_to_bcc VALUE=\"$send_to_bcc\" SIZE=60><BR>";
+      else
+         echo "         <INPUT TYPE=TEXT NAME=send_to_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=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=subject SIZE=60 VALUE=\"$forward_subj\">";
+      } else {
+         echo "         <INPUT TYPE=TEXT NAME=subject VALUE=\"$subject\" SIZE=60>";
       }
+      echo "      &nbsp;&nbsp;<INPUT TYPE=SUBMIT NAME=send VALUE=\"";
+      echo _("Send");
+      echo "\"><BR>\n";
+      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=body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
+      else
+         echo "         &nbsp;&nbsp;<TEXTAREA NAME=body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>\n";
+      echo "      </TD>\n";
+      echo "   </TR>\n";
+      echo "</TABLE>\n";
+      echo "<CENTER><INPUT TYPE=SUBMIT NAME=send VALUE=\"";
+      echo _("Send");
+      echo "\"></CENTER>";
+      echo "</FORM>";
    }
 
-   // 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);
+   function showSentForm () {
+      echo "<FONT FACE=\"Arial,Helvetica\">";
+      echo "<BR><BR><BR><CENTER><B>Message Sent!</B><BR><BR>";
+      echo "You will be automatically forwarded.<BR>If not, <A HREF=\"right_main.php\">click here</A>";
+      echo "</CENTER></FONT>";
+   }
 
-         $whoreplyto = encodeEmailAddr($msg["HEADER"]["REPLYTO"]);
-         $whoreplyto = decodeEmailAddr($whoreplyto);
+   function checkInput () {
+      global $body, $send_to, $subject;
 
-         if ((strtolower(trim($sendcc[$i])) != strtolower(trim($whofrom))) &&
-             (strtolower(trim($sendcc[$i])) != strtolower(trim($whoreplyto))) &&
-             (trim($sendcc[$i]) != "")) {
-            $send_to_cc .= trim($sendcc[$i]) . ", ";
-         }
+      if ($body == "") {
+         plain_error_message("You have not entered a message body.", $color);
+         return false;
+      } else if ($send_to == "") {
+         displayPageHeader($color, "None");
+         plain_error_message("You have not filled in the \"To:\" field.", $color);
+         return false;
+      } else if ($subject == "") {
+         plain_error_message("You have not entered a subject.", $color);
+         return false;
       }
-      $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);
+      return true;
+   } // function checkInput()
+
+   if (!isset($send)) {
+      newMail();
+      showInputForm();
+   } else if(isset($send)) {
+      if (checkInput()) {
+         sendMessage($send_to, $send_to_cc, $send_to_bcc, $subject, $body);
+         showSentForm();
+      } else {
+         showInputForm();
       }
    }
 
-   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>";
 ?>