xref: /freebsd/contrib/sendmail/src/daemon.c (revision 6f9c8e5b074419423648ffb89b83fd2f257e90b7)
1c2aa98e2SPeter Wemm /*
2*6f9c8e5bSGregory Neil Shapiro  * Copyright (c) 1998-2007, 2009, 2010 Sendmail, Inc. and its suppliers.
306f25ae9SGregory Neil Shapiro  *	All rights reserved.
4c2aa98e2SPeter Wemm  * Copyright (c) 1983, 1995-1997 Eric P. Allman.  All rights reserved.
5c2aa98e2SPeter Wemm  * Copyright (c) 1988, 1993
6c2aa98e2SPeter Wemm  *	The Regents of the University of California.  All rights reserved.
7c2aa98e2SPeter Wemm  *
8c2aa98e2SPeter Wemm  * By using this file, you agree to the terms and conditions set
9c2aa98e2SPeter Wemm  * forth in the LICENSE file which can be found at the top level of
10c2aa98e2SPeter Wemm  * the sendmail distribution.
11c2aa98e2SPeter Wemm  *
12c2aa98e2SPeter Wemm  */
13c2aa98e2SPeter Wemm 
1406f25ae9SGregory Neil Shapiro #include <sendmail.h>
15d0cef73dSGregory Neil Shapiro #include "map.h"
1606f25ae9SGregory Neil Shapiro 
17*6f9c8e5bSGregory Neil Shapiro SM_RCSID("@(#)$Id: daemon.c,v 8.691 2011/01/25 18:31:30 ca Exp $")
18c2aa98e2SPeter Wemm 
19c2aa98e2SPeter Wemm #if defined(SOCK_STREAM) || defined(__GNU_LIBRARY__)
20c2aa98e2SPeter Wemm # define USE_SOCK_STREAM	1
2106f25ae9SGregory Neil Shapiro #endif /* defined(SOCK_STREAM) || defined(__GNU_LIBRARY__) */
22c2aa98e2SPeter Wemm 
2340266059SGregory Neil Shapiro #if defined(USE_SOCK_STREAM)
2406f25ae9SGregory Neil Shapiro # if NETINET || NETINET6
25c2aa98e2SPeter Wemm #  include <arpa/inet.h>
2606f25ae9SGregory Neil Shapiro # endif /* NETINET || NETINET6 */
27c2aa98e2SPeter Wemm # if NAMED_BIND
28c2aa98e2SPeter Wemm #  ifndef NO_DATA
29c2aa98e2SPeter Wemm #   define NO_DATA	NO_ADDRESS
3006f25ae9SGregory Neil Shapiro #  endif /* ! NO_DATA */
3106f25ae9SGregory Neil Shapiro # endif /* NAMED_BIND */
3240266059SGregory Neil Shapiro #endif /* defined(USE_SOCK_STREAM) */
33c2aa98e2SPeter Wemm 
3442e5d165SGregory Neil Shapiro #if STARTTLS
3542e5d165SGregory Neil Shapiro #  include <openssl/rand.h>
3642e5d165SGregory Neil Shapiro #endif /* STARTTLS */
3742e5d165SGregory Neil Shapiro 
384e4196cbSGregory Neil Shapiro #include <sm/time.h>
39c2aa98e2SPeter Wemm 
4006f25ae9SGregory Neil Shapiro #if IP_SRCROUTE && NETINET
41c2aa98e2SPeter Wemm # include <netinet/in_systm.h>
42c2aa98e2SPeter Wemm # include <netinet/ip.h>
4306f25ae9SGregory Neil Shapiro # if HAS_IN_H
4406f25ae9SGregory Neil Shapiro #  include <netinet/in.h>
4506f25ae9SGregory Neil Shapiro #  ifndef IPOPTION
4606f25ae9SGregory Neil Shapiro #   define IPOPTION	ip_opts
4706f25ae9SGregory Neil Shapiro #   define IP_LIST	ip_opts
4806f25ae9SGregory Neil Shapiro #   define IP_DST	ip_dst
4906f25ae9SGregory Neil Shapiro #  endif /* ! IPOPTION */
5006f25ae9SGregory Neil Shapiro # else /* HAS_IN_H */
51c2aa98e2SPeter Wemm #  include <netinet/ip_var.h>
5206f25ae9SGregory Neil Shapiro #  ifndef IPOPTION
5306f25ae9SGregory Neil Shapiro #   define IPOPTION	ipoption
5406f25ae9SGregory Neil Shapiro #   define IP_LIST	ipopt_list
5506f25ae9SGregory Neil Shapiro #   define IP_DST	ipopt_dst
5606f25ae9SGregory Neil Shapiro #  endif /* ! IPOPTION */
5706f25ae9SGregory Neil Shapiro # endif /* HAS_IN_H */
5806f25ae9SGregory Neil Shapiro #endif /* IP_SRCROUTE && NETINET */
5906f25ae9SGregory Neil Shapiro 
6040266059SGregory Neil Shapiro #include <sm/fdset.h>
6140266059SGregory Neil Shapiro 
62d0cef73dSGregory Neil Shapiro #define DAEMON_C 1
63d0cef73dSGregory Neil Shapiro #include <daemon.h>
6413d88268SGregory Neil Shapiro 
65b6bacd31SGregory Neil Shapiro static void		connecttimeout __P((int));
6640266059SGregory Neil Shapiro static int		opendaemonsocket __P((DAEMON_T *, bool));
6740266059SGregory Neil Shapiro static unsigned short	setupdaemon __P((SOCKADDR *));
6840266059SGregory Neil Shapiro static void		getrequests_checkdiskspace __P((ENVELOPE *e));
69b6bacd31SGregory Neil Shapiro static void		setsockaddroptions __P((char *, DAEMON_T *));
70b6bacd31SGregory Neil Shapiro static void		printdaemonflags __P((DAEMON_T *));
71b6bacd31SGregory Neil Shapiro static int		addr_family __P((char *));
72b6bacd31SGregory Neil Shapiro static int		addrcmp __P((struct hostent *, char *, SOCKADDR *));
73b6bacd31SGregory Neil Shapiro static void		authtimeout __P((int));
74c2aa98e2SPeter Wemm 
75c2aa98e2SPeter Wemm /*
76c2aa98e2SPeter Wemm **  DAEMON.C -- routines to use when running as a daemon.
77c2aa98e2SPeter Wemm **
78c2aa98e2SPeter Wemm **	This entire file is highly dependent on the 4.2 BSD
79c2aa98e2SPeter Wemm **	interprocess communication primitives.  No attempt has
80c2aa98e2SPeter Wemm **	been made to make this file portable to Version 7,
81c2aa98e2SPeter Wemm **	Version 6, MPX files, etc.  If you should try such a
82c2aa98e2SPeter Wemm **	thing yourself, I recommend chucking the entire file
83c2aa98e2SPeter Wemm **	and starting from scratch.  Basic semantics are:
84c2aa98e2SPeter Wemm **
85c2aa98e2SPeter Wemm **	getrequests(e)
86c2aa98e2SPeter Wemm **		Opens a port and initiates a connection.
87c2aa98e2SPeter Wemm **		Returns in a child.  Must set InChannel and
88c2aa98e2SPeter Wemm **		OutChannel appropriately.
89c2aa98e2SPeter Wemm **	clrdaemon()
90c2aa98e2SPeter Wemm **		Close any open files associated with getting
91c2aa98e2SPeter Wemm **		the connection; this is used when running the queue,
92c2aa98e2SPeter Wemm **		etc., to avoid having extra file descriptors during
93c2aa98e2SPeter Wemm **		the queue run and to avoid confusing the network
94c2aa98e2SPeter Wemm **		code (if it cares).
9540266059SGregory Neil Shapiro **	makeconnection(host, port, mci, e, enough)
96c2aa98e2SPeter Wemm **		Make a connection to the named host on the given
9740266059SGregory Neil Shapiro **		port. Returns zero on success, else an exit status
9840266059SGregory Neil Shapiro **		describing the error.
99c2aa98e2SPeter Wemm **	host_map_lookup(map, hbuf, avp, pstat)
100c2aa98e2SPeter Wemm **		Convert the entry in hbuf into a canonical form.
101c2aa98e2SPeter Wemm */
10206f25ae9SGregory Neil Shapiro 
10340266059SGregory Neil Shapiro static int	NDaemons = 0;			/* actual number of daemons */
10406f25ae9SGregory Neil Shapiro 
10540266059SGregory Neil Shapiro static time_t	NextDiskSpaceCheck = 0;
10606f25ae9SGregory Neil Shapiro 
10740266059SGregory Neil Shapiro /*
108c2aa98e2SPeter Wemm **  GETREQUESTS -- open mail IPC port and get requests.
109c2aa98e2SPeter Wemm **
110c2aa98e2SPeter Wemm **	Parameters:
111c2aa98e2SPeter Wemm **		e -- the current envelope.
112c2aa98e2SPeter Wemm **
113c2aa98e2SPeter Wemm **	Returns:
11406f25ae9SGregory Neil Shapiro **		pointer to flags.
115c2aa98e2SPeter Wemm **
116c2aa98e2SPeter Wemm **	Side Effects:
117c2aa98e2SPeter Wemm **		Waits until some interesting activity occurs.  When
118c2aa98e2SPeter Wemm **		it does, a child is created to process it, and the
119c2aa98e2SPeter Wemm **		parent waits for completion.  Return from this
120c2aa98e2SPeter Wemm **		routine is always in the child.  The file pointers
121c2aa98e2SPeter Wemm **		"InChannel" and "OutChannel" should be set to point
122c2aa98e2SPeter Wemm **		to the communication channel.
12340266059SGregory Neil Shapiro **		May restart persistent queue runners if they have ended
12440266059SGregory Neil Shapiro **		for some reason.
125c2aa98e2SPeter Wemm */
126c2aa98e2SPeter Wemm 
12706f25ae9SGregory Neil Shapiro BITMAP256 *
128c2aa98e2SPeter Wemm getrequests(e)
129c2aa98e2SPeter Wemm 	ENVELOPE *e;
130c2aa98e2SPeter Wemm {
131c2aa98e2SPeter Wemm 	int t;
13206f25ae9SGregory Neil Shapiro 	int idx, curdaemon = -1;
13306f25ae9SGregory Neil Shapiro 	int i, olddaemon = 0;
134c2aa98e2SPeter Wemm #if XDEBUG
135c2aa98e2SPeter Wemm 	bool j_has_dot;
13606f25ae9SGregory Neil Shapiro #endif /* XDEBUG */
137065a643dSPeter Wemm 	char status[MAXLINE];
13806f25ae9SGregory Neil Shapiro 	SOCKADDR sa;
139d0cef73dSGregory Neil Shapiro 	SOCKADDR_LEN_T len = sizeof(sa);
140605302a5SGregory Neil Shapiro #if _FFR_QUEUE_RUN_PARANOIA
141605302a5SGregory Neil Shapiro 	time_t lastrun;
142605302a5SGregory Neil Shapiro #endif /* _FFR_QUEUE_RUN_PARANOIA */
14306f25ae9SGregory Neil Shapiro # if NETUNIX
144065a643dSPeter Wemm 	extern int ControlSocket;
14506f25ae9SGregory Neil Shapiro # endif /* NETUNIX */
14606f25ae9SGregory Neil Shapiro 	extern ENVELOPE BlankEnvelope;
147c2aa98e2SPeter Wemm 
14806f25ae9SGregory Neil Shapiro 
149323f6dcbSGregory Neil Shapiro 	/* initialize data for function that generates queue ids */
150323f6dcbSGregory Neil Shapiro 	init_qid_alg();
15140266059SGregory Neil Shapiro 	for (idx = 0; idx < NDaemons; idx++)
152c2aa98e2SPeter Wemm 	{
15306f25ae9SGregory Neil Shapiro 		Daemons[idx].d_port = setupdaemon(&(Daemons[idx].d_addr));
15440266059SGregory Neil Shapiro 		Daemons[idx].d_firsttime = true;
15506f25ae9SGregory Neil Shapiro 		Daemons[idx].d_refuse_connections_until = (time_t) 0;
156c2aa98e2SPeter Wemm 	}
157193538b7SGregory Neil Shapiro 
158c2aa98e2SPeter Wemm 	/*
159c2aa98e2SPeter Wemm 	**  Try to actually open the connection.
160c2aa98e2SPeter Wemm 	*/
161c2aa98e2SPeter Wemm 
162c2aa98e2SPeter Wemm 	if (tTd(15, 1))
16306f25ae9SGregory Neil Shapiro 	{
16440266059SGregory Neil Shapiro 		for (idx = 0; idx < NDaemons; idx++)
165193538b7SGregory Neil Shapiro 		{
16640266059SGregory Neil Shapiro 			sm_dprintf("getrequests: daemon %s: port %d\n",
16706f25ae9SGregory Neil Shapiro 				   Daemons[idx].d_name,
16806f25ae9SGregory Neil Shapiro 				   ntohs(Daemons[idx].d_port));
16906f25ae9SGregory Neil Shapiro 		}
170193538b7SGregory Neil Shapiro 	}
171c2aa98e2SPeter Wemm 
172c2aa98e2SPeter Wemm 	/* get a socket for the SMTP connection */
17340266059SGregory Neil Shapiro 	for (idx = 0; idx < NDaemons; idx++)
17440266059SGregory Neil Shapiro 		Daemons[idx].d_socksize = opendaemonsocket(&Daemons[idx], true);
175c2aa98e2SPeter Wemm 
176065a643dSPeter Wemm 	if (opencontrolsocket() < 0)
177065a643dSPeter Wemm 		sm_syslog(LOG_WARNING, NOQID,
1782e43090eSPeter Wemm 			  "daemon could not open control socket %s: %s",
17940266059SGregory Neil Shapiro 			  ControlSocketName, sm_errstring(errno));
180065a643dSPeter Wemm 
18140266059SGregory Neil Shapiro 	/* If there are any queue runners released reapchild() co-ord's */
18240266059SGregory Neil Shapiro 	(void) sm_signal(SIGCHLD, reapchild);
1838774250cSGregory Neil Shapiro 
18440266059SGregory Neil Shapiro 	/* write the pid to file, command line args to syslog */
18506f25ae9SGregory Neil Shapiro 	log_sendmail_pid(e);
186c2aa98e2SPeter Wemm 
187c2aa98e2SPeter Wemm #if XDEBUG
188c2aa98e2SPeter Wemm 	{
189c2aa98e2SPeter Wemm 		char jbuf[MAXHOSTNAMELEN];
190c2aa98e2SPeter Wemm 
191d0cef73dSGregory Neil Shapiro 		expand("\201j", jbuf, sizeof(jbuf), e);
192c2aa98e2SPeter Wemm 		j_has_dot = strchr(jbuf, '.') != NULL;
193c2aa98e2SPeter Wemm 	}
19406f25ae9SGregory Neil Shapiro #endif /* XDEBUG */
195c2aa98e2SPeter Wemm 
196065a643dSPeter Wemm 	/* Add parent process as first item */
197e92d3f3fSGregory Neil Shapiro 	proc_list_add(CurrentPid, "Sendmail daemon", PROC_DAEMON, 0, -1, NULL);
198065a643dSPeter Wemm 
199c2aa98e2SPeter Wemm 	if (tTd(15, 1))
20006f25ae9SGregory Neil Shapiro 	{
20140266059SGregory Neil Shapiro 		for (idx = 0; idx < NDaemons; idx++)
2029bd497b8SGregory Neil Shapiro 			sm_dprintf("getrequests: daemon %s: socket %d\n",
20306f25ae9SGregory Neil Shapiro 				Daemons[idx].d_name,
20406f25ae9SGregory Neil Shapiro 				Daemons[idx].d_socket);
20506f25ae9SGregory Neil Shapiro 	}
206c2aa98e2SPeter Wemm 
207c2aa98e2SPeter Wemm 	for (;;)
208c2aa98e2SPeter Wemm 	{
209c2aa98e2SPeter Wemm 		register pid_t pid;
210c2aa98e2SPeter Wemm 		auto SOCKADDR_LEN_T lotherend;
21140266059SGregory Neil Shapiro 		bool timedout = false;
21240266059SGregory Neil Shapiro 		bool control = false;
21306f25ae9SGregory Neil Shapiro 		int save_errno;
214c2aa98e2SPeter Wemm 		int pipefd[2];
21540266059SGregory Neil Shapiro 		time_t now;
21642e5d165SGregory Neil Shapiro #if STARTTLS
21742e5d165SGregory Neil Shapiro 		long seed;
21842e5d165SGregory Neil Shapiro #endif /* STARTTLS */
219c2aa98e2SPeter Wemm 
220c2aa98e2SPeter Wemm 		/* see if we are rejecting connections */
22140266059SGregory Neil Shapiro 		(void) sm_blocksignal(SIGALRM);
222a7ec597cSGregory Neil Shapiro 		CHECK_RESTART;
2238774250cSGregory Neil Shapiro 
22440266059SGregory Neil Shapiro 		for (idx = 0; idx < NDaemons; idx++)
22540266059SGregory Neil Shapiro 		{
226193538b7SGregory Neil Shapiro 			/*
22740266059SGregory Neil Shapiro 			**  XXX do this call outside the loop?
22840266059SGregory Neil Shapiro 			**	no: refuse_connections may sleep().
229193538b7SGregory Neil Shapiro 			*/
230193538b7SGregory Neil Shapiro 
23140266059SGregory Neil Shapiro 			now = curtime();
23240266059SGregory Neil Shapiro 			if (now < Daemons[idx].d_refuse_connections_until)
23306f25ae9SGregory Neil Shapiro 				continue;
23440266059SGregory Neil Shapiro 			if (bitnset(D_DISABLE, Daemons[idx].d_flags))
23540266059SGregory Neil Shapiro 				continue;
236d0cef73dSGregory Neil Shapiro 			if (refuseconnections(e, idx, curdaemon == idx))
237c2aa98e2SPeter Wemm 			{
23806f25ae9SGregory Neil Shapiro 				if (Daemons[idx].d_socket >= 0)
239c2aa98e2SPeter Wemm 				{
240065a643dSPeter Wemm 					/* close socket so peer fails quickly */
24106f25ae9SGregory Neil Shapiro 					(void) close(Daemons[idx].d_socket);
24206f25ae9SGregory Neil Shapiro 					Daemons[idx].d_socket = -1;
243c2aa98e2SPeter Wemm 				}
244c2aa98e2SPeter Wemm 
245065a643dSPeter Wemm 				/* refuse connections for next 15 seconds */
24640266059SGregory Neil Shapiro 				Daemons[idx].d_refuse_connections_until = now + 15;
247065a643dSPeter Wemm 			}
24806f25ae9SGregory Neil Shapiro 			else if (Daemons[idx].d_socket < 0 ||
24906f25ae9SGregory Neil Shapiro 				 Daemons[idx].d_firsttime)
250c2aa98e2SPeter Wemm 			{
25140266059SGregory Neil Shapiro 				if (!Daemons[idx].d_firsttime && LogLevel > 8)
25206f25ae9SGregory Neil Shapiro 					sm_syslog(LOG_INFO, NOQID,
25306f25ae9SGregory Neil Shapiro 						"accepting connections again for daemon %s",
25406f25ae9SGregory Neil Shapiro 						Daemons[idx].d_name);
25506f25ae9SGregory Neil Shapiro 
256065a643dSPeter Wemm 				/* arrange to (re)open the socket if needed */
25740266059SGregory Neil Shapiro 				(void) opendaemonsocket(&Daemons[idx], false);
25840266059SGregory Neil Shapiro 				Daemons[idx].d_firsttime = false;
259065a643dSPeter Wemm 			}
260c2aa98e2SPeter Wemm 		}
261c2aa98e2SPeter Wemm 
2628774250cSGregory Neil Shapiro 		/* May have been sleeping above, check again */
263a7ec597cSGregory Neil Shapiro 		CHECK_RESTART;
264e92d3f3fSGregory Neil Shapiro 
26540266059SGregory Neil Shapiro 		getrequests_checkdiskspace(e);
26606f25ae9SGregory Neil Shapiro 
267c2aa98e2SPeter Wemm #if XDEBUG
268c2aa98e2SPeter Wemm 		/* check for disaster */
269c2aa98e2SPeter Wemm 		{
270c2aa98e2SPeter Wemm 			char jbuf[MAXHOSTNAMELEN];
271c2aa98e2SPeter Wemm 
272d0cef73dSGregory Neil Shapiro 			expand("\201j", jbuf, sizeof(jbuf), e);
273c2aa98e2SPeter Wemm 			if (!wordinclass(jbuf, 'w'))
274c2aa98e2SPeter Wemm 			{
275c2aa98e2SPeter Wemm 				dumpstate("daemon lost $j");
276c2aa98e2SPeter Wemm 				sm_syslog(LOG_ALERT, NOQID,
277c2aa98e2SPeter Wemm 					  "daemon process doesn't have $j in $=w; see syslog");
278c2aa98e2SPeter Wemm 				abort();
279c2aa98e2SPeter Wemm 			}
280c2aa98e2SPeter Wemm 			else if (j_has_dot && strchr(jbuf, '.') == NULL)
281c2aa98e2SPeter Wemm 			{
282c2aa98e2SPeter Wemm 				dumpstate("daemon $j lost dot");
283c2aa98e2SPeter Wemm 				sm_syslog(LOG_ALERT, NOQID,
284c2aa98e2SPeter Wemm 					  "daemon process $j lost dot; see syslog");
285c2aa98e2SPeter Wemm 				abort();
286c2aa98e2SPeter Wemm 			}
287c2aa98e2SPeter Wemm 		}
28806f25ae9SGregory Neil Shapiro #endif /* XDEBUG */
289c2aa98e2SPeter Wemm 
290c2aa98e2SPeter Wemm #if 0
291c2aa98e2SPeter Wemm 		/*
292c2aa98e2SPeter Wemm 		**  Andrew Sun <asun@ieps-sun.ml.com> claims that this will
293c2aa98e2SPeter Wemm 		**  fix the SVr4 problem.  But it seems to have gone away,
294c2aa98e2SPeter Wemm 		**  so is it worth doing this?
295c2aa98e2SPeter Wemm 		*/
296c2aa98e2SPeter Wemm 
297065a643dSPeter Wemm 		if (DaemonSocket >= 0 &&
29840266059SGregory Neil Shapiro 		    SetNonBlocking(DaemonSocket, false) < 0)
299c2aa98e2SPeter Wemm 			log an error here;
30006f25ae9SGregory Neil Shapiro #endif /* 0 */
30140266059SGregory Neil Shapiro 		(void) sm_releasesignal(SIGALRM);
30206f25ae9SGregory Neil Shapiro 
303c2aa98e2SPeter Wemm 		for (;;)
304c2aa98e2SPeter Wemm 		{
30540266059SGregory Neil Shapiro 			bool setproc = false;
306065a643dSPeter Wemm 			int highest = -1;
307c2aa98e2SPeter Wemm 			fd_set readfds;
308c2aa98e2SPeter Wemm 			struct timeval timeout;
309c2aa98e2SPeter Wemm 
310a7ec597cSGregory Neil Shapiro 			CHECK_RESTART;
311c2aa98e2SPeter Wemm 			FD_ZERO(&readfds);
31240266059SGregory Neil Shapiro 			for (idx = 0; idx < NDaemons; idx++)
313065a643dSPeter Wemm 			{
31406f25ae9SGregory Neil Shapiro 				/* wait for a connection */
31506f25ae9SGregory Neil Shapiro 				if (Daemons[idx].d_socket >= 0)
31606f25ae9SGregory Neil Shapiro 				{
317193538b7SGregory Neil Shapiro 					if (!setproc &&
318193538b7SGregory Neil Shapiro 					    !bitnset(D_ETRNONLY,
319193538b7SGregory Neil Shapiro 						     Daemons[idx].d_flags))
32006f25ae9SGregory Neil Shapiro 					{
32140266059SGregory Neil Shapiro 						sm_setproctitle(true, e,
32206f25ae9SGregory Neil Shapiro 								"accepting connections");
32340266059SGregory Neil Shapiro 						setproc = true;
324065a643dSPeter Wemm 					}
32506f25ae9SGregory Neil Shapiro 					if (Daemons[idx].d_socket > highest)
32606f25ae9SGregory Neil Shapiro 						highest = Daemons[idx].d_socket;
32740266059SGregory Neil Shapiro 					SM_FD_SET(Daemons[idx].d_socket,
32840266059SGregory Neil Shapiro 						  &readfds);
32906f25ae9SGregory Neil Shapiro 				}
33006f25ae9SGregory Neil Shapiro 			}
33106f25ae9SGregory Neil Shapiro 
33206f25ae9SGregory Neil Shapiro #if NETUNIX
333065a643dSPeter Wemm 			if (ControlSocket >= 0)
334065a643dSPeter Wemm 			{
335065a643dSPeter Wemm 				if (ControlSocket > highest)
336065a643dSPeter Wemm 					highest = ControlSocket;
33740266059SGregory Neil Shapiro 				SM_FD_SET(ControlSocket, &readfds);
338065a643dSPeter Wemm 			}
33906f25ae9SGregory Neil Shapiro #endif /* NETUNIX */
34006f25ae9SGregory Neil Shapiro 
341065a643dSPeter Wemm 			timeout.tv_sec = 5;
342c2aa98e2SPeter Wemm 			timeout.tv_usec = 0;
343c2aa98e2SPeter Wemm 
344065a643dSPeter Wemm 			t = select(highest + 1, FDSET_CAST &readfds,
345c2aa98e2SPeter Wemm 				   NULL, NULL, &timeout);
346065a643dSPeter Wemm 
3478774250cSGregory Neil Shapiro 			/* Did someone signal while waiting? */
348a7ec597cSGregory Neil Shapiro 			CHECK_RESTART;
349193538b7SGregory Neil Shapiro 
350193538b7SGregory Neil Shapiro 			curdaemon = -1;
35140266059SGregory Neil Shapiro 			if (doqueuerun())
352605302a5SGregory Neil Shapiro 			{
35340266059SGregory Neil Shapiro 				(void) runqueue(true, false, false, false);
354605302a5SGregory Neil Shapiro #if _FFR_QUEUE_RUN_PARANOIA
355605302a5SGregory Neil Shapiro 				lastrun = now;
356605302a5SGregory Neil Shapiro #endif /* _FFR_QUEUE_RUN_PARANOIA */
357605302a5SGregory Neil Shapiro 			}
358605302a5SGregory Neil Shapiro #if _FFR_QUEUE_RUN_PARANOIA
3594e4196cbSGregory Neil Shapiro 			else if (CheckQueueRunners > 0 && QueueIntvl > 0 &&
3604e4196cbSGregory Neil Shapiro 				 lastrun + QueueIntvl + CheckQueueRunners < now)
361605302a5SGregory Neil Shapiro 			{
362605302a5SGregory Neil Shapiro 
363605302a5SGregory Neil Shapiro 				/*
364605302a5SGregory Neil Shapiro 				**  set lastrun unconditionally to avoid
365605302a5SGregory Neil Shapiro 				**  calling checkqueuerunner() all the time.
366605302a5SGregory Neil Shapiro 				**  That's also why we currently ignore the
367605302a5SGregory Neil Shapiro 				**  result of the function call.
368605302a5SGregory Neil Shapiro 				*/
369605302a5SGregory Neil Shapiro 
370605302a5SGregory Neil Shapiro 				(void) checkqueuerunner();
371605302a5SGregory Neil Shapiro 				lastrun = now;
372605302a5SGregory Neil Shapiro 			}
373605302a5SGregory Neil Shapiro #endif /* _FFR_QUEUE_RUN_PARANOIA */
37440266059SGregory Neil Shapiro 
375065a643dSPeter Wemm 			if (t <= 0)
376065a643dSPeter Wemm 			{
37740266059SGregory Neil Shapiro 				timedout = true;
378065a643dSPeter Wemm 				break;
379065a643dSPeter Wemm 			}
380c2aa98e2SPeter Wemm 
38140266059SGregory Neil Shapiro 			control = false;
382c2aa98e2SPeter Wemm 			errno = 0;
38306f25ae9SGregory Neil Shapiro 
38406f25ae9SGregory Neil Shapiro 			/* look "round-robin" for an active socket */
38540266059SGregory Neil Shapiro 			if ((idx = olddaemon + 1) >= NDaemons)
38606f25ae9SGregory Neil Shapiro 				idx = 0;
38740266059SGregory Neil Shapiro 			for (i = 0; i < NDaemons; i++)
388065a643dSPeter Wemm 			{
38906f25ae9SGregory Neil Shapiro 				if (Daemons[idx].d_socket >= 0 &&
39040266059SGregory Neil Shapiro 				    SM_FD_ISSET(Daemons[idx].d_socket,
39140266059SGregory Neil Shapiro 						&readfds))
39206f25ae9SGregory Neil Shapiro 				{
39306f25ae9SGregory Neil Shapiro 					lotherend = Daemons[idx].d_socksize;
394602a2b1bSGregory Neil Shapiro 					memset(&RealHostAddr, '\0',
395d0cef73dSGregory Neil Shapiro 					       sizeof(RealHostAddr));
39606f25ae9SGregory Neil Shapiro 					t = accept(Daemons[idx].d_socket,
397065a643dSPeter Wemm 						   (struct sockaddr *)&RealHostAddr,
398065a643dSPeter Wemm 						   &lotherend);
399602a2b1bSGregory Neil Shapiro 
400602a2b1bSGregory Neil Shapiro 					/*
401602a2b1bSGregory Neil Shapiro 					**  If remote side closes before
402602a2b1bSGregory Neil Shapiro 					**  accept() finishes, sockaddr
403602a2b1bSGregory Neil Shapiro 					**  might not be fully filled in.
404602a2b1bSGregory Neil Shapiro 					*/
405602a2b1bSGregory Neil Shapiro 
406602a2b1bSGregory Neil Shapiro 					if (t >= 0 &&
407602a2b1bSGregory Neil Shapiro 					    (lotherend == 0 ||
408602a2b1bSGregory Neil Shapiro # ifdef BSD4_4_SOCKADDR
409602a2b1bSGregory Neil Shapiro 					     RealHostAddr.sa.sa_len == 0 ||
410602a2b1bSGregory Neil Shapiro # endif /* BSD4_4_SOCKADDR */
411602a2b1bSGregory Neil Shapiro 					     RealHostAddr.sa.sa_family != Daemons[idx].d_addr.sa.sa_family))
412602a2b1bSGregory Neil Shapiro 					{
413602a2b1bSGregory Neil Shapiro 						(void) close(t);
414602a2b1bSGregory Neil Shapiro 						t = -1;
415602a2b1bSGregory Neil Shapiro 						errno = EINVAL;
416602a2b1bSGregory Neil Shapiro 					}
41706f25ae9SGregory Neil Shapiro 					olddaemon = curdaemon = idx;
41806f25ae9SGregory Neil Shapiro 					break;
419065a643dSPeter Wemm 				}
42040266059SGregory Neil Shapiro 				if (++idx >= NDaemons)
42106f25ae9SGregory Neil Shapiro 					idx = 0;
42206f25ae9SGregory Neil Shapiro 			}
42306f25ae9SGregory Neil Shapiro #if NETUNIX
42406f25ae9SGregory Neil Shapiro 			if (curdaemon == -1 && ControlSocket >= 0 &&
42540266059SGregory Neil Shapiro 			    SM_FD_ISSET(ControlSocket, &readfds))
426065a643dSPeter Wemm 			{
427065a643dSPeter Wemm 				struct sockaddr_un sa_un;
428065a643dSPeter Wemm 
429d0cef73dSGregory Neil Shapiro 				lotherend = sizeof(sa_un);
430d0cef73dSGregory Neil Shapiro 				memset(&sa_un, '\0', sizeof(sa_un));
431065a643dSPeter Wemm 				t = accept(ControlSocket,
432065a643dSPeter Wemm 					   (struct sockaddr *)&sa_un,
433065a643dSPeter Wemm 					   &lotherend);
434602a2b1bSGregory Neil Shapiro 
435602a2b1bSGregory Neil Shapiro 				/*
436602a2b1bSGregory Neil Shapiro 				**  If remote side closes before
437602a2b1bSGregory Neil Shapiro 				**  accept() finishes, sockaddr
438602a2b1bSGregory Neil Shapiro 				**  might not be fully filled in.
439602a2b1bSGregory Neil Shapiro 				*/
440602a2b1bSGregory Neil Shapiro 
441602a2b1bSGregory Neil Shapiro 				if (t >= 0 &&
442602a2b1bSGregory Neil Shapiro 				    (lotherend == 0 ||
443602a2b1bSGregory Neil Shapiro # ifdef BSD4_4_SOCKADDR
444602a2b1bSGregory Neil Shapiro 				     sa_un.sun_len == 0 ||
445602a2b1bSGregory Neil Shapiro # endif /* BSD4_4_SOCKADDR */
446602a2b1bSGregory Neil Shapiro 				     sa_un.sun_family != AF_UNIX))
447602a2b1bSGregory Neil Shapiro 				{
448602a2b1bSGregory Neil Shapiro 					(void) close(t);
449602a2b1bSGregory Neil Shapiro 					t = -1;
450602a2b1bSGregory Neil Shapiro 					errno = EINVAL;
451602a2b1bSGregory Neil Shapiro 				}
452602a2b1bSGregory Neil Shapiro 				if (t >= 0)
45340266059SGregory Neil Shapiro 					control = true;
454065a643dSPeter Wemm 			}
455193538b7SGregory Neil Shapiro #else /* NETUNIX */
456193538b7SGregory Neil Shapiro 			if (curdaemon == -1)
457193538b7SGregory Neil Shapiro 			{
458193538b7SGregory Neil Shapiro 				/* No daemon to service */
459193538b7SGregory Neil Shapiro 				continue;
460193538b7SGregory Neil Shapiro 			}
46106f25ae9SGregory Neil Shapiro #endif /* NETUNIX */
462c2aa98e2SPeter Wemm 			if (t >= 0 || errno != EINTR)
463c2aa98e2SPeter Wemm 				break;
464c2aa98e2SPeter Wemm 		}
465065a643dSPeter Wemm 		if (timedout)
466065a643dSPeter Wemm 		{
46740266059SGregory Neil Shapiro 			timedout = false;
468065a643dSPeter Wemm 			continue;
469065a643dSPeter Wemm 		}
47006f25ae9SGregory Neil Shapiro 		save_errno = errno;
47140266059SGregory Neil Shapiro 		(void) sm_blocksignal(SIGALRM);
472c2aa98e2SPeter Wemm 		if (t < 0)
473c2aa98e2SPeter Wemm 		{
47406f25ae9SGregory Neil Shapiro 			errno = save_errno;
475e92d3f3fSGregory Neil Shapiro 
476e92d3f3fSGregory Neil Shapiro 			/* let's ignore these temporary errors */
477e92d3f3fSGregory Neil Shapiro 			if (save_errno == EINTR
478e92d3f3fSGregory Neil Shapiro #ifdef EAGAIN
479e92d3f3fSGregory Neil Shapiro 			    || save_errno == EAGAIN
480e92d3f3fSGregory Neil Shapiro #endif /* EAGAIN */
481e92d3f3fSGregory Neil Shapiro #ifdef ECONNABORTED
482e92d3f3fSGregory Neil Shapiro 			    || save_errno == ECONNABORTED
483e92d3f3fSGregory Neil Shapiro #endif /* ECONNABORTED */
484e92d3f3fSGregory Neil Shapiro #ifdef EWOULDBLOCK
485e92d3f3fSGregory Neil Shapiro 			    || save_errno == EWOULDBLOCK
486e92d3f3fSGregory Neil Shapiro #endif /* EWOULDBLOCK */
487e92d3f3fSGregory Neil Shapiro 			   )
488e92d3f3fSGregory Neil Shapiro 				continue;
489e92d3f3fSGregory Neil Shapiro 
490c2aa98e2SPeter Wemm 			syserr("getrequests: accept");
491c2aa98e2SPeter Wemm 
492af9557fdSGregory Neil Shapiro 			if (curdaemon >= 0)
493af9557fdSGregory Neil Shapiro 			{
494af9557fdSGregory Neil Shapiro 				/* arrange to re-open socket next time around */
49506f25ae9SGregory Neil Shapiro 				(void) close(Daemons[curdaemon].d_socket);
49606f25ae9SGregory Neil Shapiro 				Daemons[curdaemon].d_socket = -1;
49706f25ae9SGregory Neil Shapiro #if SO_REUSEADDR_IS_BROKEN
49806f25ae9SGregory Neil Shapiro 				/*
49906f25ae9SGregory Neil Shapiro 				**  Give time for bound socket to be released.
50006f25ae9SGregory Neil Shapiro 				**  This creates a denial-of-service if you can
50106f25ae9SGregory Neil Shapiro 				**  force accept() to fail on affected systems.
50206f25ae9SGregory Neil Shapiro 				*/
50306f25ae9SGregory Neil Shapiro 
504af9557fdSGregory Neil Shapiro 				Daemons[curdaemon].d_refuse_connections_until =
505af9557fdSGregory Neil Shapiro 					curtime() + 15;
50606f25ae9SGregory Neil Shapiro #endif /* SO_REUSEADDR_IS_BROKEN */
507af9557fdSGregory Neil Shapiro 			}
508c2aa98e2SPeter Wemm 			continue;
509c2aa98e2SPeter Wemm 		}
510c2aa98e2SPeter Wemm 
51106f25ae9SGregory Neil Shapiro 		if (!control)
51206f25ae9SGregory Neil Shapiro 		{
51306f25ae9SGregory Neil Shapiro 			/* set some daemon related macros */
51406f25ae9SGregory Neil Shapiro 			switch (Daemons[curdaemon].d_addr.sa.sa_family)
51506f25ae9SGregory Neil Shapiro 			{
51606f25ae9SGregory Neil Shapiro 			  case AF_UNSPEC:
51740266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
51840266059SGregory Neil Shapiro 					macid("{daemon_family}"), "unspec");
51906f25ae9SGregory Neil Shapiro 				break;
52040266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
52140266059SGregory Neil Shapiro # if NETUNIX
52240266059SGregory Neil Shapiro 			  case AF_UNIX:
52340266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
52440266059SGregory Neil Shapiro 					macid("{daemon_family}"), "local");
52540266059SGregory Neil Shapiro 				break;
52640266059SGregory Neil Shapiro # endif /* NETUNIX */
52740266059SGregory Neil Shapiro #endif /* _FFR_DAEMON_NETUNIX */
52806f25ae9SGregory Neil Shapiro #if NETINET
52906f25ae9SGregory Neil Shapiro 			  case AF_INET:
53040266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
53140266059SGregory Neil Shapiro 					macid("{daemon_family}"), "inet");
53206f25ae9SGregory Neil Shapiro 				break;
53306f25ae9SGregory Neil Shapiro #endif /* NETINET */
53406f25ae9SGregory Neil Shapiro #if NETINET6
53506f25ae9SGregory Neil Shapiro 			  case AF_INET6:
53640266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
53740266059SGregory Neil Shapiro 					macid("{daemon_family}"), "inet6");
53806f25ae9SGregory Neil Shapiro 				break;
53906f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
54006f25ae9SGregory Neil Shapiro #if NETISO
54106f25ae9SGregory Neil Shapiro 			  case AF_ISO:
54240266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
54340266059SGregory Neil Shapiro 					macid("{daemon_family}"), "iso");
54406f25ae9SGregory Neil Shapiro 				break;
54506f25ae9SGregory Neil Shapiro #endif /* NETISO */
54606f25ae9SGregory Neil Shapiro #if NETNS
54706f25ae9SGregory Neil Shapiro 			  case AF_NS:
54840266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
54940266059SGregory Neil Shapiro 					macid("{daemon_family}"), "ns");
55006f25ae9SGregory Neil Shapiro 				break;
55106f25ae9SGregory Neil Shapiro #endif /* NETNS */
55206f25ae9SGregory Neil Shapiro #if NETX25
55306f25ae9SGregory Neil Shapiro 			  case AF_CCITT:
55440266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
55540266059SGregory Neil Shapiro 					macid("{daemon_family}"), "x.25");
55606f25ae9SGregory Neil Shapiro 				break;
55706f25ae9SGregory Neil Shapiro #endif /* NETX25 */
55806f25ae9SGregory Neil Shapiro 			}
55940266059SGregory Neil Shapiro 			macdefine(&BlankEnvelope.e_macro, A_PERM,
56040266059SGregory Neil Shapiro 				macid("{daemon_name}"),
56140266059SGregory Neil Shapiro 				Daemons[curdaemon].d_name);
56206f25ae9SGregory Neil Shapiro 			if (Daemons[curdaemon].d_mflags != NULL)
56340266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
56440266059SGregory Neil Shapiro 					macid("{daemon_flags}"),
56540266059SGregory Neil Shapiro 					Daemons[curdaemon].d_mflags);
56606f25ae9SGregory Neil Shapiro 			else
56740266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
56840266059SGregory Neil Shapiro 					macid("{daemon_flags}"), "");
56906f25ae9SGregory Neil Shapiro 		}
57006f25ae9SGregory Neil Shapiro 
571c2aa98e2SPeter Wemm 		/*
572e92d3f3fSGregory Neil Shapiro 		**  If connection rate is exceeded here, connection shall be
573e92d3f3fSGregory Neil Shapiro 		**  refused later by a new call after fork() by the
574e92d3f3fSGregory Neil Shapiro 		**  validate_connection() function. Closing the connection
575e92d3f3fSGregory Neil Shapiro 		**  at this point violates RFC 2821.
576e92d3f3fSGregory Neil Shapiro 		**  Do NOT remove this call, its side effects are needed.
577e92d3f3fSGregory Neil Shapiro 		*/
578e92d3f3fSGregory Neil Shapiro 
579e92d3f3fSGregory Neil Shapiro 		connection_rate_check(&RealHostAddr, NULL);
580e92d3f3fSGregory Neil Shapiro 
581e92d3f3fSGregory Neil Shapiro 		/*
582c2aa98e2SPeter Wemm 		**  Create a subprocess to process the mail.
583c2aa98e2SPeter Wemm 		*/
584c2aa98e2SPeter Wemm 
585c2aa98e2SPeter Wemm 		if (tTd(15, 2))
58640266059SGregory Neil Shapiro 			sm_dprintf("getrequests: forking (fd = %d)\n", t);
58706f25ae9SGregory Neil Shapiro 
58806f25ae9SGregory Neil Shapiro 		/*
58940266059SGregory Neil Shapiro 		**  Advance state of PRNG.
59040266059SGregory Neil Shapiro 		**  This is necessary because otherwise all child processes
59106f25ae9SGregory Neil Shapiro 		**  will produce the same PRN sequence and hence the selection
59206f25ae9SGregory Neil Shapiro 		**  of a queue directory (and other things, e.g., MX selection)
59306f25ae9SGregory Neil Shapiro 		**  are not "really" random.
59406f25ae9SGregory Neil Shapiro 		*/
59542e5d165SGregory Neil Shapiro #if STARTTLS
59640266059SGregory Neil Shapiro 		/* XXX get some better "random" data? */
59742e5d165SGregory Neil Shapiro 		seed = get_random();
59840266059SGregory Neil Shapiro 		RAND_seed((void *) &NextDiskSpaceCheck,
599d0cef73dSGregory Neil Shapiro 			  sizeof(NextDiskSpaceCheck));
600d0cef73dSGregory Neil Shapiro 		RAND_seed((void *) &now, sizeof(now));
601d0cef73dSGregory Neil Shapiro 		RAND_seed((void *) &seed, sizeof(seed));
60242e5d165SGregory Neil Shapiro #else /* STARTTLS */
60306f25ae9SGregory Neil Shapiro 		(void) get_random();
60442e5d165SGregory Neil Shapiro #endif /* STARTTLS */
605c2aa98e2SPeter Wemm 
60640266059SGregory Neil Shapiro #if NAMED_BIND
60740266059SGregory Neil Shapiro 		/*
608e92d3f3fSGregory Neil Shapiro 		**  Update MX records for FallbackMX.
60940266059SGregory Neil Shapiro 		**  Let's hope this is fast otherwise we screw up the
61040266059SGregory Neil Shapiro 		**  response time.
61140266059SGregory Neil Shapiro 		*/
61240266059SGregory Neil Shapiro 
613e92d3f3fSGregory Neil Shapiro 		if (FallbackMX != NULL)
614e92d3f3fSGregory Neil Shapiro 			(void) getfallbackmxrr(FallbackMX);
61540266059SGregory Neil Shapiro #endif /* NAMED_BIND */
61640266059SGregory Neil Shapiro 
61713bd1963SGregory Neil Shapiro 		if (tTd(93, 100))
61813bd1963SGregory Neil Shapiro 		{
61913bd1963SGregory Neil Shapiro 			/* don't fork, handle connection in this process */
62013bd1963SGregory Neil Shapiro 			pid = 0;
62113bd1963SGregory Neil Shapiro 			pipefd[0] = pipefd[1] = -1;
62213bd1963SGregory Neil Shapiro 		}
62313bd1963SGregory Neil Shapiro 		else
62413bd1963SGregory Neil Shapiro 		{
625c2aa98e2SPeter Wemm 			/*
62613bd1963SGregory Neil Shapiro 			**  Create a pipe to keep the child from writing to
62713bd1963SGregory Neil Shapiro 			**  the socket until after the parent has closed
62813bd1963SGregory Neil Shapiro 			**  it.  Otherwise the parent may hang if the child
62913bd1963SGregory Neil Shapiro 			**  has closed it first.
630c2aa98e2SPeter Wemm 			*/
631c2aa98e2SPeter Wemm 
632c2aa98e2SPeter Wemm 			if (pipe(pipefd) < 0)
633c2aa98e2SPeter Wemm 				pipefd[0] = pipefd[1] = -1;
634c2aa98e2SPeter Wemm 
63540266059SGregory Neil Shapiro 			(void) sm_blocksignal(SIGCHLD);
636c2aa98e2SPeter Wemm 			pid = fork();
637c2aa98e2SPeter Wemm 			if (pid < 0)
638c2aa98e2SPeter Wemm 			{
639c2aa98e2SPeter Wemm 				syserr("daemon: cannot fork");
640c2aa98e2SPeter Wemm 				if (pipefd[0] != -1)
641c2aa98e2SPeter Wemm 				{
642c2aa98e2SPeter Wemm 					(void) close(pipefd[0]);
643c2aa98e2SPeter Wemm 					(void) close(pipefd[1]);
644c2aa98e2SPeter Wemm 				}
64540266059SGregory Neil Shapiro 				(void) sm_releasesignal(SIGCHLD);
64606f25ae9SGregory Neil Shapiro 				(void) sleep(10);
647c2aa98e2SPeter Wemm 				(void) close(t);
648c2aa98e2SPeter Wemm 				continue;
649c2aa98e2SPeter Wemm 			}
65013bd1963SGregory Neil Shapiro 		}
651c2aa98e2SPeter Wemm 
652c2aa98e2SPeter Wemm 		if (pid == 0)
653c2aa98e2SPeter Wemm 		{
654c2aa98e2SPeter Wemm 			char *p;
65540266059SGregory Neil Shapiro 			SM_FILE_T *inchannel, *outchannel = NULL;
656c2aa98e2SPeter Wemm 
657c2aa98e2SPeter Wemm 			/*
658c2aa98e2SPeter Wemm 			**  CHILD -- return to caller.
659c2aa98e2SPeter Wemm 			**	Collect verified idea of sending host.
660c2aa98e2SPeter Wemm 			**	Verify calling user id if possible here.
661c2aa98e2SPeter Wemm 			*/
662c2aa98e2SPeter Wemm 
6638774250cSGregory Neil Shapiro 			/* Reset global flags */
6648774250cSGregory Neil Shapiro 			RestartRequest = NULL;
66540266059SGregory Neil Shapiro 			RestartWorkGroup = false;
6668774250cSGregory Neil Shapiro 			ShutdownRequest = NULL;
6678774250cSGregory Neil Shapiro 			PendingSignal = 0;
66840266059SGregory Neil Shapiro 			CurrentPid = getpid();
669e92d3f3fSGregory Neil Shapiro 			close_sendmail_pid();
6708774250cSGregory Neil Shapiro 
67140266059SGregory Neil Shapiro 			(void) sm_releasesignal(SIGALRM);
67240266059SGregory Neil Shapiro 			(void) sm_releasesignal(SIGCHLD);
67340266059SGregory Neil Shapiro 			(void) sm_signal(SIGCHLD, SIG_DFL);
67440266059SGregory Neil Shapiro 			(void) sm_signal(SIGHUP, SIG_DFL);
67540266059SGregory Neil Shapiro 			(void) sm_signal(SIGTERM, intsig);
67640266059SGregory Neil Shapiro 
67740266059SGregory Neil Shapiro 			/* turn on profiling */
67840266059SGregory Neil Shapiro 			/* SM_PROF(0); */
67940266059SGregory Neil Shapiro 
68040266059SGregory Neil Shapiro 			/*
68140266059SGregory Neil Shapiro 			**  Initialize exception stack and default exception
68240266059SGregory Neil Shapiro 			**  handler for child process.
68340266059SGregory Neil Shapiro 			*/
68440266059SGregory Neil Shapiro 
68540266059SGregory Neil Shapiro 			sm_exc_newthread(fatal_error);
6868774250cSGregory Neil Shapiro 
68706f25ae9SGregory Neil Shapiro 			if (!control)
68806f25ae9SGregory Neil Shapiro 			{
68940266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_TEMP,
69040266059SGregory Neil Shapiro 					macid("{daemon_addr}"),
69140266059SGregory Neil Shapiro 					anynet_ntoa(&Daemons[curdaemon].d_addr));
692d0cef73dSGregory Neil Shapiro 				(void) sm_snprintf(status, sizeof(status), "%d",
69306f25ae9SGregory Neil Shapiro 						ntohs(Daemons[curdaemon].d_port));
69440266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_TEMP,
69540266059SGregory Neil Shapiro 					macid("{daemon_port}"), status);
69606f25ae9SGregory Neil Shapiro 			}
69706f25ae9SGregory Neil Shapiro 
69840266059SGregory Neil Shapiro 			for (idx = 0; idx < NDaemons; idx++)
69906f25ae9SGregory Neil Shapiro 			{
70006f25ae9SGregory Neil Shapiro 				if (Daemons[idx].d_socket >= 0)
70106f25ae9SGregory Neil Shapiro 					(void) close(Daemons[idx].d_socket);
70213058a91SGregory Neil Shapiro 				Daemons[idx].d_socket = -1;
70306f25ae9SGregory Neil Shapiro 			}
704065a643dSPeter Wemm 			clrcontrol();
70506f25ae9SGregory Neil Shapiro 
70606f25ae9SGregory Neil Shapiro 			/* Avoid SMTP daemon actions if control command */
70706f25ae9SGregory Neil Shapiro 			if (control)
70806f25ae9SGregory Neil Shapiro 			{
70906f25ae9SGregory Neil Shapiro 				/* Add control socket process */
71040266059SGregory Neil Shapiro 				proc_list_add(CurrentPid,
71140266059SGregory Neil Shapiro 					      "console socket child",
712e92d3f3fSGregory Neil Shapiro 					      PROC_CONTROL_CHILD, 0, -1, NULL);
71306f25ae9SGregory Neil Shapiro 			}
71406f25ae9SGregory Neil Shapiro 			else
71506f25ae9SGregory Neil Shapiro 			{
716c2aa98e2SPeter Wemm 				proc_list_clear();
717c2aa98e2SPeter Wemm 
71840266059SGregory Neil Shapiro 				/* clean up background delivery children */
71940266059SGregory Neil Shapiro 				(void) sm_signal(SIGCHLD, reapchild);
72040266059SGregory Neil Shapiro 
721065a643dSPeter Wemm 				/* Add parent process as first child item */
72240266059SGregory Neil Shapiro 				proc_list_add(CurrentPid, "daemon child",
723e92d3f3fSGregory Neil Shapiro 					      PROC_DAEMON_CHILD, 0, -1, NULL);
72406f25ae9SGregory Neil Shapiro 				/* don't schedule queue runs if ETRN */
725c2aa98e2SPeter Wemm 				QueueIntvl = 0;
726d0cef73dSGregory Neil Shapiro 
727d0cef73dSGregory Neil Shapiro 				/*
728d0cef73dSGregory Neil Shapiro 				**  Hack: override global variables if
729d0cef73dSGregory Neil Shapiro 				**	the corresponding DaemonPortOption
730d0cef73dSGregory Neil Shapiro 				**	is set.
731d0cef73dSGregory Neil Shapiro 				*/
73213d88268SGregory Neil Shapiro #if _FFR_SS_PER_DAEMON
73313d88268SGregory Neil Shapiro 				if (Daemons[curdaemon].d_supersafe !=
734d0cef73dSGregory Neil Shapiro 				    DPO_NOTSET)
735d0cef73dSGregory Neil Shapiro 					SuperSafe = Daemons[curdaemon].
736d0cef73dSGregory Neil Shapiro 								d_supersafe;
73713d88268SGregory Neil Shapiro #endif /* _FFR_SS_PER_DAEMON */
73813d88268SGregory Neil Shapiro 				if (Daemons[curdaemon].d_dm != DM_NOTSET)
73913d88268SGregory Neil Shapiro 					set_delivery_mode(
74013d88268SGregory Neil Shapiro 						Daemons[curdaemon].d_dm, e);
741d0cef73dSGregory Neil Shapiro 
742d0cef73dSGregory Neil Shapiro 				if (Daemons[curdaemon].d_refuseLA !=
743d0cef73dSGregory Neil Shapiro 				    DPO_NOTSET)
744d0cef73dSGregory Neil Shapiro 					RefuseLA = Daemons[curdaemon].
745d0cef73dSGregory Neil Shapiro 								d_refuseLA;
746d0cef73dSGregory Neil Shapiro 				if (Daemons[curdaemon].d_queueLA != DPO_NOTSET)
747d0cef73dSGregory Neil Shapiro 					QueueLA = Daemons[curdaemon].d_queueLA;
748d0cef73dSGregory Neil Shapiro 				if (Daemons[curdaemon].d_delayLA != DPO_NOTSET)
749d0cef73dSGregory Neil Shapiro 					DelayLA = Daemons[curdaemon].d_delayLA;
750d0cef73dSGregory Neil Shapiro 				if (Daemons[curdaemon].d_maxchildren !=
751d0cef73dSGregory Neil Shapiro 				    DPO_NOTSET)
752d0cef73dSGregory Neil Shapiro 					MaxChildren = Daemons[curdaemon].
753d0cef73dSGregory Neil Shapiro 								d_maxchildren;
75413d88268SGregory Neil Shapiro 
75540266059SGregory Neil Shapiro 				sm_setproctitle(true, e, "startup with %s",
756c2aa98e2SPeter Wemm 						anynet_ntoa(&RealHostAddr));
75706f25ae9SGregory Neil Shapiro 			}
758c2aa98e2SPeter Wemm 
759c2aa98e2SPeter Wemm 			if (pipefd[0] != -1)
760c2aa98e2SPeter Wemm 			{
761c2aa98e2SPeter Wemm 				auto char c;
762c2aa98e2SPeter Wemm 
763c2aa98e2SPeter Wemm 				/*
764c2aa98e2SPeter Wemm 				**  Wait for the parent to close the write end
765c2aa98e2SPeter Wemm 				**  of the pipe, which we will see as an EOF.
766c2aa98e2SPeter Wemm 				**  This guarantees that we won't write to the
767c2aa98e2SPeter Wemm 				**  socket until after the parent has closed
768c2aa98e2SPeter Wemm 				**  the pipe.
769c2aa98e2SPeter Wemm 				*/
770c2aa98e2SPeter Wemm 
771c2aa98e2SPeter Wemm 				/* close the write end of the pipe */
772c2aa98e2SPeter Wemm 				(void) close(pipefd[1]);
773c2aa98e2SPeter Wemm 
774c2aa98e2SPeter Wemm 				/* we shouldn't be interrupted, but ... */
775c2aa98e2SPeter Wemm 				while (read(pipefd[0], &c, 1) < 0 &&
776c2aa98e2SPeter Wemm 				       errno == EINTR)
777c2aa98e2SPeter Wemm 					continue;
778c2aa98e2SPeter Wemm 				(void) close(pipefd[0]);
779c2aa98e2SPeter Wemm 			}
780c2aa98e2SPeter Wemm 
78106f25ae9SGregory Neil Shapiro 			/* control socket processing */
78206f25ae9SGregory Neil Shapiro 			if (control)
78306f25ae9SGregory Neil Shapiro 			{
78406f25ae9SGregory Neil Shapiro 				control_command(t, e);
78506f25ae9SGregory Neil Shapiro 				/* NOTREACHED */
78606f25ae9SGregory Neil Shapiro 				exit(EX_SOFTWARE);
78706f25ae9SGregory Neil Shapiro 			}
78806f25ae9SGregory Neil Shapiro 
789c2aa98e2SPeter Wemm 			/* determine host name */
790c2aa98e2SPeter Wemm 			p = hostnamebyanyaddr(&RealHostAddr);
79140266059SGregory Neil Shapiro 			if (strlen(p) > MAXNAME) /* XXX  - 1 ? */
792c2aa98e2SPeter Wemm 				p[MAXNAME] = '\0';
793c2aa98e2SPeter Wemm 			RealHostName = newstr(p);
79406f25ae9SGregory Neil Shapiro 			if (RealHostName[0] == '[')
79506f25ae9SGregory Neil Shapiro 			{
79640266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
79740266059SGregory Neil Shapiro 					macid("{client_resolve}"),
79840266059SGregory Neil Shapiro 					h_errno == TRY_AGAIN ? "TEMP" : "FAIL");
79906f25ae9SGregory Neil Shapiro 			}
80006f25ae9SGregory Neil Shapiro 			else
801e92d3f3fSGregory Neil Shapiro 			{
80240266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
80340266059SGregory Neil Shapiro 					  macid("{client_resolve}"), "OK");
804e92d3f3fSGregory Neil Shapiro 			}
80540266059SGregory Neil Shapiro 			sm_setproctitle(true, e, "startup with %s", p);
806605302a5SGregory Neil Shapiro 			markstats(e, NULL, STATS_CONNECT);
807c2aa98e2SPeter Wemm 
80840266059SGregory Neil Shapiro 			if ((inchannel = sm_io_open(SmFtStdiofd,
80940266059SGregory Neil Shapiro 						    SM_TIME_DEFAULT,
81040266059SGregory Neil Shapiro 						    (void *) &t,
811e92d3f3fSGregory Neil Shapiro 						    SM_IO_RDONLY_B,
81240266059SGregory Neil Shapiro 						    NULL)) == NULL ||
813c2aa98e2SPeter Wemm 			    (t = dup(t)) < 0 ||
81440266059SGregory Neil Shapiro 			    (outchannel = sm_io_open(SmFtStdiofd,
81540266059SGregory Neil Shapiro 						     SM_TIME_DEFAULT,
81640266059SGregory Neil Shapiro 						     (void *) &t,
817e92d3f3fSGregory Neil Shapiro 						     SM_IO_WRONLY_B,
81840266059SGregory Neil Shapiro 						     NULL)) == NULL)
819c2aa98e2SPeter Wemm 			{
82040266059SGregory Neil Shapiro 				syserr("cannot open SMTP server channel, fd=%d",
82140266059SGregory Neil Shapiro 					t);
82240266059SGregory Neil Shapiro 				finis(false, true, EX_OK);
823c2aa98e2SPeter Wemm 			}
82440266059SGregory Neil Shapiro 			sm_io_automode(inchannel, outchannel);
825c2aa98e2SPeter Wemm 
826c2aa98e2SPeter Wemm 			InChannel = inchannel;
827c2aa98e2SPeter Wemm 			OutChannel = outchannel;
82840266059SGregory Neil Shapiro 			DisConnected = false;
829c2aa98e2SPeter Wemm 
83040266059SGregory Neil Shapiro #if XLA
831c2aa98e2SPeter Wemm 			if (!xla_host_ok(RealHostName))
832c2aa98e2SPeter Wemm 			{
83306f25ae9SGregory Neil Shapiro 				message("421 4.4.5 Too many SMTP sessions for this host");
83440266059SGregory Neil Shapiro 				finis(false, true, EX_OK);
835c2aa98e2SPeter Wemm 			}
83606f25ae9SGregory Neil Shapiro #endif /* XLA */
83706f25ae9SGregory Neil Shapiro 			/* find out name for interface of connection */
83840266059SGregory Neil Shapiro 			if (getsockname(sm_io_getinfo(InChannel, SM_IO_WHAT_FD,
83940266059SGregory Neil Shapiro 						      NULL), &sa.sa, &len) == 0)
84006f25ae9SGregory Neil Shapiro 			{
84106f25ae9SGregory Neil Shapiro 				p = hostnamebyanyaddr(&sa);
84206f25ae9SGregory Neil Shapiro 				if (tTd(15, 9))
84340266059SGregory Neil Shapiro 					sm_dprintf("getreq: got name %s\n", p);
84440266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_TEMP,
84540266059SGregory Neil Shapiro 					macid("{if_name}"), p);
84606f25ae9SGregory Neil Shapiro 
84740266059SGregory Neil Shapiro 				/*
84840266059SGregory Neil Shapiro 				**  Do this only if it is not the loopback
84940266059SGregory Neil Shapiro 				**  interface.
85040266059SGregory Neil Shapiro 				*/
85140266059SGregory Neil Shapiro 
85206f25ae9SGregory Neil Shapiro 				if (!isloopback(sa))
85306f25ae9SGregory Neil Shapiro 				{
85440266059SGregory Neil Shapiro 					char *addr;
85540266059SGregory Neil Shapiro 					char family[5];
85640266059SGregory Neil Shapiro 
85740266059SGregory Neil Shapiro 					addr = anynet_ntoa(&sa);
85840266059SGregory Neil Shapiro 					(void) sm_snprintf(family,
85940266059SGregory Neil Shapiro 						sizeof(family),
86040266059SGregory Neil Shapiro 						"%d", sa.sa.sa_family);
86140266059SGregory Neil Shapiro 					macdefine(&BlankEnvelope.e_macro,
86240266059SGregory Neil Shapiro 						A_TEMP,
86340266059SGregory Neil Shapiro 						macid("{if_addr}"), addr);
86440266059SGregory Neil Shapiro 					macdefine(&BlankEnvelope.e_macro,
86540266059SGregory Neil Shapiro 						A_TEMP,
86640266059SGregory Neil Shapiro 						macid("{if_family}"), family);
86706f25ae9SGregory Neil Shapiro 					if (tTd(15, 7))
86840266059SGregory Neil Shapiro 						sm_dprintf("getreq: got addr %s and family %s\n",
86940266059SGregory Neil Shapiro 							addr, family);
87006f25ae9SGregory Neil Shapiro 				}
87106f25ae9SGregory Neil Shapiro 				else
87206f25ae9SGregory Neil Shapiro 				{
87340266059SGregory Neil Shapiro 					macdefine(&BlankEnvelope.e_macro,
87440266059SGregory Neil Shapiro 						A_PERM,
87540266059SGregory Neil Shapiro 						macid("{if_addr}"), NULL);
87640266059SGregory Neil Shapiro 					macdefine(&BlankEnvelope.e_macro,
87740266059SGregory Neil Shapiro 						A_PERM,
87840266059SGregory Neil Shapiro 						macid("{if_family}"), NULL);
87906f25ae9SGregory Neil Shapiro 				}
88006f25ae9SGregory Neil Shapiro 			}
88106f25ae9SGregory Neil Shapiro 			else
88206f25ae9SGregory Neil Shapiro 			{
88306f25ae9SGregory Neil Shapiro 				if (tTd(15, 7))
88440266059SGregory Neil Shapiro 					sm_dprintf("getreq: getsockname failed\n");
88540266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
88640266059SGregory Neil Shapiro 					macid("{if_name}"), NULL);
88740266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
88840266059SGregory Neil Shapiro 					macid("{if_addr}"), NULL);
88940266059SGregory Neil Shapiro 				macdefine(&BlankEnvelope.e_macro, A_PERM,
89040266059SGregory Neil Shapiro 					macid("{if_family}"), NULL);
89106f25ae9SGregory Neil Shapiro 			}
892c2aa98e2SPeter Wemm 			break;
893c2aa98e2SPeter Wemm 		}
894c2aa98e2SPeter Wemm 
895c2aa98e2SPeter Wemm 		/* parent -- keep track of children */
89606f25ae9SGregory Neil Shapiro 		if (control)
89706f25ae9SGregory Neil Shapiro 		{
898d0cef73dSGregory Neil Shapiro 			(void) sm_snprintf(status, sizeof(status),
89940266059SGregory Neil Shapiro 					   "control socket server child");
900e92d3f3fSGregory Neil Shapiro 			proc_list_add(pid, status, PROC_CONTROL, 0, -1, NULL);
90106f25ae9SGregory Neil Shapiro 		}
90206f25ae9SGregory Neil Shapiro 		else
90306f25ae9SGregory Neil Shapiro 		{
904d0cef73dSGregory Neil Shapiro 			(void) sm_snprintf(status, sizeof(status),
90506f25ae9SGregory Neil Shapiro 					   "SMTP server child for %s",
906065a643dSPeter Wemm 					   anynet_ntoa(&RealHostAddr));
907e92d3f3fSGregory Neil Shapiro 			proc_list_add(pid, status, PROC_DAEMON, 0, -1,
908e92d3f3fSGregory Neil Shapiro 					&RealHostAddr);
90906f25ae9SGregory Neil Shapiro 		}
91040266059SGregory Neil Shapiro 		(void) sm_releasesignal(SIGCHLD);
911c2aa98e2SPeter Wemm 
912c2aa98e2SPeter Wemm 		/* close the read end of the synchronization pipe */
913c2aa98e2SPeter Wemm 		if (pipefd[0] != -1)
91406f25ae9SGregory Neil Shapiro 		{
915c2aa98e2SPeter Wemm 			(void) close(pipefd[0]);
91606f25ae9SGregory Neil Shapiro 			pipefd[0] = -1;
91706f25ae9SGregory Neil Shapiro 		}
918c2aa98e2SPeter Wemm 
919c2aa98e2SPeter Wemm 		/* close the port so that others will hang (for a while) */
920c2aa98e2SPeter Wemm 		(void) close(t);
921c2aa98e2SPeter Wemm 
922c2aa98e2SPeter Wemm 		/* release the child by closing the read end of the sync pipe */
923c2aa98e2SPeter Wemm 		if (pipefd[1] != -1)
92406f25ae9SGregory Neil Shapiro 		{
925c2aa98e2SPeter Wemm 			(void) close(pipefd[1]);
92606f25ae9SGregory Neil Shapiro 			pipefd[1] = -1;
927c2aa98e2SPeter Wemm 		}
92806f25ae9SGregory Neil Shapiro 	}
929c2aa98e2SPeter Wemm 	if (tTd(15, 2))
93040266059SGregory Neil Shapiro 		sm_dprintf("getreq: returning\n");
93140266059SGregory Neil Shapiro 
93240266059SGregory Neil Shapiro #if MILTER
93340266059SGregory Neil Shapiro 	/* set the filters for this daemon */
93440266059SGregory Neil Shapiro 	if (Daemons[curdaemon].d_inputfilterlist != NULL)
93540266059SGregory Neil Shapiro 	{
93640266059SGregory Neil Shapiro 		for (i = 0;
93713bd1963SGregory Neil Shapiro 		     (i < MAXFILTERS &&
93813bd1963SGregory Neil Shapiro 		      Daemons[curdaemon].d_inputfilters[i] != NULL);
93940266059SGregory Neil Shapiro 		     i++)
94040266059SGregory Neil Shapiro 		{
94140266059SGregory Neil Shapiro 			InputFilters[i] = Daemons[curdaemon].d_inputfilters[i];
94240266059SGregory Neil Shapiro 		}
94340266059SGregory Neil Shapiro 		if (i < MAXFILTERS)
94440266059SGregory Neil Shapiro 			InputFilters[i] = NULL;
94540266059SGregory Neil Shapiro 	}
94640266059SGregory Neil Shapiro #endif /* MILTER */
94706f25ae9SGregory Neil Shapiro 	return &Daemons[curdaemon].d_flags;
948c2aa98e2SPeter Wemm }
94940266059SGregory Neil Shapiro 
95040266059SGregory Neil Shapiro /*
95140266059SGregory Neil Shapiro **  GETREQUESTS_CHECKDISKSPACE -- check available diskspace.
95240266059SGregory Neil Shapiro **
95340266059SGregory Neil Shapiro **	Parameters:
95440266059SGregory Neil Shapiro **		e -- envelope.
95540266059SGregory Neil Shapiro **
95640266059SGregory Neil Shapiro **	Returns:
95740266059SGregory Neil Shapiro **		none.
95840266059SGregory Neil Shapiro **
95940266059SGregory Neil Shapiro **	Side Effects:
96040266059SGregory Neil Shapiro **		Modifies Daemon flags (D_ETRNONLY) if not enough disk space.
96140266059SGregory Neil Shapiro */
96240266059SGregory Neil Shapiro 
96340266059SGregory Neil Shapiro static void
96440266059SGregory Neil Shapiro getrequests_checkdiskspace(e)
96540266059SGregory Neil Shapiro 	ENVELOPE *e;
96640266059SGregory Neil Shapiro {
96740266059SGregory Neil Shapiro 	bool logged = false;
96840266059SGregory Neil Shapiro 	int idx;
96940266059SGregory Neil Shapiro 	time_t now;
97040266059SGregory Neil Shapiro 
97140266059SGregory Neil Shapiro 	now = curtime();
97240266059SGregory Neil Shapiro 	if (now < NextDiskSpaceCheck)
97340266059SGregory Neil Shapiro 		return;
97440266059SGregory Neil Shapiro 
97540266059SGregory Neil Shapiro 	/* Check if there is available disk space in all queue groups. */
97640266059SGregory Neil Shapiro 	if (!enoughdiskspace(0, NULL))
97740266059SGregory Neil Shapiro 	{
97840266059SGregory Neil Shapiro 		for (idx = 0; idx < NDaemons; ++idx)
97940266059SGregory Neil Shapiro 		{
98040266059SGregory Neil Shapiro 			if (bitnset(D_ETRNONLY, Daemons[idx].d_flags))
98140266059SGregory Neil Shapiro 				continue;
98240266059SGregory Neil Shapiro 
98340266059SGregory Neil Shapiro 			/* log only if not logged before */
98440266059SGregory Neil Shapiro 			if (!logged)
98540266059SGregory Neil Shapiro 			{
98640266059SGregory Neil Shapiro 				if (LogLevel > 8)
98740266059SGregory Neil Shapiro 					sm_syslog(LOG_INFO, NOQID,
98840266059SGregory Neil Shapiro 						  "rejecting new messages: min free: %ld",
98940266059SGregory Neil Shapiro 						  MinBlocksFree);
99040266059SGregory Neil Shapiro 				sm_setproctitle(true, e,
99140266059SGregory Neil Shapiro 						"rejecting new messages: min free: %ld",
99240266059SGregory Neil Shapiro 						MinBlocksFree);
99340266059SGregory Neil Shapiro 				logged = true;
99440266059SGregory Neil Shapiro 			}
99540266059SGregory Neil Shapiro 			setbitn(D_ETRNONLY, Daemons[idx].d_flags);
99640266059SGregory Neil Shapiro 		}
99740266059SGregory Neil Shapiro 	}
99840266059SGregory Neil Shapiro 	else
99940266059SGregory Neil Shapiro 	{
100040266059SGregory Neil Shapiro 		for (idx = 0; idx < NDaemons; ++idx)
100140266059SGregory Neil Shapiro 		{
100240266059SGregory Neil Shapiro 			if (!bitnset(D_ETRNONLY, Daemons[idx].d_flags))
100340266059SGregory Neil Shapiro 				continue;
100440266059SGregory Neil Shapiro 
100540266059SGregory Neil Shapiro 			/* log only if not logged before */
100640266059SGregory Neil Shapiro 			if (!logged)
100740266059SGregory Neil Shapiro 			{
100840266059SGregory Neil Shapiro 				if (LogLevel > 8)
100940266059SGregory Neil Shapiro 					sm_syslog(LOG_INFO, NOQID,
101040266059SGregory Neil Shapiro 						  "accepting new messages (again)");
101140266059SGregory Neil Shapiro 				logged = true;
101240266059SGregory Neil Shapiro 			}
101340266059SGregory Neil Shapiro 
101440266059SGregory Neil Shapiro 			/* title will be set later */
101540266059SGregory Neil Shapiro 			clrbitn(D_ETRNONLY, Daemons[idx].d_flags);
101640266059SGregory Neil Shapiro 		}
101740266059SGregory Neil Shapiro 	}
101840266059SGregory Neil Shapiro 
101940266059SGregory Neil Shapiro 	/* only check disk space once a minute */
102040266059SGregory Neil Shapiro 	NextDiskSpaceCheck = now + 60;
102140266059SGregory Neil Shapiro }
102240266059SGregory Neil Shapiro 
102340266059SGregory Neil Shapiro /*
102406f25ae9SGregory Neil Shapiro **  OPENDAEMONSOCKET -- open SMTP socket
1025c2aa98e2SPeter Wemm **
102606f25ae9SGregory Neil Shapiro **	Deals with setting all appropriate options.
1027c2aa98e2SPeter Wemm **
1028c2aa98e2SPeter Wemm **	Parameters:
102906f25ae9SGregory Neil Shapiro **		d -- the structure for the daemon to open.
1030c2aa98e2SPeter Wemm **		firsttime -- set if this is the initial open.
1031c2aa98e2SPeter Wemm **
1032c2aa98e2SPeter Wemm **	Returns:
1033c2aa98e2SPeter Wemm **		Size in bytes of the daemon socket addr.
1034c2aa98e2SPeter Wemm **
1035c2aa98e2SPeter Wemm **	Side Effects:
1036c2aa98e2SPeter Wemm **		Leaves DaemonSocket set to the open socket.
1037c2aa98e2SPeter Wemm **		Exits if the socket cannot be created.
1038c2aa98e2SPeter Wemm */
1039c2aa98e2SPeter Wemm 
1040c2aa98e2SPeter Wemm #define MAXOPENTRIES	10	/* maximum number of tries to open connection */
1041c2aa98e2SPeter Wemm 
104206f25ae9SGregory Neil Shapiro static int
104306f25ae9SGregory Neil Shapiro opendaemonsocket(d, firsttime)
104440266059SGregory Neil Shapiro 	DAEMON_T *d;
1045c2aa98e2SPeter Wemm 	bool firsttime;
1046c2aa98e2SPeter Wemm {
1047c2aa98e2SPeter Wemm 	int on = 1;
104806f25ae9SGregory Neil Shapiro 	int fdflags;
104906f25ae9SGregory Neil Shapiro 	SOCKADDR_LEN_T socksize = 0;
1050c2aa98e2SPeter Wemm 	int ntries = 0;
105106f25ae9SGregory Neil Shapiro 	int save_errno;
1052c2aa98e2SPeter Wemm 
1053c2aa98e2SPeter Wemm 	if (tTd(15, 2))
105440266059SGregory Neil Shapiro 		sm_dprintf("opendaemonsocket(%s)\n", d->d_name);
1055c2aa98e2SPeter Wemm 
1056c2aa98e2SPeter Wemm 	do
1057c2aa98e2SPeter Wemm 	{
1058c2aa98e2SPeter Wemm 		if (ntries > 0)
105906f25ae9SGregory Neil Shapiro 			(void) sleep(5);
106006f25ae9SGregory Neil Shapiro 		if (firsttime || d->d_socket < 0)
1061c2aa98e2SPeter Wemm 		{
106240266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
106340266059SGregory Neil Shapiro # if NETUNIX
106440266059SGregory Neil Shapiro 			if (d->d_addr.sa.sa_family == AF_UNIX)
106540266059SGregory Neil Shapiro 			{
106640266059SGregory Neil Shapiro 				int rval;
106740266059SGregory Neil Shapiro 				long sff = SFF_SAFEDIRPATH|SFF_OPENASROOT|SFF_NOLINK|SFF_ROOTOK|SFF_EXECOK|SFF_CREAT;
106840266059SGregory Neil Shapiro 
106940266059SGregory Neil Shapiro 				/* if not safe, don't use it */
107040266059SGregory Neil Shapiro 				rval = safefile(d->d_addr.sunix.sun_path,
107140266059SGregory Neil Shapiro 						RunAsUid, RunAsGid,
107240266059SGregory Neil Shapiro 						RunAsUserName, sff,
107340266059SGregory Neil Shapiro 						S_IRUSR|S_IWUSR, NULL);
107440266059SGregory Neil Shapiro 				if (rval != 0)
107540266059SGregory Neil Shapiro 				{
107640266059SGregory Neil Shapiro 					save_errno = errno;
107740266059SGregory Neil Shapiro 					syserr("opendaemonsocket: daemon %s: unsafe domain socket %s",
107840266059SGregory Neil Shapiro 					       d->d_name,
107940266059SGregory Neil Shapiro 					       d->d_addr.sunix.sun_path);
108040266059SGregory Neil Shapiro 					goto fail;
108140266059SGregory Neil Shapiro 				}
108240266059SGregory Neil Shapiro 
108340266059SGregory Neil Shapiro 				/* Don't try to overtake an existing socket */
108440266059SGregory Neil Shapiro 				(void) unlink(d->d_addr.sunix.sun_path);
108540266059SGregory Neil Shapiro 			}
108640266059SGregory Neil Shapiro # endif /* NETUNIX */
108740266059SGregory Neil Shapiro #endif /* _FFR_DOMAIN_NETUNIX */
108806f25ae9SGregory Neil Shapiro 			d->d_socket = socket(d->d_addr.sa.sa_family,
108906f25ae9SGregory Neil Shapiro 					     SOCK_STREAM, 0);
109006f25ae9SGregory Neil Shapiro 			if (d->d_socket < 0)
1091c2aa98e2SPeter Wemm 			{
109206f25ae9SGregory Neil Shapiro 				save_errno = errno;
109340266059SGregory Neil Shapiro 				syserr("opendaemonsocket: daemon %s: can't create server SMTP socket",
109440266059SGregory Neil Shapiro 				       d->d_name);
109540266059SGregory Neil Shapiro 			  fail:
109640266059SGregory Neil Shapiro 				if (bitnset(D_OPTIONAL, d->d_flags) &&
109740266059SGregory Neil Shapiro 				    (!transienterror(save_errno) ||
109840266059SGregory Neil Shapiro 				     ntries >= MAXOPENTRIES - 1))
109940266059SGregory Neil Shapiro 				{
110040266059SGregory Neil Shapiro 					syserr("opendaemonsocket: daemon %s: optional socket disabled",
110140266059SGregory Neil Shapiro 					       d->d_name);
110240266059SGregory Neil Shapiro 					setbitn(D_DISABLE, d->d_flags);
110340266059SGregory Neil Shapiro 					d->d_socket = -1;
110440266059SGregory Neil Shapiro 					return -1;
110540266059SGregory Neil Shapiro 				}
1106c2aa98e2SPeter Wemm 			  severe:
1107c2aa98e2SPeter Wemm 				if (LogLevel > 0)
1108c2aa98e2SPeter Wemm 					sm_syslog(LOG_ALERT, NOQID,
110940266059SGregory Neil Shapiro 						  "daemon %s: problem creating SMTP socket",
111040266059SGregory Neil Shapiro 						  d->d_name);
111106f25ae9SGregory Neil Shapiro 				d->d_socket = -1;
1112c2aa98e2SPeter Wemm 				continue;
1113c2aa98e2SPeter Wemm 			}
1114c2aa98e2SPeter Wemm 
111513bd1963SGregory Neil Shapiro 			if (SM_FD_SETSIZE > 0 && d->d_socket >= SM_FD_SETSIZE)
111613bd1963SGregory Neil Shapiro 			{
111713bd1963SGregory Neil Shapiro 				save_errno = EINVAL;
111813bd1963SGregory Neil Shapiro 				syserr("opendaemonsocket: daemon %s: server SMTP socket (%d) too large",
111913bd1963SGregory Neil Shapiro 				       d->d_name, d->d_socket);
112013bd1963SGregory Neil Shapiro 				goto fail;
112113bd1963SGregory Neil Shapiro 			}
112213bd1963SGregory Neil Shapiro 
1123c2aa98e2SPeter Wemm 			/* turn on network debugging? */
1124c2aa98e2SPeter Wemm 			if (tTd(15, 101))
112506f25ae9SGregory Neil Shapiro 				(void) setsockopt(d->d_socket, SOL_SOCKET,
1126c2aa98e2SPeter Wemm 						  SO_DEBUG, (char *)&on,
1127d0cef73dSGregory Neil Shapiro 						  sizeof(on));
1128c2aa98e2SPeter Wemm 
112906f25ae9SGregory Neil Shapiro 			(void) setsockopt(d->d_socket, SOL_SOCKET,
1130d0cef73dSGregory Neil Shapiro 					  SO_REUSEADDR, (char *)&on, sizeof(on));
113106f25ae9SGregory Neil Shapiro 			(void) setsockopt(d->d_socket, SOL_SOCKET,
1132d0cef73dSGregory Neil Shapiro 					  SO_KEEPALIVE, (char *)&on, sizeof(on));
1133c2aa98e2SPeter Wemm 
1134c2aa98e2SPeter Wemm #ifdef SO_RCVBUF
113506f25ae9SGregory Neil Shapiro 			if (d->d_tcprcvbufsize > 0)
1136c2aa98e2SPeter Wemm 			{
113706f25ae9SGregory Neil Shapiro 				if (setsockopt(d->d_socket, SOL_SOCKET,
1138c2aa98e2SPeter Wemm 					       SO_RCVBUF,
113906f25ae9SGregory Neil Shapiro 					       (char *) &d->d_tcprcvbufsize,
114006f25ae9SGregory Neil Shapiro 					       sizeof(d->d_tcprcvbufsize)) < 0)
114106f25ae9SGregory Neil Shapiro 					syserr("opendaemonsocket: daemon %s: setsockopt(SO_RCVBUF)", d->d_name);
1142c2aa98e2SPeter Wemm 			}
114306f25ae9SGregory Neil Shapiro #endif /* SO_RCVBUF */
114406f25ae9SGregory Neil Shapiro #ifdef SO_SNDBUF
114506f25ae9SGregory Neil Shapiro 			if (d->d_tcpsndbufsize > 0)
114606f25ae9SGregory Neil Shapiro 			{
114706f25ae9SGregory Neil Shapiro 				if (setsockopt(d->d_socket, SOL_SOCKET,
114806f25ae9SGregory Neil Shapiro 					       SO_SNDBUF,
114906f25ae9SGregory Neil Shapiro 					       (char *) &d->d_tcpsndbufsize,
115006f25ae9SGregory Neil Shapiro 					       sizeof(d->d_tcpsndbufsize)) < 0)
115106f25ae9SGregory Neil Shapiro 					syserr("opendaemonsocket: daemon %s: setsockopt(SO_SNDBUF)", d->d_name);
115206f25ae9SGregory Neil Shapiro 			}
115306f25ae9SGregory Neil Shapiro #endif /* SO_SNDBUF */
1154c2aa98e2SPeter Wemm 
115506f25ae9SGregory Neil Shapiro 			if ((fdflags = fcntl(d->d_socket, F_GETFD, 0)) == -1 ||
115606f25ae9SGregory Neil Shapiro 			    fcntl(d->d_socket, F_SETFD,
115706f25ae9SGregory Neil Shapiro 				  fdflags | FD_CLOEXEC) == -1)
115806f25ae9SGregory Neil Shapiro 			{
115906f25ae9SGregory Neil Shapiro 				save_errno = errno;
116006f25ae9SGregory Neil Shapiro 				syserr("opendaemonsocket: daemon %s: failed to %s close-on-exec flag: %s",
116106f25ae9SGregory Neil Shapiro 				       d->d_name,
116206f25ae9SGregory Neil Shapiro 				       fdflags == -1 ? "get" : "set",
116340266059SGregory Neil Shapiro 				       sm_errstring(save_errno));
116406f25ae9SGregory Neil Shapiro 				(void) close(d->d_socket);
116506f25ae9SGregory Neil Shapiro 				goto severe;
116606f25ae9SGregory Neil Shapiro 			}
116706f25ae9SGregory Neil Shapiro 
116806f25ae9SGregory Neil Shapiro 			switch (d->d_addr.sa.sa_family)
1169c2aa98e2SPeter Wemm 			{
117040266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
117140266059SGregory Neil Shapiro # ifdef NETUNIX
117240266059SGregory Neil Shapiro 			  case AF_UNIX:
1173d0cef73dSGregory Neil Shapiro 				socksize = sizeof(d->d_addr.sunix);
117440266059SGregory Neil Shapiro 				break;
117540266059SGregory Neil Shapiro # endif /* NETUNIX */
117640266059SGregory Neil Shapiro #endif /* _FFR_DAEMON_NETUNIX */
1177c2aa98e2SPeter Wemm #if NETINET
1178c2aa98e2SPeter Wemm 			  case AF_INET:
1179d0cef73dSGregory Neil Shapiro 				socksize = sizeof(d->d_addr.sin);
1180c2aa98e2SPeter Wemm 				break;
118106f25ae9SGregory Neil Shapiro #endif /* NETINET */
118206f25ae9SGregory Neil Shapiro 
118306f25ae9SGregory Neil Shapiro #if NETINET6
118406f25ae9SGregory Neil Shapiro 			  case AF_INET6:
1185d0cef73dSGregory Neil Shapiro 				socksize = sizeof(d->d_addr.sin6);
118606f25ae9SGregory Neil Shapiro 				break;
118706f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
1188c2aa98e2SPeter Wemm 
1189c2aa98e2SPeter Wemm #if NETISO
1190c2aa98e2SPeter Wemm 			  case AF_ISO:
1191d0cef73dSGregory Neil Shapiro 				socksize = sizeof(d->d_addr.siso);
1192c2aa98e2SPeter Wemm 				break;
119306f25ae9SGregory Neil Shapiro #endif /* NETISO */
1194c2aa98e2SPeter Wemm 
1195c2aa98e2SPeter Wemm 			  default:
1196d0cef73dSGregory Neil Shapiro 				socksize = sizeof(d->d_addr);
1197c2aa98e2SPeter Wemm 				break;
1198c2aa98e2SPeter Wemm 			}
1199c2aa98e2SPeter Wemm 
120006f25ae9SGregory Neil Shapiro 			if (bind(d->d_socket, &d->d_addr.sa, socksize) < 0)
1201c2aa98e2SPeter Wemm 			{
1202c2aa98e2SPeter Wemm 				/* probably another daemon already */
120306f25ae9SGregory Neil Shapiro 				save_errno = errno;
120406f25ae9SGregory Neil Shapiro 				syserr("opendaemonsocket: daemon %s: cannot bind",
120506f25ae9SGregory Neil Shapiro 				       d->d_name);
120606f25ae9SGregory Neil Shapiro 				(void) close(d->d_socket);
120740266059SGregory Neil Shapiro 				goto fail;
1208c2aa98e2SPeter Wemm 			}
1209c2aa98e2SPeter Wemm 		}
121006f25ae9SGregory Neil Shapiro 		if (!firsttime &&
121106f25ae9SGregory Neil Shapiro 		    listen(d->d_socket, d->d_listenqueue) < 0)
1212c2aa98e2SPeter Wemm 		{
121306f25ae9SGregory Neil Shapiro 			save_errno = errno;
121406f25ae9SGregory Neil Shapiro 			syserr("opendaemonsocket: daemon %s: cannot listen",
121506f25ae9SGregory Neil Shapiro 			       d->d_name);
121606f25ae9SGregory Neil Shapiro 			(void) close(d->d_socket);
1217c2aa98e2SPeter Wemm 			goto severe;
1218c2aa98e2SPeter Wemm 		}
1219c2aa98e2SPeter Wemm 		return socksize;
122006f25ae9SGregory Neil Shapiro 	} while (ntries++ < MAXOPENTRIES && transienterror(save_errno));
122106f25ae9SGregory Neil Shapiro 	syserr("!opendaemonsocket: daemon %s: server SMTP socket wedged: exiting",
122206f25ae9SGregory Neil Shapiro 	       d->d_name);
1223065a643dSPeter Wemm 	/* NOTREACHED */
1224c2aa98e2SPeter Wemm 	return -1;  /* avoid compiler warning on IRIX */
1225c2aa98e2SPeter Wemm }
122640266059SGregory Neil Shapiro /*
122706f25ae9SGregory Neil Shapiro **  SETUPDAEMON -- setup socket for daemon
122806f25ae9SGregory Neil Shapiro **
122906f25ae9SGregory Neil Shapiro **	Parameters:
123006f25ae9SGregory Neil Shapiro **		daemonaddr -- socket for daemon
123106f25ae9SGregory Neil Shapiro **
123206f25ae9SGregory Neil Shapiro **	Returns:
123306f25ae9SGregory Neil Shapiro **		port number on which daemon should run
123406f25ae9SGregory Neil Shapiro **
123506f25ae9SGregory Neil Shapiro */
123640266059SGregory Neil Shapiro 
123740266059SGregory Neil Shapiro static unsigned short
123806f25ae9SGregory Neil Shapiro setupdaemon(daemonaddr)
123906f25ae9SGregory Neil Shapiro 	SOCKADDR *daemonaddr;
124006f25ae9SGregory Neil Shapiro {
124140266059SGregory Neil Shapiro 	unsigned short port;
124206f25ae9SGregory Neil Shapiro 
124306f25ae9SGregory Neil Shapiro 	/*
124406f25ae9SGregory Neil Shapiro 	**  Set up the address for the mailer.
124506f25ae9SGregory Neil Shapiro 	*/
124606f25ae9SGregory Neil Shapiro 
124706f25ae9SGregory Neil Shapiro 	if (daemonaddr->sa.sa_family == AF_UNSPEC)
124806f25ae9SGregory Neil Shapiro 	{
1249d0cef73dSGregory Neil Shapiro 		memset(daemonaddr, '\0', sizeof(*daemonaddr));
125006f25ae9SGregory Neil Shapiro #if NETINET
125106f25ae9SGregory Neil Shapiro 		daemonaddr->sa.sa_family = AF_INET;
125206f25ae9SGregory Neil Shapiro #endif /* NETINET */
125306f25ae9SGregory Neil Shapiro 	}
125406f25ae9SGregory Neil Shapiro 
125506f25ae9SGregory Neil Shapiro 	switch (daemonaddr->sa.sa_family)
125606f25ae9SGregory Neil Shapiro 	{
125706f25ae9SGregory Neil Shapiro #if NETINET
125806f25ae9SGregory Neil Shapiro 	  case AF_INET:
125906f25ae9SGregory Neil Shapiro 		if (daemonaddr->sin.sin_addr.s_addr == 0)
1260e3793f76SGregory Neil Shapiro 			daemonaddr->sin.sin_addr.s_addr =
1261e3793f76SGregory Neil Shapiro 			    LocalDaemon ? htonl(INADDR_LOOPBACK) : INADDR_ANY;
126206f25ae9SGregory Neil Shapiro 		port = daemonaddr->sin.sin_port;
126306f25ae9SGregory Neil Shapiro 		break;
126406f25ae9SGregory Neil Shapiro #endif /* NETINET */
126506f25ae9SGregory Neil Shapiro 
126606f25ae9SGregory Neil Shapiro #if NETINET6
126706f25ae9SGregory Neil Shapiro 	  case AF_INET6:
126806f25ae9SGregory Neil Shapiro 		if (IN6_IS_ADDR_UNSPECIFIED(&daemonaddr->sin6.sin6_addr))
1269e3793f76SGregory Neil Shapiro 			daemonaddr->sin6.sin6_addr =
1270*6f9c8e5bSGregory Neil Shapiro 			    (LocalDaemon && V6LoopbackAddrFound) ?
1271*6f9c8e5bSGregory Neil Shapiro 			    in6addr_loopback : in6addr_any;
127206f25ae9SGregory Neil Shapiro 		port = daemonaddr->sin6.sin6_port;
127306f25ae9SGregory Neil Shapiro 		break;
127406f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
127506f25ae9SGregory Neil Shapiro 
127606f25ae9SGregory Neil Shapiro 	  default:
127706f25ae9SGregory Neil Shapiro 		/* unknown protocol */
127806f25ae9SGregory Neil Shapiro 		port = 0;
127906f25ae9SGregory Neil Shapiro 		break;
128006f25ae9SGregory Neil Shapiro 	}
128106f25ae9SGregory Neil Shapiro 	if (port == 0)
128206f25ae9SGregory Neil Shapiro 	{
128306f25ae9SGregory Neil Shapiro #ifdef NO_GETSERVBYNAME
128406f25ae9SGregory Neil Shapiro 		port = htons(25);
128506f25ae9SGregory Neil Shapiro #else /* NO_GETSERVBYNAME */
128606f25ae9SGregory Neil Shapiro 		{
128706f25ae9SGregory Neil Shapiro 			register struct servent *sp;
128806f25ae9SGregory Neil Shapiro 
128906f25ae9SGregory Neil Shapiro 			sp = getservbyname("smtp", "tcp");
129006f25ae9SGregory Neil Shapiro 			if (sp == NULL)
129106f25ae9SGregory Neil Shapiro 			{
129206f25ae9SGregory Neil Shapiro 				syserr("554 5.3.5 service \"smtp\" unknown");
129306f25ae9SGregory Neil Shapiro 				port = htons(25);
129406f25ae9SGregory Neil Shapiro 			}
129506f25ae9SGregory Neil Shapiro 			else
129606f25ae9SGregory Neil Shapiro 				port = sp->s_port;
129706f25ae9SGregory Neil Shapiro 		}
129806f25ae9SGregory Neil Shapiro #endif /* NO_GETSERVBYNAME */
129906f25ae9SGregory Neil Shapiro 	}
130006f25ae9SGregory Neil Shapiro 
130106f25ae9SGregory Neil Shapiro 	switch (daemonaddr->sa.sa_family)
130206f25ae9SGregory Neil Shapiro 	{
130306f25ae9SGregory Neil Shapiro #if NETINET
130406f25ae9SGregory Neil Shapiro 	  case AF_INET:
130506f25ae9SGregory Neil Shapiro 		daemonaddr->sin.sin_port = port;
130606f25ae9SGregory Neil Shapiro 		break;
130706f25ae9SGregory Neil Shapiro #endif /* NETINET */
130806f25ae9SGregory Neil Shapiro 
130906f25ae9SGregory Neil Shapiro #if NETINET6
131006f25ae9SGregory Neil Shapiro 	  case AF_INET6:
131106f25ae9SGregory Neil Shapiro 		daemonaddr->sin6.sin6_port = port;
131206f25ae9SGregory Neil Shapiro 		break;
131306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
131406f25ae9SGregory Neil Shapiro 
131506f25ae9SGregory Neil Shapiro 	  default:
131606f25ae9SGregory Neil Shapiro 		/* unknown protocol */
131706f25ae9SGregory Neil Shapiro 		break;
131806f25ae9SGregory Neil Shapiro 	}
131940266059SGregory Neil Shapiro 	return port;
132006f25ae9SGregory Neil Shapiro }
132140266059SGregory Neil Shapiro /*
1322c2aa98e2SPeter Wemm **  CLRDAEMON -- reset the daemon connection
1323c2aa98e2SPeter Wemm **
1324c2aa98e2SPeter Wemm **	Parameters:
1325c2aa98e2SPeter Wemm **		none.
1326c2aa98e2SPeter Wemm **
1327c2aa98e2SPeter Wemm **	Returns:
1328c2aa98e2SPeter Wemm **		none.
1329c2aa98e2SPeter Wemm **
1330c2aa98e2SPeter Wemm **	Side Effects:
1331c2aa98e2SPeter Wemm **		releases any resources used by the passive daemon.
1332c2aa98e2SPeter Wemm */
1333c2aa98e2SPeter Wemm 
1334c2aa98e2SPeter Wemm void
1335c2aa98e2SPeter Wemm clrdaemon()
1336c2aa98e2SPeter Wemm {
133706f25ae9SGregory Neil Shapiro 	int i;
133806f25ae9SGregory Neil Shapiro 
133940266059SGregory Neil Shapiro 	for (i = 0; i < NDaemons; i++)
134006f25ae9SGregory Neil Shapiro 	{
134106f25ae9SGregory Neil Shapiro 		if (Daemons[i].d_socket >= 0)
134206f25ae9SGregory Neil Shapiro 			(void) close(Daemons[i].d_socket);
134306f25ae9SGregory Neil Shapiro 		Daemons[i].d_socket = -1;
134406f25ae9SGregory Neil Shapiro 	}
1345c2aa98e2SPeter Wemm }
134640266059SGregory Neil Shapiro 
134740266059SGregory Neil Shapiro /*
134840266059SGregory Neil Shapiro **  GETMODIFIERS -- get modifier flags
134940266059SGregory Neil Shapiro **
135040266059SGregory Neil Shapiro **	Parameters:
135140266059SGregory Neil Shapiro **		v -- the modifiers (input text line).
135240266059SGregory Neil Shapiro **		modifiers -- pointer to flag field to represent modifiers.
135340266059SGregory Neil Shapiro **
135440266059SGregory Neil Shapiro **	Returns:
135540266059SGregory Neil Shapiro **		(xallocat()ed) string representation of modifiers.
135640266059SGregory Neil Shapiro **
135740266059SGregory Neil Shapiro **	Side Effects:
135840266059SGregory Neil Shapiro **		fills in modifiers.
135940266059SGregory Neil Shapiro */
136040266059SGregory Neil Shapiro 
136140266059SGregory Neil Shapiro char *
136240266059SGregory Neil Shapiro getmodifiers(v, modifiers)
136340266059SGregory Neil Shapiro 	char *v;
136440266059SGregory Neil Shapiro 	BITMAP256 modifiers;
136540266059SGregory Neil Shapiro {
136640266059SGregory Neil Shapiro 	int l;
136740266059SGregory Neil Shapiro 	char *h, *f, *flags;
136840266059SGregory Neil Shapiro 
136940266059SGregory Neil Shapiro 	/* maximum length of flags: upper case Option -> "OO " */
137040266059SGregory Neil Shapiro 	l = 3 * strlen(v) + 3;
137140266059SGregory Neil Shapiro 
137240266059SGregory Neil Shapiro 	/* is someone joking? */
137340266059SGregory Neil Shapiro 	if (l < 0 || l > 256)
137440266059SGregory Neil Shapiro 	{
137540266059SGregory Neil Shapiro 		if (LogLevel > 2)
137640266059SGregory Neil Shapiro 			sm_syslog(LOG_ERR, NOQID,
137740266059SGregory Neil Shapiro 				  "getmodifiers too long, ignored");
137840266059SGregory Neil Shapiro 		return NULL;
137940266059SGregory Neil Shapiro 	}
138040266059SGregory Neil Shapiro 	flags = xalloc(l);
138140266059SGregory Neil Shapiro 	f = flags;
138240266059SGregory Neil Shapiro 	clrbitmap(modifiers);
138340266059SGregory Neil Shapiro 	for (h = v; *h != '\0'; h++)
138440266059SGregory Neil Shapiro 	{
138540266059SGregory Neil Shapiro 		if (isascii(*h) && !isspace(*h) && isprint(*h))
138640266059SGregory Neil Shapiro 		{
138740266059SGregory Neil Shapiro 			setbitn(*h, modifiers);
138840266059SGregory Neil Shapiro 			if (flags != f)
138940266059SGregory Neil Shapiro 				*flags++ = ' ';
139040266059SGregory Neil Shapiro 			*flags++ = *h;
139140266059SGregory Neil Shapiro 			if (isupper(*h))
139240266059SGregory Neil Shapiro 				*flags++ = *h;
139340266059SGregory Neil Shapiro 		}
139440266059SGregory Neil Shapiro 	}
139540266059SGregory Neil Shapiro 	*flags++ = '\0';
139640266059SGregory Neil Shapiro 	return f;
139740266059SGregory Neil Shapiro }
139840266059SGregory Neil Shapiro 
139940266059SGregory Neil Shapiro /*
140040266059SGregory Neil Shapiro **  CHKDAEMONMODIFIERS -- check whether all daemons have set a flag.
140140266059SGregory Neil Shapiro **
140240266059SGregory Neil Shapiro **	Parameters:
140340266059SGregory Neil Shapiro **		flag -- the flag to test.
140440266059SGregory Neil Shapiro **
140540266059SGregory Neil Shapiro **	Returns:
140640266059SGregory Neil Shapiro **		true iff all daemons have set flag.
140740266059SGregory Neil Shapiro */
140840266059SGregory Neil Shapiro 
140940266059SGregory Neil Shapiro bool
141040266059SGregory Neil Shapiro chkdaemonmodifiers(flag)
141140266059SGregory Neil Shapiro 	int flag;
141240266059SGregory Neil Shapiro {
141340266059SGregory Neil Shapiro 	int i;
141440266059SGregory Neil Shapiro 
141540266059SGregory Neil Shapiro 	for (i = 0; i < NDaemons; i++)
141640266059SGregory Neil Shapiro 		if (!bitnset((char) flag, Daemons[i].d_flags))
141740266059SGregory Neil Shapiro 			return false;
141840266059SGregory Neil Shapiro 	return true;
141940266059SGregory Neil Shapiro }
142040266059SGregory Neil Shapiro 
142140266059SGregory Neil Shapiro /*
142206f25ae9SGregory Neil Shapiro **  SETSOCKADDROPTIONS -- set options for SOCKADDR (daemon or client)
1423c2aa98e2SPeter Wemm **
1424c2aa98e2SPeter Wemm **	Parameters:
1425c2aa98e2SPeter Wemm **		p -- the options line.
142606f25ae9SGregory Neil Shapiro **		d -- the daemon structure to fill in.
1427c2aa98e2SPeter Wemm **
1428c2aa98e2SPeter Wemm **	Returns:
1429c2aa98e2SPeter Wemm **		none.
1430c2aa98e2SPeter Wemm */
1431c2aa98e2SPeter Wemm 
143206f25ae9SGregory Neil Shapiro static void
143306f25ae9SGregory Neil Shapiro setsockaddroptions(p, d)
1434b6bacd31SGregory Neil Shapiro 	char *p;
143540266059SGregory Neil Shapiro 	DAEMON_T *d;
1436c2aa98e2SPeter Wemm {
143706f25ae9SGregory Neil Shapiro #if NETISO
1438193538b7SGregory Neil Shapiro 	short portno;
143906f25ae9SGregory Neil Shapiro #endif /* NETISO */
1440193538b7SGregory Neil Shapiro 	char *port = NULL;
1441193538b7SGregory Neil Shapiro 	char *addr = NULL;
144206f25ae9SGregory Neil Shapiro 
144306f25ae9SGregory Neil Shapiro #if NETINET
144406f25ae9SGregory Neil Shapiro 	if (d->d_addr.sa.sa_family == AF_UNSPEC)
144506f25ae9SGregory Neil Shapiro 		d->d_addr.sa.sa_family = AF_INET;
144606f25ae9SGregory Neil Shapiro #endif /* NETINET */
14474e4196cbSGregory Neil Shapiro #if _FFR_SS_PER_DAEMON
1448d0cef73dSGregory Neil Shapiro 	d->d_supersafe = DPO_NOTSET;
14494e4196cbSGregory Neil Shapiro #endif /* _FFR_SS_PER_DAEMON */
14504e4196cbSGregory Neil Shapiro 	d->d_dm = DM_NOTSET;
1451d0cef73dSGregory Neil Shapiro 	d->d_refuseLA = DPO_NOTSET;
1452d0cef73dSGregory Neil Shapiro 	d->d_queueLA = DPO_NOTSET;
1453d0cef73dSGregory Neil Shapiro 	d->d_delayLA = DPO_NOTSET;
1454d0cef73dSGregory Neil Shapiro 	d->d_maxchildren = DPO_NOTSET;
1455c2aa98e2SPeter Wemm 
1456c2aa98e2SPeter Wemm 	while (p != NULL)
1457c2aa98e2SPeter Wemm 	{
1458c2aa98e2SPeter Wemm 		register char *f;
1459c2aa98e2SPeter Wemm 		register char *v;
1460c2aa98e2SPeter Wemm 
1461c2aa98e2SPeter Wemm 		while (isascii(*p) && isspace(*p))
1462c2aa98e2SPeter Wemm 			p++;
1463c2aa98e2SPeter Wemm 		if (*p == '\0')
1464c2aa98e2SPeter Wemm 			break;
1465c2aa98e2SPeter Wemm 		f = p;
1466c2aa98e2SPeter Wemm 		p = strchr(p, ',');
1467c2aa98e2SPeter Wemm 		if (p != NULL)
1468c2aa98e2SPeter Wemm 			*p++ = '\0';
1469c2aa98e2SPeter Wemm 		v = strchr(f, '=');
1470c2aa98e2SPeter Wemm 		if (v == NULL)
1471c2aa98e2SPeter Wemm 			continue;
1472c2aa98e2SPeter Wemm 		while (isascii(*++v) && isspace(*v))
1473c2aa98e2SPeter Wemm 			continue;
1474c2aa98e2SPeter Wemm 
1475c2aa98e2SPeter Wemm 		switch (*f)
1476c2aa98e2SPeter Wemm 		{
147713d88268SGregory Neil Shapiro 		  case 'A':		/* address */
1478d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1479d0cef73dSGregory Neil Shapiro 		  case 'a':
1480d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
148113d88268SGregory Neil Shapiro 			addr = v;
148213d88268SGregory Neil Shapiro 			break;
148313d88268SGregory Neil Shapiro 
1484d0cef73dSGregory Neil Shapiro 		  case 'c':
1485d0cef73dSGregory Neil Shapiro 			d->d_maxchildren = atoi(v);
1486d0cef73dSGregory Neil Shapiro 			break;
1487d0cef73dSGregory Neil Shapiro 
148813d88268SGregory Neil Shapiro 		  case 'D':		/* DeliveryMode */
148913d88268SGregory Neil Shapiro 			switch (*v)
149013d88268SGregory Neil Shapiro 			{
149113d88268SGregory Neil Shapiro 			  case SM_QUEUE:
149213d88268SGregory Neil Shapiro 			  case SM_DEFER:
149313d88268SGregory Neil Shapiro 			  case SM_DELIVER:
149413d88268SGregory Neil Shapiro 			  case SM_FORK:
149513d88268SGregory Neil Shapiro 				d->d_dm = *v;
149613d88268SGregory Neil Shapiro 				break;
149713d88268SGregory Neil Shapiro 			  default:
149813d88268SGregory Neil Shapiro 				syserr("554 5.3.5 Unknown delivery mode %c",
149913d88268SGregory Neil Shapiro 					*v);
150013d88268SGregory Neil Shapiro 				break;
150113d88268SGregory Neil Shapiro 			}
150213d88268SGregory Neil Shapiro 			break;
1503d0cef73dSGregory Neil Shapiro 
1504d0cef73dSGregory Neil Shapiro 		  case 'd':		/* delayLA */
1505d0cef73dSGregory Neil Shapiro 			d->d_delayLA = atoi(v);
1506d0cef73dSGregory Neil Shapiro 			break;
150713d88268SGregory Neil Shapiro 
1508c2aa98e2SPeter Wemm 		  case 'F':		/* address family */
1509d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1510d0cef73dSGregory Neil Shapiro 		  case 'f':
1511d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
1512c2aa98e2SPeter Wemm 			if (isascii(*v) && isdigit(*v))
151306f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = atoi(v);
151440266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
151540266059SGregory Neil Shapiro # ifdef NETUNIX
151640266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "unix") == 0 ||
151740266059SGregory Neil Shapiro 				 sm_strcasecmp(v, "local") == 0)
151840266059SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_UNIX;
151940266059SGregory Neil Shapiro # endif /* NETUNIX */
152040266059SGregory Neil Shapiro #endif /* _FFR_DAEMON_NETUNIX */
1521c2aa98e2SPeter Wemm #if NETINET
152240266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "inet") == 0)
152306f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_INET;
152406f25ae9SGregory Neil Shapiro #endif /* NETINET */
152506f25ae9SGregory Neil Shapiro #if NETINET6
152640266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "inet6") == 0)
152706f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_INET6;
152806f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
1529c2aa98e2SPeter Wemm #if NETISO
153040266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "iso") == 0)
153106f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_ISO;
153206f25ae9SGregory Neil Shapiro #endif /* NETISO */
1533c2aa98e2SPeter Wemm #if NETNS
153440266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "ns") == 0)
153506f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_NS;
153606f25ae9SGregory Neil Shapiro #endif /* NETNS */
1537c2aa98e2SPeter Wemm #if NETX25
153840266059SGregory Neil Shapiro 			else if (sm_strcasecmp(v, "x.25") == 0)
153906f25ae9SGregory Neil Shapiro 				d->d_addr.sa.sa_family = AF_CCITT;
154006f25ae9SGregory Neil Shapiro #endif /* NETX25 */
1541c2aa98e2SPeter Wemm 			else
154206f25ae9SGregory Neil Shapiro 				syserr("554 5.3.5 Unknown address family %s in Family=option",
154306f25ae9SGregory Neil Shapiro 				       v);
1544c2aa98e2SPeter Wemm 			break;
1545c2aa98e2SPeter Wemm 
154640266059SGregory Neil Shapiro #if MILTER
154740266059SGregory Neil Shapiro 		  case 'I':
1548d0cef73dSGregory Neil Shapiro # if !_FFR_DPO_CS
1549d0cef73dSGregory Neil Shapiro 		  case 'i':
1550d0cef73dSGregory Neil Shapiro # endif /* !_FFR_DPO_CS */
155140266059SGregory Neil Shapiro 			d->d_inputfilterlist = v;
155240266059SGregory Neil Shapiro 			break;
155340266059SGregory Neil Shapiro #endif /* MILTER */
155440266059SGregory Neil Shapiro 
1555c2aa98e2SPeter Wemm 		  case 'L':		/* listen queue size */
1556d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1557d0cef73dSGregory Neil Shapiro 		  case 'l':
1558d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
155906f25ae9SGregory Neil Shapiro 			d->d_listenqueue = atoi(v);
156006f25ae9SGregory Neil Shapiro 			break;
156106f25ae9SGregory Neil Shapiro 
156206f25ae9SGregory Neil Shapiro 		  case 'M':		/* modifiers (flags) */
1563d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1564d0cef73dSGregory Neil Shapiro 		  case 'm':
1565d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
156640266059SGregory Neil Shapiro 			d->d_mflags = getmodifiers(v, d->d_flags);
1567c2aa98e2SPeter Wemm 			break;
1568c2aa98e2SPeter Wemm 
156913d88268SGregory Neil Shapiro 		  case 'N':		/* name */
1570d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1571d0cef73dSGregory Neil Shapiro 		  case 'n':
1572d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
157313d88268SGregory Neil Shapiro 			d->d_name = v;
157413d88268SGregory Neil Shapiro 			break;
157513d88268SGregory Neil Shapiro 
157613d88268SGregory Neil Shapiro 		  case 'P':		/* port */
1577d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1578d0cef73dSGregory Neil Shapiro 		  case 'p':
1579d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
158013d88268SGregory Neil Shapiro 			port = v;
1581c2aa98e2SPeter Wemm 			break;
1582c2aa98e2SPeter Wemm 
1583d0cef73dSGregory Neil Shapiro 		  case 'q':
1584d0cef73dSGregory Neil Shapiro 			d->d_queueLA = atoi(v);
1585d0cef73dSGregory Neil Shapiro 			break;
1586d0cef73dSGregory Neil Shapiro 
1587c2aa98e2SPeter Wemm 		  case 'R':		/* receive buffer size */
158806f25ae9SGregory Neil Shapiro 			d->d_tcprcvbufsize = atoi(v);
158906f25ae9SGregory Neil Shapiro 			break;
159006f25ae9SGregory Neil Shapiro 
1591d0cef73dSGregory Neil Shapiro 		  case 'r':
1592d0cef73dSGregory Neil Shapiro 			d->d_refuseLA = atoi(v);
1593d0cef73dSGregory Neil Shapiro 			break;
1594d0cef73dSGregory Neil Shapiro 
159513d88268SGregory Neil Shapiro 		  case 'S':		/* send buffer size */
1596d0cef73dSGregory Neil Shapiro #if !_FFR_DPO_CS
1597d0cef73dSGregory Neil Shapiro 		  case 's':
1598d0cef73dSGregory Neil Shapiro #endif /* !_FFR_DPO_CS */
159913d88268SGregory Neil Shapiro 			d->d_tcpsndbufsize = atoi(v);
1600c2aa98e2SPeter Wemm 			break;
1601c2aa98e2SPeter Wemm 
160213d88268SGregory Neil Shapiro #if _FFR_SS_PER_DAEMON
160313d88268SGregory Neil Shapiro 		  case 'T':		/* SuperSafe */
160413d88268SGregory Neil Shapiro 			if (tolower(*v) == 'i')
160513d88268SGregory Neil Shapiro 				d->d_supersafe = SAFE_INTERACTIVE;
160613d88268SGregory Neil Shapiro 			else if (tolower(*v) == 'p')
160713d88268SGregory Neil Shapiro # if MILTER
160813d88268SGregory Neil Shapiro 				d->d_supersafe = SAFE_REALLY_POSTMILTER;
160913d88268SGregory Neil Shapiro # else /* MILTER */
161013d88268SGregory Neil Shapiro 				(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
161113d88268SGregory Neil Shapiro 					"Warning: SuperSafe=PostMilter requires Milter support (-DMILTER)\n");
161213d88268SGregory Neil Shapiro # endif /* MILTER */
161313d88268SGregory Neil Shapiro 			else
161413d88268SGregory Neil Shapiro 				d->d_supersafe = atobool(v) ? SAFE_REALLY
161513d88268SGregory Neil Shapiro 							: SAFE_NO;
161613d88268SGregory Neil Shapiro 			break;
161713d88268SGregory Neil Shapiro #endif /* _FFR_SS_PER_DAEMON */
161813d88268SGregory Neil Shapiro 
1619c2aa98e2SPeter Wemm 		  default:
162006f25ae9SGregory Neil Shapiro 			syserr("554 5.3.5 PortOptions parameter \"%s\" unknown",
162106f25ae9SGregory Neil Shapiro 			       f);
1622c2aa98e2SPeter Wemm 		}
1623c2aa98e2SPeter Wemm 	}
1624193538b7SGregory Neil Shapiro 
1625193538b7SGregory Neil Shapiro 	/* Check addr and port after finding family */
1626193538b7SGregory Neil Shapiro 	if (addr != NULL)
1627193538b7SGregory Neil Shapiro 	{
1628193538b7SGregory Neil Shapiro 		switch (d->d_addr.sa.sa_family)
1629193538b7SGregory Neil Shapiro 		{
163040266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
163140266059SGregory Neil Shapiro # if NETUNIX
163240266059SGregory Neil Shapiro 		  case AF_UNIX:
163340266059SGregory Neil Shapiro 			if (strlen(addr) >= sizeof(d->d_addr.sunix.sun_path))
163440266059SGregory Neil Shapiro 			{
163540266059SGregory Neil Shapiro 				errno = ENAMETOOLONG;
163640266059SGregory Neil Shapiro 				syserr("setsockaddroptions: domain socket name too long: %s > %d",
163740266059SGregory Neil Shapiro 				       addr, sizeof(d->d_addr.sunix.sun_path));
163840266059SGregory Neil Shapiro 				break;
163940266059SGregory Neil Shapiro 			}
164040266059SGregory Neil Shapiro 
164140266059SGregory Neil Shapiro 			/* file safety check done in opendaemonsocket() */
164240266059SGregory Neil Shapiro 			(void) memset(&d->d_addr.sunix.sun_path, '\0',
164340266059SGregory Neil Shapiro 				      sizeof(d->d_addr.sunix.sun_path));
164440266059SGregory Neil Shapiro 			(void) sm_strlcpy((char *)&d->d_addr.sunix.sun_path,
164540266059SGregory Neil Shapiro 					  addr,
164640266059SGregory Neil Shapiro 					  sizeof(d->d_addr.sunix.sun_path));
164740266059SGregory Neil Shapiro 			break;
164840266059SGregory Neil Shapiro # endif /* NETUNIX */
164940266059SGregory Neil Shapiro #endif	/* _FFR_DAEMON_NETUNIX */
1650193538b7SGregory Neil Shapiro #if NETINET
1651193538b7SGregory Neil Shapiro 		  case AF_INET:
1652193538b7SGregory Neil Shapiro 			if (!isascii(*addr) || !isdigit(*addr) ||
165340266059SGregory Neil Shapiro 			    ((d->d_addr.sin.sin_addr.s_addr = inet_addr(addr))
165440266059SGregory Neil Shapiro 			     == INADDR_NONE))
1655193538b7SGregory Neil Shapiro 			{
1656193538b7SGregory Neil Shapiro 				register struct hostent *hp;
1657193538b7SGregory Neil Shapiro 
1658193538b7SGregory Neil Shapiro 				hp = sm_gethostbyname(addr, AF_INET);
1659193538b7SGregory Neil Shapiro 				if (hp == NULL)
1660193538b7SGregory Neil Shapiro 					syserr("554 5.3.0 host \"%s\" unknown",
1661193538b7SGregory Neil Shapiro 					       addr);
1662193538b7SGregory Neil Shapiro 				else
1663193538b7SGregory Neil Shapiro 				{
1664193538b7SGregory Neil Shapiro 					while (*(hp->h_addr_list) != NULL &&
1665193538b7SGregory Neil Shapiro 					       hp->h_addrtype != AF_INET)
1666193538b7SGregory Neil Shapiro 						hp->h_addr_list++;
1667193538b7SGregory Neil Shapiro 					if (*(hp->h_addr_list) == NULL)
1668193538b7SGregory Neil Shapiro 						syserr("554 5.3.0 host \"%s\" unknown",
1669193538b7SGregory Neil Shapiro 						       addr);
1670193538b7SGregory Neil Shapiro 					else
1671193538b7SGregory Neil Shapiro 						memmove(&d->d_addr.sin.sin_addr,
1672193538b7SGregory Neil Shapiro 							*(hp->h_addr_list),
1673193538b7SGregory Neil Shapiro 							INADDRSZ);
167440266059SGregory Neil Shapiro # if NETINET6
1675193538b7SGregory Neil Shapiro 					freehostent(hp);
1676193538b7SGregory Neil Shapiro 					hp = NULL;
167740266059SGregory Neil Shapiro # endif /* NETINET6 */
1678193538b7SGregory Neil Shapiro 				}
1679193538b7SGregory Neil Shapiro 			}
1680193538b7SGregory Neil Shapiro 			break;
1681193538b7SGregory Neil Shapiro #endif /* NETINET */
1682193538b7SGregory Neil Shapiro 
1683193538b7SGregory Neil Shapiro #if NETINET6
1684193538b7SGregory Neil Shapiro 		  case AF_INET6:
168540266059SGregory Neil Shapiro 			if (anynet_pton(AF_INET6, addr,
1686193538b7SGregory Neil Shapiro 					&d->d_addr.sin6.sin6_addr) != 1)
1687193538b7SGregory Neil Shapiro 			{
1688193538b7SGregory Neil Shapiro 				register struct hostent *hp;
1689193538b7SGregory Neil Shapiro 
1690193538b7SGregory Neil Shapiro 				hp = sm_gethostbyname(addr, AF_INET6);
1691193538b7SGregory Neil Shapiro 				if (hp == NULL)
1692193538b7SGregory Neil Shapiro 					syserr("554 5.3.0 host \"%s\" unknown",
1693193538b7SGregory Neil Shapiro 					       addr);
1694193538b7SGregory Neil Shapiro 				else
1695193538b7SGregory Neil Shapiro 				{
1696193538b7SGregory Neil Shapiro 					while (*(hp->h_addr_list) != NULL &&
1697193538b7SGregory Neil Shapiro 					       hp->h_addrtype != AF_INET6)
1698193538b7SGregory Neil Shapiro 						hp->h_addr_list++;
1699193538b7SGregory Neil Shapiro 					if (*(hp->h_addr_list) == NULL)
1700193538b7SGregory Neil Shapiro 						syserr("554 5.3.0 host \"%s\" unknown",
1701193538b7SGregory Neil Shapiro 						       addr);
1702193538b7SGregory Neil Shapiro 					else
1703193538b7SGregory Neil Shapiro 						memmove(&d->d_addr.sin6.sin6_addr,
1704193538b7SGregory Neil Shapiro 							*(hp->h_addr_list),
1705193538b7SGregory Neil Shapiro 							IN6ADDRSZ);
1706193538b7SGregory Neil Shapiro 					freehostent(hp);
1707193538b7SGregory Neil Shapiro 					hp = NULL;
1708193538b7SGregory Neil Shapiro 				}
1709193538b7SGregory Neil Shapiro 			}
1710193538b7SGregory Neil Shapiro 			break;
1711193538b7SGregory Neil Shapiro #endif /* NETINET6 */
1712193538b7SGregory Neil Shapiro 
1713193538b7SGregory Neil Shapiro 		  default:
1714193538b7SGregory Neil Shapiro 			syserr("554 5.3.5 address= option unsupported for family %d",
1715193538b7SGregory Neil Shapiro 			       d->d_addr.sa.sa_family);
1716193538b7SGregory Neil Shapiro 			break;
1717193538b7SGregory Neil Shapiro 		}
1718193538b7SGregory Neil Shapiro 	}
1719193538b7SGregory Neil Shapiro 
1720193538b7SGregory Neil Shapiro 	if (port != NULL)
1721193538b7SGregory Neil Shapiro 	{
1722193538b7SGregory Neil Shapiro 		switch (d->d_addr.sa.sa_family)
1723193538b7SGregory Neil Shapiro 		{
1724193538b7SGregory Neil Shapiro #if NETINET
1725193538b7SGregory Neil Shapiro 		  case AF_INET:
1726193538b7SGregory Neil Shapiro 			if (isascii(*port) && isdigit(*port))
172740266059SGregory Neil Shapiro 				d->d_addr.sin.sin_port = htons((unsigned short)
172840266059SGregory Neil Shapiro 						     atoi((const char *) port));
1729193538b7SGregory Neil Shapiro 			else
1730193538b7SGregory Neil Shapiro 			{
1731193538b7SGregory Neil Shapiro # ifdef NO_GETSERVBYNAME
1732193538b7SGregory Neil Shapiro 				syserr("554 5.3.5 invalid port number: %s",
1733193538b7SGregory Neil Shapiro 				       port);
1734193538b7SGregory Neil Shapiro # else /* NO_GETSERVBYNAME */
1735193538b7SGregory Neil Shapiro 				register struct servent *sp;
1736193538b7SGregory Neil Shapiro 
1737193538b7SGregory Neil Shapiro 				sp = getservbyname(port, "tcp");
1738193538b7SGregory Neil Shapiro 				if (sp == NULL)
1739193538b7SGregory Neil Shapiro 					syserr("554 5.3.5 service \"%s\" unknown",
1740193538b7SGregory Neil Shapiro 					       port);
1741193538b7SGregory Neil Shapiro 				else
1742193538b7SGregory Neil Shapiro 					d->d_addr.sin.sin_port = sp->s_port;
1743193538b7SGregory Neil Shapiro # endif /* NO_GETSERVBYNAME */
1744193538b7SGregory Neil Shapiro 			}
1745193538b7SGregory Neil Shapiro 			break;
1746193538b7SGregory Neil Shapiro #endif /* NETINET */
1747193538b7SGregory Neil Shapiro 
1748193538b7SGregory Neil Shapiro #if NETINET6
1749193538b7SGregory Neil Shapiro 		  case AF_INET6:
1750193538b7SGregory Neil Shapiro 			if (isascii(*port) && isdigit(*port))
175140266059SGregory Neil Shapiro 				d->d_addr.sin6.sin6_port = htons((unsigned short)
175240266059SGregory Neil Shapiro 								  atoi(port));
1753193538b7SGregory Neil Shapiro 			else
1754193538b7SGregory Neil Shapiro 			{
1755193538b7SGregory Neil Shapiro # ifdef NO_GETSERVBYNAME
1756193538b7SGregory Neil Shapiro 				syserr("554 5.3.5 invalid port number: %s",
1757193538b7SGregory Neil Shapiro 				       port);
1758193538b7SGregory Neil Shapiro # else /* NO_GETSERVBYNAME */
1759193538b7SGregory Neil Shapiro 				register struct servent *sp;
1760193538b7SGregory Neil Shapiro 
1761193538b7SGregory Neil Shapiro 				sp = getservbyname(port, "tcp");
1762193538b7SGregory Neil Shapiro 				if (sp == NULL)
1763193538b7SGregory Neil Shapiro 					syserr("554 5.3.5 service \"%s\" unknown",
1764193538b7SGregory Neil Shapiro 					       port);
1765193538b7SGregory Neil Shapiro 				else
1766193538b7SGregory Neil Shapiro 					d->d_addr.sin6.sin6_port = sp->s_port;
1767193538b7SGregory Neil Shapiro # endif /* NO_GETSERVBYNAME */
1768193538b7SGregory Neil Shapiro 			}
1769193538b7SGregory Neil Shapiro 			break;
1770193538b7SGregory Neil Shapiro #endif /* NETINET6 */
1771193538b7SGregory Neil Shapiro 
1772193538b7SGregory Neil Shapiro #if NETISO
1773193538b7SGregory Neil Shapiro 		  case AF_ISO:
1774193538b7SGregory Neil Shapiro 			/* assume two byte transport selector */
1775193538b7SGregory Neil Shapiro 			if (isascii(*port) && isdigit(*port))
177640266059SGregory Neil Shapiro 				portno = htons((unsigned short) atoi(port));
1777193538b7SGregory Neil Shapiro 			else
1778193538b7SGregory Neil Shapiro 			{
1779193538b7SGregory Neil Shapiro # ifdef NO_GETSERVBYNAME
1780193538b7SGregory Neil Shapiro 				syserr("554 5.3.5 invalid port number: %s",
1781193538b7SGregory Neil Shapiro 				       port);
1782193538b7SGregory Neil Shapiro # else /* NO_GETSERVBYNAME */
1783193538b7SGregory Neil Shapiro 				register struct servent *sp;
1784193538b7SGregory Neil Shapiro 
1785193538b7SGregory Neil Shapiro 				sp = getservbyname(port, "tcp");
1786193538b7SGregory Neil Shapiro 				if (sp == NULL)
1787193538b7SGregory Neil Shapiro 					syserr("554 5.3.5 service \"%s\" unknown",
1788193538b7SGregory Neil Shapiro 					       port);
1789193538b7SGregory Neil Shapiro 				else
1790193538b7SGregory Neil Shapiro 					portno = sp->s_port;
1791193538b7SGregory Neil Shapiro # endif /* NO_GETSERVBYNAME */
1792193538b7SGregory Neil Shapiro 			}
1793193538b7SGregory Neil Shapiro 			memmove(TSEL(&d->d_addr.siso),
1794193538b7SGregory Neil Shapiro 				(char *) &portno, 2);
1795193538b7SGregory Neil Shapiro 			break;
1796193538b7SGregory Neil Shapiro #endif /* NETISO */
1797193538b7SGregory Neil Shapiro 
1798193538b7SGregory Neil Shapiro 		  default:
1799193538b7SGregory Neil Shapiro 			syserr("554 5.3.5 Port= option unsupported for family %d",
1800193538b7SGregory Neil Shapiro 			       d->d_addr.sa.sa_family);
1801193538b7SGregory Neil Shapiro 			break;
1802193538b7SGregory Neil Shapiro 		}
1803193538b7SGregory Neil Shapiro 	}
1804c2aa98e2SPeter Wemm }
180540266059SGregory Neil Shapiro /*
180606f25ae9SGregory Neil Shapiro **  SETDAEMONOPTIONS -- set options for running the MTA daemon
180706f25ae9SGregory Neil Shapiro **
180806f25ae9SGregory Neil Shapiro **	Parameters:
180906f25ae9SGregory Neil Shapiro **		p -- the options line.
181006f25ae9SGregory Neil Shapiro **
181106f25ae9SGregory Neil Shapiro **	Returns:
181240266059SGregory Neil Shapiro **		true if successful, false otherwise.
181340266059SGregory Neil Shapiro **
181440266059SGregory Neil Shapiro **	Side Effects:
181540266059SGregory Neil Shapiro **		increments number of daemons.
181606f25ae9SGregory Neil Shapiro */
181706f25ae9SGregory Neil Shapiro 
181840266059SGregory Neil Shapiro #define DEF_LISTENQUEUE	10
181940266059SGregory Neil Shapiro 
1820739ac4d4SGregory Neil Shapiro struct dflags
1821739ac4d4SGregory Neil Shapiro {
1822739ac4d4SGregory Neil Shapiro 	char	*d_name;
1823739ac4d4SGregory Neil Shapiro 	int	d_flag;
1824739ac4d4SGregory Neil Shapiro };
1825739ac4d4SGregory Neil Shapiro 
1826739ac4d4SGregory Neil Shapiro static struct dflags	DaemonFlags[] =
1827739ac4d4SGregory Neil Shapiro {
1828739ac4d4SGregory Neil Shapiro 	{ "AUTHREQ",		D_AUTHREQ	},
1829739ac4d4SGregory Neil Shapiro 	{ "BINDIF",		D_BINDIF	},
1830739ac4d4SGregory Neil Shapiro 	{ "CANONREQ",		D_CANONREQ	},
1831739ac4d4SGregory Neil Shapiro 	{ "IFNHELO",		D_IFNHELO	},
1832739ac4d4SGregory Neil Shapiro 	{ "FQMAIL",		D_FQMAIL	},
1833739ac4d4SGregory Neil Shapiro 	{ "FQRCPT",		D_FQRCPT	},
1834739ac4d4SGregory Neil Shapiro 	{ "SMTPS",		D_SMTPS		},
1835739ac4d4SGregory Neil Shapiro 	{ "UNQUALOK",		D_UNQUALOK	},
1836739ac4d4SGregory Neil Shapiro 	{ "NOAUTH",		D_NOAUTH	},
1837739ac4d4SGregory Neil Shapiro 	{ "NOCANON",		D_NOCANON	},
1838739ac4d4SGregory Neil Shapiro 	{ "NOETRN",		D_NOETRN	},
1839739ac4d4SGregory Neil Shapiro 	{ "NOTLS",		D_NOTLS		},
1840739ac4d4SGregory Neil Shapiro 	{ "ETRNONLY",		D_ETRNONLY	},
1841739ac4d4SGregory Neil Shapiro 	{ "OPTIONAL",		D_OPTIONAL	},
1842739ac4d4SGregory Neil Shapiro 	{ "DISABLE",		D_DISABLE	},
1843739ac4d4SGregory Neil Shapiro 	{ "ISSET",		D_ISSET		},
1844739ac4d4SGregory Neil Shapiro 	{ NULL,			0		}
1845739ac4d4SGregory Neil Shapiro };
1846739ac4d4SGregory Neil Shapiro 
1847739ac4d4SGregory Neil Shapiro static void
1848739ac4d4SGregory Neil Shapiro printdaemonflags(d)
1849739ac4d4SGregory Neil Shapiro 	DAEMON_T *d;
1850739ac4d4SGregory Neil Shapiro {
1851739ac4d4SGregory Neil Shapiro 	register struct dflags *df;
1852739ac4d4SGregory Neil Shapiro 	bool first = true;
1853739ac4d4SGregory Neil Shapiro 
1854739ac4d4SGregory Neil Shapiro 	for (df = DaemonFlags; df->d_name != NULL; df++)
1855739ac4d4SGregory Neil Shapiro 	{
1856739ac4d4SGregory Neil Shapiro 		if (!bitnset(df->d_flag, d->d_flags))
1857739ac4d4SGregory Neil Shapiro 			continue;
1858739ac4d4SGregory Neil Shapiro 		if (first)
1859e92d3f3fSGregory Neil Shapiro 			sm_dprintf("<%s", df->d_name);
1860739ac4d4SGregory Neil Shapiro 		else
1861e92d3f3fSGregory Neil Shapiro 			sm_dprintf(",%s", df->d_name);
1862739ac4d4SGregory Neil Shapiro 		first = false;
1863739ac4d4SGregory Neil Shapiro 	}
1864739ac4d4SGregory Neil Shapiro 	if (!first)
1865e92d3f3fSGregory Neil Shapiro 		sm_dprintf(">");
1866739ac4d4SGregory Neil Shapiro }
1867739ac4d4SGregory Neil Shapiro 
186806f25ae9SGregory Neil Shapiro bool
186906f25ae9SGregory Neil Shapiro setdaemonoptions(p)
187006f25ae9SGregory Neil Shapiro 	register char *p;
187106f25ae9SGregory Neil Shapiro {
187240266059SGregory Neil Shapiro 	if (NDaemons >= MAXDAEMONS)
187340266059SGregory Neil Shapiro 		return false;
187440266059SGregory Neil Shapiro 	Daemons[NDaemons].d_socket = -1;
187540266059SGregory Neil Shapiro 	Daemons[NDaemons].d_listenqueue = DEF_LISTENQUEUE;
187640266059SGregory Neil Shapiro 	clrbitmap(Daemons[NDaemons].d_flags);
187740266059SGregory Neil Shapiro 	setsockaddroptions(p, &Daemons[NDaemons]);
187806f25ae9SGregory Neil Shapiro 
187940266059SGregory Neil Shapiro #if MILTER
188040266059SGregory Neil Shapiro 	if (Daemons[NDaemons].d_inputfilterlist != NULL)
188140266059SGregory Neil Shapiro 		Daemons[NDaemons].d_inputfilterlist = newstr(Daemons[NDaemons].d_inputfilterlist);
188240266059SGregory Neil Shapiro #endif /* MILTER */
188340266059SGregory Neil Shapiro 
188440266059SGregory Neil Shapiro 	if (Daemons[NDaemons].d_name != NULL)
188540266059SGregory Neil Shapiro 		Daemons[NDaemons].d_name = newstr(Daemons[NDaemons].d_name);
188606f25ae9SGregory Neil Shapiro 	else
188706f25ae9SGregory Neil Shapiro 	{
188806f25ae9SGregory Neil Shapiro 		char num[30];
188906f25ae9SGregory Neil Shapiro 
1890d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(num, sizeof(num), "Daemon%d", NDaemons);
189140266059SGregory Neil Shapiro 		Daemons[NDaemons].d_name = newstr(num);
189206f25ae9SGregory Neil Shapiro 	}
189306f25ae9SGregory Neil Shapiro 
189406f25ae9SGregory Neil Shapiro 	if (tTd(37, 1))
189506f25ae9SGregory Neil Shapiro 	{
189640266059SGregory Neil Shapiro 		sm_dprintf("Daemon %s flags: ", Daemons[NDaemons].d_name);
1897739ac4d4SGregory Neil Shapiro 		printdaemonflags(&Daemons[NDaemons]);
189840266059SGregory Neil Shapiro 		sm_dprintf("\n");
189906f25ae9SGregory Neil Shapiro 	}
190040266059SGregory Neil Shapiro 	++NDaemons;
190140266059SGregory Neil Shapiro 	return true;
190206f25ae9SGregory Neil Shapiro }
190340266059SGregory Neil Shapiro /*
190406f25ae9SGregory Neil Shapiro **  INITDAEMON -- initialize daemon if not yet done.
190506f25ae9SGregory Neil Shapiro **
190606f25ae9SGregory Neil Shapiro **	Parameters:
190706f25ae9SGregory Neil Shapiro **		none
190806f25ae9SGregory Neil Shapiro **
190906f25ae9SGregory Neil Shapiro **	Returns:
191006f25ae9SGregory Neil Shapiro **		none
191106f25ae9SGregory Neil Shapiro **
191206f25ae9SGregory Neil Shapiro **	Side Effects:
191306f25ae9SGregory Neil Shapiro **		initializes structure for one daemon.
191406f25ae9SGregory Neil Shapiro */
191540266059SGregory Neil Shapiro 
191606f25ae9SGregory Neil Shapiro void
191706f25ae9SGregory Neil Shapiro initdaemon()
191806f25ae9SGregory Neil Shapiro {
191940266059SGregory Neil Shapiro 	if (NDaemons == 0)
192006f25ae9SGregory Neil Shapiro 	{
192140266059SGregory Neil Shapiro 		Daemons[NDaemons].d_socket = -1;
192240266059SGregory Neil Shapiro 		Daemons[NDaemons].d_listenqueue = DEF_LISTENQUEUE;
192340266059SGregory Neil Shapiro 		Daemons[NDaemons].d_name = "Daemon0";
192440266059SGregory Neil Shapiro 		NDaemons = 1;
192506f25ae9SGregory Neil Shapiro 	}
192606f25ae9SGregory Neil Shapiro }
192740266059SGregory Neil Shapiro /*
192806f25ae9SGregory Neil Shapiro **  SETCLIENTOPTIONS -- set options for running the client
192906f25ae9SGregory Neil Shapiro **
193006f25ae9SGregory Neil Shapiro **	Parameters:
193106f25ae9SGregory Neil Shapiro **		p -- the options line.
193206f25ae9SGregory Neil Shapiro **
193306f25ae9SGregory Neil Shapiro **	Returns:
193406f25ae9SGregory Neil Shapiro **		none.
193506f25ae9SGregory Neil Shapiro */
193606f25ae9SGregory Neil Shapiro 
193740266059SGregory Neil Shapiro static DAEMON_T	ClientSettings[AF_MAX + 1];
193806f25ae9SGregory Neil Shapiro 
193906f25ae9SGregory Neil Shapiro void
194006f25ae9SGregory Neil Shapiro setclientoptions(p)
194106f25ae9SGregory Neil Shapiro 	register char *p;
194206f25ae9SGregory Neil Shapiro {
194340266059SGregory Neil Shapiro 	int family;
194440266059SGregory Neil Shapiro 	DAEMON_T d;
194506f25ae9SGregory Neil Shapiro 
1946d0cef73dSGregory Neil Shapiro 	memset(&d, '\0', sizeof(d));
194706f25ae9SGregory Neil Shapiro 	setsockaddroptions(p, &d);
194806f25ae9SGregory Neil Shapiro 
194906f25ae9SGregory Neil Shapiro 	/* grab what we need */
195040266059SGregory Neil Shapiro 	family = d.d_addr.sa.sa_family;
195140266059SGregory Neil Shapiro 	STRUCTCOPY(d, ClientSettings[family]);
195240266059SGregory Neil Shapiro 	setbitn(D_ISSET, ClientSettings[family].d_flags); /* mark as set */
195340266059SGregory Neil Shapiro 	if (d.d_name != NULL)
195440266059SGregory Neil Shapiro 		ClientSettings[family].d_name = newstr(d.d_name);
195506f25ae9SGregory Neil Shapiro 	else
195640266059SGregory Neil Shapiro 	{
195740266059SGregory Neil Shapiro 		char num[30];
195840266059SGregory Neil Shapiro 
1959d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(num, sizeof(num), "Client%d", family);
196040266059SGregory Neil Shapiro 		ClientSettings[family].d_name = newstr(num);
196106f25ae9SGregory Neil Shapiro 	}
196240266059SGregory Neil Shapiro }
196340266059SGregory Neil Shapiro /*
196406f25ae9SGregory Neil Shapiro **  ADDR_FAMILY -- determine address family from address
196506f25ae9SGregory Neil Shapiro **
196606f25ae9SGregory Neil Shapiro **	Parameters:
196706f25ae9SGregory Neil Shapiro **		addr -- the string representation of the address
196806f25ae9SGregory Neil Shapiro **
196906f25ae9SGregory Neil Shapiro **	Returns:
197006f25ae9SGregory Neil Shapiro **		AF_INET, AF_INET6 or AF_UNSPEC
197106f25ae9SGregory Neil Shapiro **
197206f25ae9SGregory Neil Shapiro **	Side Effects:
197306f25ae9SGregory Neil Shapiro **		none.
197406f25ae9SGregory Neil Shapiro */
197506f25ae9SGregory Neil Shapiro 
197606f25ae9SGregory Neil Shapiro static int
197706f25ae9SGregory Neil Shapiro addr_family(addr)
197806f25ae9SGregory Neil Shapiro 	char *addr;
197906f25ae9SGregory Neil Shapiro {
198006f25ae9SGregory Neil Shapiro #if NETINET6
198106f25ae9SGregory Neil Shapiro 	SOCKADDR clt_addr;
198206f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
198306f25ae9SGregory Neil Shapiro 
198406f25ae9SGregory Neil Shapiro #if NETINET
198506f25ae9SGregory Neil Shapiro 	if (inet_addr(addr) != INADDR_NONE)
198606f25ae9SGregory Neil Shapiro 	{
198706f25ae9SGregory Neil Shapiro 		if (tTd(16, 9))
198840266059SGregory Neil Shapiro 			sm_dprintf("addr_family(%s): INET\n", addr);
198906f25ae9SGregory Neil Shapiro 		return AF_INET;
199006f25ae9SGregory Neil Shapiro 	}
199106f25ae9SGregory Neil Shapiro #endif /* NETINET */
199206f25ae9SGregory Neil Shapiro #if NETINET6
199340266059SGregory Neil Shapiro 	if (anynet_pton(AF_INET6, addr, &clt_addr.sin6.sin6_addr) == 1)
199406f25ae9SGregory Neil Shapiro 	{
199506f25ae9SGregory Neil Shapiro 		if (tTd(16, 9))
199640266059SGregory Neil Shapiro 			sm_dprintf("addr_family(%s): INET6\n", addr);
199706f25ae9SGregory Neil Shapiro 		return AF_INET6;
199806f25ae9SGregory Neil Shapiro 	}
199906f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
200040266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
200140266059SGregory Neil Shapiro # if NETUNIX
200240266059SGregory Neil Shapiro 	if (*addr == '/')
200340266059SGregory Neil Shapiro 	{
200406f25ae9SGregory Neil Shapiro 		if (tTd(16, 9))
200540266059SGregory Neil Shapiro 			sm_dprintf("addr_family(%s): LOCAL\n", addr);
200640266059SGregory Neil Shapiro 		return AF_UNIX;
200740266059SGregory Neil Shapiro 	}
200840266059SGregory Neil Shapiro # endif /* NETUNIX */
200940266059SGregory Neil Shapiro #endif	/* _FFR_DAEMON_NETUNIX */
201040266059SGregory Neil Shapiro 	if (tTd(16, 9))
201140266059SGregory Neil Shapiro 		sm_dprintf("addr_family(%s): UNSPEC\n", addr);
201206f25ae9SGregory Neil Shapiro 	return AF_UNSPEC;
201306f25ae9SGregory Neil Shapiro }
201440266059SGregory Neil Shapiro 
201540266059SGregory Neil Shapiro /*
201640266059SGregory Neil Shapiro **  CHKCLIENTMODIFIERS -- check whether all clients have set a flag.
201740266059SGregory Neil Shapiro **
201840266059SGregory Neil Shapiro **	Parameters:
201940266059SGregory Neil Shapiro **		flag -- the flag to test.
202040266059SGregory Neil Shapiro **
202140266059SGregory Neil Shapiro **	Returns:
202240266059SGregory Neil Shapiro **		true iff all configured clients have set the flag.
202340266059SGregory Neil Shapiro */
202440266059SGregory Neil Shapiro 
202540266059SGregory Neil Shapiro bool
202640266059SGregory Neil Shapiro chkclientmodifiers(flag)
202740266059SGregory Neil Shapiro 	int flag;
202840266059SGregory Neil Shapiro {
202940266059SGregory Neil Shapiro 	int i;
203040266059SGregory Neil Shapiro 	bool flagisset;
203140266059SGregory Neil Shapiro 
203240266059SGregory Neil Shapiro 	flagisset = false;
203340266059SGregory Neil Shapiro 	for (i = 0; i < AF_MAX; i++)
203440266059SGregory Neil Shapiro 	{
203540266059SGregory Neil Shapiro 		if (bitnset(D_ISSET, ClientSettings[i].d_flags))
203640266059SGregory Neil Shapiro 		{
203740266059SGregory Neil Shapiro 			if (!bitnset((char) flag, ClientSettings[i].d_flags))
203840266059SGregory Neil Shapiro 				return false;
203940266059SGregory Neil Shapiro 			flagisset = true;
204040266059SGregory Neil Shapiro 		}
204140266059SGregory Neil Shapiro 	}
204240266059SGregory Neil Shapiro 	return flagisset;
204340266059SGregory Neil Shapiro }
204440266059SGregory Neil Shapiro 
204540266059SGregory Neil Shapiro #if MILTER
204640266059SGregory Neil Shapiro /*
204740266059SGregory Neil Shapiro **  SETUP_DAEMON_FILTERS -- Parse per-socket filters
204840266059SGregory Neil Shapiro **
204940266059SGregory Neil Shapiro **	Parameters:
205040266059SGregory Neil Shapiro **		none
205140266059SGregory Neil Shapiro **
205240266059SGregory Neil Shapiro **	Returns:
205340266059SGregory Neil Shapiro **		none
205440266059SGregory Neil Shapiro */
205540266059SGregory Neil Shapiro 
205640266059SGregory Neil Shapiro void
205740266059SGregory Neil Shapiro setup_daemon_milters()
205840266059SGregory Neil Shapiro {
205940266059SGregory Neil Shapiro 	int idx;
206040266059SGregory Neil Shapiro 
206140266059SGregory Neil Shapiro 	if (OpMode == MD_SMTP)
206240266059SGregory Neil Shapiro 	{
206340266059SGregory Neil Shapiro 		/* no need to configure the daemons */
206440266059SGregory Neil Shapiro 		return;
206540266059SGregory Neil Shapiro 	}
206640266059SGregory Neil Shapiro 
206740266059SGregory Neil Shapiro 	for (idx = 0; idx < NDaemons; idx++)
206840266059SGregory Neil Shapiro 	{
206940266059SGregory Neil Shapiro 		if (Daemons[idx].d_inputfilterlist != NULL)
207040266059SGregory Neil Shapiro 		{
207140266059SGregory Neil Shapiro 			milter_config(Daemons[idx].d_inputfilterlist,
207240266059SGregory Neil Shapiro 				      Daemons[idx].d_inputfilters,
207340266059SGregory Neil Shapiro 				      MAXFILTERS);
207440266059SGregory Neil Shapiro 		}
207540266059SGregory Neil Shapiro 	}
207640266059SGregory Neil Shapiro }
207740266059SGregory Neil Shapiro #endif /* MILTER */
207840266059SGregory Neil Shapiro /*
207906f25ae9SGregory Neil Shapiro **  MAKECONNECTION -- make a connection to an SMTP socket on a machine.
2080c2aa98e2SPeter Wemm **
2081c2aa98e2SPeter Wemm **	Parameters:
2082c2aa98e2SPeter Wemm **		host -- the name of the host.
2083c2aa98e2SPeter Wemm **		port -- the port number to connect to.
2084c2aa98e2SPeter Wemm **		mci -- a pointer to the mail connection information
2085c2aa98e2SPeter Wemm **			structure to be filled in.
2086c2aa98e2SPeter Wemm **		e -- the current envelope.
208740266059SGregory Neil Shapiro **		enough -- time at which to stop further connection attempts.
208840266059SGregory Neil Shapiro **			(0 means no limit)
2089c2aa98e2SPeter Wemm **
2090c2aa98e2SPeter Wemm **	Returns:
2091c2aa98e2SPeter Wemm **		An exit code telling whether the connection could be
2092c2aa98e2SPeter Wemm **			made and if not why not.
2093c2aa98e2SPeter Wemm **
2094c2aa98e2SPeter Wemm **	Side Effects:
2095c2aa98e2SPeter Wemm **		none.
2096c2aa98e2SPeter Wemm */
2097c2aa98e2SPeter Wemm 
2098c2aa98e2SPeter Wemm static jmp_buf	CtxConnectTimeout;
2099c2aa98e2SPeter Wemm 
2100c2aa98e2SPeter Wemm SOCKADDR	CurHostAddr;		/* address of current host */
2101c2aa98e2SPeter Wemm 
2102c2aa98e2SPeter Wemm int
210340266059SGregory Neil Shapiro makeconnection(host, port, mci, e, enough)
2104c2aa98e2SPeter Wemm 	char *host;
210540266059SGregory Neil Shapiro 	volatile unsigned int port;
2106c2aa98e2SPeter Wemm 	register MCI *mci;
2107c2aa98e2SPeter Wemm 	ENVELOPE *e;
210840266059SGregory Neil Shapiro 	time_t enough;
2109c2aa98e2SPeter Wemm {
2110c2aa98e2SPeter Wemm 	register volatile int addrno = 0;
211140266059SGregory Neil Shapiro 	volatile int s;
2112c2aa98e2SPeter Wemm 	register struct hostent *volatile hp = (struct hostent *) NULL;
2113c2aa98e2SPeter Wemm 	SOCKADDR addr;
211406f25ae9SGregory Neil Shapiro 	SOCKADDR clt_addr;
211506f25ae9SGregory Neil Shapiro 	int save_errno = 0;
211606f25ae9SGregory Neil Shapiro 	volatile SOCKADDR_LEN_T addrlen;
2117af9557fdSGregory Neil Shapiro 	volatile bool firstconnect = true;
211840266059SGregory Neil Shapiro 	SM_EVENT *volatile ev = NULL;
211906f25ae9SGregory Neil Shapiro #if NETINET6
212040266059SGregory Neil Shapiro 	volatile bool v6found = false;
212106f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
212206f25ae9SGregory Neil Shapiro 	volatile int family = InetMode;
212306f25ae9SGregory Neil Shapiro 	SOCKADDR_LEN_T len;
212406f25ae9SGregory Neil Shapiro 	volatile SOCKADDR_LEN_T socksize = 0;
212506f25ae9SGregory Neil Shapiro 	volatile bool clt_bind;
212606f25ae9SGregory Neil Shapiro 	BITMAP256 d_flags;
212706f25ae9SGregory Neil Shapiro 	char *p;
212806f25ae9SGregory Neil Shapiro 	extern ENVELOPE BlankEnvelope;
212906f25ae9SGregory Neil Shapiro 
213040266059SGregory Neil Shapiro 	/* retranslate {daemon_flags} into bitmap */
213106f25ae9SGregory Neil Shapiro 	clrbitmap(d_flags);
213240266059SGregory Neil Shapiro 	if ((p = macvalue(macid("{daemon_flags}"), e)) != NULL)
213306f25ae9SGregory Neil Shapiro 	{
213406f25ae9SGregory Neil Shapiro 		for (; *p != '\0'; p++)
213506f25ae9SGregory Neil Shapiro 		{
213606f25ae9SGregory Neil Shapiro 			if (!(isascii(*p) && isspace(*p)))
2137193538b7SGregory Neil Shapiro 				setbitn(bitidx(*p), d_flags);
213806f25ae9SGregory Neil Shapiro 		}
213906f25ae9SGregory Neil Shapiro 	}
214006f25ae9SGregory Neil Shapiro 
214106f25ae9SGregory Neil Shapiro #if NETINET6
214206f25ae9SGregory Neil Shapiro  v4retry:
214306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
214440266059SGregory Neil Shapiro 	clt_bind = false;
214506f25ae9SGregory Neil Shapiro 
214606f25ae9SGregory Neil Shapiro 	/* Set up the address for outgoing connection. */
214706f25ae9SGregory Neil Shapiro 	if (bitnset(D_BINDIF, d_flags) &&
214840266059SGregory Neil Shapiro 	    (p = macvalue(macid("{if_addr}"), e)) != NULL &&
2149602a2b1bSGregory Neil Shapiro 	    *p != '\0')
215006f25ae9SGregory Neil Shapiro 	{
215106f25ae9SGregory Neil Shapiro #if NETINET6
215206f25ae9SGregory Neil Shapiro 		char p6[INET6_ADDRSTRLEN];
215306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
215406f25ae9SGregory Neil Shapiro 
2155d0cef73dSGregory Neil Shapiro 		memset(&clt_addr, '\0', sizeof(clt_addr));
215606f25ae9SGregory Neil Shapiro 
215706f25ae9SGregory Neil Shapiro 		/* infer the address family from the address itself */
215806f25ae9SGregory Neil Shapiro 		clt_addr.sa.sa_family = addr_family(p);
215906f25ae9SGregory Neil Shapiro 		switch (clt_addr.sa.sa_family)
216006f25ae9SGregory Neil Shapiro 		{
216106f25ae9SGregory Neil Shapiro #if NETINET
216206f25ae9SGregory Neil Shapiro 		  case AF_INET:
2163602a2b1bSGregory Neil Shapiro 			clt_addr.sin.sin_addr.s_addr = inet_addr(p);
2164602a2b1bSGregory Neil Shapiro 			if (clt_addr.sin.sin_addr.s_addr != INADDR_NONE &&
21659bd497b8SGregory Neil Shapiro 			    clt_addr.sin.sin_addr.s_addr !=
21669bd497b8SGregory Neil Shapiro 				htonl(INADDR_LOOPBACK))
216706f25ae9SGregory Neil Shapiro 			{
216840266059SGregory Neil Shapiro 				clt_bind = true;
216906f25ae9SGregory Neil Shapiro 				socksize = sizeof(struct sockaddr_in);
217006f25ae9SGregory Neil Shapiro 			}
217106f25ae9SGregory Neil Shapiro 			break;
217206f25ae9SGregory Neil Shapiro #endif /* NETINET */
217306f25ae9SGregory Neil Shapiro 
217406f25ae9SGregory Neil Shapiro #if NETINET6
217506f25ae9SGregory Neil Shapiro 		  case AF_INET6:
217606f25ae9SGregory Neil Shapiro 			if (inet_addr(p) != INADDR_NONE)
2177d0cef73dSGregory Neil Shapiro 				(void) sm_snprintf(p6, sizeof(p6),
217840266059SGregory Neil Shapiro 						   "IPv6:::ffff:%s", p);
217906f25ae9SGregory Neil Shapiro 			else
2180d0cef73dSGregory Neil Shapiro 				(void) sm_strlcpy(p6, p, sizeof(p6));
218140266059SGregory Neil Shapiro 			if (anynet_pton(AF_INET6, p6,
2182602a2b1bSGregory Neil Shapiro 					&clt_addr.sin6.sin6_addr) == 1 &&
2183602a2b1bSGregory Neil Shapiro 			    !IN6_IS_ADDR_LOOPBACK(&clt_addr.sin6.sin6_addr))
218406f25ae9SGregory Neil Shapiro 			{
218540266059SGregory Neil Shapiro 				clt_bind = true;
218606f25ae9SGregory Neil Shapiro 				socksize = sizeof(struct sockaddr_in6);
218706f25ae9SGregory Neil Shapiro 			}
218806f25ae9SGregory Neil Shapiro 			break;
218906f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
219006f25ae9SGregory Neil Shapiro 
219106f25ae9SGregory Neil Shapiro #if 0
219206f25ae9SGregory Neil Shapiro 		  default:
219306f25ae9SGregory Neil Shapiro 			syserr("554 5.3.5 Address= option unsupported for family %d",
219406f25ae9SGregory Neil Shapiro 			       clt_addr.sa.sa_family);
219506f25ae9SGregory Neil Shapiro 			break;
219606f25ae9SGregory Neil Shapiro #endif /* 0 */
219706f25ae9SGregory Neil Shapiro 		}
219806f25ae9SGregory Neil Shapiro 		if (clt_bind)
219906f25ae9SGregory Neil Shapiro 			family = clt_addr.sa.sa_family;
220006f25ae9SGregory Neil Shapiro 	}
220140266059SGregory Neil Shapiro 
220240266059SGregory Neil Shapiro 	/* D_BINDIF not set or not available, fallback to ClientPortOptions */
220340266059SGregory Neil Shapiro 	if (!clt_bind)
220406f25ae9SGregory Neil Shapiro 	{
220540266059SGregory Neil Shapiro 		STRUCTCOPY(ClientSettings[family].d_addr, clt_addr);
220606f25ae9SGregory Neil Shapiro 		switch (clt_addr.sa.sa_family)
220706f25ae9SGregory Neil Shapiro 		{
220806f25ae9SGregory Neil Shapiro #if NETINET
220906f25ae9SGregory Neil Shapiro 		  case AF_INET:
221006f25ae9SGregory Neil Shapiro 			if (clt_addr.sin.sin_addr.s_addr == 0)
2211e3793f76SGregory Neil Shapiro 				clt_addr.sin.sin_addr.s_addr = LocalDaemon ?
2212e3793f76SGregory Neil Shapiro 					htonl(INADDR_LOOPBACK) : INADDR_ANY;
221306f25ae9SGregory Neil Shapiro 			else
221440266059SGregory Neil Shapiro 				clt_bind = true;
221506f25ae9SGregory Neil Shapiro 			if (clt_addr.sin.sin_port != 0)
221640266059SGregory Neil Shapiro 				clt_bind = true;
221706f25ae9SGregory Neil Shapiro 			socksize = sizeof(struct sockaddr_in);
221806f25ae9SGregory Neil Shapiro 			break;
221906f25ae9SGregory Neil Shapiro #endif /* NETINET */
222006f25ae9SGregory Neil Shapiro #if NETINET6
222106f25ae9SGregory Neil Shapiro 		  case AF_INET6:
222206f25ae9SGregory Neil Shapiro 			if (IN6_IS_ADDR_UNSPECIFIED(&clt_addr.sin6.sin6_addr))
2223*6f9c8e5bSGregory Neil Shapiro 				clt_addr.sin6.sin6_addr =
2224*6f9c8e5bSGregory Neil Shapiro 					(LocalDaemon && V6LoopbackAddrFound) ?
2225e3793f76SGregory Neil Shapiro 					in6addr_loopback : in6addr_any;
222606f25ae9SGregory Neil Shapiro 			else
222740266059SGregory Neil Shapiro 				clt_bind = true;
222806f25ae9SGregory Neil Shapiro 			socksize = sizeof(struct sockaddr_in6);
222906f25ae9SGregory Neil Shapiro 			if (clt_addr.sin6.sin6_port != 0)
223040266059SGregory Neil Shapiro 				clt_bind = true;
223106f25ae9SGregory Neil Shapiro 			break;
223206f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
223306f25ae9SGregory Neil Shapiro #if NETISO
223406f25ae9SGregory Neil Shapiro 		  case AF_ISO:
2235d0cef73dSGregory Neil Shapiro 			socksize = sizeof(clt_addr.siso);
223640266059SGregory Neil Shapiro 			clt_bind = true;
223706f25ae9SGregory Neil Shapiro 			break;
223806f25ae9SGregory Neil Shapiro #endif /* NETISO */
223906f25ae9SGregory Neil Shapiro 		  default:
224006f25ae9SGregory Neil Shapiro 			break;
224106f25ae9SGregory Neil Shapiro 		}
224206f25ae9SGregory Neil Shapiro 	}
2243c2aa98e2SPeter Wemm 
2244c2aa98e2SPeter Wemm 	/*
2245c2aa98e2SPeter Wemm 	**  Set up the address for the mailer.
2246c2aa98e2SPeter Wemm 	**	Accept "[a.b.c.d]" syntax for host name.
2247c2aa98e2SPeter Wemm 	*/
2248c2aa98e2SPeter Wemm 
2249602a2b1bSGregory Neil Shapiro 	SM_SET_H_ERRNO(0);
2250c2aa98e2SPeter Wemm 	errno = 0;
2251d0cef73dSGregory Neil Shapiro 	memset(&CurHostAddr, '\0', sizeof(CurHostAddr));
2252d0cef73dSGregory Neil Shapiro 	memset(&addr, '\0', sizeof(addr));
2253c2aa98e2SPeter Wemm 	SmtpPhase = mci->mci_phase = "initial connection";
2254c2aa98e2SPeter Wemm 	CurHostName = host;
2255c2aa98e2SPeter Wemm 
2256c2aa98e2SPeter Wemm 	if (host[0] == '[')
2257c2aa98e2SPeter Wemm 	{
225806f25ae9SGregory Neil Shapiro 		p = strchr(host, ']');
2259c2aa98e2SPeter Wemm 		if (p != NULL)
2260c2aa98e2SPeter Wemm 		{
2261c2aa98e2SPeter Wemm #if NETINET
226206f25ae9SGregory Neil Shapiro 			unsigned long hid = INADDR_NONE;
226306f25ae9SGregory Neil Shapiro #endif /* NETINET */
226406f25ae9SGregory Neil Shapiro #if NETINET6
226506f25ae9SGregory Neil Shapiro 			struct sockaddr_in6 hid6;
226606f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
226706f25ae9SGregory Neil Shapiro 
226806f25ae9SGregory Neil Shapiro 			*p = '\0';
226906f25ae9SGregory Neil Shapiro #if NETINET6
2270d0cef73dSGregory Neil Shapiro 			memset(&hid6, '\0', sizeof(hid6));
227106f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
227206f25ae9SGregory Neil Shapiro #if NETINET
227306f25ae9SGregory Neil Shapiro 			if (family == AF_INET &&
227406f25ae9SGregory Neil Shapiro 			    (hid = inet_addr(&host[1])) != INADDR_NONE)
227506f25ae9SGregory Neil Shapiro 			{
227606f25ae9SGregory Neil Shapiro 				addr.sin.sin_family = AF_INET;
227706f25ae9SGregory Neil Shapiro 				addr.sin.sin_addr.s_addr = hid;
227806f25ae9SGregory Neil Shapiro 			}
227906f25ae9SGregory Neil Shapiro 			else
228006f25ae9SGregory Neil Shapiro #endif /* NETINET */
228106f25ae9SGregory Neil Shapiro #if NETINET6
228206f25ae9SGregory Neil Shapiro 			if (family == AF_INET6 &&
228340266059SGregory Neil Shapiro 			    anynet_pton(AF_INET6, &host[1],
228406f25ae9SGregory Neil Shapiro 					&hid6.sin6_addr) == 1)
228506f25ae9SGregory Neil Shapiro 			{
228606f25ae9SGregory Neil Shapiro 				addr.sin6.sin6_family = AF_INET6;
228706f25ae9SGregory Neil Shapiro 				addr.sin6.sin6_addr = hid6.sin6_addr;
228806f25ae9SGregory Neil Shapiro 			}
228906f25ae9SGregory Neil Shapiro 			else
229006f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
2291c2aa98e2SPeter Wemm 			{
2292c2aa98e2SPeter Wemm 				/* try it as a host name (avoid MX lookup) */
229306f25ae9SGregory Neil Shapiro 				hp = sm_gethostbyname(&host[1], family);
2294c2aa98e2SPeter Wemm 				if (hp == NULL && p[-1] == '.')
2295c2aa98e2SPeter Wemm 				{
2296c2aa98e2SPeter Wemm #if NAMED_BIND
2297c2aa98e2SPeter Wemm 					int oldopts = _res.options;
2298c2aa98e2SPeter Wemm 
2299c2aa98e2SPeter Wemm 					_res.options &= ~(RES_DEFNAMES|RES_DNSRCH);
230006f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
2301c2aa98e2SPeter Wemm 					p[-1] = '\0';
230206f25ae9SGregory Neil Shapiro 					hp = sm_gethostbyname(&host[1],
230306f25ae9SGregory Neil Shapiro 							      family);
2304c2aa98e2SPeter Wemm 					p[-1] = '.';
2305c2aa98e2SPeter Wemm #if NAMED_BIND
2306c2aa98e2SPeter Wemm 					_res.options = oldopts;
230706f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
2308c2aa98e2SPeter Wemm 				}
2309c2aa98e2SPeter Wemm 				*p = ']';
2310c2aa98e2SPeter Wemm 				goto gothostent;
2311c2aa98e2SPeter Wemm 			}
2312c2aa98e2SPeter Wemm 			*p = ']';
2313c2aa98e2SPeter Wemm 		}
2314c2aa98e2SPeter Wemm 		if (p == NULL)
2315c2aa98e2SPeter Wemm 		{
2316c2aa98e2SPeter Wemm 			extern char MsgBuf[];
2317c2aa98e2SPeter Wemm 
231806f25ae9SGregory Neil Shapiro 			usrerrenh("5.1.2",
231906f25ae9SGregory Neil Shapiro 				  "553 Invalid numeric domain spec \"%s\"",
232006f25ae9SGregory Neil Shapiro 				  host);
2321c2aa98e2SPeter Wemm 			mci_setstat(mci, EX_NOHOST, "5.1.2", MsgBuf);
232206f25ae9SGregory Neil Shapiro 			errno = EINVAL;
2323c2aa98e2SPeter Wemm 			return EX_NOHOST;
2324c2aa98e2SPeter Wemm 		}
2325c2aa98e2SPeter Wemm 	}
2326c2aa98e2SPeter Wemm 	else
2327c2aa98e2SPeter Wemm 	{
2328c2aa98e2SPeter Wemm 		/* contortion to get around SGI cc complaints */
2329c2aa98e2SPeter Wemm 		{
233006f25ae9SGregory Neil Shapiro 			p = &host[strlen(host) - 1];
233106f25ae9SGregory Neil Shapiro 			hp = sm_gethostbyname(host, family);
2332c2aa98e2SPeter Wemm 			if (hp == NULL && *p == '.')
2333c2aa98e2SPeter Wemm 			{
2334c2aa98e2SPeter Wemm #if NAMED_BIND
2335c2aa98e2SPeter Wemm 				int oldopts = _res.options;
2336c2aa98e2SPeter Wemm 
2337c2aa98e2SPeter Wemm 				_res.options &= ~(RES_DEFNAMES|RES_DNSRCH);
233806f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
2339c2aa98e2SPeter Wemm 				*p = '\0';
234006f25ae9SGregory Neil Shapiro 				hp = sm_gethostbyname(host, family);
2341c2aa98e2SPeter Wemm 				*p = '.';
2342c2aa98e2SPeter Wemm #if NAMED_BIND
2343c2aa98e2SPeter Wemm 				_res.options = oldopts;
234406f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
2345c2aa98e2SPeter Wemm 			}
2346c2aa98e2SPeter Wemm 		}
2347c2aa98e2SPeter Wemm gothostent:
23489bd497b8SGregory Neil Shapiro 		if (hp == NULL || hp->h_addr == NULL)
2349c2aa98e2SPeter Wemm 		{
2350c2aa98e2SPeter Wemm #if NAMED_BIND
2351c2aa98e2SPeter Wemm 			/* check for name server timeouts */
235240266059SGregory Neil Shapiro # if NETINET6
235340266059SGregory Neil Shapiro 			if (WorkAroundBrokenAAAA && family == AF_INET6 &&
235440266059SGregory Neil Shapiro 			    errno == ETIMEDOUT)
235540266059SGregory Neil Shapiro 			{
235640266059SGregory Neil Shapiro 				/*
235740266059SGregory Neil Shapiro 				**  An attempt with family AF_INET may
235840266059SGregory Neil Shapiro 				**  succeed By skipping the next section
235940266059SGregory Neil Shapiro 				**  of code, we will try AF_INET before
236040266059SGregory Neil Shapiro 				**  failing.
236140266059SGregory Neil Shapiro 				*/
236240266059SGregory Neil Shapiro 
236340266059SGregory Neil Shapiro 				if (tTd(16, 10))
236440266059SGregory Neil Shapiro 					sm_dprintf("makeconnection: WorkAroundBrokenAAAA: Trying AF_INET lookup (AF_INET6 failed)\n");
236540266059SGregory Neil Shapiro 			}
236640266059SGregory Neil Shapiro 			else
236740266059SGregory Neil Shapiro # endif /* NETINET6 */
236840266059SGregory Neil Shapiro 			{
236940266059SGregory Neil Shapiro 				if (errno == ETIMEDOUT ||
2370d0cef73dSGregory Neil Shapiro # if _FFR_GETHBN_ExFILE
2371d0cef73dSGregory Neil Shapiro #  ifdef EMFILE
2372d0cef73dSGregory Neil Shapiro 				   errno == EMFILE ||
2373d0cef73dSGregory Neil Shapiro #  endif /* EMFILE */
2374d0cef73dSGregory Neil Shapiro #  ifdef ENFILE
2375d0cef73dSGregory Neil Shapiro 				   errno == ENFILE ||
2376d0cef73dSGregory Neil Shapiro #  endif /* ENFILE */
2377d0cef73dSGregory Neil Shapiro # endif /* _FFR_GETHBN_ExFILE */
237840266059SGregory Neil Shapiro 				    h_errno == TRY_AGAIN ||
2379c2aa98e2SPeter Wemm 				    (errno == ECONNREFUSED && UseNameServer))
2380c2aa98e2SPeter Wemm 				{
238106f25ae9SGregory Neil Shapiro 					save_errno = errno;
238240266059SGregory Neil Shapiro 					mci_setstat(mci, EX_TEMPFAIL,
238340266059SGregory Neil Shapiro 						    "4.4.3", NULL);
238406f25ae9SGregory Neil Shapiro 					errno = save_errno;
2385c2aa98e2SPeter Wemm 					return EX_TEMPFAIL;
2386c2aa98e2SPeter Wemm 				}
238740266059SGregory Neil Shapiro 			}
238806f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
238906f25ae9SGregory Neil Shapiro #if NETINET6
239006f25ae9SGregory Neil Shapiro 			/*
239106f25ae9SGregory Neil Shapiro 			**  Try v6 first, then fall back to v4.
239206f25ae9SGregory Neil Shapiro 			**  If we found a v6 address, but no v4
239306f25ae9SGregory Neil Shapiro 			**  addresses, then TEMPFAIL.
239406f25ae9SGregory Neil Shapiro 			*/
239506f25ae9SGregory Neil Shapiro 
239606f25ae9SGregory Neil Shapiro 			if (family == AF_INET6)
239706f25ae9SGregory Neil Shapiro 			{
239806f25ae9SGregory Neil Shapiro 				family = AF_INET;
239906f25ae9SGregory Neil Shapiro 				goto v4retry;
240006f25ae9SGregory Neil Shapiro 			}
240106f25ae9SGregory Neil Shapiro 			if (v6found)
240206f25ae9SGregory Neil Shapiro 				goto v6tempfail;
240306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
240406f25ae9SGregory Neil Shapiro 			save_errno = errno;
2405c2aa98e2SPeter Wemm 			mci_setstat(mci, EX_NOHOST, "5.1.2", NULL);
240606f25ae9SGregory Neil Shapiro 			errno = save_errno;
240706f25ae9SGregory Neil Shapiro 			return EX_NOHOST;
2408c2aa98e2SPeter Wemm 		}
2409c2aa98e2SPeter Wemm 		addr.sa.sa_family = hp->h_addrtype;
2410c2aa98e2SPeter Wemm 		switch (hp->h_addrtype)
2411c2aa98e2SPeter Wemm 		{
2412c2aa98e2SPeter Wemm #if NETINET
2413c2aa98e2SPeter Wemm 		  case AF_INET:
241406f25ae9SGregory Neil Shapiro 			memmove(&addr.sin.sin_addr,
241506f25ae9SGregory Neil Shapiro 				hp->h_addr,
2416c2aa98e2SPeter Wemm 				INADDRSZ);
2417c2aa98e2SPeter Wemm 			break;
241806f25ae9SGregory Neil Shapiro #endif /* NETINET */
241906f25ae9SGregory Neil Shapiro 
242006f25ae9SGregory Neil Shapiro #if NETINET6
242106f25ae9SGregory Neil Shapiro 		  case AF_INET6:
242206f25ae9SGregory Neil Shapiro 			memmove(&addr.sin6.sin6_addr,
242306f25ae9SGregory Neil Shapiro 				hp->h_addr,
242406f25ae9SGregory Neil Shapiro 				IN6ADDRSZ);
242506f25ae9SGregory Neil Shapiro 			break;
242606f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
2427c2aa98e2SPeter Wemm 
2428c2aa98e2SPeter Wemm 		  default:
2429d0cef73dSGregory Neil Shapiro 			if (hp->h_length > sizeof(addr.sa.sa_data))
2430c2aa98e2SPeter Wemm 			{
2431c2aa98e2SPeter Wemm 				syserr("makeconnection: long sa_data: family %d len %d",
2432c2aa98e2SPeter Wemm 					hp->h_addrtype, hp->h_length);
2433c2aa98e2SPeter Wemm 				mci_setstat(mci, EX_NOHOST, "5.1.2", NULL);
243406f25ae9SGregory Neil Shapiro 				errno = EINVAL;
2435c2aa98e2SPeter Wemm 				return EX_NOHOST;
2436c2aa98e2SPeter Wemm 			}
243740266059SGregory Neil Shapiro 			memmove(addr.sa.sa_data, hp->h_addr, hp->h_length);
2438c2aa98e2SPeter Wemm 			break;
2439c2aa98e2SPeter Wemm 		}
2440c2aa98e2SPeter Wemm 		addrno = 1;
2441c2aa98e2SPeter Wemm 	}
2442c2aa98e2SPeter Wemm 
2443c2aa98e2SPeter Wemm 	/*
2444c2aa98e2SPeter Wemm 	**  Determine the port number.
2445c2aa98e2SPeter Wemm 	*/
2446c2aa98e2SPeter Wemm 
2447c2aa98e2SPeter Wemm 	if (port == 0)
2448c2aa98e2SPeter Wemm 	{
244906f25ae9SGregory Neil Shapiro #ifdef NO_GETSERVBYNAME
245006f25ae9SGregory Neil Shapiro 		port = htons(25);
245106f25ae9SGregory Neil Shapiro #else /* NO_GETSERVBYNAME */
2452c2aa98e2SPeter Wemm 		register struct servent *sp = getservbyname("smtp", "tcp");
2453c2aa98e2SPeter Wemm 
2454c2aa98e2SPeter Wemm 		if (sp == NULL)
2455c2aa98e2SPeter Wemm 		{
2456c2aa98e2SPeter Wemm 			if (LogLevel > 2)
2457c2aa98e2SPeter Wemm 				sm_syslog(LOG_ERR, NOQID,
2458c2aa98e2SPeter Wemm 					  "makeconnection: service \"smtp\" unknown");
2459c2aa98e2SPeter Wemm 			port = htons(25);
2460c2aa98e2SPeter Wemm 		}
2461c2aa98e2SPeter Wemm 		else
2462c2aa98e2SPeter Wemm 			port = sp->s_port;
246306f25ae9SGregory Neil Shapiro #endif /* NO_GETSERVBYNAME */
2464c2aa98e2SPeter Wemm 	}
2465c2aa98e2SPeter Wemm 
246640266059SGregory Neil Shapiro #if NETINET6
246740266059SGregory Neil Shapiro 	if (addr.sa.sa_family == AF_INET6 &&
246840266059SGregory Neil Shapiro 	    IN6_IS_ADDR_V4MAPPED(&addr.sin6.sin6_addr) &&
246940266059SGregory Neil Shapiro 	    ClientSettings[AF_INET].d_addr.sa.sa_family != 0)
247040266059SGregory Neil Shapiro 	{
247140266059SGregory Neil Shapiro 		/*
247240266059SGregory Neil Shapiro 		**  Ignore mapped IPv4 address since
247340266059SGregory Neil Shapiro 		**  there is a ClientPortOptions setting
247440266059SGregory Neil Shapiro 		**  for IPv4.
247540266059SGregory Neil Shapiro 		*/
247640266059SGregory Neil Shapiro 
247740266059SGregory Neil Shapiro 		goto nextaddr;
247840266059SGregory Neil Shapiro 	}
247940266059SGregory Neil Shapiro #endif /* NETINET6 */
248040266059SGregory Neil Shapiro 
2481c2aa98e2SPeter Wemm 	switch (addr.sa.sa_family)
2482c2aa98e2SPeter Wemm 	{
2483c2aa98e2SPeter Wemm #if NETINET
2484c2aa98e2SPeter Wemm 	  case AF_INET:
2485c2aa98e2SPeter Wemm 		addr.sin.sin_port = port;
2486c2aa98e2SPeter Wemm 		addrlen = sizeof(struct sockaddr_in);
2487c2aa98e2SPeter Wemm 		break;
248806f25ae9SGregory Neil Shapiro #endif /* NETINET */
248906f25ae9SGregory Neil Shapiro 
249006f25ae9SGregory Neil Shapiro #if NETINET6
249106f25ae9SGregory Neil Shapiro 	  case AF_INET6:
249206f25ae9SGregory Neil Shapiro 		addr.sin6.sin6_port = port;
249306f25ae9SGregory Neil Shapiro 		addrlen = sizeof(struct sockaddr_in6);
249406f25ae9SGregory Neil Shapiro 		break;
249506f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
2496c2aa98e2SPeter Wemm 
2497c2aa98e2SPeter Wemm #if NETISO
2498c2aa98e2SPeter Wemm 	  case AF_ISO:
2499c2aa98e2SPeter Wemm 		/* assume two byte transport selector */
250006f25ae9SGregory Neil Shapiro 		memmove(TSEL((struct sockaddr_iso *) &addr), (char *) &port, 2);
2501c2aa98e2SPeter Wemm 		addrlen = sizeof(struct sockaddr_iso);
2502c2aa98e2SPeter Wemm 		break;
250306f25ae9SGregory Neil Shapiro #endif /* NETISO */
2504c2aa98e2SPeter Wemm 
2505c2aa98e2SPeter Wemm 	  default:
2506c2aa98e2SPeter Wemm 		syserr("Can't connect to address family %d", addr.sa.sa_family);
2507c2aa98e2SPeter Wemm 		mci_setstat(mci, EX_NOHOST, "5.1.2", NULL);
250806f25ae9SGregory Neil Shapiro 		errno = EINVAL;
250940266059SGregory Neil Shapiro #if NETINET6
2510193538b7SGregory Neil Shapiro 		if (hp != NULL)
2511193538b7SGregory Neil Shapiro 			freehostent(hp);
251240266059SGregory Neil Shapiro #endif /* NETINET6 */
251306f25ae9SGregory Neil Shapiro 		return EX_NOHOST;
2514c2aa98e2SPeter Wemm 	}
2515c2aa98e2SPeter Wemm 
2516c2aa98e2SPeter Wemm 	/*
2517c2aa98e2SPeter Wemm 	**  Try to actually open the connection.
2518c2aa98e2SPeter Wemm 	*/
2519c2aa98e2SPeter Wemm 
252040266059SGregory Neil Shapiro #if XLA
2521c2aa98e2SPeter Wemm 	/* if too many connections, don't bother trying */
2522c2aa98e2SPeter Wemm 	if (!xla_noqueue_ok(host))
2523193538b7SGregory Neil Shapiro 	{
252440266059SGregory Neil Shapiro # if NETINET6
2525193538b7SGregory Neil Shapiro 		if (hp != NULL)
2526193538b7SGregory Neil Shapiro 			freehostent(hp);
252740266059SGregory Neil Shapiro # endif /* NETINET6 */
2528c2aa98e2SPeter Wemm 		return EX_TEMPFAIL;
2529193538b7SGregory Neil Shapiro 	}
253006f25ae9SGregory Neil Shapiro #endif /* XLA */
2531c2aa98e2SPeter Wemm 
2532c2aa98e2SPeter Wemm 	for (;;)
2533c2aa98e2SPeter Wemm 	{
2534c2aa98e2SPeter Wemm 		if (tTd(16, 1))
253540266059SGregory Neil Shapiro 			sm_dprintf("makeconnection (%s [%s].%d (%d))\n",
25368774250cSGregory Neil Shapiro 				   host, anynet_ntoa(&addr), ntohs(port),
253740266059SGregory Neil Shapiro 				   (int) addr.sa.sa_family);
2538c2aa98e2SPeter Wemm 
2539c2aa98e2SPeter Wemm 		/* save for logging */
2540c2aa98e2SPeter Wemm 		CurHostAddr = addr;
2541c2aa98e2SPeter Wemm 
254240266059SGregory Neil Shapiro #if HASRRESVPORT
2543c2aa98e2SPeter Wemm 		if (bitnset(M_SECURE_PORT, mci->mci_mailer->m_flags))
2544c2aa98e2SPeter Wemm 		{
2545c2aa98e2SPeter Wemm 			int rport = IPPORT_RESERVED - 1;
2546c2aa98e2SPeter Wemm 
2547c2aa98e2SPeter Wemm 			s = rresvport(&rport);
2548c2aa98e2SPeter Wemm 		}
2549c2aa98e2SPeter Wemm 		else
255040266059SGregory Neil Shapiro #endif /* HASRRESVPORT */
2551c2aa98e2SPeter Wemm 		{
255240266059SGregory Neil Shapiro 			s = socket(addr.sa.sa_family, SOCK_STREAM, 0);
2553c2aa98e2SPeter Wemm 		}
2554c2aa98e2SPeter Wemm 		if (s < 0)
2555c2aa98e2SPeter Wemm 		{
255606f25ae9SGregory Neil Shapiro 			save_errno = errno;
2557c2aa98e2SPeter Wemm 			syserr("makeconnection: cannot create socket");
255840266059SGregory Neil Shapiro #if XLA
2559c2aa98e2SPeter Wemm 			xla_host_end(host);
256006f25ae9SGregory Neil Shapiro #endif /* XLA */
2561c2aa98e2SPeter Wemm 			mci_setstat(mci, EX_TEMPFAIL, "4.4.5", NULL);
256240266059SGregory Neil Shapiro #if NETINET6
2563193538b7SGregory Neil Shapiro 			if (hp != NULL)
2564193538b7SGregory Neil Shapiro 				freehostent(hp);
256540266059SGregory Neil Shapiro #endif /* NETINET6 */
256606f25ae9SGregory Neil Shapiro 			errno = save_errno;
2567c2aa98e2SPeter Wemm 			return EX_TEMPFAIL;
2568c2aa98e2SPeter Wemm 		}
2569c2aa98e2SPeter Wemm 
2570c2aa98e2SPeter Wemm #ifdef SO_SNDBUF
257140266059SGregory Neil Shapiro 		if (ClientSettings[family].d_tcpsndbufsize > 0)
2572c2aa98e2SPeter Wemm 		{
2573c2aa98e2SPeter Wemm 			if (setsockopt(s, SOL_SOCKET, SO_SNDBUF,
257440266059SGregory Neil Shapiro 				       (char *) &ClientSettings[family].d_tcpsndbufsize,
257540266059SGregory Neil Shapiro 				       sizeof(ClientSettings[family].d_tcpsndbufsize)) < 0)
2576c2aa98e2SPeter Wemm 				syserr("makeconnection: setsockopt(SO_SNDBUF)");
2577c2aa98e2SPeter Wemm 		}
257806f25ae9SGregory Neil Shapiro #endif /* SO_SNDBUF */
257906f25ae9SGregory Neil Shapiro #ifdef SO_RCVBUF
258040266059SGregory Neil Shapiro 		if (ClientSettings[family].d_tcprcvbufsize > 0)
258106f25ae9SGregory Neil Shapiro 		{
258206f25ae9SGregory Neil Shapiro 			if (setsockopt(s, SOL_SOCKET, SO_RCVBUF,
258340266059SGregory Neil Shapiro 				       (char *) &ClientSettings[family].d_tcprcvbufsize,
258440266059SGregory Neil Shapiro 				       sizeof(ClientSettings[family].d_tcprcvbufsize)) < 0)
258506f25ae9SGregory Neil Shapiro 				syserr("makeconnection: setsockopt(SO_RCVBUF)");
258606f25ae9SGregory Neil Shapiro 		}
258706f25ae9SGregory Neil Shapiro #endif /* SO_RCVBUF */
258806f25ae9SGregory Neil Shapiro 
2589c2aa98e2SPeter Wemm 		if (tTd(16, 1))
259040266059SGregory Neil Shapiro 			sm_dprintf("makeconnection: fd=%d\n", s);
2591c2aa98e2SPeter Wemm 
2592c2aa98e2SPeter Wemm 		/* turn on network debugging? */
2593c2aa98e2SPeter Wemm 		if (tTd(16, 101))
2594c2aa98e2SPeter Wemm 		{
2595c2aa98e2SPeter Wemm 			int on = 1;
259606f25ae9SGregory Neil Shapiro 
2597c2aa98e2SPeter Wemm 			(void) setsockopt(s, SOL_SOCKET, SO_DEBUG,
2598d0cef73dSGregory Neil Shapiro 					  (char *)&on, sizeof(on));
2599c2aa98e2SPeter Wemm 		}
260040266059SGregory Neil Shapiro 		if (e->e_xfp != NULL)	/* for debugging */
260140266059SGregory Neil Shapiro 			(void) sm_io_flush(e->e_xfp, SM_TIME_DEFAULT);
2602c2aa98e2SPeter Wemm 		errno = 0;		/* for debugging */
2603c2aa98e2SPeter Wemm 
260406f25ae9SGregory Neil Shapiro 		if (clt_bind)
260506f25ae9SGregory Neil Shapiro 		{
260606f25ae9SGregory Neil Shapiro 			int on = 1;
260706f25ae9SGregory Neil Shapiro 
260806f25ae9SGregory Neil Shapiro 			switch (clt_addr.sa.sa_family)
260906f25ae9SGregory Neil Shapiro 			{
261006f25ae9SGregory Neil Shapiro #if NETINET
261106f25ae9SGregory Neil Shapiro 			  case AF_INET:
261206f25ae9SGregory Neil Shapiro 				if (clt_addr.sin.sin_port != 0)
261306f25ae9SGregory Neil Shapiro 					(void) setsockopt(s, SOL_SOCKET,
261406f25ae9SGregory Neil Shapiro 							  SO_REUSEADDR,
261506f25ae9SGregory Neil Shapiro 							  (char *) &on,
2616d0cef73dSGregory Neil Shapiro 							  sizeof(on));
261706f25ae9SGregory Neil Shapiro 				break;
261806f25ae9SGregory Neil Shapiro #endif /* NETINET */
261906f25ae9SGregory Neil Shapiro 
262006f25ae9SGregory Neil Shapiro #if NETINET6
262106f25ae9SGregory Neil Shapiro 			  case AF_INET6:
262206f25ae9SGregory Neil Shapiro 				if (clt_addr.sin6.sin6_port != 0)
262306f25ae9SGregory Neil Shapiro 					(void) setsockopt(s, SOL_SOCKET,
262406f25ae9SGregory Neil Shapiro 							  SO_REUSEADDR,
262506f25ae9SGregory Neil Shapiro 							  (char *) &on,
2626d0cef73dSGregory Neil Shapiro 							  sizeof(on));
262706f25ae9SGregory Neil Shapiro 				break;
262806f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
262906f25ae9SGregory Neil Shapiro 			}
263006f25ae9SGregory Neil Shapiro 
263106f25ae9SGregory Neil Shapiro 			if (bind(s, &clt_addr.sa, socksize) < 0)
263206f25ae9SGregory Neil Shapiro 			{
263306f25ae9SGregory Neil Shapiro 				save_errno = errno;
263406f25ae9SGregory Neil Shapiro 				(void) close(s);
263506f25ae9SGregory Neil Shapiro 				errno = save_errno;
263606f25ae9SGregory Neil Shapiro 				syserr("makeconnection: cannot bind socket [%s]",
263706f25ae9SGregory Neil Shapiro 				       anynet_ntoa(&clt_addr));
263840266059SGregory Neil Shapiro #if NETINET6
2639193538b7SGregory Neil Shapiro 				if (hp != NULL)
2640193538b7SGregory Neil Shapiro 					freehostent(hp);
264140266059SGregory Neil Shapiro #endif /* NETINET6 */
264206f25ae9SGregory Neil Shapiro 				errno = save_errno;
264306f25ae9SGregory Neil Shapiro 				return EX_TEMPFAIL;
264406f25ae9SGregory Neil Shapiro 			}
264506f25ae9SGregory Neil Shapiro 		}
264606f25ae9SGregory Neil Shapiro 
2647c2aa98e2SPeter Wemm 		/*
2648c2aa98e2SPeter Wemm 		**  Linux seems to hang in connect for 90 minutes (!!!).
2649c2aa98e2SPeter Wemm 		**  Time out the connect to avoid this problem.
2650c2aa98e2SPeter Wemm 		*/
2651c2aa98e2SPeter Wemm 
2652c2aa98e2SPeter Wemm 		if (setjmp(CtxConnectTimeout) == 0)
2653c2aa98e2SPeter Wemm 		{
2654c2aa98e2SPeter Wemm 			int i;
2655c2aa98e2SPeter Wemm 
2656c2aa98e2SPeter Wemm 			if (e->e_ntries <= 0 && TimeOuts.to_iconnect != 0)
265740266059SGregory Neil Shapiro 				ev = sm_setevent(TimeOuts.to_iconnect,
26588774250cSGregory Neil Shapiro 						 connecttimeout, 0);
2659c2aa98e2SPeter Wemm 			else if (TimeOuts.to_connect != 0)
266040266059SGregory Neil Shapiro 				ev = sm_setevent(TimeOuts.to_connect,
26618774250cSGregory Neil Shapiro 						 connecttimeout, 0);
2662c2aa98e2SPeter Wemm 			else
2663c2aa98e2SPeter Wemm 				ev = NULL;
2664c2aa98e2SPeter Wemm 
266506f25ae9SGregory Neil Shapiro 			switch (ConnectOnlyTo.sa.sa_family)
266606f25ae9SGregory Neil Shapiro 			{
266706f25ae9SGregory Neil Shapiro #if NETINET
266806f25ae9SGregory Neil Shapiro 			  case AF_INET:
266906f25ae9SGregory Neil Shapiro 				addr.sin.sin_addr.s_addr = ConnectOnlyTo.sin.sin_addr.s_addr;
2670*6f9c8e5bSGregory Neil Shapiro 				addr.sa.sa_family = ConnectOnlyTo.sa.sa_family;
267106f25ae9SGregory Neil Shapiro 				break;
267206f25ae9SGregory Neil Shapiro #endif /* NETINET */
267306f25ae9SGregory Neil Shapiro 
267406f25ae9SGregory Neil Shapiro #if NETINET6
267506f25ae9SGregory Neil Shapiro 			  case AF_INET6:
267606f25ae9SGregory Neil Shapiro 				memmove(&addr.sin6.sin6_addr,
267706f25ae9SGregory Neil Shapiro 					&ConnectOnlyTo.sin6.sin6_addr,
267806f25ae9SGregory Neil Shapiro 					IN6ADDRSZ);
267906f25ae9SGregory Neil Shapiro 				break;
268006f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
268106f25ae9SGregory Neil Shapiro 			}
2682b6bacd31SGregory Neil Shapiro 			if (tTd(16, 1))
2683b6bacd31SGregory Neil Shapiro 				sm_dprintf("Connecting to [%s]...\n", anynet_ntoa(&addr));
2684c2aa98e2SPeter Wemm 			i = connect(s, (struct sockaddr *) &addr, addrlen);
268506f25ae9SGregory Neil Shapiro 			save_errno = errno;
2686c2aa98e2SPeter Wemm 			if (ev != NULL)
268740266059SGregory Neil Shapiro 				sm_clrevent(ev);
2688c2aa98e2SPeter Wemm 			if (i >= 0)
2689c2aa98e2SPeter Wemm 				break;
2690c2aa98e2SPeter Wemm 		}
2691c2aa98e2SPeter Wemm 		else
269206f25ae9SGregory Neil Shapiro 			save_errno = errno;
2693c2aa98e2SPeter Wemm 
2694605302a5SGregory Neil Shapiro 		/* couldn't connect.... figure out why */
2695605302a5SGregory Neil Shapiro 		(void) close(s);
2696605302a5SGregory Neil Shapiro 
2697c2aa98e2SPeter Wemm 		/* if running demand-dialed connection, try again */
269840266059SGregory Neil Shapiro 		if (DialDelay > 0 && firstconnect &&
269940266059SGregory Neil Shapiro 		    bitnset(M_DIALDELAY, mci->mci_mailer->m_flags))
2700c2aa98e2SPeter Wemm 		{
2701c2aa98e2SPeter Wemm 			if (tTd(16, 1))
270240266059SGregory Neil Shapiro 				sm_dprintf("Connect failed (%s); trying again...\n",
270340266059SGregory Neil Shapiro 					   sm_errstring(save_errno));
270440266059SGregory Neil Shapiro 			firstconnect = false;
270506f25ae9SGregory Neil Shapiro 			(void) sleep(DialDelay);
2706c2aa98e2SPeter Wemm 			continue;
2707c2aa98e2SPeter Wemm 		}
2708c2aa98e2SPeter Wemm 
270940266059SGregory Neil Shapiro 		if (LogLevel > 13)
2710c2aa98e2SPeter Wemm 			sm_syslog(LOG_INFO, e->e_id,
2711c2aa98e2SPeter Wemm 				  "makeconnection (%s [%s]) failed: %s",
2712c2aa98e2SPeter Wemm 				  host, anynet_ntoa(&addr),
271340266059SGregory Neil Shapiro 				  sm_errstring(save_errno));
2714c2aa98e2SPeter Wemm 
271540266059SGregory Neil Shapiro #if NETINET6
271640266059SGregory Neil Shapiro nextaddr:
271740266059SGregory Neil Shapiro #endif /* NETINET6 */
271840266059SGregory Neil Shapiro 		if (hp != NULL && hp->h_addr_list[addrno] != NULL &&
271940266059SGregory Neil Shapiro 		    (enough == 0 || curtime() < enough))
2720c2aa98e2SPeter Wemm 		{
2721c2aa98e2SPeter Wemm 			if (tTd(16, 1))
272240266059SGregory Neil Shapiro 				sm_dprintf("Connect failed (%s); trying new address....\n",
272340266059SGregory Neil Shapiro 					   sm_errstring(save_errno));
2724c2aa98e2SPeter Wemm 			switch (addr.sa.sa_family)
2725c2aa98e2SPeter Wemm 			{
2726c2aa98e2SPeter Wemm #if NETINET
2727c2aa98e2SPeter Wemm 			  case AF_INET:
272806f25ae9SGregory Neil Shapiro 				memmove(&addr.sin.sin_addr,
272906f25ae9SGregory Neil Shapiro 					hp->h_addr_list[addrno++],
2730c2aa98e2SPeter Wemm 					INADDRSZ);
2731c2aa98e2SPeter Wemm 				break;
273206f25ae9SGregory Neil Shapiro #endif /* NETINET */
273306f25ae9SGregory Neil Shapiro 
273406f25ae9SGregory Neil Shapiro #if NETINET6
273506f25ae9SGregory Neil Shapiro 			  case AF_INET6:
273606f25ae9SGregory Neil Shapiro 				memmove(&addr.sin6.sin6_addr,
273706f25ae9SGregory Neil Shapiro 					hp->h_addr_list[addrno++],
273806f25ae9SGregory Neil Shapiro 					IN6ADDRSZ);
273906f25ae9SGregory Neil Shapiro 				break;
274006f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
2741c2aa98e2SPeter Wemm 
2742c2aa98e2SPeter Wemm 			  default:
274306f25ae9SGregory Neil Shapiro 				memmove(addr.sa.sa_data,
274406f25ae9SGregory Neil Shapiro 					hp->h_addr_list[addrno++],
2745c2aa98e2SPeter Wemm 					hp->h_length);
2746c2aa98e2SPeter Wemm 				break;
2747c2aa98e2SPeter Wemm 			}
2748c2aa98e2SPeter Wemm 			continue;
2749c2aa98e2SPeter Wemm 		}
275006f25ae9SGregory Neil Shapiro 		errno = save_errno;
2751c2aa98e2SPeter Wemm 
275206f25ae9SGregory Neil Shapiro #if NETINET6
275306f25ae9SGregory Neil Shapiro 		if (family == AF_INET6)
275406f25ae9SGregory Neil Shapiro 		{
275506f25ae9SGregory Neil Shapiro 			if (tTd(16, 1))
275640266059SGregory Neil Shapiro 				sm_dprintf("Connect failed (%s); retrying with AF_INET....\n",
275740266059SGregory Neil Shapiro 					   sm_errstring(save_errno));
275840266059SGregory Neil Shapiro 			v6found = true;
275906f25ae9SGregory Neil Shapiro 			family = AF_INET;
2760193538b7SGregory Neil Shapiro 			if (hp != NULL)
2761193538b7SGregory Neil Shapiro 			{
2762193538b7SGregory Neil Shapiro 				freehostent(hp);
2763193538b7SGregory Neil Shapiro 				hp = NULL;
2764193538b7SGregory Neil Shapiro 			}
276506f25ae9SGregory Neil Shapiro 			goto v4retry;
276606f25ae9SGregory Neil Shapiro 		}
276706f25ae9SGregory Neil Shapiro 	v6tempfail:
276806f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
2769c2aa98e2SPeter Wemm 		/* couldn't open connection */
277006f25ae9SGregory Neil Shapiro #if NETINET6
277106f25ae9SGregory Neil Shapiro 		/* Don't clobber an already saved errno from v4retry */
277206f25ae9SGregory Neil Shapiro 		if (errno > 0)
277306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
277406f25ae9SGregory Neil Shapiro 			save_errno = errno;
277506f25ae9SGregory Neil Shapiro 		if (tTd(16, 1))
277640266059SGregory Neil Shapiro 			sm_dprintf("Connect failed (%s)\n",
277740266059SGregory Neil Shapiro 				   sm_errstring(save_errno));
277840266059SGregory Neil Shapiro #if XLA
2779c2aa98e2SPeter Wemm 		xla_host_end(host);
278006f25ae9SGregory Neil Shapiro #endif /* XLA */
2781c2aa98e2SPeter Wemm 		mci_setstat(mci, EX_TEMPFAIL, "4.4.1", NULL);
278240266059SGregory Neil Shapiro #if NETINET6
2783193538b7SGregory Neil Shapiro 		if (hp != NULL)
2784193538b7SGregory Neil Shapiro 			freehostent(hp);
278540266059SGregory Neil Shapiro #endif /* NETINET6 */
278606f25ae9SGregory Neil Shapiro 		errno = save_errno;
2787c2aa98e2SPeter Wemm 		return EX_TEMPFAIL;
2788c2aa98e2SPeter Wemm 	}
2789c2aa98e2SPeter Wemm 
279040266059SGregory Neil Shapiro #if NETINET6
2791193538b7SGregory Neil Shapiro 	if (hp != NULL)
2792193538b7SGregory Neil Shapiro 	{
2793193538b7SGregory Neil Shapiro 		freehostent(hp);
2794193538b7SGregory Neil Shapiro 		hp = NULL;
2795193538b7SGregory Neil Shapiro 	}
279640266059SGregory Neil Shapiro #endif /* NETINET6 */
2797193538b7SGregory Neil Shapiro 
2798c2aa98e2SPeter Wemm 	/* connection ok, put it into canonical form */
279906f25ae9SGregory Neil Shapiro 	mci->mci_out = NULL;
280040266059SGregory Neil Shapiro 	if ((mci->mci_out = sm_io_open(SmFtStdiofd, SM_TIME_DEFAULT,
280140266059SGregory Neil Shapiro 				       (void *) &s,
2802e92d3f3fSGregory Neil Shapiro 				       SM_IO_WRONLY_B, NULL)) == NULL ||
2803c2aa98e2SPeter Wemm 	    (s = dup(s)) < 0 ||
280440266059SGregory Neil Shapiro 	    (mci->mci_in = sm_io_open(SmFtStdiofd, SM_TIME_DEFAULT,
280540266059SGregory Neil Shapiro 				      (void *) &s,
2806e92d3f3fSGregory Neil Shapiro 				      SM_IO_RDONLY_B, NULL)) == NULL)
2807c2aa98e2SPeter Wemm 	{
280806f25ae9SGregory Neil Shapiro 		save_errno = errno;
2809c2aa98e2SPeter Wemm 		syserr("cannot open SMTP client channel, fd=%d", s);
2810c2aa98e2SPeter Wemm 		mci_setstat(mci, EX_TEMPFAIL, "4.4.5", NULL);
281106f25ae9SGregory Neil Shapiro 		if (mci->mci_out != NULL)
281240266059SGregory Neil Shapiro 			(void) sm_io_close(mci->mci_out, SM_TIME_DEFAULT);
281306f25ae9SGregory Neil Shapiro 		(void) close(s);
281406f25ae9SGregory Neil Shapiro 		errno = save_errno;
281506f25ae9SGregory Neil Shapiro 		return EX_TEMPFAIL;
281606f25ae9SGregory Neil Shapiro 	}
281740266059SGregory Neil Shapiro 	sm_io_automode(mci->mci_out, mci->mci_in);
281840266059SGregory Neil Shapiro 
281940266059SGregory Neil Shapiro 	/* set {client_flags} */
282040266059SGregory Neil Shapiro 	if (ClientSettings[addr.sa.sa_family].d_mflags != NULL)
282140266059SGregory Neil Shapiro 	{
282240266059SGregory Neil Shapiro 		macdefine(&mci->mci_macro, A_PERM,
282340266059SGregory Neil Shapiro 			  macid("{client_flags}"),
282440266059SGregory Neil Shapiro 			  ClientSettings[addr.sa.sa_family].d_mflags);
282540266059SGregory Neil Shapiro 	}
282640266059SGregory Neil Shapiro 	else
282740266059SGregory Neil Shapiro 		macdefine(&mci->mci_macro, A_PERM,
282840266059SGregory Neil Shapiro 			  macid("{client_flags}"), "");
282940266059SGregory Neil Shapiro 
283040266059SGregory Neil Shapiro 	/* "add" {client_flags} to bitmap */
283140266059SGregory Neil Shapiro 	if (bitnset(D_IFNHELO, ClientSettings[addr.sa.sa_family].d_flags))
283240266059SGregory Neil Shapiro 	{
283340266059SGregory Neil Shapiro 		/* look for just this one flag */
283440266059SGregory Neil Shapiro 		setbitn(D_IFNHELO, d_flags);
283540266059SGregory Neil Shapiro 	}
283606f25ae9SGregory Neil Shapiro 
283706f25ae9SGregory Neil Shapiro 	/* find out name for Interface through which we connect */
2838d0cef73dSGregory Neil Shapiro 	len = sizeof(addr);
283906f25ae9SGregory Neil Shapiro 	if (getsockname(s, &addr.sa, &len) == 0)
284006f25ae9SGregory Neil Shapiro 	{
284106f25ae9SGregory Neil Shapiro 		char *name;
284240266059SGregory Neil Shapiro 		char family[5];
284306f25ae9SGregory Neil Shapiro 
284440266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_TEMP,
284540266059SGregory Neil Shapiro 			macid("{if_addr_out}"), anynet_ntoa(&addr));
284640266059SGregory Neil Shapiro 		(void) sm_snprintf(family, sizeof(family), "%d",
284740266059SGregory Neil Shapiro 			addr.sa.sa_family);
284840266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_TEMP,
284940266059SGregory Neil Shapiro 			macid("{if_family_out}"), family);
285006f25ae9SGregory Neil Shapiro 
285106f25ae9SGregory Neil Shapiro 		name = hostnamebyanyaddr(&addr);
285240266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_TEMP,
285340266059SGregory Neil Shapiro 			macid("{if_name_out}"), name);
285406f25ae9SGregory Neil Shapiro 		if (LogLevel > 11)
285506f25ae9SGregory Neil Shapiro 		{
285606f25ae9SGregory Neil Shapiro 			/* log connection information */
285706f25ae9SGregory Neil Shapiro 			sm_syslog(LOG_INFO, e->e_id,
285806f25ae9SGregory Neil Shapiro 				  "SMTP outgoing connect on %.40s", name);
285906f25ae9SGregory Neil Shapiro 		}
286006f25ae9SGregory Neil Shapiro 		if (bitnset(D_IFNHELO, d_flags))
286106f25ae9SGregory Neil Shapiro 		{
286206f25ae9SGregory Neil Shapiro 			if (name[0] != '[' && strchr(name, '.') != NULL)
286306f25ae9SGregory Neil Shapiro 				mci->mci_heloname = newstr(name);
286406f25ae9SGregory Neil Shapiro 		}
286506f25ae9SGregory Neil Shapiro 	}
286606f25ae9SGregory Neil Shapiro 	else
286706f25ae9SGregory Neil Shapiro 	{
286840266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_PERM,
286940266059SGregory Neil Shapiro 			macid("{if_name_out}"), NULL);
287040266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_PERM,
287140266059SGregory Neil Shapiro 			macid("{if_addr_out}"), NULL);
287240266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_PERM,
287340266059SGregory Neil Shapiro 			macid("{if_family_out}"), NULL);
287406f25ae9SGregory Neil Shapiro 	}
2875e92d3f3fSGregory Neil Shapiro 
2876e92d3f3fSGregory Neil Shapiro 	/* Use the configured HeloName as appropriate */
2877e92d3f3fSGregory Neil Shapiro 	if (HeloName != NULL && HeloName[0] != '\0')
2878*6f9c8e5bSGregory Neil Shapiro 	{
2879*6f9c8e5bSGregory Neil Shapiro 		SM_FREE_CLR(mci->mci_heloname);
2880e92d3f3fSGregory Neil Shapiro 		mci->mci_heloname = newstr(HeloName);
2881*6f9c8e5bSGregory Neil Shapiro 	}
2882e92d3f3fSGregory Neil Shapiro 
288306f25ae9SGregory Neil Shapiro 	mci_setstat(mci, EX_OK, NULL, NULL);
288406f25ae9SGregory Neil Shapiro 	return EX_OK;
288506f25ae9SGregory Neil Shapiro }
288606f25ae9SGregory Neil Shapiro 
288706f25ae9SGregory Neil Shapiro static void
2888b6bacd31SGregory Neil Shapiro connecttimeout(ignore)
2889b6bacd31SGregory Neil Shapiro 	int ignore;
289006f25ae9SGregory Neil Shapiro {
28918774250cSGregory Neil Shapiro 	/*
28928774250cSGregory Neil Shapiro 	**  NOTE: THIS CAN BE CALLED FROM A SIGNAL HANDLER.  DO NOT ADD
28938774250cSGregory Neil Shapiro 	**	ANYTHING TO THIS ROUTINE UNLESS YOU KNOW WHAT YOU ARE
28948774250cSGregory Neil Shapiro 	**	DOING.
28958774250cSGregory Neil Shapiro 	*/
28968774250cSGregory Neil Shapiro 
289706f25ae9SGregory Neil Shapiro 	errno = ETIMEDOUT;
289806f25ae9SGregory Neil Shapiro 	longjmp(CtxConnectTimeout, 1);
289906f25ae9SGregory Neil Shapiro }
290040266059SGregory Neil Shapiro /*
290106f25ae9SGregory Neil Shapiro **  MAKECONNECTION_DS -- make a connection to a domain socket.
290206f25ae9SGregory Neil Shapiro **
290306f25ae9SGregory Neil Shapiro **	Parameters:
290406f25ae9SGregory Neil Shapiro **		mux_path -- the path of the socket to connect to.
290506f25ae9SGregory Neil Shapiro **		mci -- a pointer to the mail connection information
290606f25ae9SGregory Neil Shapiro **			structure to be filled in.
290706f25ae9SGregory Neil Shapiro **
290806f25ae9SGregory Neil Shapiro **	Returns:
290906f25ae9SGregory Neil Shapiro **		An exit code telling whether the connection could be
291006f25ae9SGregory Neil Shapiro **			made and if not why not.
291106f25ae9SGregory Neil Shapiro **
291206f25ae9SGregory Neil Shapiro **	Side Effects:
291306f25ae9SGregory Neil Shapiro **		none.
291406f25ae9SGregory Neil Shapiro */
291506f25ae9SGregory Neil Shapiro 
291606f25ae9SGregory Neil Shapiro #if NETUNIX
291740266059SGregory Neil Shapiro int
291840266059SGregory Neil Shapiro makeconnection_ds(mux_path, mci)
291906f25ae9SGregory Neil Shapiro 	char *mux_path;
292006f25ae9SGregory Neil Shapiro 	register MCI *mci;
292106f25ae9SGregory Neil Shapiro {
292206f25ae9SGregory Neil Shapiro 	int sock;
292306f25ae9SGregory Neil Shapiro 	int rval, save_errno;
292406f25ae9SGregory Neil Shapiro 	long sff = SFF_SAFEDIRPATH|SFF_OPENASROOT|SFF_NOLINK|SFF_ROOTOK|SFF_EXECOK;
292506f25ae9SGregory Neil Shapiro 	struct sockaddr_un unix_addr;
292606f25ae9SGregory Neil Shapiro 
292706f25ae9SGregory Neil Shapiro 	/* if not safe, don't connect */
292806f25ae9SGregory Neil Shapiro 	rval = safefile(mux_path, RunAsUid, RunAsGid, RunAsUserName,
292906f25ae9SGregory Neil Shapiro 			sff, S_IRUSR|S_IWUSR, NULL);
293006f25ae9SGregory Neil Shapiro 
293106f25ae9SGregory Neil Shapiro 	if (rval != 0)
293206f25ae9SGregory Neil Shapiro 	{
2933e92d3f3fSGregory Neil Shapiro 		syserr("makeconnection_ds: unsafe domain socket %s",
2934e92d3f3fSGregory Neil Shapiro 			mux_path);
293506f25ae9SGregory Neil Shapiro 		mci_setstat(mci, EX_TEMPFAIL, "4.3.5", NULL);
293606f25ae9SGregory Neil Shapiro 		errno = rval;
293706f25ae9SGregory Neil Shapiro 		return EX_TEMPFAIL;
293806f25ae9SGregory Neil Shapiro 	}
293906f25ae9SGregory Neil Shapiro 
294006f25ae9SGregory Neil Shapiro 	/* prepare address structure */
2941d0cef73dSGregory Neil Shapiro 	memset(&unix_addr, '\0', sizeof(unix_addr));
294206f25ae9SGregory Neil Shapiro 	unix_addr.sun_family = AF_UNIX;
294306f25ae9SGregory Neil Shapiro 
2944d0cef73dSGregory Neil Shapiro 	if (strlen(mux_path) >= sizeof(unix_addr.sun_path))
294506f25ae9SGregory Neil Shapiro 	{
2946e92d3f3fSGregory Neil Shapiro 		syserr("makeconnection_ds: domain socket name %s too long",
2947e92d3f3fSGregory Neil Shapiro 			mux_path);
294840266059SGregory Neil Shapiro 
294940266059SGregory Neil Shapiro 		/* XXX why TEMPFAIL but 5.x.y ? */
295006f25ae9SGregory Neil Shapiro 		mci_setstat(mci, EX_TEMPFAIL, "5.3.5", NULL);
295106f25ae9SGregory Neil Shapiro 		errno = ENAMETOOLONG;
295206f25ae9SGregory Neil Shapiro 		return EX_UNAVAILABLE;
295306f25ae9SGregory Neil Shapiro 	}
295440266059SGregory Neil Shapiro 	(void) sm_strlcpy(unix_addr.sun_path, mux_path,
2955d0cef73dSGregory Neil Shapiro 			  sizeof(unix_addr.sun_path));
295606f25ae9SGregory Neil Shapiro 
295706f25ae9SGregory Neil Shapiro 	/* initialize domain socket */
295806f25ae9SGregory Neil Shapiro 	sock = socket(AF_UNIX, SOCK_STREAM, 0);
295906f25ae9SGregory Neil Shapiro 	if (sock == -1)
296006f25ae9SGregory Neil Shapiro 	{
296106f25ae9SGregory Neil Shapiro 		save_errno = errno;
2962e92d3f3fSGregory Neil Shapiro 		syserr("makeconnection_ds: could not create domain socket %s",
2963e92d3f3fSGregory Neil Shapiro 			mux_path);
296406f25ae9SGregory Neil Shapiro 		mci_setstat(mci, EX_TEMPFAIL, "4.4.5", NULL);
296506f25ae9SGregory Neil Shapiro 		errno = save_errno;
296606f25ae9SGregory Neil Shapiro 		return EX_TEMPFAIL;
296706f25ae9SGregory Neil Shapiro 	}
296806f25ae9SGregory Neil Shapiro 
296906f25ae9SGregory Neil Shapiro 	/* connect to server */
297006f25ae9SGregory Neil Shapiro 	if (connect(sock, (struct sockaddr *) &unix_addr,
297106f25ae9SGregory Neil Shapiro 		    sizeof(unix_addr)) == -1)
297206f25ae9SGregory Neil Shapiro 	{
297306f25ae9SGregory Neil Shapiro 		save_errno = errno;
297406f25ae9SGregory Neil Shapiro 		syserr("Could not connect to socket %s", mux_path);
297506f25ae9SGregory Neil Shapiro 		mci_setstat(mci, EX_TEMPFAIL, "4.4.1", NULL);
297606f25ae9SGregory Neil Shapiro 		(void) close(sock);
297706f25ae9SGregory Neil Shapiro 		errno = save_errno;
297806f25ae9SGregory Neil Shapiro 		return EX_TEMPFAIL;
297906f25ae9SGregory Neil Shapiro 	}
298006f25ae9SGregory Neil Shapiro 
298106f25ae9SGregory Neil Shapiro 	/* connection ok, put it into canonical form */
298206f25ae9SGregory Neil Shapiro 	mci->mci_out = NULL;
298340266059SGregory Neil Shapiro 	if ((mci->mci_out = sm_io_open(SmFtStdiofd, SM_TIME_DEFAULT,
2984e92d3f3fSGregory Neil Shapiro 				       (void *) &sock, SM_IO_WRONLY_B, NULL))
298540266059SGregory Neil Shapiro 					== NULL
298640266059SGregory Neil Shapiro 	    || (sock = dup(sock)) < 0 ||
298740266059SGregory Neil Shapiro 	    (mci->mci_in = sm_io_open(SmFtStdiofd, SM_TIME_DEFAULT,
2988e92d3f3fSGregory Neil Shapiro 				      (void *) &sock, SM_IO_RDONLY_B, NULL))
298940266059SGregory Neil Shapiro 					== NULL)
299006f25ae9SGregory Neil Shapiro 	{
299106f25ae9SGregory Neil Shapiro 		save_errno = errno;
299206f25ae9SGregory Neil Shapiro 		syserr("cannot open SMTP client channel, fd=%d", sock);
299306f25ae9SGregory Neil Shapiro 		mci_setstat(mci, EX_TEMPFAIL, "4.4.5", NULL);
299406f25ae9SGregory Neil Shapiro 		if (mci->mci_out != NULL)
299540266059SGregory Neil Shapiro 			(void) sm_io_close(mci->mci_out, SM_TIME_DEFAULT);
299606f25ae9SGregory Neil Shapiro 		(void) close(sock);
299706f25ae9SGregory Neil Shapiro 		errno = save_errno;
2998c2aa98e2SPeter Wemm 		return EX_TEMPFAIL;
2999c2aa98e2SPeter Wemm 	}
300040266059SGregory Neil Shapiro 	sm_io_automode(mci->mci_out, mci->mci_in);
3001c2aa98e2SPeter Wemm 
3002c2aa98e2SPeter Wemm 	mci_setstat(mci, EX_OK, NULL, NULL);
300306f25ae9SGregory Neil Shapiro 	errno = 0;
300406f25ae9SGregory Neil Shapiro 	return EX_OK;
3005c2aa98e2SPeter Wemm }
300606f25ae9SGregory Neil Shapiro #endif /* NETUNIX */
300740266059SGregory Neil Shapiro /*
300840266059SGregory Neil Shapiro **  SHUTDOWN_DAEMON -- Performs a clean shutdown of the daemon
30098774250cSGregory Neil Shapiro **
30108774250cSGregory Neil Shapiro **	Parameters:
301140266059SGregory Neil Shapiro **		none.
30128774250cSGregory Neil Shapiro **
30138774250cSGregory Neil Shapiro **	Returns:
30148774250cSGregory Neil Shapiro **		none.
30158774250cSGregory Neil Shapiro **
30168774250cSGregory Neil Shapiro **	Side Effects:
301740266059SGregory Neil Shapiro **		closes control socket, exits.
30188774250cSGregory Neil Shapiro */
30198774250cSGregory Neil Shapiro 
302040266059SGregory Neil Shapiro void
302140266059SGregory Neil Shapiro shutdown_daemon()
30228774250cSGregory Neil Shapiro {
302340266059SGregory Neil Shapiro 	int i;
302440266059SGregory Neil Shapiro 	char *reason;
30258774250cSGregory Neil Shapiro 
302640266059SGregory Neil Shapiro 	sm_allsignals(true);
302740266059SGregory Neil Shapiro 
302840266059SGregory Neil Shapiro 	reason = ShutdownRequest;
302940266059SGregory Neil Shapiro 	ShutdownRequest = NULL;
303040266059SGregory Neil Shapiro 	PendingSignal = 0;
303140266059SGregory Neil Shapiro 
3032e92d3f3fSGregory Neil Shapiro 	if (LogLevel > 9)
3033e92d3f3fSGregory Neil Shapiro 		sm_syslog(LOG_INFO, CurEnv->e_id, "stopping daemon, reason=%s",
303440266059SGregory Neil Shapiro 			  reason == NULL ? "implicit call" : reason);
303540266059SGregory Neil Shapiro 
303640266059SGregory Neil Shapiro 	FileName = NULL;
303740266059SGregory Neil Shapiro 	closecontrolsocket(true);
303840266059SGregory Neil Shapiro #if XLA
303940266059SGregory Neil Shapiro 	xla_all_end();
304040266059SGregory Neil Shapiro #endif /* XLA */
304140266059SGregory Neil Shapiro 
304240266059SGregory Neil Shapiro 	for (i = 0; i < NDaemons; i++)
304340266059SGregory Neil Shapiro 	{
304440266059SGregory Neil Shapiro 		if (Daemons[i].d_socket >= 0)
304540266059SGregory Neil Shapiro 		{
304640266059SGregory Neil Shapiro 			(void) close(Daemons[i].d_socket);
304740266059SGregory Neil Shapiro 			Daemons[i].d_socket = -1;
304840266059SGregory Neil Shapiro 
304940266059SGregory Neil Shapiro #if _FFR_DAEMON_NETUNIX
305040266059SGregory Neil Shapiro # if NETUNIX
305140266059SGregory Neil Shapiro 			/* Remove named sockets */
305240266059SGregory Neil Shapiro 			if (Daemons[i].d_addr.sa.sa_family == AF_UNIX)
305340266059SGregory Neil Shapiro 			{
305440266059SGregory Neil Shapiro 				int rval;
305540266059SGregory Neil Shapiro 				long sff = SFF_SAFEDIRPATH|SFF_OPENASROOT|SFF_NOLINK|SFF_MUSTOWN|SFF_EXECOK|SFF_CREAT;
305640266059SGregory Neil Shapiro 
305740266059SGregory Neil Shapiro 				/* if not safe, don't use it */
305840266059SGregory Neil Shapiro 				rval = safefile(Daemons[i].d_addr.sunix.sun_path,
305940266059SGregory Neil Shapiro 						RunAsUid, RunAsGid,
306040266059SGregory Neil Shapiro 						RunAsUserName, sff,
306140266059SGregory Neil Shapiro 						S_IRUSR|S_IWUSR, NULL);
306240266059SGregory Neil Shapiro 				if (rval == 0 &&
306340266059SGregory Neil Shapiro 				    unlink(Daemons[i].d_addr.sunix.sun_path) < 0)
306440266059SGregory Neil Shapiro 				{
306540266059SGregory Neil Shapiro 					sm_syslog(LOG_WARNING, NOQID,
306640266059SGregory Neil Shapiro 						  "Could not remove daemon %s socket: %s: %s",
306740266059SGregory Neil Shapiro 						  Daemons[i].d_name,
306840266059SGregory Neil Shapiro 						  Daemons[i].d_addr.sunix.sun_path,
306940266059SGregory Neil Shapiro 						  sm_errstring(errno));
30708774250cSGregory Neil Shapiro 				}
307140266059SGregory Neil Shapiro 			}
307240266059SGregory Neil Shapiro # endif /* NETUNIX */
307340266059SGregory Neil Shapiro #endif	/* _FFR_DAEMON_NETUNIX */
307440266059SGregory Neil Shapiro 		}
307540266059SGregory Neil Shapiro 	}
307640266059SGregory Neil Shapiro 
307740266059SGregory Neil Shapiro 	finis(false, true, EX_OK);
307840266059SGregory Neil Shapiro }
307940266059SGregory Neil Shapiro /*
30808774250cSGregory Neil Shapiro **  RESTART_DAEMON -- Performs a clean restart of the daemon
30818774250cSGregory Neil Shapiro **
30828774250cSGregory Neil Shapiro **	Parameters:
30838774250cSGregory Neil Shapiro **		none.
30848774250cSGregory Neil Shapiro **
30858774250cSGregory Neil Shapiro **	Returns:
30868774250cSGregory Neil Shapiro **		none.
30878774250cSGregory Neil Shapiro **
30888774250cSGregory Neil Shapiro **	Side Effects:
30898774250cSGregory Neil Shapiro **		restarts the daemon or exits if restart fails.
30908774250cSGregory Neil Shapiro */
30918774250cSGregory Neil Shapiro 
309213058a91SGregory Neil Shapiro /* Make a non-DFL/IGN signal a noop */
309313058a91SGregory Neil Shapiro #define SM_NOOP_SIGNAL(sig, old)				\
309413058a91SGregory Neil Shapiro do								\
309513058a91SGregory Neil Shapiro {								\
309640266059SGregory Neil Shapiro 	(old) = sm_signal((sig), sm_signal_noop);		\
309713058a91SGregory Neil Shapiro 	if ((old) == SIG_IGN || (old) == SIG_DFL)		\
309840266059SGregory Neil Shapiro 		(void) sm_signal((sig), (old));			\
309913058a91SGregory Neil Shapiro } while (0)
310013058a91SGregory Neil Shapiro 
310140266059SGregory Neil Shapiro void
31028774250cSGregory Neil Shapiro restart_daemon()
31038774250cSGregory Neil Shapiro {
310440266059SGregory Neil Shapiro 	bool drop;
31058774250cSGregory Neil Shapiro 	int save_errno;
31068774250cSGregory Neil Shapiro 	char *reason;
310713058a91SGregory Neil Shapiro 	sigfunc_t ignore, oalrm, ousr1;
31088774250cSGregory Neil Shapiro 	extern int DtableSize;
31098774250cSGregory Neil Shapiro 
311013058a91SGregory Neil Shapiro 	/* clear the events to turn off SIGALRMs */
311140266059SGregory Neil Shapiro 	sm_clear_events();
311240266059SGregory Neil Shapiro 	sm_allsignals(true);
31138774250cSGregory Neil Shapiro 
31148774250cSGregory Neil Shapiro 	reason = RestartRequest;
31158774250cSGregory Neil Shapiro 	RestartRequest = NULL;
31168774250cSGregory Neil Shapiro 	PendingSignal = 0;
31178774250cSGregory Neil Shapiro 
31188774250cSGregory Neil Shapiro 	if (SaveArgv[0][0] != '/')
31198774250cSGregory Neil Shapiro 	{
31208774250cSGregory Neil Shapiro 		if (LogLevel > 3)
31218774250cSGregory Neil Shapiro 			sm_syslog(LOG_INFO, NOQID,
31228774250cSGregory Neil Shapiro 				  "could not restart: need full path");
312340266059SGregory Neil Shapiro 		finis(false, true, EX_OSFILE);
312440266059SGregory Neil Shapiro 		/* NOTREACHED */
31258774250cSGregory Neil Shapiro 	}
31268774250cSGregory Neil Shapiro 	if (LogLevel > 3)
31278774250cSGregory Neil Shapiro 		sm_syslog(LOG_INFO, NOQID, "restarting %s due to %s",
31288774250cSGregory Neil Shapiro 			  SaveArgv[0],
31298774250cSGregory Neil Shapiro 			  reason == NULL ? "implicit call" : reason);
31308774250cSGregory Neil Shapiro 
313140266059SGregory Neil Shapiro 	closecontrolsocket(true);
313294c01205SGregory Neil Shapiro #if SM_CONF_SHM
313394c01205SGregory Neil Shapiro 	cleanup_shm(DaemonPid == getpid());
313494c01205SGregory Neil Shapiro #endif /* SM_CONF_SHM */
313540266059SGregory Neil Shapiro 
3136e92d3f3fSGregory Neil Shapiro 	/* close locked pid file */
3137e92d3f3fSGregory Neil Shapiro 	close_sendmail_pid();
3138e92d3f3fSGregory Neil Shapiro 
313940266059SGregory Neil Shapiro 	/*
314040266059SGregory Neil Shapiro 	**  Want to drop to the user who started the process in all cases
314140266059SGregory Neil Shapiro 	**  *but* when running as "smmsp" for the clientmqueue queue run
314240266059SGregory Neil Shapiro 	**  daemon.  In that case, UseMSP will be true, RunAsUid should not
314340266059SGregory Neil Shapiro 	**  be root, and RealUid should be either 0 or RunAsUid.
314440266059SGregory Neil Shapiro 	*/
314540266059SGregory Neil Shapiro 
314640266059SGregory Neil Shapiro 	drop = !(UseMSP && RunAsUid != 0 &&
314740266059SGregory Neil Shapiro 		 (RealUid == 0 || RealUid == RunAsUid));
314840266059SGregory Neil Shapiro 
314940266059SGregory Neil Shapiro 	if (drop_privileges(drop) != EX_OK)
31508774250cSGregory Neil Shapiro 	{
31518774250cSGregory Neil Shapiro 		if (LogLevel > 0)
31528774250cSGregory Neil Shapiro 			sm_syslog(LOG_ALERT, NOQID,
315340266059SGregory Neil Shapiro 				  "could not drop privileges: %s",
315440266059SGregory Neil Shapiro 				  sm_errstring(errno));
315540266059SGregory Neil Shapiro 		finis(false, true, EX_OSERR);
315640266059SGregory Neil Shapiro 		/* NOTREACHED */
31578774250cSGregory Neil Shapiro 	}
31588774250cSGregory Neil Shapiro 
3159e92d3f3fSGregory Neil Shapiro 	sm_close_on_exec(STDERR_FILENO + 1, DtableSize);
31608774250cSGregory Neil Shapiro 
316113058a91SGregory Neil Shapiro 	/*
316213058a91SGregory Neil Shapiro 	**  Need to allow signals before execve() to make them "harmless".
316313058a91SGregory Neil Shapiro 	**  However, the default action can be "terminate", so it isn't
316413058a91SGregory Neil Shapiro 	**  really harmless.  Setting signals to IGN will cause them to be
316513058a91SGregory Neil Shapiro 	**  ignored in the new process to, so that isn't a good alternative.
316613058a91SGregory Neil Shapiro 	*/
316713058a91SGregory Neil Shapiro 
316813058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGALRM, oalrm);
316913058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGCHLD, ignore);
317013058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGHUP, ignore);
317113058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGINT, ignore);
317213058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGPIPE, ignore);
317313058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGTERM, ignore);
317413058a91SGregory Neil Shapiro #ifdef SIGUSR1
317513058a91SGregory Neil Shapiro 	SM_NOOP_SIGNAL(SIGUSR1, ousr1);
317613058a91SGregory Neil Shapiro #endif /* SIGUSR1 */
3177605302a5SGregory Neil Shapiro 
3178605302a5SGregory Neil Shapiro 	/* Turn back on signals */
317940266059SGregory Neil Shapiro 	sm_allsignals(false);
31808774250cSGregory Neil Shapiro 
31818774250cSGregory Neil Shapiro 	(void) execve(SaveArgv[0], (ARGV_T) SaveArgv, (ARGV_T) ExternalEnviron);
31828774250cSGregory Neil Shapiro 	save_errno = errno;
31838774250cSGregory Neil Shapiro 
318413058a91SGregory Neil Shapiro 	/* block signals again and restore needed signals */
318540266059SGregory Neil Shapiro 	sm_allsignals(true);
318613058a91SGregory Neil Shapiro 
318713058a91SGregory Neil Shapiro 	/* For finis() events */
318840266059SGregory Neil Shapiro 	(void) sm_signal(SIGALRM, oalrm);
318913058a91SGregory Neil Shapiro 
319013058a91SGregory Neil Shapiro #ifdef SIGUSR1
319113058a91SGregory Neil Shapiro 	/* For debugging finis() */
319240266059SGregory Neil Shapiro 	(void) sm_signal(SIGUSR1, ousr1);
319313058a91SGregory Neil Shapiro #endif /* SIGUSR1 */
31948774250cSGregory Neil Shapiro 
31958774250cSGregory Neil Shapiro 	errno = save_errno;
31968774250cSGregory Neil Shapiro 	if (LogLevel > 0)
319740266059SGregory Neil Shapiro 		sm_syslog(LOG_ALERT, NOQID, "could not exec %s: %s",
319840266059SGregory Neil Shapiro 			  SaveArgv[0], sm_errstring(errno));
319940266059SGregory Neil Shapiro 	finis(false, true, EX_OSFILE);
320040266059SGregory Neil Shapiro 	/* NOTREACHED */
32018774250cSGregory Neil Shapiro }
320240266059SGregory Neil Shapiro /*
3203c2aa98e2SPeter Wemm **  MYHOSTNAME -- return the name of this host.
3204c2aa98e2SPeter Wemm **
3205c2aa98e2SPeter Wemm **	Parameters:
3206c2aa98e2SPeter Wemm **		hostbuf -- a place to return the name of this host.
3207c2aa98e2SPeter Wemm **		size -- the size of hostbuf.
3208c2aa98e2SPeter Wemm **
3209c2aa98e2SPeter Wemm **	Returns:
3210c2aa98e2SPeter Wemm **		A list of aliases for this host.
3211c2aa98e2SPeter Wemm **
3212c2aa98e2SPeter Wemm **	Side Effects:
3213c2aa98e2SPeter Wemm **		Adds numeric codes to $=w.
3214c2aa98e2SPeter Wemm */
3215c2aa98e2SPeter Wemm 
3216c2aa98e2SPeter Wemm struct hostent *
3217c2aa98e2SPeter Wemm myhostname(hostbuf, size)
3218c2aa98e2SPeter Wemm 	char hostbuf[];
3219c2aa98e2SPeter Wemm 	int size;
3220c2aa98e2SPeter Wemm {
3221c2aa98e2SPeter Wemm 	register struct hostent *hp;
3222c2aa98e2SPeter Wemm 
3223602a2b1bSGregory Neil Shapiro 	if (gethostname(hostbuf, size) < 0 || hostbuf[0] == '\0')
322440266059SGregory Neil Shapiro 		(void) sm_strlcpy(hostbuf, "localhost", size);
322506f25ae9SGregory Neil Shapiro 	hp = sm_gethostbyname(hostbuf, InetMode);
322613058a91SGregory Neil Shapiro #if NETINET && NETINET6
322713058a91SGregory Neil Shapiro 	if (hp == NULL && InetMode == AF_INET6)
322813058a91SGregory Neil Shapiro 	{
322913058a91SGregory Neil Shapiro 		/*
323013058a91SGregory Neil Shapiro 		**  It's possible that this IPv6 enabled machine doesn't
323113058a91SGregory Neil Shapiro 		**  actually have any IPv6 interfaces and, therefore, no
323213058a91SGregory Neil Shapiro 		**  IPv6 addresses.  Fall back to AF_INET.
323313058a91SGregory Neil Shapiro 		*/
323413058a91SGregory Neil Shapiro 
323513058a91SGregory Neil Shapiro 		hp = sm_gethostbyname(hostbuf, AF_INET);
323613058a91SGregory Neil Shapiro 	}
323713058a91SGregory Neil Shapiro #endif /* NETINET && NETINET6 */
3238c2aa98e2SPeter Wemm 	if (hp == NULL)
3239c2aa98e2SPeter Wemm 		return NULL;
3240c2aa98e2SPeter Wemm 	if (strchr(hp->h_name, '.') != NULL || strchr(hostbuf, '.') == NULL)
324106f25ae9SGregory Neil Shapiro 		(void) cleanstrcpy(hostbuf, hp->h_name, size);
324206f25ae9SGregory Neil Shapiro 
324306f25ae9SGregory Neil Shapiro #if NETINFO
324406f25ae9SGregory Neil Shapiro 	if (strchr(hostbuf, '.') == NULL)
3245c2aa98e2SPeter Wemm 	{
324606f25ae9SGregory Neil Shapiro 		char *domainname;
324706f25ae9SGregory Neil Shapiro 
324806f25ae9SGregory Neil Shapiro 		domainname = ni_propval("/locations", NULL, "resolver",
324906f25ae9SGregory Neil Shapiro 					"domain", '\0');
325006f25ae9SGregory Neil Shapiro 		if (domainname != NULL &&
325106f25ae9SGregory Neil Shapiro 		    strlen(domainname) + strlen(hostbuf) + 1 < size)
325240266059SGregory Neil Shapiro 			(void) sm_strlcat2(hostbuf, ".", domainname, size);
325306f25ae9SGregory Neil Shapiro 	}
325406f25ae9SGregory Neil Shapiro #endif /* NETINFO */
3255c2aa98e2SPeter Wemm 
3256c2aa98e2SPeter Wemm 	/*
3257c2aa98e2SPeter Wemm 	**  If there is still no dot in the name, try looking for a
3258c2aa98e2SPeter Wemm 	**  dotted alias.
3259c2aa98e2SPeter Wemm 	*/
3260c2aa98e2SPeter Wemm 
3261c2aa98e2SPeter Wemm 	if (strchr(hostbuf, '.') == NULL)
3262c2aa98e2SPeter Wemm 	{
3263c2aa98e2SPeter Wemm 		char **ha;
3264c2aa98e2SPeter Wemm 
326506f25ae9SGregory Neil Shapiro 		for (ha = hp->h_aliases; ha != NULL && *ha != NULL; ha++)
3266c2aa98e2SPeter Wemm 		{
3267c2aa98e2SPeter Wemm 			if (strchr(*ha, '.') != NULL)
3268c2aa98e2SPeter Wemm 			{
326906f25ae9SGregory Neil Shapiro 				(void) cleanstrcpy(hostbuf, *ha, size - 1);
3270c2aa98e2SPeter Wemm 				hostbuf[size - 1] = '\0';
3271c2aa98e2SPeter Wemm 				break;
3272c2aa98e2SPeter Wemm 			}
3273c2aa98e2SPeter Wemm 		}
3274c2aa98e2SPeter Wemm 	}
3275c2aa98e2SPeter Wemm 
3276c2aa98e2SPeter Wemm 	/*
3277c2aa98e2SPeter Wemm 	**  If _still_ no dot, wait for a while and try again -- it is
3278c2aa98e2SPeter Wemm 	**  possible that some service is starting up.  This can result
3279c2aa98e2SPeter Wemm 	**  in excessive delays if the system is badly configured, but
3280c2aa98e2SPeter Wemm 	**  there really isn't a way around that, particularly given that
3281c2aa98e2SPeter Wemm 	**  the config file hasn't been read at this point.
3282c2aa98e2SPeter Wemm 	**  All in all, a bit of a mess.
3283c2aa98e2SPeter Wemm 	*/
3284c2aa98e2SPeter Wemm 
3285c2aa98e2SPeter Wemm 	if (strchr(hostbuf, '.') == NULL &&
328640266059SGregory Neil Shapiro 	    !getcanonname(hostbuf, size, true, NULL))
3287c2aa98e2SPeter Wemm 	{
3288e3793f76SGregory Neil Shapiro 		sm_syslog(LocalDaemon ? LOG_WARNING : LOG_CRIT, NOQID,
3289c2aa98e2SPeter Wemm 			  "My unqualified host name (%s) unknown; sleeping for retry",
3290c2aa98e2SPeter Wemm 			  hostbuf);
3291c2aa98e2SPeter Wemm 		message("My unqualified host name (%s) unknown; sleeping for retry",
3292c2aa98e2SPeter Wemm 			hostbuf);
329306f25ae9SGregory Neil Shapiro 		(void) sleep(60);
329440266059SGregory Neil Shapiro 		if (!getcanonname(hostbuf, size, true, NULL))
3295c2aa98e2SPeter Wemm 		{
3296e3793f76SGregory Neil Shapiro 			sm_syslog(LocalDaemon ? LOG_WARNING : LOG_ALERT, NOQID,
3297c2aa98e2SPeter Wemm 				  "unable to qualify my own domain name (%s) -- using short name",
3298c2aa98e2SPeter Wemm 				  hostbuf);
3299c2aa98e2SPeter Wemm 			message("WARNING: unable to qualify my own domain name (%s) -- using short name",
3300c2aa98e2SPeter Wemm 				hostbuf);
3301c2aa98e2SPeter Wemm 		}
3302c2aa98e2SPeter Wemm 	}
330306f25ae9SGregory Neil Shapiro 	return hp;
3304c2aa98e2SPeter Wemm }
330540266059SGregory Neil Shapiro /*
3306c2aa98e2SPeter Wemm **  ADDRCMP -- compare two host addresses
3307c2aa98e2SPeter Wemm **
3308c2aa98e2SPeter Wemm **	Parameters:
3309c2aa98e2SPeter Wemm **		hp -- hostent structure for the first address
3310c2aa98e2SPeter Wemm **		ha -- actual first address
3311c2aa98e2SPeter Wemm **		sa -- second address
3312c2aa98e2SPeter Wemm **
3313c2aa98e2SPeter Wemm **	Returns:
3314c2aa98e2SPeter Wemm **		0 -- if ha and sa match
3315c2aa98e2SPeter Wemm **		else -- they don't match
3316c2aa98e2SPeter Wemm */
3317c2aa98e2SPeter Wemm 
331806f25ae9SGregory Neil Shapiro static int
3319c2aa98e2SPeter Wemm addrcmp(hp, ha, sa)
3320c2aa98e2SPeter Wemm 	struct hostent *hp;
3321c2aa98e2SPeter Wemm 	char *ha;
3322c2aa98e2SPeter Wemm 	SOCKADDR *sa;
3323c2aa98e2SPeter Wemm {
332406f25ae9SGregory Neil Shapiro #if NETINET6
332540266059SGregory Neil Shapiro 	unsigned char *a;
332606f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
332706f25ae9SGregory Neil Shapiro 
3328c2aa98e2SPeter Wemm 	switch (sa->sa.sa_family)
3329c2aa98e2SPeter Wemm 	{
333006f25ae9SGregory Neil Shapiro #if NETINET
3331c2aa98e2SPeter Wemm 	  case AF_INET:
3332c2aa98e2SPeter Wemm 		if (hp->h_addrtype == AF_INET)
333306f25ae9SGregory Neil Shapiro 			return memcmp(ha, (char *) &sa->sin.sin_addr, INADDRSZ);
3334c2aa98e2SPeter Wemm 		break;
333506f25ae9SGregory Neil Shapiro #endif /* NETINET */
3336c2aa98e2SPeter Wemm 
333706f25ae9SGregory Neil Shapiro #if NETINET6
333806f25ae9SGregory Neil Shapiro 	  case AF_INET6:
333940266059SGregory Neil Shapiro 		a = (unsigned char *) &sa->sin6.sin6_addr;
334006f25ae9SGregory Neil Shapiro 
334106f25ae9SGregory Neil Shapiro 		/* Straight binary comparison */
334206f25ae9SGregory Neil Shapiro 		if (hp->h_addrtype == AF_INET6)
334306f25ae9SGregory Neil Shapiro 			return memcmp(ha, a, IN6ADDRSZ);
334406f25ae9SGregory Neil Shapiro 
334506f25ae9SGregory Neil Shapiro 		/* If IPv4-mapped IPv6 address, compare the IPv4 section */
334606f25ae9SGregory Neil Shapiro 		if (hp->h_addrtype == AF_INET &&
334706f25ae9SGregory Neil Shapiro 		    IN6_IS_ADDR_V4MAPPED(&sa->sin6.sin6_addr))
334806f25ae9SGregory Neil Shapiro 			return memcmp(a + IN6ADDRSZ - INADDRSZ, ha, INADDRSZ);
334906f25ae9SGregory Neil Shapiro 		break;
335006f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
3351c2aa98e2SPeter Wemm 	}
3352c2aa98e2SPeter Wemm 	return -1;
3353c2aa98e2SPeter Wemm }
335440266059SGregory Neil Shapiro /*
335506f25ae9SGregory Neil Shapiro **  GETAUTHINFO -- get the real host name associated with a file descriptor
3356c2aa98e2SPeter Wemm **
3357c2aa98e2SPeter Wemm **	Uses RFC1413 protocol to try to get info from the other end.
3358c2aa98e2SPeter Wemm **
3359c2aa98e2SPeter Wemm **	Parameters:
3360c2aa98e2SPeter Wemm **		fd -- the descriptor
336140266059SGregory Neil Shapiro **		may_be_forged -- an outage that is set to true if the
3362c2aa98e2SPeter Wemm **			forward lookup of RealHostName does not match
336340266059SGregory Neil Shapiro **			RealHostAddr; set to false if they do match.
3364c2aa98e2SPeter Wemm **
3365c2aa98e2SPeter Wemm **	Returns:
3366c2aa98e2SPeter Wemm **		The user@host information associated with this descriptor.
3367c2aa98e2SPeter Wemm */
3368c2aa98e2SPeter Wemm 
3369c2aa98e2SPeter Wemm static jmp_buf	CtxAuthTimeout;
3370c2aa98e2SPeter Wemm 
3371c2aa98e2SPeter Wemm static void
3372b6bacd31SGregory Neil Shapiro authtimeout(ignore)
3373b6bacd31SGregory Neil Shapiro 	int ignore;
3374c2aa98e2SPeter Wemm {
33758774250cSGregory Neil Shapiro 	/*
33768774250cSGregory Neil Shapiro 	**  NOTE: THIS CAN BE CALLED FROM A SIGNAL HANDLER.  DO NOT ADD
33778774250cSGregory Neil Shapiro 	**	ANYTHING TO THIS ROUTINE UNLESS YOU KNOW WHAT YOU ARE
33788774250cSGregory Neil Shapiro 	**	DOING.
33798774250cSGregory Neil Shapiro 	*/
33808774250cSGregory Neil Shapiro 
33818774250cSGregory Neil Shapiro 	errno = ETIMEDOUT;
3382c2aa98e2SPeter Wemm 	longjmp(CtxAuthTimeout, 1);
3383c2aa98e2SPeter Wemm }
3384c2aa98e2SPeter Wemm 
3385c2aa98e2SPeter Wemm char *
3386c2aa98e2SPeter Wemm getauthinfo(fd, may_be_forged)
3387c2aa98e2SPeter Wemm 	int fd;
3388c2aa98e2SPeter Wemm 	bool *may_be_forged;
3389c2aa98e2SPeter Wemm {
339040266059SGregory Neil Shapiro 	unsigned short SM_NONVOLATILE port = 0;
3391c2aa98e2SPeter Wemm 	SOCKADDR_LEN_T falen;
3392c2aa98e2SPeter Wemm 	register char *volatile p = NULL;
3393c2aa98e2SPeter Wemm 	SOCKADDR la;
3394c2aa98e2SPeter Wemm 	SOCKADDR_LEN_T lalen;
339540266059SGregory Neil Shapiro #ifndef NO_GETSERVBYNAME
3396c2aa98e2SPeter Wemm 	register struct servent *sp;
339740266059SGregory Neil Shapiro # if NETINET
339840266059SGregory Neil Shapiro 	static unsigned short port4 = 0;
339940266059SGregory Neil Shapiro # endif /* NETINET */
340040266059SGregory Neil Shapiro # if NETINET6
340140266059SGregory Neil Shapiro 	static unsigned short port6 = 0;
340240266059SGregory Neil Shapiro # endif /* NETINET6 */
340340266059SGregory Neil Shapiro #endif /* ! NO_GETSERVBYNAME */
3404c2aa98e2SPeter Wemm 	volatile int s;
3405c2aa98e2SPeter Wemm 	int i = 0;
340640266059SGregory Neil Shapiro 	size_t len;
340740266059SGregory Neil Shapiro 	SM_EVENT *ev;
3408c2aa98e2SPeter Wemm 	int nleft;
3409c2aa98e2SPeter Wemm 	struct hostent *hp;
3410c2aa98e2SPeter Wemm 	char *ostype = NULL;
3411c2aa98e2SPeter Wemm 	char **ha;
3412c2aa98e2SPeter Wemm 	char ibuf[MAXNAME + 1];
341313bd1963SGregory Neil Shapiro 	static char hbuf[MAXNAME + MAXAUTHINFO + 11];
3414c2aa98e2SPeter Wemm 
341540266059SGregory Neil Shapiro 	*may_be_forged = false;
3416d0cef73dSGregory Neil Shapiro 	falen = sizeof(RealHostAddr);
3417c2aa98e2SPeter Wemm 	if (isatty(fd) || (i = getpeername(fd, &RealHostAddr.sa, &falen)) < 0 ||
3418c2aa98e2SPeter Wemm 	    falen <= 0 || RealHostAddr.sa.sa_family == 0)
3419c2aa98e2SPeter Wemm 	{
342006f25ae9SGregory Neil Shapiro 		if (i < 0)
342106f25ae9SGregory Neil Shapiro 		{
342206f25ae9SGregory Neil Shapiro 			/*
342306f25ae9SGregory Neil Shapiro 			**  ENOTSOCK is OK: bail on anything else, but reset
342406f25ae9SGregory Neil Shapiro 			**  errno in this case, so a mis-report doesn't
342506f25ae9SGregory Neil Shapiro 			**  happen later.
342606f25ae9SGregory Neil Shapiro 			*/
342740266059SGregory Neil Shapiro 
342806f25ae9SGregory Neil Shapiro 			if (errno != ENOTSOCK)
3429c2aa98e2SPeter Wemm 				return NULL;
343006f25ae9SGregory Neil Shapiro 			errno = 0;
343106f25ae9SGregory Neil Shapiro 		}
3432d0cef73dSGregory Neil Shapiro 		(void) sm_strlcpyn(hbuf, sizeof(hbuf), 2, RealUserName,
343340266059SGregory Neil Shapiro 				   "@localhost");
3434c2aa98e2SPeter Wemm 		if (tTd(9, 1))
343540266059SGregory Neil Shapiro 			sm_dprintf("getauthinfo: %s\n", hbuf);
3436c2aa98e2SPeter Wemm 		return hbuf;
3437c2aa98e2SPeter Wemm 	}
3438c2aa98e2SPeter Wemm 
3439c2aa98e2SPeter Wemm 	if (RealHostName == NULL)
3440c2aa98e2SPeter Wemm 	{
3441c2aa98e2SPeter Wemm 		/* translate that to a host name */
3442c2aa98e2SPeter Wemm 		RealHostName = newstr(hostnamebyanyaddr(&RealHostAddr));
3443c2aa98e2SPeter Wemm 		if (strlen(RealHostName) > MAXNAME)
344440266059SGregory Neil Shapiro 			RealHostName[MAXNAME] = '\0'; /* XXX - 1 ? */
3445c2aa98e2SPeter Wemm 	}
3446c2aa98e2SPeter Wemm 
3447c2aa98e2SPeter Wemm 	/* cross check RealHostName with forward DNS lookup */
344840266059SGregory Neil Shapiro 	if (anynet_ntoa(&RealHostAddr)[0] != '[' &&
344940266059SGregory Neil Shapiro 	    RealHostName[0] != '[')
3450c2aa98e2SPeter Wemm 	{
345113058a91SGregory Neil Shapiro 		int family;
3452c2aa98e2SPeter Wemm 
345313058a91SGregory Neil Shapiro 		family = RealHostAddr.sa.sa_family;
345413058a91SGregory Neil Shapiro #if NETINET6 && NEEDSGETIPNODE
345513058a91SGregory Neil Shapiro 		/*
345613058a91SGregory Neil Shapiro 		**  If RealHostAddr is an IPv6 connection with an
345713058a91SGregory Neil Shapiro 		**  IPv4-mapped address, we need RealHostName's IPv4
345813058a91SGregory Neil Shapiro 		**  address(es) for addrcmp() to compare against
345913058a91SGregory Neil Shapiro 		**  RealHostAddr.
346013058a91SGregory Neil Shapiro 		**
346113058a91SGregory Neil Shapiro 		**  Actually, we only need to do this for systems
346213058a91SGregory Neil Shapiro 		**  which NEEDSGETIPNODE since the real getipnodebyname()
346313058a91SGregory Neil Shapiro 		**  already does V4MAPPED address via the AI_V4MAPPEDCFG
346413058a91SGregory Neil Shapiro 		**  flag.  A better fix to this problem is to add this
346513058a91SGregory Neil Shapiro 		**  functionality to our stub getipnodebyname().
346613058a91SGregory Neil Shapiro 		*/
346713058a91SGregory Neil Shapiro 
346813058a91SGregory Neil Shapiro 		if (family == AF_INET6 &&
346913058a91SGregory Neil Shapiro 		    IN6_IS_ADDR_V4MAPPED(&RealHostAddr.sin6.sin6_addr))
347013058a91SGregory Neil Shapiro 			family = AF_INET;
347113058a91SGregory Neil Shapiro #endif /* NETINET6 && NEEDSGETIPNODE */
347213058a91SGregory Neil Shapiro 
347313058a91SGregory Neil Shapiro 		/* try to match the reverse against the forward lookup */
347413058a91SGregory Neil Shapiro 		hp = sm_gethostbyname(RealHostName, family);
3475c2aa98e2SPeter Wemm 		if (hp == NULL)
3476a7ec597cSGregory Neil Shapiro 		{
3477e92d3f3fSGregory Neil Shapiro 			/* XXX: Could be a temporary error on forward lookup */
347840266059SGregory Neil Shapiro 			*may_be_forged = true;
3479a7ec597cSGregory Neil Shapiro 		}
3480c2aa98e2SPeter Wemm 		else
3481c2aa98e2SPeter Wemm 		{
3482c2aa98e2SPeter Wemm 			for (ha = hp->h_addr_list; *ha != NULL; ha++)
348340266059SGregory Neil Shapiro 			{
3484c2aa98e2SPeter Wemm 				if (addrcmp(hp, *ha, &RealHostAddr) == 0)
3485c2aa98e2SPeter Wemm 					break;
348640266059SGregory Neil Shapiro 			}
3487c2aa98e2SPeter Wemm 			*may_be_forged = *ha == NULL;
348840266059SGregory Neil Shapiro #if NETINET6
3489193538b7SGregory Neil Shapiro 			freehostent(hp);
3490193538b7SGregory Neil Shapiro 			hp = NULL;
349140266059SGregory Neil Shapiro #endif /* NETINET6 */
3492c2aa98e2SPeter Wemm 		}
3493c2aa98e2SPeter Wemm 	}
3494c2aa98e2SPeter Wemm 
3495c2aa98e2SPeter Wemm 	if (TimeOuts.to_ident == 0)
3496c2aa98e2SPeter Wemm 		goto noident;
3497c2aa98e2SPeter Wemm 
3498d0cef73dSGregory Neil Shapiro 	lalen = sizeof(la);
349906f25ae9SGregory Neil Shapiro 	switch (RealHostAddr.sa.sa_family)
350006f25ae9SGregory Neil Shapiro 	{
350106f25ae9SGregory Neil Shapiro #if NETINET
350206f25ae9SGregory Neil Shapiro 	  case AF_INET:
350306f25ae9SGregory Neil Shapiro 		if (getsockname(fd, &la.sa, &lalen) < 0 ||
350406f25ae9SGregory Neil Shapiro 		    lalen <= 0 ||
3505c2aa98e2SPeter Wemm 		    la.sa.sa_family != AF_INET)
3506c2aa98e2SPeter Wemm 		{
3507c2aa98e2SPeter Wemm 			/* no ident info */
3508c2aa98e2SPeter Wemm 			goto noident;
3509c2aa98e2SPeter Wemm 		}
351006f25ae9SGregory Neil Shapiro 		port = RealHostAddr.sin.sin_port;
3511c2aa98e2SPeter Wemm 
3512c2aa98e2SPeter Wemm 		/* create ident query */
3513d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(ibuf, sizeof(ibuf), "%d,%d\r\n",
351406f25ae9SGregory Neil Shapiro 				ntohs(RealHostAddr.sin.sin_port),
351506f25ae9SGregory Neil Shapiro 				ntohs(la.sin.sin_port));
3516c2aa98e2SPeter Wemm 
3517c2aa98e2SPeter Wemm 		/* create local address */
3518c2aa98e2SPeter Wemm 		la.sin.sin_port = 0;
3519c2aa98e2SPeter Wemm 
3520c2aa98e2SPeter Wemm 		/* create foreign address */
352106f25ae9SGregory Neil Shapiro # ifdef NO_GETSERVBYNAME
352206f25ae9SGregory Neil Shapiro 		RealHostAddr.sin.sin_port = htons(113);
352306f25ae9SGregory Neil Shapiro # else /* NO_GETSERVBYNAME */
352440266059SGregory Neil Shapiro 
352540266059SGregory Neil Shapiro 		/*
352640266059SGregory Neil Shapiro 		**  getservbyname() consumes about 5% of the time
352740266059SGregory Neil Shapiro 		**  when receiving a small message (almost all of the time
352840266059SGregory Neil Shapiro 		**  spent in this routine).
352940266059SGregory Neil Shapiro 		**  Hence we store the port in a static variable
353040266059SGregory Neil Shapiro 		**  to save this time.
353140266059SGregory Neil Shapiro 		**  The portnumber shouldn't change very often...
353240266059SGregory Neil Shapiro 		**  This code makes the assumption that the port number
353340266059SGregory Neil Shapiro 		**  is not 0.
353440266059SGregory Neil Shapiro 		*/
353540266059SGregory Neil Shapiro 
353640266059SGregory Neil Shapiro 		if (port4 == 0)
353740266059SGregory Neil Shapiro 		{
3538c2aa98e2SPeter Wemm 			sp = getservbyname("auth", "tcp");
3539c2aa98e2SPeter Wemm 			if (sp != NULL)
354040266059SGregory Neil Shapiro 				port4 = sp->s_port;
3541c2aa98e2SPeter Wemm 			else
354240266059SGregory Neil Shapiro 				port4 = htons(113);
354340266059SGregory Neil Shapiro 		}
354440266059SGregory Neil Shapiro 		RealHostAddr.sin.sin_port = port4;
354506f25ae9SGregory Neil Shapiro 		break;
354606f25ae9SGregory Neil Shapiro # endif /* NO_GETSERVBYNAME */
354706f25ae9SGregory Neil Shapiro #endif /* NETINET */
354806f25ae9SGregory Neil Shapiro 
354906f25ae9SGregory Neil Shapiro #if NETINET6
355006f25ae9SGregory Neil Shapiro 	  case AF_INET6:
355106f25ae9SGregory Neil Shapiro 		if (getsockname(fd, &la.sa, &lalen) < 0 ||
355206f25ae9SGregory Neil Shapiro 		    lalen <= 0 ||
355306f25ae9SGregory Neil Shapiro 		    la.sa.sa_family != AF_INET6)
355406f25ae9SGregory Neil Shapiro 		{
355506f25ae9SGregory Neil Shapiro 			/* no ident info */
355606f25ae9SGregory Neil Shapiro 			goto noident;
355706f25ae9SGregory Neil Shapiro 		}
355806f25ae9SGregory Neil Shapiro 		port = RealHostAddr.sin6.sin6_port;
355906f25ae9SGregory Neil Shapiro 
356006f25ae9SGregory Neil Shapiro 		/* create ident query */
3561d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(ibuf, sizeof(ibuf), "%d,%d\r\n",
356206f25ae9SGregory Neil Shapiro 				ntohs(RealHostAddr.sin6.sin6_port),
356306f25ae9SGregory Neil Shapiro 				ntohs(la.sin6.sin6_port));
356406f25ae9SGregory Neil Shapiro 
356506f25ae9SGregory Neil Shapiro 		/* create local address */
356606f25ae9SGregory Neil Shapiro 		la.sin6.sin6_port = 0;
356706f25ae9SGregory Neil Shapiro 
356806f25ae9SGregory Neil Shapiro 		/* create foreign address */
356906f25ae9SGregory Neil Shapiro # ifdef NO_GETSERVBYNAME
357006f25ae9SGregory Neil Shapiro 		RealHostAddr.sin6.sin6_port = htons(113);
357106f25ae9SGregory Neil Shapiro # else /* NO_GETSERVBYNAME */
357240266059SGregory Neil Shapiro 		if (port6 == 0)
357340266059SGregory Neil Shapiro 		{
357406f25ae9SGregory Neil Shapiro 			sp = getservbyname("auth", "tcp");
357506f25ae9SGregory Neil Shapiro 			if (sp != NULL)
357640266059SGregory Neil Shapiro 				port6 = sp->s_port;
357706f25ae9SGregory Neil Shapiro 			else
357840266059SGregory Neil Shapiro 				port6 = htons(113);
357940266059SGregory Neil Shapiro 		}
358040266059SGregory Neil Shapiro 		RealHostAddr.sin6.sin6_port = port6;
358106f25ae9SGregory Neil Shapiro 		break;
358206f25ae9SGregory Neil Shapiro # endif /* NO_GETSERVBYNAME */
358306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
358406f25ae9SGregory Neil Shapiro 	  default:
358506f25ae9SGregory Neil Shapiro 		/* no ident info */
358606f25ae9SGregory Neil Shapiro 		goto noident;
358706f25ae9SGregory Neil Shapiro 	}
3588c2aa98e2SPeter Wemm 
3589c2aa98e2SPeter Wemm 	s = -1;
3590c2aa98e2SPeter Wemm 	if (setjmp(CtxAuthTimeout) != 0)
3591c2aa98e2SPeter Wemm 	{
3592c2aa98e2SPeter Wemm 		if (s >= 0)
3593c2aa98e2SPeter Wemm 			(void) close(s);
3594c2aa98e2SPeter Wemm 		goto noident;
3595c2aa98e2SPeter Wemm 	}
3596c2aa98e2SPeter Wemm 
3597c2aa98e2SPeter Wemm 	/* put a timeout around the whole thing */
359840266059SGregory Neil Shapiro 	ev = sm_setevent(TimeOuts.to_ident, authtimeout, 0);
3599c2aa98e2SPeter Wemm 
3600c2aa98e2SPeter Wemm 	/* connect to foreign IDENT server using same address as SMTP socket */
360106f25ae9SGregory Neil Shapiro 	s = socket(la.sa.sa_family, SOCK_STREAM, 0);
3602c2aa98e2SPeter Wemm 	if (s < 0)
3603c2aa98e2SPeter Wemm 	{
360440266059SGregory Neil Shapiro 		sm_clrevent(ev);
3605c2aa98e2SPeter Wemm 		goto noident;
3606c2aa98e2SPeter Wemm 	}
360706f25ae9SGregory Neil Shapiro 	if (bind(s, &la.sa, lalen) < 0 ||
360806f25ae9SGregory Neil Shapiro 	    connect(s, &RealHostAddr.sa, lalen) < 0)
3609c2aa98e2SPeter Wemm 		goto closeident;
3610c2aa98e2SPeter Wemm 
3611c2aa98e2SPeter Wemm 	if (tTd(9, 10))
361240266059SGregory Neil Shapiro 		sm_dprintf("getauthinfo: sent %s", ibuf);
3613c2aa98e2SPeter Wemm 
3614c2aa98e2SPeter Wemm 	/* send query */
3615c2aa98e2SPeter Wemm 	if (write(s, ibuf, strlen(ibuf)) < 0)
3616c2aa98e2SPeter Wemm 		goto closeident;
3617c2aa98e2SPeter Wemm 
3618c2aa98e2SPeter Wemm 	/* get result */
3619c2aa98e2SPeter Wemm 	p = &ibuf[0];
3620d0cef73dSGregory Neil Shapiro 	nleft = sizeof(ibuf) - 1;
3621c2aa98e2SPeter Wemm 	while ((i = read(s, p, nleft)) > 0)
3622c2aa98e2SPeter Wemm 	{
3623323f6dcbSGregory Neil Shapiro 		char *s;
3624323f6dcbSGregory Neil Shapiro 
3625c2aa98e2SPeter Wemm 		p += i;
3626c2aa98e2SPeter Wemm 		nleft -= i;
3627c2aa98e2SPeter Wemm 		*p = '\0';
3628323f6dcbSGregory Neil Shapiro 		if ((s = strchr(ibuf, '\n')) != NULL)
3629323f6dcbSGregory Neil Shapiro 		{
3630323f6dcbSGregory Neil Shapiro 			if (p > s + 1)
3631323f6dcbSGregory Neil Shapiro 			{
3632323f6dcbSGregory Neil Shapiro 				p = s + 1;
3633323f6dcbSGregory Neil Shapiro 				*p = '\0';
3634323f6dcbSGregory Neil Shapiro 			}
3635323f6dcbSGregory Neil Shapiro 			break;
3636323f6dcbSGregory Neil Shapiro 		}
3637323f6dcbSGregory Neil Shapiro 		if (nleft <= 0)
3638c2aa98e2SPeter Wemm 			break;
3639c2aa98e2SPeter Wemm 	}
3640c2aa98e2SPeter Wemm 	(void) close(s);
364140266059SGregory Neil Shapiro 	sm_clrevent(ev);
3642c2aa98e2SPeter Wemm 	if (i < 0 || p == &ibuf[0])
3643c2aa98e2SPeter Wemm 		goto noident;
3644c2aa98e2SPeter Wemm 
3645d9986b26SGregory Neil Shapiro 	if (p >= &ibuf[2] && *--p == '\n' && *--p == '\r')
3646c2aa98e2SPeter Wemm 		p--;
3647c2aa98e2SPeter Wemm 	*++p = '\0';
3648c2aa98e2SPeter Wemm 
3649c2aa98e2SPeter Wemm 	if (tTd(9, 3))
365040266059SGregory Neil Shapiro 		sm_dprintf("getauthinfo:  got %s\n", ibuf);
3651c2aa98e2SPeter Wemm 
3652c2aa98e2SPeter Wemm 	/* parse result */
3653c2aa98e2SPeter Wemm 	p = strchr(ibuf, ':');
3654c2aa98e2SPeter Wemm 	if (p == NULL)
3655c2aa98e2SPeter Wemm 	{
3656c2aa98e2SPeter Wemm 		/* malformed response */
3657c2aa98e2SPeter Wemm 		goto noident;
3658c2aa98e2SPeter Wemm 	}
3659c2aa98e2SPeter Wemm 	while (isascii(*++p) && isspace(*p))
3660c2aa98e2SPeter Wemm 		continue;
366140266059SGregory Neil Shapiro 	if (sm_strncasecmp(p, "userid", 6) != 0)
3662c2aa98e2SPeter Wemm 	{
3663c2aa98e2SPeter Wemm 		/* presumably an error string */
3664c2aa98e2SPeter Wemm 		goto noident;
3665c2aa98e2SPeter Wemm 	}
3666c2aa98e2SPeter Wemm 	p += 6;
3667c2aa98e2SPeter Wemm 	while (isascii(*p) && isspace(*p))
3668c2aa98e2SPeter Wemm 		p++;
3669c2aa98e2SPeter Wemm 	if (*p++ != ':')
3670c2aa98e2SPeter Wemm 	{
3671c2aa98e2SPeter Wemm 		/* either useridxx or malformed response */
3672c2aa98e2SPeter Wemm 		goto noident;
3673c2aa98e2SPeter Wemm 	}
3674c2aa98e2SPeter Wemm 
3675c2aa98e2SPeter Wemm 	/* p now points to the OSTYPE field */
3676c2aa98e2SPeter Wemm 	while (isascii(*p) && isspace(*p))
3677c2aa98e2SPeter Wemm 		p++;
3678c2aa98e2SPeter Wemm 	ostype = p;
3679c2aa98e2SPeter Wemm 	p = strchr(p, ':');
3680c2aa98e2SPeter Wemm 	if (p == NULL)
3681c2aa98e2SPeter Wemm 	{
3682c2aa98e2SPeter Wemm 		/* malformed response */
3683c2aa98e2SPeter Wemm 		goto noident;
3684c2aa98e2SPeter Wemm 	}
3685c2aa98e2SPeter Wemm 	else
3686c2aa98e2SPeter Wemm 	{
3687c2aa98e2SPeter Wemm 		char *charset;
3688c2aa98e2SPeter Wemm 
3689c2aa98e2SPeter Wemm 		*p = '\0';
3690c2aa98e2SPeter Wemm 		charset = strchr(ostype, ',');
3691c2aa98e2SPeter Wemm 		if (charset != NULL)
3692c2aa98e2SPeter Wemm 			*charset = '\0';
3693c2aa98e2SPeter Wemm 	}
3694c2aa98e2SPeter Wemm 
3695c2aa98e2SPeter Wemm 	/* 1413 says don't do this -- but it's broken otherwise */
3696c2aa98e2SPeter Wemm 	while (isascii(*++p) && isspace(*p))
3697c2aa98e2SPeter Wemm 		continue;
3698c2aa98e2SPeter Wemm 
3699c2aa98e2SPeter Wemm 	/* p now points to the authenticated name -- copy carefully */
370040266059SGregory Neil Shapiro 	if (sm_strncasecmp(ostype, "other", 5) == 0 &&
3701c2aa98e2SPeter Wemm 	    (ostype[5] == ' ' || ostype[5] == '\0'))
3702c2aa98e2SPeter Wemm 	{
3703d0cef73dSGregory Neil Shapiro 		(void) sm_strlcpy(hbuf, "IDENT:", sizeof(hbuf));
370413bd1963SGregory Neil Shapiro 		cleanstrcpy(&hbuf[6], p, MAXAUTHINFO);
3705c2aa98e2SPeter Wemm 	}
3706c2aa98e2SPeter Wemm 	else
370713bd1963SGregory Neil Shapiro 		cleanstrcpy(hbuf, p, MAXAUTHINFO);
370840266059SGregory Neil Shapiro 	len = strlen(hbuf);
3709d0cef73dSGregory Neil Shapiro 	(void) sm_strlcpyn(&hbuf[len], sizeof(hbuf) - len, 2, "@",
3710c2aa98e2SPeter Wemm 			   RealHostName == NULL ? "localhost" : RealHostName);
3711c2aa98e2SPeter Wemm 	goto postident;
3712c2aa98e2SPeter Wemm 
3713c2aa98e2SPeter Wemm closeident:
3714c2aa98e2SPeter Wemm 	(void) close(s);
371540266059SGregory Neil Shapiro 	sm_clrevent(ev);
3716c2aa98e2SPeter Wemm 
3717c2aa98e2SPeter Wemm noident:
371806f25ae9SGregory Neil Shapiro 	/* put back the original incoming port */
371906f25ae9SGregory Neil Shapiro 	switch (RealHostAddr.sa.sa_family)
372006f25ae9SGregory Neil Shapiro 	{
372106f25ae9SGregory Neil Shapiro #if NETINET
372206f25ae9SGregory Neil Shapiro 	  case AF_INET:
372306f25ae9SGregory Neil Shapiro 		if (port > 0)
372406f25ae9SGregory Neil Shapiro 			RealHostAddr.sin.sin_port = port;
372506f25ae9SGregory Neil Shapiro 		break;
372606f25ae9SGregory Neil Shapiro #endif /* NETINET */
372706f25ae9SGregory Neil Shapiro 
372806f25ae9SGregory Neil Shapiro #if NETINET6
372906f25ae9SGregory Neil Shapiro 	  case AF_INET6:
373006f25ae9SGregory Neil Shapiro 		if (port > 0)
373106f25ae9SGregory Neil Shapiro 			RealHostAddr.sin6.sin6_port = port;
373206f25ae9SGregory Neil Shapiro 		break;
373306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
373406f25ae9SGregory Neil Shapiro 	}
373506f25ae9SGregory Neil Shapiro 
3736c2aa98e2SPeter Wemm 	if (RealHostName == NULL)
3737c2aa98e2SPeter Wemm 	{
3738c2aa98e2SPeter Wemm 		if (tTd(9, 1))
373940266059SGregory Neil Shapiro 			sm_dprintf("getauthinfo: NULL\n");
3740c2aa98e2SPeter Wemm 		return NULL;
3741c2aa98e2SPeter Wemm 	}
3742d0cef73dSGregory Neil Shapiro 	(void) sm_strlcpy(hbuf, RealHostName, sizeof(hbuf));
3743c2aa98e2SPeter Wemm 
3744c2aa98e2SPeter Wemm postident:
3745c2aa98e2SPeter Wemm #if IP_SRCROUTE
3746c2aa98e2SPeter Wemm # ifndef GET_IPOPT_DST
3747c2aa98e2SPeter Wemm #  define GET_IPOPT_DST(dst)	(dst)
374806f25ae9SGregory Neil Shapiro # endif /* ! GET_IPOPT_DST */
3749c2aa98e2SPeter Wemm 	/*
3750c2aa98e2SPeter Wemm 	**  Extract IP source routing information.
3751c2aa98e2SPeter Wemm 	**
3752c2aa98e2SPeter Wemm 	**	Format of output for a connection from site a through b
3753c2aa98e2SPeter Wemm 	**	through c to d:
3754c2aa98e2SPeter Wemm 	**		loose:      @site-c@site-b:site-a
3755c2aa98e2SPeter Wemm 	**		strict:	   !@site-c@site-b:site-a
3756c2aa98e2SPeter Wemm 	**
3757c2aa98e2SPeter Wemm 	**	o - pointer within ipopt_list structure.
3758c2aa98e2SPeter Wemm 	**	q - pointer within ls/ss rr route data
3759c2aa98e2SPeter Wemm 	**	p - pointer to hbuf
3760c2aa98e2SPeter Wemm 	*/
3761c2aa98e2SPeter Wemm 
3762c2aa98e2SPeter Wemm 	if (RealHostAddr.sa.sa_family == AF_INET)
3763c2aa98e2SPeter Wemm 	{
3764c2aa98e2SPeter Wemm 		SOCKOPT_LEN_T ipoptlen;
3765c2aa98e2SPeter Wemm 		int j;
376640266059SGregory Neil Shapiro 		unsigned char *q;
376740266059SGregory Neil Shapiro 		unsigned char *o;
3768c2aa98e2SPeter Wemm 		int l;
376906f25ae9SGregory Neil Shapiro 		struct IPOPTION ipopt;
3770c2aa98e2SPeter Wemm 
3771d0cef73dSGregory Neil Shapiro 		ipoptlen = sizeof(ipopt);
3772c2aa98e2SPeter Wemm 		if (getsockopt(fd, IPPROTO_IP, IP_OPTIONS,
3773c2aa98e2SPeter Wemm 			       (char *) &ipopt, &ipoptlen) < 0)
3774c2aa98e2SPeter Wemm 			goto noipsr;
3775c2aa98e2SPeter Wemm 		if (ipoptlen == 0)
3776c2aa98e2SPeter Wemm 			goto noipsr;
377740266059SGregory Neil Shapiro 		o = (unsigned char *) ipopt.IP_LIST;
377840266059SGregory Neil Shapiro 		while (o != NULL && o < (unsigned char *) &ipopt + ipoptlen)
3779c2aa98e2SPeter Wemm 		{
3780c2aa98e2SPeter Wemm 			switch (*o)
3781c2aa98e2SPeter Wemm 			{
3782c2aa98e2SPeter Wemm 			  case IPOPT_EOL:
3783c2aa98e2SPeter Wemm 				o = NULL;
3784c2aa98e2SPeter Wemm 				break;
3785c2aa98e2SPeter Wemm 
3786c2aa98e2SPeter Wemm 			  case IPOPT_NOP:
3787c2aa98e2SPeter Wemm 				o++;
3788c2aa98e2SPeter Wemm 				break;
3789c2aa98e2SPeter Wemm 
3790c2aa98e2SPeter Wemm 			  case IPOPT_SSRR:
3791c2aa98e2SPeter Wemm 			  case IPOPT_LSRR:
3792c2aa98e2SPeter Wemm 				/*
3793c2aa98e2SPeter Wemm 				**  Source routing.
3794c2aa98e2SPeter Wemm 				**	o[0] is the option type (loose/strict).
3795c2aa98e2SPeter Wemm 				**	o[1] is the length of this option,
3796c2aa98e2SPeter Wemm 				**		including option type and
3797c2aa98e2SPeter Wemm 				**		length.
3798c2aa98e2SPeter Wemm 				**	o[2] is the pointer into the route
3799c2aa98e2SPeter Wemm 				**		data.
3800c2aa98e2SPeter Wemm 				**	o[3] begins the route data.
3801c2aa98e2SPeter Wemm 				*/
3802c2aa98e2SPeter Wemm 
3803c2aa98e2SPeter Wemm 				p = &hbuf[strlen(hbuf)];
3804d0cef73dSGregory Neil Shapiro 				l = sizeof(hbuf) - (hbuf - p) - 6;
380540266059SGregory Neil Shapiro 				(void) sm_snprintf(p, SPACELEFT(hbuf, p),
380640266059SGregory Neil Shapiro 					" [%s@%.*s",
3807c2aa98e2SPeter Wemm 					*o == IPOPT_SSRR ? "!" : "",
3808c2aa98e2SPeter Wemm 					l > 240 ? 120 : l / 2,
380906f25ae9SGregory Neil Shapiro 					inet_ntoa(GET_IPOPT_DST(ipopt.IP_DST)));
3810c2aa98e2SPeter Wemm 				i = strlen(p);
3811c2aa98e2SPeter Wemm 				p += i;
3812c2aa98e2SPeter Wemm 				l -= strlen(p);
3813c2aa98e2SPeter Wemm 
3814c2aa98e2SPeter Wemm 				j = o[1] / sizeof(struct in_addr) - 1;
3815c2aa98e2SPeter Wemm 
3816c2aa98e2SPeter Wemm 				/* q skips length and router pointer to data */
3817c2aa98e2SPeter Wemm 				q = &o[3];
3818c2aa98e2SPeter Wemm 				for ( ; j >= 0; j--)
3819c2aa98e2SPeter Wemm 				{
382006f25ae9SGregory Neil Shapiro 					struct in_addr addr;
382106f25ae9SGregory Neil Shapiro 
3822c2aa98e2SPeter Wemm 					memcpy(&addr, q, sizeof(addr));
382340266059SGregory Neil Shapiro 					(void) sm_snprintf(p,
382440266059SGregory Neil Shapiro 						SPACELEFT(hbuf, p),
3825c2aa98e2SPeter Wemm 						"%c%.*s",
3826c2aa98e2SPeter Wemm 						j != 0 ? '@' : ':',
3827c2aa98e2SPeter Wemm 						l > 240 ? 120 :
3828c2aa98e2SPeter Wemm 							j == 0 ? l : l / 2,
3829c2aa98e2SPeter Wemm 						inet_ntoa(addr));
3830c2aa98e2SPeter Wemm 					i = strlen(p);
3831c2aa98e2SPeter Wemm 					p += i;
3832c2aa98e2SPeter Wemm 					l -= i + 1;
3833c2aa98e2SPeter Wemm 					q += sizeof(struct in_addr);
3834c2aa98e2SPeter Wemm 				}
3835c2aa98e2SPeter Wemm 				o += o[1];
3836c2aa98e2SPeter Wemm 				break;
3837c2aa98e2SPeter Wemm 
3838c2aa98e2SPeter Wemm 			  default:
3839c2aa98e2SPeter Wemm 				/* Skip over option */
3840c2aa98e2SPeter Wemm 				o += o[1];
3841c2aa98e2SPeter Wemm 				break;
3842c2aa98e2SPeter Wemm 			}
3843c2aa98e2SPeter Wemm 		}
384440266059SGregory Neil Shapiro 		(void) sm_snprintf(p, SPACELEFT(hbuf, p), "]");
3845c2aa98e2SPeter Wemm 		goto postipsr;
3846c2aa98e2SPeter Wemm 	}
3847c2aa98e2SPeter Wemm 
3848c2aa98e2SPeter Wemm noipsr:
384906f25ae9SGregory Neil Shapiro #endif /* IP_SRCROUTE */
3850c2aa98e2SPeter Wemm 	if (RealHostName != NULL && RealHostName[0] != '[')
3851c2aa98e2SPeter Wemm 	{
3852c2aa98e2SPeter Wemm 		p = &hbuf[strlen(hbuf)];
385340266059SGregory Neil Shapiro 		(void) sm_snprintf(p, SPACELEFT(hbuf, p), " [%.100s]",
3854c2aa98e2SPeter Wemm 				   anynet_ntoa(&RealHostAddr));
3855c2aa98e2SPeter Wemm 	}
3856c2aa98e2SPeter Wemm 	if (*may_be_forged)
3857c2aa98e2SPeter Wemm 	{
3858c2aa98e2SPeter Wemm 		p = &hbuf[strlen(hbuf)];
385940266059SGregory Neil Shapiro 		(void) sm_strlcpy(p, " (may be forged)", SPACELEFT(hbuf, p));
386040266059SGregory Neil Shapiro 		macdefine(&BlankEnvelope.e_macro, A_PERM,
386140266059SGregory Neil Shapiro 			  macid("{client_resolve}"), "FORGED");
3862c2aa98e2SPeter Wemm 	}
3863c2aa98e2SPeter Wemm 
3864c2aa98e2SPeter Wemm #if IP_SRCROUTE
3865c2aa98e2SPeter Wemm postipsr:
386606f25ae9SGregory Neil Shapiro #endif /* IP_SRCROUTE */
386706f25ae9SGregory Neil Shapiro 
386806f25ae9SGregory Neil Shapiro 	/* put back the original incoming port */
386906f25ae9SGregory Neil Shapiro 	switch (RealHostAddr.sa.sa_family)
387006f25ae9SGregory Neil Shapiro 	{
387106f25ae9SGregory Neil Shapiro #if NETINET
387206f25ae9SGregory Neil Shapiro 	  case AF_INET:
387306f25ae9SGregory Neil Shapiro 		if (port > 0)
387406f25ae9SGregory Neil Shapiro 			RealHostAddr.sin.sin_port = port;
387506f25ae9SGregory Neil Shapiro 		break;
387606f25ae9SGregory Neil Shapiro #endif /* NETINET */
387706f25ae9SGregory Neil Shapiro 
387806f25ae9SGregory Neil Shapiro #if NETINET6
387906f25ae9SGregory Neil Shapiro 	  case AF_INET6:
388006f25ae9SGregory Neil Shapiro 		if (port > 0)
388106f25ae9SGregory Neil Shapiro 			RealHostAddr.sin6.sin6_port = port;
388206f25ae9SGregory Neil Shapiro 		break;
388306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
388406f25ae9SGregory Neil Shapiro 	}
388506f25ae9SGregory Neil Shapiro 
388640266059SGregory Neil Shapiro 	if (tTd(9, 1))
388740266059SGregory Neil Shapiro 		sm_dprintf("getauthinfo: %s\n", hbuf);
3888c2aa98e2SPeter Wemm 	return hbuf;
3889c2aa98e2SPeter Wemm }
389040266059SGregory Neil Shapiro /*
3891c2aa98e2SPeter Wemm **  HOST_MAP_LOOKUP -- turn a hostname into canonical form
3892c2aa98e2SPeter Wemm **
3893c2aa98e2SPeter Wemm **	Parameters:
3894c2aa98e2SPeter Wemm **		map -- a pointer to this map.
3895c2aa98e2SPeter Wemm **		name -- the (presumably unqualified) hostname.
3896c2aa98e2SPeter Wemm **		av -- unused -- for compatibility with other mapping
3897c2aa98e2SPeter Wemm **			functions.
3898c2aa98e2SPeter Wemm **		statp -- an exit status (out parameter) -- set to
3899c2aa98e2SPeter Wemm **			EX_TEMPFAIL if the name server is unavailable.
3900c2aa98e2SPeter Wemm **
3901c2aa98e2SPeter Wemm **	Returns:
3902c2aa98e2SPeter Wemm **		The mapping, if found.
3903c2aa98e2SPeter Wemm **		NULL if no mapping found.
3904c2aa98e2SPeter Wemm **
3905c2aa98e2SPeter Wemm **	Side Effects:
3906c2aa98e2SPeter Wemm **		Looks up the host specified in hbuf.  If it is not
3907c2aa98e2SPeter Wemm **		the canonical name for that host, return the canonical
3908c2aa98e2SPeter Wemm **		name (unless MF_MATCHONLY is set, which will cause the
3909c2aa98e2SPeter Wemm **		status only to be returned).
3910c2aa98e2SPeter Wemm */
3911c2aa98e2SPeter Wemm 
3912c2aa98e2SPeter Wemm char *
3913c2aa98e2SPeter Wemm host_map_lookup(map, name, av, statp)
3914c2aa98e2SPeter Wemm 	MAP *map;
3915c2aa98e2SPeter Wemm 	char *name;
3916c2aa98e2SPeter Wemm 	char **av;
3917c2aa98e2SPeter Wemm 	int *statp;
3918c2aa98e2SPeter Wemm {
3919c2aa98e2SPeter Wemm 	register struct hostent *hp;
392006f25ae9SGregory Neil Shapiro #if NETINET
3921c2aa98e2SPeter Wemm 	struct in_addr in_addr;
392206f25ae9SGregory Neil Shapiro #endif /* NETINET */
392306f25ae9SGregory Neil Shapiro #if NETINET6
392406f25ae9SGregory Neil Shapiro 	struct in6_addr in6_addr;
392506f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
392606f25ae9SGregory Neil Shapiro 	char *cp, *ans = NULL;
3927c2aa98e2SPeter Wemm 	register STAB *s;
392840266059SGregory Neil Shapiro 	time_t now;
392940266059SGregory Neil Shapiro #if NAMED_BIND
393040266059SGregory Neil Shapiro 	time_t SM_NONVOLATILE retrans = 0;
393140266059SGregory Neil Shapiro 	int SM_NONVOLATILE retry = 0;
393240266059SGregory Neil Shapiro #endif /* NAMED_BIND */
3933c2aa98e2SPeter Wemm 	char hbuf[MAXNAME + 1];
3934c2aa98e2SPeter Wemm 
3935c2aa98e2SPeter Wemm 	/*
3936c2aa98e2SPeter Wemm 	**  See if we have already looked up this name.  If so, just
393740266059SGregory Neil Shapiro 	**  return it (unless expired).
3938c2aa98e2SPeter Wemm 	*/
3939c2aa98e2SPeter Wemm 
394040266059SGregory Neil Shapiro 	now = curtime();
3941c2aa98e2SPeter Wemm 	s = stab(name, ST_NAMECANON, ST_ENTER);
394240266059SGregory Neil Shapiro 	if (bitset(NCF_VALID, s->s_namecanon.nc_flags) &&
394340266059SGregory Neil Shapiro 	    s->s_namecanon.nc_exp >= now)
3944c2aa98e2SPeter Wemm 	{
3945c2aa98e2SPeter Wemm 		if (tTd(9, 1))
394640266059SGregory Neil Shapiro 			sm_dprintf("host_map_lookup(%s) => CACHE %s\n",
3947c2aa98e2SPeter Wemm 				    name,
3948c2aa98e2SPeter Wemm 				    s->s_namecanon.nc_cname == NULL
3949c2aa98e2SPeter Wemm 					? "NULL"
3950c2aa98e2SPeter Wemm 					: s->s_namecanon.nc_cname);
3951c2aa98e2SPeter Wemm 		errno = s->s_namecanon.nc_errno;
3952602a2b1bSGregory Neil Shapiro 		SM_SET_H_ERRNO(s->s_namecanon.nc_herrno);
3953c2aa98e2SPeter Wemm 		*statp = s->s_namecanon.nc_stat;
3954c2aa98e2SPeter Wemm 		if (*statp == EX_TEMPFAIL)
3955c2aa98e2SPeter Wemm 		{
3956c2aa98e2SPeter Wemm 			CurEnv->e_status = "4.4.3";
3957c2aa98e2SPeter Wemm 			message("851 %s: Name server timeout",
3958c2aa98e2SPeter Wemm 				shortenstring(name, 33));
3959c2aa98e2SPeter Wemm 		}
3960c2aa98e2SPeter Wemm 		if (*statp != EX_OK)
3961c2aa98e2SPeter Wemm 			return NULL;
3962c2aa98e2SPeter Wemm 		if (s->s_namecanon.nc_cname == NULL)
3963c2aa98e2SPeter Wemm 		{
3964c2aa98e2SPeter Wemm 			syserr("host_map_lookup(%s): bogus NULL cache entry, errno=%d, h_errno=%d",
3965c2aa98e2SPeter Wemm 			       name,
3966c2aa98e2SPeter Wemm 			       s->s_namecanon.nc_errno,
3967c2aa98e2SPeter Wemm 			       s->s_namecanon.nc_herrno);
3968c2aa98e2SPeter Wemm 			return NULL;
3969c2aa98e2SPeter Wemm 		}
3970c2aa98e2SPeter Wemm 		if (bitset(MF_MATCHONLY, map->map_mflags))
3971c2aa98e2SPeter Wemm 			cp = map_rewrite(map, name, strlen(name), NULL);
3972c2aa98e2SPeter Wemm 		else
3973c2aa98e2SPeter Wemm 			cp = map_rewrite(map,
3974c2aa98e2SPeter Wemm 					 s->s_namecanon.nc_cname,
3975c2aa98e2SPeter Wemm 					 strlen(s->s_namecanon.nc_cname),
3976c2aa98e2SPeter Wemm 					 av);
3977c2aa98e2SPeter Wemm 		return cp;
3978c2aa98e2SPeter Wemm 	}
3979c2aa98e2SPeter Wemm 
3980c2aa98e2SPeter Wemm 	/*
3981c2aa98e2SPeter Wemm 	**  If we are running without a regular network connection (usually
3982c2aa98e2SPeter Wemm 	**  dial-on-demand) and we are just queueing, we want to avoid DNS
3983c2aa98e2SPeter Wemm 	**  lookups because those could try to connect to a server.
3984c2aa98e2SPeter Wemm 	*/
3985c2aa98e2SPeter Wemm 
398606f25ae9SGregory Neil Shapiro 	if (CurEnv->e_sendmode == SM_DEFER &&
398706f25ae9SGregory Neil Shapiro 	    bitset(MF_DEFER, map->map_mflags))
3988c2aa98e2SPeter Wemm 	{
3989c2aa98e2SPeter Wemm 		if (tTd(9, 1))
399040266059SGregory Neil Shapiro 			sm_dprintf("host_map_lookup(%s) => DEFERRED\n", name);
3991c2aa98e2SPeter Wemm 		*statp = EX_TEMPFAIL;
3992c2aa98e2SPeter Wemm 		return NULL;
3993c2aa98e2SPeter Wemm 	}
3994c2aa98e2SPeter Wemm 
3995c2aa98e2SPeter Wemm 	/*
3996c2aa98e2SPeter Wemm 	**  If first character is a bracket, then it is an address
3997c2aa98e2SPeter Wemm 	**  lookup.  Address is copied into a temporary buffer to
3998c2aa98e2SPeter Wemm 	**  strip the brackets and to preserve name if address is
3999c2aa98e2SPeter Wemm 	**  unknown.
4000c2aa98e2SPeter Wemm 	*/
4001c2aa98e2SPeter Wemm 
400206f25ae9SGregory Neil Shapiro 	if (tTd(9, 1))
400340266059SGregory Neil Shapiro 		sm_dprintf("host_map_lookup(%s) => ", name);
400440266059SGregory Neil Shapiro #if NAMED_BIND
400540266059SGregory Neil Shapiro 	if (map->map_timeout > 0)
400640266059SGregory Neil Shapiro 	{
400740266059SGregory Neil Shapiro 		retrans = _res.retrans;
400840266059SGregory Neil Shapiro 		_res.retrans = map->map_timeout;
400940266059SGregory Neil Shapiro 	}
401040266059SGregory Neil Shapiro 	if (map->map_retry > 0)
401140266059SGregory Neil Shapiro 	{
401240266059SGregory Neil Shapiro 		retry = _res.retry;
401340266059SGregory Neil Shapiro 		_res.retry = map->map_retry;
401440266059SGregory Neil Shapiro 	}
401540266059SGregory Neil Shapiro #endif /* NAMED_BIND */
401640266059SGregory Neil Shapiro 
401740266059SGregory Neil Shapiro 	/* set default TTL */
401840266059SGregory Neil Shapiro 	s->s_namecanon.nc_exp = now + SM_DEFAULT_TTL;
4019c2aa98e2SPeter Wemm 	if (*name != '[')
4020c2aa98e2SPeter Wemm 	{
402140266059SGregory Neil Shapiro 		int ttl;
402240266059SGregory Neil Shapiro 
4023d0cef73dSGregory Neil Shapiro 		(void) sm_strlcpy(hbuf, name, sizeof(hbuf));
4024d0cef73dSGregory Neil Shapiro 		if (getcanonname(hbuf, sizeof(hbuf) - 1, !HasWildcardMX, &ttl))
402540266059SGregory Neil Shapiro 		{
402606f25ae9SGregory Neil Shapiro 			ans = hbuf;
402740266059SGregory Neil Shapiro 			if (ttl > 0)
402840266059SGregory Neil Shapiro 				s->s_namecanon.nc_exp = now + SM_MIN(ttl,
402940266059SGregory Neil Shapiro 								SM_DEFAULT_TTL);
403040266059SGregory Neil Shapiro 		}
4031c2aa98e2SPeter Wemm 	}
4032c2aa98e2SPeter Wemm 	else
4033c2aa98e2SPeter Wemm 	{
403406f25ae9SGregory Neil Shapiro 		if ((cp = strchr(name, ']')) == NULL)
4035193538b7SGregory Neil Shapiro 		{
4036193538b7SGregory Neil Shapiro 			if (tTd(9, 1))
403740266059SGregory Neil Shapiro 				sm_dprintf("FAILED\n");
403806f25ae9SGregory Neil Shapiro 			return NULL;
4039193538b7SGregory Neil Shapiro 		}
404006f25ae9SGregory Neil Shapiro 		*cp = '\0';
404106f25ae9SGregory Neil Shapiro 
404206f25ae9SGregory Neil Shapiro 		hp = NULL;
404306f25ae9SGregory Neil Shapiro #if NETINET
404406f25ae9SGregory Neil Shapiro 		if ((in_addr.s_addr = inet_addr(&name[1])) != INADDR_NONE)
404506f25ae9SGregory Neil Shapiro 			hp = sm_gethostbyaddr((char *)&in_addr,
404606f25ae9SGregory Neil Shapiro 					      INADDRSZ, AF_INET);
404706f25ae9SGregory Neil Shapiro #endif /* NETINET */
404806f25ae9SGregory Neil Shapiro #if NETINET6
404906f25ae9SGregory Neil Shapiro 		if (hp == NULL &&
405040266059SGregory Neil Shapiro 		    anynet_pton(AF_INET6, &name[1], &in6_addr) == 1)
405106f25ae9SGregory Neil Shapiro 			hp = sm_gethostbyaddr((char *)&in6_addr,
405206f25ae9SGregory Neil Shapiro 					      IN6ADDRSZ, AF_INET6);
405306f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
405406f25ae9SGregory Neil Shapiro 		*cp = ']';
405506f25ae9SGregory Neil Shapiro 
405606f25ae9SGregory Neil Shapiro 		if (hp != NULL)
405706f25ae9SGregory Neil Shapiro 		{
405806f25ae9SGregory Neil Shapiro 			/* found a match -- copy out */
405940266059SGregory Neil Shapiro 			ans = denlstring((char *) hp->h_name, true, true);
406040266059SGregory Neil Shapiro #if NETINET6
406140266059SGregory Neil Shapiro 			if (ans == hp->h_name)
406240266059SGregory Neil Shapiro 			{
406340266059SGregory Neil Shapiro 				static char n[MAXNAME + 1];
406440266059SGregory Neil Shapiro 
406540266059SGregory Neil Shapiro 				/* hp->h_name is about to disappear */
4066d0cef73dSGregory Neil Shapiro 				(void) sm_strlcpy(n, ans, sizeof(n));
406740266059SGregory Neil Shapiro 				ans = n;
406840266059SGregory Neil Shapiro 			}
4069193538b7SGregory Neil Shapiro 			freehostent(hp);
4070193538b7SGregory Neil Shapiro 			hp = NULL;
407140266059SGregory Neil Shapiro #endif /* NETINET6 */
407206f25ae9SGregory Neil Shapiro 		}
407306f25ae9SGregory Neil Shapiro 	}
407440266059SGregory Neil Shapiro #if NAMED_BIND
407540266059SGregory Neil Shapiro 	if (map->map_timeout > 0)
407640266059SGregory Neil Shapiro 		_res.retrans = retrans;
407740266059SGregory Neil Shapiro 	if (map->map_retry > 0)
407840266059SGregory Neil Shapiro 		_res.retry = retry;
407940266059SGregory Neil Shapiro #endif /* NAMED_BIND */
408006f25ae9SGregory Neil Shapiro 
408106f25ae9SGregory Neil Shapiro 	s->s_namecanon.nc_flags |= NCF_VALID;	/* will be soon */
408206f25ae9SGregory Neil Shapiro 
408306f25ae9SGregory Neil Shapiro 	/* Found an answer */
408406f25ae9SGregory Neil Shapiro 	if (ans != NULL)
408506f25ae9SGregory Neil Shapiro 	{
408606f25ae9SGregory Neil Shapiro 		s->s_namecanon.nc_stat = *statp = EX_OK;
408740266059SGregory Neil Shapiro 		if (s->s_namecanon.nc_cname != NULL)
408840266059SGregory Neil Shapiro 			sm_free(s->s_namecanon.nc_cname);
408940266059SGregory Neil Shapiro 		s->s_namecanon.nc_cname = sm_strdup_x(ans);
409006f25ae9SGregory Neil Shapiro 		if (bitset(MF_MATCHONLY, map->map_mflags))
409106f25ae9SGregory Neil Shapiro 			cp = map_rewrite(map, name, strlen(name), NULL);
409206f25ae9SGregory Neil Shapiro 		else
409306f25ae9SGregory Neil Shapiro 			cp = map_rewrite(map, ans, strlen(ans), av);
4094193538b7SGregory Neil Shapiro 		if (tTd(9, 1))
409540266059SGregory Neil Shapiro 			sm_dprintf("FOUND %s\n", ans);
409606f25ae9SGregory Neil Shapiro 		return cp;
409706f25ae9SGregory Neil Shapiro 	}
409806f25ae9SGregory Neil Shapiro 
409906f25ae9SGregory Neil Shapiro 
410006f25ae9SGregory Neil Shapiro 	/* No match found */
4101c2aa98e2SPeter Wemm 	s->s_namecanon.nc_errno = errno;
4102c2aa98e2SPeter Wemm #if NAMED_BIND
4103c2aa98e2SPeter Wemm 	s->s_namecanon.nc_herrno = h_errno;
4104c2aa98e2SPeter Wemm 	if (tTd(9, 1))
410540266059SGregory Neil Shapiro 		sm_dprintf("FAIL (%d)\n", h_errno);
4106c2aa98e2SPeter Wemm 	switch (h_errno)
4107c2aa98e2SPeter Wemm 	{
4108c2aa98e2SPeter Wemm 	  case TRY_AGAIN:
4109c2aa98e2SPeter Wemm 		if (UseNameServer)
4110c2aa98e2SPeter Wemm 		{
4111c2aa98e2SPeter Wemm 			CurEnv->e_status = "4.4.3";
4112c2aa98e2SPeter Wemm 			message("851 %s: Name server timeout",
4113c2aa98e2SPeter Wemm 				shortenstring(name, 33));
4114c2aa98e2SPeter Wemm 		}
4115c2aa98e2SPeter Wemm 		*statp = EX_TEMPFAIL;
4116c2aa98e2SPeter Wemm 		break;
4117c2aa98e2SPeter Wemm 
4118c2aa98e2SPeter Wemm 	  case HOST_NOT_FOUND:
4119c2aa98e2SPeter Wemm 	  case NO_DATA:
4120c2aa98e2SPeter Wemm 		*statp = EX_NOHOST;
4121c2aa98e2SPeter Wemm 		break;
4122c2aa98e2SPeter Wemm 
4123c2aa98e2SPeter Wemm 	  case NO_RECOVERY:
4124c2aa98e2SPeter Wemm 		*statp = EX_SOFTWARE;
4125c2aa98e2SPeter Wemm 		break;
4126c2aa98e2SPeter Wemm 
4127c2aa98e2SPeter Wemm 	  default:
4128c2aa98e2SPeter Wemm 		*statp = EX_UNAVAILABLE;
4129c2aa98e2SPeter Wemm 		break;
4130c2aa98e2SPeter Wemm 	}
413106f25ae9SGregory Neil Shapiro #else /* NAMED_BIND */
4132c2aa98e2SPeter Wemm 	if (tTd(9, 1))
413340266059SGregory Neil Shapiro 		sm_dprintf("FAIL\n");
4134c2aa98e2SPeter Wemm 	*statp = EX_NOHOST;
413506f25ae9SGregory Neil Shapiro #endif /* NAMED_BIND */
4136c2aa98e2SPeter Wemm 	s->s_namecanon.nc_stat = *statp;
4137c2aa98e2SPeter Wemm 	return NULL;
4138c2aa98e2SPeter Wemm }
4139c2aa98e2SPeter Wemm /*
4140c2aa98e2SPeter Wemm **  HOST_MAP_INIT -- initialize host class structures
414140266059SGregory Neil Shapiro **
414240266059SGregory Neil Shapiro **	Parameters:
414340266059SGregory Neil Shapiro **		map -- a pointer to this map.
414440266059SGregory Neil Shapiro **		args -- argument string.
414540266059SGregory Neil Shapiro **
414640266059SGregory Neil Shapiro **	Returns:
414740266059SGregory Neil Shapiro **		true.
4148c2aa98e2SPeter Wemm */
4149c2aa98e2SPeter Wemm 
4150c2aa98e2SPeter Wemm bool
4151c2aa98e2SPeter Wemm host_map_init(map, args)
4152c2aa98e2SPeter Wemm 	MAP *map;
4153c2aa98e2SPeter Wemm 	char *args;
4154c2aa98e2SPeter Wemm {
4155c2aa98e2SPeter Wemm 	register char *p = args;
4156c2aa98e2SPeter Wemm 
4157c2aa98e2SPeter Wemm 	for (;;)
4158c2aa98e2SPeter Wemm 	{
4159c2aa98e2SPeter Wemm 		while (isascii(*p) && isspace(*p))
4160c2aa98e2SPeter Wemm 			p++;
4161c2aa98e2SPeter Wemm 		if (*p != '-')
4162c2aa98e2SPeter Wemm 			break;
4163c2aa98e2SPeter Wemm 		switch (*++p)
4164c2aa98e2SPeter Wemm 		{
4165c2aa98e2SPeter Wemm 		  case 'a':
4166c2aa98e2SPeter Wemm 			map->map_app = ++p;
4167c2aa98e2SPeter Wemm 			break;
4168c2aa98e2SPeter Wemm 
4169c2aa98e2SPeter Wemm 		  case 'T':
4170c2aa98e2SPeter Wemm 			map->map_tapp = ++p;
4171c2aa98e2SPeter Wemm 			break;
4172c2aa98e2SPeter Wemm 
4173c2aa98e2SPeter Wemm 		  case 'm':
4174c2aa98e2SPeter Wemm 			map->map_mflags |= MF_MATCHONLY;
4175c2aa98e2SPeter Wemm 			break;
4176c2aa98e2SPeter Wemm 
4177c2aa98e2SPeter Wemm 		  case 't':
4178c2aa98e2SPeter Wemm 			map->map_mflags |= MF_NODEFER;
4179c2aa98e2SPeter Wemm 			break;
418006f25ae9SGregory Neil Shapiro 
418106f25ae9SGregory Neil Shapiro 		  case 'S':	/* only for consistency */
418206f25ae9SGregory Neil Shapiro 			map->map_spacesub = *++p;
418306f25ae9SGregory Neil Shapiro 			break;
418406f25ae9SGregory Neil Shapiro 
418506f25ae9SGregory Neil Shapiro 		  case 'D':
418606f25ae9SGregory Neil Shapiro 			map->map_mflags |= MF_DEFER;
418706f25ae9SGregory Neil Shapiro 			break;
418840266059SGregory Neil Shapiro 
418940266059SGregory Neil Shapiro 		  case 'd':
419040266059SGregory Neil Shapiro 			{
419140266059SGregory Neil Shapiro 				char *h;
419240266059SGregory Neil Shapiro 
419340266059SGregory Neil Shapiro 				while (isascii(*++p) && isspace(*p))
419440266059SGregory Neil Shapiro 					continue;
419540266059SGregory Neil Shapiro 				h = strchr(p, ' ');
419640266059SGregory Neil Shapiro 				if (h != NULL)
419740266059SGregory Neil Shapiro 					*h = '\0';
419840266059SGregory Neil Shapiro 				map->map_timeout = convtime(p, 's');
419940266059SGregory Neil Shapiro 				if (h != NULL)
420040266059SGregory Neil Shapiro 					*h = ' ';
420140266059SGregory Neil Shapiro 			}
420240266059SGregory Neil Shapiro 			break;
420340266059SGregory Neil Shapiro 
420440266059SGregory Neil Shapiro 		  case 'r':
420540266059SGregory Neil Shapiro 			while (isascii(*++p) && isspace(*p))
420640266059SGregory Neil Shapiro 				continue;
420740266059SGregory Neil Shapiro 			map->map_retry = atoi(p);
420840266059SGregory Neil Shapiro 			break;
4209c2aa98e2SPeter Wemm 		}
4210c2aa98e2SPeter Wemm 		while (*p != '\0' && !(isascii(*p) && isspace(*p)))
4211c2aa98e2SPeter Wemm 			p++;
4212c2aa98e2SPeter Wemm 		if (*p != '\0')
4213c2aa98e2SPeter Wemm 			*p++ = '\0';
4214c2aa98e2SPeter Wemm 	}
4215c2aa98e2SPeter Wemm 	if (map->map_app != NULL)
4216c2aa98e2SPeter Wemm 		map->map_app = newstr(map->map_app);
4217c2aa98e2SPeter Wemm 	if (map->map_tapp != NULL)
4218c2aa98e2SPeter Wemm 		map->map_tapp = newstr(map->map_tapp);
421940266059SGregory Neil Shapiro 	return true;
4220c2aa98e2SPeter Wemm }
422140266059SGregory Neil Shapiro 
422206f25ae9SGregory Neil Shapiro #if NETINET6
422306f25ae9SGregory Neil Shapiro /*
422406f25ae9SGregory Neil Shapiro **  ANYNET_NTOP -- convert an IPv6 network address to printable form.
422506f25ae9SGregory Neil Shapiro **
422606f25ae9SGregory Neil Shapiro **	Parameters:
422706f25ae9SGregory Neil Shapiro **		s6a -- a pointer to an in6_addr structure.
422806f25ae9SGregory Neil Shapiro **		dst -- buffer to store result in
422906f25ae9SGregory Neil Shapiro **		dst_len -- size of dst buffer
423006f25ae9SGregory Neil Shapiro **
423106f25ae9SGregory Neil Shapiro **	Returns:
423206f25ae9SGregory Neil Shapiro **		A printable version of that structure.
423306f25ae9SGregory Neil Shapiro */
423440266059SGregory Neil Shapiro 
423506f25ae9SGregory Neil Shapiro char *
423606f25ae9SGregory Neil Shapiro anynet_ntop(s6a, dst, dst_len)
423706f25ae9SGregory Neil Shapiro 	struct in6_addr *s6a;
423806f25ae9SGregory Neil Shapiro 	char *dst;
423906f25ae9SGregory Neil Shapiro 	size_t dst_len;
424006f25ae9SGregory Neil Shapiro {
424106f25ae9SGregory Neil Shapiro 	register char *ap;
424206f25ae9SGregory Neil Shapiro 
424306f25ae9SGregory Neil Shapiro 	if (IN6_IS_ADDR_V4MAPPED(s6a))
424406f25ae9SGregory Neil Shapiro 		ap = (char *) inet_ntop(AF_INET,
424506f25ae9SGregory Neil Shapiro 					&s6a->s6_addr[IN6ADDRSZ - INADDRSZ],
424606f25ae9SGregory Neil Shapiro 					dst, dst_len);
424706f25ae9SGregory Neil Shapiro 	else
424840266059SGregory Neil Shapiro 	{
424940266059SGregory Neil Shapiro 		char *d;
425040266059SGregory Neil Shapiro 		size_t sz;
425140266059SGregory Neil Shapiro 
425240266059SGregory Neil Shapiro 		/* Save pointer to beginning of string */
425340266059SGregory Neil Shapiro 		d = dst;
425440266059SGregory Neil Shapiro 
425540266059SGregory Neil Shapiro 		/* Add IPv6: protocol tag */
425640266059SGregory Neil Shapiro 		sz = sm_strlcpy(dst, "IPv6:", dst_len);
425740266059SGregory Neil Shapiro 		if (sz >= dst_len)
425840266059SGregory Neil Shapiro 			return NULL;
425940266059SGregory Neil Shapiro 		dst += sz;
426040266059SGregory Neil Shapiro 		dst_len -= sz;
426106f25ae9SGregory Neil Shapiro 		ap = (char *) inet_ntop(AF_INET6, s6a, dst, dst_len);
426240266059SGregory Neil Shapiro 
426340266059SGregory Neil Shapiro 		/* Restore pointer to beginning of string */
426440266059SGregory Neil Shapiro 		if (ap != NULL)
426540266059SGregory Neil Shapiro 			ap = d;
426640266059SGregory Neil Shapiro 	}
426706f25ae9SGregory Neil Shapiro 	return ap;
426806f25ae9SGregory Neil Shapiro }
426940266059SGregory Neil Shapiro 
427040266059SGregory Neil Shapiro /*
427140266059SGregory Neil Shapiro **  ANYNET_PTON -- convert printed form to network address.
427240266059SGregory Neil Shapiro **
427340266059SGregory Neil Shapiro **	Wrapper for inet_pton() which handles IPv6: labels.
427440266059SGregory Neil Shapiro **
427540266059SGregory Neil Shapiro **	Parameters:
427640266059SGregory Neil Shapiro **		family -- address family
427740266059SGregory Neil Shapiro **		src -- string
427840266059SGregory Neil Shapiro **		dst -- destination address structure
427940266059SGregory Neil Shapiro **
428040266059SGregory Neil Shapiro **	Returns:
428140266059SGregory Neil Shapiro **		1 if the address was valid
428240266059SGregory Neil Shapiro **		0 if the address wasn't parseable
428340266059SGregory Neil Shapiro **		-1 if error
428440266059SGregory Neil Shapiro */
428540266059SGregory Neil Shapiro 
428640266059SGregory Neil Shapiro int
428740266059SGregory Neil Shapiro anynet_pton(family, src, dst)
428840266059SGregory Neil Shapiro 	int family;
428940266059SGregory Neil Shapiro 	const char *src;
429040266059SGregory Neil Shapiro 	void *dst;
429140266059SGregory Neil Shapiro {
429240266059SGregory Neil Shapiro 	if (family == AF_INET6 && sm_strncasecmp(src, "IPv6:", 5) == 0)
429340266059SGregory Neil Shapiro 		src += 5;
429440266059SGregory Neil Shapiro 	return inet_pton(family, src, dst);
429540266059SGregory Neil Shapiro }
429606f25ae9SGregory Neil Shapiro #endif /* NETINET6 */
429740266059SGregory Neil Shapiro /*
4298c2aa98e2SPeter Wemm **  ANYNET_NTOA -- convert a network address to printable form.
4299c2aa98e2SPeter Wemm **
4300c2aa98e2SPeter Wemm **	Parameters:
4301c2aa98e2SPeter Wemm **		sap -- a pointer to a sockaddr structure.
4302c2aa98e2SPeter Wemm **
4303c2aa98e2SPeter Wemm **	Returns:
4304c2aa98e2SPeter Wemm **		A printable version of that sockaddr.
4305c2aa98e2SPeter Wemm */
4306c2aa98e2SPeter Wemm 
4307c2aa98e2SPeter Wemm #ifdef USE_SOCK_STREAM
4308c2aa98e2SPeter Wemm 
4309c2aa98e2SPeter Wemm # if NETLINK
4310c2aa98e2SPeter Wemm #  include <net/if_dl.h>
431106f25ae9SGregory Neil Shapiro # endif /* NETLINK */
4312c2aa98e2SPeter Wemm 
4313c2aa98e2SPeter Wemm char *
4314c2aa98e2SPeter Wemm anynet_ntoa(sap)
4315c2aa98e2SPeter Wemm 	register SOCKADDR *sap;
4316c2aa98e2SPeter Wemm {
4317c2aa98e2SPeter Wemm 	register char *bp;
4318c2aa98e2SPeter Wemm 	register char *ap;
4319c2aa98e2SPeter Wemm 	int l;
4320c2aa98e2SPeter Wemm 	static char buf[100];
4321c2aa98e2SPeter Wemm 
4322c2aa98e2SPeter Wemm 	/* check for null/zero family */
4323c2aa98e2SPeter Wemm 	if (sap == NULL)
4324c2aa98e2SPeter Wemm 		return "NULLADDR";
4325c2aa98e2SPeter Wemm 	if (sap->sa.sa_family == 0)
4326c2aa98e2SPeter Wemm 		return "0";
4327c2aa98e2SPeter Wemm 
4328c2aa98e2SPeter Wemm 	switch (sap->sa.sa_family)
4329c2aa98e2SPeter Wemm 	{
4330c2aa98e2SPeter Wemm # if NETUNIX
4331c2aa98e2SPeter Wemm 	  case AF_UNIX:
4332c2aa98e2SPeter Wemm 		if (sap->sunix.sun_path[0] != '\0')
4333d0cef73dSGregory Neil Shapiro 			(void) sm_snprintf(buf, sizeof(buf), "[UNIX: %.64s]",
4334c2aa98e2SPeter Wemm 					   sap->sunix.sun_path);
4335c2aa98e2SPeter Wemm 		else
4336d0cef73dSGregory Neil Shapiro 			(void) sm_strlcpy(buf, "[UNIX: localhost]", sizeof(buf));
4337c2aa98e2SPeter Wemm 		return buf;
433806f25ae9SGregory Neil Shapiro # endif /* NETUNIX */
4339c2aa98e2SPeter Wemm 
4340c2aa98e2SPeter Wemm # if NETINET
4341c2aa98e2SPeter Wemm 	  case AF_INET:
434206f25ae9SGregory Neil Shapiro 		return (char *) inet_ntoa(sap->sin.sin_addr);
434306f25ae9SGregory Neil Shapiro # endif /* NETINET */
434406f25ae9SGregory Neil Shapiro 
434506f25ae9SGregory Neil Shapiro # if NETINET6
434606f25ae9SGregory Neil Shapiro 	  case AF_INET6:
4347d0cef73dSGregory Neil Shapiro 		ap = anynet_ntop(&sap->sin6.sin6_addr, buf, sizeof(buf));
434806f25ae9SGregory Neil Shapiro 		if (ap != NULL)
434906f25ae9SGregory Neil Shapiro 			return ap;
435006f25ae9SGregory Neil Shapiro 		break;
435106f25ae9SGregory Neil Shapiro # endif /* NETINET6 */
4352c2aa98e2SPeter Wemm 
4353c2aa98e2SPeter Wemm # if NETLINK
4354c2aa98e2SPeter Wemm 	  case AF_LINK:
4355d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(buf, sizeof(buf), "[LINK: %s]",
4356c2aa98e2SPeter Wemm 				   link_ntoa((struct sockaddr_dl *) &sap->sa));
4357c2aa98e2SPeter Wemm 		return buf;
435806f25ae9SGregory Neil Shapiro # endif /* NETLINK */
4359c2aa98e2SPeter Wemm 	  default:
4360c2aa98e2SPeter Wemm 		/* this case is needed when nothing is #defined */
4361c2aa98e2SPeter Wemm 		/* in order to keep the switch syntactically correct */
4362c2aa98e2SPeter Wemm 		break;
4363c2aa98e2SPeter Wemm 	}
4364c2aa98e2SPeter Wemm 
4365c2aa98e2SPeter Wemm 	/* unknown family -- just dump bytes */
4366d0cef73dSGregory Neil Shapiro 	(void) sm_snprintf(buf, sizeof(buf), "Family %d: ", sap->sa.sa_family);
4367c2aa98e2SPeter Wemm 	bp = &buf[strlen(buf)];
4368c2aa98e2SPeter Wemm 	ap = sap->sa.sa_data;
4369d0cef73dSGregory Neil Shapiro 	for (l = sizeof(sap->sa.sa_data); --l >= 0; )
4370c2aa98e2SPeter Wemm 	{
437140266059SGregory Neil Shapiro 		(void) sm_snprintf(bp, SPACELEFT(buf, bp), "%02x:",
437240266059SGregory Neil Shapiro 				   *ap++ & 0377);
4373c2aa98e2SPeter Wemm 		bp += 3;
4374c2aa98e2SPeter Wemm 	}
4375c2aa98e2SPeter Wemm 	*--bp = '\0';
4376c2aa98e2SPeter Wemm 	return buf;
4377c2aa98e2SPeter Wemm }
437840266059SGregory Neil Shapiro /*
4379c2aa98e2SPeter Wemm **  HOSTNAMEBYANYADDR -- return name of host based on address
4380c2aa98e2SPeter Wemm **
4381c2aa98e2SPeter Wemm **	Parameters:
4382c2aa98e2SPeter Wemm **		sap -- SOCKADDR pointer
4383c2aa98e2SPeter Wemm **
4384c2aa98e2SPeter Wemm **	Returns:
4385c2aa98e2SPeter Wemm **		text representation of host name.
4386c2aa98e2SPeter Wemm **
4387c2aa98e2SPeter Wemm **	Side Effects:
4388c2aa98e2SPeter Wemm **		none.
4389c2aa98e2SPeter Wemm */
4390c2aa98e2SPeter Wemm 
4391c2aa98e2SPeter Wemm char *
4392c2aa98e2SPeter Wemm hostnamebyanyaddr(sap)
4393c2aa98e2SPeter Wemm 	register SOCKADDR *sap;
4394c2aa98e2SPeter Wemm {
4395c2aa98e2SPeter Wemm 	register struct hostent *hp;
439606f25ae9SGregory Neil Shapiro # if NAMED_BIND
4397c2aa98e2SPeter Wemm 	int saveretry;
439806f25ae9SGregory Neil Shapiro # endif /* NAMED_BIND */
439906f25ae9SGregory Neil Shapiro # if NETINET6
440006f25ae9SGregory Neil Shapiro 	struct in6_addr in6_addr;
440106f25ae9SGregory Neil Shapiro # endif /* NETINET6 */
4402c2aa98e2SPeter Wemm 
4403c2aa98e2SPeter Wemm # if NAMED_BIND
4404c2aa98e2SPeter Wemm 	/* shorten name server timeout to avoid higher level timeouts */
4405c2aa98e2SPeter Wemm 	saveretry = _res.retry;
440606f25ae9SGregory Neil Shapiro 	if (_res.retry * _res.retrans > 20)
440706f25ae9SGregory Neil Shapiro 		_res.retry = 20 / _res.retrans;
4408c2aa98e2SPeter Wemm # endif /* NAMED_BIND */
4409c2aa98e2SPeter Wemm 
4410c2aa98e2SPeter Wemm 	switch (sap->sa.sa_family)
4411c2aa98e2SPeter Wemm 	{
4412c2aa98e2SPeter Wemm # if NETINET
4413c2aa98e2SPeter Wemm 	  case AF_INET:
4414c2aa98e2SPeter Wemm 		hp = sm_gethostbyaddr((char *) &sap->sin.sin_addr,
441540266059SGregory Neil Shapiro 				      INADDRSZ, AF_INET);
4416c2aa98e2SPeter Wemm 		break;
441706f25ae9SGregory Neil Shapiro # endif /* NETINET */
441806f25ae9SGregory Neil Shapiro 
441906f25ae9SGregory Neil Shapiro # if NETINET6
442006f25ae9SGregory Neil Shapiro 	  case AF_INET6:
442106f25ae9SGregory Neil Shapiro 		hp = sm_gethostbyaddr((char *) &sap->sin6.sin6_addr,
442240266059SGregory Neil Shapiro 				      IN6ADDRSZ, AF_INET6);
442306f25ae9SGregory Neil Shapiro 		break;
442406f25ae9SGregory Neil Shapiro # endif /* NETINET6 */
4425c2aa98e2SPeter Wemm 
4426c2aa98e2SPeter Wemm # if NETISO
4427c2aa98e2SPeter Wemm 	  case AF_ISO:
4428c2aa98e2SPeter Wemm 		hp = sm_gethostbyaddr((char *) &sap->siso.siso_addr,
4429d0cef73dSGregory Neil Shapiro 				      sizeof(sap->siso.siso_addr), AF_ISO);
4430c2aa98e2SPeter Wemm 		break;
443106f25ae9SGregory Neil Shapiro # endif /* NETISO */
4432c2aa98e2SPeter Wemm 
4433c2aa98e2SPeter Wemm # if NETUNIX
4434c2aa98e2SPeter Wemm 	  case AF_UNIX:
4435c2aa98e2SPeter Wemm 		hp = NULL;
4436c2aa98e2SPeter Wemm 		break;
443706f25ae9SGregory Neil Shapiro # endif /* NETUNIX */
4438c2aa98e2SPeter Wemm 
4439c2aa98e2SPeter Wemm 	  default:
4440d0cef73dSGregory Neil Shapiro 		hp = sm_gethostbyaddr(sap->sa.sa_data, sizeof(sap->sa.sa_data),
4441c2aa98e2SPeter Wemm 				      sap->sa.sa_family);
4442c2aa98e2SPeter Wemm 		break;
4443c2aa98e2SPeter Wemm 	}
4444c2aa98e2SPeter Wemm 
4445c2aa98e2SPeter Wemm # if NAMED_BIND
4446c2aa98e2SPeter Wemm 	_res.retry = saveretry;
4447c2aa98e2SPeter Wemm # endif /* NAMED_BIND */
4448c2aa98e2SPeter Wemm 
444906f25ae9SGregory Neil Shapiro # if NETINET || NETINET6
445006f25ae9SGregory Neil Shapiro 	if (hp != NULL && hp->h_name[0] != '['
445106f25ae9SGregory Neil Shapiro #  if NETINET6
445206f25ae9SGregory Neil Shapiro 	    && inet_pton(AF_INET6, hp->h_name, &in6_addr) != 1
445306f25ae9SGregory Neil Shapiro #  endif /* NETINET6 */
445406f25ae9SGregory Neil Shapiro #  if NETINET
445506f25ae9SGregory Neil Shapiro 	    && inet_addr(hp->h_name) == INADDR_NONE
445606f25ae9SGregory Neil Shapiro #  endif /* NETINET */
445706f25ae9SGregory Neil Shapiro 	    )
4458193538b7SGregory Neil Shapiro 	{
4459193538b7SGregory Neil Shapiro 		char *name;
4460193538b7SGregory Neil Shapiro 
446140266059SGregory Neil Shapiro 		name = denlstring((char *) hp->h_name, true, true);
446240266059SGregory Neil Shapiro #  if NETINET6
4463193538b7SGregory Neil Shapiro 		if (name == hp->h_name)
4464193538b7SGregory Neil Shapiro 		{
4465193538b7SGregory Neil Shapiro 			static char n[MAXNAME + 1];
4466193538b7SGregory Neil Shapiro 
4467193538b7SGregory Neil Shapiro 			/* Copy the string, hp->h_name is about to disappear */
4468d0cef73dSGregory Neil Shapiro 			(void) sm_strlcpy(n, name, sizeof(n));
4469193538b7SGregory Neil Shapiro 			name = n;
4470193538b7SGregory Neil Shapiro 		}
4471193538b7SGregory Neil Shapiro 		freehostent(hp);
447240266059SGregory Neil Shapiro #  endif /* NETINET6 */
4473193538b7SGregory Neil Shapiro 		return name;
4474193538b7SGregory Neil Shapiro 	}
447506f25ae9SGregory Neil Shapiro # endif /* NETINET || NETINET6 */
4476193538b7SGregory Neil Shapiro 
447740266059SGregory Neil Shapiro # if NETINET6
4478193538b7SGregory Neil Shapiro 	if (hp != NULL)
4479193538b7SGregory Neil Shapiro 	{
4480193538b7SGregory Neil Shapiro 		freehostent(hp);
4481193538b7SGregory Neil Shapiro 		hp = NULL;
4482193538b7SGregory Neil Shapiro 	}
448340266059SGregory Neil Shapiro # endif /* NETINET6 */
4484193538b7SGregory Neil Shapiro 
4485c2aa98e2SPeter Wemm # if NETUNIX
448606f25ae9SGregory Neil Shapiro 	if (sap->sa.sa_family == AF_UNIX && sap->sunix.sun_path[0] == '\0')
4487c2aa98e2SPeter Wemm 		return "localhost";
448806f25ae9SGregory Neil Shapiro # endif /* NETUNIX */
4489c2aa98e2SPeter Wemm 	{
4490c2aa98e2SPeter Wemm 		static char buf[203];
4491c2aa98e2SPeter Wemm 
4492d0cef73dSGregory Neil Shapiro 		(void) sm_snprintf(buf, sizeof(buf), "[%.200s]",
449340266059SGregory Neil Shapiro 				   anynet_ntoa(sap));
4494c2aa98e2SPeter Wemm 		return buf;
4495c2aa98e2SPeter Wemm 	}
4496c2aa98e2SPeter Wemm }
449706f25ae9SGregory Neil Shapiro #endif /* USE_SOCK_STREAM */
4498