/usr/src/usr.sbin/smtpd/smtpd/../mda.c

Bug Summary

File:	src/usr.sbin/smtpd/smtpd/../mda.c
Warning:	line 141, column 11 The left operand of '!=' is a garbage value

Annotated Source Code

Press '?' to see keyboard shortcuts

Show analyzer invocation

clang -cc1 -cc1 -triple amd64-unknown-openbsd7.4 -analyze -disable-free -clear-ast-before-backend -disable-llvm-verifier -discard-value-names -main-file-name mda.c -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=security.insecureAPI.UncheckedReturn -analyzer-checker=security.insecureAPI.getpw -analyzer-checker=security.insecureAPI.gets -analyzer-checker=security.insecureAPI.mktemp -analyzer-checker=security.insecureAPI.mkstemp -analyzer-checker=security.insecureAPI.vfork -analyzer-checker=nullability.NullPassedToNonnull -analyzer-checker=nullability.NullReturnedFromNonnull -analyzer-output plist -w -setup-static-analyzer -mrelocation-model pic -pic-level 1 -pic-is-pie -mframe-pointer=all -relaxed-aliasing -ffp-contract=on -fno-rounding-math -mconstructor-aliases -funwind-tables=2 -target-cpu x86-64 -target-feature +retpoline-indirect-calls -target-feature +retpoline-indirect-branches -tune-cpu generic -debugger-tuning=gdb -fcoverage-compilation-dir=/usr/src/usr.sbin/smtpd/smtpd/obj -resource-dir /usr/local/llvm16/lib/clang/16 -I /usr/src/usr.sbin/smtpd/smtpd/.. -D IO_TLS -D QUEUE_PROFILING -internal-isystem /usr/local/llvm16/lib/clang/16/include -internal-externc-isystem /usr/include -O2 -fdebug-compilation-dir=/usr/src/usr.sbin/smtpd/smtpd/obj -ferror-limit 19 -fwrapv -D_RET_PROTECTOR -ret-protector -fcf-protection=branch -fno-jump-tables -fgnuc-version=4.2.1 -vectorize-loops -vectorize-slp -fno-builtin-malloc -fno-builtin-calloc -fno-builtin-realloc -fno-builtin-valloc -fno-builtin-free -fno-builtin-strdup -fno-builtin-strndup -analyzer-output=html -faddrsig -D__GCC_HAVE_DWARF2_CFI_ASM=1 -o /home/ben/Projects/scan/2024-01-11-140451-98009-1 -x c /usr/src/usr.sbin/smtpd/smtpd/../mda.c

1/*	$OpenBSD: mda.c,v 1.146 2023/05/31 16:51:46 op Exp $	*/

