X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=uip%2Fspost.c;h=39d8ada53dfb99f8b35888ac62d290e53d7ed978;hp=5b51ad4ce76190d356bc4c06473bfa75dffd2332;hb=6e9577f324bef90765a5edc02044eb111ec48072;hpb=d3540eaa4251b3a282115a72ed5d1bb39ce74b3f diff --git a/uip/spost.c b/uip/spost.c index 5b51ad4..39d8ada 100644 --- a/uip/spost.c +++ b/uip/spost.c @@ -15,50 +15,31 @@ #include #include #include -#include #include +#include +#include +#include +#include #define MAX_SM_FIELD 1476 /* < largest hdr field sendmail will accept */ -#define FCCS 10 /* max number of fccs allowed */ - -struct swit switches[] = { -#define FILTSW 0 - { "filter filterfile", 0 }, -#define NFILTSW 1 - { "nofilter", 0 }, -#define VERBSW 2 + +static struct swit switches[] = { +#define VERBSW 0 { "verbose", 0 }, -#define NVERBSW 3 - { "noverbose", 0 }, -#define WATCSW 4 - { "watch", 0 }, -#define NWATCSW 5 - { "nowatch", 0 }, -#define BACKSW 6 - { "backup", 0 }, -#define NBACKSW 7 - { "nobackup", 0 }, -#define ALIASW 8 - { "alias aliasfile", 0 }, -#define NALIASW 9 - { "noalias", 0 }, -#define VERSIONSW 10 - { "version", 0 }, -#define HELPSW 11 +#define NVERBSW 1 + { "noverbose", 2 }, +#define VERSIONSW 2 + { "Version", 0 }, +#define HELPSW 3 { "help", 0 }, -#define DEBUGSW 12 +#define DEBUGSW 4 { "debug", -5 }, -#define DISTSW 13 +#define DISTSW 5 { "dist", -4 }, /* interface from dist */ -#define PUSHSW 14 /* fork to sendmail then exit */ - { "push", -4 }, -#define NPUSHSW 15 /* exec sendmail */ - { "nopush", -6 }, -#define LIBSW 16 - { "library directory", -7 }, { NULL, 0 } }; +char *version=VERSION; /* flags for headers->flags */ #define HNOP 0x0000 /* just used to keep .set around */ @@ -67,11 +48,9 @@ struct swit switches[] = { #define HSUB 0x0004 /* Subject: header */ #define HTRY 0x0008 /* try to send to addrs on header */ #define HBCC 0x0010 /* don't output this header */ -#define HMNG 0x0020 /* mung this header */ -#define HNGR 0x0040 /* no groups allowed in this header */ -#define HFCC 0x0080 /* FCC: type header */ -#define HNIL 0x0100 /* okay for this header not to have addrs */ -#define HIGN 0x0200 /* ignore this header */ +#define HFCC 0x0020 /* FCC: type header */ +#define HIGN 0x0040 /* ignore this header */ +#define HDCC 0x0080 /* DCC: type header */ /* flags for headers->set */ #define MFRM 0x0001 /* we've seen a From: */ @@ -80,6 +59,7 @@ struct swit switches[] = { #define MVIS 0x0008 /* we've seen sighted addrs */ #define MINV 0x0010 /* we've seen blind addrs */ #define MRDT 0x0020 /* we've seen a Resent-Date: */ +#define MFMM 0x0040 /* The Mail is From a Alternative-Mailbox Addresse */ struct headers { char *value; @@ -87,46 +67,46 @@ struct headers { unsigned int set; }; - static struct headers NHeaders[] = { { "Return-Path", HBAD, 0 }, { "Received", HBAD, 0 }, - { "Reply-To", HADR|HNGR, 0 }, - { "From", HADR|HNGR, MFRM }, + { "Reply-To", HADR, 0 }, + { "From", HADR, MFRM }, { "Sender", HADR|HBAD, 0 }, { "Date", HNOP, MDAT }, { "Subject", HSUB, 0 }, { "To", HADR|HTRY, MVIS }, { "Cc", HADR|HTRY, MVIS }, - { "Bcc", HADR|HTRY|HBCC|HNIL, MINV }, + { "Dcc", HADR|HTRY|HDCC, MINV }, + { "Bcc", HADR|HTRY|HBCC, MINV }, { "Message-Id", HBAD, 0 }, { "Fcc", HFCC, 0 }, + { "Envelope-From", HIGN, 0 }, { NULL, 0, 0 } }; static struct headers RHeaders[] = { - { "Resent-Reply-To", HADR|HNGR, 0 }, - { "Resent-From", HADR|HNGR, MRFM }, + { "Resent-Reply-To", HADR, 0 }, + { "Resent-From", HADR, MRFM }, { "Resent-Sender", HADR|HBAD, 0 }, { "Resent-Date", HNOP, MRDT }, { "Resent-Subject", HSUB, 0 }, { "Resent-To", HADR|HTRY, MVIS }, { "Resent-Cc", HADR|HTRY, MVIS }, + { "Resent-Dcc", HADR|HTRY|HDCC, MINV }, { "Resent-Bcc", HADR|HTRY|HBCC, MINV }, { "Resent-Message-Id", HBAD, 0 }, { "Resent-Fcc", HFCC, 0 }, { "Reply-To", HADR, 0 }, { "Fcc", HIGN, 0 }, + { "Envelope-From", HIGN, 0 }, { NULL, 0, 0 } }; -static int badmsg = 0; /* message has bad semantics */ -static int verbose = 0; /* spell it out */ -static int debug = 0; /* debugging post */ -static int watch = 0; /* watch the delivery process */ -static int backflg = 0; /* prepend backup prefix to input file when done */ -static int pushflg = 0; /* if going to fork to sendmail */ +static int badmsg = 0; +static int verbose = 0; +static int debug = 0; static int aliasflg = 0; /* if going to process aliases */ static unsigned msgflags = 0; /* what we've seen */ @@ -135,24 +115,19 @@ static enum { normal, resent } msgstate = normal; -static char tmpfil[] = "/tmp/pstXXXXXX"; +static char *tmpfil; -static char *filter = NULL; /* the filter for BCC'ing */ static char *subject = NULL; /* the subject field for BCC'ing */ -static char *fccfold[FCCS]; /* foldernames for FCC'ing */ -static short fccind = 0; /* index into fccfold[] */ +static struct mailname *from = NULL; /* the from field for BCC'ing */ +static char fccs[BUFSIZ] = ""; +struct mailname *bccs = NULL; /* list of the bcc recipients */ +struct mailname *recipients = NULL; /* list of the recipients */ +size_t recipientsc = 0; +struct mailname *sender = NULL; static struct headers *hdrtab; /* table for the message we're doing */ static FILE *out; /* output (temp) file */ -extern char *sendmail; - -/* -** external prototypes -*/ -extern char *getfullname(void); -extern char *getusername(void); - /* ** static prototypes */ @@ -161,30 +136,26 @@ static void finish_headers(FILE *); static int get_header(char *, struct headers *); static void putadr(char *, struct mailname *); static int putone(char *, int, int); -static void insert_fcc(char *, unsigned char *); +static void process_fcc(char *); static void fcc(char *, char *); - -#if 0 -static void make_bcc_file(void); -#endif +static void process_bccs(char *); +static size_t do_aliasing(struct mailname *, struct mailname **); int main(int argc, char **argv) { - int state, i, pid, compnum; + enum state state; + struct field f = {{0}}; + int compnum; char *cp, *msg = NULL, **argp, **arguments; - char *sargv[16], buf[BUFSIZ], name[NAMESZ]; + char **sargv, buf[BUFSIZ]; FILE *in; -#ifdef LOCALE setlocale(LC_ALL, ""); -#endif invo_name = mhbasename(argv[0]); - /* foil search of user profile/context */ - if (context_foil(NULL) == -1) - done(1); + context_read(); arguments = getarguments(invo_name, argc, argv, 0); argp = arguments; @@ -194,19 +165,19 @@ main(int argc, char **argv) switch (smatch(++cp, switches)) { case AMBIGSW: ambigsw(cp, switches); - done(1); + exit(EX_USAGE); case UNKWNSW: - adios(NULL, "-%s unknown", cp); + adios(EX_USAGE, NULL, "-%s unknown", cp); case HELPSW: snprintf(buf, sizeof(buf), "%s [switches] file", invo_name); print_help(buf, switches, 1); - done(1); + exit(argc == 2 ? EX_OK : EX_USAGE); case VERSIONSW: print_version(invo_name); - done(1); + exit(argc == 2 ? EX_OK : EX_USAGE); case DEBUGSW: debug++; @@ -216,155 +187,124 @@ main(int argc, char **argv) msgstate = resent; continue; - case FILTSW: - if (!(filter = *argp++) || *filter == '-') - adios(NULL, "missing argument to %s", - argp[-2]); - continue; - case NFILTSW: - filter = NULL; - continue; - - case BACKSW: - backflg++; - continue; - case NBACKSW: - backflg = 0; - continue; - case VERBSW: verbose++; continue; case NVERBSW: verbose = 0; continue; - - case WATCSW: - watch++; - continue; - case NWATCSW: - watch = 0; - continue; - - case PUSHSW: - pushflg++; - continue; - case NPUSHSW: - pushflg = 0; - continue; - - case ALIASW: - if (!(cp = *argp++) || *cp == '-') - adios(NULL, "missing argument to %s", - argp[-2]); - aliasflg = 1; - if ((state = alias(cp)) != AK_OK) - adios(NULL, "aliasing error in file %s - %s", cp, akerror(state)); - continue; - case NALIASW: - aliasflg = 0; - continue; - - case LIBSW: - if (!(cp = *argp++) || *cp == '-') - adios(NULL, "missing argument to %s", - argp[-2]); - /* create a minimal context */ - if (context_foil(cp) == -1) - done(1); - continue; } } - if (msg) - adios(NULL, "only one message at a time!"); - else + if (msg) { + adios(EX_USAGE, NULL, "only one message at a time!"); + } else { msg = cp; + } } - if (!msg) - adios(NULL, "usage: %s [switches] file", invo_name); + if (!msg) { + adios(EX_USAGE, NULL, "usage: %s [switches] file", invo_name); + } - if ((in = fopen(msg, "r")) == NULL) - adios(msg, "unable to open"); + if ((in = fopen(msg, "r")) == NULL) { + adios(EX_IOERR, msg, "unable to open"); + } if (debug) { verbose++; out = stdout; } else { -#ifdef HAVE_MKSTEMP - if ((out = fdopen(mkstemp(tmpfil), "w")) == NULL) - adios(tmpfil, "unable to create"); -#else - mktemp(tmpfil); - if ((out = fopen(tmpfil, "w")) == NULL) - adios(tmpfil, "unable to create"); - chmod(tmpfil, 0600); -#endif + tmpfil = mh_xstrdup(m_mktemp2("/tmp/", invo_name, NULL, &out)); } - hdrtab = (msgstate == normal) ? NHeaders : RHeaders; + /* check for "Aliasfile:" profile entry */ + if ((cp = context_find("Aliasfile"))) { + char *dp, **ap; - for (compnum = 1, state = FLD;;) { - switch (state = m_getfld(state, name, buf, sizeof(buf), in)) { - case FLD: - compnum++; - putfmt(name, buf, out); - continue; + aliasflg = 1; + for (ap=brkstring(dp=mh_xstrdup(cp), " ", "\n"); ap && *ap; + ap++) { + if ((state = alias(etcpath(*ap))) != AK_OK) { + adios(EX_IOERR, NULL, "aliasing error in file %s: %s", + *ap, akerror(state)); + } + } + } - case FLDPLUS: + + hdrtab = (msgstate == normal) ? NHeaders : RHeaders; + + for (compnum = 1, state = FLD2;;) { + switch (state = m_getfld2(state, &f, in)) { + case FLD2: compnum++; - cp = add(buf, cp); - while (state == FLDPLUS) { - state = m_getfld(state, name, buf, - sizeof(buf), in); - cp = add(buf, cp); - } - putfmt(name, cp, out); - free(cp); + putfmt(f.name, f.value, out); continue; - case BODY: + case BODY2: finish_headers(out); - fprintf(out, "\n%s", buf); - while (state == BODY) { - state = m_getfld(state, name, buf, - sizeof(buf), in); - fputs(buf, out); + fprintf(out, "\n%s", f.value); + while ((state = m_getfld2(state, &f, in)) == BODY2) { + if (f.valuelen >= NAMESZ) { + adios(EX_DATAERR, NULL, "Body contains a to long line"); + } + fputs(f.value, out); } break; - case FILEEOF: + case FILEEOF2: finish_headers(out); break; - case LENERR: - case FMTERR: - adios(NULL, "message format error in component #%d", + case LENERR2: + case FMTERR2: + case IOERR2: + adios(EX_DATAERR, NULL, "message format error in component #%d", compnum); default: - adios(NULL, "getfld() returned %d", state); + adios(EX_SOFTWARE, NULL, "getfld() returned %d", state); } break; } fclose(in); - if (backflg) { - strncpy(buf, m_backup(msg), sizeof(buf)); - if (rename(msg, buf) == NOTOK) - advise(buf, "unable to rename %s to", msg); + if (state != FILEEOF2) { + adios(EX_IOERR, "m_getfld2", "Error while reading body"); } if (debug) { + struct mailname *i = recipients; /* stop here */ - done(0); + puts("----EOM----"); + while (i) { + fputs(i->m_mbox, stdout); + if (i->m_host) { + fputs("@", stdout); + fputs(i->m_host, stdout); + } + fputs("\n", stdout); + i = i->m_next; + mnfree(recipients); + recipients = i; + } + exit(EX_OK); } fclose(out); /* process Fcc */ - for (i=0; im_mbox); + if (recipients->m_host) { + cp = add("@", cp); + cp = add(recipients->m_host, cp); } + *argp++ = cp; + cp = NULL; + recipients = recipients->m_next; + } + *argp = NULL; + execvp(sendmail, sargv); + + if (errno == E2BIG) { + adios(EX_DATAERR, sendmail, "too much arguments, probably to much recipients"); } - execv(sendmail, sargv); - adios(sendmail, "can't exec"); - return 0; /* dead code to satisfy the compiler */ + + adios(EX_OSERR, sendmail, "can't exec"); + return -1; } + /* DRAFT GENERATION */ static void putfmt(char *name, char *str, FILE *out) { int i; - char *cp, *pp; struct headers *hdr; + struct mailname addr_start, *addr_end; + size_t addrc = 0; + ssize_t ret; - while (*str == ' ' || *str == '\t') + addr_end = &addr_start; + addr_end->m_next = NULL; + + /* remove leading whitespace */ + while (*str==' ' || *str=='\t') { str++; + } if ((i = get_header(name, hdrtab)) == NOTOK) { - /* some boring header: push it through */ + /* no header we would care for */ + if (mh_strcasecmp(name, attach_hdr)==0) { + return; + } + if (mh_strcasecmp(name, sign_hdr)==0) { + return; + } + if (mh_strcasecmp(name, enc_hdr)==0) { + return; + } + /* push it through */ fprintf(out, "%s: %s", name, str); return; } - - /* one of the interesting headers */ + /* it's one of the interesting headers */ hdr = &hdrtab[i]; - if (hdr->flags & HIGN) { + + if (hdr->flags & HIGN || strcmp(str, "\n")==0) { return; } + if (hdr->flags & HBAD) { advise(NULL, "illegal header line -- %s:", name); badmsg++; return; } + msgflags |= hdr->set; + if (hdr->flags & HFCC) { + process_fcc(str); + return; + } + if (hdr->flags & HSUB) { - if (subject) { - /* append mupliple subject */ - char *cp = concat(subject, "\t", str, NULL); - free(subject); - subject = cp; - } else { - subject = getcpy(str); - } + subject = mh_xstrdup(str); } - if (hdr->flags & HFCC) { - if ((cp = strrchr(str, '\n'))) { - *cp = '\0'; - } - for (cp = pp = str; (cp = strchr(pp, ',')); pp = cp) { - *cp++ = '\0'; - insert_fcc(hdr->value, pp); - } - insert_fcc(hdr->value, pp); + if (!(hdr->flags & HADR)) { + fprintf(out, "%s: %s", name, str); return; } -#ifdef notdef + if ((ret = getmboxes(str, &addr_end)) < 0) { + adios(EX_DATAERR, NULL, "can't parse address: %s", str); + } + + addrc += ret; + + if (aliasflg) { + addrc += do_aliasing(&addr_start, &addr_end); + } + if (hdr->flags & HBCC) { - insert_bcc(str); + addr_end->m_next = bccs; + bccs = addr_start.m_next; return; } -#endif /* notdef */ - - if (*str != '\n' && *str != '\0') { - if (aliasflg && hdr->flags & HTRY) { - /* - ** this header contains address(es) that we have to do - ** alias expansion on. Because of the saved state in - ** getname we have to put all the addresses into a - ** list. We then let putadr munch on that list, - ** possibly expanding aliases. - **/ - register struct mailname *f = 0; - register struct mailname *mp = 0; - - while ((cp = getname(str))) { - mp = getm(cp, NULL, 0, AD_HOST, NULL); - if (f == 0) { - f = mp; - mp->m_next = mp; - } else { - mp->m_next = f->m_next; - f->m_next = mp; - f = mp; + + if (hdr->set & MFRM) { + struct mailname *mp = NULL; + struct mailname *my = NULL; + + /* needed because the address parser holds global state */ + ismymbox(NULL); + + for (mp = addr_start.m_next; mp; mp = mp->m_next) { + if (ismymbox(mp)) { + msgflags |= MFMM; + if (my == NULL) { + from = my = mp; } } - f = mp->m_next; mp->m_next = 0; - putadr(name, f); - } else { - /* - ** The author(s) of spost decided that alias - ** substitution wasn't necessary for the non-HTRY - ** headers. Unfortunately, one of those headers - ** is "From:", and having alias substitution - ** work on that is extremely useful for someone - ** with a lot of POP3 email accounts or aliases. - ** post supports aliasing of "From:"... - ** - ** Since "From:"-processing is incompletely - ** implemented in this unsupported and - ** undocumented spost backend, I'm not - ** going to take the time to implement my new - ** draft-From:-based email address masquerading. - ** If I do ever implement it here, I'd almost - ** certainly want to implement "From:" line - ** alias processing as well. - ** -- Dan Harkless - */ - fprintf(out, "%s: %s", name, str); } + + if (addrc > 1) { + sender = my; + } + } + + if (!(hdr->flags & HDCC)) { + putadr(name, addr_start.m_next); + } + + if (hdr->flags & HTRY) { + addr_end->m_next = recipients; + recipients = addr_start.m_next; + recipientsc += i; } } @@ -530,28 +475,38 @@ finish_headers(FILE *out) char *resentstr = (msgstate == resent) ? "Resent-" : ""; if (!(msgflags & MDAT)) { - fprintf(out, "%sDate: %s\n", resentstr, dtimenow(0)); + fprintf(out, "%sDate: %s\n", resentstr, dtimenow()); } - strncpy(from, getusername(), sizeof(from)); - if ((cp = getfullname()) && *cp) { - snprintf(signature, sizeof(signature), "%s <%s>", cp, from); + if (sender != NULL) { + snprintf(signature, sizeof(signature), "%s", sender->m_text); + } else if ((cp = context_find("Default-From")) != NULL) { + snprintf(signature, sizeof(signature), "%s", cp); } else { - snprintf(signature, sizeof(signature), "%s", from); + snprintf(from, sizeof(from), "%s@%s", getusername(), LocalName()); + if ((cp = getfullname()) && *cp) { + snprintf(signature, sizeof(signature), "%s <%s>", cp, from); + } else { + snprintf(signature, sizeof(signature), "%s", from); + } } if (!(msgflags & MFRM)) { fprintf(out, "%sFrom: %s\n", resentstr, signature); } else { - /* In case the From: header contains multiple addresses. */ - fprintf(out, "%sSender: %s\n", resentstr, from); + /* + ** Add a Sender: header because the From: header could + ** be fake or contain multiple addresses. + */ + if (!(msgflags & MFMM) || sender != NULL) { + fprintf(out, "%sSender: %s\n", resentstr, signature); + } + } + if (!(msgflags & MVIS)) { + fprintf(out, "%sBcc: undisclosed-recipients:;\n", resentstr); } -#ifdef notdef - if (!(msgflags & MVIS)) - fprintf(out, "%sBcc: Blind Distribution List: ;\n", resentstr); -#endif /* notdef */ - if (badmsg) { - adios(NULL, "re-format message and try again"); + unlink(tmpfil); + adios(EX_DATAERR, NULL, "re-format message and try again"); } } @@ -569,7 +524,6 @@ get_header(char *header, struct headers *table) return (h - table); } } - return NOTOK; } @@ -582,9 +536,9 @@ get_header(char *header, struct headers *table) static void putadr(char *name, struct mailname *nl) { - register struct mailname *mp, *mp2; - register int linepos; - register char *cp; + struct mailname *mp; + char *cp; + int linepos; int namelen; fprintf(out, "%s: ", name); @@ -596,38 +550,18 @@ putadr(char *name, struct mailname *nl) fprintf(out, "\n%s: ", name); linepos = namelen; } - if (mp->m_nohost) { - /* a local name - see if it's an alias */ - cp = akvalue(mp->m_mbox); - if (cp == mp->m_mbox) { - /* wasn't an alias - use what the user typed */ - linepos = putone(mp->m_text, linepos, namelen); - } else { - /* an alias - expand it */ - while ((cp = getname(cp))) { - if (linepos > MAX_SM_FIELD) { - fprintf(out, "\n%s: ", name); - linepos = namelen; - } - mp2 = getm(cp, NULL, 0, AD_HOST, NULL); - if (akvisible()) { - mp2->m_pers = getcpy(mp->m_mbox); - linepos = putone(adrformat(mp2), linepos, namelen); - } else { - linepos = putone(mp2->m_text, - linepos, - namelen); - } - mnfree(mp2); - } + if (mp->m_ingrp) { + if (mp->m_gname != NULL) { + cp = mh_xstrdup(mp->m_gname); + cp = add(";", cp); + linepos = putone(cp, linepos, namelen); + mh_free0(&cp); + cp = NULL; } } else { - /* not a local name - use what the user typed */ linepos = putone(mp->m_text, linepos, namelen); } - mp2 = mp; mp = mp->m_next; - mnfree(mp2); } putc('\n', out); } @@ -635,13 +569,13 @@ putadr(char *name, struct mailname *nl) static int putone(char *adr, int pos, int indent) { - register int len; + int len; static int linepos; len = strlen(adr); - if (pos == indent) + if (pos == indent) { linepos = pos; - else if (linepos+len > OUTPUTLINELEN) { + } else if (linepos+len > OUTPUTLINELEN) { fprintf(out, ",\n%*s", indent, ""); linepos = indent; pos += indent + 2; @@ -657,152 +591,141 @@ putone(char *adr, int pos, int indent) } -/* -** Insert the normalized value from pp into fccfold[]. -*/ static void -insert_fcc(char *name, unsigned char *pp) +process_fcc(char *str) { - unsigned char *cp; - - for (cp = pp; isspace(*cp); cp++) - continue; - for (pp += strlen(pp) - 1; pp > cp && isspace(*pp); pp--) - continue; - if (pp >= cp) - *++pp = '\0'; - if (!*cp) - return; + char *cp, *pp; + int state = 0; - if (fccind >= FCCS) - adios(NULL, "too many %ss", name); - fccfold[fccind++] = getcpy(cp); + if (strlen(str)+strlen(fccs) > sizeof fccs /2) { + adios(EX_DATAERR, NULL, "Too much Fcc data"); + } + /* todo: better have three states: SEPARATOR, PLUS, WORD */ + for (cp=pp=str; *cp; cp++) { + switch (*cp) { + case ' ': + case '\t': + case '\n': + case ',': + if (state != 0) { + state = 0; + *cp = '\0'; + if (*pp=='+' || *pp=='@') { + strcat(fccs, " "); + } else { + strcat(fccs, " +"); + } + strcat(fccs, pp); + } + break; + default: + if (state == 0) { + state = 1; + pp = cp; + } + break; + } + } } -#if 0 -/* BCC GENERATION */ static void -make_bcc_file(void) +fcc(char *file, char *folders) { - pid_t child_id; - int fd, i, status; - char *vec[6]; - FILE * in, *out; - -#ifdef HAVE_MKSTEMP - fd = mkstemp(bccfil); - if (fd == -1 || (out = fdopen(fd, "w")) == NULL) - adios(bccfil, "unable to create"); -#else - mktemp(bccfil); - if ((out = fopen(bccfil, "w")) == NULL) - adios(bccfil, "unable to create"); -#endif - chmod(bccfil, 0600); - - fprintf(out, "Date: %s\n", dtimenow(0)); - if (!(msgflags & MFRM)) { - /* Construct a From: header. */ - fprintf(out, "From: %s\n", signature); - } else { - /* Add a Sender: header in case the From: header is fake. */ - fprintf(out, "Sender: %s\n", from); - } - if (subject) - fprintf(out, "Subject: %s", subject); - fprintf(out, "BCC:\n\n------- Blind-Carbon-Copy\n\n"); - fflush(out); - - if (!filter) { - if ((fd = open(tmpfil, O_RDONLY)) == NOTOK) - adios(NULL, "unable to re-open"); - cpydgst(fd, fileno(out), tmpfil, bccfil); - close(fd); - } else { - vec[0] = mhbasename(mhlproc); - - for (i = 0; (child_id = fork()) == NOTOK && i < 5; i++) - sleep(5); - switch (child_id) { - case NOTOK: - adios("fork", "unable to"); - - case OK: - dup2(fileno(out), 1); - - i = 1; - vec[i++] = "-forward"; - vec[i++] = "-form"; - vec[i++] = filter; - vec[i++] = tmpfil; - vec[i] = NULL; - - execvp(mhlproc, vec); - adios(mhlproc, "unable to exec"); + int status; + char cmd[BUFSIZ]; - default: - if (status = pidwait(child_id, OK)) - admonish(NULL, "%s lost (status=0%o)", - vec[0], status); - break; - } + if (verbose) { + printf("%sFcc: %s\n", msgstate == resent ? "Resent-" : "", + folders); + fflush(stdout); + } + if (100+strlen(file)+strlen(folders) > sizeof cmd) { + adios(EX_DATAERR, NULL, "Too much Fcc data"); + } + /* hack: read from /dev/null and refile(1) won't question us */ + snprintf(cmd, sizeof cmd, "m_next) { + bccdraft = mh_xstrdup(m_mktemp2("/tmp/", invo_name, NULL, &out)); + fprintf(out, "To: %s\n", mp->m_text); + if (from) { + fprintf(out, "From: %s\n", from->m_text); } - break; + fprintf(out, "Subject: [BCC] %s", subject ? subject : ""); + fprintf(out, "%s: %s\n", attach_hdr, origmsg); + fprintf(out, "------------\n"); + fclose(out); + + if (execprogl("send", "send", bccdraft, (char *)NULL) != 0) { + admonish(invo_name, "Problems to send Bcc to %s", + mp->m_text); + unlink(bccdraft); + } + } +} - case OK: - snprintf(fold, sizeof(fold), "%s%s", - *folder == '+' || *folder == '@' ? "" : "+", - folder); - execlp(fileproc, mhbasename(fileproc), - "-link", "-file", file, fold, NULL); - _exit(-1); - - default: - if ((status = pidwait(child_id, OK))) { - if (verbose) { - printf(" errored (0%o)\n", status); +/* + * Do aliasing on a mailname linked list + * Begin at start->m_next + * End if m_next == NULL + * **end is set to the new end. + * Return the number of new mainames in the list + */ + +static size_t +do_aliasing(struct mailname *start, struct mailname **end) +{ + struct mailname *prev, *cur; + char *cp; + size_t i = 0; + ssize_t e; + + prev = start; + cur = prev->m_next; + + while (cur != NULL) { + if (cur->m_nohost) { + cp = akvalue(cur->m_mbox); + if (strcmp(cp, cur->m_mbox) != 0) { + prev->m_next = cur->m_next; + if ((e = getmboxes(cp, &prev)) < 0) { + goto error; + } + i += e; + i -= 1; + mnfree(cur); } else { - fprintf(stderr, " %sFcc %s: errored (0%o)\n", - msgstate == resent ? - "Resent-" : "", folder, - status); + prev = cur; } + } else { + prev = cur; } + cur = prev->m_next; } - - fflush(stdout); + *end = prev; + return i; +error: + adios(EX_CONFIG, NULL, "can't parse alias %s: %s", cur->m_mbox, cp); + return 0; /* not reached */ }