From 2f2f15b7aabe19e45dad9bddb7eb7f4394aa1e21 Mon Sep 17 00:00:00 2001 From: thomascube <thomas@roundcube.net> Date: Mon, 04 Sep 2006 08:26:30 -0400 Subject: [PATCH] Little improvements for message parsing and encoding --- program/steps/mail/sendmail.inc | 249 ++++++++++++++++++++++++++++++------------------- 1 files changed, 153 insertions(+), 96 deletions(-) diff --git a/program/steps/mail/sendmail.inc b/program/steps/mail/sendmail.inc index 65365ea..375fc92 100644 --- a/program/steps/mail/sendmail.inc +++ b/program/steps/mail/sendmail.inc @@ -36,7 +36,6 @@ /****** message sending functions ********/ - function rcmail_get_identity($id) { global $DB, $CHARSET, $OUTPUT; @@ -53,8 +52,9 @@ { $sql_arr = $DB->fetch_assoc($sql_result); $out = $sql_arr; + $name = strpos($sql_arr['name'], ",") ? '"'.$sql_arr['name'].'"' : $sql_arr['name']; $out['string'] = sprintf('%s <%s>', - rcube_charset_convert($sql_arr['name'], $CHARSET, $OUTPUT->get_charset()), + rcube_charset_convert($name, $CHARSET, $OUTPUT->get_charset()), $sql_arr['mailto']); return $out; } @@ -63,6 +63,16 @@ } +if (strlen($_POST['_draft_saveid']) > 3) + $olddraftmessageid = get_input_value('_draft_saveid', RCUBE_INPUT_POST); + +$message_id = sprintf('<%s@%s>', md5(uniqid('rcmail'.rand(),true)), rcmail_mail_domain($_SESSION['imap_host'])); +$savedraft = !empty($_POST['_draft']) ? TRUE : FALSE; + +// remove all scripts and act as called in frame +$OUTPUT->reset(); +$_framed = TRUE; + /****** check submission and compose message ********/ @@ -70,7 +80,8 @@ if (empty($_POST['_to']) && empty($_POST['_subject']) && $_POST['_message']) { show_message("sendingfailed", 'error'); - rcmail_overwrite_action('compose'); + //rcmail_overwrite_action('compose'); + rcube_iframe_response(); return; } @@ -82,21 +93,18 @@ $mailto_regexp = array('/[,;]\s*[\r\n]+/', '/[\r\n]+/', '/[,;]\s*$/m'); $mailto_replace = array(', ', ', ', ''); -// repalce new lines and strip ending ', ' +// replace new lines and strip ending ', ' $mailto = preg_replace($mailto_regexp, $mailto_replace, get_input_value('_to', RCUBE_INPUT_POST, TRUE, $message_charset)); // decode address strings $to_address_arr = $IMAP->decode_address_list($mailto); -$identity_arr = rcmail_get_identity($_POST['_from']); - +$identity_arr = rcmail_get_identity(get_input_value('_from', RCUBE_INPUT_POST)); $from = $identity_arr['mailto']; $first_to = is_array($to_address_arr[0]) ? $to_address_arr[0]['mailto'] : $mailto; - -// create unique message-id -$message_id = sprintf('<%s@%s>', md5(uniqid('rcmail')), $_SESSION['imap_host']); - +if (empty($identity_arr['string'])) + $identity_arr['string'] = $from; // compose headers array $headers = array('Date' => date('D, j M Y G:i:s O'), @@ -131,7 +139,7 @@ if (!empty($_POST['_priority'])) { $priority = (int)$_POST['_priority']; - $a_priorities = array(1=>'lowest', 2=>'low', 4=>'high', 5=>'highest'); + $a_priorities = array(1=>'highest', 2=>'high', 4=>'low', 5=>'lowest'); if ($str_priority = $a_priorities[$priority]) $headers['X-Priority'] = sprintf("%d (%s)", $priority, ucfirst($str_priority)); } @@ -206,126 +214,175 @@ 'text_charset' => $message_charset); // compose message body and get headers -$msg_body = $MAIL_MIME->get($message_param); +$msg_body = &$MAIL_MIME->get($message_param); $msg_subject = $headers['Subject']; if ($MBSTRING && function_exists("mb_encode_mimeheader")) $headers['Subject'] = mb_encode_mimeheader($headers['Subject'], $message_charset); -// send thru SMTP server using cusotm SMTP library -if ($CONFIG['smtp_server']) - { - // generate list of recipients - $a_recipients = array($mailto); +// Begin SMTP Delivery Block +if (!$savedraft) { - if (strlen($headers['Cc'])) - $a_recipients[] = $headers['Cc']; - if (strlen($headers['Bcc'])) - $a_recipients[] = $headers['Bcc']; - - // clean Bcc from header for recipients - $send_headers = $headers; - unset($send_headers['Bcc']); - - // generate message headers - $header_str = $MAIL_MIME->txtHeaders($send_headers); - - // send message - $sent = smtp_mail($from, $a_recipients, $header_str, $msg_body); - - // log error + // send thru SMTP server using custom SMTP library + if ($CONFIG['smtp_server']) + { + // generate list of recipients + $a_recipients = array($mailto); + + if (strlen($headers['Cc'])) + $a_recipients[] = $headers['Cc']; + if (strlen($headers['Bcc'])) + $a_recipients[] = $headers['Bcc']; + + // clean Bcc from header for recipients + $send_headers = $headers; + unset($send_headers['Bcc']); + + // generate message headers + $header_str = $MAIL_MIME->txtHeaders($send_headers); + + // send message + $sent = smtp_mail($from, $a_recipients, $header_str, $msg_body); + + // log error + if (!$sent) + { + raise_error(array('code' => 800, + 'type' => 'smtp', + 'line' => __LINE__, + 'file' => __FILE__, + 'message' => "SMTP error: $SMTP_ERROR"), TRUE, FALSE); + } + } + + // send mail using PHP's mail() function + else + { + // unset some headers because they will be added by the mail() function + $headers_enc = $MAIL_MIME->headers($headers); + $headers_php = $MAIL_MIME->_headers; + unset($headers_php['To'], $headers_php['Subject']); + + // reset stored headers and overwrite + $MAIL_MIME->_headers = array(); + $header_str = $MAIL_MIME->txtHeaders($headers_php); + + if (ini_get('safe_mode')) + $sent = mail($headers_enc['To'], $headers_enc['Subject'], $msg_body, $header_str); + else + $sent = mail($headers_enc['To'], $headers_enc['Subject'], $msg_body, $header_str, "-f$from"); + } + + + // return to compose page if sending failed if (!$sent) { - raise_error(array('code' => 800, - 'type' => 'smtp', - 'line' => __LINE__, - 'file' => __FILE__, - 'message' => "SMTP error: $SMTP_ERROR"), TRUE, FALSE); + show_message("sendingfailed", 'error'); + rcube_iframe_response(); + return; } - } - -// send mail using PHP's mail() function -else - { - // unset some headers because they will be added by the mail() function - $headers_enc = $MAIL_MIME->headers($headers); - $headers_php = $MAIL_MIME->_headers; - unset($headers_php['To'], $headers_php['Subject']); - // reset stored headers and overwrite - $MAIL_MIME->_headers = array(); - $header_str = $MAIL_MIME->txtHeaders($headers_php); + + // set repliead flag + if ($_SESSION['compose']['reply_uid']) + $IMAP->set_flag($_SESSION['compose']['reply_uid'], 'ANSWERED'); - if (ini_get('safe_mode')) - $sent = mail($headers_enc['To'], $headers_enc['Subject'], $msg_body, $header_str); - else - $sent = mail($headers_enc['To'], $headers_enc['Subject'], $msg_body, $header_str, "-f$from"); - } + } // End of SMTP Delivery Block -// return to compose page if sending failed -if (!$sent) - { - show_message("sendingfailed", 'error'); - rcmail_overwrite_action('compose'); - return; - } +// Determine which folder to save message +if ($savedraft) + $store_target = 'drafts_mbox'; +else + $store_target = 'sent_mbox'; -// set repliead flag -if ($_SESSION['compose']['reply_uid']) - $IMAP->set_flag($_SESSION['compose']['reply_uid'], 'ANSWERED'); - - -// copy message to sent folder -if ($CONFIG['sent_mbox']) +if ($CONFIG[$store_target]) { // create string of complete message headers $header_str = $MAIL_MIME->txtHeaders($headers); // check if mailbox exists - if (!in_array_nocase($CONFIG['sent_mbox'], $IMAP->list_mailboxes())) - $sent_folder = $IMAP->create_mailbox($CONFIG['sent_mbox'], TRUE); + if (!in_array_nocase($CONFIG[$store_target], $IMAP->list_mailboxes())) + $store_folder = $IMAP->create_mailbox($CONFIG[$store_target], TRUE); else - $sent_folder = TRUE; + $store_folder = TRUE; + + // add headers to message body + $msg_body = $header_str."\r\n".$msg_body; // append message to sent box - if ($sent_folder) - $saved = $IMAP->save_message($CONFIG['sent_mbox'], $header_str."\r\n".$msg_body); + if ($store_folder) + $saved = $IMAP->save_message($CONFIG[$store_target], $msg_body); // raise error if saving failed if (!$saved) + { raise_error(array('code' => 800, 'type' => 'imap', 'file' => __FILE__, - 'message' => "Could not save message in $CONFIG[sent_mbox]"), TRUE, FALSE); - } + 'message' => "Could not save message in $CONFIG[$store_target]"), TRUE, FALSE); + + show_message('errorsaving', 'error'); + rcube_iframe_response($errorout); + } - -// log mail sending -if ($CONFIG['smtp_log']) - { - $log_entry = sprintf("[%s] User: %d on %s; Message for %s; Subject: %s\n", - date("d-M-Y H:i:s O", mktime()), - $_SESSION['user_id'], - $_SERVER['REMOTE_ADDR'], - $mailto, - $msg_subject); - - if ($fp = @fopen($CONFIG['log_dir'].'/sendmail', 'a')) + if ($olddraftmessageid) { - fwrite($fp, $log_entry); - fclose($fp); + // delete previous saved draft + $a_deleteid = $IMAP->search($CONFIG['drafts_mbox'],'HEADER Message-ID',$olddraftmessageid); + $deleted = $IMAP->delete_message($IMAP->get_uid($a_deleteid[0],$CONFIG['drafts_mbox']),$CONFIG['drafts_mbox']); + + // raise error if deletion of old draft failed + if (!$deleted) + raise_error(array('code' => 800, + 'type' => 'imap', + 'file' => __FILE__, + 'message' => "Could not delete message from ".$CONFIG['drafts_mbox']), TRUE, FALSE); } } +if ($savedraft) + { + // clear the "saving message" busy status, and display success + show_message('messagesaved', 'confirmation'); -// show confirmation -show_message('messagesent', 'confirmation'); + // update "_draft_saveid" on the page, which is used to delete a previous draft + $frameout = "var foundid = parent.rcube_find_object('_draft_saveid', parent.document);\n"; + $frameout .= sprintf("foundid.value = '%s';\n", str_replace(array('<','>'), "", $message_id)); + + // update the "cmp_hash" to prevent "Unsaved changes" warning + $frameout .= sprintf("parent.%s.cmp_hash = parent.%s.compose_field_hash();\n", $JS_OBJECT_NAME, $JS_OBJECT_NAME); + + // start the auto-save timer again + $frameout .= sprintf("parent.%s.auto_save_start();", $JS_OBJECT_NAME); + + // send html page with JS calls as response + rcube_iframe_response($frameout); + } +else + { + if ($CONFIG['smtp_log']) + { + $log_entry = sprintf("[%s] User: %d on %s; Message for %s; Subject: %s\n", + date("d-M-Y H:i:s O", mktime()), + $_SESSION['user_id'], + $_SERVER['REMOTE_ADDR'], + $mailto, + $msg_subject); + + if ($fp = @fopen($CONFIG['log_dir'].'/sendmail', 'a')) + { + fwrite($fp, $log_entry); + fclose($fp); + } + } + + rcmail_compose_cleanup(); + rcube_iframe_response(sprintf("parent.$JS_OBJECT_NAME.sent_successfully('%s');", + rep_specialchars_output(rcube_label('messagesent'), 'js'))); + } -// kill compose entry from session -rcmail_compose_cleanup(); - -?> \ No newline at end of file +?> -- Gitblit v1.9.1