3/*
* Copyright (c) 2008 Gilles Chehade <gilles@poolp.org>
* Copyright (c) 2008 Pierre-Yves Ritschard <pyr@openbsd.org>
* Copyright (c) 2009 Jacek Masiulaniec <jacekm@dobremiasto.net>
* Copyright (c) 2012 Eric Faurot <eric@openbsd.org>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/

22#include <ctype.h>
23#include <inttypes.h>
24#include <stdlib.h>
25#include <string.h>
26#include <sysexits.h>
27#include <time.h>
28#include <unistd.h>
29#include <vis.h>

31#include "smtpd.h"
32#include "log.h"

34#define MDA_HIWAT65536		65536

36struct mda_envelope {
TAILQ_ENTRY(mda_envelope)struct { struct mda_envelope *tqe_next; struct mda_envelope *
*tqe_prev; }	 entry;
uint64_t			 session_id;
uint64_t			 id;
time_t				 creation;
char				*sender;
char				*rcpt;
char				*dest;
char				*user;
char				*dispatcher;
char				*mda_subaddress;
char				*mda_exec;
48};

50#define USER_WAITINFO0x01	0x01
51#define USER_RUNNABLE0x02	0x02
52#define USER_ONHOLD0x04	0x04
53#define USER_HOLDQ0x08	0x08

55struct mda_user {
uint64_t			id;
TAILQ_ENTRY(mda_user)struct { struct mda_user *tqe_next; struct mda_user **tqe_prev
; }		entry;
TAILQ_ENTRY(mda_user)struct { struct mda_user *tqe_next; struct mda_user **tqe_prev
; }		entry_runnable;
char				name[LOGIN_NAME_MAX32];
char				usertable[PATH_MAX1024];
size_t				evpcount;
TAILQ_HEAD(, mda_envelope)struct { struct mda_envelope *tqh_first; struct mda_envelope *
*tqh_last; }	envelopes;
int				flags;
size_t				running;
struct userinfo			userinfo;
66};

68struct mda_session {
uint64_t		 id;
struct mda_user		*user;
struct mda_envelope	*evp;
struct io		*io;
FILE			*datafp;
74};

76static void mda_io(struct io *, int, void *);
77static int mda_check_loop(FILE *, struct mda_envelope *);
78static int mda_getlastline(int, char *, size_t);
79static void mda_done(struct mda_session *);
80static void mda_fail(struct mda_user *, int, const char *,
  enum enhanced_status_code);
82static void mda_drain(void);
83static void mda_log(const struct mda_envelope *, const char *, const char *);
84static void mda_queue_ok(uint64_t);
85static void mda_queue_tempfail(uint64_t, const char *,
  enum enhanced_status_code);
87static void mda_queue_permfail(uint64_t, const char *, enum enhanced_status_code);
88static void mda_queue_loop(uint64_t);
89static struct mda_user *mda_user(const struct envelope *);
90static void mda_user_free(struct mda_user *);
91static const char *mda_user_to_text(const struct mda_user *);
92static struct mda_envelope *mda_envelope(uint64_t, const struct envelope *);
93static void mda_envelope_free(struct mda_envelope *);
94static struct mda_session * mda_session(struct mda_user *);
95static const char *mda_sysexit_to_str(int);

97static struct tree	sessions;
98static struct tree	users;

100static TAILQ_HEAD(, mda_user)struct { struct mda_user *tqh_first; struct mda_user **tqh_last
; }	runnable;

102void
103mda_imsg(struct mproc *p, struct imsg *imsg)
104{
struct mda_session	*s;
struct mda_user		*u;
struct mda_envelope	*e;
struct envelope		 evp;
struct deliver		 deliver;
struct msg		 m;
const void		*data;
const char		*error, *parent_error, *syserror;
uint64_t		 reqid;
size_t			 sz;
1
'sz' declared without an initial value→
char			 out[256], buf[LINE_MAX2048];
int			 n;
enum lka_resp_status	status;
enum mda_resp_status	mda_status;
int			mda_sysexit;

switch (imsg->hdr.type) {
2
←
Control jumps to 'case IMSG_MDA_LOOKUP_USERINFO:'  at line 122→
case IMSG_MDA_LOOKUP_USERINFO:
m_msg(&m, imsg);
m_get_id(&m, &reqid);
m_get_int(&m, (int *)&status);
if (status == LKA_OK)
3
←
Assuming 'status' is not equal to LKA_OK→
4
←
Taking false branch→
	m_get_data(&m, &data, &sz);
m_end(&m);

u = tree_xget(&users, reqid);

if (status == LKA_TEMPFAIL)
5
←
Assuming 'status' is not equal to LKA_TEMPFAIL→
6
←
Taking false branch→
	mda_fail(u, 0,
	    "Temporary failure in user lookup",
	    ESC_OTHER_ADDRESS_STATUS);
else if (status == LKA_PERMFAIL)
7
←
Assuming 'status' is not equal to LKA_PERMFAIL→
8
←
Taking false branch→
	mda_fail(u, 1,
	    "Permanent failure in user lookup",
	    ESC_DESTINATION_MAILBOX_HAS_MOVED);
else {
	if (sz != sizeof(u->userinfo))
9
←
The left operand of '!=' is a garbage value
		fatalx("mda: userinfo size mismatch");
	memmove(&u->userinfo, data, sz);
	u->flags &= ~USER_WAITINFO0x01;
	u->flags |= USER_RUNNABLE0x02;
	TAILQ_INSERT_TAIL(&runnable, u, entry_runnable)do { (u)->entry_runnable.tqe_next = ((void *)0); (u)->entry_runnable
.tqe_prev = (&runnable)->tqh_last; *(&runnable)->
tqh_last = (u); (&runnable)->tqh_last = &(u)->entry_runnable
.tqe_next; } while (0);
	mda_drain();
}
return;

case IMSG_QUEUE_DELIVER:
m_msg(&m, imsg);
m_get_envelope(&m, &evp);
m_end(&m);

u = mda_user(&evp);

if (u->evpcount >= env->sc_mda_task_hiwat) {
	if (!(u->flags & USER_ONHOLD0x04)) {
		log_debug("debug: mda: hiwat reached for "
		    "user \"%s\": holding envelopes",
		    mda_user_to_text(u));
		u->flags |= USER_ONHOLD0x04;
	}
}

if (u->flags & USER_ONHOLD0x04) {
	u->flags |= USER_HOLDQ0x08;
	m_create(p_queue, IMSG_MDA_DELIVERY_HOLD,
	    0, 0, -1);
	m_add_evpid(p_queue, evp.id);
	m_add_id(p_queue, u->id);
	m_close(p_queue);
	return;
}

e = mda_envelope(u->id, &evp);
TAILQ_INSERT_TAIL(&u->envelopes, e, entry)do { (e)->entry.tqe_next = ((void *)0); (e)->entry.tqe_prev
 = (&u->envelopes)->tqh_last; *(&u->envelopes
)->tqh_last = (e); (&u->envelopes)->tqh_last = &
(e)->entry.tqe_next; } while (0);
u->evpcount += 1;
stat_increment("mda.pending", 1);

if (!(u->flags & USER_RUNNABLE0x02) &&
    !(u->flags & USER_WAITINFO0x01)) {
	u->flags |= USER_RUNNABLE0x02;
	TAILQ_INSERT_TAIL(&runnable, u, entry_runnable)do { (u)->entry_runnable.tqe_next = ((void *)0); (u)->entry_runnable
.tqe_prev = (&runnable)->tqh_last; *(&runnable)->
tqh_last = (u); (&runnable)->tqh_last = &(u)->entry_runnable
.tqe_next; } while (0);
}

mda_drain();
return;

case IMSG_MDA_OPEN_MESSAGE:
m_msg(&m, imsg);
m_get_id(&m, &reqid);
m_end(&m);

s = tree_xget(&sessions, reqid);
e = s->evp;

if (imsg->fd == -1) {
	log_debug("debug: mda: cannot get message fd");
	mda_queue_tempfail(e->id,
	    "Cannot get message fd",
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	mda_log(e, "TempFail", "Cannot get message fd");
	mda_done(s);
	return;
}

log_debug("debug: mda: got message fd %d "
    "for session %016"PRIx64"llx" " evpid %016"PRIx64"llx",
    imsg->fd, s->id, e->id);

if ((s->datafp = fdopen(imsg->fd, "r")) == NULL((void *)0)) {
	log_warn("warn: mda: fdopen");
	close(imsg->fd);
	mda_queue_tempfail(e->id, "fdopen failed",
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	mda_log(e, "TempFail", "fdopen failed");
	mda_done(s);
	return;
}

/* check delivery loop */
if (mda_check_loop(s->datafp, e)) {
	log_debug("debug: mda: loop detected");
	mda_queue_loop(e->id);
	mda_log(e, "PermFail", "Loop detected");
	mda_done(s);
	return;
}

