#include <config.h>
#include "notify_mailto.h"
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <time.h>
#include <sys/types.h>
#include <sys/wait.h>
#include "global.h"
#include "libconfig.h"
#include "rfc822date.h"
#include "sieve_interface.h"
static int contains_8bit(const char *msg);
static int global_outgoing_count = 0;
char* notify_mailto(const char *class,
const char *priority __attribute__((unused)),
const char *user __attribute__((unused)),
const char *mailbox __attribute__((unused)),
int nopt, char **options,
const char *message)
{
FILE *sm;
const char *smbuf[10];
char outmsgid[8192];
int sm_stat;
time_t t;
char datestr[80];
pid_t sm_pid;
int fds[2];
if (nopt < 1)
return strdup("NO mailto URI not specified");
smbuf[0] = "sendmail";
smbuf[1] = "-i";
smbuf[2] = "-f";
smbuf[3] = "<>";
smbuf[4] = "--";
smbuf[5] = options[0];
smbuf[6] = NULL;
pipe(fds);
if ((sm_pid = fork()) == 0) {
close(fds[1]);
dup2(fds[0], 0);
execv(config_getstring(IMAPOPT_SENDMAIL), (char **) smbuf);
return strdup("NO mailto couldn't exec");
}
close(fds[0]);
sm = fdopen(fds[1], "w");
if (!sm)
return strdup("NO mailto could not spawn sendmail process");
t = time(NULL);
snprintf(outmsgid, sizeof(outmsgid), "<cmu-sieve-%u-%lu-%d@%s>",
sm_pid, t, global_outgoing_count++, config_servername);
fprintf(sm, "Message-ID: %s\r\n", outmsgid);
rfc822date_gen(datestr, sizeof(datestr), t);
fprintf(sm, "Date: %s\r\n", datestr);
fprintf(sm, "X-Sieve: %s\r\n", SIEVE_VERSION);
fprintf(sm, "From: Mail Sieve Subsystem <%s>\r\n", config_getstring(IMAPOPT_POSTMASTER));
fprintf(sm, "To: <%s>\r\n", options[0]);
fprintf(sm, "Subject: [%s] New mail notification\r\n", class);
if (contains_8bit(message)) {
fprintf(sm, "MIME-Version: 1.0\r\n");
fprintf(sm, "Content-Type: text/plain; charset=UTF-8\r\n");
fprintf(sm, "Content-Transfer-Encoding: 8BIT\r\n");
}
fprintf(sm, "\r\n");
fprintf(sm, "%s\r\n", message);
fclose(sm);
while (waitpid(sm_pid, &sm_stat, 0) < 0);
return strdup("OK mailto notification successful");
}
static int contains_8bit(const char * msg)
{
int result = 0;
if (msg) {
const unsigned char *s = (const unsigned char *)msg;
while (*s) {
if (0 != (*s & 0x80)) {
result = 1;
break ;
}
s++;
}
}
return result;
}