summaryrefslogtreecommitdiff
path: root/program/steps/mail/sendmail.inc
diff options
context:
space:
mode:
authorthomascube <thomas@roundcube.net>2005-09-25 14:18:03 +0000
committerthomascube <thomas@roundcube.net>2005-09-25 14:18:03 +0000
commit4e17e6c9dbac8991ee8b302cb2581241247dc8bc (patch)
treed877546f6bd334b041734498e81f6299e005b01c /program/steps/mail/sendmail.inc
Initial revision
Diffstat (limited to 'program/steps/mail/sendmail.inc')
-rw-r--r--program/steps/mail/sendmail.inc251
1 files changed, 251 insertions, 0 deletions
diff --git a/program/steps/mail/sendmail.inc b/program/steps/mail/sendmail.inc
new file mode 100644
index 000000000..789001e14
--- /dev/null
+++ b/program/steps/mail/sendmail.inc
@@ -0,0 +1,251 @@
+<?php
+
+/*
+ +-----------------------------------------------------------------------+
+ | program/steps/mail/sendmail.inc |
+ | |
+ | This file is part of the RoundCube Webmail client |
+ | Copyright (C) 2005, RoundCube Dev. - Switzerland |
+ | All rights reserved. |
+ | |
+ | PURPOSE: |
+ | Compose a new mail message with all headers and attachments |
+ | and send it using IlohaMail's SMTP methods or with PHP mail() |
+ | |
+ +-----------------------------------------------------------------------+
+ | Author: Thomas Bruederli <roundcube@gmail.com> |
+ +-----------------------------------------------------------------------+
+
+ $Id$
+
+*/
+
+
+require_once('lib/smtp.inc');
+require_once('Mail/mime.php');
+
+
+if (!isset($_SESSION['compose']['id']))
+ {
+ $_action = 'list';
+ return;
+ }
+
+
+/****** message sending functions ********/
+
+
+
+function rcmail_get_identity($id)
+ {
+ global $DB;
+
+ // get identity record
+ $sql_result = $DB->query(sprintf("SELECT *, email AS mailto
+ FROM %s
+ WHERE identity_id=%d
+ AND user_id=%d
+ AND del!='1'",
+ get_table_name('identities'),
+ $id,
+ $_SESSION['user_id']));
+
+ if ($DB->num_rows($sql_result))
+ {
+ $sql_arr = $DB->fetch_assoc($sql_result);
+ $out = $sql_arr;
+ $out['string'] = sprintf('%s <%s>', $sql_arr['name'], $sql_arr['mailto']);
+ return $out;
+ }
+
+ return FALSE;
+ }
+
+
+
+/****** check submission and compose message ********/
+
+
+$mailto_regexp = '/,\s*$/';
+
+// trip ending ', ' from
+$mailto = preg_replace($mailto_regexp, '', $_POST['_to']);
+
+// decode address strings
+$to_address_arr = $IMAP->decode_address_list($mailto);
+$identity_arr = rcmail_get_identity($_POST['_from']);
+
+
+$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']);
+
+
+// compose headers array
+$headers = array('Date' => date('D, j M Y G:i:s O'),
+ 'From' => $identity_arr['string'],
+ 'To' => $mailto);
+
+// additional recipients
+if ($_POST['_cc'])
+ $headers['Cc'] = preg_replace($mailto_regexp, '', $_POST['_cc']);
+
+if ($_POST['_bcc'])
+ $headers['Bcc'] = preg_replace($mailto_regexp, '', $_POST['_bcc']);
+
+if (strlen($identity_arr['bcc']))
+ $headers['Bcc'] = ($headers['Bcc'] ? $headers['Bcc'].', ' : '') . $identity_arr['bcc'];
+
+// add subject
+$headers['Subject'] = trim(stripslashes($_POST['_subject']));
+
+if (strlen($identity_arr['organization']))
+ $headers['Organization'] = $identity_arr['organization'];
+
+if (strlen($identity_arr['reply-to']))
+ $headers['Reply-To'] = $identity_arr['reply-to'];
+
+if ($_SESSION['compose']['reply_msgid'])
+ $headers['In-Reply-To'] = $_SESSION['compose']['reply_msgid'];
+
+
+if ($_POST['_priority'])
+ {
+ $priority = (int)$_POST['_priority'];
+ $a_priorities = array(1=>'lowest', 2=>'low', 4=>'high', 5=>'highest');
+ if ($str_priority = $a_priorities[$priority])
+ $headers['X-Priority'] = sprintf("%d (%s)", $priority, ucfirst($str_priority));
+ }
+
+
+// additional headers
+$headers['Message-ID'] = $message_id;
+$headers['X-Sender'] = $from;
+
+if ($CONFIG['useragent'])
+ $headers['User-Agent'] = $CONFIG['useragent'];
+
+
+// create PEAR::Mail_mime instance
+$MAIL_MIME = new Mail_mime();
+$MAIL_MIME->setTXTBody(stripslashes($_POST['_message']), FALSE, TRUE);
+//$MAIL_MIME->setTXTBody(wordwrap(stripslashes($_POST['_message'])), FALSE, TRUE);
+
+
+// add stored attachments, if any
+if (is_array($_SESSION['compose']['attachments']))
+ foreach ($_SESSION['compose']['attachments'] as $attachment)
+ $MAIL_MIME->addAttachment($attachment['path'], $attachment['mimetype'], $attachment['name'], TRUE);
+
+
+// add submitted attachments
+if (is_array($_FILES['_attachments']['tmp_name']))
+ foreach ($_FILES['_attachments']['tmp_name'] as $i => $filepath)
+ $MAIL_MIME->addAttachment($filepath, $files['type'][$i], $files['name'][$i], TRUE);
+
+
+// compose message body and get headers
+$msg_body = $MAIL_MIME->get();
+$msg_subject = $headers['Subject'];
+
+
+// send thru SMTP server using cusotm SMTP library
+if ($CONFIG['smtp_server'])
+ {
+ // connect to SMTP server
+ $smtp_conn = smtp_connect($CONFIG['smtp_server'], '25', $CONFIG['smtp_user'], $CONFIG['smtp_pass']);
+
+ if ($smtp_conn)
+ {
+ // generate list of recipients
+ $recipients = $mailto.', '.$headers['Cc'].', '.$headers['Bcc'];
+ $a_recipients = smtp_expand($recipients);
+
+ // generate message headers
+ $header_str = $MAIL_MIME->txtHeaders($headers);
+
+ // send message
+ $sent = smtp_mail($smtp_conn, $from, $a_recipients, $header_str."\r\n".$msg_body, FALSE);
+ }
+
+ // log error
+ if (!$smtp_conn || !$sent)
+ {
+ raise_error(array('code' => 800,
+ 'type' => 'smtp',
+ 'line' => __LINE__,
+ 'file' => __FILE__,
+ 'message' => "Connection failed: $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_php = $headers;
+ unset($headers_php['To'], $headers_php['Subject']);
+
+ $header_str = $MAIL_MIME->txtHeaders($headers_php);
+ $sent = mail($mailto, $msg_subject, $msg_body, $header_str, "-f$from");
+ }
+
+
+// return to compose page if sending failed
+if (!$sent)
+ {
+ $_action = 'compose';
+ $OUTPUT->add_script(sprintf("\n%s.set_env('action', '%s');", $JS_OBJECT_NAME, $_action));
+ show_message("sendingfailed", 'error');
+ return;
+ }
+
+
+// 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'])
+ {
+ // 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()))
+ $IMAP->create_mailbox($CONFIG['sent_mbox'], TRUE);
+
+ // append message to sent box
+ $saved = $IMAP->save_message($CONFIG['sent_mbox'], $header_str."\r\n".$msg_body);
+ }
+
+
+// log mail sending
+if ($CONFIG['smtp_log'])
+ {
+ $log_entry = sprintf("[%s] User: %d; Message for %s; Subject: %s\n",
+ date("d-M-Y H:i:s O", mktime()),
+ $_SESSION['user_id'],
+ $mailto,
+ $msg_subject);
+
+ if ($fp = fopen($INSTALL_PATH.'logs/sendmail', 'a'))
+ {
+ fwrite($fp, $log_entry);
+ fclose($fp);
+ }
+ }
+
+
+// show confirmation
+show_message('messagesent', 'confirmation');
+
+
+// kill compose entry from session
+rcmail_compose_cleanup();
+
+?> \ No newline at end of file