#include <signal.h>
+#ifdef USE_LIBESMTP
+#include <auth-client.h>
+#include <libesmtp.h>
+#endif
+
#include <lib-lua/lib-lua.h>
#include <lib-sys/exit.h>
#include <lib-sys/mutt_signal.h>
#include <lib-mime/mime.h>
+#include <lib-ui/enter.h>
#include <lib-ui/curses.h>
#include <lib-mx/mx.h>
#include "pager.h"
#include "charset.h"
#include "mutt_idna.h"
-#include "send_smtp.h"
#ifdef USE_NNTP
#include <nntp/nntp.h>
#define EX_OK 0
#endif
+#ifdef USE_LIBESMTP
+static char authpass[STRING] = "";
+
+#define FAIL() \
+ do { \
+ ret = -1; \
+ goto Done; \
+ } while (0)
+#define MSGFAIL(msg) \
+ do { \
+ mutt_error("%s", msg); \
+ FAIL(); \
+ } while (0)
+#define LIBCFAIL(msg) \
+ do { \
+ mutt_error("%s: %s", msg, strerror(errno)); \
+ FAIL(); \
+ } while (0)
+#define SMTPFAIL(msg) \
+ do { \
+ _send_smtp_perror(msg); \
+ FAIL(); \
+ } while (0)
+#define extna(msg) { mutt_error (_("SMTP Extension '%s' not supported by MTA."), \
+ msg); sleep (1); }
+
+/*
+ * _send_smtp_ensure_init
+ * Make sure the libESMTP support in mutt is initialized at some time.
+ */
+static void _send_smtp_ensure_init ()
+{
+ static int libesmtp_init = 0;
+
+ if (!libesmtp_init) {
+ if (SmtpAuthUser)
+ auth_client_init ();
+ libesmtp_init = 1;
+ }
+}
+
+/*
+ * _send_smtp_perror
+ * Prints 'msg', a colon, and then a string representation of the
+ * libesmtp errno as a mutt error.
+ */
+static void _send_smtp_perror (const char *msg)
+{
+ char buf[512];
+
+ mutt_error ("%s: %s", msg,
+ smtp_strerror (smtp_errno (), buf, sizeof (buf)));
+}
+
+/*
+ * _send_smtp_add_recipients
+ * Adds every address in 'addr' as a recipient to the smtp message
+ * 'message'. Note that this does not mean that they will necessarily
+ * show up in the mail headers (e.g., when bcc'ing). Returns 0 upon
+ * success, -1 upon failure (and prints an error message).
+ *
+ * Very similar to sendlib.c::add_args
+ */
+static int
+_send_smtp_add_recipients (smtp_message_t message, address_t * addr)
+{
+ int ret = 0;
+
+ for (; addr; addr = addr->next) {
+ /* weed out group mailboxes, since those are for display only */
+ if (addr->mailbox && !addr->group) {
+ if (!smtp_add_recipient (message, addr->mailbox))
+ SMTPFAIL ("smtp_add_recipient");
+ }
+ }
+
+Done:
+ return ret;
+}
+
+static int
+_send_smtp_auth_interact (auth_client_request_t request,
+ char **result, int fields,
+ void *arg __attribute__ ((unused)))
+{
+ int i;
+
+ for (i = 0; i < fields; i++) {
+ if (request[i].flags & AUTH_USER) {
+ result[i] = SmtpAuthUser;
+ } else if (request[i].flags & AUTH_PASS) {
+ if (SmtpAuthPass) {
+ result[i] = SmtpAuthPass;
+ } else {
+ if (authpass[0] == '\0') {
+ char prompt[STRING];
+
+ snprintf(prompt, sizeof(prompt), "%s%s: ", request[i].prompt,
+ request[i].flags & AUTH_CLEARTEXT ? " (not encrypted)" :
+ "");
+ mutt_get_field_unbuffered(prompt, authpass, sizeof(authpass),
+ M_PASS);
+ }
+ result[i] = authpass;
+ }
+ }
+ }
+
+ return 1;
+}
+
+#define BUFLEN 8192
+
+static const char *
+_send_smtp_messagefp_cb(void **buf, int *len, void *arg)
+{
+ int octets;
+
+ if (*buf == NULL)
+ *buf = xmalloc(BUFLEN);
+
+ if (len == NULL) {
+ rewind ((FILE *) arg);
+ return NULL;
+ }
+
+ if (fgets (*buf, BUFLEN - 2, (FILE *) arg) == NULL) {
+ octets = 0;
+ }
+ else {
+ char *p = strchr (*buf, '\0');
+
+ if (p[-1] == '\n' && p[-2] != '\r') {
+ m_strcpy(p - 1, (char *) *buf + BUFLEN - p + 1, "\r\n");
+ p++;
+ }
+ octets = p - (char *) *buf;
+ }
+
+ *len = octets;
+ return *buf;
+}
+
+static int handle_invalid_peer_certificate (long vfy_result) {
+#if defined (HAVE_GNUTLS_OPENSSL_H)
+ mutt_error (_("Error verifying certificate: %s"),
+ NONULL (X509_verify_cert_error_string (vfy_result)));
+#else
+ mutt_error (_("Error verifying certificate. Error Code: %lu"), vfy_result);
+#endif
+ sleep(2);
+ return 1; /* Accept the problem */
+}
+
+static void event_cb (smtp_session_t session __attribute__ ((unused)),
+ int event_no, void *arg,...)
+{
+ va_list alist;
+ int *ok;
+
+ va_start(alist, arg);
+ switch(event_no) {
+ case SMTP_EV_CONNECT:
+ case SMTP_EV_MAILSTATUS:
+ case SMTP_EV_RCPTSTATUS:
+ case SMTP_EV_MESSAGEDATA:
+ case SMTP_EV_MESSAGESENT:
+ case SMTP_EV_DISCONNECT: break;
+ case SMTP_EV_WEAK_CIPHER: {
+ int bits;
+ bits = va_arg(alist, long); ok = va_arg(alist, int*);
+ mutt_message (_("SMTP_EV_WEAK_CIPHER, bits=%d - accepted."), bits);
+ sleep(1);
+ *ok = 1; break;
+ }
+ case SMTP_EV_STARTTLS_OK:
+ mutt_message (_("Using TLS"));
+ sleep(1);
+ break;
+ case SMTP_EV_INVALID_PEER_CERTIFICATE: {
+ long vfy_result;
+ vfy_result = va_arg(alist, long); ok = va_arg(alist, int*);
+ *ok = handle_invalid_peer_certificate(vfy_result);
+ sleep(1);
+ break;
+ }
+ case SMTP_EV_NO_PEER_CERTIFICATE: {
+ ok = va_arg(alist, int*);
+ mutt_message (_("SMTP_EV_NO_PEER_CERTIFICATE - accepted."));
+ sleep(1);
+ *ok = 1; break;
+ }
+ case SMTP_EV_WRONG_PEER_CERTIFICATE: {
+ ok = va_arg(alist, int*);
+ mutt_message (_("SMTP_EV_WRONG_PEER_CERTIFICATE - accepted."));
+ sleep(1);
+ *ok = 1; break;
+ }
+ case SMTP_EV_NO_CLIENT_CERTIFICATE: {
+ ok = va_arg(alist, int*);
+ mutt_message (_("SMTP_EV_NO_CLIENT_CERTIFICATE - accepted."));
+ sleep(1);
+ *ok = 1; break;
+ }
+ case SMTP_EV_EXTNA_DSN:
+ extna ("DSN");
+ break;
+ case SMTP_EV_EXTNA_STARTTLS:
+ extna ("StartTLS");
+ break;
+ case SMTP_EV_EXTNA_8BITMIME:
+ extna ("8BITMIME");
+ break;
+ default:
+ mutt_message(_("Got unhandled event ID = %d - ignored."), event_no);
+ sleep(1);
+ }
+ va_end(alist);
+}
+
+static void do_dsn_notify (smtp_message_t message, const char* from) {
+ int flags = Notify_NOTSET;
+ smtp_recipient_t self = NULL;
+
+ if (m_strisempty(MTransport.dsn_notify) || !message || m_strisempty(from) ||
+ strstr (MTransport.dsn_notify, "never") != NULL)
+ return;
+
+ if (strstr (MTransport.dsn_notify, "failure") != NULL)
+ flags |= Notify_FAILURE;
+ if (strstr (MTransport.dsn_notify, "delay") != NULL)
+ flags |= Notify_DELAY;
+ if (strstr (MTransport.dsn_notify, "success") != NULL)
+ flags |= Notify_SUCCESS;
+
+ if (flags != Notify_NOTSET) {
+ if (!(self = smtp_add_recipient (message, from)))
+ return;
+ smtp_dsn_set_notify (self, flags);
+ }
+}
+
+static void do_dsn_ret (smtp_message_t message) {
+ if (m_strisempty(MTransport.dsn_return) || !message)
+ return;
+ if (ascii_strncasecmp (MTransport.dsn_return, "hdrs", 4) == 0)
+ smtp_dsn_set_ret (message, Ret_HDRS);
+ else if (ascii_strncasecmp (MTransport.dsn_return, "full", 4) == 0)
+ smtp_dsn_set_ret (message, Ret_FULL);
+}
+
+int send_smtp_check_usetls (const char* option, unsigned long p,
+ char* errbuf, ssize_t errlen) {
+ char* val = (char*) p;
+ if (m_strisempty(val))
+ return (1);
+ if (m_strncmp(val, "enabled", 7) != 0 &&
+ m_strncmp(val, "required", 8) != 0) {
+ if (errbuf)
+ snprintf (errbuf, errlen, _("'%s' is invalid for %s"), val, option);
+ return (0);
+ }
+ return (1);
+}
+
+/*
+ * send_smtp_invoke
+ * Sends a mail message to the provided recipients using libesmtp.
+ * Returns 0 upon success, -1 upon failure (and prints an error
+ * message).
+ */
+static int
+send_smtp_invoke(address_t *from, address_t *to, address_t *cc,
+ address_t *bcc, const char *msg, int eightbit)
+{ /* message contains 8bit chars */
+ int ret = 0; /* return value, default = success */
+ smtp_session_t session;
+ smtp_message_t message;
+ char *hostportstr = NULL;
+ size_t hostportlen;
+ FILE *fp = NULL;
+ auth_context_t authctx = NULL;
+ const smtp_status_t *status;
+ char* envfrom = from->mailbox;
+
+ _send_smtp_ensure_init ();
+
+ if ((session = smtp_create_session ()) == NULL)
+ SMTPFAIL ("smtp_create_session");
+
+#ifdef HAVE_GNUTLS_OPENSSL_H
+ if (SmtpUseTLS != NULL && ascii_strncasecmp("enabled", SmtpUseTLS, 7) == 0) {
+ smtp_starttls_enable(session, Starttls_ENABLED);
+ } else if (SmtpUseTLS != NULL && ascii_strncasecmp("required", SmtpUseTLS, 8) == 0) {
+ smtp_starttls_enable(session, Starttls_REQUIRED);
+ }
+#endif
+
+ /* Create hostname:port string and tell libesmtp */
+ /* len = SmtpHost len + colon + max port (65536 => 5 chars) + terminator */
+ hostportlen = m_strlen(SmtpHost) + 7;
+ hostportstr = p_new(char, hostportlen);
+ snprintf (hostportstr, hostportlen, "%s:%d", SmtpHost, SmtpPort);
+ if (!smtp_set_server (session, hostportstr))
+ SMTPFAIL ("smtp_set_server");
+
+ if (SmtpAuthUser) {
+ if ((authctx = auth_create_context ()) == NULL)
+ MSGFAIL ("auth_create_context failed");
+ auth_set_mechanism_flags (authctx, AUTH_PLUGIN_PLAIN, 0);
+ auth_set_interact_cb (authctx, _send_smtp_auth_interact, NULL);
+
+ if (!smtp_auth_set_context (session, authctx))
+ SMTPFAIL ("smtp_auth_set_context");
+ }
+
+#ifdef HAVE_GNUTLS_OPENSSL_H
+ smtp_starttls_set_ctx (session, NULL);
+#endif
+ smtp_set_eventcb (session, event_cb, NULL);
+
+ if ((message = smtp_add_message (session)) == NULL)
+ SMTPFAIL ("smtp_add_message");
+
+ /* Initialize envelope sender */
+ if (MTransport.use_envelope_from && MTransport.envelope_from_address)
+ envfrom = MTransport.envelope_from_address->mailbox;
+ if (!smtp_set_reverse_path (message, envfrom))
+ SMTPFAIL ("smtp_set_reverse_path");
+
+ /* set up DSN for message */
+ do_dsn_notify (message, envfrom);
+ do_dsn_ret (message);
+
+ /* set up 8bitmime flag */
+ if (eightbit && MTransport.use_8bitmime)
+ smtp_8bitmime_set_body (message, E8bitmime_8BITMIME);
+
+ if ((fp = fopen (msg, "r")) == NULL)
+ LIBCFAIL ("fopen");
+ if (!smtp_set_messagecb (message, _send_smtp_messagefp_cb, fp))
+ SMTPFAIL ("smtp_set_messagecb");
+ if (_send_smtp_add_recipients (message, to))
+ FAIL ();
+ if (_send_smtp_add_recipients (message, cc))
+ FAIL ();
+ if (_send_smtp_add_recipients (message, bcc))
+ FAIL ();
+ if (!smtp_start_session (session))
+ SMTPFAIL ("smtp_start_session");
+
+ status = smtp_message_transfer_status (message);
+ if (status->code < 200 || status->code > 299) {
+ char buf[256];
+
+ snprintf (buf, sizeof (buf), "SMTP error while sending: %d %s",
+ status->code, status->text);
+ MSGFAIL (buf);
+ }
+
+Done:
+ m_fclose(&fp);
+ if (hostportstr != NULL)
+ p_delete(&hostportstr);
+ if (session != NULL)
+ smtp_destroy_session (session);
+ if (authctx != NULL)
+ auth_destroy_context (authctx);
+
+ /* Forget user-entered SMTP AUTH password if send fails */
+ if (ret != 0)
+ authpass[0] = '\0';
+
+ return ret;
+}
+#endif
+
static void transform_to_7bit (BODY * a, FILE * fpin);
static void encode_quoted (fgetconv_t * fc, FILE * fout, int istext)
int ncodes, const char **tocodes,
int *tocode, CONTENT * info)
{
-#ifdef HAVE_ICONV
iconv_t cd1, *cd;
char bufi[256], bufu[512], bufo[4 * sizeof (bufi)];
const char *ib, *ub;
p_delete(&states);
return ret;
-#else
- return -1;
-#endif /* !HAVE_ICONV */
}
/*
if (b != NULL && b->type == TYPETEXT && (!b->noconv && !b->force_charset)) {
const char *chs = parameter_getval(b->parameter, "charset");
- char *fchs = b->use_disp && !m_strisempty(MCharset.file_charset)
- ? FileCharset : MCharset.charset;
- if (MCharset.charset && (chs || MCharset.send_charset) &&
- convert_file_from_to (fp, fchs, chs ? chs : MCharset.send_charset,
+ char *fchs = b->use_disp && !m_strisempty(mod_cset.file_charset)
+ ? FileCharset : mod_cset.charset;
+ if (mod_cset.charset && (chs || mod_cset.send_charset) &&
+ convert_file_from_to (fp, fchs, chs ? chs : mod_cset.send_charset,
&fromcode, &tocode, info) != -1) {
if (!chs) {
charset_canonicalize (chsbuf, sizeof (chsbuf), tocode);
if (b != NULL && b->type == TYPETEXT && (!b->noconv && !b->force_charset))
parameter_setval(&b->parameter, "charset",
(!info->hibin ? "us-ascii"
- : MCharset.charset && !charset_is_us_ascii(MCharset.charset)
- ? MCharset.charset : "unknown-8bit"));
+ : mod_cset.charset && !charset_is_us_ascii(mod_cset.charset)
+ ? mod_cset.charset : "unknown-8bit"));
return info;
}
*/
switch (count) {
case 0:
- snprintf(buf, sizeof (buf), "%s/.mime.types", NONULL(MCore.homedir));
+ snprintf(buf, sizeof (buf), "%s/.mime.types", NONULL(mod_core.homedir));
break;
case 1:
m_strcpy(buf, sizeof(buf), SYSCONFDIR "/madmutt-mime.types");
a->length = sb.st_size;
}
- fpout = m_tempfile(temp, sizeof(temp), NONULL(MCore.tmpdir), NULL);
+ fpout = m_tempfile(temp, sizeof(temp), NONULL(mod_core.tmpdir), NULL);
if (!fpout) {
mutt_error(_("Could not create temporary file"));
goto cleanup;
a->noconv = 1;
a->force_charset = 1;
- s.fpout = m_tempfile(buff, sizeof(buff), NONULL(MCore.tmpdir), NULL);
+ s.fpout = m_tempfile(buff, sizeof(buff), NONULL(mod_core.tmpdir), NULL);
if (!s.fpout) {
mutt_error(_("Could not create temporary file"));
return;
(hdr->security & ENCRYPT)) {
}
- fp = m_tempfile(buffer, sizeof(buffer), NONULL(MCore.tmpdir), NULL);
+ fp = m_tempfile(buffer, sizeof(buffer), NONULL(mod_core.tmpdir), NULL);
if (!fp)
return NULL;
fprintf (fp, "Followup-To: %s\n", env->followup_to);
else if (mode == 1 && option (OPTNEWSSEND) && edit_header(mode, "Followup-To:"))
fputs ("Followup-To:\n", fp);
-
- if (env->x_comment_to)
- fprintf (fp, "X-Comment-To: %s\n", env->x_comment_to);
- else if (mode == 1 && option (OPTNEWSSEND) && option (OPTXCOMMENTTO) &&
- edit_header(mode, "X-Comment-To:"))
- fputs ("X-Comment-To:\n", fp);
#endif
if (env->subject)
}
if (mode == 0 && !privacy && option (OPTXMAILER) && !has_agent) {
- if (MCore.operating_system) {
+ if (mod_core.operating_system) {
fprintf(fp, "User-Agent: %s (%s)\n", mutt_make_version(),
- MCore.operating_system);
+ mod_core.operating_system);
} else {
fprintf(fp, "User-Agent: %s\n", mutt_make_version());
}
{
char *p = NULL, *q;
- if (MCore.hostname && MCore.hostname[0] != '@') {
- p = MCore.hostname;
+ if (mod_core.hostname && mod_core.hostname[0] != '@') {
+ p = mod_core.hostname;
if (may_hide_host && option (OPTHIDDENHOST)) {
- if ((p = strchr(MCore.hostname, '.')))
+ if ((p = strchr(mod_core.hostname, '.')))
p++;
/* sanity check: don't hide the host if
the fqdn is something like detebe.org. */
if (!p || !(q = strchr(p, '.')))
- p = MCore.hostname;
+ p = mod_core.hostname;
}
}
const char *fqdn;
if (!(fqdn = mutt_fqdn(0)))
- fqdn = NONULL(MCore.shorthost);
+ fqdn = NONULL(mod_core.shorthost);
mutt_gen_localpart(localpart, sizeof(localpart), MsgIdFormat);
snprintf(buf, sizeof(buf), "<%s@%s>", localpart, fqdn);
return m_strdup(buf);
}
-static RETSIGTYPE alarm_handler (int sig __attribute__ ((unused)))
+static void alarm_handler (int sig __attribute__ ((unused)))
{
SigAlrm = 1;
}
if (!fp)
fp = msg->fp;
- f = m_tempfile(tempfile, sizeof(tempfile), NONULL(MCore.tmpdir), NULL);
+ f = m_tempfile(tempfile, sizeof(tempfile), NONULL(mod_core.tmpdir), NULL);
if (f) {
int ch_flags = CH_XMIT | CH_NONEWLINE | CH_NOQFROM;
* the message body begins with "From "
*/
if (f.magic == M_MBOX) {
- tempfp = m_tempfile(tempfile, sizeof(tempfile), NONULL(MCore.tmpdir), NULL);
+ tempfp = m_tempfile(tempfile, sizeof(tempfile), NONULL(mod_core.tmpdir), NULL);
if (!tempfp) {
mutt_error(_("Could not create temporary file"));
mx_close_mailbox (&f, NULL);