/* start queueing delivery headers */
if (e->sender[0])
	/*
	 * XXX: remove existing Return-Path,
	 * if any
	 */
	n = io_printf(s->io,
	    "Return-Path: <%s>\n"
	    "Delivered-To: %s\n",
	    e->sender,
	    e->rcpt ? e->rcpt : e->dest);
else
	n = io_printf(s->io,
	    "Delivered-To: %s\n",
	    e->rcpt ? e->rcpt : e->dest);
if (n == -1) {
	log_warn("warn: mda: "
	    "fail to write delivery info");
	mda_queue_tempfail(e->id, "Out of memory",
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	mda_log(e, "TempFail", "Out of memory");
	mda_done(s);
	return;
}

/* request parent to fork a helper process */
memset(&deliver, 0, sizeof deliver);
(void)text_to_mailaddr(&deliver.sender, s->evp->sender);
(void)text_to_mailaddr(&deliver.rcpt, s->evp->rcpt);
(void)text_to_mailaddr(&deliver.dest, s->evp->dest);
if (s->evp->mda_exec)
	(void)strlcpy(deliver.mda_exec, s->evp->mda_exec, sizeof deliver.mda_exec);
if (s->evp->mda_subaddress)
	(void)strlcpy(deliver.mda_subaddress, s->evp->mda_subaddress, sizeof deliver.mda_subaddress);
(void)strlcpy(deliver.dispatcher, s->evp->dispatcher, sizeof deliver.dispatcher);
deliver.userinfo = s->user->userinfo;

log_debug("debug: mda: querying mda fd "
    "for session %016"PRIx64"llx" " evpid %016"PRIx64"llx",
    s->id, s->evp->id);

m_create(p_parent, IMSG_MDA_FORK, 0, 0, -1);
m_add_id(p_parent, reqid);
m_add_data(p_parent, &deliver, sizeof(deliver));
m_close(p_parent);
return;

case IMSG_MDA_FORK:
m_msg(&m, imsg);
m_get_id(&m, &reqid);
m_end(&m);

s = tree_xget(&sessions, reqid);
e = s->evp;
if (imsg->fd == -1) {
	log_warn("warn: mda: fail to retrieve mda fd");
	mda_queue_tempfail(e->id, "Cannot get mda fd",
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	mda_log(e, "TempFail", "Cannot get mda fd");
	mda_done(s);
	return;
}

log_debug("debug: mda: got mda fd %d "
    "for session %016"PRIx64"llx" " evpid %016"PRIx64"llx",
    imsg->fd, s->id, s->evp->id);

io_set_nonblocking(imsg->fd);
io_set_fd(s->io, imsg->fd);
io_set_write(s->io);
return;

case IMSG_MDA_DONE:
m_msg(&m, imsg);
m_get_id(&m, &reqid);
m_get_int(&m, (int *)&mda_status);
m_get_int(&m, (int *)&mda_sysexit);
m_get_string(&m, &parent_error);
m_end(&m);

s = tree_xget(&sessions, reqid);
e = s->evp;
/*
 * Grab last line of mda stdout/stderr if available.
 */
out[0] = '\0';
if (imsg->fd != -1)
	mda_getlastline(imsg->fd, out, sizeof(out));

/*
 * Choose between parent's description of error and
 * child's output, the latter having preference over
 * the former.
 */
error = NULL((void *)0);
if (mda_status == MDA_OK) {
	if (s->datafp || (s->io && io_queued(s->io))) {
		error = "mda exited prematurely";
		mda_status = MDA_TEMPFAIL;
	}
} else
	error = out[0] ? out : parent_error;

syserror = NULL((void *)0);
if (mda_sysexit)
	syserror = mda_sysexit_to_str(mda_sysexit);

/* update queue entry */
switch (mda_status) {
case MDA_TEMPFAIL:
	mda_queue_tempfail(e->id, error,
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	(void)snprintf(buf, sizeof buf,
	    "Error (%s%s%s)",
		       syserror ? syserror : "",
		       syserror ? ": " : "",
		       error);
	mda_log(e, "TempFail", buf);
	break;
case MDA_PERMFAIL:
	mda_queue_permfail(e->id, error,
	    ESC_OTHER_MAIL_SYSTEM_STATUS);
	(void)snprintf(buf, sizeof buf,
	    "Error (%s%s%s)",
		       syserror ? syserror : "",
		       syserror ? ": " : "",
		       error);
	mda_log(e, "PermFail", buf);
	break;
case MDA_OK:
	mda_queue_ok(e->id);
	mda_log(e, "Ok", "Delivered");
	break;
}
mda_done(s);
return;
}

fatalx("mda_imsg: unexpected %s imsg", imsg_to_str(imsg->hdr.type));
371}

373void
374mda_postfork(void)
375{
376}

378void
379mda_postprivdrop(void)
380{
tree_init(&sessions)do { do { (&((&sessions)->tree))->sph_root = ((
void *)0); } while (0); (&sessions)->count = 0; } while
(0);
tree_init(&users)do { do { (&((&users)->tree))->sph_root = ((void
 *)0); } while (0); (&users)->count = 0; } while(0);
TAILQ_INIT(&runnable)do { (&runnable)->tqh_first = ((void *)0); (&runnable
)->tqh_last = &(&runnable)->tqh_first; } while (
0);
384}

386static void
387mda_io(struct io *io, int evt, void *arg)
388{
struct mda_session	*s = arg;
char			*ln = NULL((void *)0);
size_t			 sz = 0;
ssize_t			 len;

log_trace(TRACE_IO, "mda: %p: %s %s", s, io_strevent(evt),do { if (tracing & (0x0004)) log_trace0("mda: %p: %s %s",
 s, io_strevent(evt), io_strio(io)); } while (0)
   io_strio(io))do { if (tracing & (0x0004)) log_trace0("mda: %p: %s %s",
 s, io_strevent(evt), io_strio(io)); } while (0);

switch (evt) {
case IO_LOWAT:

/* done */
done:
if (s->datafp == NULL((void *)0)) {
	log_debug("debug: mda: all data sent for session"
	    " %016"PRIx64"llx" " evpid %016"PRIx64"llx",
	    s->id, s->evp->id);
	io_free(io);
	s->io = NULL((void *)0);
	return;
}

while (io_queued(s->io) < MDA_HIWAT65536) {
	if ((len = getline(&ln, &sz, s->datafp)) == -1)
		break;
	if (io_write(s->io, ln, len) == -1) {
		m_create(p_parent, IMSG_MDA_KILL,
		    0, 0, -1);
		m_add_id(p_parent, s->id);
		m_add_string(p_parent, "Out of memory");
		m_close(p_parent);
		io_pause(io, IO_OUT0x02);
		free(ln);
		return;
	}
}

free(ln);
ln = NULL((void *)0);
if (ferror(s->datafp)(!__isthreaded ? (((s->datafp)->_flags & 0x0040) !=
 0) : (ferror)(s->datafp))) {
	log_debug("debug: mda: ferror on session %016"PRIx64"llx",
	    s->id);
	m_create(p_parent, IMSG_MDA_KILL, 0, 0, -1);
	m_add_id(p_parent, s->id);
	m_add_string(p_parent, "Error reading body");
	m_close(p_parent);
	io_pause(io, IO_OUT0x02);
	return;
}

if (feof(s->datafp)(!__isthreaded ? (((s->datafp)->_flags & 0x0020) !=
 0) : (feof)(s->datafp))) {
	log_debug("debug: mda: end-of-file for session"
	    " %016"PRIx64"llx" " evpid %016"PRIx64"llx",
	    s->id, s->evp->id);
	fclose(s->datafp);
	s->datafp = NULL((void *)0);
	if (io_queued(s->io) == 0)
		goto done;
}
return;

case IO_TIMEOUT:
log_debug("debug: mda: timeout on session %016"PRIx64"llx", s->id);
io_pause(io, IO_OUT0x02);
return;

case IO_ERROR:
log_debug("debug: mda: io error on session %016"PRIx64"llx"": %s",
    s->id, io_error(io));
io_pause(io, IO_OUT0x02);
return;

case IO_DISCONNECTED:
log_debug("debug: mda: io disconnected on session %016"PRIx64"llx",
    s->id);
io_pause(io, IO_OUT0x02);
return;

default:
log_debug("debug: mda: unexpected event on session %016"PRIx64"llx",
    s->id);
io_pause(io, IO_OUT0x02);
return;
}
473}

475static int
476mda_check_loop(FILE *fp, struct mda_envelope *e)
477{
char		*buf = NULL((void *)0);
size_t		 sz = 0;
ssize_t		 len;
int		 ret = 0;

while ((len = getline(&buf, &sz, fp)) != -1) {
if (buf[len - 1] == '\n')
	buf[len - 1] = '\0';

if (strchr(buf, ':') == NULL((void *)0) && !isspace((unsigned char)*buf))
	break;

if (strncasecmp("Delivered-To: ", buf, 14) == 0) {
	if (strcasecmp(buf + 14, e->dest) == 0) {
		ret = 1;
		break;
	}
}
}

free(buf);
fseek(fp, SEEK_SET0, 0);
return (ret);
501}

503static int
504mda_getlastline(int fd, char *dst, size_t dstsz)
505{
FILE	*fp;
char	*ln = NULL((void *)0);
size_t	 sz = 0;
ssize_t	 len;
int	 out = 0;

if (lseek(fd, 0, SEEK_SET0) == -1) {
log_warn("warn: mda: lseek");
close(fd);
return (-1);
}
fp = fdopen(fd, "r");
if (fp == NULL((void *)0)) {
log_warn("warn: mda: fdopen");
close(fd);
return (-1);
}
while ((len = getline(&ln, &sz, fp)) != -1) {
if (ln[len - 1] == '\n')
	ln[len - 1] = '\0';
out = 1;
}
fclose(fp);

if (out) {
(void)strlcpy(dst, "\"", dstsz);
(void)strnvis(dst + 1, ln, dstsz - 2, VIS_SAFE0x20 | VIS_CSTYLE0x02 | VIS_NL0x10);
(void)strlcat(dst, "\"", dstsz);
}

free(ln);
return (0);
538}

540static void
541mda_fail(struct mda_user *user, int permfail, const char *error,
  enum enhanced_status_code code)
543{
struct mda_envelope	*e;

while ((e = TAILQ_FIRST(&user->envelopes)((&user->envelopes)->tqh_first))) {
TAILQ_REMOVE(&user->envelopes, e, entry)do { if (((e)->entry.tqe_next) != ((void *)0)) (e)->entry
.tqe_next->entry.tqe_prev = (e)->entry.tqe_prev; else (
&user->envelopes)->tqh_last = (e)->entry.tqe_prev
; *(e)->entry.tqe_prev = (e)->entry.tqe_next; ; ; } while
 (0);
if (permfail) {
	mda_log(e, "PermFail", error);
	mda_queue_permfail(e->id, error, code);
}
else {
	mda_log(e, "TempFail", error);
	mda_queue_tempfail(e->id, error, code);
}
mda_envelope_free(e);
}

mda_user_free(user);
560}

562static void
563mda_drain(void)
564{
struct mda_user		*u;

while ((u = (TAILQ_FIRST(&runnable)((&runnable)->tqh_first)))) {

TAILQ_REMOVE(&runnable, u, entry_runnable)do { if (((u)->entry_runnable.tqe_next) != ((void *)0)) (u
)->entry_runnable.tqe_next->entry_runnable.tqe_prev = (
u)->entry_runnable.tqe_prev; else (&runnable)->tqh_last
 = (u)->entry_runnable.tqe_prev; *(u)->entry_runnable.tqe_prev
 = (u)->entry_runnable.tqe_next; ; ; } while (0);

if (u->evpcount == 0 && u->running == 0) {
	log_debug("debug: mda: all done for user \"%s\"",
	    mda_user_to_text(u));
	mda_user_free(u);
	continue;
}

if (u->evpcount == 0) {
	log_debug("debug: mda: no more envelope for \"%s\"",
	    mda_user_to_text(u));
	u->flags &= ~USER_RUNNABLE0x02;
	continue;
}

if (u->running >= env->sc_mda_max_user_session) {
	log_debug("debug: mda: "
	    "maximum number of session reached for user \"%s\"",
	    mda_user_to_text(u));
	u->flags &= ~USER_RUNNABLE0x02;
	continue;
}

if (tree_count(&sessions)((&sessions)->count) >= env->sc_mda_max_session) {
	log_debug("debug: mda: "
	    "maximum number of session reached");
	TAILQ_INSERT_HEAD(&runnable, u, entry_runnable)do { if (((u)->entry_runnable.tqe_next = (&runnable)->
tqh_first) != ((void *)0)) (&runnable)->tqh_first->
entry_runnable.tqe_prev = &(u)->entry_runnable.tqe_next
; else (&runnable)->tqh_last = &(u)->entry_runnable
.tqe_next; (&runnable)->tqh_first = (u); (u)->entry_runnable
.tqe_prev = &(&runnable)->tqh_first; } while (0);
	return;
}

mda_session(u);

if (u->evpcount == env->sc_mda_task_lowat) {
	if (u->flags & USER_ONHOLD0x04) {
		log_debug("debug: mda: down to lowat for user "
		    "\"%s\": releasing",
		    mda_user_to_text(u));
		u->flags &= ~USER_ONHOLD0x04;
	}
	if (u->flags & USER_HOLDQ0x08) {
		m_create(p_queue, IMSG_MDA_HOLDQ_RELEASE,
		    0, 0, -1);
		m_add_id(p_queue, u->id);
		m_add_int(p_queue, env->sc_mda_task_release);
		m_close(p_queue);
	}
}

/* re-add the user at the tail of the queue */
TAILQ_INSERT_TAIL(&runnable, u, entry_runnable)do { (u)->entry_runnable.tqe_next = ((void *)0); (u)->entry_runnable
.tqe_prev = (&runnable)->tqh_last; *(&runnable)->
tqh_last = (u); (&runnable)->tqh_last = &(u)->entry_runnable
.tqe_next; } while (0);
}
621}

623static void
624mda_done(struct mda_session *s)
625{
log_debug("debug: mda: session %016" PRIx64"llx" " done", s->id);

tree_xpop(&sessions, s->id);

mda_envelope_free(s->evp);

s->user->running--;
if (!(s->user->flags & USER_RUNNABLE0x02)) {
log_debug("debug: mda: user \"%s\" becomes runnable",
    s->user->name);
TAILQ_INSERT_TAIL(&runnable, s->user, entry_runnable)do { (s->user)->entry_runnable.tqe_next = ((void *)0); (
s->user)->entry_runnable.tqe_prev = (&runnable)->
tqh_last; *(&runnable)->tqh_last = (s->user); (&
runnable)->tqh_last = &(s->user)->entry_runnable
.tqe_next; } while (0);
s->user->flags |= USER_RUNNABLE0x02;
}

if (s->datafp)
fclose(s->datafp);
if (s->io)
io_free(s->io);

free(s);

stat_decrement("mda.running", 1);

mda_drain();
650}

652static void
653mda_log(const struct mda_envelope *evp, const char *prefix, const char *status)
654{
char rcpt[LINE_MAX2048];

rcpt[0] = '\0';
if (evp->rcpt)
(void)snprintf(rcpt, sizeof rcpt, "rcpt=<%s> ", evp->rcpt);

log_info("%016"PRIx64"llx"" mda delivery evpid=%016" PRIx64"llx" " from=<%s> to=<%s> "
   "%suser=%s delay=%s result=%s stat=%s",
   evp->session_id,
   evp->id,
   evp->sender ? evp->sender : "",
   evp->dest,
   rcpt,
   evp->user,
   duration_to_text(time(NULL((void *)0)) - evp->creation),
   prefix,
   status);
672}

674static void
675mda_queue_ok(uint64_t evpid)
676{
m_create(p_queue, IMSG_MDA_DELIVERY_OK, 0, 0, -1);
m_add_evpid(p_queue, evpid);
m_close(p_queue);
680}

682static void
683mda_queue_tempfail(uint64_t evpid, const char *reason,
  enum enhanced_status_code code)
685{
m_create(p_queue, IMSG_MDA_DELIVERY_TEMPFAIL, 0, 0, -1);
m_add_evpid(p_queue, evpid);
m_add_string(p_queue, reason);
m_add_int(p_queue, (int)code);
m_close(p_queue);
691}

693static void
694mda_queue_permfail(uint64_t evpid, const char *reason,
  enum enhanced_status_code code)
696{
m_create(p_queue, IMSG_MDA_DELIVERY_PERMFAIL, 0, 0, -1);
m_add_evpid(p_queue, evpid);
m_add_string(p_queue, reason);
m_add_int(p_queue, (int)code);
m_close(p_queue);
702}

704static void
705mda_queue_loop(uint64_t evpid)
706{
m_create(p_queue, IMSG_MDA_DELIVERY_LOOP, 0, 0, -1);
m_add_evpid(p_queue, evpid);
m_close(p_queue);
710}

712static struct mda_user *
713mda_user(const struct envelope *evp)
714{
struct dispatcher *dsp;
struct mda_user	*u;
void		*i;

i = NULL((void *)0);
dsp = dict_xget(env->sc_dispatchers, evp->dispatcher);
while (tree_iter(&users, &i, NULL((void *)0), (void**)(&u))) {
if (!strcmp(evp->mda_user, u->name) &&
    !strcmp(dsp->u.local.table_userbase, u->usertable))
	return (u);
}

u = xcalloc(1, sizeof *u);
u->id = generate_uid();
TAILQ_INIT(&u->envelopes)do { (&u->envelopes)->tqh_first = ((void *)0); (&
u->envelopes)->tqh_last = &(&u->envelopes)->
tqh_first; } while (0);
(void)strlcpy(u->name, evp->mda_user, sizeof(u->name));
(void)strlcpy(u->usertable, dsp->u.local.table_userbase,
   sizeof(u->usertable));

tree_xset(&users, u->id, u);

m_create(p_lka, IMSG_MDA_LOOKUP_USERINFO, 0, 0, -1);
m_add_id(p_lka, u->id);
m_add_string(p_lka, dsp->u.local.table_userbase);
m_add_string(p_lka, evp->mda_user);
m_close(p_lka);
u->flags |= USER_WAITINFO0x01;

stat_increment("mda.user", 1);

if (dsp->u.local.user)
log_debug("mda: new user %016" PRIx64"llx"
    " for \"%s\" delivering as \"%s\"",
    u->id, mda_user_to_text(u), dsp->u.local.user);
else
log_debug("mda: new user %016" PRIx64"llx"
    " for \"%s\"", u->id, mda_user_to_text(u));

return (u);
754}

756static void
757mda_user_free(struct mda_user *u)
758{
tree_xpop(&users, u->id);

if (u->flags & USER_HOLDQ0x08) {
m_create(p_queue, IMSG_MDA_HOLDQ_RELEASE, 0, 0, -1);
m_add_id(p_queue, u->id);
m_add_int(p_queue, 0);
m_close(p_queue);
}

free(u);
stat_decrement("mda.user", 1);
770}

772static const char *
773mda_user_to_text(const struct mda_user *u)
774{
static char buf[1024];

(void)snprintf(buf, sizeof(buf), "%s:%s", u->usertable, u->name);

return (buf);
780}

782static struct mda_envelope *
783mda_envelope(uint64_t session_id, const struct envelope *evp)
784{
struct mda_envelope	*e;
char			 buf[LINE_MAX2048];

e = xcalloc(1, sizeof *e);
e->session_id = session_id;
e->id = evp->id;
e->creation = evp->creation;
buf[0] = '\0';
if (evp->sender.user[0] && evp->sender.domain[0])
(void)snprintf(buf, sizeof buf, "%s@%s",
    evp->sender.user, evp->sender.domain);
e->sender = xstrdup(buf);
(void)snprintf(buf, sizeof buf, "%s@%s", evp->dest.user,
   evp->dest.domain);
e->dest = xstrdup(buf);
(void)snprintf(buf, sizeof buf, "%s@%s", evp->rcpt.user,
   evp->rcpt.domain);
e->rcpt = xstrdup(buf);
e->user = evp->mda_user[0] ?
   xstrdup(evp->mda_user) : xstrdup(evp->dest.user);
e->dispatcher = xstrdup(evp->dispatcher);
if (evp->mda_exec[0])
e->mda_exec = xstrdup(evp->mda_exec);
if (evp->mda_subaddress[0])
e->mda_subaddress = xstrdup(evp->mda_subaddress);
stat_increment("mda.envelope", 1);
return (e);
812}

814static void
815mda_envelope_free(struct mda_envelope *e)
816{
free(e->sender);
free(e->dest);
free(e->rcpt);
free(e->user);
free(e->mda_exec);
free(e);

stat_decrement("mda.envelope", 1);
825}

827static struct mda_session *
828mda_session(struct mda_user * u)
829{
struct mda_session *s;

s = xcalloc(1, sizeof *s);
s->id = generate_uid();
s->user = u;
s->io = io_new();
io_set_callback(s->io, mda_io, s);

tree_xset(&sessions, s->id, s);

s->evp = TAILQ_FIRST(&u->envelopes)((&u->envelopes)->tqh_first);
TAILQ_REMOVE(&u->envelopes, s->evp, entry)do { if (((s->evp)->entry.tqe_next) != ((void *)0)) (s->
evp)->entry.tqe_next->entry.tqe_prev = (s->evp)->
entry.tqe_prev; else (&u->envelopes)->tqh_last = (s
->evp)->entry.tqe_prev; *(s->evp)->entry.tqe_prev
 = (s->evp)->entry.tqe_next; ; ; } while (0);
u->evpcount--;
u->running++;

stat_decrement("mda.pending", 1);
stat_increment("mda.running", 1);

log_debug("debug: mda: new session %016" PRIx64"llx"
   " for user \"%s\" evpid %016" PRIx64"llx", s->id,
   mda_user_to_text(u), s->evp->id);

m_create(p_queue, IMSG_MDA_OPEN_MESSAGE, 0, 0, -1);
m_add_id(p_queue, s->id);
m_add_msgid(p_queue, evpid_to_msgid(s->evp->id));
m_close(p_queue);

return (s);
858}

860static const char *
861mda_sysexit_to_str(int sysexit)
862{
switch (sysexit) {
case EX_USAGE64:
return "command line usage error";
case EX_DATAERR65:
return "data format error";
case EX_NOINPUT66:
return "cannot open input";
case EX_NOUSER67:
return "user unknown";
case EX_NOHOST68:
return "host name unknown";
case EX_UNAVAILABLE69:
return "service unavailable";
case EX_SOFTWARE70:
return "internal software error";
case EX_OSERR71:
return "system resource problem";
case EX_OSFILE72:
return "critical OS file missing";
case EX_CANTCREAT73:
return "can't create user output file";
case EX_IOERR74:
return "input/output error";
case EX_TEMPFAIL75:
return "temporary failure";
case EX_PROTOCOL76:
return "remote error in protocol";
case EX_NOPERM77:
return "permission denied";
case EX_CONFIG78:
return "local configuration error";
default:
break;
}
return NULL((void *)0);
898}
