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    /** This formats a CC string if they hit "reply all" **/
  96    echo "TO: $send_to<BR>CC: $send_to_cc<BR>";
  97    if ($send_to_cc != "") {
  98       $send_to_cc = ereg_replace(";", ",", $send_to_cc);
  99       $sendcc = explode(",", $send_to_cc);
 100       $send_to_cc = "";
 101
 102       for ($i = 0; $i < count($sendcc); $i++) {
 103          $sendcc[$i] = trim($sendcc[$i]);
 104          if ($sendcc[$i] == "")
 105             continue;
 106
 107          $sendcc[$i] = encodeEmailAddr($sendcc[$i]);
 108          $sendcc[$i] = decodeEmailAddr($sendcc[$i]);
 109
 110          $whofrom = encodeEmailAddr($msg["HEADER"]["FROM"]);
 111          $whofrom = decodeEmailAddr($whofrom);
 112
 113          $whoreplyto = encodeEmailAddr($msg["HEADER"]["REPLYTO"]);
 114          $whoreplyto = decodeEmailAddr($whoreplyto);
 115
 116          if ((strtolower(trim($sendcc[$i])) != strtolower(trim($whofrom))) &&
 117              (strtolower(trim($sendcc[$i])) != strtolower(trim($whoreplyto))) &&
 118              (trim($sendcc[$i]) != "")) {
 119             if ($i == count($send_cc))
 120                $send_to_cc .= trim($sendcc[$i]);
 121             else
 122                $send_to_cc .= trim($sendcc[$i]) . ", ";
 123          }
 124       }
 125       $send_to_cc = trim($send_to_cc);
 126       if (substr($send_to_cc, -1) == ",") {
 127          $send_to_cc = substr($send_to_cc, 0, strlen($send_to_cc) - 1);
 128       }
 129    }
 130
 131    echo "<FORM action=\"compose_send.php\" METHOD=POST>\n";
 132    echo "<TABLE COLS=2 WIDTH=50 ALIGN=CENTER CELLSPACING=0 BORDER=0>\n";
 133    echo "   <TR>\n";
 134    echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 135    echo "         <FONT FACE=\"Arial,Helvetica\">To: </FONT>\n";
 136    echo "      </TD><TD WIDTH=% \"$color[4]\" ALIGN=LEFT>\n";
 137    if ($send_to)
 138       echo "         <INPUT TYPE=TEXT NAME=passed_to VALUE=\"$send_to\" SIZE=60><BR>";
 139    else
 140       echo "         <INPUT TYPE=TEXT NAME=passed_to SIZE=60><BR>";
 141    echo "      </TD>\n";
 142    echo "   </TR>\n";
 143    echo "   <TR>\n";
 144    echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 145    echo "         <FONT FACE=\"Arial,Helvetica\">CC:</FONT>\n";
 146    echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 147    if ($send_to_cc)
 148       echo "         <INPUT TYPE=TEXT NAME=passed_cc SIZE=60 VALUE=\"$send_to_cc\"><BR>";
 149    else
 150       echo "         <INPUT TYPE=TEXT NAME=passed_cc SIZE=60><BR>";
 151    echo "      </TD>\n";
 152    echo "   </TR>\n";
 153    echo "   <TR>\n";
 154    echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 155    echo "         <FONT FACE=\"Arial,Helvetica\">BCC:</FONT>\n";
 156    echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 157    echo "         <INPUT TYPE=TEXT NAME=passed_bcc SIZE=60><BR>";
 158    echo "      </TD>\n";
 159    echo "   </TR>\n";
 160
 161    echo "   <TR>\n";
 162    echo "      <TD WIDTH=50 BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 163    echo "         <FONT FACE=\"Arial,Helvetica\">Subject:</FONT>\n";
 164    echo "      </TD><TD WIDTH=% BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 165    if ($reply_subj) {
 166       $reply_subj = str_replace("\"", "'", $reply_subj);
 167       $reply_subj = stripslashes($reply_subj);
 168       $reply_subj = trim($reply_subj);
 169       if (substr(strtolower($reply_subj), 0, 3) != "re:")
 170          $reply_subj = "Re: $reply_subj";
 171       echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$reply_subj\">";
 172    } else if ($forward_subj) {
 173       $forward_subj = str_replace("\"", "'", $forward_subj);
 174       $forward_subj = stripslashes($forward_subj);
 175       $forward_subj = trim($forward_subj);
 176       if ((substr(strtolower($forward_subj), 0, 4) != "fwd:") &&
 177           (substr(strtolower($forward_subj), 0, 5) != "[fwd:") &&
 178           (substr(strtolower($forward_subj), 0, 6) != "[ fwd:"))
 179          $forward_subj = "[Fwd: $forward_subj]";
 180       echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60 VALUE=\"$forward_subj\">";
 181    } else {
 182       echo "         <INPUT TYPE=TEXT NAME=passed_subject SIZE=60>";
 183    }
 184    echo "&nbsp;&nbsp;<INPUT TYPE=SUBMIT VALUE=\"Send\"><BR>";
 185    echo "      </TD>\n";
 186    echo "   </TR>\n";
 187    echo "   <TR>\n";
 188    echo "      <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
 189    if ($use_signature == true)
 190       echo "         &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body\n\n$signature</TEXTAREA><BR>";
 191    else
 192       echo "         &nbsp;&nbsp;<TEXTAREA NAME=passed_body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>$body</TEXTAREA><BR>";
 193    echo "      </TD>";
 194    echo "   </TR>\n";
 195    echo "</TABLE>\n";
 196    echo "<CENTER><INPUT TYPE=SUBMIT VALUE=\"Send\"></CENTER>";
 197    echo "</FORM>";
 198 ?>