| | |
| | | | program/steps/mail/sendmail.inc | |
| | | | | |
| | | | This file is part of the Roundcube Webmail client | |
| | | | Copyright (C) 2005-2010, Roundcube Dev. - Switzerland | |
| | | | Copyright (C) 2005-2010, The Roundcube Dev Team | |
| | | | Licensed under the GNU GPL | |
| | | | | |
| | | | PURPOSE: | |
| | |
| | | $OUTPUT->framed = TRUE; |
| | | |
| | | $savedraft = !empty($_POST['_draft']) ? true : false; |
| | | |
| | | $COMPOSE_ID = get_input_value('_id', RCUBE_INPUT_GPC); |
| | | $_SESSION['compose'] = $_SESSION['compose_data'][$COMPOSE_ID]; |
| | | |
| | | /****** checks ********/ |
| | | |
| | |
| | | function rcmail_get_identity($id) |
| | | { |
| | | global $USER, $OUTPUT; |
| | | |
| | | |
| | | if ($sql_arr = $USER->get_identity($id)) { |
| | | $out = $sql_arr; |
| | | $out['mailto'] = $sql_arr['email']; |
| | |
| | | |
| | | // remove any null-byte characters before parsing |
| | | $body = preg_replace('/\x00/', '', $body); |
| | | |
| | | |
| | | $searchstr = 'program/js/tiny_mce/plugins/emotions/img/'; |
| | | $offset = 0; |
| | | |
| | |
| | | { |
| | | global $EMAIL_FORMAT_ERROR, $RECIPIENT_COUNT; |
| | | |
| | | $regexp = array('/[,;]\s*[\r\n]+/', '/[\r\n]+/', '/[,;]\s*$/m', '/;/', '/(\S{1})(<\S+@\S+>)/U'); |
| | | // simplified email regexp, supporting quoted local part |
| | | $email_regexp = '(\S+|("[^"]+"))@\S+'; |
| | | |
| | | $regexp = array('/[,;]\s*[\r\n]+/', '/[\r\n]+/', '/[,;]\s*$/m', '/;/', '/(\S{1})(<'.$email_regexp.'>)/U'); |
| | | $replace = array(', ', ', ', '', ',', '\\1 \\2'); |
| | | |
| | | // replace new lines and strip ending ', ', make address input more valid |
| | |
| | | foreach($items as $item) { |
| | | $item = trim($item); |
| | | // address in brackets without name (do nothing) |
| | | if (preg_match('/^<\S+@\S+>$/', $item)) { |
| | | $item = idn_to_ascii($item); |
| | | if (preg_match('/^<'.$email_regexp.'>$/', $item)) { |
| | | $item = rcube_idn_to_ascii($item); |
| | | $result[] = $item; |
| | | // address without brackets and without name (add brackets) |
| | | } else if (preg_match('/^\S+@\S+$/', $item)) { |
| | | $item = idn_to_ascii($item); |
| | | } else if (preg_match('/^'.$email_regexp.'$/', $item)) { |
| | | $item = rcube_idn_to_ascii($item); |
| | | $result[] = '<'.$item.'>'; |
| | | // address with name (handle name) |
| | | } else if (preg_match('/\S+@\S+>*$/', $item, $matches)) { |
| | | } else if (preg_match('/'.$email_regexp.'>*$/', $item, $matches)) { |
| | | $address = $matches[0]; |
| | | $name = str_replace($address, '', $item); |
| | | $name = trim($name); |
| | | if ($name && ($name[0] != '"' || $name[strlen($name)-1] != '"') |
| | | && preg_match('/[\(\)\<\>\\\.\[\]@,;:"]/', $name)) { |
| | | $name = '"'.addcslashes($name, '"').'"'; |
| | | $name = '"'.addcslashes($name, '"').'"'; |
| | | } |
| | | $address = idn_to_ascii($address); |
| | | if (!preg_match('/^<\S+@\S+>$/', $address)) |
| | | $address = rcube_idn_to_ascii($address); |
| | | if (!preg_match('/^<'.$email_regexp.'>$/', $address)) |
| | | $address = '<'.$address.'>'; |
| | | |
| | | $result[] = $name.' '.$address; |
| | |
| | | |
| | | return implode(', ', $result); |
| | | } |
| | | |
| | | |
| | | /****** compose message ********/ |
| | | |
| | |
| | | $headers['To'] = $mailto; |
| | | |
| | | // additional recipients |
| | | if (!empty($mailcc)) |
| | | if (!empty($mailcc)) { |
| | | $headers['Cc'] = $mailcc; |
| | | |
| | | if (!empty($mailbcc)) |
| | | } |
| | | if (!empty($mailbcc)) { |
| | | $headers['Bcc'] = $mailbcc; |
| | | |
| | | } |
| | | if (!empty($identity_arr['bcc'])) { |
| | | $headers['Bcc'] = ($headers['Bcc'] ? $headers['Bcc'].', ' : '') . $identity_arr['bcc']; |
| | | $RECIPIENT_COUNT ++; |
| | |
| | | // add subject |
| | | $headers['Subject'] = trim(get_input_value('_subject', RCUBE_INPUT_POST, TRUE, $message_charset)); |
| | | |
| | | if (!empty($identity_arr['organization'])) |
| | | if (!empty($identity_arr['organization'])) { |
| | | $headers['Organization'] = $identity_arr['organization']; |
| | | |
| | | if (!empty($_POST['_replyto'])) |
| | | } |
| | | if (!empty($_POST['_replyto'])) { |
| | | $headers['Reply-To'] = rcmail_email_input_format(get_input_value('_replyto', RCUBE_INPUT_POST, TRUE, $message_charset)); |
| | | else if (!empty($identity_arr['reply-to'])) |
| | | } |
| | | else if (!empty($identity_arr['reply-to'])) { |
| | | $headers['Reply-To'] = rcmail_email_input_format($identity_arr['reply-to'], false, true); |
| | | |
| | | if (!empty($_POST['_mailfollowupto'])) |
| | | $headers['Mail-Followup-To'] = rcmail_email_input_format(get_input_value('_mailfollowupto', RCUBE_INPUT_POST, TRUE, $message_charset)); |
| | | if (!empty($_POST['_mailreplyto'])) |
| | | $headers['Mail-Reply-To'] = rcmail_email_input_format(get_input_value('_mailreplyto', RCUBE_INPUT_POST, TRUE, $message_charset)); |
| | | |
| | | if (!empty($_SESSION['compose']['reply_msgid'])) |
| | | } |
| | | if (!empty($headers['Reply-To'])) { |
| | | $headers['Mail-Reply-To'] = $headers['Reply-To']; |
| | | } |
| | | if (!empty($_POST['_followupto'])) { |
| | | $headers['Mail-Followup-To'] = rcmail_email_input_format(get_input_value('_followupto', RCUBE_INPUT_POST, TRUE, $message_charset)); |
| | | } |
| | | if (!empty($_SESSION['compose']['reply_msgid'])) { |
| | | $headers['In-Reply-To'] = $_SESSION['compose']['reply_msgid']; |
| | | } |
| | | |
| | | // remember reply/forward UIDs in special headers |
| | | if (!empty($_SESSION['compose']['reply_uid']) && $savedraft) |
| | | if (!empty($_SESSION['compose']['reply_uid']) && $savedraft) { |
| | | $headers['X-Draft-Info'] = array('type' => 'reply', 'uid' => $_SESSION['compose']['reply_uid']); |
| | | else if (!empty($_SESSION['compose']['forward_uid']) && $savedraft) |
| | | } |
| | | else if (!empty($_SESSION['compose']['forward_uid']) && $savedraft) { |
| | | $headers['X-Draft-Info'] = array('type' => 'forward', 'uid' => $_SESSION['compose']['forward_uid']); |
| | | } |
| | | |
| | | if (!empty($_SESSION['compose']['references'])) |
| | | if (!empty($_SESSION['compose']['references'])) { |
| | | $headers['References'] = $_SESSION['compose']['references']; |
| | | } |
| | | |
| | | if (!empty($_POST['_priority'])) { |
| | | $priority = intval($_POST['_priority']); |
| | | $a_priorities = array(1=>'highest', 2=>'high', 4=>'low', 5=>'lowest'); |
| | | if ($str_priority = $a_priorities[$priority]) |
| | | if ($str_priority = $a_priorities[$priority]) { |
| | | $headers['X-Priority'] = sprintf("%d (%s)", $priority, ucfirst($str_priority)); |
| | | } |
| | | } |
| | | |
| | | if (!empty($_POST['_receipt'])) { |
| | |
| | | $headers['Message-ID'] = $message_id; |
| | | $headers['X-Sender'] = $from; |
| | | |
| | | if (is_array($headers['X-Draft-Info'])) |
| | | if (is_array($headers['X-Draft-Info'])) { |
| | | $headers['X-Draft-Info'] = rcmail_draftinfo_encode($headers['X-Draft-Info'] + array('folder' => $_SESSION['compose']['mailbox'])); |
| | | |
| | | if (!empty($CONFIG['useragent'])) |
| | | } |
| | | if (!empty($CONFIG['useragent'])) { |
| | | $headers['User-Agent'] = $CONFIG['useragent']; |
| | | } |
| | | |
| | | // exec hook for header checking and manipulation |
| | | $data = $RCMAIL->plugins->exec_hook('message_outgoing_headers', array('headers' => $headers)); |
| | |
| | | // add inline css for blockquotes |
| | | $bstyle = 'padding-left:5px; border-left:#1010ff 2px solid; margin-left:5px; width:100%'; |
| | | $message_body = preg_replace('/<blockquote>/', |
| | | '<blockquote type="cite" style="'.$bstyle.'">', $message_body); |
| | | '<blockquote type="cite" style="'.$bstyle.'">', $message_body); |
| | | |
| | | // append doctype and html/body wrappers |
| | | $message_body = '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN">' . |
| | | "\r\n<html><body>\r\n" . $message_body; |
| | | } |
| | | |
| | | // Check spelling before send |
| | | if ($CONFIG['spellcheck_before_send'] && $CONFIG['enable_spellcheck'] |
| | | && empty($_SESSION['compose']['spell_checked']) && !empty($message_body) |
| | | ) { |
| | | $spellchecker = new rcube_spellchecker(get_input_value('_lang', RCUBE_INPUT_GPC)); |
| | | $spell_result = $spellchecker->check($message_body, $isHtml); |
| | | |
| | | $_SESSION['compose']['spell_checked'] = true; |
| | | |
| | | if (!$spell_result) { |
| | | $result = $isHtml ? $spellchecker->get_words() : $spellchecker->get_xml(); |
| | | $OUTPUT->show_message('mispellingsfound', 'error'); |
| | | $OUTPUT->command('spellcheck_resume', $isHtml, $result); |
| | | $OUTPUT->send('iframe'); |
| | | } |
| | | } |
| | | |
| | | // generic footer for all messages |
| | |
| | | if ($isHtml) |
| | | $footer = '<pre>'.$footer.'</pre>'; |
| | | } |
| | | |
| | | if ($footer) |
| | | $message_body .= "\r\n" . $footer; |
| | | if ($isHtml) |
| | | $message_body .= "\r\n</body></html>\r\n"; |
| | | } |
| | | |
| | | // set line length for body wrapping |
| | |
| | | |
| | | $MAIL_MIME->setHTMLBody($plugin['body']); |
| | | |
| | | // replace emoticons |
| | | $plugin['body'] = rcmail_replace_emoticons($plugin['body']); |
| | | |
| | | // add a plain text version of the e-mail as an alternative part. |
| | | $h2t = new html2text($plugin['body'], false, true, 0); |
| | | $plainTextPart = rc_wordwrap($h2t->get_text(), $LINE_LENGTH, "\r\n"); |
| | | $plainTextPart = wordwrap($plainTextPart, 998, "\r\n", true); |
| | | if (!$plainTextPart) { |
| | | // empty message body breaks attachment handling in drafts |
| | | $plainTextPart = "\r\n"; |
| | | // empty message body breaks attachment handling in drafts |
| | | $plainTextPart = "\r\n"; |
| | | } |
| | | else { |
| | | // make sure all line endings are CRLF (#1486712) |
| | |
| | | ($attachment['data'] ? false : true), |
| | | ($ctype == 'message/rfc822' ? '8bit' : 'base64'), |
| | | ($ctype == 'message/rfc822' ? 'inline' : 'attachment'), |
| | | $message_charset, '', '', |
| | | '', '', '', |
| | | $CONFIG['mime_param_folding'] ? 'quoted-printable' : NULL, |
| | | $CONFIG['mime_param_folding'] == 2 ? 'quoted-printable' : NULL |
| | | $CONFIG['mime_param_folding'] == 2 ? 'quoted-printable' : NULL, |
| | | '', RCMAIL_CHARSET |
| | | ); |
| | | } |
| | | } |
| | |
| | | } |
| | | |
| | | if (PEAR::isError($msg)) |
| | | raise_error(array('code' => 600, 'type' => 'php', |
| | | raise_error(array('code' => 650, 'type' => 'php', |
| | | 'file' => __FILE__, 'line' => __LINE__, |
| | | 'message' => "Could not create message: ".$msg->getMessage()), |
| | | TRUE, FALSE); |
| | |
| | | |
| | | // remember new draft-uid |
| | | $draftuids = $IMAP->search_once($CONFIG['drafts_mbox'], 'HEADER Message-ID '.$msgid, true); |
| | | $_SESSION['compose']['param']['_draft_uid'] = $draftuids[0]; |
| | | $_SESSION['compose']['param']['draft_uid'] = $draftuids[0]; |
| | | |
| | | // display success |
| | | $OUTPUT->show_message('messagesaved', 'confirmation'); |
| | |
| | | } |
| | | else |
| | | { |
| | | rcmail_compose_cleanup(); |
| | | rcmail_compose_cleanup($COMPOSE_ID); |
| | | |
| | | if ($store_folder && !$saved) |
| | | $OUTPUT->command('sent_successfully', 'error', rcube_label('errorsavingsent')); |