X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fcompose.php;h=4655e3818059d05e84b83b087d3106b9ce4ed7cb;hp=cc89c7aec5391058cf32c2c87cc7363162091601;hb=b39114772e1fb212bf918270e0f072a696324719;hpb=fa276b145d16378cd130cd074f8efd6b90a7d178 diff --git a/src/compose.php b/src/compose.php index cc89c7ae..4655e381 100644 --- a/src/compose.php +++ b/src/compose.php @@ -1,194 +1,484 @@ -\n"; - $imapConnection = loginToImapServer($username, $key, $imapServerAddress); - displayPageHeader($color, "None"); + // This function is used when not sending or adding attachments + function newMail () { + global $forward_id, $imapConnection, $msg, $ent_num, $body_ary, $body, + $reply_id, $send_to, $send_to_cc, $mailbox, $send_to_bcc, $editor_size; - if ($forward_id) { - selectMailbox($imapConnection, $mailbox, $numMessages); - $msg = fetchMessage($imapConnection, $forward_id, $mailbox); + $send_to = sqStripSlashes(decodeHeader($send_to)); + $send_to_cc = sqStripSlashes(decodeHeader($send_to_cc)); + $send_to_bcc = sqStripSlashes(decodeHeader($send_to_bcc)); - 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"]); + if ($forward_id) + $id = $forward_id; + elseif ($reply_id) + $id = $reply_id; + + + if ($id) { + sqimap_mailbox_select($imapConnection, $mailbox); + $message = sqimap_get_message($imapConnection, $id, $mailbox); + $orig_header = $message->header; + if ($ent_num) + $message = getEntity($message, $ent_num); + + if ($message->header->type0 == "text" || $message->header->type1 == "message") { + if ($ent_num) + $body = decodeBody(mime_fetch_body($imapConnection, $id, $ent_num), $message->header->encoding); + else + $body = decodeBody(mime_fetch_body($imapConnection, $id, 1), $message->header->encoding); } else { - $body = "No Message"; + $body = ""; + } + + if ($message->header->type1 == "html") + $body = strip_tags($body); + + sqUnWordWrap($body); + $body_ary = explode("\n", $body); + $i = count($body_ary) - 1; + while (isset($body_ary[$i]) && ereg("^[>\s]*$", $body_ary[$i])) { + unset($body_ary[$i]); + $i --; + } + $body = ""; + for ($i=0; $i < count($body_ary); $i++) { + if (! $forward_id) + { + if (ereg('^[\s>]+', $body_ary[$i])) + { + $body_ary[$i] = '>' . $body_ary[$i]; + } + else + { + $body_ary[$i] = '> ' . $body_ary[$i]; + } + } + sqWordWrap($body_ary[$i], $editor_size - 1); + $body .= $body_ary[$i] . "\n"; + $body_ary[$i] = ''; + } + if ($forward_id) + { + $bodyTop = "-------- " . _("Original Message") . " --------\n"; + $bodyTop .= _("Subject") . ": " . $orig_header->subject . "\n"; + $bodyTop .= _("From") . ": " . $orig_header->from . "\n"; + $bodyTop .= _("To") . ": " . $orig_header->to[0] . "\n"; + if (count($orig_header->to) > 1) { + for ($x=1; $x < count($orig_header->to); $x++) { + $bodyTop .= " " . $orig_header->to[$x] . "\n"; + } + } + $bodyTop .= "\n"; + $body = $bodyTop . $body; + } + + $body = ereg_replace('\\\\', '\\\\', $body); + + return; + } + + if (!$send_to) { + $send_to = sqimap_find_email($send_to); + } + + /** This formats a CC string if they hit "reply all" **/ + if ($send_to_cc != "") { + $send_to_cc = ereg_replace( '"[^"]*"', "", $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] = sqimap_find_email($sendcc[$i]); + $whofrom = sqimap_find_displayable_name($msg["HEADER"]["FROM"]); + $whoreplyto = sqimap_find_email($msg["HEADER"]["REPLYTO"]); + + 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() + + function getAttachments($message) { + global $mailbox, $attachments, $attachment_dir, $imapConnection, + $ent_num, $forward_id; + + if (!$message) { + sqimap_mailbox_select($imapConnection, $mailbox); + $message = sqimap_get_message($imapConnection, $forward_id, $mailbox); } + + if (!$message->entities) { + if ($message->header->entity_id != $ent_num) { + $filename = decodeHeader($message->header->filename); + + if ($filename == "") + $filename = "untitled-".$message->header->entity_id; + + $localfilename = md5($filename.", $REMOTE_IP, REMOTE_PORT, $UNIQUE_ID, extra-stuff here"); + + // Write File Info + $fp = fopen ($attachment_dir.$localfilename.".info", "w"); + fputs ($fp, strtolower($message->header->type0)."/".strtolower($message->header->type1)."\n".$filename."\n"); + fclose ($fp); + + // Write Attachment to file + $fp = fopen ($attachment_dir.$localfilename, "w"); + fputs ($fp, decodeBody(mime_fetch_body($imapConnection, $forward_id, $message->header->entity_id), $message->header->encoding)); + +// Don't know why these lines were included +// fgets($imapConnection, 256); +// fgets($imapConnection, 256); + + fclose ($fp); + + $attachments[$localfilename] = $filename; + + } + } else { + for ($i = 0; $i < count($message->entities); $i++) { + getAttachments($message->entities[$i]); + } + } + return; + } - $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, + $attachments, $subject, $newmail, $use_javascript_addr_book, + $send_to_bcc, $reply_id, $mailbox, $from_htmladdr_search, + $location_of_buttons; - $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 = ""; + $subject = sqStripSlashes(decodeHeader($subject)); + $reply_subj = decodeHeader($reply_subj); + $forward_subj = decodeHeader($forward_subj); + $body = sqStripSlashes($body); + + if ($use_javascript_addr_book) { + echo "\n\n\n"; } - } - if ($reply_id) { - selectMailbox($imapConnection, $mailbox, $numMessages); - $msg = fetchMessage($imapConnection, $reply_id, $mailbox); + echo "\n
\n"; + if ($reply_id) { + echo "\n"; + } + printf("\n", htmlspecialchars($mailbox)); + echo "\n"; + + if ($location_of_buttons == 'top') showComposeButtonRow(); - 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); + echo " \n"; + echo " \n"; + echo " \n"; + echo " \n"; + echo " \n"; + echo " \n"; + echo " \n"; + echo " \n"; + + echo " \n"; + echo " \n\n"; + + if ($location_of_buttons == 'between') showComposeButtonRow(); + + echo " \n"; + echo " \n"; + echo " \n"; + + if ($location_of_buttons == 'bottom') + showComposeButtonRow(); 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"; + echo " \n"; + } + + // This code is for attachments + echo " \n"; + echo " \n"; + echo " \n"; + if (isset($attachments) && count($attachments)>0) { + echo ""; } + // End of attachment code - $type1 = $msg["ENTITIES"][$ent_num]["TYPE1"]; + echo "
\n"; + echo _("To:"); + echo " \n"; + printf("
\n", + htmlspecialchars($send_to)); + echo "
\n"; + echo _("CC:"); + echo " \n"; + printf("
\n", + htmlspecialchars($send_to_cc)); + echo "
\n"; + echo _("BCC:"); + echo " \n"; + printf("
\n", + htmlspecialchars($send_to_bcc)); + echo "
\n"; + echo _("Subject:"); + echo " \n"; + if ($reply_subj) { + $reply_subj = str_replace("\"", "'", $reply_subj); + $reply_subj = sqStripSlashes($reply_subj); + $reply_subj = trim($reply_subj); + if (substr(strtolower($reply_subj), 0, 3) != "re:") + $reply_subj = "Re: $reply_subj"; + printf(" ", + htmlspecialchars($reply_subj)); + } else if ($forward_subj) { + $forward_subj = str_replace("\"", "'", $forward_subj); + $forward_subj = sqStripSlashes($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]"; + printf(" ", + htmlspecialchars($forward_subj)); + } else { + printf(" ", + htmlspecialchars($subject)); + } + echo "
\n"; + echo "   
\n"; + echo "
 
\n"; + echo "
"._("Attach:"); + echo "
\n"; + // echo " \n"; + echo " \n"; + echo "   \n"; + echo "
\n"; + echo " "; + echo ""; + while (list($localname, $remotename) = each($attachments)) { + echo "\n"; + echo "$remotename
\n"; } + + echo "\n"; + echo "
\n"; + echo "
"; + do_hook("compose_bottom"); + } + + function showComposeButtonRow() { + global $use_javascript_addr_book; + echo " \n \n"; + if ($use_javascript_addr_book) { + echo " \n"; + } else { + echo " "; + } + echo "\n \n"; + + do_hook("compose_button_row"); - $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"; + echo " \n\n"; } - // Add some decoding information - $send_to = encodeEmailAddr($send_to); - // parses the field and returns only the email address - $send_to = decodeEmailAddr($send_to); + function showSentForm () { + echo "


Message Sent!

"; + echo "You will be automatically forwarded.
If not, click here"; + echo "
"; + } + + function checkInput ($show) { + /** I implemented the $show variable because the error messages + were getting sent before the page header. So, I check once + using $show=false, and then when i'm ready to display the + error message, show=true **/ + global $body, $send_to, $subject, $color; + + if ($send_to == "") { + if ($show) + plain_error_message(_("You have not filled in the \"To:\" field."), $color); + return false; + } + return true; + } // function checkInput() - $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 = ""; + // True if FAILURE + function saveAttachedFiles() { + global $HTTP_POST_FILES, $attachment_dir, $attachments; + + is_logged_in(); + $localfilename = GenerateRandomString(32, '', 7); + + if (!@rename($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) { + if (!@copy($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) { + return true; + } + } + + if (!$failed) { + // Write information about the file + $fp = fopen ($attachment_dir.$localfilename.".info", "w"); + fputs ($fp, $HTTP_POST_FILES['attachfile']['type']."\n".$HTTP_POST_FILES['attachfile']['name']."\n"); + fclose ($fp); - for ($i = 0; $i < count($sendcc); $i++) { - $sendcc[$i] = trim($sendcc[$i]); - if ($sendcc[$i] == "") - continue; + $attachments[$localfilename] = $HTTP_POST_FILES['attachfile']['name']; + } + } - $sendcc[$i] = encodeEmailAddr($sendcc[$i]); - $sendcc[$i] = decodeEmailAddr($sendcc[$i]); + if (($mailbox == "") || ($mailbox == "None")) + $mailbox = "INBOX"; - $whofrom = encodeEmailAddr($msg["HEADER"]["FROM"]); - $whofrom = decodeEmailAddr($whofrom); + if(isset($send)) { + if ($HTTP_POST_FILES['attachfile']['tmp_name'] && + $HTTP_POST_FILES['attachfile']['tmp_name'] != 'none') + $AttachFailure = saveAttachedFiles(); + if (checkInput(false) && ! $AttachFailure) { + $urlMailbox = urlencode ($mailbox); + sendMessage($send_to, $send_to_cc, $send_to_bcc, $subject, $body, $reply_id); + header ("Location: right_main.php?mailbox=$urlMailbox&sort=$sort&startMessage=1"); + } else { + //$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); + displayPageHeader($color, $mailbox); + + if ($AttachFailure) + plain_error_message(_("Could not move/copy file. File not attached"), $color); - $whoreplyto = encodeEmailAddr($msg["HEADER"]["REPLYTO"]); - $whoreplyto = decodeEmailAddr($whoreplyto); + checkInput(true); + + showInputForm(); + //sqimap_logout($imapConnection); + } + } else if ($html_addr_search_done) { + is_logged_in(); + displayPageHeader($color, $mailbox); - 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 = sqStripSlashes($send_to); + $send_to_cc = sqStripSlashes($send_to_cc); + $send_to_bcc = sqStripSlashes($send_to_bcc); + + for ($i=0; $i < count($send_to_search); $i++) { + if ($send_to) + $send_to .= ", "; + $send_to .= $send_to_search[$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); + + for ($i=0; $i < count($send_to_cc_search); $i++) { + if ($send_to_cc) + $send_to_cc .= ", "; + $send_to_cc .= $send_to_cc_search[$i]; + } + + showInputForm(); + } else if ($html_addr_search) { + // I am using an include so as to elminiate an extra unnecessary click. If you + // can think of a better way, please implement it. + include ("./addrbook_search_html.php"); + } else if (isset($attach)) { + if (saveAttachedFiles()) + plain_error_message(_("Could not move/copy file. File not attached"), $color); + displayPageHeader($color, $mailbox); + showInputForm(); + } else if (isset($do_delete)) { + is_logged_in(); + displayPageHeader($color, $mailbox); + + while (list($lkey, $localname) = each($delete)) { + unset ($attachments[$localname]); + unlink ($attachment_dir.$localname); + unlink ($attachment_dir.$localname.".info"); } - } - echo "
\n"; - echo "\n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - - echo " \n"; - echo " \n"; - echo " \n"; - echo " \n"; - echo " "; - echo " \n"; - echo "
\n"; - echo " To: \n"; - echo " \n"; - if ($send_to) - echo "
"; - else - echo "
"; - echo "
\n"; - echo " CC:\n"; - echo " \n"; - if ($send_to_cc) - echo "
"; - else - echo "
"; - echo "
\n"; - echo " BCC:\n"; - echo " \n"; - echo "
"; - echo "
\n"; - echo " Subject:\n"; - echo " \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 " "; - } 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 " "; + showInputForm(); + } else if ($smtpErrors) { + $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); + displayPageHeader($color, $mailbox); + + $newmail = true; + if ($forward_id && $ent_num) getAttachments(0); + + newMail(); + showInputForm(); + sqimap_logout($imapConnection); } else { - echo " "; + $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); + displayPageHeader($color, $mailbox); + + $newmail = true; + + if ($forward_id && $ent_num) getAttachments(0); + + newMail(); + showInputForm(); + sqimap_logout($imapConnection); } - echo "  
"; - echo "
\n"; - if ($use_signature == true) - echo "   
"; - else - echo "   
"; - echo "
\n"; - echo "
"; - echo "
"; -?> \ No newline at end of file +?> + +