xref: /freebsd/contrib/sendmail/src/conf.c (revision d995d2ba6b346ad29395c43f83421c01a446d2ae)
1c2aa98e2SPeter Wemm /*
23299c2f1SGregory Neil Shapiro  * Copyright (c) 1998-2000 Sendmail, Inc. and its suppliers.
33299c2f1SGregory 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 
14c2aa98e2SPeter Wemm #ifndef lint
15d995d2baSGregory Neil Shapiro static char id[] = "@(#)$Id: conf.c,v 8.646.2.2.2.32 2000/09/23 00:31:33 ca Exp $";
163299c2f1SGregory Neil Shapiro #endif /* ! lint */
17c2aa98e2SPeter Wemm 
183299c2f1SGregory Neil Shapiro /* $FreeBSD$ */
193299c2f1SGregory Neil Shapiro 
203299c2f1SGregory Neil Shapiro #include <sendmail.h>
213299c2f1SGregory Neil Shapiro #include <sendmail/pathnames.h>
223299c2f1SGregory Neil Shapiro 
23c2aa98e2SPeter Wemm # include <sys/ioctl.h>
24c2aa98e2SPeter Wemm # include <sys/param.h>
253299c2f1SGregory Neil Shapiro 
26c2aa98e2SPeter Wemm #include <limits.h>
273299c2f1SGregory Neil Shapiro #if NETINET || NETINET6
283299c2f1SGregory Neil Shapiro # include <arpa/inet.h>
293299c2f1SGregory Neil Shapiro #endif /* NETINET || NETINET6 */
303299c2f1SGregory Neil Shapiro #if HASULIMIT && defined(HPUX11)
313299c2f1SGregory Neil Shapiro # include <ulimit.h>
323299c2f1SGregory Neil Shapiro #endif /* HASULIMIT && defined(HPUX11) */
333299c2f1SGregory Neil Shapiro 
343299c2f1SGregory Neil Shapiro 
353299c2f1SGregory Neil Shapiro static void	setupmaps __P((void));
363299c2f1SGregory Neil Shapiro static void	setupmailers __P((void));
373299c2f1SGregory Neil Shapiro static int	get_num_procs_online __P((void));
383299c2f1SGregory Neil Shapiro 
39c2aa98e2SPeter Wemm 
40c2aa98e2SPeter Wemm /*
41c2aa98e2SPeter Wemm **  CONF.C -- Sendmail Configuration Tables.
42c2aa98e2SPeter Wemm **
43c2aa98e2SPeter Wemm **	Defines the configuration of this installation.
44c2aa98e2SPeter Wemm **
45c2aa98e2SPeter Wemm **	Configuration Variables:
46c2aa98e2SPeter Wemm **		HdrInfo -- a table describing well-known header fields.
47c2aa98e2SPeter Wemm **			Each entry has the field name and some flags,
48c2aa98e2SPeter Wemm **			which are described in sendmail.h.
49c2aa98e2SPeter Wemm **
50c2aa98e2SPeter Wemm **	Notes:
51c2aa98e2SPeter Wemm **		I have tried to put almost all the reasonable
52c2aa98e2SPeter Wemm **		configuration information into the configuration
53c2aa98e2SPeter Wemm **		file read at runtime.  My intent is that anything
54c2aa98e2SPeter Wemm **		here is a function of the version of UNIX you
55c2aa98e2SPeter Wemm **		are running, or is really static -- for example
56c2aa98e2SPeter Wemm **		the headers are a superset of widely used
57c2aa98e2SPeter Wemm **		protocols.  If you find yourself playing with
58c2aa98e2SPeter Wemm **		this file too much, you may be making a mistake!
59c2aa98e2SPeter Wemm */
60c2aa98e2SPeter Wemm 
61c2aa98e2SPeter Wemm 
62c2aa98e2SPeter Wemm /*
63c2aa98e2SPeter Wemm **  Header info table
64c2aa98e2SPeter Wemm **	Final (null) entry contains the flags used for any other field.
65c2aa98e2SPeter Wemm **
66c2aa98e2SPeter Wemm **	Not all of these are actually handled specially by sendmail
67c2aa98e2SPeter Wemm **	at this time.  They are included as placeholders, to let
68c2aa98e2SPeter Wemm **	you know that "someday" I intend to have sendmail do
69c2aa98e2SPeter Wemm **	something with them.
70c2aa98e2SPeter Wemm */
71c2aa98e2SPeter Wemm 
72c2aa98e2SPeter Wemm struct hdrinfo	HdrInfo[] =
73c2aa98e2SPeter Wemm {
74c2aa98e2SPeter Wemm 		/* originator fields, most to least significant */
753299c2f1SGregory Neil Shapiro 	{ "resent-sender",		H_FROM|H_RESENT,	NULL	},
763299c2f1SGregory Neil Shapiro 	{ "resent-from",		H_FROM|H_RESENT,	NULL	},
773299c2f1SGregory Neil Shapiro 	{ "resent-reply-to",		H_FROM|H_RESENT,	NULL	},
783299c2f1SGregory Neil Shapiro 	{ "sender",			H_FROM,			NULL	},
793299c2f1SGregory Neil Shapiro 	{ "from",			H_FROM,			NULL	},
803299c2f1SGregory Neil Shapiro 	{ "reply-to",			H_FROM,			NULL	},
813299c2f1SGregory Neil Shapiro 	{ "errors-to",			H_FROM|H_ERRORSTO,	NULL	},
823299c2f1SGregory Neil Shapiro 	{ "full-name",			H_ACHECK,		NULL	},
833299c2f1SGregory Neil Shapiro 	{ "return-receipt-to",		H_RECEIPTTO,		NULL	},
84c2aa98e2SPeter Wemm 
85c2aa98e2SPeter Wemm 		/* destination fields */
863299c2f1SGregory Neil Shapiro 	{ "to",				H_RCPT,			NULL	},
873299c2f1SGregory Neil Shapiro 	{ "resent-to",			H_RCPT|H_RESENT,	NULL	},
883299c2f1SGregory Neil Shapiro 	{ "cc",				H_RCPT,			NULL	},
893299c2f1SGregory Neil Shapiro 	{ "resent-cc",			H_RCPT|H_RESENT,	NULL	},
903299c2f1SGregory Neil Shapiro 	{ "bcc",			H_RCPT|H_BCC,		NULL	},
913299c2f1SGregory Neil Shapiro 	{ "resent-bcc",			H_RCPT|H_BCC|H_RESENT,	NULL	},
923299c2f1SGregory Neil Shapiro 	{ "apparently-to",		H_RCPT,			NULL	},
93c2aa98e2SPeter Wemm 
94c2aa98e2SPeter Wemm 		/* message identification and control */
953299c2f1SGregory Neil Shapiro 	{ "message-id",			0,			NULL	},
963299c2f1SGregory Neil Shapiro 	{ "resent-message-id",		H_RESENT,		NULL	},
973299c2f1SGregory Neil Shapiro 	{ "message",			H_EOH,			NULL	},
983299c2f1SGregory Neil Shapiro 	{ "text",			H_EOH,			NULL	},
99c2aa98e2SPeter Wemm 
100c2aa98e2SPeter Wemm 		/* date fields */
1013299c2f1SGregory Neil Shapiro 	{ "date",			0,			NULL	},
1023299c2f1SGregory Neil Shapiro 	{ "resent-date",		H_RESENT,		NULL	},
103c2aa98e2SPeter Wemm 
104c2aa98e2SPeter Wemm 		/* trace fields */
1053299c2f1SGregory Neil Shapiro 	{ "received",			H_TRACE|H_FORCE,	NULL	},
1063299c2f1SGregory Neil Shapiro 	{ "x400-received",		H_TRACE|H_FORCE,	NULL	},
1073299c2f1SGregory Neil Shapiro 	{ "via",			H_TRACE|H_FORCE,	NULL	},
1083299c2f1SGregory Neil Shapiro 	{ "mail-from",			H_TRACE|H_FORCE,	NULL	},
109c2aa98e2SPeter Wemm 
110c2aa98e2SPeter Wemm 		/* miscellaneous fields */
1113299c2f1SGregory Neil Shapiro 	{ "comments",			H_FORCE|H_ENCODABLE,	NULL	},
1123299c2f1SGregory Neil Shapiro 	{ "return-path",		H_FORCE|H_ACHECK|H_BINDLATE,	NULL	},
1133299c2f1SGregory Neil Shapiro 	{ "content-transfer-encoding",	H_CTE,			NULL	},
1143299c2f1SGregory Neil Shapiro 	{ "content-type",		H_CTYPE,		NULL	},
1153299c2f1SGregory Neil Shapiro 	{ "content-length",		H_ACHECK,		NULL	},
1163299c2f1SGregory Neil Shapiro 	{ "subject",			H_ENCODABLE,		NULL	},
1173299c2f1SGregory Neil Shapiro 	{ "x-authentication-warning",	H_FORCE,		NULL	},
118c2aa98e2SPeter Wemm 
1193299c2f1SGregory Neil Shapiro 	{ NULL,				0,			NULL	}
120c2aa98e2SPeter Wemm };
121c2aa98e2SPeter Wemm 
122c2aa98e2SPeter Wemm 
123c2aa98e2SPeter Wemm 
124c2aa98e2SPeter Wemm /*
125c2aa98e2SPeter Wemm **  Privacy values
126c2aa98e2SPeter Wemm */
127c2aa98e2SPeter Wemm 
128c2aa98e2SPeter Wemm struct prival PrivacyValues[] =
129c2aa98e2SPeter Wemm {
130c2aa98e2SPeter Wemm 	{ "public",		PRIV_PUBLIC		},
131c2aa98e2SPeter Wemm 	{ "needmailhelo",	PRIV_NEEDMAILHELO	},
132c2aa98e2SPeter Wemm 	{ "needexpnhelo",	PRIV_NEEDEXPNHELO	},
133c2aa98e2SPeter Wemm 	{ "needvrfyhelo",	PRIV_NEEDVRFYHELO	},
134c2aa98e2SPeter Wemm 	{ "noexpn",		PRIV_NOEXPN		},
135c2aa98e2SPeter Wemm 	{ "novrfy",		PRIV_NOVRFY		},
136c2aa98e2SPeter Wemm 	{ "restrictmailq",	PRIV_RESTRICTMAILQ	},
137c2aa98e2SPeter Wemm 	{ "restrictqrun",	PRIV_RESTRICTQRUN	},
138c2aa98e2SPeter Wemm 	{ "noetrn",		PRIV_NOETRN		},
139c2aa98e2SPeter Wemm 	{ "noverb",		PRIV_NOVERB		},
140c2aa98e2SPeter Wemm 	{ "authwarnings",	PRIV_AUTHWARNINGS	},
141c2aa98e2SPeter Wemm 	{ "noreceipts",		PRIV_NORECEIPTS		},
1423299c2f1SGregory Neil Shapiro 	{ "nobodyreturn",	PRIV_NOBODYRETN		},
143c2aa98e2SPeter Wemm 	{ "goaway",		PRIV_GOAWAY		},
144c2aa98e2SPeter Wemm 	{ NULL,			0			}
145c2aa98e2SPeter Wemm };
146c2aa98e2SPeter Wemm 
147c2aa98e2SPeter Wemm /*
148c2aa98e2SPeter Wemm **  DontBlameSendmail values
149c2aa98e2SPeter Wemm */
150c2aa98e2SPeter Wemm struct dbsval DontBlameSendmailValues[] =
151c2aa98e2SPeter Wemm {
152c2aa98e2SPeter Wemm 	{ "safe",			DBS_SAFE			},
153c2aa98e2SPeter Wemm 	{ "assumesafechown",		DBS_ASSUMESAFECHOWN		},
154c2aa98e2SPeter Wemm 	{ "groupwritabledirpathsafe",	DBS_GROUPWRITABLEDIRPATHSAFE	},
155c2aa98e2SPeter Wemm 	{ "groupwritableforwardfilesafe",
156c2aa98e2SPeter Wemm 					DBS_GROUPWRITABLEFORWARDFILESAFE },
157c2aa98e2SPeter Wemm 	{ "groupwritableincludefilesafe",
158c2aa98e2SPeter Wemm 					DBS_GROUPWRITABLEINCLUDEFILESAFE },
159c2aa98e2SPeter Wemm 	{ "groupwritablealiasfile",	DBS_GROUPWRITABLEALIASFILE	},
160c2aa98e2SPeter Wemm 	{ "worldwritablealiasfile",	DBS_WORLDWRITABLEALIASFILE	},
161c2aa98e2SPeter Wemm 	{ "forwardfileinunsafedirpath",	DBS_FORWARDFILEINUNSAFEDIRPATH	},
162c2aa98e2SPeter Wemm 	{ "includefileinunsafedirpath",	DBS_INCLUDEFILEINUNSAFEDIRPATH	},
163c2aa98e2SPeter Wemm 	{ "mapinunsafedirpath",		DBS_MAPINUNSAFEDIRPATH	},
164c2aa98e2SPeter Wemm 	{ "linkedaliasfileinwritabledir",
165c2aa98e2SPeter Wemm 					DBS_LINKEDALIASFILEINWRITABLEDIR },
166c2aa98e2SPeter Wemm 	{ "linkedclassfileinwritabledir",
167c2aa98e2SPeter Wemm 					DBS_LINKEDCLASSFILEINWRITABLEDIR },
168c2aa98e2SPeter Wemm 	{ "linkedforwardfileinwritabledir",
169c2aa98e2SPeter Wemm 					DBS_LINKEDFORWARDFILEINWRITABLEDIR },
170c2aa98e2SPeter Wemm 	{ "linkedincludefileinwritabledir",
171c2aa98e2SPeter Wemm 					DBS_LINKEDINCLUDEFILEINWRITABLEDIR },
172c2aa98e2SPeter Wemm 	{ "linkedmapinwritabledir",	DBS_LINKEDMAPINWRITABLEDIR	},
173c2aa98e2SPeter Wemm 	{ "linkedserviceswitchfileinwritabledir",
174c2aa98e2SPeter Wemm 					DBS_LINKEDSERVICESWITCHFILEINWRITABLEDIR },
175c2aa98e2SPeter Wemm 	{ "filedeliverytohardlink",	DBS_FILEDELIVERYTOHARDLINK	},
176c2aa98e2SPeter Wemm 	{ "filedeliverytosymlink",	DBS_FILEDELIVERYTOSYMLINK	},
177c2aa98e2SPeter Wemm 	{ "writemaptohardlink",		DBS_WRITEMAPTOHARDLINK		},
178c2aa98e2SPeter Wemm 	{ "writemaptosymlink",		DBS_WRITEMAPTOSYMLINK		},
179c2aa98e2SPeter Wemm 	{ "writestatstohardlink",	DBS_WRITESTATSTOHARDLINK	},
180c2aa98e2SPeter Wemm 	{ "writestatstosymlink",	DBS_WRITESTATSTOSYMLINK		},
181c2aa98e2SPeter Wemm 	{ "forwardfileingroupwritabledirpath",
182c2aa98e2SPeter Wemm 					DBS_FORWARDFILEINGROUPWRITABLEDIRPATH },
183c2aa98e2SPeter Wemm 	{ "includefileingroupwritabledirpath",
184c2aa98e2SPeter Wemm 					DBS_INCLUDEFILEINGROUPWRITABLEDIRPATH },
185c2aa98e2SPeter Wemm 	{ "classfileinunsafedirpath",	DBS_CLASSFILEINUNSAFEDIRPATH	},
186c2aa98e2SPeter Wemm 	{ "errorheaderinunsafedirpath",	DBS_ERRORHEADERINUNSAFEDIRPATH	},
187c2aa98e2SPeter Wemm 	{ "helpfileinunsafedirpath",	DBS_HELPFILEINUNSAFEDIRPATH	},
188c2aa98e2SPeter Wemm 	{ "forwardfileinunsafedirpathsafe",
189c2aa98e2SPeter Wemm 					DBS_FORWARDFILEINUNSAFEDIRPATHSAFE },
190c2aa98e2SPeter Wemm 	{ "includefileinunsafedirpathsafe",
191c2aa98e2SPeter Wemm 					DBS_INCLUDEFILEINUNSAFEDIRPATHSAFE },
192c2aa98e2SPeter Wemm 	{ "runprograminunsafedirpath",	DBS_RUNPROGRAMINUNSAFEDIRPATH	},
193c2aa98e2SPeter Wemm 	{ "runwritableprogram",		DBS_RUNWRITABLEPROGRAM		},
1943299c2f1SGregory Neil Shapiro 	{ "nonrootsafeaddr",		DBS_NONROOTSAFEADDR		},
1953299c2f1SGregory Neil Shapiro 	{ "truststickybit",		DBS_TRUSTSTICKYBIT		},
1963299c2f1SGregory Neil Shapiro 	{ "dontwarnforwardfileinunsafedirpath",
1973299c2f1SGregory Neil Shapiro 					DBS_DONTWARNFORWARDFILEINUNSAFEDIRPATH },
1983299c2f1SGregory Neil Shapiro 	{ "insufficiententropy",	DBS_INSUFFICIENTENTROPY },
1993299c2f1SGregory Neil Shapiro #if _FFR_UNSAFE_SASL
2003299c2f1SGregory Neil Shapiro 	{ "groupreadablesaslfile",	DBS_GROUPREADABLESASLFILE	},
2013299c2f1SGregory Neil Shapiro #endif /* _FFR_UNSAFE_SASL */
202d995d2baSGregory Neil Shapiro #if _FFR_UNSAFE_WRITABLE_INCLUDE
203d995d2baSGregory Neil Shapiro 	{ "groupwritableforwardfile",	DBS_GROUPWRITABLEFORWARDFILE	},
204d995d2baSGregory Neil Shapiro 	{ "groupwritableincludefile",	DBS_GROUPWRITABLEINCLUDEFILE	},
205d995d2baSGregory Neil Shapiro 	{ "worldwritableforwardfile",	DBS_WORLDWRITABLEFORWARDFILE	},
206d995d2baSGregory Neil Shapiro 	{ "worldwritableincludefile",	DBS_WORLDWRITABLEINCLUDEFILE	},
207d995d2baSGregory Neil Shapiro #endif /* _FFR_UNSAFE_WRITABLE_INCLUDE */
208c2aa98e2SPeter Wemm 	{ NULL,				0				}
209c2aa98e2SPeter Wemm };
210c2aa98e2SPeter Wemm 
211c2aa98e2SPeter Wemm 
212c2aa98e2SPeter Wemm /*
213c2aa98e2SPeter Wemm **  Miscellaneous stuff.
214c2aa98e2SPeter Wemm */
215c2aa98e2SPeter Wemm 
216c2aa98e2SPeter Wemm int	DtableSize =	50;		/* max open files; reset in 4.2bsd */
217c2aa98e2SPeter Wemm /*
218c2aa98e2SPeter Wemm **  SETDEFAULTS -- set default values
219c2aa98e2SPeter Wemm **
220c2aa98e2SPeter Wemm **	Because of the way freezing is done, these must be initialized
221c2aa98e2SPeter Wemm **	using direct code.
222c2aa98e2SPeter Wemm **
223c2aa98e2SPeter Wemm **	Parameters:
224c2aa98e2SPeter Wemm **		e -- the default envelope.
225c2aa98e2SPeter Wemm **
226c2aa98e2SPeter Wemm **	Returns:
227c2aa98e2SPeter Wemm **		none.
228c2aa98e2SPeter Wemm **
229c2aa98e2SPeter Wemm **	Side Effects:
230c2aa98e2SPeter Wemm **		Initializes a bunch of global variables to their
231c2aa98e2SPeter Wemm **		default values.
232c2aa98e2SPeter Wemm */
233c2aa98e2SPeter Wemm 
234c2aa98e2SPeter Wemm #define MINUTES		* 60
235c2aa98e2SPeter Wemm #define HOURS		* 60 MINUTES
236c2aa98e2SPeter Wemm #define DAYS		* 24 HOURS
237c2aa98e2SPeter Wemm 
238c2aa98e2SPeter Wemm #ifndef MAXRULERECURSION
239c2aa98e2SPeter Wemm # define MAXRULERECURSION	50	/* max ruleset recursion depth */
2403299c2f1SGregory Neil Shapiro #endif /* ! MAXRULERECURSION */
241c2aa98e2SPeter Wemm 
242c2aa98e2SPeter Wemm void
243c2aa98e2SPeter Wemm setdefaults(e)
244c2aa98e2SPeter Wemm 	register ENVELOPE *e;
245c2aa98e2SPeter Wemm {
246c2aa98e2SPeter Wemm 	int i;
2473299c2f1SGregory Neil Shapiro 	int numprocs;
248c2aa98e2SPeter Wemm 	struct passwd *pw;
249c2aa98e2SPeter Wemm 
2503299c2f1SGregory Neil Shapiro 	numprocs = get_num_procs_online();
251c2aa98e2SPeter Wemm 	SpaceSub = ' ';				/* option B */
2523299c2f1SGregory Neil Shapiro 	QueueLA = 8 * numprocs;			/* option x */
2533299c2f1SGregory Neil Shapiro 	RefuseLA = 12 * numprocs;		/* option X */
254c2aa98e2SPeter Wemm 	WkRecipFact = 30000L;			/* option y */
255c2aa98e2SPeter Wemm 	WkClassFact = 1800L;			/* option z */
256c2aa98e2SPeter Wemm 	WkTimeFact = 90000L;			/* option Z */
257c2aa98e2SPeter Wemm 	QueueFactor = WkRecipFact * 20;		/* option q */
258c2aa98e2SPeter Wemm 	FileMode = (RealUid != geteuid()) ? 0644 : 0600;
259c2aa98e2SPeter Wemm 						/* option F */
2603299c2f1SGregory Neil Shapiro #if _FFR_QUEUE_FILE_MODE
2613299c2f1SGregory Neil Shapiro 	QueueFileMode = (RealUid != geteuid()) ? 0644 : 0600;
2623299c2f1SGregory Neil Shapiro 						/* option QueueFileMode */
2633299c2f1SGregory Neil Shapiro #endif /* _FFR_QUEUE_FILE_MODE */
264c2aa98e2SPeter Wemm 
2653299c2f1SGregory Neil Shapiro 	if (((pw = sm_getpwnam("mailnull")) != NULL && pw->pw_uid != 0) ||
2663299c2f1SGregory Neil Shapiro 	    ((pw = sm_getpwnam("sendmail")) != NULL && pw->pw_uid != 0) ||
2673299c2f1SGregory Neil Shapiro 	    ((pw = sm_getpwnam("daemon")) != NULL && pw->pw_uid != 0))
268c2aa98e2SPeter Wemm 	{
269c2aa98e2SPeter Wemm 		DefUid = pw->pw_uid;		/* option u */
270c2aa98e2SPeter Wemm 		DefGid = pw->pw_gid;		/* option g */
271c2aa98e2SPeter Wemm 		DefUser = newstr(pw->pw_name);
272c2aa98e2SPeter Wemm 	}
273c2aa98e2SPeter Wemm 	else
274c2aa98e2SPeter Wemm 	{
275c2aa98e2SPeter Wemm 		DefUid = 1;			/* option u */
276c2aa98e2SPeter Wemm 		DefGid = 1;			/* option g */
277c2aa98e2SPeter Wemm 		setdefuser();
278c2aa98e2SPeter Wemm 	}
27976b7bf71SPeter Wemm 	TrustedUid = 0;
280c2aa98e2SPeter Wemm 	if (tTd(37, 4))
2813299c2f1SGregory Neil Shapiro 		dprintf("setdefaults: DefUser=%s, DefUid=%d, DefGid=%d\n",
282c2aa98e2SPeter Wemm 			DefUser != NULL ? DefUser : "<1:1>",
283c2aa98e2SPeter Wemm 			(int) DefUid, (int) DefGid);
284c2aa98e2SPeter Wemm 	CheckpointInterval = 10;		/* option C */
285c2aa98e2SPeter Wemm 	MaxHopCount = 25;			/* option h */
2863299c2f1SGregory Neil Shapiro 	set_delivery_mode(SM_FORK, e);		/* option d */
287c2aa98e2SPeter Wemm 	e->e_errormode = EM_PRINT;		/* option e */
2883299c2f1SGregory Neil Shapiro 	e->e_queuedir = NOQDIR;
2893299c2f1SGregory Neil Shapiro 	e->e_ctime = curtime();
290c2aa98e2SPeter Wemm 	SevenBitInput = FALSE;			/* option 7 */
291c2aa98e2SPeter Wemm 	MaxMciCache = 1;			/* option k */
292c2aa98e2SPeter Wemm 	MciCacheTimeout = 5 MINUTES;		/* option K */
293c2aa98e2SPeter Wemm 	LogLevel = 9;				/* option L */
2943299c2f1SGregory Neil Shapiro 	inittimeouts(NULL, FALSE);		/* option r */
295c2aa98e2SPeter Wemm 	PrivacyFlags = PRIV_PUBLIC;		/* option p */
2963299c2f1SGregory Neil Shapiro 	MeToo = TRUE;				/* option m */
2973299c2f1SGregory Neil Shapiro 	SendMIMEErrors = TRUE;			/* option f */
2983299c2f1SGregory Neil Shapiro 	SuperSafe = TRUE;			/* option s */
2993299c2f1SGregory Neil Shapiro 	clrbitmap(DontBlameSendmail);		/* DontBlameSendmail option */
300c2aa98e2SPeter Wemm #if MIME8TO7
301c2aa98e2SPeter Wemm 	MimeMode = MM_CVTMIME|MM_PASS8BIT;	/* option 8 */
3023299c2f1SGregory Neil Shapiro #else /* MIME8TO7 */
303c2aa98e2SPeter Wemm 	MimeMode = MM_PASS8BIT;
3043299c2f1SGregory Neil Shapiro #endif /* MIME8TO7 */
305c2aa98e2SPeter Wemm 	for (i = 0; i < MAXTOCLASS; i++)
306c2aa98e2SPeter Wemm 	{
307c2aa98e2SPeter Wemm 		TimeOuts.to_q_return[i] = 5 DAYS;	/* option T */
308c2aa98e2SPeter Wemm 		TimeOuts.to_q_warning[i] = 0;		/* option T */
309c2aa98e2SPeter Wemm 	}
3103299c2f1SGregory Neil Shapiro 	ServiceSwitchFile = "/etc/mail/service.switch";
311c2aa98e2SPeter Wemm 	ServiceCacheMaxAge = (time_t) 10;
312c2aa98e2SPeter Wemm 	HostsFile = _PATH_HOSTS;
313c2aa98e2SPeter Wemm 	PidFile = newstr(_PATH_SENDMAILPID);
314c2aa98e2SPeter Wemm 	MustQuoteChars = "@,;:\\()[].'";
315c2aa98e2SPeter Wemm 	MciInfoTimeout = 30 MINUTES;
316c2aa98e2SPeter Wemm 	MaxRuleRecursion = MAXRULERECURSION;
317c2aa98e2SPeter Wemm 	MaxAliasRecursion = 10;
318c2aa98e2SPeter Wemm 	MaxMacroRecursion = 10;
319c2aa98e2SPeter Wemm 	ColonOkInAddr = TRUE;
320c2aa98e2SPeter Wemm 	DontLockReadFiles = TRUE;
321c2aa98e2SPeter Wemm 	DoubleBounceAddr = "postmaster";
322e01d6f61SPeter Wemm 	MaxHeadersLength = MAXHDRSLEN;
3233299c2f1SGregory Neil Shapiro 	MaxForwardEntries = 0;
3243299c2f1SGregory Neil Shapiro #if SASL
3253299c2f1SGregory Neil Shapiro 	AuthMechanisms = newstr(AUTH_MECHANISMS);
3263299c2f1SGregory Neil Shapiro #endif /* SASL */
327c2aa98e2SPeter Wemm #ifdef HESIOD_INIT
328c2aa98e2SPeter Wemm 	HesiodContext = NULL;
3293299c2f1SGregory Neil Shapiro #endif /* HESIOD_INIT */
3303299c2f1SGregory Neil Shapiro #if NETINET6
3313299c2f1SGregory Neil Shapiro 	/* Detect if IPv6 is available at run time */
3323299c2f1SGregory Neil Shapiro 	i = socket(AF_INET6, SOCK_STREAM, 0);
3333299c2f1SGregory Neil Shapiro 	if (i >= 0)
3343299c2f1SGregory Neil Shapiro 	{
3353299c2f1SGregory Neil Shapiro 		InetMode = AF_INET6;
3363299c2f1SGregory Neil Shapiro 		(void) close(i);
3373299c2f1SGregory Neil Shapiro 	}
3383299c2f1SGregory Neil Shapiro 	else
3393299c2f1SGregory Neil Shapiro 		InetMode = AF_INET;
3403299c2f1SGregory Neil Shapiro #else /* NETINET6 */
3413299c2f1SGregory Neil Shapiro 	InetMode = AF_INET;
3423299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
34376b7bf71SPeter Wemm 	ControlSocketName = NULL;
3443299c2f1SGregory Neil Shapiro 	memset(&ConnectOnlyTo, '\0', sizeof ConnectOnlyTo);
3453299c2f1SGregory Neil Shapiro 	DataFileBufferSize = 4096;
3463299c2f1SGregory Neil Shapiro 	XscriptFileBufferSize = 4096;
3473299c2f1SGregory Neil Shapiro 	for (i = 0; i < MAXRWSETS; i++)
3483299c2f1SGregory Neil Shapiro 		RuleSetNames[i] = NULL;
3493299c2f1SGregory Neil Shapiro #if _FFR_MILTER
3503299c2f1SGregory Neil Shapiro 	InputFilters[0] = NULL;
3513299c2f1SGregory Neil Shapiro #endif /* _FFR_MILTER */
352c2aa98e2SPeter Wemm 	setupmaps();
353c2aa98e2SPeter Wemm 	setupmailers();
354c2aa98e2SPeter Wemm 	setupheaders();
355c2aa98e2SPeter Wemm }
356c2aa98e2SPeter Wemm 
357c2aa98e2SPeter Wemm 
358c2aa98e2SPeter Wemm /*
359c2aa98e2SPeter Wemm **  SETDEFUSER -- set/reset DefUser using DefUid (for initgroups())
360c2aa98e2SPeter Wemm */
361c2aa98e2SPeter Wemm 
362c2aa98e2SPeter Wemm void
363c2aa98e2SPeter Wemm setdefuser()
364c2aa98e2SPeter Wemm {
365c2aa98e2SPeter Wemm 	struct passwd *defpwent;
366c2aa98e2SPeter Wemm 	static char defuserbuf[40];
367c2aa98e2SPeter Wemm 
368c2aa98e2SPeter Wemm 	DefUser = defuserbuf;
369c2aa98e2SPeter Wemm 	defpwent = sm_getpwuid(DefUid);
370c2aa98e2SPeter Wemm 	snprintf(defuserbuf, sizeof defuserbuf, "%s",
371c2aa98e2SPeter Wemm 		defpwent == NULL ? "nobody" : defpwent->pw_name);
372c2aa98e2SPeter Wemm 	if (tTd(37, 4))
3733299c2f1SGregory Neil Shapiro 		dprintf("setdefuser: DefUid=%d, DefUser=%s\n",
374c2aa98e2SPeter Wemm 		       (int) DefUid, DefUser);
375c2aa98e2SPeter Wemm }
376c2aa98e2SPeter Wemm /*
377c2aa98e2SPeter Wemm **  SETUPMAILERS -- initialize default mailers
378c2aa98e2SPeter Wemm */
379c2aa98e2SPeter Wemm 
3803299c2f1SGregory Neil Shapiro static void
381c2aa98e2SPeter Wemm setupmailers()
382c2aa98e2SPeter Wemm {
383c2aa98e2SPeter Wemm 	char buf[100];
384c2aa98e2SPeter Wemm 
3853299c2f1SGregory Neil Shapiro 	(void) strlcpy(buf, "prog, P=/bin/sh, F=lsoDq9, T=X-Unix/X-Unix/X-Unix, A=sh -c \201u",
3863299c2f1SGregory Neil Shapiro 		sizeof buf);
387c2aa98e2SPeter Wemm 	makemailer(buf);
388c2aa98e2SPeter Wemm 
3893299c2f1SGregory Neil Shapiro 	(void) strlcpy(buf, "*file*, P=[FILE], F=lsDFMPEouq9, T=X-Unix/X-Unix/X-Unix, A=FILE \201u",
3903299c2f1SGregory Neil Shapiro 		sizeof buf);
391c2aa98e2SPeter Wemm 	makemailer(buf);
392c2aa98e2SPeter Wemm 
3933299c2f1SGregory Neil Shapiro 	(void) strlcpy(buf, "*include*, P=/dev/null, F=su, A=INCLUDE \201u",
3943299c2f1SGregory Neil Shapiro 		sizeof buf);
395c2aa98e2SPeter Wemm 	makemailer(buf);
3963299c2f1SGregory Neil Shapiro 	initerrmailers();
397c2aa98e2SPeter Wemm }
398c2aa98e2SPeter Wemm /*
399c2aa98e2SPeter Wemm **  SETUPMAPS -- set up map classes
400c2aa98e2SPeter Wemm */
401c2aa98e2SPeter Wemm 
402c2aa98e2SPeter Wemm #define MAPDEF(name, ext, flags, parse, open, close, lookup, store) \
403c2aa98e2SPeter Wemm 	{ \
404c2aa98e2SPeter Wemm 		extern bool parse __P((MAP *, char *)); \
405c2aa98e2SPeter Wemm 		extern bool open __P((MAP *, int)); \
406c2aa98e2SPeter Wemm 		extern void close __P((MAP *)); \
407c2aa98e2SPeter Wemm 		extern char *lookup __P((MAP *, char *, char **, int *)); \
408c2aa98e2SPeter Wemm 		extern void store __P((MAP *, char *, char *)); \
409c2aa98e2SPeter Wemm 		s = stab(name, ST_MAPCLASS, ST_ENTER); \
410c2aa98e2SPeter Wemm 		s->s_mapclass.map_cname = name; \
411c2aa98e2SPeter Wemm 		s->s_mapclass.map_ext = ext; \
412c2aa98e2SPeter Wemm 		s->s_mapclass.map_cflags = flags; \
413c2aa98e2SPeter Wemm 		s->s_mapclass.map_parse = parse; \
414c2aa98e2SPeter Wemm 		s->s_mapclass.map_open = open; \
415c2aa98e2SPeter Wemm 		s->s_mapclass.map_close = close; \
416c2aa98e2SPeter Wemm 		s->s_mapclass.map_lookup = lookup; \
417c2aa98e2SPeter Wemm 		s->s_mapclass.map_store = store; \
418c2aa98e2SPeter Wemm 	}
419c2aa98e2SPeter Wemm 
4203299c2f1SGregory Neil Shapiro static void
421c2aa98e2SPeter Wemm setupmaps()
422c2aa98e2SPeter Wemm {
423c2aa98e2SPeter Wemm 	register STAB *s;
424c2aa98e2SPeter Wemm 
425c2aa98e2SPeter Wemm #ifdef NEWDB
426c2aa98e2SPeter Wemm 	MAPDEF("hash", ".db", MCF_ALIASOK|MCF_REBUILDABLE,
427c2aa98e2SPeter Wemm 		map_parseargs, hash_map_open, db_map_close,
428c2aa98e2SPeter Wemm 		db_map_lookup, db_map_store);
429c2aa98e2SPeter Wemm 
430c2aa98e2SPeter Wemm 	MAPDEF("btree", ".db", MCF_ALIASOK|MCF_REBUILDABLE,
431c2aa98e2SPeter Wemm 		map_parseargs, bt_map_open, db_map_close,
432c2aa98e2SPeter Wemm 		db_map_lookup, db_map_store);
4333299c2f1SGregory Neil Shapiro #endif /* NEWDB */
434c2aa98e2SPeter Wemm 
435c2aa98e2SPeter Wemm #ifdef NDBM
436c2aa98e2SPeter Wemm 	MAPDEF("dbm", ".dir", MCF_ALIASOK|MCF_REBUILDABLE,
437c2aa98e2SPeter Wemm 		map_parseargs, ndbm_map_open, ndbm_map_close,
438c2aa98e2SPeter Wemm 		ndbm_map_lookup, ndbm_map_store);
4393299c2f1SGregory Neil Shapiro #endif /* NDBM */
440c2aa98e2SPeter Wemm 
441c2aa98e2SPeter Wemm #ifdef NIS
442c2aa98e2SPeter Wemm 	MAPDEF("nis", NULL, MCF_ALIASOK,
443c2aa98e2SPeter Wemm 		map_parseargs, nis_map_open, null_map_close,
444c2aa98e2SPeter Wemm 		nis_map_lookup, null_map_store);
4453299c2f1SGregory Neil Shapiro #endif /* NIS */
446c2aa98e2SPeter Wemm 
447c2aa98e2SPeter Wemm #ifdef NISPLUS
448c2aa98e2SPeter Wemm 	MAPDEF("nisplus", NULL, MCF_ALIASOK,
449c2aa98e2SPeter Wemm 		map_parseargs, nisplus_map_open, null_map_close,
450c2aa98e2SPeter Wemm 		nisplus_map_lookup, null_map_store);
4513299c2f1SGregory Neil Shapiro #endif /* NISPLUS */
4523299c2f1SGregory Neil Shapiro 
453c2aa98e2SPeter Wemm #ifdef LDAPMAP
4543299c2f1SGregory Neil Shapiro 	MAPDEF("ldap", NULL, MCF_ALIASOK,
4553299c2f1SGregory Neil Shapiro 		ldapmap_parseargs, ldapmap_open, ldapmap_close,
4563299c2f1SGregory Neil Shapiro 		ldapmap_lookup, null_map_store);
4573299c2f1SGregory Neil Shapiro 
4583299c2f1SGregory Neil Shapiro 	/* Deprecated */
4593299c2f1SGregory Neil Shapiro 	MAPDEF("ldapx", NULL, MCF_ALIASOK,
4603299c2f1SGregory Neil Shapiro 		ldapx_map_parseargs, ldapmap_open, ldapmap_close,
4613299c2f1SGregory Neil Shapiro 		ldapmap_lookup, null_map_store);
4623299c2f1SGregory Neil Shapiro #endif /* LDAPMAP */
4633299c2f1SGregory Neil Shapiro 
4643299c2f1SGregory Neil Shapiro #ifdef PH_MAP
4653299c2f1SGregory Neil Shapiro 	MAPDEF("ph", NULL, 0,
4663299c2f1SGregory Neil Shapiro 		ph_map_parseargs, ph_map_open, ph_map_close,
4673299c2f1SGregory Neil Shapiro 		ph_map_lookup, null_map_store);
4683299c2f1SGregory Neil Shapiro #endif /* PH_MAP */
4693299c2f1SGregory Neil Shapiro 
4703299c2f1SGregory Neil Shapiro #if MAP_NSD
4713299c2f1SGregory Neil Shapiro 	/* IRIX 6.5 nsd support */
4723299c2f1SGregory Neil Shapiro 	MAPDEF("nsd", NULL, MCF_ALIASOK,
4733299c2f1SGregory Neil Shapiro 	       map_parseargs, null_map_open, null_map_close,
4743299c2f1SGregory Neil Shapiro 	       nsd_map_lookup, null_map_store);
4753299c2f1SGregory Neil Shapiro #endif /* MAP_NSD */
476c2aa98e2SPeter Wemm 
477c2aa98e2SPeter Wemm #ifdef HESIOD
478c2aa98e2SPeter Wemm 	MAPDEF("hesiod", NULL, MCF_ALIASOK|MCF_ALIASONLY,
479c2aa98e2SPeter Wemm 		map_parseargs, hes_map_open, null_map_close,
480c2aa98e2SPeter Wemm 		hes_map_lookup, null_map_store);
4813299c2f1SGregory Neil Shapiro #endif /* HESIOD */
482c2aa98e2SPeter Wemm 
483c2aa98e2SPeter Wemm #if NETINFO
484c2aa98e2SPeter Wemm 	MAPDEF("netinfo", NULL, MCF_ALIASOK,
485c2aa98e2SPeter Wemm 		map_parseargs, ni_map_open, null_map_close,
486c2aa98e2SPeter Wemm 		ni_map_lookup, null_map_store);
4873299c2f1SGregory Neil Shapiro #endif /* NETINFO */
488c2aa98e2SPeter Wemm 
489c2aa98e2SPeter Wemm #if 0
490c2aa98e2SPeter Wemm 	MAPDEF("dns", NULL, 0,
491c2aa98e2SPeter Wemm 		dns_map_init, null_map_open, null_map_close,
492c2aa98e2SPeter Wemm 		dns_map_lookup, null_map_store);
4933299c2f1SGregory Neil Shapiro #endif /* 0 */
494c2aa98e2SPeter Wemm 
495c2aa98e2SPeter Wemm #if NAMED_BIND
496c2aa98e2SPeter Wemm 	/* best MX DNS lookup */
497c2aa98e2SPeter Wemm 	MAPDEF("bestmx", NULL, MCF_OPTFILE,
498c2aa98e2SPeter Wemm 		map_parseargs, null_map_open, null_map_close,
499c2aa98e2SPeter Wemm 		bestmx_map_lookup, null_map_store);
5003299c2f1SGregory Neil Shapiro #endif /* NAMED_BIND */
501c2aa98e2SPeter Wemm 
502c2aa98e2SPeter Wemm 	MAPDEF("host", NULL, 0,
503c2aa98e2SPeter Wemm 		host_map_init, null_map_open, null_map_close,
504c2aa98e2SPeter Wemm 		host_map_lookup, null_map_store);
505c2aa98e2SPeter Wemm 
506c2aa98e2SPeter Wemm 	MAPDEF("text", NULL, MCF_ALIASOK,
507c2aa98e2SPeter Wemm 		map_parseargs, text_map_open, null_map_close,
508c2aa98e2SPeter Wemm 		text_map_lookup, null_map_store);
509c2aa98e2SPeter Wemm 
510c2aa98e2SPeter Wemm 	MAPDEF("stab", NULL, MCF_ALIASOK|MCF_ALIASONLY,
511c2aa98e2SPeter Wemm 		map_parseargs, stab_map_open, null_map_close,
512c2aa98e2SPeter Wemm 		stab_map_lookup, stab_map_store);
513c2aa98e2SPeter Wemm 
514c2aa98e2SPeter Wemm 	MAPDEF("implicit", NULL, MCF_ALIASOK|MCF_ALIASONLY|MCF_REBUILDABLE,
515c2aa98e2SPeter Wemm 		map_parseargs, impl_map_open, impl_map_close,
516c2aa98e2SPeter Wemm 		impl_map_lookup, impl_map_store);
517c2aa98e2SPeter Wemm 
518c2aa98e2SPeter Wemm 	/* access to system passwd file */
519c2aa98e2SPeter Wemm 	MAPDEF("user", NULL, MCF_OPTFILE,
520c2aa98e2SPeter Wemm 		map_parseargs, user_map_open, null_map_close,
521c2aa98e2SPeter Wemm 		user_map_lookup, null_map_store);
522c2aa98e2SPeter Wemm 
523c2aa98e2SPeter Wemm 	/* dequote map */
524c2aa98e2SPeter Wemm 	MAPDEF("dequote", NULL, 0,
525c2aa98e2SPeter Wemm 		dequote_init, null_map_open, null_map_close,
526c2aa98e2SPeter Wemm 		dequote_map, null_map_store);
527c2aa98e2SPeter Wemm 
528c2aa98e2SPeter Wemm #ifdef MAP_REGEX
529c2aa98e2SPeter Wemm 	MAPDEF("regex", NULL, 0,
530c2aa98e2SPeter Wemm 		regex_map_init, null_map_open, null_map_close,
531c2aa98e2SPeter Wemm 		regex_map_lookup, null_map_store);
5323299c2f1SGregory Neil Shapiro #endif /* MAP_REGEX */
533c2aa98e2SPeter Wemm 
534c2aa98e2SPeter Wemm #if USERDB
535c2aa98e2SPeter Wemm 	/* user database */
536c2aa98e2SPeter Wemm 	MAPDEF("userdb", ".db", 0,
537c2aa98e2SPeter Wemm 		map_parseargs, null_map_open, null_map_close,
538c2aa98e2SPeter Wemm 		udb_map_lookup, null_map_store);
5393299c2f1SGregory Neil Shapiro #endif /* USERDB */
540c2aa98e2SPeter Wemm 
541c2aa98e2SPeter Wemm 	/* arbitrary programs */
542c2aa98e2SPeter Wemm 	MAPDEF("program", NULL, MCF_ALIASOK,
543c2aa98e2SPeter Wemm 		map_parseargs, null_map_open, null_map_close,
544c2aa98e2SPeter Wemm 		prog_map_lookup, null_map_store);
545c2aa98e2SPeter Wemm 
546c2aa98e2SPeter Wemm 	/* sequenced maps */
547c2aa98e2SPeter Wemm 	MAPDEF("sequence", NULL, MCF_ALIASOK,
548c2aa98e2SPeter Wemm 		seq_map_parse, null_map_open, null_map_close,
549c2aa98e2SPeter Wemm 		seq_map_lookup, seq_map_store);
550c2aa98e2SPeter Wemm 
551c2aa98e2SPeter Wemm 	/* switched interface to sequenced maps */
552c2aa98e2SPeter Wemm 	MAPDEF("switch", NULL, MCF_ALIASOK,
553c2aa98e2SPeter Wemm 		map_parseargs, switch_map_open, null_map_close,
554c2aa98e2SPeter Wemm 		seq_map_lookup, seq_map_store);
555c2aa98e2SPeter Wemm 
556c2aa98e2SPeter Wemm 	/* null map lookup -- really for internal use only */
557c2aa98e2SPeter Wemm 	MAPDEF("null", NULL, MCF_ALIASOK|MCF_OPTFILE,
558c2aa98e2SPeter Wemm 		map_parseargs, null_map_open, null_map_close,
559c2aa98e2SPeter Wemm 		null_map_lookup, null_map_store);
560c2aa98e2SPeter Wemm 
561c2aa98e2SPeter Wemm 	/* syslog map -- logs information to syslog */
562c2aa98e2SPeter Wemm 	MAPDEF("syslog", NULL, 0,
563c2aa98e2SPeter Wemm 		syslog_map_parseargs, null_map_open, null_map_close,
564c2aa98e2SPeter Wemm 		syslog_map_lookup, null_map_store);
5653299c2f1SGregory Neil Shapiro 
5663299c2f1SGregory Neil Shapiro 	/* macro storage map -- rulesets can set macros */
5673299c2f1SGregory Neil Shapiro 	MAPDEF("macro", NULL, 0,
5683299c2f1SGregory Neil Shapiro 		dequote_init, null_map_open, null_map_close,
5693299c2f1SGregory Neil Shapiro 		macro_map_lookup, null_map_store);
5703299c2f1SGregory Neil Shapiro 
5713299c2f1SGregory Neil Shapiro 	/* arithmetic map -- add/subtract/compare */
5723299c2f1SGregory Neil Shapiro 	MAPDEF("arith", NULL, 0,
5733299c2f1SGregory Neil Shapiro 		dequote_init, null_map_open, null_map_close,
5743299c2f1SGregory Neil Shapiro 		arith_map_lookup, null_map_store);
5753299c2f1SGregory Neil Shapiro 
5763299c2f1SGregory Neil Shapiro 	if (tTd(38, 2))
5773299c2f1SGregory Neil Shapiro 	{
5783299c2f1SGregory Neil Shapiro 		/* bogus map -- always return tempfail */
5793299c2f1SGregory Neil Shapiro 		MAPDEF("bogus",	NULL, MCF_ALIASOK|MCF_OPTFILE,
5803299c2f1SGregory Neil Shapiro 		       map_parseargs, null_map_open, null_map_close,
5813299c2f1SGregory Neil Shapiro 		       bogus_map_lookup, null_map_store);
5823299c2f1SGregory Neil Shapiro 	}
583c2aa98e2SPeter Wemm }
584c2aa98e2SPeter Wemm 
585c2aa98e2SPeter Wemm #undef MAPDEF
586c2aa98e2SPeter Wemm /*
587c2aa98e2SPeter Wemm **  INITHOSTMAPS -- initial host-dependent maps
588c2aa98e2SPeter Wemm **
589c2aa98e2SPeter Wemm **	This should act as an interface to any local service switch
590c2aa98e2SPeter Wemm **	provided by the host operating system.
591c2aa98e2SPeter Wemm **
592c2aa98e2SPeter Wemm **	Parameters:
593c2aa98e2SPeter Wemm **		none
594c2aa98e2SPeter Wemm **
595c2aa98e2SPeter Wemm **	Returns:
596c2aa98e2SPeter Wemm **		none
597c2aa98e2SPeter Wemm **
598c2aa98e2SPeter Wemm **	Side Effects:
599c2aa98e2SPeter Wemm **		Should define maps "host" and "users" as necessary
600c2aa98e2SPeter Wemm **		for this OS.  If they are not defined, they will get
601c2aa98e2SPeter Wemm **		a default value later.  It should check to make sure
602c2aa98e2SPeter Wemm **		they are not defined first, since it's possible that
603c2aa98e2SPeter Wemm **		the config file has provided an override.
604c2aa98e2SPeter Wemm */
605c2aa98e2SPeter Wemm 
606c2aa98e2SPeter Wemm void
607c2aa98e2SPeter Wemm inithostmaps()
608c2aa98e2SPeter Wemm {
609c2aa98e2SPeter Wemm 	register int i;
610c2aa98e2SPeter Wemm 	int nmaps;
611c2aa98e2SPeter Wemm 	char *maptype[MAXMAPSTACK];
612c2aa98e2SPeter Wemm 	short mapreturn[MAXMAPACTIONS];
613c2aa98e2SPeter Wemm 	char buf[MAXLINE];
614c2aa98e2SPeter Wemm 
615c2aa98e2SPeter Wemm 	/*
616c2aa98e2SPeter Wemm 	**  Set up default hosts maps.
617c2aa98e2SPeter Wemm 	*/
618c2aa98e2SPeter Wemm 
619c2aa98e2SPeter Wemm #if 0
620c2aa98e2SPeter Wemm 	nmaps = switch_map_find("hosts", maptype, mapreturn);
621c2aa98e2SPeter Wemm 	for (i = 0; i < nmaps; i++)
622c2aa98e2SPeter Wemm 	{
623c2aa98e2SPeter Wemm 		if (strcmp(maptype[i], "files") == 0 &&
624c2aa98e2SPeter Wemm 		    stab("hosts.files", ST_MAP, ST_FIND) == NULL)
625c2aa98e2SPeter Wemm 		{
6263299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "hosts.files text -k 0 -v 1 /etc/hosts",
6273299c2f1SGregory Neil Shapiro 				sizeof buf);
628c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
629c2aa98e2SPeter Wemm 		}
630c2aa98e2SPeter Wemm # if NAMED_BIND
631c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "dns") == 0 &&
632c2aa98e2SPeter Wemm 		    stab("hosts.dns", ST_MAP, ST_FIND) == NULL)
633c2aa98e2SPeter Wemm 		{
6343299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "hosts.dns dns A", sizeof buf);
635c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
636c2aa98e2SPeter Wemm 		}
6373299c2f1SGregory Neil Shapiro # endif /* NAMED_BIND */
638c2aa98e2SPeter Wemm # ifdef NISPLUS
639c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nisplus") == 0 &&
640c2aa98e2SPeter Wemm 		    stab("hosts.nisplus", ST_MAP, ST_FIND) == NULL)
641c2aa98e2SPeter Wemm 		{
6423299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "hosts.nisplus nisplus -k name -v address hosts.org_dir",
6433299c2f1SGregory Neil Shapiro 				sizeof buf);
644c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
645c2aa98e2SPeter Wemm 		}
6463299c2f1SGregory Neil Shapiro # endif /* NISPLUS */
647c2aa98e2SPeter Wemm # ifdef NIS
648c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nis") == 0 &&
649c2aa98e2SPeter Wemm 		    stab("hosts.nis", ST_MAP, ST_FIND) == NULL)
650c2aa98e2SPeter Wemm 		{
6513299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "hosts.nis nis -k 0 -v 1 hosts.byname",
6523299c2f1SGregory Neil Shapiro 				sizeof buf);
653c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
654c2aa98e2SPeter Wemm 		}
6553299c2f1SGregory Neil Shapiro # endif /* NIS */
656c2aa98e2SPeter Wemm # if NETINFO
657c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "netinfo") == 0) &&
658c2aa98e2SPeter Wemm 		    stab("hosts.netinfo", ST_MAP, ST_FIND) == NULL)
659c2aa98e2SPeter Wemm 		{
6603299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "hosts.netinfo netinfo -v name /machines",
6613299c2f1SGregory Neil Shapiro 				sizeof buf);
662c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
663c2aa98e2SPeter Wemm 		}
6643299c2f1SGregory Neil Shapiro # endif /* NETINFO */
665c2aa98e2SPeter Wemm 	}
6663299c2f1SGregory Neil Shapiro #endif /* 0 */
667c2aa98e2SPeter Wemm 
668c2aa98e2SPeter Wemm 	/*
669c2aa98e2SPeter Wemm 	**  Make sure we have a host map.
670c2aa98e2SPeter Wemm 	*/
671c2aa98e2SPeter Wemm 
672c2aa98e2SPeter Wemm 	if (stab("host", ST_MAP, ST_FIND) == NULL)
673c2aa98e2SPeter Wemm 	{
674c2aa98e2SPeter Wemm 		/* user didn't initialize: set up host map */
6753299c2f1SGregory Neil Shapiro 		(void) strlcpy(buf, "host host", sizeof buf);
676c2aa98e2SPeter Wemm #if NAMED_BIND
677c2aa98e2SPeter Wemm 		if (ConfigLevel >= 2)
6783299c2f1SGregory Neil Shapiro 			(void) strlcat(buf, " -a. -D", sizeof buf);
6793299c2f1SGregory Neil Shapiro #endif /* NAMED_BIND */
680c2aa98e2SPeter Wemm 		(void) makemapentry(buf);
681c2aa98e2SPeter Wemm 	}
682c2aa98e2SPeter Wemm 
683c2aa98e2SPeter Wemm 	/*
684c2aa98e2SPeter Wemm 	**  Set up default aliases maps
685c2aa98e2SPeter Wemm 	*/
686c2aa98e2SPeter Wemm 
687c2aa98e2SPeter Wemm 	nmaps = switch_map_find("aliases", maptype, mapreturn);
688c2aa98e2SPeter Wemm 	for (i = 0; i < nmaps; i++)
689c2aa98e2SPeter Wemm 	{
690c2aa98e2SPeter Wemm 		if (strcmp(maptype[i], "files") == 0 &&
691c2aa98e2SPeter Wemm 		    stab("aliases.files", ST_MAP, ST_FIND) == NULL)
692c2aa98e2SPeter Wemm 		{
6933299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "aliases.files null", sizeof buf);
694c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
695c2aa98e2SPeter Wemm 		}
696c2aa98e2SPeter Wemm #ifdef NISPLUS
697c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nisplus") == 0 &&
698c2aa98e2SPeter Wemm 		    stab("aliases.nisplus", ST_MAP, ST_FIND) == NULL)
699c2aa98e2SPeter Wemm 		{
7003299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "aliases.nisplus nisplus -kalias -vexpansion mail_aliases.org_dir",
7013299c2f1SGregory Neil Shapiro 				sizeof buf);
702c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
703c2aa98e2SPeter Wemm 		}
7043299c2f1SGregory Neil Shapiro #endif /* NISPLUS */
705c2aa98e2SPeter Wemm #ifdef NIS
706c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nis") == 0 &&
707c2aa98e2SPeter Wemm 		    stab("aliases.nis", ST_MAP, ST_FIND) == NULL)
708c2aa98e2SPeter Wemm 		{
7093299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "aliases.nis nis mail.aliases",
7103299c2f1SGregory Neil Shapiro 				sizeof buf);
711c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
712c2aa98e2SPeter Wemm 		}
7133299c2f1SGregory Neil Shapiro #endif /* NIS */
7143299c2f1SGregory Neil Shapiro #if NETINFO
715c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "netinfo") == 0 &&
716c2aa98e2SPeter Wemm 		    stab("aliases.netinfo", ST_MAP, ST_FIND) == NULL)
717c2aa98e2SPeter Wemm 		{
7183299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "aliases.netinfo netinfo -z, /aliases",
7193299c2f1SGregory Neil Shapiro 				sizeof buf);
720c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
721c2aa98e2SPeter Wemm 		}
7223299c2f1SGregory Neil Shapiro #endif /* NETINFO */
723c2aa98e2SPeter Wemm #ifdef HESIOD
724c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "hesiod") == 0 &&
725c2aa98e2SPeter Wemm 		    stab("aliases.hesiod", ST_MAP, ST_FIND) == NULL)
726c2aa98e2SPeter Wemm 		{
7273299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "aliases.hesiod hesiod aliases",
7283299c2f1SGregory Neil Shapiro 				sizeof buf);
729c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
730c2aa98e2SPeter Wemm 		}
7313299c2f1SGregory Neil Shapiro #endif /* HESIOD */
732c2aa98e2SPeter Wemm 	}
733c2aa98e2SPeter Wemm 	if (stab("aliases", ST_MAP, ST_FIND) == NULL)
734c2aa98e2SPeter Wemm 	{
7353299c2f1SGregory Neil Shapiro 		(void) strlcpy(buf, "aliases switch aliases", sizeof buf);
736c2aa98e2SPeter Wemm 		(void) makemapentry(buf);
737c2aa98e2SPeter Wemm 	}
738c2aa98e2SPeter Wemm 
739c2aa98e2SPeter Wemm #if 0		/* "user" map class is a better choice */
740c2aa98e2SPeter Wemm 	/*
741c2aa98e2SPeter Wemm 	**  Set up default users maps.
742c2aa98e2SPeter Wemm 	*/
743c2aa98e2SPeter Wemm 
744c2aa98e2SPeter Wemm 	nmaps = switch_map_find("passwd", maptype, mapreturn);
745c2aa98e2SPeter Wemm 	for (i = 0; i < nmaps; i++)
746c2aa98e2SPeter Wemm 	{
747c2aa98e2SPeter Wemm 		if (strcmp(maptype[i], "files") == 0 &&
748c2aa98e2SPeter Wemm 		    stab("users.files", ST_MAP, ST_FIND) == NULL)
749c2aa98e2SPeter Wemm 		{
7503299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "users.files text -m -z: -k0 -v6 /etc/passwd",
7513299c2f1SGregory Neil Shapiro 				sizeof buf);
752c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
753c2aa98e2SPeter Wemm 		}
754c2aa98e2SPeter Wemm # ifdef NISPLUS
755c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nisplus") == 0 &&
756c2aa98e2SPeter Wemm 		    stab("users.nisplus", ST_MAP, ST_FIND) == NULL)
757c2aa98e2SPeter Wemm 		{
7583299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "users.nisplus nisplus -m -kname -vhome passwd.org_dir",
7593299c2f1SGregory Neil Shapiro 				sizeof buf);
760c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
761c2aa98e2SPeter Wemm 		}
7623299c2f1SGregory Neil Shapiro # endif /* NISPLUS */
763c2aa98e2SPeter Wemm # ifdef NIS
764c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "nis") == 0 &&
765c2aa98e2SPeter Wemm 		    stab("users.nis", ST_MAP, ST_FIND) == NULL)
766c2aa98e2SPeter Wemm 		{
7673299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "users.nis nis -m passwd.byname",
7683299c2f1SGregory Neil Shapiro 				sizeof buf);
769c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
770c2aa98e2SPeter Wemm 		}
7713299c2f1SGregory Neil Shapiro # endif /* NIS */
772c2aa98e2SPeter Wemm # ifdef HESIOD
773c2aa98e2SPeter Wemm 		else if (strcmp(maptype[i], "hesiod") == 0) &&
774c2aa98e2SPeter Wemm 		    stab("users.hesiod", ST_MAP, ST_FIND) == NULL)
775c2aa98e2SPeter Wemm 		{
7763299c2f1SGregory Neil Shapiro 			(void) strlcpy(buf, "users.hesiod hesiod", sizeof buf);
777c2aa98e2SPeter Wemm 			(void) makemapentry(buf);
778c2aa98e2SPeter Wemm 		}
7793299c2f1SGregory Neil Shapiro # endif /* HESIOD */
780c2aa98e2SPeter Wemm 	}
781c2aa98e2SPeter Wemm 	if (stab("users", ST_MAP, ST_FIND) == NULL)
782c2aa98e2SPeter Wemm 	{
7833299c2f1SGregory Neil Shapiro 		(void) strlcpy(buf, "users switch -m passwd", sizeof buf);
784c2aa98e2SPeter Wemm 		(void) makemapentry(buf);
785c2aa98e2SPeter Wemm 	}
7863299c2f1SGregory Neil Shapiro #endif /* 0 */
787c2aa98e2SPeter Wemm }
788c2aa98e2SPeter Wemm /*
789c2aa98e2SPeter Wemm **  SWITCH_MAP_FIND -- find the list of types associated with a map
790c2aa98e2SPeter Wemm **
791c2aa98e2SPeter Wemm **	This is the system-dependent interface to the service switch.
792c2aa98e2SPeter Wemm **
793c2aa98e2SPeter Wemm **	Parameters:
794c2aa98e2SPeter Wemm **		service -- the name of the service of interest.
795c2aa98e2SPeter Wemm **		maptype -- an out-array of strings containing the types
796c2aa98e2SPeter Wemm **			of access to use for this service.  There can
797c2aa98e2SPeter Wemm **			be at most MAXMAPSTACK types for a single service.
798c2aa98e2SPeter Wemm **		mapreturn -- an out-array of return information bitmaps
799c2aa98e2SPeter Wemm **			for the map.
800c2aa98e2SPeter Wemm **
801c2aa98e2SPeter Wemm **	Returns:
802c2aa98e2SPeter Wemm **		The number of map types filled in, or -1 for failure.
8033299c2f1SGregory Neil Shapiro **
8043299c2f1SGregory Neil Shapiro **	Side effects:
8053299c2f1SGregory Neil Shapiro **		Preserves errno so nothing in the routine clobbers it.
806c2aa98e2SPeter Wemm */
807c2aa98e2SPeter Wemm 
808c2aa98e2SPeter Wemm #if defined(SOLARIS) || (defined(sony_news) && defined(__svr4))
809c2aa98e2SPeter Wemm # define _USE_SUN_NSSWITCH_
8103299c2f1SGregory Neil Shapiro #endif /* defined(SOLARIS) || (defined(sony_news) && defined(__svr4)) */
811c2aa98e2SPeter Wemm 
812c2aa98e2SPeter Wemm #ifdef _USE_SUN_NSSWITCH_
813c2aa98e2SPeter Wemm # include <nsswitch.h>
8143299c2f1SGregory Neil Shapiro #endif /* _USE_SUN_NSSWITCH_ */
815c2aa98e2SPeter Wemm 
816c2aa98e2SPeter Wemm #if defined(ultrix) || (defined(__osf__) && defined(__alpha))
817c2aa98e2SPeter Wemm # define _USE_DEC_SVC_CONF_
8183299c2f1SGregory Neil Shapiro #endif /* defined(ultrix) || (defined(__osf__) && defined(__alpha)) */
819c2aa98e2SPeter Wemm 
820c2aa98e2SPeter Wemm #ifdef _USE_DEC_SVC_CONF_
821c2aa98e2SPeter Wemm # include <sys/svcinfo.h>
8223299c2f1SGregory Neil Shapiro #endif /* _USE_DEC_SVC_CONF_ */
823c2aa98e2SPeter Wemm 
824c2aa98e2SPeter Wemm int
825c2aa98e2SPeter Wemm switch_map_find(service, maptype, mapreturn)
826c2aa98e2SPeter Wemm 	char *service;
827c2aa98e2SPeter Wemm 	char *maptype[MAXMAPSTACK];
828c2aa98e2SPeter Wemm 	short mapreturn[MAXMAPACTIONS];
829c2aa98e2SPeter Wemm {
830c2aa98e2SPeter Wemm 	int svcno;
8313299c2f1SGregory Neil Shapiro 	int save_errno = errno;
832c2aa98e2SPeter Wemm 
833c2aa98e2SPeter Wemm #ifdef _USE_SUN_NSSWITCH_
834c2aa98e2SPeter Wemm 	struct __nsw_switchconfig *nsw_conf;
835c2aa98e2SPeter Wemm 	enum __nsw_parse_err pserr;
836c2aa98e2SPeter Wemm 	struct __nsw_lookup *lk;
837c2aa98e2SPeter Wemm 	static struct __nsw_lookup lkp0 =
838c2aa98e2SPeter Wemm 		{ "files", {1, 0, 0, 0}, NULL, NULL };
839c2aa98e2SPeter Wemm 	static struct __nsw_switchconfig lkp_default =
840c2aa98e2SPeter Wemm 		{ 0, "sendmail", 3, &lkp0 };
841c2aa98e2SPeter Wemm 
842c2aa98e2SPeter Wemm 	for (svcno = 0; svcno < MAXMAPACTIONS; svcno++)
843c2aa98e2SPeter Wemm 		mapreturn[svcno] = 0;
844c2aa98e2SPeter Wemm 
845c2aa98e2SPeter Wemm 	if ((nsw_conf = __nsw_getconfig(service, &pserr)) == NULL)
846c2aa98e2SPeter Wemm 		lk = lkp_default.lookups;
847c2aa98e2SPeter Wemm 	else
848c2aa98e2SPeter Wemm 		lk = nsw_conf->lookups;
849c2aa98e2SPeter Wemm 	svcno = 0;
850c2aa98e2SPeter Wemm 	while (lk != NULL)
851c2aa98e2SPeter Wemm 	{
852c2aa98e2SPeter Wemm 		maptype[svcno] = lk->service_name;
853c2aa98e2SPeter Wemm 		if (lk->actions[__NSW_NOTFOUND] == __NSW_RETURN)
854c2aa98e2SPeter Wemm 			mapreturn[MA_NOTFOUND] |= 1 << svcno;
855c2aa98e2SPeter Wemm 		if (lk->actions[__NSW_TRYAGAIN] == __NSW_RETURN)
856c2aa98e2SPeter Wemm 			mapreturn[MA_TRYAGAIN] |= 1 << svcno;
857c2aa98e2SPeter Wemm 		if (lk->actions[__NSW_UNAVAIL] == __NSW_RETURN)
858c2aa98e2SPeter Wemm 			mapreturn[MA_TRYAGAIN] |= 1 << svcno;
859c2aa98e2SPeter Wemm 		svcno++;
860c2aa98e2SPeter Wemm 		lk = lk->next;
861c2aa98e2SPeter Wemm 	}
8623299c2f1SGregory Neil Shapiro 	errno = save_errno;
863c2aa98e2SPeter Wemm 	return svcno;
8643299c2f1SGregory Neil Shapiro #endif /* _USE_SUN_NSSWITCH_ */
865c2aa98e2SPeter Wemm 
866c2aa98e2SPeter Wemm #ifdef _USE_DEC_SVC_CONF_
867c2aa98e2SPeter Wemm 	struct svcinfo *svcinfo;
868c2aa98e2SPeter Wemm 	int svc;
869c2aa98e2SPeter Wemm 
870c2aa98e2SPeter Wemm 	for (svcno = 0; svcno < MAXMAPACTIONS; svcno++)
871c2aa98e2SPeter Wemm 		mapreturn[svcno] = 0;
872c2aa98e2SPeter Wemm 
873c2aa98e2SPeter Wemm 	svcinfo = getsvc();
874c2aa98e2SPeter Wemm 	if (svcinfo == NULL)
875c2aa98e2SPeter Wemm 		goto punt;
876c2aa98e2SPeter Wemm 	if (strcmp(service, "hosts") == 0)
877c2aa98e2SPeter Wemm 		svc = SVC_HOSTS;
878c2aa98e2SPeter Wemm 	else if (strcmp(service, "aliases") == 0)
879c2aa98e2SPeter Wemm 		svc = SVC_ALIASES;
880c2aa98e2SPeter Wemm 	else if (strcmp(service, "passwd") == 0)
881c2aa98e2SPeter Wemm 		svc = SVC_PASSWD;
882c2aa98e2SPeter Wemm 	else
8833299c2f1SGregory Neil Shapiro 	{
8843299c2f1SGregory Neil Shapiro 		errno = save_errno;
885c2aa98e2SPeter Wemm 		return -1;
8863299c2f1SGregory Neil Shapiro 	}
887c2aa98e2SPeter Wemm 	for (svcno = 0; svcno < SVC_PATHSIZE; svcno++)
888c2aa98e2SPeter Wemm 	{
889c2aa98e2SPeter Wemm 		switch (svcinfo->svcpath[svc][svcno])
890c2aa98e2SPeter Wemm 		{
891c2aa98e2SPeter Wemm 		  case SVC_LOCAL:
892c2aa98e2SPeter Wemm 			maptype[svcno] = "files";
893c2aa98e2SPeter Wemm 			break;
894c2aa98e2SPeter Wemm 
895c2aa98e2SPeter Wemm 		  case SVC_YP:
896c2aa98e2SPeter Wemm 			maptype[svcno] = "nis";
897c2aa98e2SPeter Wemm 			break;
898c2aa98e2SPeter Wemm 
899c2aa98e2SPeter Wemm 		  case SVC_BIND:
900c2aa98e2SPeter Wemm 			maptype[svcno] = "dns";
901c2aa98e2SPeter Wemm 			break;
902c2aa98e2SPeter Wemm 
903c2aa98e2SPeter Wemm # ifdef SVC_HESIOD
904c2aa98e2SPeter Wemm 		  case SVC_HESIOD:
905c2aa98e2SPeter Wemm 			maptype[svcno] = "hesiod";
906c2aa98e2SPeter Wemm 			break;
9073299c2f1SGregory Neil Shapiro # endif /* SVC_HESIOD */
908c2aa98e2SPeter Wemm 
909c2aa98e2SPeter Wemm 		  case SVC_LAST:
9103299c2f1SGregory Neil Shapiro 			errno = save_errno;
911c2aa98e2SPeter Wemm 			return svcno;
912c2aa98e2SPeter Wemm 		}
913c2aa98e2SPeter Wemm 	}
9143299c2f1SGregory Neil Shapiro 	errno = save_errno;
915c2aa98e2SPeter Wemm 	return svcno;
9163299c2f1SGregory Neil Shapiro #endif /* _USE_DEC_SVC_CONF_ */
917c2aa98e2SPeter Wemm 
918c2aa98e2SPeter Wemm #if !defined(_USE_SUN_NSSWITCH_) && !defined(_USE_DEC_SVC_CONF_)
919c2aa98e2SPeter Wemm 	/*
920c2aa98e2SPeter Wemm 	**  Fall-back mechanism.
921c2aa98e2SPeter Wemm 	*/
922c2aa98e2SPeter Wemm 
923c2aa98e2SPeter Wemm 	STAB *st;
924c2aa98e2SPeter Wemm 	time_t now = curtime();
925c2aa98e2SPeter Wemm 
926c2aa98e2SPeter Wemm 	for (svcno = 0; svcno < MAXMAPACTIONS; svcno++)
927c2aa98e2SPeter Wemm 		mapreturn[svcno] = 0;
928c2aa98e2SPeter Wemm 
929c2aa98e2SPeter Wemm 	if ((now - ServiceCacheTime) > (time_t) ServiceCacheMaxAge)
930c2aa98e2SPeter Wemm 	{
931c2aa98e2SPeter Wemm 		/* (re)read service switch */
932c2aa98e2SPeter Wemm 		register FILE *fp;
9333299c2f1SGregory Neil Shapiro 		long sff = SFF_REGONLY|SFF_OPENASROOT|SFF_NOLOCK;
934c2aa98e2SPeter Wemm 
9353299c2f1SGregory Neil Shapiro 		if (!bitnset(DBS_LINKEDSERVICESWITCHFILEINWRITABLEDIR,
9363299c2f1SGregory Neil Shapiro 			    DontBlameSendmail))
937c2aa98e2SPeter Wemm 			sff |= SFF_NOWLINK;
938c2aa98e2SPeter Wemm 
939c2aa98e2SPeter Wemm 		if (ConfigFileRead)
940c2aa98e2SPeter Wemm 			ServiceCacheTime = now;
941c2aa98e2SPeter Wemm 		fp = safefopen(ServiceSwitchFile, O_RDONLY, 0, sff);
942c2aa98e2SPeter Wemm 		if (fp != NULL)
943c2aa98e2SPeter Wemm 		{
944c2aa98e2SPeter Wemm 			char buf[MAXLINE];
945c2aa98e2SPeter Wemm 
946c2aa98e2SPeter Wemm 			while (fgets(buf, sizeof buf, fp) != NULL)
947c2aa98e2SPeter Wemm 			{
948c2aa98e2SPeter Wemm 				register char *p;
949c2aa98e2SPeter Wemm 
950c2aa98e2SPeter Wemm 				p = strpbrk(buf, "#\n");
951c2aa98e2SPeter Wemm 				if (p != NULL)
952c2aa98e2SPeter Wemm 					*p = '\0';
953c2aa98e2SPeter Wemm 				p = strpbrk(buf, " \t");
954c2aa98e2SPeter Wemm 				if (p != NULL)
955c2aa98e2SPeter Wemm 					*p++ = '\0';
956c2aa98e2SPeter Wemm 				if (buf[0] == '\0')
957c2aa98e2SPeter Wemm 					continue;
95876b7bf71SPeter Wemm 				if (p == NULL)
95976b7bf71SPeter Wemm 				{
96076b7bf71SPeter Wemm 					sm_syslog(LOG_ERR, NOQID,
96176b7bf71SPeter Wemm 						  "Bad line on %.100s: %.100s",
96276b7bf71SPeter Wemm 						  ServiceSwitchFile,
96376b7bf71SPeter Wemm 						  buf);
96476b7bf71SPeter Wemm 					continue;
96576b7bf71SPeter Wemm 				}
966c2aa98e2SPeter Wemm 				while (isspace(*p))
967c2aa98e2SPeter Wemm 					p++;
968c2aa98e2SPeter Wemm 				if (*p == '\0')
969c2aa98e2SPeter Wemm 					continue;
970c2aa98e2SPeter Wemm 
971c2aa98e2SPeter Wemm 				/*
972c2aa98e2SPeter Wemm 				**  Find/allocate space for this service entry.
973c2aa98e2SPeter Wemm 				**	Space for all of the service strings
974c2aa98e2SPeter Wemm 				**	are allocated at once.  This means
975c2aa98e2SPeter Wemm 				**	that we only have to free the first
976c2aa98e2SPeter Wemm 				**	one to free all of them.
977c2aa98e2SPeter Wemm 				*/
978c2aa98e2SPeter Wemm 
979c2aa98e2SPeter Wemm 				st = stab(buf, ST_SERVICE, ST_ENTER);
980c2aa98e2SPeter Wemm 				if (st->s_service[0] != NULL)
981c2aa98e2SPeter Wemm 					free((void *) st->s_service[0]);
982c2aa98e2SPeter Wemm 				p = newstr(p);
983c2aa98e2SPeter Wemm 				for (svcno = 0; svcno < MAXMAPSTACK; )
984c2aa98e2SPeter Wemm 				{
985c2aa98e2SPeter Wemm 					if (*p == '\0')
986c2aa98e2SPeter Wemm 						break;
987c2aa98e2SPeter Wemm 					st->s_service[svcno++] = p;
988c2aa98e2SPeter Wemm 					p = strpbrk(p, " \t");
989c2aa98e2SPeter Wemm 					if (p == NULL)
990c2aa98e2SPeter Wemm 						break;
991c2aa98e2SPeter Wemm 					*p++ = '\0';
992c2aa98e2SPeter Wemm 					while (isspace(*p))
993c2aa98e2SPeter Wemm 						p++;
994c2aa98e2SPeter Wemm 				}
995c2aa98e2SPeter Wemm 				if (svcno < MAXMAPSTACK)
996c2aa98e2SPeter Wemm 					st->s_service[svcno] = NULL;
997c2aa98e2SPeter Wemm 			}
9983299c2f1SGregory Neil Shapiro 			(void) fclose(fp);
999c2aa98e2SPeter Wemm 		}
1000c2aa98e2SPeter Wemm 	}
1001c2aa98e2SPeter Wemm 
1002c2aa98e2SPeter Wemm 	/* look up entry in cache */
1003c2aa98e2SPeter Wemm 	st = stab(service, ST_SERVICE, ST_FIND);
1004c2aa98e2SPeter Wemm 	if (st != NULL && st->s_service[0] != NULL)
1005c2aa98e2SPeter Wemm 	{
1006c2aa98e2SPeter Wemm 		/* extract data */
1007c2aa98e2SPeter Wemm 		svcno = 0;
1008c2aa98e2SPeter Wemm 		while (svcno < MAXMAPSTACK)
1009c2aa98e2SPeter Wemm 		{
1010c2aa98e2SPeter Wemm 			maptype[svcno] = st->s_service[svcno];
1011c2aa98e2SPeter Wemm 			if (maptype[svcno++] == NULL)
1012c2aa98e2SPeter Wemm 				break;
1013c2aa98e2SPeter Wemm 		}
10143299c2f1SGregory Neil Shapiro 		errno = save_errno;
1015c2aa98e2SPeter Wemm 		return --svcno;
1016c2aa98e2SPeter Wemm 	}
10173299c2f1SGregory Neil Shapiro #endif /* !defined(_USE_SUN_NSSWITCH_) && !defined(_USE_DEC_SVC_CONF_) */
1018c2aa98e2SPeter Wemm 
1019c2aa98e2SPeter Wemm #if !defined(_USE_SUN_NSSWITCH_)
1020c2aa98e2SPeter Wemm 	/* if the service file doesn't work, use an absolute fallback */
1021c2aa98e2SPeter Wemm # ifdef _USE_DEC_SVC_CONF_
1022c2aa98e2SPeter Wemm   punt:
10233299c2f1SGregory Neil Shapiro # endif /* _USE_DEC_SVC_CONF_ */
1024c2aa98e2SPeter Wemm 	for (svcno = 0; svcno < MAXMAPACTIONS; svcno++)
1025c2aa98e2SPeter Wemm 		mapreturn[svcno] = 0;
1026c2aa98e2SPeter Wemm 	svcno = 0;
1027c2aa98e2SPeter Wemm 	if (strcmp(service, "aliases") == 0)
1028c2aa98e2SPeter Wemm 	{
1029c2aa98e2SPeter Wemm 		maptype[svcno++] = "files";
10303299c2f1SGregory Neil Shapiro # if defined(AUTO_NETINFO_ALIASES) && defined (NETINFO)
10313299c2f1SGregory Neil Shapiro 		maptype[svcno++] = "netinfo";
10323299c2f1SGregory Neil Shapiro # endif /* defined(AUTO_NETINFO_ALIASES) && defined (NETINFO) */
1033c2aa98e2SPeter Wemm # ifdef AUTO_NIS_ALIASES
1034c2aa98e2SPeter Wemm #  ifdef NISPLUS
1035c2aa98e2SPeter Wemm 		maptype[svcno++] = "nisplus";
10363299c2f1SGregory Neil Shapiro #  endif /* NISPLUS */
1037c2aa98e2SPeter Wemm #  ifdef NIS
1038c2aa98e2SPeter Wemm 		maptype[svcno++] = "nis";
10393299c2f1SGregory Neil Shapiro #  endif /* NIS */
10403299c2f1SGregory Neil Shapiro # endif /* AUTO_NIS_ALIASES */
10413299c2f1SGregory Neil Shapiro 		errno = save_errno;
1042c2aa98e2SPeter Wemm 		return svcno;
1043c2aa98e2SPeter Wemm 	}
1044c2aa98e2SPeter Wemm 	if (strcmp(service, "hosts") == 0)
1045c2aa98e2SPeter Wemm 	{
1046c2aa98e2SPeter Wemm # if NAMED_BIND
1047c2aa98e2SPeter Wemm 		maptype[svcno++] = "dns";
10483299c2f1SGregory Neil Shapiro # else /* NAMED_BIND */
1049c2aa98e2SPeter Wemm #  if defined(sun) && !defined(BSD)
1050c2aa98e2SPeter Wemm 		/* SunOS */
1051c2aa98e2SPeter Wemm 		maptype[svcno++] = "nis";
10523299c2f1SGregory Neil Shapiro #  endif /* defined(sun) && !defined(BSD) */
10533299c2f1SGregory Neil Shapiro # endif /* NAMED_BIND */
10543299c2f1SGregory Neil Shapiro # if defined(AUTO_NETINFO_HOSTS) && defined (NETINFO)
10553299c2f1SGregory Neil Shapiro 		maptype[svcno++] = "netinfo";
10563299c2f1SGregory Neil Shapiro # endif /* defined(AUTO_NETINFO_HOSTS) && defined (NETINFO) */
1057c2aa98e2SPeter Wemm 		maptype[svcno++] = "files";
10583299c2f1SGregory Neil Shapiro 		errno = save_errno;
1059c2aa98e2SPeter Wemm 		return svcno;
1060c2aa98e2SPeter Wemm 	}
10613299c2f1SGregory Neil Shapiro 	errno = save_errno;
1062c2aa98e2SPeter Wemm 	return -1;
10633299c2f1SGregory Neil Shapiro #endif /* !defined(_USE_SUN_NSSWITCH_) */
1064c2aa98e2SPeter Wemm }
1065c2aa98e2SPeter Wemm /*
1066c2aa98e2SPeter Wemm **  USERNAME -- return the user id of the logged in user.
1067c2aa98e2SPeter Wemm **
1068c2aa98e2SPeter Wemm **	Parameters:
1069c2aa98e2SPeter Wemm **		none.
1070c2aa98e2SPeter Wemm **
1071c2aa98e2SPeter Wemm **	Returns:
1072c2aa98e2SPeter Wemm **		The login name of the logged in user.
1073c2aa98e2SPeter Wemm **
1074c2aa98e2SPeter Wemm **	Side Effects:
1075c2aa98e2SPeter Wemm **		none.
1076c2aa98e2SPeter Wemm **
1077c2aa98e2SPeter Wemm **	Notes:
1078c2aa98e2SPeter Wemm **		The return value is statically allocated.
1079c2aa98e2SPeter Wemm */
1080c2aa98e2SPeter Wemm 
1081c2aa98e2SPeter Wemm char *
1082c2aa98e2SPeter Wemm username()
1083c2aa98e2SPeter Wemm {
1084c2aa98e2SPeter Wemm 	static char *myname = NULL;
1085c2aa98e2SPeter Wemm 	extern char *getlogin();
1086c2aa98e2SPeter Wemm 	register struct passwd *pw;
1087c2aa98e2SPeter Wemm 
1088c2aa98e2SPeter Wemm 	/* cache the result */
1089c2aa98e2SPeter Wemm 	if (myname == NULL)
1090c2aa98e2SPeter Wemm 	{
1091c2aa98e2SPeter Wemm 		myname = getlogin();
1092c2aa98e2SPeter Wemm 		if (myname == NULL || myname[0] == '\0')
1093c2aa98e2SPeter Wemm 		{
1094c2aa98e2SPeter Wemm 			pw = sm_getpwuid(RealUid);
1095c2aa98e2SPeter Wemm 			if (pw != NULL)
1096c2aa98e2SPeter Wemm 				myname = newstr(pw->pw_name);
1097c2aa98e2SPeter Wemm 		}
1098c2aa98e2SPeter Wemm 		else
1099c2aa98e2SPeter Wemm 		{
1100c2aa98e2SPeter Wemm 			uid_t uid = RealUid;
1101c2aa98e2SPeter Wemm 
1102c2aa98e2SPeter Wemm 			myname = newstr(myname);
1103c2aa98e2SPeter Wemm 			if ((pw = sm_getpwnam(myname)) == NULL ||
1104c2aa98e2SPeter Wemm 			      (uid != 0 && uid != pw->pw_uid))
1105c2aa98e2SPeter Wemm 			{
1106c2aa98e2SPeter Wemm 				pw = sm_getpwuid(uid);
1107c2aa98e2SPeter Wemm 				if (pw != NULL)
1108c2aa98e2SPeter Wemm 					myname = newstr(pw->pw_name);
1109c2aa98e2SPeter Wemm 			}
1110c2aa98e2SPeter Wemm 		}
1111c2aa98e2SPeter Wemm 		if (myname == NULL || myname[0] == '\0')
1112c2aa98e2SPeter Wemm 		{
11133299c2f1SGregory Neil Shapiro 			syserr("554 5.3.0 Who are you?");
1114c2aa98e2SPeter Wemm 			myname = "postmaster";
1115c2aa98e2SPeter Wemm 		}
1116c2aa98e2SPeter Wemm 	}
1117c2aa98e2SPeter Wemm 
11183299c2f1SGregory Neil Shapiro 	return myname;
1119c2aa98e2SPeter Wemm }
1120c2aa98e2SPeter Wemm /*
1121c2aa98e2SPeter Wemm **  TTYPATH -- Get the path of the user's tty
1122c2aa98e2SPeter Wemm **
1123c2aa98e2SPeter Wemm **	Returns the pathname of the user's tty.  Returns NULL if
1124c2aa98e2SPeter Wemm **	the user is not logged in or if s/he has write permission
1125c2aa98e2SPeter Wemm **	denied.
1126c2aa98e2SPeter Wemm **
1127c2aa98e2SPeter Wemm **	Parameters:
1128c2aa98e2SPeter Wemm **		none
1129c2aa98e2SPeter Wemm **
1130c2aa98e2SPeter Wemm **	Returns:
1131c2aa98e2SPeter Wemm **		pathname of the user's tty.
1132c2aa98e2SPeter Wemm **		NULL if not logged in or write permission denied.
1133c2aa98e2SPeter Wemm **
1134c2aa98e2SPeter Wemm **	Side Effects:
1135c2aa98e2SPeter Wemm **		none.
1136c2aa98e2SPeter Wemm **
1137c2aa98e2SPeter Wemm **	WARNING:
1138c2aa98e2SPeter Wemm **		Return value is in a local buffer.
1139c2aa98e2SPeter Wemm **
1140c2aa98e2SPeter Wemm **	Called By:
1141c2aa98e2SPeter Wemm **		savemail
1142c2aa98e2SPeter Wemm */
1143c2aa98e2SPeter Wemm 
1144c2aa98e2SPeter Wemm char *
1145c2aa98e2SPeter Wemm ttypath()
1146c2aa98e2SPeter Wemm {
1147c2aa98e2SPeter Wemm 	struct stat stbuf;
1148c2aa98e2SPeter Wemm 	register char *pathn;
1149c2aa98e2SPeter Wemm 	extern char *ttyname();
1150c2aa98e2SPeter Wemm 	extern char *getlogin();
1151c2aa98e2SPeter Wemm 
1152c2aa98e2SPeter Wemm 	/* compute the pathname of the controlling tty */
1153c2aa98e2SPeter Wemm 	if ((pathn = ttyname(2)) == NULL && (pathn = ttyname(1)) == NULL &&
1154c2aa98e2SPeter Wemm 	    (pathn = ttyname(0)) == NULL)
1155c2aa98e2SPeter Wemm 	{
1156c2aa98e2SPeter Wemm 		errno = 0;
11573299c2f1SGregory Neil Shapiro 		return NULL;
1158c2aa98e2SPeter Wemm 	}
1159c2aa98e2SPeter Wemm 
1160c2aa98e2SPeter Wemm 	/* see if we have write permission */
1161c2aa98e2SPeter Wemm 	if (stat(pathn, &stbuf) < 0 || !bitset(S_IWOTH, stbuf.st_mode))
1162c2aa98e2SPeter Wemm 	{
1163c2aa98e2SPeter Wemm 		errno = 0;
11643299c2f1SGregory Neil Shapiro 		return NULL;
1165c2aa98e2SPeter Wemm 	}
1166c2aa98e2SPeter Wemm 
1167c2aa98e2SPeter Wemm 	/* see if the user is logged in */
1168c2aa98e2SPeter Wemm 	if (getlogin() == NULL)
11693299c2f1SGregory Neil Shapiro 		return NULL;
1170c2aa98e2SPeter Wemm 
1171c2aa98e2SPeter Wemm 	/* looks good */
11723299c2f1SGregory Neil Shapiro 	return pathn;
1173c2aa98e2SPeter Wemm }
1174c2aa98e2SPeter Wemm /*
1175c2aa98e2SPeter Wemm **  CHECKCOMPAT -- check for From and To person compatible.
1176c2aa98e2SPeter Wemm **
1177c2aa98e2SPeter Wemm **	This routine can be supplied on a per-installation basis
1178c2aa98e2SPeter Wemm **	to determine whether a person is allowed to send a message.
1179c2aa98e2SPeter Wemm **	This allows restriction of certain types of internet
1180c2aa98e2SPeter Wemm **	forwarding or registration of users.
1181c2aa98e2SPeter Wemm **
1182c2aa98e2SPeter Wemm **	If the hosts are found to be incompatible, an error
1183c2aa98e2SPeter Wemm **	message should be given using "usrerr" and an EX_ code
1184c2aa98e2SPeter Wemm **	should be returned.  You can also set to->q_status to
1185c2aa98e2SPeter Wemm **	a DSN-style status code.
1186c2aa98e2SPeter Wemm **
1187c2aa98e2SPeter Wemm **	EF_NO_BODY_RETN can be set in e->e_flags to suppress the
1188c2aa98e2SPeter Wemm **	body during the return-to-sender function; this should be done
1189c2aa98e2SPeter Wemm **	on huge messages.  This bit may already be set by the ESMTP
1190c2aa98e2SPeter Wemm **	protocol.
1191c2aa98e2SPeter Wemm **
1192c2aa98e2SPeter Wemm **	Parameters:
1193c2aa98e2SPeter Wemm **		to -- the person being sent to.
1194c2aa98e2SPeter Wemm **
1195c2aa98e2SPeter Wemm **	Returns:
1196c2aa98e2SPeter Wemm **		an exit status
1197c2aa98e2SPeter Wemm **
1198c2aa98e2SPeter Wemm **	Side Effects:
1199c2aa98e2SPeter Wemm **		none (unless you include the usrerr stuff)
1200c2aa98e2SPeter Wemm */
1201c2aa98e2SPeter Wemm 
1202c2aa98e2SPeter Wemm int
1203c2aa98e2SPeter Wemm checkcompat(to, e)
1204c2aa98e2SPeter Wemm 	register ADDRESS *to;
1205c2aa98e2SPeter Wemm 	register ENVELOPE *e;
1206c2aa98e2SPeter Wemm {
1207c2aa98e2SPeter Wemm 	if (tTd(49, 1))
12083299c2f1SGregory Neil Shapiro 		dprintf("checkcompat(to=%s, from=%s)\n",
1209c2aa98e2SPeter Wemm 			to->q_paddr, e->e_from.q_paddr);
1210c2aa98e2SPeter Wemm 
1211c2aa98e2SPeter Wemm #ifdef EXAMPLE_CODE
1212c2aa98e2SPeter Wemm 	/* this code is intended as an example only */
1213c2aa98e2SPeter Wemm 	register STAB *s;
1214c2aa98e2SPeter Wemm 
1215c2aa98e2SPeter Wemm 	s = stab("arpa", ST_MAILER, ST_FIND);
1216c2aa98e2SPeter Wemm 	if (s != NULL && strcmp(e->e_from.q_mailer->m_name, "local") != 0 &&
1217c2aa98e2SPeter Wemm 	    to->q_mailer == s->s_mailer)
1218c2aa98e2SPeter Wemm 	{
1219c2aa98e2SPeter Wemm 		usrerr("553 No ARPA mail through this machine: see your system administration");
12203299c2f1SGregory Neil Shapiro 		/* e->e_flags |= EF_NO_BODY_RETN; to suppress body on return */
1221c2aa98e2SPeter Wemm 		to->q_status = "5.7.1";
12223299c2f1SGregory Neil Shapiro 		return EX_UNAVAILABLE;
1223c2aa98e2SPeter Wemm 	}
1224c2aa98e2SPeter Wemm #endif /* EXAMPLE_CODE */
12253299c2f1SGregory Neil Shapiro 	return EX_OK;
1226c2aa98e2SPeter Wemm }
1227c2aa98e2SPeter Wemm /*
1228c2aa98e2SPeter Wemm **  SETSIGNAL -- set a signal handler
1229c2aa98e2SPeter Wemm **
1230c2aa98e2SPeter Wemm **	This is essentially old BSD "signal(3)".
1231c2aa98e2SPeter Wemm */
1232c2aa98e2SPeter Wemm 
1233c2aa98e2SPeter Wemm sigfunc_t
1234c2aa98e2SPeter Wemm setsignal(sig, handler)
1235c2aa98e2SPeter Wemm 	int sig;
1236c2aa98e2SPeter Wemm 	sigfunc_t handler;
1237c2aa98e2SPeter Wemm {
12383299c2f1SGregory Neil Shapiro 	/*
12393299c2f1SGregory Neil Shapiro 	**  First, try for modern signal calls
12403299c2f1SGregory Neil Shapiro 	**  and restartable syscalls
12413299c2f1SGregory Neil Shapiro 	*/
12423299c2f1SGregory Neil Shapiro 
12433299c2f1SGregory Neil Shapiro # ifdef SA_RESTART
1244c2aa98e2SPeter Wemm 	struct sigaction n, o;
1245c2aa98e2SPeter Wemm 
12463299c2f1SGregory Neil Shapiro 	memset(&n, '\0', sizeof n);
1247c2aa98e2SPeter Wemm #  if USE_SA_SIGACTION
1248c2aa98e2SPeter Wemm 	n.sa_sigaction = (void(*)(int, siginfo_t *, void *)) handler;
1249c2aa98e2SPeter Wemm 	n.sa_flags = SA_RESTART|SA_SIGINFO;
12503299c2f1SGregory Neil Shapiro #  else /* USE_SA_SIGACTION */
1251c2aa98e2SPeter Wemm 	n.sa_handler = handler;
1252c2aa98e2SPeter Wemm 	n.sa_flags = SA_RESTART;
12533299c2f1SGregory Neil Shapiro #  endif /* USE_SA_SIGACTION */
1254c2aa98e2SPeter Wemm 	if (sigaction(sig, &n, &o) < 0)
1255c2aa98e2SPeter Wemm 		return SIG_ERR;
1256c2aa98e2SPeter Wemm 	return o.sa_handler;
12573299c2f1SGregory Neil Shapiro # else /* SA_RESTART */
12583299c2f1SGregory Neil Shapiro 
12593299c2f1SGregory Neil Shapiro 	/*
12603299c2f1SGregory Neil Shapiro 	**  Else check for SYS5SIGNALS or
12613299c2f1SGregory Neil Shapiro 	**  BSD4_3 signals
12623299c2f1SGregory Neil Shapiro 	*/
12633299c2f1SGregory Neil Shapiro 
12643299c2f1SGregory Neil Shapiro #  if defined(SYS5SIGNALS) || defined(BSD4_3)
12653299c2f1SGregory Neil Shapiro #   ifdef BSD4_3
12663299c2f1SGregory Neil Shapiro 	return signal(sig, handler);
12673299c2f1SGregory Neil Shapiro #   else /* BSD4_3 */
12683299c2f1SGregory Neil Shapiro 	return sigset(sig, handler);
12693299c2f1SGregory Neil Shapiro #   endif /* BSD4_3 */
12703299c2f1SGregory Neil Shapiro #  else /* defined(SYS5SIGNALS) || defined(BSD4_3) */
12713299c2f1SGregory Neil Shapiro 
12723299c2f1SGregory Neil Shapiro 	/*
12733299c2f1SGregory Neil Shapiro 	**  Finally, if nothing else is available,
12743299c2f1SGregory Neil Shapiro 	**  go for a default
12753299c2f1SGregory Neil Shapiro 	*/
12763299c2f1SGregory Neil Shapiro 
12773299c2f1SGregory Neil Shapiro 	struct sigaction n, o;
12783299c2f1SGregory Neil Shapiro 
12793299c2f1SGregory Neil Shapiro 	memset(&n, '\0', sizeof n);
12803299c2f1SGregory Neil Shapiro 	n.sa_handler = handler;
12813299c2f1SGregory Neil Shapiro 	if (sigaction(sig, &n, &o) < 0)
12823299c2f1SGregory Neil Shapiro 		return SIG_ERR;
12833299c2f1SGregory Neil Shapiro 	return o.sa_handler;
12843299c2f1SGregory Neil Shapiro #  endif /* defined(SYS5SIGNALS) || defined(BSD4_3) */
12853299c2f1SGregory Neil Shapiro # endif /* SA_RESTART */
1286c2aa98e2SPeter Wemm }
1287c2aa98e2SPeter Wemm /*
1288c2aa98e2SPeter Wemm **  BLOCKSIGNAL -- hold a signal to prevent delivery
1289c2aa98e2SPeter Wemm **
1290c2aa98e2SPeter Wemm **	Parameters:
1291c2aa98e2SPeter Wemm **		sig -- the signal to block.
1292c2aa98e2SPeter Wemm **
1293c2aa98e2SPeter Wemm **	Returns:
1294c2aa98e2SPeter Wemm **		1 signal was previously blocked
1295c2aa98e2SPeter Wemm **		0 signal was not previously blocked
1296c2aa98e2SPeter Wemm **		-1 on failure.
1297c2aa98e2SPeter Wemm */
1298c2aa98e2SPeter Wemm 
1299c2aa98e2SPeter Wemm int
1300c2aa98e2SPeter Wemm blocksignal(sig)
1301c2aa98e2SPeter Wemm 	int sig;
1302c2aa98e2SPeter Wemm {
1303c2aa98e2SPeter Wemm # ifdef BSD4_3
1304c2aa98e2SPeter Wemm #  ifndef sigmask
1305c2aa98e2SPeter Wemm #   define sigmask(s)	(1 << ((s) - 1))
13063299c2f1SGregory Neil Shapiro #  endif /* ! sigmask */
1307c2aa98e2SPeter Wemm 	return (sigblock(sigmask(sig)) & sigmask(sig)) != 0;
13083299c2f1SGregory Neil Shapiro # else /* BSD4_3 */
1309c2aa98e2SPeter Wemm #  ifdef ALTOS_SYSTEM_V
1310c2aa98e2SPeter Wemm 	sigfunc_t handler;
1311c2aa98e2SPeter Wemm 
1312c2aa98e2SPeter Wemm 	handler = sigset(sig, SIG_HOLD);
1313c2aa98e2SPeter Wemm 	if (handler == SIG_ERR)
1314c2aa98e2SPeter Wemm 		return -1;
1315c2aa98e2SPeter Wemm 	else
1316c2aa98e2SPeter Wemm 		return handler == SIG_HOLD;
13173299c2f1SGregory Neil Shapiro #  else /* ALTOS_SYSTEM_V */
1318c2aa98e2SPeter Wemm 	sigset_t sset, oset;
1319c2aa98e2SPeter Wemm 
13203299c2f1SGregory Neil Shapiro 	(void) sigemptyset(&sset);
13213299c2f1SGregory Neil Shapiro 	(void) sigaddset(&sset, sig);
1322c2aa98e2SPeter Wemm 	if (sigprocmask(SIG_BLOCK, &sset, &oset) < 0)
1323c2aa98e2SPeter Wemm 		return -1;
1324c2aa98e2SPeter Wemm 	else
1325c2aa98e2SPeter Wemm 		return sigismember(&oset, sig);
13263299c2f1SGregory Neil Shapiro #  endif /* ALTOS_SYSTEM_V */
13273299c2f1SGregory Neil Shapiro # endif /* BSD4_3 */
1328c2aa98e2SPeter Wemm }
1329c2aa98e2SPeter Wemm /*
1330c2aa98e2SPeter Wemm **  RELEASESIGNAL -- release a held signal
1331c2aa98e2SPeter Wemm **
1332c2aa98e2SPeter Wemm **	Parameters:
1333c2aa98e2SPeter Wemm **		sig -- the signal to release.
1334c2aa98e2SPeter Wemm **
1335c2aa98e2SPeter Wemm **	Returns:
1336c2aa98e2SPeter Wemm **		1 signal was previously blocked
1337c2aa98e2SPeter Wemm **		0 signal was not previously blocked
1338c2aa98e2SPeter Wemm **		-1 on failure.
1339c2aa98e2SPeter Wemm */
1340c2aa98e2SPeter Wemm 
1341c2aa98e2SPeter Wemm int
1342c2aa98e2SPeter Wemm releasesignal(sig)
1343c2aa98e2SPeter Wemm 	int sig;
1344c2aa98e2SPeter Wemm {
1345c2aa98e2SPeter Wemm # ifdef BSD4_3
1346c2aa98e2SPeter Wemm 	return (sigsetmask(sigblock(0) & ~sigmask(sig)) & sigmask(sig)) != 0;
13473299c2f1SGregory Neil Shapiro # else /* BSD4_3 */
1348c2aa98e2SPeter Wemm #  ifdef ALTOS_SYSTEM_V
1349c2aa98e2SPeter Wemm 	sigfunc_t handler;
1350c2aa98e2SPeter Wemm 
1351c2aa98e2SPeter Wemm 	handler = sigset(sig, SIG_HOLD);
1352c2aa98e2SPeter Wemm 	if (sigrelse(sig) < 0)
1353c2aa98e2SPeter Wemm 		return -1;
1354c2aa98e2SPeter Wemm 	else
1355c2aa98e2SPeter Wemm 		return handler == SIG_HOLD;
13563299c2f1SGregory Neil Shapiro #  else /* ALTOS_SYSTEM_V */
1357c2aa98e2SPeter Wemm 	sigset_t sset, oset;
1358c2aa98e2SPeter Wemm 
13593299c2f1SGregory Neil Shapiro 	(void) sigemptyset(&sset);
13603299c2f1SGregory Neil Shapiro 	(void) sigaddset(&sset, sig);
1361c2aa98e2SPeter Wemm 	if (sigprocmask(SIG_UNBLOCK, &sset, &oset) < 0)
1362c2aa98e2SPeter Wemm 		return -1;
1363c2aa98e2SPeter Wemm 	else
1364c2aa98e2SPeter Wemm 		return sigismember(&oset, sig);
13653299c2f1SGregory Neil Shapiro #  endif /* ALTOS_SYSTEM_V */
13663299c2f1SGregory Neil Shapiro # endif /* BSD4_3 */
1367c2aa98e2SPeter Wemm }
1368c2aa98e2SPeter Wemm /*
1369c2aa98e2SPeter Wemm **  HOLDSIGS -- arrange to hold all signals
1370c2aa98e2SPeter Wemm **
1371c2aa98e2SPeter Wemm **	Parameters:
1372c2aa98e2SPeter Wemm **		none.
1373c2aa98e2SPeter Wemm **
1374c2aa98e2SPeter Wemm **	Returns:
1375c2aa98e2SPeter Wemm **		none.
1376c2aa98e2SPeter Wemm **
1377c2aa98e2SPeter Wemm **	Side Effects:
1378c2aa98e2SPeter Wemm **		Arranges that signals are held.
1379c2aa98e2SPeter Wemm */
1380c2aa98e2SPeter Wemm 
1381c2aa98e2SPeter Wemm void
1382c2aa98e2SPeter Wemm holdsigs()
1383c2aa98e2SPeter Wemm {
1384c2aa98e2SPeter Wemm }
1385c2aa98e2SPeter Wemm /*
1386c2aa98e2SPeter Wemm **  RLSESIGS -- arrange to release all signals
1387c2aa98e2SPeter Wemm **
1388c2aa98e2SPeter Wemm **	This undoes the effect of holdsigs.
1389c2aa98e2SPeter Wemm **
1390c2aa98e2SPeter Wemm **	Parameters:
1391c2aa98e2SPeter Wemm **		none.
1392c2aa98e2SPeter Wemm **
1393c2aa98e2SPeter Wemm **	Returns:
1394c2aa98e2SPeter Wemm **		none.
1395c2aa98e2SPeter Wemm **
1396c2aa98e2SPeter Wemm **	Side Effects:
1397c2aa98e2SPeter Wemm **		Arranges that signals are released.
1398c2aa98e2SPeter Wemm */
1399c2aa98e2SPeter Wemm 
1400c2aa98e2SPeter Wemm void
1401c2aa98e2SPeter Wemm rlsesigs()
1402c2aa98e2SPeter Wemm {
1403c2aa98e2SPeter Wemm }
1404c2aa98e2SPeter Wemm /*
1405c2aa98e2SPeter Wemm **  INIT_MD -- do machine dependent initializations
1406c2aa98e2SPeter Wemm **
1407c2aa98e2SPeter Wemm **	Systems that have global modes that should be set should do
1408c2aa98e2SPeter Wemm **	them here rather than in main.
1409c2aa98e2SPeter Wemm */
1410c2aa98e2SPeter Wemm 
1411c2aa98e2SPeter Wemm #ifdef _AUX_SOURCE
1412c2aa98e2SPeter Wemm # include <compat.h>
14133299c2f1SGregory Neil Shapiro #endif /* _AUX_SOURCE */
1414c2aa98e2SPeter Wemm 
1415c2aa98e2SPeter Wemm #if SHARE_V1
1416c2aa98e2SPeter Wemm # include <shares.h>
14173299c2f1SGregory Neil Shapiro #endif /* SHARE_V1 */
1418c2aa98e2SPeter Wemm 
1419c2aa98e2SPeter Wemm void
1420c2aa98e2SPeter Wemm init_md(argc, argv)
1421c2aa98e2SPeter Wemm 	int argc;
1422c2aa98e2SPeter Wemm 	char **argv;
1423c2aa98e2SPeter Wemm {
1424c2aa98e2SPeter Wemm #ifdef _AUX_SOURCE
1425c2aa98e2SPeter Wemm 	setcompat(getcompat() | COMPAT_BSDPROT);
14263299c2f1SGregory Neil Shapiro #endif /* _AUX_SOURCE */
1427c2aa98e2SPeter Wemm 
1428c2aa98e2SPeter Wemm #ifdef SUN_EXTENSIONS
1429c2aa98e2SPeter Wemm 	init_md_sun();
14303299c2f1SGregory Neil Shapiro #endif /* SUN_EXTENSIONS */
1431c2aa98e2SPeter Wemm 
1432c2aa98e2SPeter Wemm #if _CONVEX_SOURCE
1433c2aa98e2SPeter Wemm 	/* keep gethostby*() from stripping the local domain name */
1434c2aa98e2SPeter Wemm 	set_domain_trim_off();
14353299c2f1SGregory Neil Shapiro #endif /* _CONVEX_SOURCE */
1436c2aa98e2SPeter Wemm #ifdef __QNX__
1437c2aa98e2SPeter Wemm 	/*
1438c2aa98e2SPeter Wemm 	**  Due to QNX's network distributed nature, you can target a tcpip
1439c2aa98e2SPeter Wemm 	**  stack on a different node in the qnx network; this patch lets
1440c2aa98e2SPeter Wemm 	**  this feature work.  The __sock_locate() must be done before the
1441c2aa98e2SPeter Wemm 	**  environment is clear.
1442c2aa98e2SPeter Wemm 	*/
1443c2aa98e2SPeter Wemm 	__sock_locate();
14443299c2f1SGregory Neil Shapiro #endif /* __QNX__ */
1445c2aa98e2SPeter Wemm #if SECUREWARE || defined(_SCO_unix_)
1446c2aa98e2SPeter Wemm 	set_auth_parameters(argc, argv);
1447c2aa98e2SPeter Wemm 
1448c2aa98e2SPeter Wemm # ifdef _SCO_unix_
1449c2aa98e2SPeter Wemm 	/*
1450c2aa98e2SPeter Wemm 	**  This is required for highest security levels (the kernel
1451c2aa98e2SPeter Wemm 	**  won't let it call set*uid() or run setuid binaries without
1452c2aa98e2SPeter Wemm 	**  it).  It may be necessary on other SECUREWARE systems.
1453c2aa98e2SPeter Wemm 	*/
1454c2aa98e2SPeter Wemm 
1455c2aa98e2SPeter Wemm 	if (getluid() == -1)
1456c2aa98e2SPeter Wemm 		setluid(0);
14573299c2f1SGregory Neil Shapiro # endif /* _SCO_unix_ */
14583299c2f1SGregory Neil Shapiro #endif /* SECUREWARE || defined(_SCO_unix_) */
14593299c2f1SGregory Neil Shapiro 
1460c2aa98e2SPeter Wemm 
1461c2aa98e2SPeter Wemm #ifdef VENDOR_DEFAULT
1462c2aa98e2SPeter Wemm 	VendorCode = VENDOR_DEFAULT;
14633299c2f1SGregory Neil Shapiro #else /* VENDOR_DEFAULT */
1464c2aa98e2SPeter Wemm 	VendorCode = VENDOR_BERKELEY;
14653299c2f1SGregory Neil Shapiro #endif /* VENDOR_DEFAULT */
1466c2aa98e2SPeter Wemm }
1467c2aa98e2SPeter Wemm /*
1468c2aa98e2SPeter Wemm **  INIT_VENDOR_MACROS -- vendor-dependent macro initializations
1469c2aa98e2SPeter Wemm **
1470c2aa98e2SPeter Wemm **	Called once, on startup.
1471c2aa98e2SPeter Wemm **
1472c2aa98e2SPeter Wemm **	Parameters:
1473c2aa98e2SPeter Wemm **		e -- the global envelope.
1474c2aa98e2SPeter Wemm **
1475c2aa98e2SPeter Wemm **	Returns:
1476c2aa98e2SPeter Wemm **		none.
1477c2aa98e2SPeter Wemm **
1478c2aa98e2SPeter Wemm **	Side Effects:
1479c2aa98e2SPeter Wemm **		vendor-dependent.
1480c2aa98e2SPeter Wemm */
1481c2aa98e2SPeter Wemm 
1482c2aa98e2SPeter Wemm void
1483c2aa98e2SPeter Wemm init_vendor_macros(e)
1484c2aa98e2SPeter Wemm 	register ENVELOPE *e;
1485c2aa98e2SPeter Wemm {
1486c2aa98e2SPeter Wemm }
1487c2aa98e2SPeter Wemm /*
1488c2aa98e2SPeter Wemm **  GETLA -- get the current load average
1489c2aa98e2SPeter Wemm **
1490c2aa98e2SPeter Wemm **	This code stolen from la.c.
1491c2aa98e2SPeter Wemm **
1492c2aa98e2SPeter Wemm **	Parameters:
1493c2aa98e2SPeter Wemm **		none.
1494c2aa98e2SPeter Wemm **
1495c2aa98e2SPeter Wemm **	Returns:
1496c2aa98e2SPeter Wemm **		The current load average as an integer.
1497c2aa98e2SPeter Wemm **
1498c2aa98e2SPeter Wemm **	Side Effects:
1499c2aa98e2SPeter Wemm **		none.
1500c2aa98e2SPeter Wemm */
1501c2aa98e2SPeter Wemm 
1502c2aa98e2SPeter Wemm /* try to guess what style of load average we have */
1503c2aa98e2SPeter Wemm #define LA_ZERO		1	/* always return load average as zero */
1504c2aa98e2SPeter Wemm #define LA_INT		2	/* read kmem for avenrun; interpret as long */
1505c2aa98e2SPeter Wemm #define LA_FLOAT	3	/* read kmem for avenrun; interpret as float */
1506c2aa98e2SPeter Wemm #define LA_SUBR		4	/* call getloadavg */
1507c2aa98e2SPeter Wemm #define LA_MACH		5	/* MACH load averages (as on NeXT boxes) */
1508c2aa98e2SPeter Wemm #define LA_SHORT	6	/* read kmem for avenrun; interpret as short */
1509c2aa98e2SPeter Wemm #define LA_PROCSTR	7	/* read string ("1.17") from /proc/loadavg */
1510c2aa98e2SPeter Wemm #define LA_READKSYM	8	/* SVR4: use MIOC_READKSYM ioctl call */
1511c2aa98e2SPeter Wemm #define LA_DGUX		9	/* special DGUX implementation */
1512c2aa98e2SPeter Wemm #define LA_HPUX		10	/* special HPUX implementation */
1513c2aa98e2SPeter Wemm #define LA_IRIX6	11	/* special IRIX 6.2 implementation */
1514c2aa98e2SPeter Wemm #define LA_KSTAT	12	/* special Solaris kstat(3k) implementation */
1515c2aa98e2SPeter Wemm #define LA_DEVSHORT	13	/* read short from a device */
1516c2aa98e2SPeter Wemm #define LA_ALPHAOSF	14	/* Digital UNIX (OSF/1 on Alpha) table() call */
1517c2aa98e2SPeter Wemm 
1518c2aa98e2SPeter Wemm /* do guesses based on general OS type */
1519c2aa98e2SPeter Wemm #ifndef LA_TYPE
1520c2aa98e2SPeter Wemm # define LA_TYPE	LA_ZERO
15213299c2f1SGregory Neil Shapiro #endif /* ! LA_TYPE */
1522c2aa98e2SPeter Wemm 
1523c2aa98e2SPeter Wemm #ifndef FSHIFT
1524c2aa98e2SPeter Wemm # if defined(unixpc)
1525c2aa98e2SPeter Wemm #  define FSHIFT	5
15263299c2f1SGregory Neil Shapiro # endif /* defined(unixpc) */
1527c2aa98e2SPeter Wemm 
1528c2aa98e2SPeter Wemm # if defined(__alpha) || defined(IRIX)
1529c2aa98e2SPeter Wemm #  define FSHIFT	10
15303299c2f1SGregory Neil Shapiro # endif /* defined(__alpha) || defined(IRIX) */
1531c2aa98e2SPeter Wemm 
15323299c2f1SGregory Neil Shapiro #endif /* ! FSHIFT */
1533c2aa98e2SPeter Wemm 
1534c2aa98e2SPeter Wemm #ifndef FSHIFT
1535c2aa98e2SPeter Wemm # define FSHIFT		8
15363299c2f1SGregory Neil Shapiro #endif /* ! FSHIFT */
1537c2aa98e2SPeter Wemm 
1538c2aa98e2SPeter Wemm #ifndef FSCALE
1539c2aa98e2SPeter Wemm # define FSCALE		(1 << FSHIFT)
15403299c2f1SGregory Neil Shapiro #endif /* ! FSCALE */
1541c2aa98e2SPeter Wemm 
1542c2aa98e2SPeter Wemm #ifndef LA_AVENRUN
1543c2aa98e2SPeter Wemm # ifdef SYSTEM5
1544c2aa98e2SPeter Wemm #  define LA_AVENRUN	"avenrun"
15453299c2f1SGregory Neil Shapiro # else /* SYSTEM5 */
1546c2aa98e2SPeter Wemm #  define LA_AVENRUN	"_avenrun"
15473299c2f1SGregory Neil Shapiro # endif /* SYSTEM5 */
15483299c2f1SGregory Neil Shapiro #endif /* ! LA_AVENRUN */
1549c2aa98e2SPeter Wemm 
1550c2aa98e2SPeter Wemm /* _PATH_KMEM should be defined in <paths.h> */
1551c2aa98e2SPeter Wemm #ifndef _PATH_KMEM
1552c2aa98e2SPeter Wemm # define _PATH_KMEM	"/dev/kmem"
15533299c2f1SGregory Neil Shapiro #endif /* ! _PATH_KMEM */
1554c2aa98e2SPeter Wemm 
1555c2aa98e2SPeter Wemm #if (LA_TYPE == LA_INT) || (LA_TYPE == LA_FLOAT) || (LA_TYPE == LA_SHORT)
1556c2aa98e2SPeter Wemm 
1557c2aa98e2SPeter Wemm # include <nlist.h>
1558c2aa98e2SPeter Wemm 
1559c2aa98e2SPeter Wemm /* _PATH_UNIX should be defined in <paths.h> */
1560c2aa98e2SPeter Wemm # ifndef _PATH_UNIX
1561c2aa98e2SPeter Wemm #  if defined(SYSTEM5)
1562c2aa98e2SPeter Wemm #   define _PATH_UNIX	"/unix"
15633299c2f1SGregory Neil Shapiro #  else /* defined(SYSTEM5) */
1564c2aa98e2SPeter Wemm #   define _PATH_UNIX	"/vmunix"
15653299c2f1SGregory Neil Shapiro #  endif /* defined(SYSTEM5) */
15663299c2f1SGregory Neil Shapiro # endif /* ! _PATH_UNIX */
1567c2aa98e2SPeter Wemm 
1568c2aa98e2SPeter Wemm # ifdef _AUX_SOURCE
1569c2aa98e2SPeter Wemm struct nlist	Nl[2];
15703299c2f1SGregory Neil Shapiro # else /* _AUX_SOURCE */
1571c2aa98e2SPeter Wemm struct nlist	Nl[] =
1572c2aa98e2SPeter Wemm {
1573c2aa98e2SPeter Wemm 	{ LA_AVENRUN },
1574c2aa98e2SPeter Wemm 	{ 0 },
1575c2aa98e2SPeter Wemm };
15763299c2f1SGregory Neil Shapiro # endif /* _AUX_SOURCE */
1577c2aa98e2SPeter Wemm # define X_AVENRUN	0
1578c2aa98e2SPeter Wemm 
15793299c2f1SGregory Neil Shapiro static int
1580c2aa98e2SPeter Wemm getla()
1581c2aa98e2SPeter Wemm {
1582c2aa98e2SPeter Wemm 	static int kmem = -1;
1583c2aa98e2SPeter Wemm # if LA_TYPE == LA_INT
1584c2aa98e2SPeter Wemm 	long avenrun[3];
15853299c2f1SGregory Neil Shapiro # else /* LA_TYPE == LA_INT */
1586c2aa98e2SPeter Wemm #  if LA_TYPE == LA_SHORT
1587c2aa98e2SPeter Wemm 	short avenrun[3];
15883299c2f1SGregory Neil Shapiro #  else /* LA_TYPE == LA_SHORT */
1589c2aa98e2SPeter Wemm 	double avenrun[3];
15903299c2f1SGregory Neil Shapiro #  endif /* LA_TYPE == LA_SHORT */
15913299c2f1SGregory Neil Shapiro # endif /* LA_TYPE == LA_INT */
1592c2aa98e2SPeter Wemm 	extern int errno;
1593c2aa98e2SPeter Wemm 	extern off_t lseek();
1594c2aa98e2SPeter Wemm 
1595c2aa98e2SPeter Wemm 	if (kmem < 0)
1596c2aa98e2SPeter Wemm 	{
1597c2aa98e2SPeter Wemm # ifdef _AUX_SOURCE
15983299c2f1SGregory Neil Shapiro 		(void) strlcpy(Nl[X_AVENRUN].n_name, LA_AVENRUN,
15993299c2f1SGregory Neil Shapiro 			       sizeof Nl[X_AVENRUN].n_name);
1600c2aa98e2SPeter Wemm 		Nl[1].n_name[0] = '\0';
16013299c2f1SGregory Neil Shapiro # endif /* _AUX_SOURCE */
1602c2aa98e2SPeter Wemm 
1603c2aa98e2SPeter Wemm # if defined(_AIX3) || defined(_AIX4)
1604c2aa98e2SPeter Wemm 		if (knlist(Nl, 1, sizeof Nl[0]) < 0)
16053299c2f1SGregory Neil Shapiro # else /* defined(_AIX3) || defined(_AIX4) */
1606c2aa98e2SPeter Wemm 		if (nlist(_PATH_UNIX, Nl) < 0)
16073299c2f1SGregory Neil Shapiro # endif /* defined(_AIX3) || defined(_AIX4) */
1608c2aa98e2SPeter Wemm 		{
1609c2aa98e2SPeter Wemm 			if (tTd(3, 1))
16103299c2f1SGregory Neil Shapiro 				dprintf("getla: nlist(%s): %s\n", _PATH_UNIX,
1611c2aa98e2SPeter Wemm 					errstring(errno));
16123299c2f1SGregory Neil Shapiro 			return -1;
1613c2aa98e2SPeter Wemm 		}
1614c2aa98e2SPeter Wemm 		if (Nl[X_AVENRUN].n_value == 0)
1615c2aa98e2SPeter Wemm 		{
1616c2aa98e2SPeter Wemm 			if (tTd(3, 1))
16173299c2f1SGregory Neil Shapiro 				dprintf("getla: nlist(%s, %s) ==> 0\n",
1618c2aa98e2SPeter Wemm 					_PATH_UNIX, LA_AVENRUN);
16193299c2f1SGregory Neil Shapiro 			return -1;
1620c2aa98e2SPeter Wemm 		}
1621c2aa98e2SPeter Wemm # ifdef NAMELISTMASK
1622c2aa98e2SPeter Wemm 		Nl[X_AVENRUN].n_value &= NAMELISTMASK;
16233299c2f1SGregory Neil Shapiro # endif /* NAMELISTMASK */
1624c2aa98e2SPeter Wemm 
1625c2aa98e2SPeter Wemm 		kmem = open(_PATH_KMEM, 0, 0);
1626c2aa98e2SPeter Wemm 		if (kmem < 0)
1627c2aa98e2SPeter Wemm 		{
1628c2aa98e2SPeter Wemm 			if (tTd(3, 1))
16293299c2f1SGregory Neil Shapiro 				dprintf("getla: open(/dev/kmem): %s\n",
1630c2aa98e2SPeter Wemm 					errstring(errno));
16313299c2f1SGregory Neil Shapiro 			return -1;
1632c2aa98e2SPeter Wemm 		}
16333299c2f1SGregory Neil Shapiro 		(void) fcntl(kmem, F_SETFD, FD_CLOEXEC);
1634c2aa98e2SPeter Wemm 	}
1635c2aa98e2SPeter Wemm 	if (tTd(3, 20))
16363299c2f1SGregory Neil Shapiro 		dprintf("getla: symbol address = %#lx\n",
1637c2aa98e2SPeter Wemm 			(u_long) Nl[X_AVENRUN].n_value);
1638c2aa98e2SPeter Wemm 	if (lseek(kmem, (off_t) Nl[X_AVENRUN].n_value, SEEK_SET) == -1 ||
1639c2aa98e2SPeter Wemm 	    read(kmem, (char *) avenrun, sizeof(avenrun)) < sizeof(avenrun))
1640c2aa98e2SPeter Wemm 	{
1641c2aa98e2SPeter Wemm 		/* thank you Ian */
1642c2aa98e2SPeter Wemm 		if (tTd(3, 1))
16433299c2f1SGregory Neil Shapiro 			dprintf("getla: lseek or read: %s\n",
16443299c2f1SGregory Neil Shapiro 				errstring(errno));
16453299c2f1SGregory Neil Shapiro 		return -1;
1646c2aa98e2SPeter Wemm 	}
1647c2aa98e2SPeter Wemm # if (LA_TYPE == LA_INT) || (LA_TYPE == LA_SHORT)
1648c2aa98e2SPeter Wemm 	if (tTd(3, 5))
1649c2aa98e2SPeter Wemm 	{
1650c2aa98e2SPeter Wemm #  if LA_TYPE == LA_SHORT
16513299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %d", avenrun[0]);
1652c2aa98e2SPeter Wemm 		if (tTd(3, 15))
16533299c2f1SGregory Neil Shapiro 			dprintf(", %d, %d", avenrun[1], avenrun[2]);
16543299c2f1SGregory Neil Shapiro #  else /* LA_TYPE == LA_SHORT */
16553299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %ld", avenrun[0]);
1656c2aa98e2SPeter Wemm 		if (tTd(3, 15))
16573299c2f1SGregory Neil Shapiro 			dprintf(", %ld, %ld", avenrun[1], avenrun[2]);
16583299c2f1SGregory Neil Shapiro #  endif /* LA_TYPE == LA_SHORT */
16593299c2f1SGregory Neil Shapiro 		dprintf("\n");
1660c2aa98e2SPeter Wemm 	}
1661c2aa98e2SPeter Wemm 	if (tTd(3, 1))
16623299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n",
16633299c2f1SGregory Neil Shapiro 			(int) (avenrun[0] + FSCALE/2) >> FSHIFT);
1664c2aa98e2SPeter Wemm 	return ((int) (avenrun[0] + FSCALE/2) >> FSHIFT);
16653299c2f1SGregory Neil Shapiro # else /* (LA_TYPE == LA_INT) || (LA_TYPE == LA_SHORT) */
1666c2aa98e2SPeter Wemm 	if (tTd(3, 5))
1667c2aa98e2SPeter Wemm 	{
16683299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %g", avenrun[0]);
1669c2aa98e2SPeter Wemm 		if (tTd(3, 15))
16703299c2f1SGregory Neil Shapiro 			dprintf(", %g, %g", avenrun[1], avenrun[2]);
16713299c2f1SGregory Neil Shapiro 		dprintf("\n");
1672c2aa98e2SPeter Wemm 	}
1673c2aa98e2SPeter Wemm 	if (tTd(3, 1))
16743299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", (int) (avenrun[0] +0.5));
1675c2aa98e2SPeter Wemm 	return ((int) (avenrun[0] + 0.5));
16763299c2f1SGregory Neil Shapiro # endif /* (LA_TYPE == LA_INT) || (LA_TYPE == LA_SHORT) */
1677c2aa98e2SPeter Wemm }
1678c2aa98e2SPeter Wemm 
16793299c2f1SGregory Neil Shapiro #endif /* (LA_TYPE == LA_INT) || (LA_TYPE == LA_FLOAT) || (LA_TYPE == LA_SHORT) */
1680c2aa98e2SPeter Wemm 
1681c2aa98e2SPeter Wemm #if LA_TYPE == LA_READKSYM
1682c2aa98e2SPeter Wemm 
1683c2aa98e2SPeter Wemm # include <sys/ksym.h>
1684c2aa98e2SPeter Wemm 
16853299c2f1SGregory Neil Shapiro static int
1686c2aa98e2SPeter Wemm getla()
1687c2aa98e2SPeter Wemm {
1688c2aa98e2SPeter Wemm 	static int kmem = -1;
1689c2aa98e2SPeter Wemm 	long avenrun[3];
1690c2aa98e2SPeter Wemm 	extern int errno;
1691c2aa98e2SPeter Wemm 	struct mioc_rksym mirk;
1692c2aa98e2SPeter Wemm 
1693c2aa98e2SPeter Wemm 	if (kmem < 0)
1694c2aa98e2SPeter Wemm 	{
1695c2aa98e2SPeter Wemm 		kmem = open("/dev/kmem", 0, 0);
1696c2aa98e2SPeter Wemm 		if (kmem < 0)
1697c2aa98e2SPeter Wemm 		{
1698c2aa98e2SPeter Wemm 			if (tTd(3, 1))
16993299c2f1SGregory Neil Shapiro 				dprintf("getla: open(/dev/kmem): %s\n",
1700c2aa98e2SPeter Wemm 					errstring(errno));
17013299c2f1SGregory Neil Shapiro 			return -1;
1702c2aa98e2SPeter Wemm 		}
17033299c2f1SGregory Neil Shapiro 		(void) fcntl(kmem, F_SETFD, FD_CLOEXEC);
1704c2aa98e2SPeter Wemm 	}
1705c2aa98e2SPeter Wemm 	mirk.mirk_symname = LA_AVENRUN;
1706c2aa98e2SPeter Wemm 	mirk.mirk_buf = avenrun;
1707c2aa98e2SPeter Wemm 	mirk.mirk_buflen = sizeof(avenrun);
1708c2aa98e2SPeter Wemm 	if (ioctl(kmem, MIOC_READKSYM, &mirk) < 0)
1709c2aa98e2SPeter Wemm 	{
1710c2aa98e2SPeter Wemm 		if (tTd(3, 1))
17113299c2f1SGregory Neil Shapiro 			dprintf("getla: ioctl(MIOC_READKSYM) failed: %s\n",
1712c2aa98e2SPeter Wemm 				errstring(errno));
1713c2aa98e2SPeter Wemm 		return -1;
1714c2aa98e2SPeter Wemm 	}
1715c2aa98e2SPeter Wemm 	if (tTd(3, 5))
1716c2aa98e2SPeter Wemm 	{
17173299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %d", avenrun[0]);
1718c2aa98e2SPeter Wemm 		if (tTd(3, 15))
17193299c2f1SGregory Neil Shapiro 			dprintf(", %d, %d", avenrun[1], avenrun[2]);
17203299c2f1SGregory Neil Shapiro 		dprintf("\n");
1721c2aa98e2SPeter Wemm 	}
1722c2aa98e2SPeter Wemm 	if (tTd(3, 1))
17233299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n",
17243299c2f1SGregory Neil Shapiro 			(int) (avenrun[0] + FSCALE/2) >> FSHIFT);
1725c2aa98e2SPeter Wemm 	return ((int) (avenrun[0] + FSCALE/2) >> FSHIFT);
1726c2aa98e2SPeter Wemm }
1727c2aa98e2SPeter Wemm 
1728c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_READKSYM */
1729c2aa98e2SPeter Wemm 
1730c2aa98e2SPeter Wemm #if LA_TYPE == LA_DGUX
1731c2aa98e2SPeter Wemm 
1732c2aa98e2SPeter Wemm # include <sys/dg_sys_info.h>
1733c2aa98e2SPeter Wemm 
17343299c2f1SGregory Neil Shapiro static int
1735c2aa98e2SPeter Wemm getla()
1736c2aa98e2SPeter Wemm {
1737c2aa98e2SPeter Wemm 	struct dg_sys_info_load_info load_info;
1738c2aa98e2SPeter Wemm 
1739c2aa98e2SPeter Wemm 	dg_sys_info((long *)&load_info,
1740c2aa98e2SPeter Wemm 		DG_SYS_INFO_LOAD_INFO_TYPE, DG_SYS_INFO_LOAD_VERSION_0);
1741c2aa98e2SPeter Wemm 
1742c2aa98e2SPeter Wemm 	if (tTd(3, 1))
17433299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", (int) (load_info.one_minute + 0.5));
1744c2aa98e2SPeter Wemm 
1745c2aa98e2SPeter Wemm 	return ((int) (load_info.one_minute + 0.5));
1746c2aa98e2SPeter Wemm }
1747c2aa98e2SPeter Wemm 
1748c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_DGUX */
1749c2aa98e2SPeter Wemm 
1750c2aa98e2SPeter Wemm #if LA_TYPE == LA_HPUX
1751c2aa98e2SPeter Wemm 
1752c2aa98e2SPeter Wemm /* forward declarations to keep gcc from complaining */
1753c2aa98e2SPeter Wemm struct pst_dynamic;
1754c2aa98e2SPeter Wemm struct pst_status;
1755c2aa98e2SPeter Wemm struct pst_static;
1756c2aa98e2SPeter Wemm struct pst_vminfo;
1757c2aa98e2SPeter Wemm struct pst_diskinfo;
1758c2aa98e2SPeter Wemm struct pst_processor;
1759c2aa98e2SPeter Wemm struct pst_lv;
1760c2aa98e2SPeter Wemm struct pst_swapinfo;
1761c2aa98e2SPeter Wemm 
1762c2aa98e2SPeter Wemm # include <sys/param.h>
1763c2aa98e2SPeter Wemm # include <sys/pstat.h>
1764c2aa98e2SPeter Wemm 
17653299c2f1SGregory Neil Shapiro static int
1766c2aa98e2SPeter Wemm getla()
1767c2aa98e2SPeter Wemm {
1768c2aa98e2SPeter Wemm 	struct pst_dynamic pstd;
1769c2aa98e2SPeter Wemm 
1770c2aa98e2SPeter Wemm 	if (pstat_getdynamic(&pstd, sizeof(struct pst_dynamic),
1771c2aa98e2SPeter Wemm 			     (size_t) 1, 0) == -1)
1772c2aa98e2SPeter Wemm 		return 0;
1773c2aa98e2SPeter Wemm 
1774c2aa98e2SPeter Wemm 	if (tTd(3, 1))
17753299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", (int) (pstd.psd_avg_1_min + 0.5));
1776c2aa98e2SPeter Wemm 
1777c2aa98e2SPeter Wemm 	return (int) (pstd.psd_avg_1_min + 0.5);
1778c2aa98e2SPeter Wemm }
1779c2aa98e2SPeter Wemm 
1780c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_HPUX */
1781c2aa98e2SPeter Wemm 
1782c2aa98e2SPeter Wemm #if LA_TYPE == LA_SUBR
1783c2aa98e2SPeter Wemm 
17843299c2f1SGregory Neil Shapiro static int
1785c2aa98e2SPeter Wemm getla()
1786c2aa98e2SPeter Wemm {
1787c2aa98e2SPeter Wemm 	double avenrun[3];
1788c2aa98e2SPeter Wemm 
1789c2aa98e2SPeter Wemm 	if (getloadavg(avenrun, sizeof(avenrun) / sizeof(avenrun[0])) < 0)
1790c2aa98e2SPeter Wemm 	{
1791c2aa98e2SPeter Wemm 		if (tTd(3, 1))
17923299c2f1SGregory Neil Shapiro 			dprintf("getla: getloadavg failed: %s",
17933299c2f1SGregory Neil Shapiro 				errstring(errno));
17943299c2f1SGregory Neil Shapiro 		return -1;
1795c2aa98e2SPeter Wemm 	}
1796c2aa98e2SPeter Wemm 	if (tTd(3, 1))
17973299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", (int) (avenrun[0] +0.5));
1798c2aa98e2SPeter Wemm 	return ((int) (avenrun[0] + 0.5));
1799c2aa98e2SPeter Wemm }
1800c2aa98e2SPeter Wemm 
1801c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_SUBR */
1802c2aa98e2SPeter Wemm 
1803c2aa98e2SPeter Wemm #if LA_TYPE == LA_MACH
1804c2aa98e2SPeter Wemm 
1805c2aa98e2SPeter Wemm /*
1806c2aa98e2SPeter Wemm **  This has been tested on NEXTSTEP release 2.1/3.X.
1807c2aa98e2SPeter Wemm */
1808c2aa98e2SPeter Wemm 
1809c2aa98e2SPeter Wemm # if defined(NX_CURRENT_COMPILER_RELEASE) && NX_CURRENT_COMPILER_RELEASE > NX_COMPILER_RELEASE_3_0
1810c2aa98e2SPeter Wemm #  include <mach/mach.h>
18113299c2f1SGregory Neil Shapiro # else /* defined(NX_CURRENT_COMPILER_RELEASE) && NX_CURRENT_COMPILER_RELEASE > NX_COMPILER_RELEASE_3_0 */
1812c2aa98e2SPeter Wemm #  include <mach.h>
18133299c2f1SGregory Neil Shapiro # endif /* defined(NX_CURRENT_COMPILER_RELEASE) && NX_CURRENT_COMPILER_RELEASE > NX_COMPILER_RELEASE_3_0 */
1814c2aa98e2SPeter Wemm 
18153299c2f1SGregory Neil Shapiro static int
1816c2aa98e2SPeter Wemm getla()
1817c2aa98e2SPeter Wemm {
1818c2aa98e2SPeter Wemm 	processor_set_t default_set;
1819c2aa98e2SPeter Wemm 	kern_return_t error;
1820c2aa98e2SPeter Wemm 	unsigned int info_count;
1821c2aa98e2SPeter Wemm 	struct processor_set_basic_info info;
1822c2aa98e2SPeter Wemm 	host_t host;
1823c2aa98e2SPeter Wemm 
1824c2aa98e2SPeter Wemm 	error = processor_set_default(host_self(), &default_set);
1825c2aa98e2SPeter Wemm 	if (error != KERN_SUCCESS)
1826c2aa98e2SPeter Wemm 	{
1827c2aa98e2SPeter Wemm 		if (tTd(3, 1))
18283299c2f1SGregory Neil Shapiro 			dprintf("getla: processor_set_default failed: %s",
18293299c2f1SGregory Neil Shapiro 				errstring(errno));
1830c2aa98e2SPeter Wemm 		return -1;
1831c2aa98e2SPeter Wemm 	}
1832c2aa98e2SPeter Wemm 	info_count = PROCESSOR_SET_BASIC_INFO_COUNT;
1833c2aa98e2SPeter Wemm 	if (processor_set_info(default_set, PROCESSOR_SET_BASIC_INFO,
1834c2aa98e2SPeter Wemm 			       &host, (processor_set_info_t)&info,
1835c2aa98e2SPeter Wemm 			       &info_count) != KERN_SUCCESS)
1836c2aa98e2SPeter Wemm 	{
1837c2aa98e2SPeter Wemm 		if (tTd(3, 1))
18383299c2f1SGregory Neil Shapiro 			dprintf("getla: processor_set_info failed: %s",
18393299c2f1SGregory Neil Shapiro 				errstring(errno));
1840c2aa98e2SPeter Wemm 		return -1;
1841c2aa98e2SPeter Wemm 	}
1842c2aa98e2SPeter Wemm 	if (tTd(3, 1))
18433299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n",
18443299c2f1SGregory Neil Shapiro 			(int) ((info.load_average + (LOAD_SCALE / 2)) /
18453299c2f1SGregory Neil Shapiro 			       LOAD_SCALE));
1846c2aa98e2SPeter Wemm 	return (int) (info.load_average + (LOAD_SCALE / 2)) / LOAD_SCALE;
1847c2aa98e2SPeter Wemm }
1848c2aa98e2SPeter Wemm 
1849c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_MACH */
1850c2aa98e2SPeter Wemm 
1851c2aa98e2SPeter Wemm #if LA_TYPE == LA_PROCSTR
1852c2aa98e2SPeter Wemm 
1853c2aa98e2SPeter Wemm /*
1854c2aa98e2SPeter Wemm **  Read /proc/loadavg for the load average.  This is assumed to be
1855c2aa98e2SPeter Wemm **  in a format like "0.15 0.12 0.06".
1856c2aa98e2SPeter Wemm **
1857c2aa98e2SPeter Wemm **	Initially intended for Linux.  This has been in the kernel
1858c2aa98e2SPeter Wemm **	since at least 0.99.15.
1859c2aa98e2SPeter Wemm */
1860c2aa98e2SPeter Wemm 
1861c2aa98e2SPeter Wemm # ifndef _PATH_LOADAVG
1862c2aa98e2SPeter Wemm #  define _PATH_LOADAVG	"/proc/loadavg"
18633299c2f1SGregory Neil Shapiro # endif /* ! _PATH_LOADAVG */
1864c2aa98e2SPeter Wemm 
18653299c2f1SGregory Neil Shapiro static int
1866c2aa98e2SPeter Wemm getla()
1867c2aa98e2SPeter Wemm {
1868c2aa98e2SPeter Wemm 	double avenrun;
1869c2aa98e2SPeter Wemm 	register int result;
1870c2aa98e2SPeter Wemm 	FILE *fp;
1871c2aa98e2SPeter Wemm 
1872c2aa98e2SPeter Wemm 	fp = fopen(_PATH_LOADAVG, "r");
1873c2aa98e2SPeter Wemm 	if (fp == NULL)
1874c2aa98e2SPeter Wemm 	{
1875c2aa98e2SPeter Wemm 		if (tTd(3, 1))
18763299c2f1SGregory Neil Shapiro 			dprintf("getla: fopen(%s): %s\n",
1877c2aa98e2SPeter Wemm 				_PATH_LOADAVG, errstring(errno));
1878c2aa98e2SPeter Wemm 		return -1;
1879c2aa98e2SPeter Wemm 	}
1880c2aa98e2SPeter Wemm 	result = fscanf(fp, "%lf", &avenrun);
18813299c2f1SGregory Neil Shapiro 	(void) fclose(fp);
1882c2aa98e2SPeter Wemm 	if (result != 1)
1883c2aa98e2SPeter Wemm 	{
1884c2aa98e2SPeter Wemm 		if (tTd(3, 1))
18853299c2f1SGregory Neil Shapiro 			dprintf("getla: fscanf() = %d: %s\n",
1886c2aa98e2SPeter Wemm 				result, errstring(errno));
1887c2aa98e2SPeter Wemm 		return -1;
1888c2aa98e2SPeter Wemm 	}
1889c2aa98e2SPeter Wemm 
1890c2aa98e2SPeter Wemm 	if (tTd(3, 1))
18913299c2f1SGregory Neil Shapiro 		dprintf("getla(): %.2f\n", avenrun);
1892c2aa98e2SPeter Wemm 
1893c2aa98e2SPeter Wemm 	return ((int) (avenrun + 0.5));
1894c2aa98e2SPeter Wemm }
1895c2aa98e2SPeter Wemm 
1896c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_PROCSTR */
1897c2aa98e2SPeter Wemm 
1898c2aa98e2SPeter Wemm #if LA_TYPE == LA_IRIX6
18993299c2f1SGregory Neil Shapiro 
1900c2aa98e2SPeter Wemm # include <sys/sysmp.h>
1901c2aa98e2SPeter Wemm 
1902c2aa98e2SPeter Wemm int getla(void)
1903c2aa98e2SPeter Wemm {
1904c2aa98e2SPeter Wemm 	static int kmem = -1;
1905c2aa98e2SPeter Wemm 	int avenrun[3];
1906c2aa98e2SPeter Wemm 
1907c2aa98e2SPeter Wemm 	if (kmem < 0)
1908c2aa98e2SPeter Wemm 	{
1909c2aa98e2SPeter Wemm 		kmem = open(_PATH_KMEM, 0, 0);
1910c2aa98e2SPeter Wemm 		if (kmem < 0)
1911c2aa98e2SPeter Wemm 		{
1912c2aa98e2SPeter Wemm 			if (tTd(3, 1))
19133299c2f1SGregory Neil Shapiro 				dprintf("getla: open(%s): %s\n", _PATH_KMEM,
1914c2aa98e2SPeter Wemm 					errstring(errno));
1915c2aa98e2SPeter Wemm 			return -1;
1916c2aa98e2SPeter Wemm 		}
19173299c2f1SGregory Neil Shapiro 		(void) fcntl(kmem, F_SETFD, FD_CLOEXEC);
1918c2aa98e2SPeter Wemm 	}
1919c2aa98e2SPeter Wemm 
1920c2aa98e2SPeter Wemm 	if (lseek(kmem, (sysmp(MP_KERNADDR, MPKA_AVENRUN) & 0x7fffffff), SEEK_SET) == -1 ||
1921c2aa98e2SPeter Wemm 	    read(kmem, (char *)avenrun, sizeof(avenrun)) < sizeof(avenrun))
1922c2aa98e2SPeter Wemm 	{
1923c2aa98e2SPeter Wemm 		if (tTd(3, 1))
19243299c2f1SGregory Neil Shapiro 			dprintf("getla: lseek or read: %s\n",
1925c2aa98e2SPeter Wemm 				errstring(errno));
1926c2aa98e2SPeter Wemm 		return -1;
1927c2aa98e2SPeter Wemm 	}
1928c2aa98e2SPeter Wemm 	if (tTd(3, 5))
1929c2aa98e2SPeter Wemm 	{
19303299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %ld", (long int) avenrun[0]);
1931c2aa98e2SPeter Wemm 		if (tTd(3, 15))
19323299c2f1SGregory Neil Shapiro 			dprintf(", %ld, %ld",
1933c2aa98e2SPeter Wemm 				(long int) avenrun[1], (long int) avenrun[2]);
19343299c2f1SGregory Neil Shapiro 		dprintf("\n");
1935c2aa98e2SPeter Wemm 	}
1936c2aa98e2SPeter Wemm 
1937c2aa98e2SPeter Wemm 	if (tTd(3, 1))
19383299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n",
19393299c2f1SGregory Neil Shapiro 			(int) (avenrun[0] + FSCALE/2) >> FSHIFT);
1940c2aa98e2SPeter Wemm 	return ((int) (avenrun[0] + FSCALE/2) >> FSHIFT);
1941c2aa98e2SPeter Wemm 
1942c2aa98e2SPeter Wemm }
19433299c2f1SGregory Neil Shapiro #endif /* LA_TYPE == LA_IRIX6 */
1944c2aa98e2SPeter Wemm 
1945c2aa98e2SPeter Wemm #if LA_TYPE == LA_KSTAT
1946c2aa98e2SPeter Wemm 
1947c2aa98e2SPeter Wemm # include <kstat.h>
1948c2aa98e2SPeter Wemm 
19493299c2f1SGregory Neil Shapiro static int
1950c2aa98e2SPeter Wemm getla()
1951c2aa98e2SPeter Wemm {
1952c2aa98e2SPeter Wemm 	static kstat_ctl_t *kc = NULL;
1953c2aa98e2SPeter Wemm 	static kstat_t *ksp = NULL;
1954c2aa98e2SPeter Wemm 	kstat_named_t *ksn;
1955c2aa98e2SPeter Wemm 	int la;
1956c2aa98e2SPeter Wemm 
1957c2aa98e2SPeter Wemm 	if (kc == NULL)		/* if not initialized before */
1958c2aa98e2SPeter Wemm 		kc = kstat_open();
1959c2aa98e2SPeter Wemm 	if (kc == NULL)
1960c2aa98e2SPeter Wemm 	{
1961c2aa98e2SPeter Wemm 		if (tTd(3, 1))
19623299c2f1SGregory Neil Shapiro 			dprintf("getla: kstat_open(): %s\n",
1963c2aa98e2SPeter Wemm 				errstring(errno));
1964c2aa98e2SPeter Wemm 		return -1;
1965c2aa98e2SPeter Wemm 	}
1966c2aa98e2SPeter Wemm 	if (ksp == NULL)
1967c2aa98e2SPeter Wemm 		ksp = kstat_lookup(kc, "unix", 0, "system_misc");
1968c2aa98e2SPeter Wemm 	if (ksp == NULL)
1969c2aa98e2SPeter Wemm 	{
1970c2aa98e2SPeter Wemm 		if (tTd(3, 1))
19713299c2f1SGregory Neil Shapiro 			dprintf("getla: kstat_lookup(): %s\n",
1972c2aa98e2SPeter Wemm 				errstring(errno));
1973c2aa98e2SPeter Wemm 		return -1;
1974c2aa98e2SPeter Wemm 	}
1975c2aa98e2SPeter Wemm 	if (kstat_read(kc, ksp, NULL) < 0)
1976c2aa98e2SPeter Wemm 	{
1977c2aa98e2SPeter Wemm 		if (tTd(3, 1))
19783299c2f1SGregory Neil Shapiro 			dprintf("getla: kstat_read(): %s\n",
1979c2aa98e2SPeter Wemm 				errstring(errno));
1980c2aa98e2SPeter Wemm 		return -1;
1981c2aa98e2SPeter Wemm 	}
1982c2aa98e2SPeter Wemm 	ksn = (kstat_named_t *) kstat_data_lookup(ksp, "avenrun_1min");
1983c2aa98e2SPeter Wemm 	la = ((double)ksn->value.ul + FSCALE/2) / FSCALE;
1984c2aa98e2SPeter Wemm 	/* kstat_close(kc); /o do not close for fast access */
1985c2aa98e2SPeter Wemm 	return la;
1986c2aa98e2SPeter Wemm }
1987c2aa98e2SPeter Wemm 
1988c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_KSTAT */
1989c2aa98e2SPeter Wemm 
1990c2aa98e2SPeter Wemm #if LA_TYPE == LA_DEVSHORT
1991c2aa98e2SPeter Wemm 
1992c2aa98e2SPeter Wemm /*
1993c2aa98e2SPeter Wemm **  Read /dev/table/avenrun for the load average.  This should contain
1994c2aa98e2SPeter Wemm **  three shorts for the 1, 5, and 15 minute loads.  We only read the
1995c2aa98e2SPeter Wemm **  first, since that's all we care about.
1996c2aa98e2SPeter Wemm **
1997c2aa98e2SPeter Wemm **	Intended for SCO OpenServer 5.
1998c2aa98e2SPeter Wemm */
1999c2aa98e2SPeter Wemm 
2000c2aa98e2SPeter Wemm # ifndef _PATH_AVENRUN
2001c2aa98e2SPeter Wemm #  define _PATH_AVENRUN	"/dev/table/avenrun"
20023299c2f1SGregory Neil Shapiro # endif /* ! _PATH_AVENRUN */
2003c2aa98e2SPeter Wemm 
20043299c2f1SGregory Neil Shapiro static int
2005c2aa98e2SPeter Wemm getla()
2006c2aa98e2SPeter Wemm {
2007c2aa98e2SPeter Wemm 	static int afd = -1;
2008c2aa98e2SPeter Wemm 	short avenrun;
2009c2aa98e2SPeter Wemm 	int loadav;
2010c2aa98e2SPeter Wemm 	int r;
2011c2aa98e2SPeter Wemm 
2012c2aa98e2SPeter Wemm 	errno = EBADF;
2013c2aa98e2SPeter Wemm 
2014c2aa98e2SPeter Wemm 	if (afd == -1 || lseek(afd, 0L, SEEK_SET) == -1)
2015c2aa98e2SPeter Wemm 	{
2016c2aa98e2SPeter Wemm 		if (errno != EBADF)
2017c2aa98e2SPeter Wemm 			return -1;
2018c2aa98e2SPeter Wemm 		afd = open(_PATH_AVENRUN, O_RDONLY|O_SYNC);
2019c2aa98e2SPeter Wemm 		if (afd < 0)
2020c2aa98e2SPeter Wemm 		{
2021c2aa98e2SPeter Wemm 			sm_syslog(LOG_ERR, NOQID,
2022c2aa98e2SPeter Wemm 				"can't open %s: %m",
2023c2aa98e2SPeter Wemm 				_PATH_AVENRUN);
2024c2aa98e2SPeter Wemm 			return -1;
2025c2aa98e2SPeter Wemm 		}
2026c2aa98e2SPeter Wemm 	}
2027c2aa98e2SPeter Wemm 
2028c2aa98e2SPeter Wemm 	r = read(afd, &avenrun, sizeof avenrun);
2029c2aa98e2SPeter Wemm 
2030c2aa98e2SPeter Wemm 	if (tTd(3, 5))
20313299c2f1SGregory Neil Shapiro 		dprintf("getla: avenrun = %d\n", avenrun);
2032c2aa98e2SPeter Wemm 	loadav = (int) (avenrun + FSCALE/2) >> FSHIFT;
2033c2aa98e2SPeter Wemm 	if (tTd(3, 1))
20343299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", loadav);
2035c2aa98e2SPeter Wemm 	return loadav;
2036c2aa98e2SPeter Wemm }
2037c2aa98e2SPeter Wemm 
2038c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_DEVSHORT */
2039c2aa98e2SPeter Wemm 
2040c2aa98e2SPeter Wemm #if LA_TYPE == LA_ALPHAOSF
2041c2aa98e2SPeter Wemm struct rtentry;
2042c2aa98e2SPeter Wemm struct mbuf;
2043c2aa98e2SPeter Wemm # include <sys/table.h>
2044c2aa98e2SPeter Wemm 
2045c2aa98e2SPeter Wemm int getla()
2046c2aa98e2SPeter Wemm {
2047c2aa98e2SPeter Wemm 	int ave = 0;
2048c2aa98e2SPeter Wemm 	struct tbl_loadavg tab;
2049c2aa98e2SPeter Wemm 
2050c2aa98e2SPeter Wemm 	if (table(TBL_LOADAVG, 0, &tab, 1, sizeof(tab)) == -1)
2051c2aa98e2SPeter Wemm 	{
2052c2aa98e2SPeter Wemm 		if (tTd(3, 1))
20533299c2f1SGregory Neil Shapiro 			dprintf("getla: table %s\n", errstring(errno));
20543299c2f1SGregory Neil Shapiro 		return -1;
2055c2aa98e2SPeter Wemm 	}
2056c2aa98e2SPeter Wemm 
2057c2aa98e2SPeter Wemm 	if (tTd(3, 1))
20583299c2f1SGregory Neil Shapiro 		dprintf("getla: scale = %d\n", tab.tl_lscale);
2059c2aa98e2SPeter Wemm 
2060c2aa98e2SPeter Wemm 	if (tab.tl_lscale)
20613299c2f1SGregory Neil Shapiro 		ave = ((tab.tl_avenrun.l[2] + (tab.tl_lscale/2)) /
20623299c2f1SGregory Neil Shapiro 		       tab.tl_lscale);
2063c2aa98e2SPeter Wemm 	else
20643299c2f1SGregory Neil Shapiro 		ave = (int) (tab.tl_avenrun.d[2] + 0.5);
2065c2aa98e2SPeter Wemm 
2066c2aa98e2SPeter Wemm 	if (tTd(3, 1))
20673299c2f1SGregory Neil Shapiro 		dprintf("getla: %d\n", ave);
2068c2aa98e2SPeter Wemm 
2069c2aa98e2SPeter Wemm 	return ave;
2070c2aa98e2SPeter Wemm }
2071c2aa98e2SPeter Wemm 
20723299c2f1SGregory Neil Shapiro #endif /* LA_TYPE == LA_ALPHAOSF */
2073c2aa98e2SPeter Wemm 
2074c2aa98e2SPeter Wemm #if LA_TYPE == LA_ZERO
2075c2aa98e2SPeter Wemm 
20763299c2f1SGregory Neil Shapiro static int
2077c2aa98e2SPeter Wemm getla()
2078c2aa98e2SPeter Wemm {
2079c2aa98e2SPeter Wemm 	if (tTd(3, 1))
20803299c2f1SGregory Neil Shapiro 		dprintf("getla: ZERO\n");
20813299c2f1SGregory Neil Shapiro 	return 0;
2082c2aa98e2SPeter Wemm }
2083c2aa98e2SPeter Wemm 
2084c2aa98e2SPeter Wemm #endif /* LA_TYPE == LA_ZERO */
2085c2aa98e2SPeter Wemm 
2086c2aa98e2SPeter Wemm /*
2087c2aa98e2SPeter Wemm  * Copyright 1989 Massachusetts Institute of Technology
2088c2aa98e2SPeter Wemm  *
2089c2aa98e2SPeter Wemm  * Permission to use, copy, modify, distribute, and sell this software and its
2090c2aa98e2SPeter Wemm  * documentation for any purpose is hereby granted without fee, provided that
2091c2aa98e2SPeter Wemm  * the above copyright notice appear in all copies and that both that
2092c2aa98e2SPeter Wemm  * copyright notice and this permission notice appear in supporting
2093c2aa98e2SPeter Wemm  * documentation, and that the name of M.I.T. not be used in advertising or
2094c2aa98e2SPeter Wemm  * publicity pertaining to distribution of the software without specific,
2095c2aa98e2SPeter Wemm  * written prior permission.  M.I.T. makes no representations about the
2096c2aa98e2SPeter Wemm  * suitability of this software for any purpose.  It is provided "as is"
2097c2aa98e2SPeter Wemm  * without express or implied warranty.
2098c2aa98e2SPeter Wemm  *
2099c2aa98e2SPeter Wemm  * M.I.T. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
2100c2aa98e2SPeter Wemm  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL M.I.T.
2101c2aa98e2SPeter Wemm  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
2102c2aa98e2SPeter Wemm  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
2103c2aa98e2SPeter Wemm  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
2104c2aa98e2SPeter Wemm  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
2105c2aa98e2SPeter Wemm  *
2106c2aa98e2SPeter Wemm  * Authors:  Many and varied...
2107c2aa98e2SPeter Wemm  */
2108c2aa98e2SPeter Wemm 
2109c2aa98e2SPeter Wemm /* Non Apollo stuff removed by Don Lewis 11/15/93 */
2110c2aa98e2SPeter Wemm #ifndef lint
21113299c2f1SGregory Neil Shapiro static char  rcsid[] = "@(#)$OrigId: getloadavg.c,v 1.16 1991/06/21 12:51:15 paul Exp $";
2112c2aa98e2SPeter Wemm #endif /* ! lint */
2113c2aa98e2SPeter Wemm 
2114c2aa98e2SPeter Wemm #ifdef apollo
2115c2aa98e2SPeter Wemm # undef volatile
2116c2aa98e2SPeter Wemm # include <apollo/base.h>
2117c2aa98e2SPeter Wemm 
2118c2aa98e2SPeter Wemm /* ARGSUSED */
2119c2aa98e2SPeter Wemm int getloadavg( call_data )
2120c2aa98e2SPeter Wemm      caddr_t	call_data;	/* pointer to (double) return value */
2121c2aa98e2SPeter Wemm {
2122c2aa98e2SPeter Wemm      double *avenrun = (double *) call_data;
2123c2aa98e2SPeter Wemm      int i;
2124c2aa98e2SPeter Wemm      status_$t      st;
2125c2aa98e2SPeter Wemm      long loadav[3];
2126c2aa98e2SPeter Wemm      proc1_$get_loadav(loadav, &st);
2127c2aa98e2SPeter Wemm      *avenrun = loadav[0] / (double) (1 << 16);
21283299c2f1SGregory Neil Shapiro      return 0;
2129c2aa98e2SPeter Wemm }
2130c2aa98e2SPeter Wemm #endif /* apollo */
2131c2aa98e2SPeter Wemm /*
21323299c2f1SGregory Neil Shapiro **  SM_GETLA -- get the current load average and set macro
21333299c2f1SGregory Neil Shapiro **
21343299c2f1SGregory Neil Shapiro **	Parameters:
21353299c2f1SGregory Neil Shapiro **		e -- the envelope for the load average macro.
21363299c2f1SGregory Neil Shapiro **
21373299c2f1SGregory Neil Shapiro **	Returns:
21383299c2f1SGregory Neil Shapiro **		The current load average as an integer.
21393299c2f1SGregory Neil Shapiro **
21403299c2f1SGregory Neil Shapiro **	Side Effects:
21413299c2f1SGregory Neil Shapiro **		Sets the load average macro ({load_avg}) if
21423299c2f1SGregory Neil Shapiro **		envelope e is not NULL.
21433299c2f1SGregory Neil Shapiro */
21443299c2f1SGregory Neil Shapiro 
21453299c2f1SGregory Neil Shapiro int
21463299c2f1SGregory Neil Shapiro sm_getla(e)
21473299c2f1SGregory Neil Shapiro 	ENVELOPE *e;
21483299c2f1SGregory Neil Shapiro {
21493299c2f1SGregory Neil Shapiro 	register int la;
21503299c2f1SGregory Neil Shapiro 
21513299c2f1SGregory Neil Shapiro 	la = getla();
21523299c2f1SGregory Neil Shapiro 	if (e != NULL)
21533299c2f1SGregory Neil Shapiro 	{
21543299c2f1SGregory Neil Shapiro 		char labuf[8];
21553299c2f1SGregory Neil Shapiro 
2156d995d2baSGregory Neil Shapiro 		snprintf(labuf, sizeof labuf, "%d", la);
21573299c2f1SGregory Neil Shapiro 		define(macid("{load_avg}", NULL), newstr(labuf), e);
21583299c2f1SGregory Neil Shapiro 	}
21593299c2f1SGregory Neil Shapiro 	return la;
21603299c2f1SGregory Neil Shapiro }
21613299c2f1SGregory Neil Shapiro 
21623299c2f1SGregory Neil Shapiro /*
2163c2aa98e2SPeter Wemm **  SHOULDQUEUE -- should this message be queued or sent?
2164c2aa98e2SPeter Wemm **
2165c2aa98e2SPeter Wemm **	Compares the message cost to the load average to decide.
2166c2aa98e2SPeter Wemm **
2167c2aa98e2SPeter Wemm **	Parameters:
2168c2aa98e2SPeter Wemm **		pri -- the priority of the message in question.
21693299c2f1SGregory Neil Shapiro **		ct -- the message creation time.
2170c2aa98e2SPeter Wemm **
2171c2aa98e2SPeter Wemm **	Returns:
2172c2aa98e2SPeter Wemm **		TRUE -- if this message should be queued up for the
2173c2aa98e2SPeter Wemm **			time being.
2174c2aa98e2SPeter Wemm **		FALSE -- if the load is low enough to send this message.
2175c2aa98e2SPeter Wemm **
2176c2aa98e2SPeter Wemm **	Side Effects:
2177c2aa98e2SPeter Wemm **		none.
2178c2aa98e2SPeter Wemm */
2179c2aa98e2SPeter Wemm 
21803299c2f1SGregory Neil Shapiro /* ARGSUSED1 */
2181c2aa98e2SPeter Wemm bool
21823299c2f1SGregory Neil Shapiro shouldqueue(pri, ct)
2183c2aa98e2SPeter Wemm 	long pri;
21843299c2f1SGregory Neil Shapiro 	time_t ct;
2185c2aa98e2SPeter Wemm {
2186c2aa98e2SPeter Wemm 	bool rval;
2187c2aa98e2SPeter Wemm 
2188c2aa98e2SPeter Wemm 	if (tTd(3, 30))
21893299c2f1SGregory Neil Shapiro 		dprintf("shouldqueue: CurrentLA=%d, pri=%ld: ",
21903299c2f1SGregory Neil Shapiro 			CurrentLA, pri);
21913299c2f1SGregory Neil Shapiro 	if (CurrentLA < QueueLA)
2192c2aa98e2SPeter Wemm 	{
2193c2aa98e2SPeter Wemm 		if (tTd(3, 30))
21943299c2f1SGregory Neil Shapiro 			dprintf("FALSE (CurrentLA < QueueLA)\n");
21953299c2f1SGregory Neil Shapiro 		return FALSE;
2196c2aa98e2SPeter Wemm 	}
2197c2aa98e2SPeter Wemm #if 0	/* this code is reported to cause oscillation around RefuseLA */
2198c2aa98e2SPeter Wemm 	if (CurrentLA >= RefuseLA && QueueLA < RefuseLA)
2199c2aa98e2SPeter Wemm 	{
2200c2aa98e2SPeter Wemm 		if (tTd(3, 30))
22013299c2f1SGregory Neil Shapiro 			dprintf("TRUE (CurrentLA >= RefuseLA)\n");
22023299c2f1SGregory Neil Shapiro 		return TRUE;
2203c2aa98e2SPeter Wemm 	}
22043299c2f1SGregory Neil Shapiro #endif /* 0 */
22053299c2f1SGregory Neil Shapiro 	rval = pri > (QueueFactor / (CurrentLA - QueueLA + 1));
2206c2aa98e2SPeter Wemm 	if (tTd(3, 30))
22073299c2f1SGregory Neil Shapiro 		dprintf("%s (by calculation)\n", rval ? "TRUE" : "FALSE");
2208c2aa98e2SPeter Wemm 	return rval;
2209c2aa98e2SPeter Wemm }
2210c2aa98e2SPeter Wemm /*
2211c2aa98e2SPeter Wemm **  REFUSECONNECTIONS -- decide if connections should be refused
2212c2aa98e2SPeter Wemm **
2213c2aa98e2SPeter Wemm **	Parameters:
22143299c2f1SGregory Neil Shapiro **		name -- daemon name (for error messages only)
22153299c2f1SGregory Neil Shapiro **		e -- the current envelope.
22163299c2f1SGregory Neil Shapiro **		d -- number of daemon
2217c2aa98e2SPeter Wemm **
2218c2aa98e2SPeter Wemm **	Returns:
2219c2aa98e2SPeter Wemm **		TRUE if incoming SMTP connections should be refused
2220c2aa98e2SPeter Wemm **			(for now).
2221c2aa98e2SPeter Wemm **		FALSE if we should accept new work.
2222c2aa98e2SPeter Wemm **
2223c2aa98e2SPeter Wemm **	Side Effects:
2224c2aa98e2SPeter Wemm **		Sets process title when it is rejecting connections.
2225c2aa98e2SPeter Wemm */
2226c2aa98e2SPeter Wemm 
2227c2aa98e2SPeter Wemm bool
22283299c2f1SGregory Neil Shapiro refuseconnections(name, e, d)
22293299c2f1SGregory Neil Shapiro 	char *name;
22303299c2f1SGregory Neil Shapiro 	ENVELOPE *e;
22313299c2f1SGregory Neil Shapiro 	int d;
2232c2aa98e2SPeter Wemm {
2233c2aa98e2SPeter Wemm 	time_t now;
22343299c2f1SGregory Neil Shapiro 	static time_t lastconn[MAXDAEMONS];
22353299c2f1SGregory Neil Shapiro 	static int conncnt[MAXDAEMONS];
22363299c2f1SGregory Neil Shapiro 
2237c2aa98e2SPeter Wemm 
2238c2aa98e2SPeter Wemm #ifdef XLA
2239c2aa98e2SPeter Wemm 	if (!xla_smtp_ok())
2240c2aa98e2SPeter Wemm 		return TRUE;
22413299c2f1SGregory Neil Shapiro #endif /* XLA */
2242c2aa98e2SPeter Wemm 
2243c2aa98e2SPeter Wemm 	now = curtime();
22443299c2f1SGregory Neil Shapiro 	if (now != lastconn[d])
2245c2aa98e2SPeter Wemm 	{
22463299c2f1SGregory Neil Shapiro 		lastconn[d] = now;
22473299c2f1SGregory Neil Shapiro 		conncnt[d] = 0;
2248c2aa98e2SPeter Wemm 	}
22493299c2f1SGregory Neil Shapiro 	else if (conncnt[d]++ > ConnRateThrottle && ConnRateThrottle > 0)
2250c2aa98e2SPeter Wemm 	{
2251c2aa98e2SPeter Wemm 		/* sleep to flatten out connection load */
22523299c2f1SGregory Neil Shapiro 		sm_setproctitle(TRUE, e, "deferring connections on daemon %s: %d per second",
22533299c2f1SGregory Neil Shapiro 				name, ConnRateThrottle);
22543299c2f1SGregory Neil Shapiro 		if (LogLevel >= 9)
2255c2aa98e2SPeter Wemm 			sm_syslog(LOG_INFO, NOQID,
22563299c2f1SGregory Neil Shapiro 				"deferring connections on daemon %s: %d per second",
22573299c2f1SGregory Neil Shapiro 				name, ConnRateThrottle);
22583299c2f1SGregory Neil Shapiro 		(void) sleep(1);
2259c2aa98e2SPeter Wemm 	}
2260c2aa98e2SPeter Wemm 
2261c2aa98e2SPeter Wemm 	CurrentLA = getla();
22623299c2f1SGregory Neil Shapiro 	if (RefuseLA > 0 && CurrentLA >= RefuseLA)
2263c2aa98e2SPeter Wemm 	{
22643299c2f1SGregory Neil Shapiro 		sm_setproctitle(TRUE, e, "rejecting connections on daemon %s: load average: %d",
22653299c2f1SGregory Neil Shapiro 				name, CurrentLA);
22663299c2f1SGregory Neil Shapiro 		if (LogLevel >= 9)
2267c2aa98e2SPeter Wemm 			sm_syslog(LOG_INFO, NOQID,
22683299c2f1SGregory Neil Shapiro 				"rejecting connections on daemon %s: load average: %d",
22693299c2f1SGregory Neil Shapiro 				name, CurrentLA);
2270c2aa98e2SPeter Wemm 		return TRUE;
2271c2aa98e2SPeter Wemm 	}
2272c2aa98e2SPeter Wemm 
2273c2aa98e2SPeter Wemm 	if (MaxChildren > 0 && CurChildren >= MaxChildren)
2274c2aa98e2SPeter Wemm 	{
2275c2aa98e2SPeter Wemm 		proc_list_probe();
2276c2aa98e2SPeter Wemm 		if (CurChildren >= MaxChildren)
2277c2aa98e2SPeter Wemm 		{
22783299c2f1SGregory Neil Shapiro 			sm_setproctitle(TRUE, e, "rejecting connections on daemon %s: %d children, max %d",
22793299c2f1SGregory Neil Shapiro 					name, CurChildren, MaxChildren);
22803299c2f1SGregory Neil Shapiro 			if (LogLevel >= 9)
2281c2aa98e2SPeter Wemm 				sm_syslog(LOG_INFO, NOQID,
22823299c2f1SGregory Neil Shapiro 					"rejecting connections on daemon %s: %d children, max %d",
22833299c2f1SGregory Neil Shapiro 					name, CurChildren, MaxChildren);
2284c2aa98e2SPeter Wemm 			return TRUE;
2285c2aa98e2SPeter Wemm 		}
2286c2aa98e2SPeter Wemm 	}
2287c2aa98e2SPeter Wemm 
2288c2aa98e2SPeter Wemm 	return FALSE;
2289c2aa98e2SPeter Wemm }
2290c2aa98e2SPeter Wemm /*
2291c2aa98e2SPeter Wemm **  SETPROCTITLE -- set process title for ps
2292c2aa98e2SPeter Wemm **
2293c2aa98e2SPeter Wemm **	Parameters:
2294c2aa98e2SPeter Wemm **		fmt -- a printf style format string.
2295c2aa98e2SPeter Wemm **		a, b, c -- possible parameters to fmt.
2296c2aa98e2SPeter Wemm **
2297c2aa98e2SPeter Wemm **	Returns:
2298c2aa98e2SPeter Wemm **		none.
2299c2aa98e2SPeter Wemm **
2300c2aa98e2SPeter Wemm **	Side Effects:
2301c2aa98e2SPeter Wemm **		Clobbers argv of our main procedure so ps(1) will
2302c2aa98e2SPeter Wemm **		display the title.
2303c2aa98e2SPeter Wemm */
2304c2aa98e2SPeter Wemm 
2305c2aa98e2SPeter Wemm #define SPT_NONE	0	/* don't use it at all */
2306c2aa98e2SPeter Wemm #define SPT_REUSEARGV	1	/* cover argv with title information */
2307c2aa98e2SPeter Wemm #define SPT_BUILTIN	2	/* use libc builtin */
2308c2aa98e2SPeter Wemm #define SPT_PSTAT	3	/* use pstat(PSTAT_SETCMD, ...) */
2309c2aa98e2SPeter Wemm #define SPT_PSSTRINGS	4	/* use PS_STRINGS->... */
2310c2aa98e2SPeter Wemm #define SPT_SYSMIPS	5	/* use sysmips() supported by NEWS-OS 6 */
2311c2aa98e2SPeter Wemm #define SPT_SCO		6	/* write kernel u. area */
2312c2aa98e2SPeter Wemm #define SPT_CHANGEARGV	7	/* write our own strings into argv[] */
2313c2aa98e2SPeter Wemm 
2314c2aa98e2SPeter Wemm #ifndef SPT_TYPE
2315c2aa98e2SPeter Wemm # define SPT_TYPE	SPT_REUSEARGV
23163299c2f1SGregory Neil Shapiro #endif /* ! SPT_TYPE */
23173299c2f1SGregory Neil Shapiro 
2318c2aa98e2SPeter Wemm 
2319c2aa98e2SPeter Wemm #if SPT_TYPE != SPT_NONE && SPT_TYPE != SPT_BUILTIN
2320c2aa98e2SPeter Wemm 
2321c2aa98e2SPeter Wemm # if SPT_TYPE == SPT_PSTAT
2322c2aa98e2SPeter Wemm #  include <sys/pstat.h>
23233299c2f1SGregory Neil Shapiro # endif /* SPT_TYPE == SPT_PSTAT */
2324c2aa98e2SPeter Wemm # if SPT_TYPE == SPT_PSSTRINGS
2325c2aa98e2SPeter Wemm #  include <machine/vmparam.h>
2326c2aa98e2SPeter Wemm #  include <sys/exec.h>
2327c2aa98e2SPeter Wemm #  ifndef PS_STRINGS	/* hmmmm....  apparently not available after all */
2328c2aa98e2SPeter Wemm #   undef SPT_TYPE
2329c2aa98e2SPeter Wemm #   define SPT_TYPE	SPT_REUSEARGV
23303299c2f1SGregory Neil Shapiro #  else /* ! PS_STRINGS */
2331c2aa98e2SPeter Wemm #   ifndef NKPDE			/* FreeBSD 2.0 */
2332c2aa98e2SPeter Wemm #    define NKPDE 63
2333c2aa98e2SPeter Wemm typedef unsigned int	*pt_entry_t;
23343299c2f1SGregory Neil Shapiro #   endif /* ! NKPDE */
23353299c2f1SGregory Neil Shapiro #  endif /* ! PS_STRINGS */
23363299c2f1SGregory Neil Shapiro # endif /* SPT_TYPE == SPT_PSSTRINGS */
2337c2aa98e2SPeter Wemm 
2338c2aa98e2SPeter Wemm # if SPT_TYPE == SPT_PSSTRINGS || SPT_TYPE == SPT_CHANGEARGV
2339c2aa98e2SPeter Wemm #  define SETPROC_STATIC	static
23403299c2f1SGregory Neil Shapiro # else /* SPT_TYPE == SPT_PSSTRINGS || SPT_TYPE == SPT_CHANGEARGV */
2341c2aa98e2SPeter Wemm #  define SETPROC_STATIC
23423299c2f1SGregory Neil Shapiro # endif /* SPT_TYPE == SPT_PSSTRINGS || SPT_TYPE == SPT_CHANGEARGV */
2343c2aa98e2SPeter Wemm 
2344c2aa98e2SPeter Wemm # if SPT_TYPE == SPT_SYSMIPS
2345c2aa98e2SPeter Wemm #  include <sys/sysmips.h>
2346c2aa98e2SPeter Wemm #  include <sys/sysnews.h>
23473299c2f1SGregory Neil Shapiro # endif /* SPT_TYPE == SPT_SYSMIPS */
2348c2aa98e2SPeter Wemm 
2349c2aa98e2SPeter Wemm # if SPT_TYPE == SPT_SCO
2350c2aa98e2SPeter Wemm #  include <sys/immu.h>
2351c2aa98e2SPeter Wemm #  include <sys/dir.h>
2352c2aa98e2SPeter Wemm #  include <sys/user.h>
2353c2aa98e2SPeter Wemm #  include <sys/fs/s5param.h>
2354c2aa98e2SPeter Wemm #  if PSARGSZ > MAXLINE
2355c2aa98e2SPeter Wemm #   define SPT_BUFSIZE	PSARGSZ
23563299c2f1SGregory Neil Shapiro #  endif /* PSARGSZ > MAXLINE */
23573299c2f1SGregory Neil Shapiro # endif /* SPT_TYPE == SPT_SCO */
2358c2aa98e2SPeter Wemm 
2359c2aa98e2SPeter Wemm # ifndef SPT_PADCHAR
2360c2aa98e2SPeter Wemm #  define SPT_PADCHAR	' '
23613299c2f1SGregory Neil Shapiro # endif /* ! SPT_PADCHAR */
2362c2aa98e2SPeter Wemm 
236376b7bf71SPeter Wemm #endif /* SPT_TYPE != SPT_NONE && SPT_TYPE != SPT_BUILTIN */
236476b7bf71SPeter Wemm 
2365c2aa98e2SPeter Wemm #ifndef SPT_BUFSIZE
2366c2aa98e2SPeter Wemm # define SPT_BUFSIZE	MAXLINE
23673299c2f1SGregory Neil Shapiro #endif /* ! SPT_BUFSIZE */
2368c2aa98e2SPeter Wemm 
2369c2aa98e2SPeter Wemm /*
2370c2aa98e2SPeter Wemm **  Pointers for setproctitle.
2371c2aa98e2SPeter Wemm **	This allows "ps" listings to give more useful information.
2372c2aa98e2SPeter Wemm */
2373c2aa98e2SPeter Wemm 
23743299c2f1SGregory Neil Shapiro static char	**Argv = NULL;		/* pointer to argument vector */
23753299c2f1SGregory Neil Shapiro static char	*LastArgv = NULL;	/* end of argv */
23763299c2f1SGregory Neil Shapiro #if SPT_TYPE != SPT_BUILTIN
23773299c2f1SGregory Neil Shapiro static void	setproctitle __P((const char *, ...));
23783299c2f1SGregory Neil Shapiro #endif /* SPT_TYPE != SPT_BUILTIN */
2379c2aa98e2SPeter Wemm 
2380c2aa98e2SPeter Wemm void
2381c2aa98e2SPeter Wemm initsetproctitle(argc, argv, envp)
2382c2aa98e2SPeter Wemm 	int argc;
2383c2aa98e2SPeter Wemm 	char **argv;
2384c2aa98e2SPeter Wemm 	char **envp;
2385c2aa98e2SPeter Wemm {
2386c2aa98e2SPeter Wemm 	register int i, envpsize = 0;
2387c2aa98e2SPeter Wemm 	extern char **environ;
2388c2aa98e2SPeter Wemm 
2389c2aa98e2SPeter Wemm 	/*
2390c2aa98e2SPeter Wemm 	**  Move the environment so setproctitle can use the space at
2391c2aa98e2SPeter Wemm 	**  the top of memory.
2392c2aa98e2SPeter Wemm 	*/
2393c2aa98e2SPeter Wemm 
2394c2aa98e2SPeter Wemm 	for (i = 0; envp[i] != NULL; i++)
2395c2aa98e2SPeter Wemm 		envpsize += strlen(envp[i]) + 1;
2396c2aa98e2SPeter Wemm 	environ = (char **) xalloc(sizeof (char *) * (i + 1));
2397c2aa98e2SPeter Wemm 	for (i = 0; envp[i] != NULL; i++)
2398c2aa98e2SPeter Wemm 		environ[i] = newstr(envp[i]);
2399c2aa98e2SPeter Wemm 	environ[i] = NULL;
2400c2aa98e2SPeter Wemm 
2401c2aa98e2SPeter Wemm 	/*
2402c2aa98e2SPeter Wemm 	**  Save start and extent of argv for setproctitle.
2403c2aa98e2SPeter Wemm 	*/
2404c2aa98e2SPeter Wemm 
2405c2aa98e2SPeter Wemm 	Argv = argv;
2406c2aa98e2SPeter Wemm 
2407c2aa98e2SPeter Wemm 	/*
2408c2aa98e2SPeter Wemm 	**  Determine how much space we can use for setproctitle.
2409c2aa98e2SPeter Wemm 	**  Use all contiguous argv and envp pointers starting at argv[0]
2410c2aa98e2SPeter Wemm 	*/
2411c2aa98e2SPeter Wemm 	for (i = 0; i < argc; i++)
2412c2aa98e2SPeter Wemm 	{
2413c2aa98e2SPeter Wemm 		if (i == 0 || LastArgv + 1 == argv[i])
2414c2aa98e2SPeter Wemm 			LastArgv = argv[i] + strlen(argv[i]);
2415c2aa98e2SPeter Wemm 	}
24163299c2f1SGregory Neil Shapiro 	for (i = 0; LastArgv != NULL && envp[i] != NULL; i++)
2417c2aa98e2SPeter Wemm 	{
2418c2aa98e2SPeter Wemm 		if (LastArgv + 1 == envp[i])
2419c2aa98e2SPeter Wemm 			LastArgv = envp[i] + strlen(envp[i]);
2420c2aa98e2SPeter Wemm 	}
2421c2aa98e2SPeter Wemm }
2422c2aa98e2SPeter Wemm 
2423c2aa98e2SPeter Wemm #if SPT_TYPE != SPT_BUILTIN
2424c2aa98e2SPeter Wemm 
2425c2aa98e2SPeter Wemm /*VARARGS1*/
24263299c2f1SGregory Neil Shapiro static void
2427c2aa98e2SPeter Wemm # ifdef __STDC__
2428c2aa98e2SPeter Wemm setproctitle(const char *fmt, ...)
24293299c2f1SGregory Neil Shapiro # else /* __STDC__ */
2430c2aa98e2SPeter Wemm setproctitle(fmt, va_alist)
2431c2aa98e2SPeter Wemm 	const char *fmt;
2432c2aa98e2SPeter Wemm 	va_dcl
24333299c2f1SGregory Neil Shapiro # endif /* __STDC__ */
2434c2aa98e2SPeter Wemm {
2435c2aa98e2SPeter Wemm # if SPT_TYPE != SPT_NONE
2436c2aa98e2SPeter Wemm 	register int i;
24373299c2f1SGregory Neil Shapiro 	register char *p;
2438c2aa98e2SPeter Wemm 	SETPROC_STATIC char buf[SPT_BUFSIZE];
2439c2aa98e2SPeter Wemm 	VA_LOCAL_DECL
2440c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_PSTAT
2441c2aa98e2SPeter Wemm 	union pstun pst;
24423299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_PSTAT */
2443c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_SCO
2444c2aa98e2SPeter Wemm 	off_t seek_off;
2445c2aa98e2SPeter Wemm 	static int kmem = -1;
2446c2aa98e2SPeter Wemm 	static int kmempid = -1;
2447c2aa98e2SPeter Wemm 	struct user u;
24483299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_SCO */
2449c2aa98e2SPeter Wemm 
2450c2aa98e2SPeter Wemm 	p = buf;
2451c2aa98e2SPeter Wemm 
2452c2aa98e2SPeter Wemm 	/* print sendmail: heading for grep */
24533299c2f1SGregory Neil Shapiro 	(void) strlcpy(p, "sendmail: ", SPACELEFT(buf, p));
2454c2aa98e2SPeter Wemm 	p += strlen(p);
2455c2aa98e2SPeter Wemm 
2456c2aa98e2SPeter Wemm 	/* print the argument string */
2457c2aa98e2SPeter Wemm 	VA_START(fmt);
2458c2aa98e2SPeter Wemm 	(void) vsnprintf(p, SPACELEFT(buf, p), fmt, ap);
2459c2aa98e2SPeter Wemm 	VA_END;
2460c2aa98e2SPeter Wemm 
2461c2aa98e2SPeter Wemm 	i = strlen(buf);
2462c2aa98e2SPeter Wemm 
2463c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_PSTAT
2464c2aa98e2SPeter Wemm 	pst.pst_command = buf;
2465c2aa98e2SPeter Wemm 	pstat(PSTAT_SETCMD, pst, i, 0, 0);
24663299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_PSTAT */
2467c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_PSSTRINGS
2468c2aa98e2SPeter Wemm 	PS_STRINGS->ps_nargvstr = 1;
2469c2aa98e2SPeter Wemm 	PS_STRINGS->ps_argvstr = buf;
24703299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_PSSTRINGS */
2471c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_SYSMIPS
2472c2aa98e2SPeter Wemm 	sysmips(SONY_SYSNEWS, NEWS_SETPSARGS, buf);
24733299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_SYSMIPS */
2474c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_SCO
2475c2aa98e2SPeter Wemm 	if (kmem < 0 || kmempid != getpid())
2476c2aa98e2SPeter Wemm 	{
2477c2aa98e2SPeter Wemm 		if (kmem >= 0)
2478c2aa98e2SPeter Wemm 			close(kmem);
2479c2aa98e2SPeter Wemm 		kmem = open(_PATH_KMEM, O_RDWR, 0);
2480c2aa98e2SPeter Wemm 		if (kmem < 0)
2481c2aa98e2SPeter Wemm 			return;
24823299c2f1SGregory Neil Shapiro 		(void) fcntl(kmem, F_SETFD, FD_CLOEXEC);
2483c2aa98e2SPeter Wemm 		kmempid = getpid();
2484c2aa98e2SPeter Wemm 	}
2485c2aa98e2SPeter Wemm 	buf[PSARGSZ - 1] = '\0';
2486c2aa98e2SPeter Wemm 	seek_off = UVUBLK + (off_t) u.u_psargs - (off_t) &u;
2487c2aa98e2SPeter Wemm 	if (lseek(kmem, (off_t) seek_off, SEEK_SET) == seek_off)
2488c2aa98e2SPeter Wemm 		(void) write(kmem, buf, PSARGSZ);
24893299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_SCO */
2490c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_REUSEARGV
24913299c2f1SGregory Neil Shapiro 	if (LastArgv == NULL)
24923299c2f1SGregory Neil Shapiro 		return;
24933299c2f1SGregory Neil Shapiro 
2494c2aa98e2SPeter Wemm 	if (i > LastArgv - Argv[0] - 2)
2495c2aa98e2SPeter Wemm 	{
2496c2aa98e2SPeter Wemm 		i = LastArgv - Argv[0] - 2;
2497c2aa98e2SPeter Wemm 		buf[i] = '\0';
2498c2aa98e2SPeter Wemm 	}
24993299c2f1SGregory Neil Shapiro 	(void) strlcpy(Argv[0], buf, i + 1);
2500c2aa98e2SPeter Wemm 	p = &Argv[0][i];
2501c2aa98e2SPeter Wemm 	while (p < LastArgv)
2502c2aa98e2SPeter Wemm 		*p++ = SPT_PADCHAR;
2503c2aa98e2SPeter Wemm 	Argv[1] = NULL;
25043299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_REUSEARGV */
2505c2aa98e2SPeter Wemm #  if SPT_TYPE == SPT_CHANGEARGV
2506c2aa98e2SPeter Wemm 	Argv[0] = buf;
2507c2aa98e2SPeter Wemm 	Argv[1] = 0;
25083299c2f1SGregory Neil Shapiro #  endif /* SPT_TYPE == SPT_CHANGEARGV */
2509c2aa98e2SPeter Wemm # endif /* SPT_TYPE != SPT_NONE */
2510c2aa98e2SPeter Wemm }
2511c2aa98e2SPeter Wemm 
2512c2aa98e2SPeter Wemm #endif /* SPT_TYPE != SPT_BUILTIN */
2513c2aa98e2SPeter Wemm /*
251476b7bf71SPeter Wemm **  SM_SETPROCTITLE -- set process task and set process title for ps
251576b7bf71SPeter Wemm **
251676b7bf71SPeter Wemm **	Possibly set process status and call setproctitle() to
251776b7bf71SPeter Wemm **	change the ps display.
251876b7bf71SPeter Wemm **
251976b7bf71SPeter Wemm **	Parameters:
252076b7bf71SPeter Wemm **		status -- whether or not to store as process status
25213299c2f1SGregory Neil Shapiro **		e -- the current envelope.
252276b7bf71SPeter Wemm **		fmt -- a printf style format string.
252376b7bf71SPeter Wemm **		a, b, c -- possible parameters to fmt.
252476b7bf71SPeter Wemm **
252576b7bf71SPeter Wemm **	Returns:
252676b7bf71SPeter Wemm **		none.
252776b7bf71SPeter Wemm */
252876b7bf71SPeter Wemm 
252976b7bf71SPeter Wemm /*VARARGS2*/
253076b7bf71SPeter Wemm void
253176b7bf71SPeter Wemm #ifdef __STDC__
25323299c2f1SGregory Neil Shapiro sm_setproctitle(bool status, ENVELOPE *e, const char *fmt, ...)
25333299c2f1SGregory Neil Shapiro #else /* __STDC__ */
25343299c2f1SGregory Neil Shapiro sm_setproctitle(status, e, fmt, va_alist)
253576b7bf71SPeter Wemm 	bool status;
25363299c2f1SGregory Neil Shapiro 	ENVELOPE *e;
253776b7bf71SPeter Wemm 	const char *fmt;
253876b7bf71SPeter Wemm 	va_dcl
25393299c2f1SGregory Neil Shapiro #endif /* __STDC__ */
254076b7bf71SPeter Wemm {
254176b7bf71SPeter Wemm 	char buf[SPT_BUFSIZE];
254276b7bf71SPeter Wemm 	VA_LOCAL_DECL
25433299c2f1SGregory Neil Shapiro 
254476b7bf71SPeter Wemm 	/* print the argument string */
254576b7bf71SPeter Wemm 	VA_START(fmt);
25463299c2f1SGregory Neil Shapiro 	(void) vsnprintf(buf, sizeof buf, fmt, ap);
254776b7bf71SPeter Wemm 	VA_END;
254876b7bf71SPeter Wemm 
254976b7bf71SPeter Wemm 	if (status)
255076b7bf71SPeter Wemm 		proc_list_set(getpid(), buf);
25513299c2f1SGregory Neil Shapiro 
25523299c2f1SGregory Neil Shapiro 	if (ProcTitlePrefix != NULL)
25533299c2f1SGregory Neil Shapiro 	{
25543299c2f1SGregory Neil Shapiro 		char prefix[SPT_BUFSIZE];
25553299c2f1SGregory Neil Shapiro 
25563299c2f1SGregory Neil Shapiro 		expand(ProcTitlePrefix, prefix, sizeof prefix, e);
25573299c2f1SGregory Neil Shapiro 		setproctitle("%s: %s", prefix, buf);
25583299c2f1SGregory Neil Shapiro 	}
25593299c2f1SGregory Neil Shapiro 	else
256076b7bf71SPeter Wemm 		setproctitle("%s", buf);
256176b7bf71SPeter Wemm }
256276b7bf71SPeter Wemm /*
2563c2aa98e2SPeter Wemm **  WAITFOR -- wait for a particular process id.
2564c2aa98e2SPeter Wemm **
2565c2aa98e2SPeter Wemm **	Parameters:
2566c2aa98e2SPeter Wemm **		pid -- process id to wait for.
2567c2aa98e2SPeter Wemm **
2568c2aa98e2SPeter Wemm **	Returns:
2569c2aa98e2SPeter Wemm **		status of pid.
2570c2aa98e2SPeter Wemm **		-1 if pid never shows up.
2571c2aa98e2SPeter Wemm **
2572c2aa98e2SPeter Wemm **	Side Effects:
2573c2aa98e2SPeter Wemm **		none.
2574c2aa98e2SPeter Wemm */
2575c2aa98e2SPeter Wemm 
2576c2aa98e2SPeter Wemm int
2577c2aa98e2SPeter Wemm waitfor(pid)
2578c2aa98e2SPeter Wemm 	pid_t pid;
2579c2aa98e2SPeter Wemm {
2580c2aa98e2SPeter Wemm # ifdef WAITUNION
2581c2aa98e2SPeter Wemm 	union wait st;
25823299c2f1SGregory Neil Shapiro # else /* WAITUNION */
2583c2aa98e2SPeter Wemm 	auto int st;
25843299c2f1SGregory Neil Shapiro # endif /* WAITUNION */
2585c2aa98e2SPeter Wemm 	pid_t i;
2586c2aa98e2SPeter Wemm # if defined(ISC_UNIX) || defined(_SCO_unix_)
2587c2aa98e2SPeter Wemm 	int savesig;
25883299c2f1SGregory Neil Shapiro # endif /* defined(ISC_UNIX) || defined(_SCO_unix_) */
2589c2aa98e2SPeter Wemm 
2590c2aa98e2SPeter Wemm 	do
2591c2aa98e2SPeter Wemm 	{
2592c2aa98e2SPeter Wemm 		errno = 0;
2593c2aa98e2SPeter Wemm # if defined(ISC_UNIX) || defined(_SCO_unix_)
2594c2aa98e2SPeter Wemm 		savesig = releasesignal(SIGCHLD);
25953299c2f1SGregory Neil Shapiro # endif /* defined(ISC_UNIX) || defined(_SCO_unix_) */
2596c2aa98e2SPeter Wemm 		i = wait(&st);
2597c2aa98e2SPeter Wemm # if defined(ISC_UNIX) || defined(_SCO_unix_)
2598c2aa98e2SPeter Wemm 		if (savesig > 0)
2599c2aa98e2SPeter Wemm 			blocksignal(SIGCHLD);
26003299c2f1SGregory Neil Shapiro # endif /* defined(ISC_UNIX) || defined(_SCO_unix_) */
2601c2aa98e2SPeter Wemm 		if (i > 0)
26023299c2f1SGregory Neil Shapiro 			(void) proc_list_drop(i);
2603c2aa98e2SPeter Wemm 	} while ((i >= 0 || errno == EINTR) && i != pid);
2604c2aa98e2SPeter Wemm 	if (i < 0)
2605c2aa98e2SPeter Wemm 		return -1;
2606c2aa98e2SPeter Wemm # ifdef WAITUNION
2607c2aa98e2SPeter Wemm 	return st.w_status;
26083299c2f1SGregory Neil Shapiro # else /* WAITUNION */
2609c2aa98e2SPeter Wemm 	return st;
26103299c2f1SGregory Neil Shapiro # endif /* WAITUNION */
2611c2aa98e2SPeter Wemm }
2612c2aa98e2SPeter Wemm /*
2613c2aa98e2SPeter Wemm **  REAPCHILD -- pick up the body of my child, lest it become a zombie
2614c2aa98e2SPeter Wemm **
2615c2aa98e2SPeter Wemm **	Parameters:
2616c2aa98e2SPeter Wemm **		sig -- the signal that got us here (unused).
2617c2aa98e2SPeter Wemm **
2618c2aa98e2SPeter Wemm **	Returns:
2619c2aa98e2SPeter Wemm **		none.
2620c2aa98e2SPeter Wemm **
2621c2aa98e2SPeter Wemm **	Side Effects:
2622c2aa98e2SPeter Wemm **		Picks up extant zombies.
26233299c2f1SGregory Neil Shapiro **		Control socket exits may restart/shutdown daemon.
2624c2aa98e2SPeter Wemm */
2625c2aa98e2SPeter Wemm 
26263299c2f1SGregory Neil Shapiro /* ARGSUSED0 */
2627c2aa98e2SPeter Wemm SIGFUNC_DECL
2628c2aa98e2SPeter Wemm reapchild(sig)
2629c2aa98e2SPeter Wemm 	int sig;
2630c2aa98e2SPeter Wemm {
26313299c2f1SGregory Neil Shapiro 	int save_errno = errno;
26323299c2f1SGregory Neil Shapiro 	int st;
2633c2aa98e2SPeter Wemm 	pid_t pid;
26343299c2f1SGregory Neil Shapiro #if HASWAITPID
2635c2aa98e2SPeter Wemm 	auto int status;
2636c2aa98e2SPeter Wemm 	int count;
2637c2aa98e2SPeter Wemm 
2638c2aa98e2SPeter Wemm 	count = 0;
2639c2aa98e2SPeter Wemm 	while ((pid = waitpid(-1, &status, WNOHANG)) > 0)
2640c2aa98e2SPeter Wemm 	{
26413299c2f1SGregory Neil Shapiro 		st = status;
2642c2aa98e2SPeter Wemm 		if (count++ > 1000)
2643c2aa98e2SPeter Wemm 		{
2644c2aa98e2SPeter Wemm 			if (LogLevel > 0)
2645c2aa98e2SPeter Wemm 				sm_syslog(LOG_ALERT, NOQID,
2646c2aa98e2SPeter Wemm 					"reapchild: waitpid loop: pid=%d, status=%x",
2647c2aa98e2SPeter Wemm 					pid, status);
2648c2aa98e2SPeter Wemm 			break;
2649c2aa98e2SPeter Wemm 		}
26503299c2f1SGregory Neil Shapiro #else /* HASWAITPID */
2651c2aa98e2SPeter Wemm # ifdef WNOHANG
2652c2aa98e2SPeter Wemm 	union wait status;
2653c2aa98e2SPeter Wemm 
2654c2aa98e2SPeter Wemm 	while ((pid = wait3(&status, WNOHANG, (struct rusage *) NULL)) > 0)
26553299c2f1SGregory Neil Shapiro 	{
26563299c2f1SGregory Neil Shapiro 		st = status.w_status;
2657c2aa98e2SPeter Wemm # else /* WNOHANG */
2658c2aa98e2SPeter Wemm 	auto int status;
2659c2aa98e2SPeter Wemm 
2660c2aa98e2SPeter Wemm 	/*
2661c2aa98e2SPeter Wemm 	**  Catch one zombie -- we will be re-invoked (we hope) if there
2662c2aa98e2SPeter Wemm 	**  are more.  Unreliable signals probably break this, but this
2663c2aa98e2SPeter Wemm 	**  is the "old system" situation -- waitpid or wait3 are to be
2664c2aa98e2SPeter Wemm 	**  strongly preferred.
2665c2aa98e2SPeter Wemm 	*/
2666c2aa98e2SPeter Wemm 
2667c2aa98e2SPeter Wemm 	if ((pid = wait(&status)) > 0)
26683299c2f1SGregory Neil Shapiro 	{
26693299c2f1SGregory Neil Shapiro 		st = status;
2670c2aa98e2SPeter Wemm # endif /* WNOHANG */
26713299c2f1SGregory Neil Shapiro #endif /* HASWAITPID */
26723299c2f1SGregory Neil Shapiro 		/* Drop PID and check if it was a control socket child */
26733299c2f1SGregory Neil Shapiro 		if (proc_list_drop(pid) == PROC_CONTROL &&
26743299c2f1SGregory Neil Shapiro 		    WIFEXITED(st))
26753299c2f1SGregory Neil Shapiro 		{
26763299c2f1SGregory Neil Shapiro 			/* if so, see if we need to restart or shutdown */
26773299c2f1SGregory Neil Shapiro 			if (WEXITSTATUS(st) == EX_RESTART)
26783299c2f1SGregory Neil Shapiro 			{
26793299c2f1SGregory Neil Shapiro 				/* emulate a SIGHUP restart */
26803299c2f1SGregory Neil Shapiro 				sighup(0);
26813299c2f1SGregory Neil Shapiro 				/* NOTREACHED */
26823299c2f1SGregory Neil Shapiro 			}
26833299c2f1SGregory Neil Shapiro 			else if (WEXITSTATUS(st) == EX_SHUTDOWN)
26843299c2f1SGregory Neil Shapiro 			{
26853299c2f1SGregory Neil Shapiro 				/* emulate a SIGTERM shutdown */
26863299c2f1SGregory Neil Shapiro 				intsig(0);
26873299c2f1SGregory Neil Shapiro 				/* NOTREACHED */
26883299c2f1SGregory Neil Shapiro 			}
26893299c2f1SGregory Neil Shapiro 		}
26903299c2f1SGregory Neil Shapiro 	}
2691c2aa98e2SPeter Wemm #ifdef SYS5SIGNALS
2692c2aa98e2SPeter Wemm 	(void) setsignal(SIGCHLD, reapchild);
26933299c2f1SGregory Neil Shapiro #endif /* SYS5SIGNALS */
26943299c2f1SGregory Neil Shapiro 	errno = save_errno;
2695c2aa98e2SPeter Wemm 	return SIGFUNC_RETURN;
2696c2aa98e2SPeter Wemm }
2697c2aa98e2SPeter Wemm /*
2698c2aa98e2SPeter Wemm **  PUTENV -- emulation of putenv() in terms of setenv()
2699c2aa98e2SPeter Wemm **
2700c2aa98e2SPeter Wemm **	Not needed on Posix-compliant systems.
2701c2aa98e2SPeter Wemm **	This doesn't have full Posix semantics, but it's good enough
2702c2aa98e2SPeter Wemm **		for sendmail.
2703c2aa98e2SPeter Wemm **
2704c2aa98e2SPeter Wemm **	Parameter:
2705c2aa98e2SPeter Wemm **		env -- the environment to put.
2706c2aa98e2SPeter Wemm **
2707c2aa98e2SPeter Wemm **	Returns:
2708c2aa98e2SPeter Wemm **		none.
2709c2aa98e2SPeter Wemm */
2710c2aa98e2SPeter Wemm 
27113299c2f1SGregory Neil Shapiro #if NEEDPUTENV
2712c2aa98e2SPeter Wemm 
2713c2aa98e2SPeter Wemm # if NEEDPUTENV == 2		/* no setenv(3) call available */
2714c2aa98e2SPeter Wemm 
2715c2aa98e2SPeter Wemm int
2716c2aa98e2SPeter Wemm putenv(str)
2717c2aa98e2SPeter Wemm 	char *str;
2718c2aa98e2SPeter Wemm {
2719c2aa98e2SPeter Wemm 	char **current;
2720c2aa98e2SPeter Wemm 	int matchlen, envlen = 0;
2721c2aa98e2SPeter Wemm 	char *tmp;
2722c2aa98e2SPeter Wemm 	char **newenv;
27233299c2f1SGregory Neil Shapiro 	static bool first = TRUE;
2724c2aa98e2SPeter Wemm 	extern char **environ;
2725c2aa98e2SPeter Wemm 
2726c2aa98e2SPeter Wemm 	/*
2727c2aa98e2SPeter Wemm 	 * find out how much of str to match when searching
2728c2aa98e2SPeter Wemm 	 * for a string to replace.
2729c2aa98e2SPeter Wemm 	 */
2730c2aa98e2SPeter Wemm 	if ((tmp = strchr(str, '=')) == NULL || tmp == str)
2731c2aa98e2SPeter Wemm 		matchlen = strlen(str);
2732c2aa98e2SPeter Wemm 	else
2733c2aa98e2SPeter Wemm 		matchlen = (int) (tmp - str);
2734c2aa98e2SPeter Wemm 	++matchlen;
2735c2aa98e2SPeter Wemm 
2736c2aa98e2SPeter Wemm 	/*
2737c2aa98e2SPeter Wemm 	 * Search for an existing string in the environment and find the
2738c2aa98e2SPeter Wemm 	 * length of environ.  If found, replace and exit.
2739c2aa98e2SPeter Wemm 	 */
27403299c2f1SGregory Neil Shapiro 	for (current = environ; *current; current++)
27413299c2f1SGregory Neil Shapiro 	{
2742c2aa98e2SPeter Wemm 		++envlen;
2743c2aa98e2SPeter Wemm 
27443299c2f1SGregory Neil Shapiro 		if (strncmp(str, *current, matchlen) == 0)
27453299c2f1SGregory Neil Shapiro 		{
2746c2aa98e2SPeter Wemm 			/* found it, now insert the new version */
2747c2aa98e2SPeter Wemm 			*current = (char *)str;
27483299c2f1SGregory Neil Shapiro 			return 0;
2749c2aa98e2SPeter Wemm 		}
2750c2aa98e2SPeter Wemm 	}
2751c2aa98e2SPeter Wemm 
2752c2aa98e2SPeter Wemm 	/*
2753c2aa98e2SPeter Wemm 	 * There wasn't already a slot so add space for a new slot.
2754c2aa98e2SPeter Wemm 	 * If this is our first time through, use malloc(), else realloc().
2755c2aa98e2SPeter Wemm 	 */
27563299c2f1SGregory Neil Shapiro 	if (first)
27573299c2f1SGregory Neil Shapiro 	{
2758c2aa98e2SPeter Wemm 		newenv = (char **) malloc(sizeof(char *) * (envlen + 2));
2759c2aa98e2SPeter Wemm 		if (newenv == NULL)
27603299c2f1SGregory Neil Shapiro 			return -1;
2761c2aa98e2SPeter Wemm 
27623299c2f1SGregory Neil Shapiro 		first = FALSE;
2763c2aa98e2SPeter Wemm 		(void) memcpy(newenv, environ, sizeof(char *) * envlen);
27643299c2f1SGregory Neil Shapiro 	}
27653299c2f1SGregory Neil Shapiro 	else
27663299c2f1SGregory Neil Shapiro 	{
2767c2aa98e2SPeter Wemm 		newenv = (char **) realloc((char *)environ, sizeof(char *) * (envlen + 2));
2768c2aa98e2SPeter Wemm 		if (newenv == NULL)
27693299c2f1SGregory Neil Shapiro 			return -1;
2770c2aa98e2SPeter Wemm 	}
2771c2aa98e2SPeter Wemm 
2772c2aa98e2SPeter Wemm 	/* actually add in the new entry */
2773c2aa98e2SPeter Wemm 	environ = newenv;
2774c2aa98e2SPeter Wemm 	environ[envlen] = (char *)str;
2775c2aa98e2SPeter Wemm 	environ[envlen + 1] = NULL;
2776c2aa98e2SPeter Wemm 
27773299c2f1SGregory Neil Shapiro 	return 0;
2778c2aa98e2SPeter Wemm }
2779c2aa98e2SPeter Wemm 
27803299c2f1SGregory Neil Shapiro # else /* NEEDPUTENV == 2 */
2781c2aa98e2SPeter Wemm 
2782c2aa98e2SPeter Wemm int
2783c2aa98e2SPeter Wemm putenv(env)
2784c2aa98e2SPeter Wemm 	char *env;
2785c2aa98e2SPeter Wemm {
2786c2aa98e2SPeter Wemm 	char *p;
2787c2aa98e2SPeter Wemm 	int l;
2788c2aa98e2SPeter Wemm 	char nbuf[100];
2789c2aa98e2SPeter Wemm 
2790c2aa98e2SPeter Wemm 	p = strchr(env, '=');
2791c2aa98e2SPeter Wemm 	if (p == NULL)
2792c2aa98e2SPeter Wemm 		return 0;
2793c2aa98e2SPeter Wemm 	l = p - env;
2794c2aa98e2SPeter Wemm 	if (l > sizeof nbuf - 1)
2795c2aa98e2SPeter Wemm 		l = sizeof nbuf - 1;
27963299c2f1SGregory Neil Shapiro 	memmove(nbuf, env, l);
2797c2aa98e2SPeter Wemm 	nbuf[l] = '\0';
2798c2aa98e2SPeter Wemm 	return setenv(nbuf, ++p, 1);
2799c2aa98e2SPeter Wemm }
2800c2aa98e2SPeter Wemm 
28013299c2f1SGregory Neil Shapiro # endif /* NEEDPUTENV == 2 */
28023299c2f1SGregory Neil Shapiro #endif /* NEEDPUTENV */
2803c2aa98e2SPeter Wemm /*
2804c2aa98e2SPeter Wemm **  UNSETENV -- remove a variable from the environment
2805c2aa98e2SPeter Wemm **
2806c2aa98e2SPeter Wemm **	Not needed on newer systems.
2807c2aa98e2SPeter Wemm **
2808c2aa98e2SPeter Wemm **	Parameters:
2809c2aa98e2SPeter Wemm **		name -- the string name of the environment variable to be
2810c2aa98e2SPeter Wemm **			deleted from the current environment.
2811c2aa98e2SPeter Wemm **
2812c2aa98e2SPeter Wemm **	Returns:
2813c2aa98e2SPeter Wemm **		none.
2814c2aa98e2SPeter Wemm **
2815c2aa98e2SPeter Wemm **	Globals:
2816c2aa98e2SPeter Wemm **		environ -- a pointer to the current environment.
2817c2aa98e2SPeter Wemm **
2818c2aa98e2SPeter Wemm **	Side Effects:
2819c2aa98e2SPeter Wemm **		Modifies environ.
2820c2aa98e2SPeter Wemm */
2821c2aa98e2SPeter Wemm 
28223299c2f1SGregory Neil Shapiro #if !HASUNSETENV
2823c2aa98e2SPeter Wemm 
2824c2aa98e2SPeter Wemm void
2825c2aa98e2SPeter Wemm unsetenv(name)
2826c2aa98e2SPeter Wemm 	char *name;
2827c2aa98e2SPeter Wemm {
2828c2aa98e2SPeter Wemm 	extern char **environ;
2829c2aa98e2SPeter Wemm 	register char **pp;
2830c2aa98e2SPeter Wemm 	int len = strlen(name);
2831c2aa98e2SPeter Wemm 
2832c2aa98e2SPeter Wemm 	for (pp = environ; *pp != NULL; pp++)
2833c2aa98e2SPeter Wemm 	{
2834c2aa98e2SPeter Wemm 		if (strncmp(name, *pp, len) == 0 &&
2835c2aa98e2SPeter Wemm 		    ((*pp)[len] == '=' || (*pp)[len] == '\0'))
2836c2aa98e2SPeter Wemm 			break;
2837c2aa98e2SPeter Wemm 	}
2838c2aa98e2SPeter Wemm 
2839c2aa98e2SPeter Wemm 	for (; *pp != NULL; pp++)
2840c2aa98e2SPeter Wemm 		*pp = pp[1];
2841c2aa98e2SPeter Wemm }
2842c2aa98e2SPeter Wemm 
28433299c2f1SGregory Neil Shapiro #endif /* !HASUNSETENV */
2844c2aa98e2SPeter Wemm /*
2845c2aa98e2SPeter Wemm **  GETDTABLESIZE -- return number of file descriptors
2846c2aa98e2SPeter Wemm **
2847c2aa98e2SPeter Wemm **	Only on non-BSD systems
2848c2aa98e2SPeter Wemm **
2849c2aa98e2SPeter Wemm **	Parameters:
2850c2aa98e2SPeter Wemm **		none
2851c2aa98e2SPeter Wemm **
2852c2aa98e2SPeter Wemm **	Returns:
2853c2aa98e2SPeter Wemm **		size of file descriptor table
2854c2aa98e2SPeter Wemm **
2855c2aa98e2SPeter Wemm **	Side Effects:
2856c2aa98e2SPeter Wemm **		none
2857c2aa98e2SPeter Wemm */
2858c2aa98e2SPeter Wemm 
2859c2aa98e2SPeter Wemm #ifdef SOLARIS
2860c2aa98e2SPeter Wemm # include <sys/resource.h>
28613299c2f1SGregory Neil Shapiro #endif /* SOLARIS */
2862c2aa98e2SPeter Wemm 
2863c2aa98e2SPeter Wemm int
2864c2aa98e2SPeter Wemm getdtsize()
2865c2aa98e2SPeter Wemm {
2866c2aa98e2SPeter Wemm # ifdef RLIMIT_NOFILE
2867c2aa98e2SPeter Wemm 	struct rlimit rl;
2868c2aa98e2SPeter Wemm 
2869c2aa98e2SPeter Wemm 	if (getrlimit(RLIMIT_NOFILE, &rl) >= 0)
2870c2aa98e2SPeter Wemm 		return rl.rlim_cur;
28713299c2f1SGregory Neil Shapiro # endif /* RLIMIT_NOFILE */
2872c2aa98e2SPeter Wemm 
28733299c2f1SGregory Neil Shapiro # if HASGETDTABLESIZE
2874c2aa98e2SPeter Wemm 	return getdtablesize();
28753299c2f1SGregory Neil Shapiro # else /* HASGETDTABLESIZE */
2876c2aa98e2SPeter Wemm #  ifdef _SC_OPEN_MAX
2877c2aa98e2SPeter Wemm 	return sysconf(_SC_OPEN_MAX);
28783299c2f1SGregory Neil Shapiro #  else /* _SC_OPEN_MAX */
2879c2aa98e2SPeter Wemm 	return NOFILE;
28803299c2f1SGregory Neil Shapiro #  endif /* _SC_OPEN_MAX */
28813299c2f1SGregory Neil Shapiro # endif /* HASGETDTABLESIZE */
2882c2aa98e2SPeter Wemm }
2883c2aa98e2SPeter Wemm /*
2884c2aa98e2SPeter Wemm **  UNAME -- get the UUCP name of this system.
2885c2aa98e2SPeter Wemm */
2886c2aa98e2SPeter Wemm 
28873299c2f1SGregory Neil Shapiro #if !HASUNAME
2888c2aa98e2SPeter Wemm 
2889c2aa98e2SPeter Wemm int
2890c2aa98e2SPeter Wemm uname(name)
2891c2aa98e2SPeter Wemm 	struct utsname *name;
2892c2aa98e2SPeter Wemm {
2893c2aa98e2SPeter Wemm 	FILE *file;
2894c2aa98e2SPeter Wemm 	char *n;
2895c2aa98e2SPeter Wemm 
2896c2aa98e2SPeter Wemm 	name->nodename[0] = '\0';
2897c2aa98e2SPeter Wemm 
2898c2aa98e2SPeter Wemm 	/* try /etc/whoami -- one line with the node name */
2899c2aa98e2SPeter Wemm 	if ((file = fopen("/etc/whoami", "r")) != NULL)
2900c2aa98e2SPeter Wemm 	{
2901c2aa98e2SPeter Wemm 		(void) fgets(name->nodename, NODE_LENGTH + 1, file);
2902c2aa98e2SPeter Wemm 		(void) fclose(file);
2903c2aa98e2SPeter Wemm 		n = strchr(name->nodename, '\n');
2904c2aa98e2SPeter Wemm 		if (n != NULL)
2905c2aa98e2SPeter Wemm 			*n = '\0';
2906c2aa98e2SPeter Wemm 		if (name->nodename[0] != '\0')
29073299c2f1SGregory Neil Shapiro 			return 0;
2908c2aa98e2SPeter Wemm 	}
2909c2aa98e2SPeter Wemm 
2910c2aa98e2SPeter Wemm 	/* try /usr/include/whoami.h -- has a #define somewhere */
2911c2aa98e2SPeter Wemm 	if ((file = fopen("/usr/include/whoami.h", "r")) != NULL)
2912c2aa98e2SPeter Wemm 	{
2913c2aa98e2SPeter Wemm 		char buf[MAXLINE];
2914c2aa98e2SPeter Wemm 
2915c2aa98e2SPeter Wemm 		while (fgets(buf, MAXLINE, file) != NULL)
29163299c2f1SGregory Neil Shapiro 		{
2917c2aa98e2SPeter Wemm 			if (sscanf(buf, "#define sysname \"%*[^\"]\"",
2918c2aa98e2SPeter Wemm 					NODE_LENGTH, name->nodename) > 0)
2919c2aa98e2SPeter Wemm 				break;
29203299c2f1SGregory Neil Shapiro 		}
2921c2aa98e2SPeter Wemm 		(void) fclose(file);
2922c2aa98e2SPeter Wemm 		if (name->nodename[0] != '\0')
29233299c2f1SGregory Neil Shapiro 			return 0;
2924c2aa98e2SPeter Wemm 	}
2925c2aa98e2SPeter Wemm 
29263299c2f1SGregory Neil Shapiro #  if 0
2927c2aa98e2SPeter Wemm 	/*
2928c2aa98e2SPeter Wemm 	**  Popen is known to have security holes.
2929c2aa98e2SPeter Wemm 	*/
2930c2aa98e2SPeter Wemm 
2931c2aa98e2SPeter Wemm 	/* try uuname -l to return local name */
2932c2aa98e2SPeter Wemm 	if ((file = popen("uuname -l", "r")) != NULL)
2933c2aa98e2SPeter Wemm 	{
2934c2aa98e2SPeter Wemm 		(void) fgets(name, NODE_LENGTH + 1, file);
2935c2aa98e2SPeter Wemm 		(void) pclose(file);
2936c2aa98e2SPeter Wemm 		n = strchr(name, '\n');
2937c2aa98e2SPeter Wemm 		if (n != NULL)
2938c2aa98e2SPeter Wemm 			*n = '\0';
2939c2aa98e2SPeter Wemm 		if (name->nodename[0] != '\0')
29403299c2f1SGregory Neil Shapiro 			return 0;
2941c2aa98e2SPeter Wemm 	}
29423299c2f1SGregory Neil Shapiro #  endif /* 0 */
2943c2aa98e2SPeter Wemm 
29443299c2f1SGregory Neil Shapiro 	return -1;
2945c2aa98e2SPeter Wemm }
29463299c2f1SGregory Neil Shapiro #endif /* !HASUNAME */
2947c2aa98e2SPeter Wemm /*
2948c2aa98e2SPeter Wemm **  INITGROUPS -- initialize groups
2949c2aa98e2SPeter Wemm **
2950c2aa98e2SPeter Wemm **	Stub implementation for System V style systems
2951c2aa98e2SPeter Wemm */
2952c2aa98e2SPeter Wemm 
29533299c2f1SGregory Neil Shapiro #if !HASINITGROUPS
2954c2aa98e2SPeter Wemm 
2955c2aa98e2SPeter Wemm initgroups(name, basegid)
2956c2aa98e2SPeter Wemm 	char *name;
2957c2aa98e2SPeter Wemm 	int basegid;
2958c2aa98e2SPeter Wemm {
2959c2aa98e2SPeter Wemm 	return 0;
2960c2aa98e2SPeter Wemm }
2961c2aa98e2SPeter Wemm 
29623299c2f1SGregory Neil Shapiro #endif /* !HASINITGROUPS */
2963c2aa98e2SPeter Wemm /*
2964c2aa98e2SPeter Wemm **  SETGROUPS -- set group list
2965c2aa98e2SPeter Wemm **
2966c2aa98e2SPeter Wemm **	Stub implementation for systems that don't have group lists
2967c2aa98e2SPeter Wemm */
2968c2aa98e2SPeter Wemm 
2969c2aa98e2SPeter Wemm #ifndef NGROUPS_MAX
2970c2aa98e2SPeter Wemm 
2971c2aa98e2SPeter Wemm int
2972c2aa98e2SPeter Wemm setgroups(ngroups, grouplist)
2973c2aa98e2SPeter Wemm 	int ngroups;
2974c2aa98e2SPeter Wemm 	GIDSET_T grouplist[];
2975c2aa98e2SPeter Wemm {
2976c2aa98e2SPeter Wemm 	return 0;
2977c2aa98e2SPeter Wemm }
2978c2aa98e2SPeter Wemm 
29793299c2f1SGregory Neil Shapiro #endif /* ! NGROUPS_MAX */
2980c2aa98e2SPeter Wemm /*
2981c2aa98e2SPeter Wemm **  SETSID -- set session id (for non-POSIX systems)
2982c2aa98e2SPeter Wemm */
2983c2aa98e2SPeter Wemm 
29843299c2f1SGregory Neil Shapiro #if !HASSETSID
2985c2aa98e2SPeter Wemm 
2986c2aa98e2SPeter Wemm pid_t
2987c2aa98e2SPeter Wemm setsid __P ((void))
2988c2aa98e2SPeter Wemm {
2989c2aa98e2SPeter Wemm #  ifdef TIOCNOTTY
2990c2aa98e2SPeter Wemm 	int fd;
2991c2aa98e2SPeter Wemm 
2992c2aa98e2SPeter Wemm 	fd = open("/dev/tty", O_RDWR, 0);
2993c2aa98e2SPeter Wemm 	if (fd >= 0)
2994c2aa98e2SPeter Wemm 	{
2995d995d2baSGregory Neil Shapiro 		(void) ioctl(fd, TIOCNOTTY, (char *) 0);
2996c2aa98e2SPeter Wemm 		(void) close(fd);
2997c2aa98e2SPeter Wemm 	}
2998c2aa98e2SPeter Wemm #  endif /* TIOCNOTTY */
2999c2aa98e2SPeter Wemm #  ifdef SYS5SETPGRP
3000c2aa98e2SPeter Wemm 	return setpgrp();
30013299c2f1SGregory Neil Shapiro #  else /* SYS5SETPGRP */
3002c2aa98e2SPeter Wemm 	return setpgid(0, getpid());
30033299c2f1SGregory Neil Shapiro #  endif /* SYS5SETPGRP */
3004c2aa98e2SPeter Wemm }
3005c2aa98e2SPeter Wemm 
30063299c2f1SGregory Neil Shapiro #endif /* !HASSETSID */
3007c2aa98e2SPeter Wemm /*
3008c2aa98e2SPeter Wemm **  FSYNC -- dummy fsync
3009c2aa98e2SPeter Wemm */
3010c2aa98e2SPeter Wemm 
30113299c2f1SGregory Neil Shapiro #if NEEDFSYNC
3012c2aa98e2SPeter Wemm 
3013c2aa98e2SPeter Wemm fsync(fd)
3014c2aa98e2SPeter Wemm 	int fd;
3015c2aa98e2SPeter Wemm {
3016c2aa98e2SPeter Wemm # ifdef O_SYNC
3017c2aa98e2SPeter Wemm 	return fcntl(fd, F_SETFL, O_SYNC);
30183299c2f1SGregory Neil Shapiro # else /* O_SYNC */
3019c2aa98e2SPeter Wemm 	/* nothing we can do */
3020c2aa98e2SPeter Wemm 	return 0;
30213299c2f1SGregory Neil Shapiro # endif /* O_SYNC */
3022c2aa98e2SPeter Wemm }
3023c2aa98e2SPeter Wemm 
30243299c2f1SGregory Neil Shapiro #endif /* NEEDFSYNC */
3025c2aa98e2SPeter Wemm /*
3026c2aa98e2SPeter Wemm **  DGUX_INET_ADDR -- inet_addr for DG/UX
3027c2aa98e2SPeter Wemm **
3028c2aa98e2SPeter Wemm **	Data General DG/UX version of inet_addr returns a struct in_addr
3029c2aa98e2SPeter Wemm **	instead of a long.  This patches things.  Only needed on versions
3030c2aa98e2SPeter Wemm **	prior to 5.4.3.
3031c2aa98e2SPeter Wemm */
3032c2aa98e2SPeter Wemm 
3033c2aa98e2SPeter Wemm #ifdef DGUX_5_4_2
3034c2aa98e2SPeter Wemm 
3035c2aa98e2SPeter Wemm # undef inet_addr
3036c2aa98e2SPeter Wemm 
3037c2aa98e2SPeter Wemm long
3038c2aa98e2SPeter Wemm dgux_inet_addr(host)
3039c2aa98e2SPeter Wemm 	char *host;
3040c2aa98e2SPeter Wemm {
3041c2aa98e2SPeter Wemm 	struct in_addr haddr;
3042c2aa98e2SPeter Wemm 
3043c2aa98e2SPeter Wemm 	haddr = inet_addr(host);
3044c2aa98e2SPeter Wemm 	return haddr.s_addr;
3045c2aa98e2SPeter Wemm }
3046c2aa98e2SPeter Wemm 
30473299c2f1SGregory Neil Shapiro #endif /* DGUX_5_4_2 */
3048c2aa98e2SPeter Wemm /*
3049c2aa98e2SPeter Wemm **  GETOPT -- for old systems or systems with bogus implementations
3050c2aa98e2SPeter Wemm */
3051c2aa98e2SPeter Wemm 
30523299c2f1SGregory Neil Shapiro #if NEEDGETOPT
3053c2aa98e2SPeter Wemm 
3054c2aa98e2SPeter Wemm /*
3055c2aa98e2SPeter Wemm  * Copyright (c) 1985 Regents of the University of California.
3056c2aa98e2SPeter Wemm  * All rights reserved.  The Berkeley software License Agreement
3057c2aa98e2SPeter Wemm  * specifies the terms and conditions for redistribution.
3058c2aa98e2SPeter Wemm  */
3059c2aa98e2SPeter Wemm 
3060c2aa98e2SPeter Wemm 
3061c2aa98e2SPeter Wemm /*
3062c2aa98e2SPeter Wemm **  this version hacked to add `atend' flag to allow state machine
3063c2aa98e2SPeter Wemm **  to reset if invoked by the program to scan args for a 2nd time
3064c2aa98e2SPeter Wemm */
3065c2aa98e2SPeter Wemm 
3066c2aa98e2SPeter Wemm # if defined(LIBC_SCCS) && !defined(lint)
3067c2aa98e2SPeter Wemm static char sccsid[] = "@(#)getopt.c	4.3 (Berkeley) 3/9/86";
30683299c2f1SGregory Neil Shapiro # endif /* defined(LIBC_SCCS) && !defined(lint) */
3069c2aa98e2SPeter Wemm 
3070c2aa98e2SPeter Wemm /*
3071c2aa98e2SPeter Wemm  * get option letter from argument vector
3072c2aa98e2SPeter Wemm  */
3073c2aa98e2SPeter Wemm # ifdef _CONVEX_SOURCE
3074c2aa98e2SPeter Wemm extern int	optind, opterr, optopt;
3075c2aa98e2SPeter Wemm extern char	*optarg;
30763299c2f1SGregory Neil Shapiro # else /* _CONVEX_SOURCE */
3077c2aa98e2SPeter Wemm int	opterr = 1;		/* if error message should be printed */
3078c2aa98e2SPeter Wemm int	optind = 1;		/* index into parent argv vector */
3079c2aa98e2SPeter Wemm int	optopt = 0;		/* character checked for validity */
3080c2aa98e2SPeter Wemm char	*optarg = NULL;		/* argument associated with option */
30813299c2f1SGregory Neil Shapiro # endif /* _CONVEX_SOURCE */
3082c2aa98e2SPeter Wemm 
3083c2aa98e2SPeter Wemm # define BADCH	(int)'?'
3084c2aa98e2SPeter Wemm # define EMSG	""
3085c2aa98e2SPeter Wemm # define tell(s)	if (opterr) {fputs(*nargv,stderr);fputs(s,stderr); \
3086c2aa98e2SPeter Wemm 			fputc(optopt,stderr);fputc('\n',stderr);return(BADCH);}
3087c2aa98e2SPeter Wemm 
3088c2aa98e2SPeter Wemm int
3089c2aa98e2SPeter Wemm getopt(nargc,nargv,ostr)
3090c2aa98e2SPeter Wemm 	int		nargc;
3091c2aa98e2SPeter Wemm 	char *const	*nargv;
3092c2aa98e2SPeter Wemm 	const char	*ostr;
3093c2aa98e2SPeter Wemm {
3094c2aa98e2SPeter Wemm 	static char	*place = EMSG;	/* option letter processing */
3095c2aa98e2SPeter Wemm 	static char	atend = 0;
3096c2aa98e2SPeter Wemm 	register char	*oli = NULL;	/* option letter list index */
3097c2aa98e2SPeter Wemm 
3098c2aa98e2SPeter Wemm 	if (atend) {
3099c2aa98e2SPeter Wemm 		atend = 0;
3100c2aa98e2SPeter Wemm 		place = EMSG;
3101c2aa98e2SPeter Wemm 	}
3102c2aa98e2SPeter Wemm 	if(!*place) {			/* update scanning pointer */
3103c2aa98e2SPeter Wemm 		if (optind >= nargc || *(place = nargv[optind]) != '-' || !*++place) {
3104c2aa98e2SPeter Wemm 			atend++;
3105c2aa98e2SPeter Wemm 			return -1;
3106c2aa98e2SPeter Wemm 		}
3107c2aa98e2SPeter Wemm 		if (*place == '-') {	/* found "--" */
3108c2aa98e2SPeter Wemm 			++optind;
3109c2aa98e2SPeter Wemm 			atend++;
3110c2aa98e2SPeter Wemm 			return -1;
3111c2aa98e2SPeter Wemm 		}
3112c2aa98e2SPeter Wemm 	}				/* option letter okay? */
3113c2aa98e2SPeter Wemm 	if ((optopt = (int)*place++) == (int)':' || !(oli = strchr(ostr,optopt))) {
3114c2aa98e2SPeter Wemm 		if (!*place) ++optind;
3115c2aa98e2SPeter Wemm 		tell(": illegal option -- ");
3116c2aa98e2SPeter Wemm 	}
3117c2aa98e2SPeter Wemm 	if (oli && *++oli != ':') {		/* don't need argument */
3118c2aa98e2SPeter Wemm 		optarg = NULL;
3119c2aa98e2SPeter Wemm 		if (!*place) ++optind;
3120c2aa98e2SPeter Wemm 	}
3121c2aa98e2SPeter Wemm 	else {				/* need an argument */
3122c2aa98e2SPeter Wemm 		if (*place) optarg = place;	/* no white space */
3123c2aa98e2SPeter Wemm 		else if (nargc <= ++optind) {	/* no arg */
3124c2aa98e2SPeter Wemm 			place = EMSG;
3125c2aa98e2SPeter Wemm 			tell(": option requires an argument -- ");
3126c2aa98e2SPeter Wemm 		}
3127c2aa98e2SPeter Wemm 		else optarg = nargv[optind];	/* white space */
3128c2aa98e2SPeter Wemm 		place = EMSG;
3129c2aa98e2SPeter Wemm 		++optind;
3130c2aa98e2SPeter Wemm 	}
3131c2aa98e2SPeter Wemm 	return(optopt);			/* dump back option letter */
3132c2aa98e2SPeter Wemm }
3133c2aa98e2SPeter Wemm 
31343299c2f1SGregory Neil Shapiro #endif /* NEEDGETOPT */
3135c2aa98e2SPeter Wemm /*
3136c2aa98e2SPeter Wemm **  VFPRINTF, VSPRINTF -- for old 4.3 BSD systems missing a real version
3137c2aa98e2SPeter Wemm */
3138c2aa98e2SPeter Wemm 
31393299c2f1SGregory Neil Shapiro #if NEEDVPRINTF
3140c2aa98e2SPeter Wemm 
3141c2aa98e2SPeter Wemm # define MAXARG	16
3142c2aa98e2SPeter Wemm 
3143c2aa98e2SPeter Wemm vfprintf(fp, fmt, ap)
3144c2aa98e2SPeter Wemm 	FILE *fp;
3145c2aa98e2SPeter Wemm 	char *fmt;
3146c2aa98e2SPeter Wemm 	char **ap;
3147c2aa98e2SPeter Wemm {
3148c2aa98e2SPeter Wemm 	char *bp[MAXARG];
3149c2aa98e2SPeter Wemm 	int i = 0;
3150c2aa98e2SPeter Wemm 
3151c2aa98e2SPeter Wemm 	while (*ap && i < MAXARG)
3152c2aa98e2SPeter Wemm 		bp[i++] = *ap++;
3153c2aa98e2SPeter Wemm 	fprintf(fp, fmt, bp[0], bp[1], bp[2], bp[3],
3154c2aa98e2SPeter Wemm 			 bp[4], bp[5], bp[6], bp[7],
3155c2aa98e2SPeter Wemm 			 bp[8], bp[9], bp[10], bp[11],
3156c2aa98e2SPeter Wemm 			 bp[12], bp[13], bp[14], bp[15]);
3157c2aa98e2SPeter Wemm }
3158c2aa98e2SPeter Wemm 
3159c2aa98e2SPeter Wemm vsprintf(s, fmt, ap)
3160c2aa98e2SPeter Wemm 	char *s;
3161c2aa98e2SPeter Wemm 	char *fmt;
3162c2aa98e2SPeter Wemm 	char **ap;
3163c2aa98e2SPeter Wemm {
3164c2aa98e2SPeter Wemm 	char *bp[MAXARG];
3165c2aa98e2SPeter Wemm 	int i = 0;
3166c2aa98e2SPeter Wemm 
3167c2aa98e2SPeter Wemm 	while (*ap && i < MAXARG)
3168c2aa98e2SPeter Wemm 		bp[i++] = *ap++;
3169c2aa98e2SPeter Wemm 	sprintf(s, fmt, bp[0], bp[1], bp[2], bp[3],
3170c2aa98e2SPeter Wemm 			bp[4], bp[5], bp[6], bp[7],
3171c2aa98e2SPeter Wemm 			bp[8], bp[9], bp[10], bp[11],
3172c2aa98e2SPeter Wemm 			bp[12], bp[13], bp[14], bp[15]);
3173c2aa98e2SPeter Wemm }
3174c2aa98e2SPeter Wemm 
31753299c2f1SGregory Neil Shapiro #endif /* NEEDVPRINTF */
3176c2aa98e2SPeter Wemm /*
3177c2aa98e2SPeter Wemm **  USERSHELLOK -- tell if a user's shell is ok for unrestricted use
3178c2aa98e2SPeter Wemm **
3179c2aa98e2SPeter Wemm **	Parameters:
3180c2aa98e2SPeter Wemm **		user -- the name of the user we are checking.
3181c2aa98e2SPeter Wemm **		shell -- the user's shell from /etc/passwd
3182c2aa98e2SPeter Wemm **
3183c2aa98e2SPeter Wemm **	Returns:
3184c2aa98e2SPeter Wemm **		TRUE -- if it is ok to use this for unrestricted access.
3185c2aa98e2SPeter Wemm **		FALSE -- if the shell is restricted.
3186c2aa98e2SPeter Wemm */
3187c2aa98e2SPeter Wemm 
3188c2aa98e2SPeter Wemm #if !HASGETUSERSHELL
3189c2aa98e2SPeter Wemm 
3190c2aa98e2SPeter Wemm # ifndef _PATH_SHELLS
3191c2aa98e2SPeter Wemm #  define _PATH_SHELLS	"/etc/shells"
31923299c2f1SGregory Neil Shapiro # endif /* ! _PATH_SHELLS */
3193c2aa98e2SPeter Wemm 
3194c2aa98e2SPeter Wemm # if defined(_AIX3) || defined(_AIX4)
3195c2aa98e2SPeter Wemm #  include <userconf.h>
3196c2aa98e2SPeter Wemm #  if _AIX4 >= 40200
3197c2aa98e2SPeter Wemm #   include <userpw.h>
31983299c2f1SGregory Neil Shapiro #  endif /* _AIX4 >= 40200 */
3199c2aa98e2SPeter Wemm #  include <usersec.h>
32003299c2f1SGregory Neil Shapiro # endif /* defined(_AIX3) || defined(_AIX4) */
3201c2aa98e2SPeter Wemm 
32023299c2f1SGregory Neil Shapiro static char	*DefaultUserShells[] =
3203c2aa98e2SPeter Wemm {
3204c2aa98e2SPeter Wemm 	"/bin/sh",		/* standard shell */
3205c2aa98e2SPeter Wemm 	"/usr/bin/sh",
3206c2aa98e2SPeter Wemm 	"/bin/csh",		/* C shell */
3207c2aa98e2SPeter Wemm 	"/usr/bin/csh",
3208c2aa98e2SPeter Wemm # ifdef __hpux
3209c2aa98e2SPeter Wemm #  ifdef V4FS
3210c2aa98e2SPeter Wemm 	"/usr/bin/rsh",		/* restricted Bourne shell */
3211c2aa98e2SPeter Wemm 	"/usr/bin/ksh",		/* Korn shell */
3212c2aa98e2SPeter Wemm 	"/usr/bin/rksh",	/* restricted Korn shell */
3213c2aa98e2SPeter Wemm 	"/usr/bin/pam",
3214c2aa98e2SPeter Wemm 	"/usr/bin/keysh",	/* key shell (extended Korn shell) */
3215c2aa98e2SPeter Wemm 	"/usr/bin/posix/sh",
32163299c2f1SGregory Neil Shapiro #  else /* V4FS */
3217c2aa98e2SPeter Wemm 	"/bin/rsh",		/* restricted Bourne shell */
3218c2aa98e2SPeter Wemm 	"/bin/ksh",		/* Korn shell */
3219c2aa98e2SPeter Wemm 	"/bin/rksh",		/* restricted Korn shell */
3220c2aa98e2SPeter Wemm 	"/bin/pam",
3221c2aa98e2SPeter Wemm 	"/usr/bin/keysh",	/* key shell (extended Korn shell) */
3222c2aa98e2SPeter Wemm 	"/bin/posix/sh",
32233299c2f1SGregory Neil Shapiro #  endif /* V4FS */
32243299c2f1SGregory Neil Shapiro # endif /* __hpux */
3225c2aa98e2SPeter Wemm # if defined(_AIX3) || defined(_AIX4)
3226c2aa98e2SPeter Wemm 	"/bin/ksh",		/* Korn shell */
3227c2aa98e2SPeter Wemm 	"/usr/bin/ksh",
3228c2aa98e2SPeter Wemm 	"/bin/tsh",		/* trusted shell */
3229c2aa98e2SPeter Wemm 	"/usr/bin/tsh",
3230c2aa98e2SPeter Wemm 	"/bin/bsh",		/* Bourne shell */
3231c2aa98e2SPeter Wemm 	"/usr/bin/bsh",
32323299c2f1SGregory Neil Shapiro # endif /* defined(_AIX3) || defined(_AIX4) */
323376b7bf71SPeter Wemm # if defined(__svr4__) || defined(__svr5__)
3234c2aa98e2SPeter Wemm 	"/bin/ksh",		/* Korn shell */
3235c2aa98e2SPeter Wemm 	"/usr/bin/ksh",
32363299c2f1SGregory Neil Shapiro # endif /* defined(__svr4__) || defined(__svr5__) */
3237c2aa98e2SPeter Wemm # ifdef sgi
3238c2aa98e2SPeter Wemm 	"/sbin/sh",		/* SGI's shells really live in /sbin */
3239c2aa98e2SPeter Wemm 	"/sbin/csh",
3240c2aa98e2SPeter Wemm 	"/bin/ksh",		/* Korn shell */
3241c2aa98e2SPeter Wemm 	"/sbin/ksh",
3242c2aa98e2SPeter Wemm 	"/usr/bin/ksh",
3243c2aa98e2SPeter Wemm 	"/bin/tcsh",		/* Extended csh */
3244c2aa98e2SPeter Wemm 	"/usr/bin/tcsh",
32453299c2f1SGregory Neil Shapiro # endif /* sgi */
3246c2aa98e2SPeter Wemm 	NULL
3247c2aa98e2SPeter Wemm };
3248c2aa98e2SPeter Wemm 
32493299c2f1SGregory Neil Shapiro #endif /* !HASGETUSERSHELL */
3250c2aa98e2SPeter Wemm 
3251c2aa98e2SPeter Wemm #define WILDCARD_SHELL	"/SENDMAIL/ANY/SHELL/"
3252c2aa98e2SPeter Wemm 
3253c2aa98e2SPeter Wemm bool
3254c2aa98e2SPeter Wemm usershellok(user, shell)
3255c2aa98e2SPeter Wemm 	char *user;
3256c2aa98e2SPeter Wemm 	char *shell;
3257c2aa98e2SPeter Wemm {
3258c2aa98e2SPeter Wemm # if HASGETUSERSHELL
3259c2aa98e2SPeter Wemm 	register char *p;
3260c2aa98e2SPeter Wemm 	extern char *getusershell();
3261c2aa98e2SPeter Wemm 
3262c2aa98e2SPeter Wemm 	if (shell == NULL || shell[0] == '\0' || wordinclass(user, 't') ||
3263c2aa98e2SPeter Wemm 	    ConfigLevel <= 1)
3264c2aa98e2SPeter Wemm 		return TRUE;
3265c2aa98e2SPeter Wemm 
3266c2aa98e2SPeter Wemm 	setusershell();
3267c2aa98e2SPeter Wemm 	while ((p = getusershell()) != NULL)
3268c2aa98e2SPeter Wemm 		if (strcmp(p, shell) == 0 || strcmp(p, WILDCARD_SHELL) == 0)
3269c2aa98e2SPeter Wemm 			break;
3270c2aa98e2SPeter Wemm 	endusershell();
3271c2aa98e2SPeter Wemm 	return p != NULL;
32723299c2f1SGregory Neil Shapiro # else /* HASGETUSERSHELL */
3273c2aa98e2SPeter Wemm #  if USEGETCONFATTR
3274c2aa98e2SPeter Wemm 	auto char *v;
32753299c2f1SGregory Neil Shapiro #  endif /* USEGETCONFATTR */
3276c2aa98e2SPeter Wemm 	register FILE *shellf;
3277c2aa98e2SPeter Wemm 	char buf[MAXLINE];
3278c2aa98e2SPeter Wemm 
3279c2aa98e2SPeter Wemm 	if (shell == NULL || shell[0] == '\0' || wordinclass(user, 't') ||
3280c2aa98e2SPeter Wemm 	    ConfigLevel <= 1)
3281c2aa98e2SPeter Wemm 		return TRUE;
3282c2aa98e2SPeter Wemm 
3283c2aa98e2SPeter Wemm #  if USEGETCONFATTR
3284c2aa98e2SPeter Wemm 	/*
3285c2aa98e2SPeter Wemm 	**  Naturally IBM has a "better" idea.....
3286c2aa98e2SPeter Wemm 	**
3287c2aa98e2SPeter Wemm 	**	What a crock.  This interface isn't documented, it is
3288c2aa98e2SPeter Wemm 	**	considered part of the security library (-ls), and it
3289c2aa98e2SPeter Wemm 	**	only works if you are running as root (since the list
3290c2aa98e2SPeter Wemm 	**	of valid shells is obviously a source of great concern).
3291c2aa98e2SPeter Wemm 	**	I recommend that you do NOT define USEGETCONFATTR,
3292c2aa98e2SPeter Wemm 	**	especially since you are going to have to set up an
3293c2aa98e2SPeter Wemm 	**	/etc/shells anyhow to handle the cases where getconfattr
3294c2aa98e2SPeter Wemm 	**	fails.
3295c2aa98e2SPeter Wemm 	*/
3296c2aa98e2SPeter Wemm 
3297c2aa98e2SPeter Wemm 	if (getconfattr(SC_SYS_LOGIN, SC_SHELLS, &v, SEC_LIST) == 0 && v != NULL)
3298c2aa98e2SPeter Wemm 	{
3299c2aa98e2SPeter Wemm 		while (*v != '\0')
3300c2aa98e2SPeter Wemm 		{
3301c2aa98e2SPeter Wemm 			if (strcmp(v, shell) == 0 || strcmp(v, WILDCARD_SHELL) == 0)
3302c2aa98e2SPeter Wemm 				return TRUE;
3303c2aa98e2SPeter Wemm 			v += strlen(v) + 1;
3304c2aa98e2SPeter Wemm 		}
3305c2aa98e2SPeter Wemm 		return FALSE;
3306c2aa98e2SPeter Wemm 	}
33073299c2f1SGregory Neil Shapiro #  endif /* USEGETCONFATTR */
3308c2aa98e2SPeter Wemm 
3309c2aa98e2SPeter Wemm 	shellf = fopen(_PATH_SHELLS, "r");
3310c2aa98e2SPeter Wemm 	if (shellf == NULL)
3311c2aa98e2SPeter Wemm 	{
3312c2aa98e2SPeter Wemm 		/* no /etc/shells; see if it is one of the std shells */
3313c2aa98e2SPeter Wemm 		char **d;
3314c2aa98e2SPeter Wemm 
3315c2aa98e2SPeter Wemm 		if (errno != ENOENT && LogLevel > 3)
3316c2aa98e2SPeter Wemm 			sm_syslog(LOG_ERR, NOQID,
3317c2aa98e2SPeter Wemm 				  "usershellok: cannot open %s: %s",
3318c2aa98e2SPeter Wemm 				  _PATH_SHELLS, errstring(errno));
3319c2aa98e2SPeter Wemm 
3320c2aa98e2SPeter Wemm 		for (d = DefaultUserShells; *d != NULL; d++)
3321c2aa98e2SPeter Wemm 		{
3322c2aa98e2SPeter Wemm 			if (strcmp(shell, *d) == 0)
3323c2aa98e2SPeter Wemm 				return TRUE;
3324c2aa98e2SPeter Wemm 		}
3325c2aa98e2SPeter Wemm 		return FALSE;
3326c2aa98e2SPeter Wemm 	}
3327c2aa98e2SPeter Wemm 
3328c2aa98e2SPeter Wemm 	while (fgets(buf, sizeof buf, shellf) != NULL)
3329c2aa98e2SPeter Wemm 	{
3330c2aa98e2SPeter Wemm 		register char *p, *q;
3331c2aa98e2SPeter Wemm 
3332c2aa98e2SPeter Wemm 		p = buf;
3333c2aa98e2SPeter Wemm 		while (*p != '\0' && *p != '#' && *p != '/')
3334c2aa98e2SPeter Wemm 			p++;
3335c2aa98e2SPeter Wemm 		if (*p == '#' || *p == '\0')
3336c2aa98e2SPeter Wemm 			continue;
3337c2aa98e2SPeter Wemm 		q = p;
3338c2aa98e2SPeter Wemm 		while (*p != '\0' && *p != '#' && !(isascii(*p) && isspace(*p)))
3339c2aa98e2SPeter Wemm 			p++;
3340c2aa98e2SPeter Wemm 		*p = '\0';
3341c2aa98e2SPeter Wemm 		if (strcmp(shell, q) == 0 || strcmp(WILDCARD_SHELL, q) == 0)
3342c2aa98e2SPeter Wemm 		{
33433299c2f1SGregory Neil Shapiro 			(void) fclose(shellf);
3344c2aa98e2SPeter Wemm 			return TRUE;
3345c2aa98e2SPeter Wemm 		}
3346c2aa98e2SPeter Wemm 	}
33473299c2f1SGregory Neil Shapiro 	(void) fclose(shellf);
3348c2aa98e2SPeter Wemm 	return FALSE;
33493299c2f1SGregory Neil Shapiro # endif /* HASGETUSERSHELL */
3350c2aa98e2SPeter Wemm }
3351c2aa98e2SPeter Wemm /*
3352c2aa98e2SPeter Wemm **  FREEDISKSPACE -- see how much free space is on the queue filesystem
3353c2aa98e2SPeter Wemm **
3354c2aa98e2SPeter Wemm **	Only implemented if you have statfs.
3355c2aa98e2SPeter Wemm **
3356c2aa98e2SPeter Wemm **	Parameters:
3357c2aa98e2SPeter Wemm **		dir -- the directory in question.
3358c2aa98e2SPeter Wemm **		bsize -- a variable into which the filesystem
3359c2aa98e2SPeter Wemm **			block size is stored.
3360c2aa98e2SPeter Wemm **
3361c2aa98e2SPeter Wemm **	Returns:
33623299c2f1SGregory Neil Shapiro **		The number of blocks free on the queue filesystem.
3363c2aa98e2SPeter Wemm **		-1 if the statfs call fails.
3364c2aa98e2SPeter Wemm **
3365c2aa98e2SPeter Wemm **	Side effects:
3366c2aa98e2SPeter Wemm **		Puts the filesystem block size into bsize.
3367c2aa98e2SPeter Wemm */
3368c2aa98e2SPeter Wemm 
3369c2aa98e2SPeter Wemm /* statfs types */
3370c2aa98e2SPeter Wemm #define SFS_NONE	0	/* no statfs implementation */
3371c2aa98e2SPeter Wemm #define SFS_USTAT	1	/* use ustat */
3372c2aa98e2SPeter Wemm #define SFS_4ARGS	2	/* use four-argument statfs call */
3373c2aa98e2SPeter Wemm #define SFS_VFS		3	/* use <sys/vfs.h> implementation */
3374c2aa98e2SPeter Wemm #define SFS_MOUNT	4	/* use <sys/mount.h> implementation */
3375c2aa98e2SPeter Wemm #define SFS_STATFS	5	/* use <sys/statfs.h> implementation */
3376c2aa98e2SPeter Wemm #define SFS_STATVFS	6	/* use <sys/statvfs.h> implementation */
3377c2aa98e2SPeter Wemm 
3378c2aa98e2SPeter Wemm #ifndef SFS_TYPE
3379c2aa98e2SPeter Wemm # define SFS_TYPE	SFS_NONE
33803299c2f1SGregory Neil Shapiro #endif /* ! SFS_TYPE */
3381c2aa98e2SPeter Wemm 
3382c2aa98e2SPeter Wemm #if SFS_TYPE == SFS_USTAT
3383c2aa98e2SPeter Wemm # include <ustat.h>
33843299c2f1SGregory Neil Shapiro #endif /* SFS_TYPE == SFS_USTAT */
3385c2aa98e2SPeter Wemm #if SFS_TYPE == SFS_4ARGS || SFS_TYPE == SFS_STATFS
3386c2aa98e2SPeter Wemm # include <sys/statfs.h>
33873299c2f1SGregory Neil Shapiro #endif /* SFS_TYPE == SFS_4ARGS || SFS_TYPE == SFS_STATFS */
3388c2aa98e2SPeter Wemm #if SFS_TYPE == SFS_VFS
3389c2aa98e2SPeter Wemm # include <sys/vfs.h>
33903299c2f1SGregory Neil Shapiro #endif /* SFS_TYPE == SFS_VFS */
3391c2aa98e2SPeter Wemm #if SFS_TYPE == SFS_MOUNT
3392c2aa98e2SPeter Wemm # include <sys/mount.h>
33933299c2f1SGregory Neil Shapiro #endif /* SFS_TYPE == SFS_MOUNT */
3394c2aa98e2SPeter Wemm #if SFS_TYPE == SFS_STATVFS
3395c2aa98e2SPeter Wemm # include <sys/statvfs.h>
33963299c2f1SGregory Neil Shapiro #endif /* SFS_TYPE == SFS_STATVFS */
3397c2aa98e2SPeter Wemm 
3398c2aa98e2SPeter Wemm long
3399c2aa98e2SPeter Wemm freediskspace(dir, bsize)
3400c2aa98e2SPeter Wemm 	char *dir;
3401c2aa98e2SPeter Wemm 	long *bsize;
3402c2aa98e2SPeter Wemm {
3403c2aa98e2SPeter Wemm # if SFS_TYPE != SFS_NONE
3404c2aa98e2SPeter Wemm #  if SFS_TYPE == SFS_USTAT
3405c2aa98e2SPeter Wemm 	struct ustat fs;
3406c2aa98e2SPeter Wemm 	struct stat statbuf;
3407c2aa98e2SPeter Wemm #   define FSBLOCKSIZE	DEV_BSIZE
3408c2aa98e2SPeter Wemm #   define SFS_BAVAIL	f_tfree
34093299c2f1SGregory Neil Shapiro #  else /* SFS_TYPE == SFS_USTAT */
3410c2aa98e2SPeter Wemm #   if defined(ultrix)
3411c2aa98e2SPeter Wemm 	struct fs_data fs;
3412c2aa98e2SPeter Wemm #    define SFS_BAVAIL	fd_bfreen
3413c2aa98e2SPeter Wemm #    define FSBLOCKSIZE	1024L
34143299c2f1SGregory Neil Shapiro #   else /* defined(ultrix) */
3415c2aa98e2SPeter Wemm #    if SFS_TYPE == SFS_STATVFS
3416c2aa98e2SPeter Wemm 	struct statvfs fs;
3417c2aa98e2SPeter Wemm #     define FSBLOCKSIZE	fs.f_frsize
34183299c2f1SGregory Neil Shapiro #    else /* SFS_TYPE == SFS_STATVFS */
3419c2aa98e2SPeter Wemm 	struct statfs fs;
3420c2aa98e2SPeter Wemm #     define FSBLOCKSIZE	fs.f_bsize
34213299c2f1SGregory Neil Shapiro #    endif /* SFS_TYPE == SFS_STATVFS */
34223299c2f1SGregory Neil Shapiro #   endif /* defined(ultrix) */
34233299c2f1SGregory Neil Shapiro #  endif /* SFS_TYPE == SFS_USTAT */
3424c2aa98e2SPeter Wemm #  ifndef SFS_BAVAIL
3425c2aa98e2SPeter Wemm #   define SFS_BAVAIL f_bavail
34263299c2f1SGregory Neil Shapiro #  endif /* ! SFS_BAVAIL */
3427c2aa98e2SPeter Wemm 
3428c2aa98e2SPeter Wemm #  if SFS_TYPE == SFS_USTAT
3429c2aa98e2SPeter Wemm 	if (stat(dir, &statbuf) == 0 && ustat(statbuf.st_dev, &fs) == 0)
34303299c2f1SGregory Neil Shapiro #  else /* SFS_TYPE == SFS_USTAT */
3431c2aa98e2SPeter Wemm #   if SFS_TYPE == SFS_4ARGS
3432c2aa98e2SPeter Wemm 	if (statfs(dir, &fs, sizeof fs, 0) == 0)
34333299c2f1SGregory Neil Shapiro #   else /* SFS_TYPE == SFS_4ARGS */
3434c2aa98e2SPeter Wemm #    if SFS_TYPE == SFS_STATVFS
3435c2aa98e2SPeter Wemm 	if (statvfs(dir, &fs) == 0)
34363299c2f1SGregory Neil Shapiro #    else /* SFS_TYPE == SFS_STATVFS */
3437c2aa98e2SPeter Wemm #     if defined(ultrix)
3438c2aa98e2SPeter Wemm 	if (statfs(dir, &fs) > 0)
34393299c2f1SGregory Neil Shapiro #     else /* defined(ultrix) */
3440c2aa98e2SPeter Wemm 	if (statfs(dir, &fs) == 0)
34413299c2f1SGregory Neil Shapiro #     endif /* defined(ultrix) */
34423299c2f1SGregory Neil Shapiro #    endif /* SFS_TYPE == SFS_STATVFS */
34433299c2f1SGregory Neil Shapiro #   endif /* SFS_TYPE == SFS_4ARGS */
34443299c2f1SGregory Neil Shapiro #  endif /* SFS_TYPE == SFS_USTAT */
3445c2aa98e2SPeter Wemm 	{
3446c2aa98e2SPeter Wemm 		if (bsize != NULL)
3447c2aa98e2SPeter Wemm 			*bsize = FSBLOCKSIZE;
3448c2aa98e2SPeter Wemm 		if (fs.SFS_BAVAIL <= 0)
3449c2aa98e2SPeter Wemm 			return 0;
3450c2aa98e2SPeter Wemm 		else if (fs.SFS_BAVAIL > LONG_MAX)
34513299c2f1SGregory Neil Shapiro 			return (long) LONG_MAX;
3452c2aa98e2SPeter Wemm 		else
3453c2aa98e2SPeter Wemm 			return (long) fs.SFS_BAVAIL;
3454c2aa98e2SPeter Wemm 	}
34553299c2f1SGregory Neil Shapiro # endif /* SFS_TYPE != SFS_NONE */
34563299c2f1SGregory Neil Shapiro 	return -1;
3457c2aa98e2SPeter Wemm }
3458c2aa98e2SPeter Wemm /*
3459c2aa98e2SPeter Wemm **  ENOUGHDISKSPACE -- is there enough free space on the queue fs?
3460c2aa98e2SPeter Wemm **
3461c2aa98e2SPeter Wemm **	Only implemented if you have statfs.
3462c2aa98e2SPeter Wemm **
3463c2aa98e2SPeter Wemm **	Parameters:
3464c2aa98e2SPeter Wemm **		msize -- the size to check against.  If zero, we don't yet
3465c2aa98e2SPeter Wemm **		know how big the message will be, so just check for
3466c2aa98e2SPeter Wemm **		a "reasonable" amount.
34673299c2f1SGregory Neil Shapiro **		log -- log message?
3468c2aa98e2SPeter Wemm **
3469c2aa98e2SPeter Wemm **	Returns:
3470c2aa98e2SPeter Wemm **		TRUE if there is enough space.
3471c2aa98e2SPeter Wemm **		FALSE otherwise.
3472c2aa98e2SPeter Wemm */
3473c2aa98e2SPeter Wemm 
3474c2aa98e2SPeter Wemm bool
34753299c2f1SGregory Neil Shapiro enoughdiskspace(msize, log)
3476c2aa98e2SPeter Wemm 	long msize;
34773299c2f1SGregory Neil Shapiro 	bool log;
3478c2aa98e2SPeter Wemm {
34793299c2f1SGregory Neil Shapiro 	long bfree;
34803299c2f1SGregory Neil Shapiro 	long bsize;
3481c2aa98e2SPeter Wemm 
3482c2aa98e2SPeter Wemm 	if (MinBlocksFree <= 0 && msize <= 0)
3483c2aa98e2SPeter Wemm 	{
3484c2aa98e2SPeter Wemm 		if (tTd(4, 80))
34853299c2f1SGregory Neil Shapiro 			dprintf("enoughdiskspace: no threshold\n");
3486c2aa98e2SPeter Wemm 		return TRUE;
3487c2aa98e2SPeter Wemm 	}
3488c2aa98e2SPeter Wemm 
34893299c2f1SGregory Neil Shapiro 	bfree = freediskspace(QueueDir, &bsize);
34903299c2f1SGregory Neil Shapiro 	if (bfree >= 0)
3491c2aa98e2SPeter Wemm 	{
3492c2aa98e2SPeter Wemm 		if (tTd(4, 80))
34933299c2f1SGregory Neil Shapiro 			dprintf("enoughdiskspace: bavail=%ld, need=%ld\n",
3494c2aa98e2SPeter Wemm 				bfree, msize);
3495c2aa98e2SPeter Wemm 
3496c2aa98e2SPeter Wemm 		/* convert msize to block count */
3497c2aa98e2SPeter Wemm 		msize = msize / bsize + 1;
3498c2aa98e2SPeter Wemm 		if (MinBlocksFree >= 0)
3499c2aa98e2SPeter Wemm 			msize += MinBlocksFree;
3500c2aa98e2SPeter Wemm 
3501c2aa98e2SPeter Wemm 		if (bfree < msize)
3502c2aa98e2SPeter Wemm 		{
35033299c2f1SGregory Neil Shapiro 			if (log && LogLevel > 0)
3504c2aa98e2SPeter Wemm 				sm_syslog(LOG_ALERT, CurEnv->e_id,
3505c2aa98e2SPeter Wemm 					"low on space (have %ld, %s needs %ld in %s)",
3506c2aa98e2SPeter Wemm 					bfree,
3507c2aa98e2SPeter Wemm 					CurHostName == NULL ? "SMTP-DAEMON" : CurHostName,
3508c2aa98e2SPeter Wemm 					msize, QueueDir);
3509c2aa98e2SPeter Wemm 			return FALSE;
3510c2aa98e2SPeter Wemm 		}
3511c2aa98e2SPeter Wemm 	}
3512c2aa98e2SPeter Wemm 	else if (tTd(4, 80))
35133299c2f1SGregory Neil Shapiro 		dprintf("enoughdiskspace failure: min=%ld, need=%ld: %s\n",
3514c2aa98e2SPeter Wemm 			MinBlocksFree, msize, errstring(errno));
3515c2aa98e2SPeter Wemm 	return TRUE;
3516c2aa98e2SPeter Wemm }
3517c2aa98e2SPeter Wemm /*
3518c2aa98e2SPeter Wemm **  TRANSIENTERROR -- tell if an error code indicates a transient failure
3519c2aa98e2SPeter Wemm **
3520c2aa98e2SPeter Wemm **	This looks at an errno value and tells if this is likely to
3521c2aa98e2SPeter Wemm **	go away if retried later.
3522c2aa98e2SPeter Wemm **
3523c2aa98e2SPeter Wemm **	Parameters:
3524c2aa98e2SPeter Wemm **		err -- the errno code to classify.
3525c2aa98e2SPeter Wemm **
3526c2aa98e2SPeter Wemm **	Returns:
3527c2aa98e2SPeter Wemm **		TRUE if this is probably transient.
3528c2aa98e2SPeter Wemm **		FALSE otherwise.
3529c2aa98e2SPeter Wemm */
3530c2aa98e2SPeter Wemm 
3531c2aa98e2SPeter Wemm bool
3532c2aa98e2SPeter Wemm transienterror(err)
3533c2aa98e2SPeter Wemm 	int err;
3534c2aa98e2SPeter Wemm {
3535c2aa98e2SPeter Wemm 	switch (err)
3536c2aa98e2SPeter Wemm 	{
3537c2aa98e2SPeter Wemm 	  case EIO:			/* I/O error */
3538c2aa98e2SPeter Wemm 	  case ENXIO:			/* Device not configured */
3539c2aa98e2SPeter Wemm 	  case EAGAIN:			/* Resource temporarily unavailable */
3540c2aa98e2SPeter Wemm 	  case ENOMEM:			/* Cannot allocate memory */
3541c2aa98e2SPeter Wemm 	  case ENODEV:			/* Operation not supported by device */
3542c2aa98e2SPeter Wemm 	  case ENFILE:			/* Too many open files in system */
3543c2aa98e2SPeter Wemm 	  case EMFILE:			/* Too many open files */
3544c2aa98e2SPeter Wemm 	  case ENOSPC:			/* No space left on device */
3545c2aa98e2SPeter Wemm #ifdef ETIMEDOUT
3546c2aa98e2SPeter Wemm 	  case ETIMEDOUT:		/* Connection timed out */
35473299c2f1SGregory Neil Shapiro #endif /* ETIMEDOUT */
3548c2aa98e2SPeter Wemm #ifdef ESTALE
3549c2aa98e2SPeter Wemm 	  case ESTALE:			/* Stale NFS file handle */
35503299c2f1SGregory Neil Shapiro #endif /* ESTALE */
3551c2aa98e2SPeter Wemm #ifdef ENETDOWN
3552c2aa98e2SPeter Wemm 	  case ENETDOWN:		/* Network is down */
35533299c2f1SGregory Neil Shapiro #endif /* ENETDOWN */
3554c2aa98e2SPeter Wemm #ifdef ENETUNREACH
3555c2aa98e2SPeter Wemm 	  case ENETUNREACH:		/* Network is unreachable */
35563299c2f1SGregory Neil Shapiro #endif /* ENETUNREACH */
3557c2aa98e2SPeter Wemm #ifdef ENETRESET
3558c2aa98e2SPeter Wemm 	  case ENETRESET:		/* Network dropped connection on reset */
35593299c2f1SGregory Neil Shapiro #endif /* ENETRESET */
3560c2aa98e2SPeter Wemm #ifdef ECONNABORTED
3561c2aa98e2SPeter Wemm 	  case ECONNABORTED:		/* Software caused connection abort */
35623299c2f1SGregory Neil Shapiro #endif /* ECONNABORTED */
3563c2aa98e2SPeter Wemm #ifdef ECONNRESET
3564c2aa98e2SPeter Wemm 	  case ECONNRESET:		/* Connection reset by peer */
35653299c2f1SGregory Neil Shapiro #endif /* ECONNRESET */
3566c2aa98e2SPeter Wemm #ifdef ENOBUFS
3567c2aa98e2SPeter Wemm 	  case ENOBUFS:			/* No buffer space available */
35683299c2f1SGregory Neil Shapiro #endif /* ENOBUFS */
3569c2aa98e2SPeter Wemm #ifdef ESHUTDOWN
3570c2aa98e2SPeter Wemm 	  case ESHUTDOWN:		/* Can't send after socket shutdown */
35713299c2f1SGregory Neil Shapiro #endif /* ESHUTDOWN */
3572c2aa98e2SPeter Wemm #ifdef ECONNREFUSED
3573c2aa98e2SPeter Wemm 	  case ECONNREFUSED:		/* Connection refused */
35743299c2f1SGregory Neil Shapiro #endif /* ECONNREFUSED */
3575c2aa98e2SPeter Wemm #ifdef EHOSTDOWN
3576c2aa98e2SPeter Wemm 	  case EHOSTDOWN:		/* Host is down */
35773299c2f1SGregory Neil Shapiro #endif /* EHOSTDOWN */
3578c2aa98e2SPeter Wemm #ifdef EHOSTUNREACH
3579c2aa98e2SPeter Wemm 	  case EHOSTUNREACH:		/* No route to host */
35803299c2f1SGregory Neil Shapiro #endif /* EHOSTUNREACH */
3581c2aa98e2SPeter Wemm #ifdef EDQUOT
3582c2aa98e2SPeter Wemm 	  case EDQUOT:			/* Disc quota exceeded */
35833299c2f1SGregory Neil Shapiro #endif /* EDQUOT */
3584c2aa98e2SPeter Wemm #ifdef EPROCLIM
3585c2aa98e2SPeter Wemm 	  case EPROCLIM:		/* Too many processes */
35863299c2f1SGregory Neil Shapiro #endif /* EPROCLIM */
3587c2aa98e2SPeter Wemm #ifdef EUSERS
3588c2aa98e2SPeter Wemm 	  case EUSERS:			/* Too many users */
35893299c2f1SGregory Neil Shapiro #endif /* EUSERS */
3590c2aa98e2SPeter Wemm #ifdef EDEADLK
3591c2aa98e2SPeter Wemm 	  case EDEADLK:			/* Resource deadlock avoided */
35923299c2f1SGregory Neil Shapiro #endif /* EDEADLK */
3593c2aa98e2SPeter Wemm #ifdef EISCONN
3594c2aa98e2SPeter Wemm 	  case EISCONN:			/* Socket already connected */
35953299c2f1SGregory Neil Shapiro #endif /* EISCONN */
3596c2aa98e2SPeter Wemm #ifdef EINPROGRESS
3597c2aa98e2SPeter Wemm 	  case EINPROGRESS:		/* Operation now in progress */
35983299c2f1SGregory Neil Shapiro #endif /* EINPROGRESS */
3599c2aa98e2SPeter Wemm #ifdef EALREADY
3600c2aa98e2SPeter Wemm 	  case EALREADY:		/* Operation already in progress */
36013299c2f1SGregory Neil Shapiro #endif /* EALREADY */
3602c2aa98e2SPeter Wemm #ifdef EADDRINUSE
3603c2aa98e2SPeter Wemm 	  case EADDRINUSE:		/* Address already in use */
36043299c2f1SGregory Neil Shapiro #endif /* EADDRINUSE */
3605c2aa98e2SPeter Wemm #ifdef EADDRNOTAVAIL
3606c2aa98e2SPeter Wemm 	  case EADDRNOTAVAIL:		/* Can't assign requested address */
36073299c2f1SGregory Neil Shapiro #endif /* EADDRNOTAVAIL */
3608c2aa98e2SPeter Wemm #ifdef ETXTBSY
3609c2aa98e2SPeter Wemm 	  case ETXTBSY:			/* (Apollo) file locked */
36103299c2f1SGregory Neil Shapiro #endif /* ETXTBSY */
3611c2aa98e2SPeter Wemm #if defined(ENOSR) && (!defined(ENOBUFS) || (ENOBUFS != ENOSR))
3612c2aa98e2SPeter Wemm 	  case ENOSR:			/* Out of streams resources */
36133299c2f1SGregory Neil Shapiro #endif /* defined(ENOSR) && (!defined(ENOBUFS) || (ENOBUFS != ENOSR)) */
36143299c2f1SGregory Neil Shapiro #ifdef ENOLCK
36153299c2f1SGregory Neil Shapiro 	  case ENOLCK:			/* No locks available */
36163299c2f1SGregory Neil Shapiro #endif /* ENOLCK */
3617c2aa98e2SPeter Wemm 	  case E_SM_OPENTIMEOUT:	/* PSEUDO: open timed out */
3618c2aa98e2SPeter Wemm 		return TRUE;
3619c2aa98e2SPeter Wemm 	}
3620c2aa98e2SPeter Wemm 
3621c2aa98e2SPeter Wemm 	/* nope, must be permanent */
3622c2aa98e2SPeter Wemm 	return FALSE;
3623c2aa98e2SPeter Wemm }
3624c2aa98e2SPeter Wemm /*
3625c2aa98e2SPeter Wemm **  LOCKFILE -- lock a file using flock or (shudder) fcntl locking
3626c2aa98e2SPeter Wemm **
3627c2aa98e2SPeter Wemm **	Parameters:
3628c2aa98e2SPeter Wemm **		fd -- the file descriptor of the file.
3629c2aa98e2SPeter Wemm **		filename -- the file name (for error messages).
3630c2aa98e2SPeter Wemm **		ext -- the filename extension.
3631c2aa98e2SPeter Wemm **		type -- type of the lock.  Bits can be:
3632c2aa98e2SPeter Wemm **			LOCK_EX -- exclusive lock.
3633c2aa98e2SPeter Wemm **			LOCK_NB -- non-blocking.
3634c2aa98e2SPeter Wemm **
3635c2aa98e2SPeter Wemm **	Returns:
3636c2aa98e2SPeter Wemm **		TRUE if the lock was acquired.
3637c2aa98e2SPeter Wemm **		FALSE otherwise.
3638c2aa98e2SPeter Wemm */
3639c2aa98e2SPeter Wemm 
3640c2aa98e2SPeter Wemm bool
3641c2aa98e2SPeter Wemm lockfile(fd, filename, ext, type)
3642c2aa98e2SPeter Wemm 	int fd;
3643c2aa98e2SPeter Wemm 	char *filename;
3644c2aa98e2SPeter Wemm 	char *ext;
3645c2aa98e2SPeter Wemm 	int type;
3646c2aa98e2SPeter Wemm {
3647c2aa98e2SPeter Wemm 	int i;
3648c2aa98e2SPeter Wemm 	int save_errno;
3649c2aa98e2SPeter Wemm # if !HASFLOCK
3650c2aa98e2SPeter Wemm 	int action;
3651c2aa98e2SPeter Wemm 	struct flock lfd;
3652c2aa98e2SPeter Wemm 
3653c2aa98e2SPeter Wemm 	if (ext == NULL)
3654c2aa98e2SPeter Wemm 		ext = "";
3655c2aa98e2SPeter Wemm 
36563299c2f1SGregory Neil Shapiro 	memset(&lfd, '\0', sizeof lfd);
3657c2aa98e2SPeter Wemm 	if (bitset(LOCK_UN, type))
3658c2aa98e2SPeter Wemm 		lfd.l_type = F_UNLCK;
3659c2aa98e2SPeter Wemm 	else if (bitset(LOCK_EX, type))
3660c2aa98e2SPeter Wemm 		lfd.l_type = F_WRLCK;
3661c2aa98e2SPeter Wemm 	else
3662c2aa98e2SPeter Wemm 		lfd.l_type = F_RDLCK;
3663c2aa98e2SPeter Wemm 
3664c2aa98e2SPeter Wemm 	if (bitset(LOCK_NB, type))
3665c2aa98e2SPeter Wemm 		action = F_SETLK;
3666c2aa98e2SPeter Wemm 	else
3667c2aa98e2SPeter Wemm 		action = F_SETLKW;
3668c2aa98e2SPeter Wemm 
3669c2aa98e2SPeter Wemm 	if (tTd(55, 60))
36703299c2f1SGregory Neil Shapiro 		dprintf("lockfile(%s%s, action=%d, type=%d): ",
3671c2aa98e2SPeter Wemm 			filename, ext, action, lfd.l_type);
3672c2aa98e2SPeter Wemm 
3673c2aa98e2SPeter Wemm 	while ((i = fcntl(fd, action, &lfd)) < 0 && errno == EINTR)
3674c2aa98e2SPeter Wemm 		continue;
3675c2aa98e2SPeter Wemm 	if (i >= 0)
3676c2aa98e2SPeter Wemm 	{
3677c2aa98e2SPeter Wemm 		if (tTd(55, 60))
36783299c2f1SGregory Neil Shapiro 			dprintf("SUCCESS\n");
3679c2aa98e2SPeter Wemm 		return TRUE;
3680c2aa98e2SPeter Wemm 	}
3681c2aa98e2SPeter Wemm 	save_errno = errno;
3682c2aa98e2SPeter Wemm 
3683c2aa98e2SPeter Wemm 	if (tTd(55, 60))
36843299c2f1SGregory Neil Shapiro 		dprintf("(%s) ", errstring(save_errno));
3685c2aa98e2SPeter Wemm 
3686c2aa98e2SPeter Wemm 	/*
3687c2aa98e2SPeter Wemm 	**  On SunOS, if you are testing using -oQ/tmp/mqueue or
3688c2aa98e2SPeter Wemm 	**  -oA/tmp/aliases or anything like that, and /tmp is mounted
3689c2aa98e2SPeter Wemm 	**  as type "tmp" (that is, served from swap space), the
3690c2aa98e2SPeter Wemm 	**  previous fcntl will fail with "Invalid argument" errors.
3691c2aa98e2SPeter Wemm 	**  Since this is fairly common during testing, we will assume
3692c2aa98e2SPeter Wemm 	**  that this indicates that the lock is successfully grabbed.
3693c2aa98e2SPeter Wemm 	*/
3694c2aa98e2SPeter Wemm 
3695c2aa98e2SPeter Wemm 	if (save_errno == EINVAL)
3696c2aa98e2SPeter Wemm 	{
3697c2aa98e2SPeter Wemm 		if (tTd(55, 60))
36983299c2f1SGregory Neil Shapiro 			dprintf("SUCCESS\n");
3699c2aa98e2SPeter Wemm 		return TRUE;
3700c2aa98e2SPeter Wemm 	}
3701c2aa98e2SPeter Wemm 
37023299c2f1SGregory Neil Shapiro 	if (!bitset(LOCK_NB, type) ||
37033299c2f1SGregory Neil Shapiro 	    (save_errno != EACCES && save_errno != EAGAIN))
3704c2aa98e2SPeter Wemm 	{
3705c2aa98e2SPeter Wemm 		int omode = -1;
3706c2aa98e2SPeter Wemm #  ifdef F_GETFL
3707c2aa98e2SPeter Wemm 		(void) fcntl(fd, F_GETFL, &omode);
3708c2aa98e2SPeter Wemm 		errno = save_errno;
37093299c2f1SGregory Neil Shapiro #  endif /* F_GETFL */
3710c2aa98e2SPeter Wemm 		syserr("cannot lockf(%s%s, fd=%d, type=%o, omode=%o, euid=%d)",
3711c2aa98e2SPeter Wemm 			filename, ext, fd, type, omode, geteuid());
3712c2aa98e2SPeter Wemm 		dumpfd(fd, TRUE, TRUE);
3713c2aa98e2SPeter Wemm 	}
37143299c2f1SGregory Neil Shapiro # else /* !HASFLOCK */
3715c2aa98e2SPeter Wemm 	if (ext == NULL)
3716c2aa98e2SPeter Wemm 		ext = "";
3717c2aa98e2SPeter Wemm 
3718c2aa98e2SPeter Wemm 	if (tTd(55, 60))
37193299c2f1SGregory Neil Shapiro 		dprintf("lockfile(%s%s, type=%o): ", filename, ext, type);
3720c2aa98e2SPeter Wemm 
3721c2aa98e2SPeter Wemm 	while ((i = flock(fd, type)) < 0 && errno == EINTR)
3722c2aa98e2SPeter Wemm 		continue;
3723c2aa98e2SPeter Wemm 	if (i >= 0)
3724c2aa98e2SPeter Wemm 	{
3725c2aa98e2SPeter Wemm 		if (tTd(55, 60))
37263299c2f1SGregory Neil Shapiro 			dprintf("SUCCESS\n");
3727c2aa98e2SPeter Wemm 		return TRUE;
3728c2aa98e2SPeter Wemm 	}
3729c2aa98e2SPeter Wemm 	save_errno = errno;
3730c2aa98e2SPeter Wemm 
3731c2aa98e2SPeter Wemm 	if (tTd(55, 60))
37323299c2f1SGregory Neil Shapiro 		dprintf("(%s) ", errstring(save_errno));
3733c2aa98e2SPeter Wemm 
3734c2aa98e2SPeter Wemm 	if (!bitset(LOCK_NB, type) || save_errno != EWOULDBLOCK)
3735c2aa98e2SPeter Wemm 	{
3736c2aa98e2SPeter Wemm 		int omode = -1;
3737c2aa98e2SPeter Wemm #  ifdef F_GETFL
3738c2aa98e2SPeter Wemm 		(void) fcntl(fd, F_GETFL, &omode);
3739c2aa98e2SPeter Wemm 		errno = save_errno;
37403299c2f1SGregory Neil Shapiro #  endif /* F_GETFL */
3741c2aa98e2SPeter Wemm 		syserr("cannot flock(%s%s, fd=%d, type=%o, omode=%o, euid=%d)",
3742c2aa98e2SPeter Wemm 			filename, ext, fd, type, omode, geteuid());
3743c2aa98e2SPeter Wemm 		dumpfd(fd, TRUE, TRUE);
3744c2aa98e2SPeter Wemm 	}
37453299c2f1SGregory Neil Shapiro # endif /* !HASFLOCK */
3746c2aa98e2SPeter Wemm 	if (tTd(55, 60))
37473299c2f1SGregory Neil Shapiro 		dprintf("FAIL\n");
3748c2aa98e2SPeter Wemm 	errno = save_errno;
3749c2aa98e2SPeter Wemm 	return FALSE;
3750c2aa98e2SPeter Wemm }
3751c2aa98e2SPeter Wemm /*
3752c2aa98e2SPeter Wemm **  CHOWNSAFE -- tell if chown is "safe" (executable only by root)
3753c2aa98e2SPeter Wemm **
3754c2aa98e2SPeter Wemm **	Unfortunately, given that we can't predict other systems on which
3755c2aa98e2SPeter Wemm **	a remote mounted (NFS) filesystem will be mounted, the answer is
3756c2aa98e2SPeter Wemm **	almost always that this is unsafe.
3757c2aa98e2SPeter Wemm **
3758c2aa98e2SPeter Wemm **	Note also that many operating systems have non-compliant
3759c2aa98e2SPeter Wemm **	implementations of the _POSIX_CHOWN_RESTRICTED variable and the
3760c2aa98e2SPeter Wemm **	fpathconf() routine.  According to IEEE 1003.1-1990, if
3761c2aa98e2SPeter Wemm **	_POSIX_CHOWN_RESTRICTED is defined and not equal to -1, then
3762c2aa98e2SPeter Wemm **	no non-root process can give away the file.  However, vendors
3763c2aa98e2SPeter Wemm **	don't take NFS into account, so a comfortable value of
3764c2aa98e2SPeter Wemm **	_POSIX_CHOWN_RESTRICTED tells us nothing.
3765c2aa98e2SPeter Wemm **
3766c2aa98e2SPeter Wemm **	Also, some systems (e.g., IRIX 6.2) return 1 from fpathconf()
3767c2aa98e2SPeter Wemm **	even on files where chown is not restricted.  Many systems get
3768c2aa98e2SPeter Wemm **	this wrong on NFS-based filesystems (that is, they say that chown
3769c2aa98e2SPeter Wemm **	is restricted [safe] on NFS filesystems where it may not be, since
3770c2aa98e2SPeter Wemm **	other systems can access the same filesystem and do file giveaway;
3771c2aa98e2SPeter Wemm **	only the NFS server knows for sure!)  Hence, it is important to
3772c2aa98e2SPeter Wemm **	get the value of SAFENFSPATHCONF correct -- it should be defined
3773c2aa98e2SPeter Wemm **	_only_ after testing (see test/t_pathconf.c) a system on an unsafe
3774c2aa98e2SPeter Wemm **	NFS-based filesystem to ensure that you can get meaningful results.
3775c2aa98e2SPeter Wemm **	If in doubt, assume unsafe!
3776c2aa98e2SPeter Wemm **
3777c2aa98e2SPeter Wemm **	You may also need to tweak IS_SAFE_CHOWN -- it should be a
3778c2aa98e2SPeter Wemm **	condition indicating whether the return from pathconf indicates
3779c2aa98e2SPeter Wemm **	that chown is safe (typically either > 0 or >= 0 -- there isn't
3780c2aa98e2SPeter Wemm **	even any agreement about whether a zero return means that a file
3781c2aa98e2SPeter Wemm **	is or is not safe).  It defaults to "> 0".
3782c2aa98e2SPeter Wemm **
3783c2aa98e2SPeter Wemm **	If the parent directory is safe (writable only by owner back
3784c2aa98e2SPeter Wemm **	to the root) then we can relax slightly and trust fpathconf
3785c2aa98e2SPeter Wemm **	in more circumstances.  This is really a crock -- if this is an
3786c2aa98e2SPeter Wemm **	NFS mounted filesystem then we really know nothing about the
3787c2aa98e2SPeter Wemm **	underlying implementation.  However, most systems pessimize and
3788c2aa98e2SPeter Wemm **	return an error (EINVAL or EOPNOTSUPP) on NFS filesystems, which
3789c2aa98e2SPeter Wemm **	we interpret as unsafe, as we should.  Thus, this heuristic gets
3790c2aa98e2SPeter Wemm **	us into a possible problem only on systems that have a broken
3791c2aa98e2SPeter Wemm **	pathconf implementation and which are also poorly configured
3792c2aa98e2SPeter Wemm **	(have :include: files in group- or world-writable directories).
3793c2aa98e2SPeter Wemm **
3794c2aa98e2SPeter Wemm **	Parameters:
3795c2aa98e2SPeter Wemm **		fd -- the file descriptor to check.
3796c2aa98e2SPeter Wemm **		safedir -- set if the parent directory is safe.
3797c2aa98e2SPeter Wemm **
3798c2aa98e2SPeter Wemm **	Returns:
3799c2aa98e2SPeter Wemm **		TRUE -- if the chown(2) operation is "safe" -- that is,
3800c2aa98e2SPeter Wemm **			only root can chown the file to an arbitrary user.
3801c2aa98e2SPeter Wemm **		FALSE -- if an arbitrary user can give away a file.
3802c2aa98e2SPeter Wemm */
3803c2aa98e2SPeter Wemm 
3804c2aa98e2SPeter Wemm #ifndef IS_SAFE_CHOWN
3805c2aa98e2SPeter Wemm # define IS_SAFE_CHOWN	> 0
38063299c2f1SGregory Neil Shapiro #endif /* ! IS_SAFE_CHOWN */
3807c2aa98e2SPeter Wemm 
3808c2aa98e2SPeter Wemm bool
3809c2aa98e2SPeter Wemm chownsafe(fd, safedir)
3810c2aa98e2SPeter Wemm 	int fd;
3811c2aa98e2SPeter Wemm 	bool safedir;
3812c2aa98e2SPeter Wemm {
3813c2aa98e2SPeter Wemm # if (!defined(_POSIX_CHOWN_RESTRICTED) || _POSIX_CHOWN_RESTRICTED != -1) && \
3814c2aa98e2SPeter Wemm     (defined(_PC_CHOWN_RESTRICTED) || defined(_GNU_TYPES_H))
3815c2aa98e2SPeter Wemm 	int rval;
3816c2aa98e2SPeter Wemm 
3817c2aa98e2SPeter Wemm 	/* give the system administrator a chance to override */
38183299c2f1SGregory Neil Shapiro 	if (bitnset(DBS_ASSUMESAFECHOWN, DontBlameSendmail))
3819c2aa98e2SPeter Wemm 		return TRUE;
3820c2aa98e2SPeter Wemm 
3821c2aa98e2SPeter Wemm 	/*
3822c2aa98e2SPeter Wemm 	**  Some systems (e.g., SunOS) seem to have the call and the
3823c2aa98e2SPeter Wemm 	**  #define _PC_CHOWN_RESTRICTED, but don't actually implement
3824c2aa98e2SPeter Wemm 	**  the call.  This heuristic checks for that.
3825c2aa98e2SPeter Wemm 	*/
3826c2aa98e2SPeter Wemm 
3827c2aa98e2SPeter Wemm 	errno = 0;
3828c2aa98e2SPeter Wemm 	rval = fpathconf(fd, _PC_CHOWN_RESTRICTED);
3829c2aa98e2SPeter Wemm #  if SAFENFSPATHCONF
3830c2aa98e2SPeter Wemm 	return errno == 0 && rval IS_SAFE_CHOWN;
38313299c2f1SGregory Neil Shapiro #  else /* SAFENFSPATHCONF */
3832c2aa98e2SPeter Wemm 	return safedir && errno == 0 && rval IS_SAFE_CHOWN;
38333299c2f1SGregory Neil Shapiro #  endif /* SAFENFSPATHCONF */
38343299c2f1SGregory Neil Shapiro # else /* (!defined(_POSIX_CHOWN_RESTRICTED) || _POSIX_CHOWN_RESTRICTED != -1) && \ */
38353299c2f1SGregory Neil Shapiro 	return bitnset(DBS_ASSUMESAFECHOWN, DontBlameSendmail);
38363299c2f1SGregory Neil Shapiro # endif /* (!defined(_POSIX_CHOWN_RESTRICTED) || _POSIX_CHOWN_RESTRICTED != -1) && \ */
3837c2aa98e2SPeter Wemm }
3838c2aa98e2SPeter Wemm /*
3839c2aa98e2SPeter Wemm **  RESETLIMITS -- reset system controlled resource limits
3840c2aa98e2SPeter Wemm **
3841c2aa98e2SPeter Wemm **	This is to avoid denial-of-service attacks
3842c2aa98e2SPeter Wemm **
3843c2aa98e2SPeter Wemm **	Parameters:
3844c2aa98e2SPeter Wemm **		none
3845c2aa98e2SPeter Wemm **
3846c2aa98e2SPeter Wemm **	Returns:
3847c2aa98e2SPeter Wemm **		none
3848c2aa98e2SPeter Wemm */
3849c2aa98e2SPeter Wemm 
3850c2aa98e2SPeter Wemm #if HASSETRLIMIT
3851c2aa98e2SPeter Wemm # ifdef RLIMIT_NEEDS_SYS_TIME_H
3852c2aa98e2SPeter Wemm #  include <sys/time.h>
38533299c2f1SGregory Neil Shapiro # endif /* RLIMIT_NEEDS_SYS_TIME_H */
3854c2aa98e2SPeter Wemm # include <sys/resource.h>
38553299c2f1SGregory Neil Shapiro #endif /* HASSETRLIMIT */
3856c2aa98e2SPeter Wemm #ifndef FD_SETSIZE
3857c2aa98e2SPeter Wemm # define FD_SETSIZE	256
38583299c2f1SGregory Neil Shapiro #endif /* ! FD_SETSIZE */
3859c2aa98e2SPeter Wemm 
3860c2aa98e2SPeter Wemm void
3861c2aa98e2SPeter Wemm resetlimits()
3862c2aa98e2SPeter Wemm {
3863c2aa98e2SPeter Wemm #if HASSETRLIMIT
3864c2aa98e2SPeter Wemm 	struct rlimit lim;
3865c2aa98e2SPeter Wemm 
3866c2aa98e2SPeter Wemm 	lim.rlim_cur = lim.rlim_max = RLIM_INFINITY;
3867c2aa98e2SPeter Wemm 	(void) setrlimit(RLIMIT_CPU, &lim);
3868c2aa98e2SPeter Wemm 	(void) setrlimit(RLIMIT_FSIZE, &lim);
3869c2aa98e2SPeter Wemm # ifdef RLIMIT_NOFILE
3870c2aa98e2SPeter Wemm 	lim.rlim_cur = lim.rlim_max = FD_SETSIZE;
3871c2aa98e2SPeter Wemm 	(void) setrlimit(RLIMIT_NOFILE, &lim);
38723299c2f1SGregory Neil Shapiro # endif /* RLIMIT_NOFILE */
38733299c2f1SGregory Neil Shapiro #else /* HASSETRLIMIT */
3874c2aa98e2SPeter Wemm # if HASULIMIT
3875c2aa98e2SPeter Wemm 	(void) ulimit(2, 0x3fffff);
3876c2aa98e2SPeter Wemm 	(void) ulimit(4, FD_SETSIZE);
38773299c2f1SGregory Neil Shapiro # endif /* HASULIMIT */
38783299c2f1SGregory Neil Shapiro #endif /* HASSETRLIMIT */
3879c2aa98e2SPeter Wemm 	errno = 0;
3880c2aa98e2SPeter Wemm }
3881c2aa98e2SPeter Wemm /*
3882c2aa98e2SPeter Wemm **  GETCFNAME -- return the name of the .cf file.
3883c2aa98e2SPeter Wemm **
3884c2aa98e2SPeter Wemm **	Some systems (e.g., NeXT) determine this dynamically.
3885c2aa98e2SPeter Wemm */
3886c2aa98e2SPeter Wemm 
3887c2aa98e2SPeter Wemm char *
3888c2aa98e2SPeter Wemm getcfname()
3889c2aa98e2SPeter Wemm {
3890c2aa98e2SPeter Wemm 
3891c2aa98e2SPeter Wemm 	if (ConfFile != NULL)
3892c2aa98e2SPeter Wemm 		return ConfFile;
3893c2aa98e2SPeter Wemm #if NETINFO
3894c2aa98e2SPeter Wemm 	{
3895c2aa98e2SPeter Wemm 		char *cflocation;
3896c2aa98e2SPeter Wemm 
3897c2aa98e2SPeter Wemm 		cflocation = ni_propval("/locations", NULL, "sendmail",
3898c2aa98e2SPeter Wemm 					"sendmail.cf", '\0');
3899c2aa98e2SPeter Wemm 		if (cflocation != NULL)
3900c2aa98e2SPeter Wemm 			return cflocation;
3901c2aa98e2SPeter Wemm 	}
39023299c2f1SGregory Neil Shapiro #endif /* NETINFO */
3903c2aa98e2SPeter Wemm 
3904c2aa98e2SPeter Wemm 	return _PATH_SENDMAILCF;
3905c2aa98e2SPeter Wemm }
3906c2aa98e2SPeter Wemm /*
3907c2aa98e2SPeter Wemm **  SETVENDOR -- process vendor code from V configuration line
3908c2aa98e2SPeter Wemm **
3909c2aa98e2SPeter Wemm **	Parameters:
3910c2aa98e2SPeter Wemm **		vendor -- string representation of vendor.
3911c2aa98e2SPeter Wemm **
3912c2aa98e2SPeter Wemm **	Returns:
3913c2aa98e2SPeter Wemm **		TRUE -- if ok.
3914c2aa98e2SPeter Wemm **		FALSE -- if vendor code could not be processed.
3915c2aa98e2SPeter Wemm **
3916c2aa98e2SPeter Wemm **	Side Effects:
3917c2aa98e2SPeter Wemm **		It is reasonable to set mode flags here to tweak
3918c2aa98e2SPeter Wemm **		processing in other parts of the code if necessary.
3919c2aa98e2SPeter Wemm **		For example, if you are a vendor that uses $%y to
3920c2aa98e2SPeter Wemm **		indicate YP lookups, you could enable that here.
3921c2aa98e2SPeter Wemm */
3922c2aa98e2SPeter Wemm 
3923c2aa98e2SPeter Wemm bool
3924c2aa98e2SPeter Wemm setvendor(vendor)
3925c2aa98e2SPeter Wemm 	char *vendor;
3926c2aa98e2SPeter Wemm {
3927c2aa98e2SPeter Wemm 	if (strcasecmp(vendor, "Berkeley") == 0)
3928c2aa98e2SPeter Wemm 	{
3929c2aa98e2SPeter Wemm 		VendorCode = VENDOR_BERKELEY;
3930c2aa98e2SPeter Wemm 		return TRUE;
3931c2aa98e2SPeter Wemm 	}
3932c2aa98e2SPeter Wemm 
3933c2aa98e2SPeter Wemm 	/* add vendor extensions here */
3934c2aa98e2SPeter Wemm 
3935c2aa98e2SPeter Wemm #ifdef SUN_EXTENSIONS
3936c2aa98e2SPeter Wemm 	if (strcasecmp(vendor, "Sun") == 0)
3937c2aa98e2SPeter Wemm 	{
3938c2aa98e2SPeter Wemm 		VendorCode = VENDOR_SUN;
3939c2aa98e2SPeter Wemm 		return TRUE;
3940c2aa98e2SPeter Wemm 	}
39413299c2f1SGregory Neil Shapiro #endif /* SUN_EXTENSIONS */
3942c2aa98e2SPeter Wemm 
394376b7bf71SPeter Wemm #if defined(VENDOR_NAME) && defined(VENDOR_CODE)
394476b7bf71SPeter Wemm 	if (strcasecmp(vendor, VENDOR_NAME) == 0)
394576b7bf71SPeter Wemm 	{
394676b7bf71SPeter Wemm 		VendorCode = VENDOR_CODE;
394776b7bf71SPeter Wemm 		return TRUE;
394876b7bf71SPeter Wemm 	}
39493299c2f1SGregory Neil Shapiro #endif /* defined(VENDOR_NAME) && defined(VENDOR_CODE) */
395076b7bf71SPeter Wemm 
3951c2aa98e2SPeter Wemm 	return FALSE;
3952c2aa98e2SPeter Wemm }
3953c2aa98e2SPeter Wemm /*
395476b7bf71SPeter Wemm **  GETVENDOR -- return vendor name based on vendor code
395576b7bf71SPeter Wemm **
395676b7bf71SPeter Wemm **	Parameters:
395776b7bf71SPeter Wemm **		vendorcode -- numeric representation of vendor.
395876b7bf71SPeter Wemm **
395976b7bf71SPeter Wemm **	Returns:
396076b7bf71SPeter Wemm **		string containing vendor name.
396176b7bf71SPeter Wemm */
396276b7bf71SPeter Wemm 
396376b7bf71SPeter Wemm char *
396476b7bf71SPeter Wemm getvendor(vendorcode)
396576b7bf71SPeter Wemm 	int vendorcode;
396676b7bf71SPeter Wemm {
396776b7bf71SPeter Wemm #if defined(VENDOR_NAME) && defined(VENDOR_CODE)
396876b7bf71SPeter Wemm 	/*
396976b7bf71SPeter Wemm 	**  Can't have the same switch case twice so need to
397076b7bf71SPeter Wemm 	**  handle VENDOR_CODE outside of switch.  It might
397176b7bf71SPeter Wemm 	**  match one of the existing VENDOR_* codes.
397276b7bf71SPeter Wemm 	*/
397376b7bf71SPeter Wemm 
397476b7bf71SPeter Wemm 	if (vendorcode == VENDOR_CODE)
397576b7bf71SPeter Wemm 		return VENDOR_NAME;
39763299c2f1SGregory Neil Shapiro #endif /* defined(VENDOR_NAME) && defined(VENDOR_CODE) */
397776b7bf71SPeter Wemm 
397876b7bf71SPeter Wemm 	switch (vendorcode)
397976b7bf71SPeter Wemm 	{
398076b7bf71SPeter Wemm 		case VENDOR_BERKELEY:
398176b7bf71SPeter Wemm 			return "Berkeley";
398276b7bf71SPeter Wemm 
398376b7bf71SPeter Wemm 		case VENDOR_SUN:
398476b7bf71SPeter Wemm 			return "Sun";
398576b7bf71SPeter Wemm 
398676b7bf71SPeter Wemm 		case VENDOR_HP:
398776b7bf71SPeter Wemm 			return "HP";
398876b7bf71SPeter Wemm 
398976b7bf71SPeter Wemm 		case VENDOR_IBM:
399076b7bf71SPeter Wemm 			return "IBM";
399176b7bf71SPeter Wemm 
399276b7bf71SPeter Wemm 		case VENDOR_SENDMAIL:
399376b7bf71SPeter Wemm 			return "Sendmail";
399476b7bf71SPeter Wemm 
399576b7bf71SPeter Wemm 		default:
399676b7bf71SPeter Wemm 			return "Unknown";
399776b7bf71SPeter Wemm 	}
399876b7bf71SPeter Wemm }
399976b7bf71SPeter Wemm /*
4000c2aa98e2SPeter Wemm **  VENDOR_PRE_DEFAULTS, VENDOR_POST_DEFAULTS -- set vendor-specific defaults
4001c2aa98e2SPeter Wemm **
4002c2aa98e2SPeter Wemm **	Vendor_pre_defaults is called before reading the configuration
4003c2aa98e2SPeter Wemm **	file; vendor_post_defaults is called immediately after.
4004c2aa98e2SPeter Wemm **
4005c2aa98e2SPeter Wemm **	Parameters:
4006c2aa98e2SPeter Wemm **		e -- the global environment to initialize.
4007c2aa98e2SPeter Wemm **
4008c2aa98e2SPeter Wemm **	Returns:
4009c2aa98e2SPeter Wemm **		none.
4010c2aa98e2SPeter Wemm */
4011c2aa98e2SPeter Wemm 
4012c2aa98e2SPeter Wemm #if SHARE_V1
4013c2aa98e2SPeter Wemm int	DefShareUid;	/* default share uid to run as -- unused??? */
40143299c2f1SGregory Neil Shapiro #endif /* SHARE_V1 */
4015c2aa98e2SPeter Wemm 
4016c2aa98e2SPeter Wemm void
4017c2aa98e2SPeter Wemm vendor_pre_defaults(e)
4018c2aa98e2SPeter Wemm 	ENVELOPE *e;
4019c2aa98e2SPeter Wemm {
4020c2aa98e2SPeter Wemm #if SHARE_V1
4021c2aa98e2SPeter Wemm 	/* OTHERUID is defined in shares.h, do not be alarmed */
4022c2aa98e2SPeter Wemm 	DefShareUid = OTHERUID;
40233299c2f1SGregory Neil Shapiro #endif /* SHARE_V1 */
4024c2aa98e2SPeter Wemm #if defined(SUN_EXTENSIONS) && defined(SUN_DEFAULT_VALUES)
4025c2aa98e2SPeter Wemm 	sun_pre_defaults(e);
40263299c2f1SGregory Neil Shapiro #endif /* defined(SUN_EXTENSIONS) && defined(SUN_DEFAULT_VALUES) */
4027c2aa98e2SPeter Wemm #ifdef apollo
40283299c2f1SGregory Neil Shapiro 	/*
40293299c2f1SGregory Neil Shapiro 	**  stupid domain/os can't even open
40303299c2f1SGregory Neil Shapiro 	**  /etc/mail/sendmail.cf without this
40313299c2f1SGregory Neil Shapiro 	*/
40323299c2f1SGregory Neil Shapiro 
4033c2aa98e2SPeter Wemm 	setuserenv("ISP", NULL);
4034c2aa98e2SPeter Wemm 	setuserenv("SYSTYPE", NULL);
40353299c2f1SGregory Neil Shapiro #endif /* apollo */
4036c2aa98e2SPeter Wemm }
4037c2aa98e2SPeter Wemm 
4038c2aa98e2SPeter Wemm 
4039c2aa98e2SPeter Wemm void
4040c2aa98e2SPeter Wemm vendor_post_defaults(e)
4041c2aa98e2SPeter Wemm 	ENVELOPE *e;
4042c2aa98e2SPeter Wemm {
4043c2aa98e2SPeter Wemm #ifdef __QNX__
4044c2aa98e2SPeter Wemm 	char *p;
4045c2aa98e2SPeter Wemm 
4046c2aa98e2SPeter Wemm 	/* Makes sure the SOCK environment variable remains */
4047c2aa98e2SPeter Wemm 	if (p = getextenv("SOCK"))
4048c2aa98e2SPeter Wemm 		setuserenv("SOCK", p);
40493299c2f1SGregory Neil Shapiro #endif /* __QNX__ */
4050c2aa98e2SPeter Wemm #if defined(SUN_EXTENSIONS) && defined(SUN_DEFAULT_VALUES)
4051c2aa98e2SPeter Wemm 	sun_post_defaults(e);
40523299c2f1SGregory Neil Shapiro #endif /* defined(SUN_EXTENSIONS) && defined(SUN_DEFAULT_VALUES) */
4053c2aa98e2SPeter Wemm }
4054c2aa98e2SPeter Wemm /*
4055c2aa98e2SPeter Wemm **  VENDOR_DAEMON_SETUP -- special vendor setup needed for daemon mode
4056c2aa98e2SPeter Wemm */
4057c2aa98e2SPeter Wemm 
4058c2aa98e2SPeter Wemm void
4059c2aa98e2SPeter Wemm vendor_daemon_setup(e)
4060c2aa98e2SPeter Wemm 	ENVELOPE *e;
4061c2aa98e2SPeter Wemm {
40623299c2f1SGregory Neil Shapiro #if HASSETLOGIN
40633299c2f1SGregory Neil Shapiro 	(void) setlogin(RunAsUserName);
40643299c2f1SGregory Neil Shapiro #endif /* HASSETLOGIN */
4065c2aa98e2SPeter Wemm #if SECUREWARE
4066c2aa98e2SPeter Wemm 	if (getluid() != -1)
4067c2aa98e2SPeter Wemm 	{
4068c2aa98e2SPeter Wemm 		usrerr("Daemon cannot have LUID");
406976b7bf71SPeter Wemm 		finis(FALSE, EX_USAGE);
4070c2aa98e2SPeter Wemm 	}
4071c2aa98e2SPeter Wemm #endif /* SECUREWARE */
4072c2aa98e2SPeter Wemm }
4073c2aa98e2SPeter Wemm /*
4074c2aa98e2SPeter Wemm **  VENDOR_SET_UID -- do setup for setting a user id
4075c2aa98e2SPeter Wemm **
4076c2aa98e2SPeter Wemm **	This is called when we are still root.
4077c2aa98e2SPeter Wemm **
4078c2aa98e2SPeter Wemm **	Parameters:
4079c2aa98e2SPeter Wemm **		uid -- the uid we are about to become.
4080c2aa98e2SPeter Wemm **
4081c2aa98e2SPeter Wemm **	Returns:
4082c2aa98e2SPeter Wemm **		none.
4083c2aa98e2SPeter Wemm */
4084c2aa98e2SPeter Wemm 
4085c2aa98e2SPeter Wemm void
4086c2aa98e2SPeter Wemm vendor_set_uid(uid)
4087c2aa98e2SPeter Wemm 	UID_T uid;
4088c2aa98e2SPeter Wemm {
4089c2aa98e2SPeter Wemm 	/*
4090c2aa98e2SPeter Wemm 	**  We need to setup the share groups (lnodes)
40913299c2f1SGregory Neil Shapiro 	**  and add auditing information (luid's)
4092c2aa98e2SPeter Wemm 	**  before we loose our ``root''ness.
4093c2aa98e2SPeter Wemm 	*/
4094c2aa98e2SPeter Wemm #if SHARE_V1
4095c2aa98e2SPeter Wemm 	if (setupshares(uid, syserr) != 0)
4096c2aa98e2SPeter Wemm 		syserr("Unable to set up shares");
40973299c2f1SGregory Neil Shapiro #endif /* SHARE_V1 */
4098c2aa98e2SPeter Wemm #if SECUREWARE
4099c2aa98e2SPeter Wemm 	(void) setup_secure(uid);
41003299c2f1SGregory Neil Shapiro #endif /* SECUREWARE */
4101c2aa98e2SPeter Wemm }
4102c2aa98e2SPeter Wemm /*
4103c2aa98e2SPeter Wemm **  VALIDATE_CONNECTION -- check connection for rationality
4104c2aa98e2SPeter Wemm **
4105c2aa98e2SPeter Wemm **	If the connection is rejected, this routine should log an
4106c2aa98e2SPeter Wemm **	appropriate message -- but should never issue any SMTP protocol.
4107c2aa98e2SPeter Wemm **
4108c2aa98e2SPeter Wemm **	Parameters:
4109c2aa98e2SPeter Wemm **		sap -- a pointer to a SOCKADDR naming the peer.
4110c2aa98e2SPeter Wemm **		hostname -- the name corresponding to sap.
4111c2aa98e2SPeter Wemm **		e -- the current envelope.
4112c2aa98e2SPeter Wemm **
4113c2aa98e2SPeter Wemm **	Returns:
4114c2aa98e2SPeter Wemm **		error message from rejection.
4115c2aa98e2SPeter Wemm **		NULL if not rejected.
4116c2aa98e2SPeter Wemm */
4117c2aa98e2SPeter Wemm 
4118c2aa98e2SPeter Wemm #if TCPWRAPPERS
4119c2aa98e2SPeter Wemm # include <tcpd.h>
4120c2aa98e2SPeter Wemm 
4121c2aa98e2SPeter Wemm /* tcpwrappers does no logging, but you still have to declare these -- ugh */
4122c2aa98e2SPeter Wemm int	allow_severity	= LOG_INFO;
4123c2aa98e2SPeter Wemm int	deny_severity	= LOG_NOTICE;
41243299c2f1SGregory Neil Shapiro #endif /* TCPWRAPPERS */
4125c2aa98e2SPeter Wemm 
4126c2aa98e2SPeter Wemm #if DAEMON
4127c2aa98e2SPeter Wemm char *
4128c2aa98e2SPeter Wemm validate_connection(sap, hostname, e)
4129c2aa98e2SPeter Wemm 	SOCKADDR *sap;
4130c2aa98e2SPeter Wemm 	char *hostname;
4131c2aa98e2SPeter Wemm 	ENVELOPE *e;
4132c2aa98e2SPeter Wemm {
4133c2aa98e2SPeter Wemm # if TCPWRAPPERS
4134c2aa98e2SPeter Wemm 	char *host;
41353299c2f1SGregory Neil Shapiro # endif /* TCPWRAPPERS */
4136c2aa98e2SPeter Wemm 
4137c2aa98e2SPeter Wemm 	if (tTd(48, 3))
41383299c2f1SGregory Neil Shapiro 		dprintf("validate_connection(%s, %s)\n",
4139c2aa98e2SPeter Wemm 			hostname, anynet_ntoa(sap));
4140c2aa98e2SPeter Wemm 
41413299c2f1SGregory Neil Shapiro 	if (rscheck("check_relay", hostname, anynet_ntoa(sap),
41423299c2f1SGregory Neil Shapiro 		    e, TRUE, TRUE, 4) != EX_OK)
4143c2aa98e2SPeter Wemm 	{
4144c2aa98e2SPeter Wemm 		static char reject[BUFSIZ*2];
4145c2aa98e2SPeter Wemm 		extern char MsgBuf[];
4146c2aa98e2SPeter Wemm 
4147c2aa98e2SPeter Wemm 		if (tTd(48, 4))
41483299c2f1SGregory Neil Shapiro 			dprintf("  ... validate_connection: BAD (rscheck)\n");
4149c2aa98e2SPeter Wemm 
41503299c2f1SGregory Neil Shapiro 		if (strlen(MsgBuf) >= 3)
41513299c2f1SGregory Neil Shapiro 			(void) strlcpy(reject, MsgBuf, sizeof reject);
4152c2aa98e2SPeter Wemm 		else
41533299c2f1SGregory Neil Shapiro 			(void) strlcpy(reject, "Access denied", sizeof reject);
4154c2aa98e2SPeter Wemm 
4155c2aa98e2SPeter Wemm 		return reject;
4156c2aa98e2SPeter Wemm 	}
4157c2aa98e2SPeter Wemm 
4158c2aa98e2SPeter Wemm # if TCPWRAPPERS
4159c2aa98e2SPeter Wemm 	if (hostname[0] == '[' && hostname[strlen(hostname) - 1] == ']')
4160c2aa98e2SPeter Wemm 		host = "unknown";
4161c2aa98e2SPeter Wemm 	else
4162c2aa98e2SPeter Wemm 		host = hostname;
4163c2aa98e2SPeter Wemm 	if (!hosts_ctl("sendmail", host, anynet_ntoa(sap), STRING_UNKNOWN))
4164c2aa98e2SPeter Wemm 	{
4165c2aa98e2SPeter Wemm 		if (tTd(48, 4))
41663299c2f1SGregory Neil Shapiro 			dprintf("  ... validate_connection: BAD (tcpwrappers)\n");
4167c2aa98e2SPeter Wemm 		if (LogLevel >= 4)
41683299c2f1SGregory Neil Shapiro 			sm_syslog(LOG_NOTICE, e->e_id,
4169c2aa98e2SPeter Wemm 				"tcpwrappers (%s, %s) rejection",
4170c2aa98e2SPeter Wemm 				host, anynet_ntoa(sap));
4171c2aa98e2SPeter Wemm 		return "Access denied";
4172c2aa98e2SPeter Wemm 	}
41733299c2f1SGregory Neil Shapiro # endif /* TCPWRAPPERS */
4174c2aa98e2SPeter Wemm 	if (tTd(48, 4))
41753299c2f1SGregory Neil Shapiro 		dprintf("  ... validate_connection: OK\n");
4176c2aa98e2SPeter Wemm 	return NULL;
4177c2aa98e2SPeter Wemm }
4178c2aa98e2SPeter Wemm 
41793299c2f1SGregory Neil Shapiro #endif /* DAEMON */
4180c2aa98e2SPeter Wemm /*
4181c2aa98e2SPeter Wemm **  STRTOL -- convert string to long integer
4182c2aa98e2SPeter Wemm **
4183c2aa98e2SPeter Wemm **	For systems that don't have it in the C library.
4184c2aa98e2SPeter Wemm **
4185c2aa98e2SPeter Wemm **	This is taken verbatim from the 4.4-Lite C library.
4186c2aa98e2SPeter Wemm */
4187c2aa98e2SPeter Wemm 
41883299c2f1SGregory Neil Shapiro #if NEEDSTRTOL
4189c2aa98e2SPeter Wemm 
4190c2aa98e2SPeter Wemm # if defined(LIBC_SCCS) && !defined(lint)
4191c2aa98e2SPeter Wemm static char sccsid[] = "@(#)strtol.c	8.1 (Berkeley) 6/4/93";
41923299c2f1SGregory Neil Shapiro # endif /* defined(LIBC_SCCS) && !defined(lint) */
4193c2aa98e2SPeter Wemm 
4194c2aa98e2SPeter Wemm /*
4195c2aa98e2SPeter Wemm  * Convert a string to a long integer.
4196c2aa98e2SPeter Wemm  *
4197c2aa98e2SPeter Wemm  * Ignores `locale' stuff.  Assumes that the upper and lower case
4198c2aa98e2SPeter Wemm  * alphabets and digits are each contiguous.
4199c2aa98e2SPeter Wemm  */
4200c2aa98e2SPeter Wemm 
4201c2aa98e2SPeter Wemm long
4202c2aa98e2SPeter Wemm strtol(nptr, endptr, base)
4203c2aa98e2SPeter Wemm 	const char *nptr;
4204c2aa98e2SPeter Wemm 	char **endptr;
4205c2aa98e2SPeter Wemm 	register int base;
4206c2aa98e2SPeter Wemm {
4207c2aa98e2SPeter Wemm 	register const char *s = nptr;
4208c2aa98e2SPeter Wemm 	register unsigned long acc;
4209c2aa98e2SPeter Wemm 	register int c;
4210c2aa98e2SPeter Wemm 	register unsigned long cutoff;
4211c2aa98e2SPeter Wemm 	register int neg = 0, any, cutlim;
4212c2aa98e2SPeter Wemm 
4213c2aa98e2SPeter Wemm 	/*
4214c2aa98e2SPeter Wemm 	 * Skip white space and pick up leading +/- sign if any.
4215c2aa98e2SPeter Wemm 	 * If base is 0, allow 0x for hex and 0 for octal, else
4216c2aa98e2SPeter Wemm 	 * assume decimal; if base is already 16, allow 0x.
4217c2aa98e2SPeter Wemm 	 */
4218c2aa98e2SPeter Wemm 	do {
4219c2aa98e2SPeter Wemm 		c = *s++;
4220c2aa98e2SPeter Wemm 	} while (isspace(c));
4221c2aa98e2SPeter Wemm 	if (c == '-') {
4222c2aa98e2SPeter Wemm 		neg = 1;
4223c2aa98e2SPeter Wemm 		c = *s++;
4224c2aa98e2SPeter Wemm 	} else if (c == '+')
4225c2aa98e2SPeter Wemm 		c = *s++;
4226c2aa98e2SPeter Wemm 	if ((base == 0 || base == 16) &&
4227c2aa98e2SPeter Wemm 	    c == '0' && (*s == 'x' || *s == 'X')) {
4228c2aa98e2SPeter Wemm 		c = s[1];
4229c2aa98e2SPeter Wemm 		s += 2;
4230c2aa98e2SPeter Wemm 		base = 16;
4231c2aa98e2SPeter Wemm 	}
4232c2aa98e2SPeter Wemm 	if (base == 0)
4233c2aa98e2SPeter Wemm 		base = c == '0' ? 8 : 10;
4234c2aa98e2SPeter Wemm 
4235c2aa98e2SPeter Wemm 	/*
4236c2aa98e2SPeter Wemm 	 * Compute the cutoff value between legal numbers and illegal
4237c2aa98e2SPeter Wemm 	 * numbers.  That is the largest legal value, divided by the
4238c2aa98e2SPeter Wemm 	 * base.  An input number that is greater than this value, if
4239c2aa98e2SPeter Wemm 	 * followed by a legal input character, is too big.  One that
4240c2aa98e2SPeter Wemm 	 * is equal to this value may be valid or not; the limit
4241c2aa98e2SPeter Wemm 	 * between valid and invalid numbers is then based on the last
4242c2aa98e2SPeter Wemm 	 * digit.  For instance, if the range for longs is
4243c2aa98e2SPeter Wemm 	 * [-2147483648..2147483647] and the input base is 10,
4244c2aa98e2SPeter Wemm 	 * cutoff will be set to 214748364 and cutlim to either
4245c2aa98e2SPeter Wemm 	 * 7 (neg==0) or 8 (neg==1), meaning that if we have accumulated
4246c2aa98e2SPeter Wemm 	 * a value > 214748364, or equal but the next digit is > 7 (or 8),
4247c2aa98e2SPeter Wemm 	 * the number is too big, and we will return a range error.
4248c2aa98e2SPeter Wemm 	 *
4249c2aa98e2SPeter Wemm 	 * Set any if any `digits' consumed; make it negative to indicate
4250c2aa98e2SPeter Wemm 	 * overflow.
4251c2aa98e2SPeter Wemm 	 */
4252c2aa98e2SPeter Wemm 	cutoff = neg ? -(unsigned long)LONG_MIN : LONG_MAX;
4253c2aa98e2SPeter Wemm 	cutlim = cutoff % (unsigned long)base;
4254c2aa98e2SPeter Wemm 	cutoff /= (unsigned long)base;
4255c2aa98e2SPeter Wemm 	for (acc = 0, any = 0;; c = *s++) {
4256c2aa98e2SPeter Wemm 		if (isdigit(c))
4257c2aa98e2SPeter Wemm 			c -= '0';
4258c2aa98e2SPeter Wemm 		else if (isalpha(c))
4259c2aa98e2SPeter Wemm 			c -= isupper(c) ? 'A' - 10 : 'a' - 10;
4260c2aa98e2SPeter Wemm 		else
4261c2aa98e2SPeter Wemm 			break;
4262c2aa98e2SPeter Wemm 		if (c >= base)
4263c2aa98e2SPeter Wemm 			break;
4264c2aa98e2SPeter Wemm 		if (any < 0 || acc > cutoff || acc == cutoff && c > cutlim)
4265c2aa98e2SPeter Wemm 			any = -1;
4266c2aa98e2SPeter Wemm 		else {
4267c2aa98e2SPeter Wemm 			any = 1;
4268c2aa98e2SPeter Wemm 			acc *= base;
4269c2aa98e2SPeter Wemm 			acc += c;
4270c2aa98e2SPeter Wemm 		}
4271c2aa98e2SPeter Wemm 	}
4272c2aa98e2SPeter Wemm 	if (any < 0) {
4273c2aa98e2SPeter Wemm 		acc = neg ? LONG_MIN : LONG_MAX;
4274c2aa98e2SPeter Wemm 		errno = ERANGE;
4275c2aa98e2SPeter Wemm 	} else if (neg)
4276c2aa98e2SPeter Wemm 		acc = -acc;
4277c2aa98e2SPeter Wemm 	if (endptr != 0)
4278c2aa98e2SPeter Wemm 		*endptr = (char *)(any ? s - 1 : nptr);
42793299c2f1SGregory Neil Shapiro 	return acc;
4280c2aa98e2SPeter Wemm }
4281c2aa98e2SPeter Wemm 
42823299c2f1SGregory Neil Shapiro #endif /* NEEDSTRTOL */
4283c2aa98e2SPeter Wemm /*
4284c2aa98e2SPeter Wemm **  STRSTR -- find first substring in string
4285c2aa98e2SPeter Wemm **
4286c2aa98e2SPeter Wemm **	Parameters:
4287c2aa98e2SPeter Wemm **		big -- the big (full) string.
4288c2aa98e2SPeter Wemm **		little -- the little (sub) string.
4289c2aa98e2SPeter Wemm **
4290c2aa98e2SPeter Wemm **	Returns:
4291c2aa98e2SPeter Wemm **		A pointer to the first instance of little in big.
4292c2aa98e2SPeter Wemm **		big if little is the null string.
4293c2aa98e2SPeter Wemm **		NULL if little is not contained in big.
4294c2aa98e2SPeter Wemm */
4295c2aa98e2SPeter Wemm 
42963299c2f1SGregory Neil Shapiro #if NEEDSTRSTR
4297c2aa98e2SPeter Wemm 
4298c2aa98e2SPeter Wemm char *
4299c2aa98e2SPeter Wemm strstr(big, little)
4300c2aa98e2SPeter Wemm 	char *big;
4301c2aa98e2SPeter Wemm 	char *little;
4302c2aa98e2SPeter Wemm {
4303c2aa98e2SPeter Wemm 	register char *p = big;
4304c2aa98e2SPeter Wemm 	int l;
4305c2aa98e2SPeter Wemm 
4306c2aa98e2SPeter Wemm 	if (*little == '\0')
4307c2aa98e2SPeter Wemm 		return big;
4308c2aa98e2SPeter Wemm 	l = strlen(little);
4309c2aa98e2SPeter Wemm 
4310c2aa98e2SPeter Wemm 	while ((p = strchr(p, *little)) != NULL)
4311c2aa98e2SPeter Wemm 	{
4312c2aa98e2SPeter Wemm 		if (strncmp(p, little, l) == 0)
4313c2aa98e2SPeter Wemm 			return p;
4314c2aa98e2SPeter Wemm 		p++;
4315c2aa98e2SPeter Wemm 	}
4316c2aa98e2SPeter Wemm 	return NULL;
4317c2aa98e2SPeter Wemm }
4318c2aa98e2SPeter Wemm 
43193299c2f1SGregory Neil Shapiro #endif /* NEEDSTRSTR */
4320c2aa98e2SPeter Wemm /*
4321c2aa98e2SPeter Wemm **  SM_GETHOSTBY{NAME,ADDR} -- compatibility routines for gethostbyXXX
4322c2aa98e2SPeter Wemm **
4323c2aa98e2SPeter Wemm **	Some operating systems have wierd problems with the gethostbyXXX
4324c2aa98e2SPeter Wemm **	routines.  For example, Solaris versions at least through 2.3
4325c2aa98e2SPeter Wemm **	don't properly deliver a canonical h_name field.  This tries to
4326c2aa98e2SPeter Wemm **	work around these problems.
43273299c2f1SGregory Neil Shapiro **
43283299c2f1SGregory Neil Shapiro **	Support IPv6 as well as IPv4.
4329c2aa98e2SPeter Wemm */
4330c2aa98e2SPeter Wemm 
43313299c2f1SGregory Neil Shapiro #if NETINET6 && NEEDSGETIPNODE && __RES < 19990909
43323299c2f1SGregory Neil Shapiro 
43333299c2f1SGregory Neil Shapiro # ifndef AI_DEFAULT
43343299c2f1SGregory Neil Shapiro #  define AI_DEFAULT	0	/* dummy */
43353299c2f1SGregory Neil Shapiro # endif /* ! AI_DEFAULT */
43363299c2f1SGregory Neil Shapiro # ifndef AI_ADDRCONFIG
43373299c2f1SGregory Neil Shapiro #  define AI_ADDRCONFIG	0	/* dummy */
43383299c2f1SGregory Neil Shapiro # endif /* ! AI_ADDRCONFIG */
43393299c2f1SGregory Neil Shapiro # ifndef AI_V4MAPPED
43403299c2f1SGregory Neil Shapiro #  define AI_V4MAPPED	0	/* dummy */
43413299c2f1SGregory Neil Shapiro # endif /* ! AI_V4MAPPED */
43423299c2f1SGregory Neil Shapiro # ifndef AI_ALL
43433299c2f1SGregory Neil Shapiro #  define AI_ALL	0	/* dummy */
43443299c2f1SGregory Neil Shapiro # endif /* ! AI_ALL */
43453299c2f1SGregory Neil Shapiro 
43463299c2f1SGregory Neil Shapiro static struct hostent *
43473299c2f1SGregory Neil Shapiro getipnodebyname(name, family, flags, err)
4348c2aa98e2SPeter Wemm 	char *name;
43493299c2f1SGregory Neil Shapiro 	int family;
43503299c2f1SGregory Neil Shapiro 	int flags;
43513299c2f1SGregory Neil Shapiro 	int *err;
43523299c2f1SGregory Neil Shapiro {
43533299c2f1SGregory Neil Shapiro 	bool resv6 = TRUE;
43543299c2f1SGregory Neil Shapiro 	struct hostent *h;
43553299c2f1SGregory Neil Shapiro 
43563299c2f1SGregory Neil Shapiro 	if (family == AF_INET6)
43573299c2f1SGregory Neil Shapiro 	{
43583299c2f1SGregory Neil Shapiro 		/* From RFC2133, section 6.1 */
43593299c2f1SGregory Neil Shapiro 		resv6 = bitset(RES_USE_INET6, _res.options);
43603299c2f1SGregory Neil Shapiro 		_res.options |= RES_USE_INET6;
43613299c2f1SGregory Neil Shapiro 	}
43623299c2f1SGregory Neil Shapiro 	h_errno = 0;
43633299c2f1SGregory Neil Shapiro 	h = gethostbyname(name);
43643299c2f1SGregory Neil Shapiro 	*err = h_errno;
43653299c2f1SGregory Neil Shapiro 	if (family == AF_INET6 && !resv6)
43663299c2f1SGregory Neil Shapiro 		_res.options &= ~RES_USE_INET6;
43673299c2f1SGregory Neil Shapiro 	return h;
43683299c2f1SGregory Neil Shapiro }
43693299c2f1SGregory Neil Shapiro 
43703299c2f1SGregory Neil Shapiro static struct hostent *
43713299c2f1SGregory Neil Shapiro getipnodebyaddr(addr, len, family, err)
43723299c2f1SGregory Neil Shapiro 	char *addr;
43733299c2f1SGregory Neil Shapiro 	int len;
43743299c2f1SGregory Neil Shapiro 	int family;
43753299c2f1SGregory Neil Shapiro 	int *err;
4376c2aa98e2SPeter Wemm {
4377c2aa98e2SPeter Wemm 	struct hostent *h;
43783299c2f1SGregory Neil Shapiro 
43793299c2f1SGregory Neil Shapiro 	h_errno = 0;
43803299c2f1SGregory Neil Shapiro 	h = gethostbyaddr(addr, len, family);
43813299c2f1SGregory Neil Shapiro 	*err = h_errno;
43823299c2f1SGregory Neil Shapiro 	return h;
43833299c2f1SGregory Neil Shapiro }
43843299c2f1SGregory Neil Shapiro #endif /* NEEDSGETIPNODE && NETINET6 && __RES < 19990909 */
43853299c2f1SGregory Neil Shapiro 
43863299c2f1SGregory Neil Shapiro struct hostent *
43873299c2f1SGregory Neil Shapiro sm_gethostbyname(name, family)
43883299c2f1SGregory Neil Shapiro 	char *name;
43893299c2f1SGregory Neil Shapiro 	int family;
43903299c2f1SGregory Neil Shapiro {
43913299c2f1SGregory Neil Shapiro 	struct hostent *h = NULL;
4392c2aa98e2SPeter Wemm #if (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4))
4393c2aa98e2SPeter Wemm # if SOLARIS == 20300 || SOLARIS == 203
4394c2aa98e2SPeter Wemm 	static struct hostent hp;
4395c2aa98e2SPeter Wemm 	static char buf[1000];
4396c2aa98e2SPeter Wemm 	extern struct hostent *_switch_gethostbyname_r();
4397c2aa98e2SPeter Wemm 
4398c2aa98e2SPeter Wemm 	if (tTd(61, 10))
43993299c2f1SGregory Neil Shapiro 		dprintf("_switch_gethostbyname_r(%s)... ", name);
4400c2aa98e2SPeter Wemm 	h = _switch_gethostbyname_r(name, &hp, buf, sizeof(buf), &h_errno);
44013299c2f1SGregory Neil Shapiro # else /* SOLARIS == 20300 || SOLARIS == 203 */
4402c2aa98e2SPeter Wemm 	extern struct hostent *__switch_gethostbyname();
4403c2aa98e2SPeter Wemm 
4404c2aa98e2SPeter Wemm 	if (tTd(61, 10))
44053299c2f1SGregory Neil Shapiro 		dprintf("__switch_gethostbyname(%s)... ", name);
4406c2aa98e2SPeter Wemm 	h = __switch_gethostbyname(name);
44073299c2f1SGregory Neil Shapiro # endif /* SOLARIS == 20300 || SOLARIS == 203 */
44083299c2f1SGregory Neil Shapiro #else /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
4409c2aa98e2SPeter Wemm 	int nmaps;
44103299c2f1SGregory Neil Shapiro # if NETINET6
44113299c2f1SGregory Neil Shapiro 	int flags = AI_DEFAULT|AI_ALL;
44123299c2f1SGregory Neil Shapiro 	int err;
44133299c2f1SGregory Neil Shapiro # endif /* NETINET6 */
44143299c2f1SGregory Neil Shapiro 	int save_errno;
4415c2aa98e2SPeter Wemm 	char *maptype[MAXMAPSTACK];
4416c2aa98e2SPeter Wemm 	short mapreturn[MAXMAPACTIONS];
4417c2aa98e2SPeter Wemm 	char hbuf[MAXNAME];
4418c2aa98e2SPeter Wemm 
4419c2aa98e2SPeter Wemm 	if (tTd(61, 10))
44203299c2f1SGregory Neil Shapiro 		dprintf("sm_gethostbyname(%s, %d)... ", name, family);
44213299c2f1SGregory Neil Shapiro 
44223299c2f1SGregory Neil Shapiro # if NETINET6
44233299c2f1SGregory Neil Shapiro #  if ADDRCONFIG_IS_BROKEN
44243299c2f1SGregory Neil Shapiro 	flags &= ~AI_ADDRCONFIG;
44253299c2f1SGregory Neil Shapiro #  endif /* ADDRCONFIG_IS_BROKEN */
44263299c2f1SGregory Neil Shapiro 	h = getipnodebyname(name, family, flags, &err);
44273299c2f1SGregory Neil Shapiro 	h_errno = err;
44283299c2f1SGregory Neil Shapiro # else /* NETINET6 */
4429c2aa98e2SPeter Wemm 	h = gethostbyname(name);
44303299c2f1SGregory Neil Shapiro # endif /* NETINET6 */
44313299c2f1SGregory Neil Shapiro 
44323299c2f1SGregory Neil Shapiro 	save_errno = errno;
4433c2aa98e2SPeter Wemm 	if (h == NULL)
4434c2aa98e2SPeter Wemm 	{
4435c2aa98e2SPeter Wemm 		if (tTd(61, 10))
44363299c2f1SGregory Neil Shapiro 			dprintf("failure\n");
4437c2aa98e2SPeter Wemm 
4438c2aa98e2SPeter Wemm 		nmaps = switch_map_find("hosts", maptype, mapreturn);
4439c2aa98e2SPeter Wemm 		while (--nmaps >= 0)
4440c2aa98e2SPeter Wemm 			if (strcmp(maptype[nmaps], "nis") == 0 ||
4441c2aa98e2SPeter Wemm 			    strcmp(maptype[nmaps], "files") == 0)
4442c2aa98e2SPeter Wemm 				break;
4443c2aa98e2SPeter Wemm 		if (nmaps >= 0)
4444c2aa98e2SPeter Wemm 		{
4445c2aa98e2SPeter Wemm 			/* try short name */
4446c2aa98e2SPeter Wemm 			if (strlen(name) > (SIZE_T) sizeof hbuf - 1)
44473299c2f1SGregory Neil Shapiro 			{
44483299c2f1SGregory Neil Shapiro 				errno = save_errno;
4449c2aa98e2SPeter Wemm 				return NULL;
44503299c2f1SGregory Neil Shapiro 			}
44513299c2f1SGregory Neil Shapiro 			(void) strlcpy(hbuf, name, sizeof hbuf);
4452c2aa98e2SPeter Wemm 			shorten_hostname(hbuf);
4453c2aa98e2SPeter Wemm 
4454c2aa98e2SPeter Wemm 			/* if it hasn't been shortened, there's no point */
4455c2aa98e2SPeter Wemm 			if (strcmp(hbuf, name) != 0)
4456c2aa98e2SPeter Wemm 			{
4457c2aa98e2SPeter Wemm 				if (tTd(61, 10))
44583299c2f1SGregory Neil Shapiro 					dprintf("sm_gethostbyname(%s, %d)... ",
44593299c2f1SGregory Neil Shapiro 					       hbuf, family);
44603299c2f1SGregory Neil Shapiro 
44613299c2f1SGregory Neil Shapiro # if NETINET6
44623299c2f1SGregory Neil Shapiro 				h = getipnodebyname(hbuf, family,
44633299c2f1SGregory Neil Shapiro 						    AI_V4MAPPED|AI_ALL,
44643299c2f1SGregory Neil Shapiro 						    &err);
44653299c2f1SGregory Neil Shapiro 				h_errno = err;
44663299c2f1SGregory Neil Shapiro 				save_errno = errno;
44673299c2f1SGregory Neil Shapiro # else /* NETINET6 */
4468c2aa98e2SPeter Wemm 				h = gethostbyname(hbuf);
44693299c2f1SGregory Neil Shapiro 				save_errno = errno;
44703299c2f1SGregory Neil Shapiro # endif /* NETINET6 */
4471c2aa98e2SPeter Wemm 			}
4472c2aa98e2SPeter Wemm 		}
4473c2aa98e2SPeter Wemm 	}
44743299c2f1SGregory Neil Shapiro #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
4475c2aa98e2SPeter Wemm 	if (tTd(61, 10))
4476c2aa98e2SPeter Wemm 	{
4477c2aa98e2SPeter Wemm 		if (h == NULL)
44783299c2f1SGregory Neil Shapiro 			dprintf("failure\n");
4479c2aa98e2SPeter Wemm 		else
44803299c2f1SGregory Neil Shapiro 		{
44813299c2f1SGregory Neil Shapiro 			dprintf("%s\n", h->h_name);
44823299c2f1SGregory Neil Shapiro 			if (tTd(61, 11))
44833299c2f1SGregory Neil Shapiro 			{
44843299c2f1SGregory Neil Shapiro #if NETINET6
44853299c2f1SGregory Neil Shapiro 				struct in6_addr ia6;
44863299c2f1SGregory Neil Shapiro 				char buf6[INET6_ADDRSTRLEN];
44873299c2f1SGregory Neil Shapiro #else /* NETINET6 */
44883299c2f1SGregory Neil Shapiro 				struct in_addr ia;
44893299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
44903299c2f1SGregory Neil Shapiro 				int i;
44913299c2f1SGregory Neil Shapiro 
44923299c2f1SGregory Neil Shapiro 				if (h->h_aliases != NULL)
44933299c2f1SGregory Neil Shapiro 					for (i = 0; h->h_aliases[i] != NULL;
44943299c2f1SGregory Neil Shapiro 					     i++)
44953299c2f1SGregory Neil Shapiro 						dprintf("\talias: %s\n",
44963299c2f1SGregory Neil Shapiro 							h->h_aliases[i]);
44973299c2f1SGregory Neil Shapiro 				for (i = 0; h->h_addr_list[i] != NULL; i++)
44983299c2f1SGregory Neil Shapiro 				{
44993299c2f1SGregory Neil Shapiro 					char *addr;
45003299c2f1SGregory Neil Shapiro 
45013299c2f1SGregory Neil Shapiro #if NETINET6
45023299c2f1SGregory Neil Shapiro 					memmove(&ia6, h->h_addr_list[i],
45033299c2f1SGregory Neil Shapiro 						IN6ADDRSZ);
45043299c2f1SGregory Neil Shapiro 					addr = anynet_ntop(&ia6,
45053299c2f1SGregory Neil Shapiro 							   buf6, sizeof buf6);
45063299c2f1SGregory Neil Shapiro #else /* NETINET6 */
45073299c2f1SGregory Neil Shapiro 					memmove(&ia, h->h_addr_list[i],
45083299c2f1SGregory Neil Shapiro 						INADDRSZ);
45093299c2f1SGregory Neil Shapiro 					addr = (char *) inet_ntoa(ia);
45103299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
45113299c2f1SGregory Neil Shapiro 					if (addr != NULL)
45123299c2f1SGregory Neil Shapiro 						dprintf("\taddr: %s\n", addr);
4513c2aa98e2SPeter Wemm 				}
45143299c2f1SGregory Neil Shapiro 			}
45153299c2f1SGregory Neil Shapiro 		}
45163299c2f1SGregory Neil Shapiro 	}
45173299c2f1SGregory Neil Shapiro 	errno = save_errno;
4518c2aa98e2SPeter Wemm 	return h;
4519c2aa98e2SPeter Wemm }
4520c2aa98e2SPeter Wemm 
4521c2aa98e2SPeter Wemm struct hostent *
4522c2aa98e2SPeter Wemm sm_gethostbyaddr(addr, len, type)
4523c2aa98e2SPeter Wemm 	char *addr;
4524c2aa98e2SPeter Wemm 	int len;
4525c2aa98e2SPeter Wemm 	int type;
4526c2aa98e2SPeter Wemm {
45273299c2f1SGregory Neil Shapiro 	struct hostent *hp;
4528c2aa98e2SPeter Wemm #if (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204)
4529c2aa98e2SPeter Wemm # if SOLARIS == 20300 || SOLARIS == 203
45303299c2f1SGregory Neil Shapiro 	static struct hostent he;
4531c2aa98e2SPeter Wemm 	static char buf[1000];
4532c2aa98e2SPeter Wemm 	extern struct hostent *_switch_gethostbyaddr_r();
4533c2aa98e2SPeter Wemm 
45343299c2f1SGregory Neil Shapiro 	hp = _switch_gethostbyaddr_r(addr, len, type, &he, buf, sizeof(buf), &h_errno);
45353299c2f1SGregory Neil Shapiro # else /* SOLARIS == 20300 || SOLARIS == 203 */
4536c2aa98e2SPeter Wemm 	extern struct hostent *__switch_gethostbyaddr();
4537c2aa98e2SPeter Wemm 
45383299c2f1SGregory Neil Shapiro 	hp = __switch_gethostbyaddr(addr, len, type);
45393299c2f1SGregory Neil Shapiro # endif /* SOLARIS == 20300 || SOLARIS == 203 */
45403299c2f1SGregory Neil Shapiro #else /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) */
45413299c2f1SGregory Neil Shapiro # if NETINET6
45423299c2f1SGregory Neil Shapiro 	int err;
45433299c2f1SGregory Neil Shapiro # endif /* NETINET6 */
45443299c2f1SGregory Neil Shapiro 
45453299c2f1SGregory Neil Shapiro # if NETINET6
45463299c2f1SGregory Neil Shapiro 	hp = getipnodebyaddr(addr, len, type, &err);
45473299c2f1SGregory Neil Shapiro 	h_errno = err;
45483299c2f1SGregory Neil Shapiro # else /* NETINET6 */
45493299c2f1SGregory Neil Shapiro 	hp = gethostbyaddr(addr, len, type);
45503299c2f1SGregory Neil Shapiro # endif /* NETINET6 */
45513299c2f1SGregory Neil Shapiro 	return hp;
45523299c2f1SGregory Neil Shapiro #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) */
4553c2aa98e2SPeter Wemm }
4554c2aa98e2SPeter Wemm /*
4555c2aa98e2SPeter Wemm **  SM_GETPW{NAM,UID} -- wrapper for getpwnam and getpwuid
4556c2aa98e2SPeter Wemm */
4557c2aa98e2SPeter Wemm 
45583299c2f1SGregory Neil Shapiro 
4559c2aa98e2SPeter Wemm struct passwd *
4560c2aa98e2SPeter Wemm sm_getpwnam(user)
4561c2aa98e2SPeter Wemm 	char *user;
4562c2aa98e2SPeter Wemm {
4563c2aa98e2SPeter Wemm # ifdef _AIX4
4564c2aa98e2SPeter Wemm 	extern struct passwd *_getpwnam_shadow(const char *, const int);
4565c2aa98e2SPeter Wemm 
4566c2aa98e2SPeter Wemm 	return _getpwnam_shadow(user, 0);
45673299c2f1SGregory Neil Shapiro # else /* _AIX4 */
4568c2aa98e2SPeter Wemm 	return getpwnam(user);
45693299c2f1SGregory Neil Shapiro # endif /* _AIX4 */
4570c2aa98e2SPeter Wemm }
4571c2aa98e2SPeter Wemm 
4572c2aa98e2SPeter Wemm struct passwd *
4573c2aa98e2SPeter Wemm sm_getpwuid(uid)
4574c2aa98e2SPeter Wemm 	UID_T uid;
4575c2aa98e2SPeter Wemm {
4576c2aa98e2SPeter Wemm # if defined(_AIX4) && 0
4577c2aa98e2SPeter Wemm 	extern struct passwd *_getpwuid_shadow(const int, const int);
4578c2aa98e2SPeter Wemm 
4579c2aa98e2SPeter Wemm 	return _getpwuid_shadow(uid,0);
45803299c2f1SGregory Neil Shapiro # else /* defined(_AIX4) && 0 */
4581c2aa98e2SPeter Wemm 	return getpwuid(uid);
45823299c2f1SGregory Neil Shapiro # endif /* defined(_AIX4) && 0 */
4583c2aa98e2SPeter Wemm }
4584c2aa98e2SPeter Wemm /*
4585c2aa98e2SPeter Wemm **  SECUREWARE_SETUP_SECURE -- Convex SecureWare setup
4586c2aa98e2SPeter Wemm **
4587c2aa98e2SPeter Wemm **	Set up the trusted computing environment for C2 level security
4588c2aa98e2SPeter Wemm **	under SecureWare.
4589c2aa98e2SPeter Wemm **
4590c2aa98e2SPeter Wemm **	Parameters:
4591c2aa98e2SPeter Wemm **		uid -- uid of the user to initialize in the TCB
4592c2aa98e2SPeter Wemm **
4593c2aa98e2SPeter Wemm **	Returns:
4594c2aa98e2SPeter Wemm **		none
4595c2aa98e2SPeter Wemm **
4596c2aa98e2SPeter Wemm **	Side Effects:
4597c2aa98e2SPeter Wemm **		Initialized the user in the trusted computing base
4598c2aa98e2SPeter Wemm */
4599c2aa98e2SPeter Wemm 
4600c2aa98e2SPeter Wemm #if SECUREWARE
4601c2aa98e2SPeter Wemm 
4602c2aa98e2SPeter Wemm # include <sys/security.h>
4603c2aa98e2SPeter Wemm # include <prot.h>
4604c2aa98e2SPeter Wemm 
4605c2aa98e2SPeter Wemm void
4606c2aa98e2SPeter Wemm secureware_setup_secure(uid)
4607c2aa98e2SPeter Wemm 	UID_T uid;
4608c2aa98e2SPeter Wemm {
4609c2aa98e2SPeter Wemm 	int rc;
4610c2aa98e2SPeter Wemm 
4611c2aa98e2SPeter Wemm 	if (getluid() != -1)
4612c2aa98e2SPeter Wemm 		return;
4613c2aa98e2SPeter Wemm 
4614c2aa98e2SPeter Wemm 	if ((rc = set_secure_info(uid)) != SSI_GOOD_RETURN)
4615c2aa98e2SPeter Wemm 	{
4616c2aa98e2SPeter Wemm 		switch (rc)
4617c2aa98e2SPeter Wemm 		{
4618c2aa98e2SPeter Wemm 		  case SSI_NO_PRPW_ENTRY:
4619c2aa98e2SPeter Wemm 			syserr("No protected passwd entry, uid = %d", uid);
4620c2aa98e2SPeter Wemm 			break;
4621c2aa98e2SPeter Wemm 
4622c2aa98e2SPeter Wemm 		  case SSI_LOCKED:
4623c2aa98e2SPeter Wemm 			syserr("Account has been disabled, uid = %d", uid);
4624c2aa98e2SPeter Wemm 			break;
4625c2aa98e2SPeter Wemm 
4626c2aa98e2SPeter Wemm 		  case SSI_RETIRED:
4627c2aa98e2SPeter Wemm 			syserr("Account has been retired, uid = %d", uid);
4628c2aa98e2SPeter Wemm 			break;
4629c2aa98e2SPeter Wemm 
4630c2aa98e2SPeter Wemm 		  case SSI_BAD_SET_LUID:
4631c2aa98e2SPeter Wemm 			syserr("Could not set LUID, uid = %d", uid);
4632c2aa98e2SPeter Wemm 			break;
4633c2aa98e2SPeter Wemm 
4634c2aa98e2SPeter Wemm 		  case SSI_BAD_SET_PRIVS:
4635c2aa98e2SPeter Wemm 			syserr("Could not set kernel privs, uid = %d", uid);
4636c2aa98e2SPeter Wemm 
4637c2aa98e2SPeter Wemm 		  default:
4638c2aa98e2SPeter Wemm 			syserr("Unknown return code (%d) from set_secure_info(%d)",
4639c2aa98e2SPeter Wemm 				rc, uid);
4640c2aa98e2SPeter Wemm 			break;
4641c2aa98e2SPeter Wemm 		}
464276b7bf71SPeter Wemm 		finis(FALSE, EX_NOPERM);
4643c2aa98e2SPeter Wemm 	}
4644c2aa98e2SPeter Wemm }
4645c2aa98e2SPeter Wemm #endif /* SECUREWARE */
4646c2aa98e2SPeter Wemm /*
46473299c2f1SGregory Neil Shapiro **  ADD_HOSTNAMES -- Add a hostname to class 'w' based on IP address
464876b7bf71SPeter Wemm **
464976b7bf71SPeter Wemm **	Add hostnames to class 'w' based on the IP address read from
465076b7bf71SPeter Wemm **	the network interface.
465176b7bf71SPeter Wemm **
465276b7bf71SPeter Wemm **	Parameters:
465376b7bf71SPeter Wemm **		sa -- a pointer to a SOCKADDR containing the address
465476b7bf71SPeter Wemm **
465576b7bf71SPeter Wemm **	Returns:
465676b7bf71SPeter Wemm **		0 if successful, -1 if host lookup fails.
465776b7bf71SPeter Wemm */
465876b7bf71SPeter Wemm 
46593299c2f1SGregory Neil Shapiro static int
466076b7bf71SPeter Wemm add_hostnames(sa)
466176b7bf71SPeter Wemm 	SOCKADDR *sa;
466276b7bf71SPeter Wemm {
466376b7bf71SPeter Wemm 	struct hostent *hp;
46643299c2f1SGregory Neil Shapiro 	char **ha;
46653299c2f1SGregory Neil Shapiro 	char hnb[MAXHOSTNAMELEN];
466676b7bf71SPeter Wemm 
466776b7bf71SPeter Wemm 	/* lookup name with IP address */
466876b7bf71SPeter Wemm 	switch (sa->sa.sa_family)
466976b7bf71SPeter Wemm 	{
46703299c2f1SGregory Neil Shapiro #if NETINET
467176b7bf71SPeter Wemm 		case AF_INET:
467276b7bf71SPeter Wemm 			hp = sm_gethostbyaddr((char *) &sa->sin.sin_addr,
467376b7bf71SPeter Wemm 				sizeof(sa->sin.sin_addr), sa->sa.sa_family);
467476b7bf71SPeter Wemm 			break;
46753299c2f1SGregory Neil Shapiro #endif /* NETINET */
46763299c2f1SGregory Neil Shapiro 
46773299c2f1SGregory Neil Shapiro #if NETINET6
46783299c2f1SGregory Neil Shapiro 		case AF_INET6:
46793299c2f1SGregory Neil Shapiro 			hp = sm_gethostbyaddr((char *) &sa->sin6.sin6_addr,
46803299c2f1SGregory Neil Shapiro 				sizeof(sa->sin6.sin6_addr), sa->sa.sa_family);
46813299c2f1SGregory Neil Shapiro 			break;
46823299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
468376b7bf71SPeter Wemm 
468476b7bf71SPeter Wemm 		default:
46853299c2f1SGregory Neil Shapiro 			/* Give warning about unsupported family */
468676b7bf71SPeter Wemm 			if (LogLevel > 3)
468776b7bf71SPeter Wemm 				sm_syslog(LOG_WARNING, NOQID,
468876b7bf71SPeter Wemm 					  "Unsupported address family %d: %.100s",
468976b7bf71SPeter Wemm 					  sa->sa.sa_family, anynet_ntoa(sa));
469076b7bf71SPeter Wemm 			return -1;
469176b7bf71SPeter Wemm 	}
469276b7bf71SPeter Wemm 
469376b7bf71SPeter Wemm 	if (hp == NULL)
469476b7bf71SPeter Wemm 	{
469576b7bf71SPeter Wemm 		int save_errno = errno;
469676b7bf71SPeter Wemm 
46973299c2f1SGregory Neil Shapiro 		if (LogLevel > 3 &&
46983299c2f1SGregory Neil Shapiro #if NETINET6
46993299c2f1SGregory Neil Shapiro 		    !(sa->sa.sa_family == AF_INET6 &&
47003299c2f1SGregory Neil Shapiro 		      IN6_IS_ADDR_LINKLOCAL(&sa->sin6.sin6_addr)) &&
47013299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
47023299c2f1SGregory Neil Shapiro 		    TRUE)
470376b7bf71SPeter Wemm 			sm_syslog(LOG_WARNING, NOQID,
470476b7bf71SPeter Wemm 				"gethostbyaddr(%.100s) failed: %d\n",
470576b7bf71SPeter Wemm 				anynet_ntoa(sa),
470676b7bf71SPeter Wemm #if NAMED_BIND
470776b7bf71SPeter Wemm 				h_errno
47083299c2f1SGregory Neil Shapiro #else /* NAMED_BIND */
470976b7bf71SPeter Wemm 				-1
47103299c2f1SGregory Neil Shapiro #endif /* NAMED_BIND */
471176b7bf71SPeter Wemm 				);
471276b7bf71SPeter Wemm 		errno = save_errno;
471376b7bf71SPeter Wemm 		return -1;
471476b7bf71SPeter Wemm 	}
471576b7bf71SPeter Wemm 
471676b7bf71SPeter Wemm 	/* save its cname */
471776b7bf71SPeter Wemm 	if (!wordinclass((char *) hp->h_name, 'w'))
471876b7bf71SPeter Wemm 	{
471976b7bf71SPeter Wemm 		setclass('w', (char *) hp->h_name);
472076b7bf71SPeter Wemm 		if (tTd(0, 4))
47213299c2f1SGregory Neil Shapiro 			dprintf("\ta.k.a.: %s\n", hp->h_name);
47223299c2f1SGregory Neil Shapiro 
47233299c2f1SGregory Neil Shapiro 		if (snprintf(hnb, sizeof hnb, "[%s]", hp->h_name) < sizeof hnb
47243299c2f1SGregory Neil Shapiro 		    && !wordinclass((char *) hnb, 'w'))
47253299c2f1SGregory Neil Shapiro 			setclass('w', hnb);
47263299c2f1SGregory Neil Shapiro 	}
47273299c2f1SGregory Neil Shapiro 	else
47283299c2f1SGregory Neil Shapiro 	{
47293299c2f1SGregory Neil Shapiro 		if (tTd(0, 43))
47303299c2f1SGregory Neil Shapiro 			dprintf("\ta.k.a.: %s (already in $=w)\n", hp->h_name);
473176b7bf71SPeter Wemm 	}
473276b7bf71SPeter Wemm 
473376b7bf71SPeter Wemm 	/* save all it aliases name */
47343299c2f1SGregory Neil Shapiro 	for (ha = hp->h_aliases; ha != NULL && *ha != NULL; ha++)
473576b7bf71SPeter Wemm 	{
47363299c2f1SGregory Neil Shapiro 		if (!wordinclass(*ha, 'w'))
473776b7bf71SPeter Wemm 		{
47383299c2f1SGregory Neil Shapiro 			setclass('w', *ha);
473976b7bf71SPeter Wemm 			if (tTd(0, 4))
47403299c2f1SGregory Neil Shapiro 				dprintf("\ta.k.a.: %s\n", *ha);
47413299c2f1SGregory Neil Shapiro 			if (snprintf(hnb, sizeof hnb,
47423299c2f1SGregory Neil Shapiro 				     "[%s]", *ha) < sizeof hnb &&
47433299c2f1SGregory Neil Shapiro 			    !wordinclass((char *) hnb, 'w'))
47443299c2f1SGregory Neil Shapiro 				setclass('w', hnb);
474576b7bf71SPeter Wemm 		}
47463299c2f1SGregory Neil Shapiro 		else
47473299c2f1SGregory Neil Shapiro 		{
47483299c2f1SGregory Neil Shapiro 			if (tTd(0, 43))
47493299c2f1SGregory Neil Shapiro 				dprintf("\ta.k.a.: %s (already in $=w)\n",
47503299c2f1SGregory Neil Shapiro 					*ha);
47513299c2f1SGregory Neil Shapiro 		}
475276b7bf71SPeter Wemm 	}
475376b7bf71SPeter Wemm 	return 0;
475476b7bf71SPeter Wemm }
475576b7bf71SPeter Wemm /*
4756c2aa98e2SPeter Wemm **  LOAD_IF_NAMES -- load interface-specific names into $=w
4757c2aa98e2SPeter Wemm **
4758c2aa98e2SPeter Wemm **	Parameters:
4759c2aa98e2SPeter Wemm **		none.
4760c2aa98e2SPeter Wemm **
4761c2aa98e2SPeter Wemm **	Returns:
4762c2aa98e2SPeter Wemm **		none.
4763c2aa98e2SPeter Wemm **
4764c2aa98e2SPeter Wemm **	Side Effects:
4765c2aa98e2SPeter Wemm **		Loads $=w with the names of all the interfaces.
4766c2aa98e2SPeter Wemm */
4767c2aa98e2SPeter Wemm 
47683299c2f1SGregory Neil Shapiro #if !NETINET
47693299c2f1SGregory Neil Shapiro # define SIOCGIFCONF_IS_BROKEN	1 /* XXX */
47703299c2f1SGregory Neil Shapiro #endif /* !NETINET */
47713299c2f1SGregory Neil Shapiro 
4772c2aa98e2SPeter Wemm #if defined(SIOCGIFCONF) && !SIOCGIFCONF_IS_BROKEN
4773c2aa98e2SPeter Wemm struct rtentry;
4774c2aa98e2SPeter Wemm struct mbuf;
4775c2aa98e2SPeter Wemm # ifndef SUNOS403
4776c2aa98e2SPeter Wemm #  include <sys/time.h>
47773299c2f1SGregory Neil Shapiro # endif /* ! SUNOS403 */
47783299c2f1SGregory Neil Shapiro # if (_AIX4 >= 40300) && !defined(_NET_IF_H)
4779c2aa98e2SPeter Wemm #  undef __P
47803299c2f1SGregory Neil Shapiro # endif /* (_AIX4 >= 40300) && !defined(_NET_IF_H) */
4781c2aa98e2SPeter Wemm # include <net/if.h>
47823299c2f1SGregory Neil Shapiro #endif /* defined(SIOCGIFCONF) && !SIOCGIFCONF_IS_BROKEN */
4783c2aa98e2SPeter Wemm 
4784c2aa98e2SPeter Wemm void
4785c2aa98e2SPeter Wemm load_if_names()
4786c2aa98e2SPeter Wemm {
47873299c2f1SGregory Neil Shapiro #if NETINET6 && defined(SIOCGLIFCONF)
47883299c2f1SGregory Neil Shapiro 	int s;
47893299c2f1SGregory Neil Shapiro 	int i;
47903299c2f1SGregory Neil Shapiro 	struct lifconf lifc;
47913299c2f1SGregory Neil Shapiro 	struct lifnum lifn;
47923299c2f1SGregory Neil Shapiro 	int numifs;
47933299c2f1SGregory Neil Shapiro 
47943299c2f1SGregory Neil Shapiro 	s = socket(InetMode, SOCK_DGRAM, 0);
47953299c2f1SGregory Neil Shapiro 	if (s == -1)
47963299c2f1SGregory Neil Shapiro 		return;
47973299c2f1SGregory Neil Shapiro 
47983299c2f1SGregory Neil Shapiro 	/* get the list of known IP address from the kernel */
47993299c2f1SGregory Neil Shapiro #   ifdef SIOCGLIFNUM
48003299c2f1SGregory Neil Shapiro 	lifn.lifn_family = AF_UNSPEC;
48013299c2f1SGregory Neil Shapiro 	lifn.lifn_flags = 0;
48023299c2f1SGregory Neil Shapiro 	if (ioctl(s, SIOCGLIFNUM, (char *)&lifn) < 0)
48033299c2f1SGregory Neil Shapiro 	{
48043299c2f1SGregory Neil Shapiro 		/* can't get number of interfaces -- fall back */
48053299c2f1SGregory Neil Shapiro 		if (tTd(0, 4))
48063299c2f1SGregory Neil Shapiro 			dprintf("SIOCGLIFNUM failed: %s\n", errstring(errno));
48073299c2f1SGregory Neil Shapiro 		numifs = -1;
48083299c2f1SGregory Neil Shapiro 	}
48093299c2f1SGregory Neil Shapiro 	else
48103299c2f1SGregory Neil Shapiro 	{
48113299c2f1SGregory Neil Shapiro 		numifs = lifn.lifn_count;
48123299c2f1SGregory Neil Shapiro 		if (tTd(0, 42))
48133299c2f1SGregory Neil Shapiro 			dprintf("system has %d interfaces\n", numifs);
48143299c2f1SGregory Neil Shapiro 	}
48153299c2f1SGregory Neil Shapiro 	if (numifs < 0)
48163299c2f1SGregory Neil Shapiro #   endif /* SIOCGLIFNUM */
48173299c2f1SGregory Neil Shapiro 		numifs = MAXINTERFACES;
48183299c2f1SGregory Neil Shapiro 
48193299c2f1SGregory Neil Shapiro 	if (numifs <= 0)
48203299c2f1SGregory Neil Shapiro 	{
48213299c2f1SGregory Neil Shapiro 		close(s);
48223299c2f1SGregory Neil Shapiro 		return;
48233299c2f1SGregory Neil Shapiro 	}
48243299c2f1SGregory Neil Shapiro 	lifc.lifc_len = numifs * sizeof (struct lifreq);
48253299c2f1SGregory Neil Shapiro 	lifc.lifc_buf = xalloc(lifc.lifc_len);
48263299c2f1SGregory Neil Shapiro 	lifc.lifc_family = AF_UNSPEC;
48273299c2f1SGregory Neil Shapiro 	lifc.lifc_flags = 0;
48283299c2f1SGregory Neil Shapiro 	if (ioctl(s, SIOCGLIFCONF, (char *)&lifc) < 0)
48293299c2f1SGregory Neil Shapiro 	{
48303299c2f1SGregory Neil Shapiro 		if (tTd(0, 4))
48313299c2f1SGregory Neil Shapiro 			dprintf("SIOCGLIFCONF failed: %s\n", errstring(errno));
48323299c2f1SGregory Neil Shapiro 		close(s);
48333299c2f1SGregory Neil Shapiro 		return;
48343299c2f1SGregory Neil Shapiro 	}
48353299c2f1SGregory Neil Shapiro 
48363299c2f1SGregory Neil Shapiro 	/* scan the list of IP address */
48373299c2f1SGregory Neil Shapiro 	if (tTd(0, 40))
48383299c2f1SGregory Neil Shapiro 		dprintf("scanning for interface specific names, lifc_len=%d\n",
48393299c2f1SGregory Neil Shapiro 			lifc.lifc_len);
48403299c2f1SGregory Neil Shapiro 
48413299c2f1SGregory Neil Shapiro 	for (i = 0; i < lifc.lifc_len; )
48423299c2f1SGregory Neil Shapiro 	{
48433299c2f1SGregory Neil Shapiro 		struct lifreq *ifr = (struct lifreq *)&lifc.lifc_buf[i];
48443299c2f1SGregory Neil Shapiro 		SOCKADDR *sa = (SOCKADDR *) &ifr->lifr_addr;
48453299c2f1SGregory Neil Shapiro 		char *addr;
48463299c2f1SGregory Neil Shapiro 		struct in6_addr ia6;
48473299c2f1SGregory Neil Shapiro 		struct in_addr ia;
48483299c2f1SGregory Neil Shapiro #   ifdef SIOCGLIFFLAGS
48493299c2f1SGregory Neil Shapiro 		struct lifreq ifrf;
48503299c2f1SGregory Neil Shapiro #   endif /* SIOCGLIFFLAGS */
48513299c2f1SGregory Neil Shapiro 		char ip_addr[256];
48523299c2f1SGregory Neil Shapiro 		char buf6[INET6_ADDRSTRLEN];
48533299c2f1SGregory Neil Shapiro 		int af = ifr->lifr_addr.ss_family;
48543299c2f1SGregory Neil Shapiro 
48553299c2f1SGregory Neil Shapiro 		/*
48563299c2f1SGregory Neil Shapiro 		**  We must close and recreate the socket each time
48573299c2f1SGregory Neil Shapiro 		**  since we don't know what type of socket it is now
48583299c2f1SGregory Neil Shapiro 		**  (each status function may change it).
48593299c2f1SGregory Neil Shapiro 		*/
48603299c2f1SGregory Neil Shapiro 
48613299c2f1SGregory Neil Shapiro 		(void) close(s);
48623299c2f1SGregory Neil Shapiro 
48633299c2f1SGregory Neil Shapiro 		s = socket(af, SOCK_DGRAM, 0);
48643299c2f1SGregory Neil Shapiro 		if (s == -1)
48653299c2f1SGregory Neil Shapiro 			return;
48663299c2f1SGregory Neil Shapiro 
48673299c2f1SGregory Neil Shapiro 		/*
48683299c2f1SGregory Neil Shapiro 		**  If we don't have a complete ifr structure,
48693299c2f1SGregory Neil Shapiro 		**  don't try to use it.
48703299c2f1SGregory Neil Shapiro 		*/
48713299c2f1SGregory Neil Shapiro 
48723299c2f1SGregory Neil Shapiro 		if ((lifc.lifc_len - i) < sizeof *ifr)
48733299c2f1SGregory Neil Shapiro 			break;
48743299c2f1SGregory Neil Shapiro 
48753299c2f1SGregory Neil Shapiro #   ifdef BSD4_4_SOCKADDR
48763299c2f1SGregory Neil Shapiro 		if (sa->sa.sa_len > sizeof ifr->lifr_addr)
48773299c2f1SGregory Neil Shapiro 			i += sizeof ifr->lifr_name + sa->sa.sa_len;
48783299c2f1SGregory Neil Shapiro 		else
48793299c2f1SGregory Neil Shapiro #   endif /* BSD4_4_SOCKADDR */
48803299c2f1SGregory Neil Shapiro 			i += sizeof *ifr;
48813299c2f1SGregory Neil Shapiro 
48823299c2f1SGregory Neil Shapiro 		if (tTd(0, 20))
48833299c2f1SGregory Neil Shapiro 			dprintf("%s\n", anynet_ntoa(sa));
48843299c2f1SGregory Neil Shapiro 
48853299c2f1SGregory Neil Shapiro 		if (af != AF_INET && af != AF_INET6)
48863299c2f1SGregory Neil Shapiro 			continue;
48873299c2f1SGregory Neil Shapiro 
48883299c2f1SGregory Neil Shapiro #   ifdef SIOCGLIFFLAGS
48893299c2f1SGregory Neil Shapiro 		memset(&ifrf, '\0', sizeof(struct lifreq));
48903299c2f1SGregory Neil Shapiro 		(void) strlcpy(ifrf.lifr_name, ifr->lifr_name,
48913299c2f1SGregory Neil Shapiro 			       sizeof(ifrf.lifr_name));
48923299c2f1SGregory Neil Shapiro 		if (ioctl(s, SIOCGLIFFLAGS, (char *) &ifrf) < 0)
48933299c2f1SGregory Neil Shapiro 		{
48943299c2f1SGregory Neil Shapiro 			if (tTd(0, 4))
48953299c2f1SGregory Neil Shapiro 				dprintf("SIOCGLIFFLAGS failed: %s\n",
48963299c2f1SGregory Neil Shapiro 					errstring(errno));
48973299c2f1SGregory Neil Shapiro 			continue;
48983299c2f1SGregory Neil Shapiro 		}
48993299c2f1SGregory Neil Shapiro 		else if (tTd(0, 41))
49003299c2f1SGregory Neil Shapiro 			dprintf("\tflags: %lx\n",
49013299c2f1SGregory Neil Shapiro 				(unsigned long)ifrf.lifr_flags);
49023299c2f1SGregory Neil Shapiro 
49033299c2f1SGregory Neil Shapiro 		if (!bitset(IFF_UP, ifrf.lifr_flags))
49043299c2f1SGregory Neil Shapiro 			continue;
49053299c2f1SGregory Neil Shapiro #   endif /* SIOCGLIFFLAGS */
49063299c2f1SGregory Neil Shapiro 
49073299c2f1SGregory Neil Shapiro 		ip_addr[0] = '\0';
49083299c2f1SGregory Neil Shapiro 
49093299c2f1SGregory Neil Shapiro 		/* extract IP address from the list*/
49103299c2f1SGregory Neil Shapiro 		switch (af)
49113299c2f1SGregory Neil Shapiro 		{
49123299c2f1SGregory Neil Shapiro 		  case AF_INET6:
49133299c2f1SGregory Neil Shapiro 			ia6 = sa->sin6.sin6_addr;
49143299c2f1SGregory Neil Shapiro 			if (ia6.s6_addr == in6addr_any.s6_addr)
49153299c2f1SGregory Neil Shapiro 			{
49163299c2f1SGregory Neil Shapiro 				addr = anynet_ntop(&ia6, buf6, sizeof buf6);
49173299c2f1SGregory Neil Shapiro 				message("WARNING: interface %s is UP with %s address",
49183299c2f1SGregory Neil Shapiro 					ifr->lifr_name,
49193299c2f1SGregory Neil Shapiro 					addr == NULL ? "(NULL)" : addr);
49203299c2f1SGregory Neil Shapiro 				continue;
49213299c2f1SGregory Neil Shapiro 			}
49223299c2f1SGregory Neil Shapiro 
49233299c2f1SGregory Neil Shapiro 			/* save IP address in text from */
49243299c2f1SGregory Neil Shapiro 			addr = anynet_ntop(&ia6, buf6, sizeof buf6);
49253299c2f1SGregory Neil Shapiro 			if (addr != NULL)
49263299c2f1SGregory Neil Shapiro 				(void) snprintf(ip_addr, sizeof ip_addr,
49273299c2f1SGregory Neil Shapiro 						"[%.*s]",
4928d995d2baSGregory Neil Shapiro 						(int) sizeof ip_addr - 3, addr);
49293299c2f1SGregory Neil Shapiro 			break;
49303299c2f1SGregory Neil Shapiro 
49313299c2f1SGregory Neil Shapiro 		  case AF_INET:
49323299c2f1SGregory Neil Shapiro 			ia = sa->sin.sin_addr;
49333299c2f1SGregory Neil Shapiro 			if (ia.s_addr == INADDR_ANY ||
49343299c2f1SGregory Neil Shapiro 			    ia.s_addr == INADDR_NONE)
49353299c2f1SGregory Neil Shapiro 			{
49363299c2f1SGregory Neil Shapiro 				message("WARNING: interface %s is UP with %s address",
49373299c2f1SGregory Neil Shapiro 					ifr->lifr_name, inet_ntoa(ia));
49383299c2f1SGregory Neil Shapiro 				continue;
49393299c2f1SGregory Neil Shapiro 			}
49403299c2f1SGregory Neil Shapiro 
49413299c2f1SGregory Neil Shapiro 			/* save IP address in text from */
49423299c2f1SGregory Neil Shapiro 			(void) snprintf(ip_addr, sizeof ip_addr, "[%.*s]",
4943d995d2baSGregory Neil Shapiro 					(int) sizeof ip_addr - 3, inet_ntoa(ia));
49443299c2f1SGregory Neil Shapiro 			break;
49453299c2f1SGregory Neil Shapiro 		}
49463299c2f1SGregory Neil Shapiro 
49473299c2f1SGregory Neil Shapiro 		if (*ip_addr == '\0')
49483299c2f1SGregory Neil Shapiro 			continue;
49493299c2f1SGregory Neil Shapiro 
49503299c2f1SGregory Neil Shapiro 		if (!wordinclass(ip_addr, 'w'))
49513299c2f1SGregory Neil Shapiro 		{
49523299c2f1SGregory Neil Shapiro 			setclass('w', ip_addr);
49533299c2f1SGregory Neil Shapiro 			if (tTd(0, 4))
49543299c2f1SGregory Neil Shapiro 				dprintf("\ta.k.a.: %s\n", ip_addr);
49553299c2f1SGregory Neil Shapiro 		}
49563299c2f1SGregory Neil Shapiro 
49573299c2f1SGregory Neil Shapiro #   ifdef SIOCGLIFFLAGS
49583299c2f1SGregory Neil Shapiro 		/* skip "loopback" interface "lo" */
49593299c2f1SGregory Neil Shapiro 		if (bitset(IFF_LOOPBACK, ifrf.lifr_flags))
49603299c2f1SGregory Neil Shapiro 			continue;
49613299c2f1SGregory Neil Shapiro #   endif /* SIOCGLIFFLAGS */
49623299c2f1SGregory Neil Shapiro 		(void) add_hostnames(sa);
49633299c2f1SGregory Neil Shapiro 	}
49643299c2f1SGregory Neil Shapiro 	free(lifc.lifc_buf);
49653299c2f1SGregory Neil Shapiro 	close(s);
49663299c2f1SGregory Neil Shapiro #else /* NETINET6 && defined(SIOCGLIFCONF) */
4967c2aa98e2SPeter Wemm # if defined(SIOCGIFCONF) && !SIOCGIFCONF_IS_BROKEN
4968c2aa98e2SPeter Wemm 	int s;
4969c2aa98e2SPeter Wemm 	int i;
4970c2aa98e2SPeter Wemm 	struct ifconf ifc;
4971c2aa98e2SPeter Wemm 	int numifs;
4972c2aa98e2SPeter Wemm 
4973c2aa98e2SPeter Wemm 	s = socket(AF_INET, SOCK_DGRAM, 0);
4974c2aa98e2SPeter Wemm 	if (s == -1)
4975c2aa98e2SPeter Wemm 		return;
4976c2aa98e2SPeter Wemm 
4977c2aa98e2SPeter Wemm 	/* get the list of known IP address from the kernel */
4978c2aa98e2SPeter Wemm #  if defined(SIOCGIFNUM) && !SIOCGIFNUM_IS_BROKEN
4979c2aa98e2SPeter Wemm 	if (ioctl(s, SIOCGIFNUM, (char *) &numifs) < 0)
4980c2aa98e2SPeter Wemm 	{
4981c2aa98e2SPeter Wemm 		/* can't get number of interfaces -- fall back */
4982c2aa98e2SPeter Wemm 		if (tTd(0, 4))
49833299c2f1SGregory Neil Shapiro 			dprintf("SIOCGIFNUM failed: %s\n", errstring(errno));
4984c2aa98e2SPeter Wemm 		numifs = -1;
4985c2aa98e2SPeter Wemm 	}
4986c2aa98e2SPeter Wemm 	else if (tTd(0, 42))
49873299c2f1SGregory Neil Shapiro 		dprintf("system has %d interfaces\n", numifs);
4988c2aa98e2SPeter Wemm 	if (numifs < 0)
49893299c2f1SGregory Neil Shapiro #  endif /* defined(SIOCGIFNUM) && !SIOCGIFNUM_IS_BROKEN */
49903299c2f1SGregory Neil Shapiro 		numifs = MAXINTERFACES;
4991c2aa98e2SPeter Wemm 
4992c2aa98e2SPeter Wemm 	if (numifs <= 0)
4993c2aa98e2SPeter Wemm 	{
49943299c2f1SGregory Neil Shapiro 		(void) close(s);
4995c2aa98e2SPeter Wemm 		return;
4996c2aa98e2SPeter Wemm 	}
4997c2aa98e2SPeter Wemm 	ifc.ifc_len = numifs * sizeof (struct ifreq);
4998c2aa98e2SPeter Wemm 	ifc.ifc_buf = xalloc(ifc.ifc_len);
4999c2aa98e2SPeter Wemm 	if (ioctl(s, SIOCGIFCONF, (char *)&ifc) < 0)
5000c2aa98e2SPeter Wemm 	{
5001c2aa98e2SPeter Wemm 		if (tTd(0, 4))
50023299c2f1SGregory Neil Shapiro 			dprintf("SIOCGIFCONF failed: %s\n", errstring(errno));
50033299c2f1SGregory Neil Shapiro 		(void) close(s);
5004d995d2baSGregory Neil Shapiro 		free(ifc.ifc_buf);
5005c2aa98e2SPeter Wemm 		return;
5006c2aa98e2SPeter Wemm 	}
5007c2aa98e2SPeter Wemm 
5008c2aa98e2SPeter Wemm 	/* scan the list of IP address */
5009c2aa98e2SPeter Wemm 	if (tTd(0, 40))
50103299c2f1SGregory Neil Shapiro 		dprintf("scanning for interface specific names, ifc_len=%d\n",
5011c2aa98e2SPeter Wemm 			ifc.ifc_len);
5012c2aa98e2SPeter Wemm 
5013c2aa98e2SPeter Wemm 	for (i = 0; i < ifc.ifc_len; )
5014c2aa98e2SPeter Wemm 	{
50153299c2f1SGregory Neil Shapiro 		int af;
5016c2aa98e2SPeter Wemm 		struct ifreq *ifr = (struct ifreq *) &ifc.ifc_buf[i];
501776b7bf71SPeter Wemm 		SOCKADDR *sa = (SOCKADDR *) &ifr->ifr_addr;
50183299c2f1SGregory Neil Shapiro #   if NETINET6
50193299c2f1SGregory Neil Shapiro 		char *addr;
50203299c2f1SGregory Neil Shapiro 		struct in6_addr ia6;
50213299c2f1SGregory Neil Shapiro #   endif /* NETINET6 */
5022c2aa98e2SPeter Wemm 		struct in_addr ia;
5023c2aa98e2SPeter Wemm #   ifdef SIOCGIFFLAGS
5024c2aa98e2SPeter Wemm 		struct ifreq ifrf;
50253299c2f1SGregory Neil Shapiro #   endif /* SIOCGIFFLAGS */
5026c2aa98e2SPeter Wemm 		char ip_addr[256];
50273299c2f1SGregory Neil Shapiro #   if NETINET6
50283299c2f1SGregory Neil Shapiro 		char buf6[INET6_ADDRSTRLEN];
50293299c2f1SGregory Neil Shapiro #   endif /* NETINET6 */
50303299c2f1SGregory Neil Shapiro 
50313299c2f1SGregory Neil Shapiro 		/*
50323299c2f1SGregory Neil Shapiro 		**  If we don't have a complete ifr structure,
50333299c2f1SGregory Neil Shapiro 		**  don't try to use it.
50343299c2f1SGregory Neil Shapiro 		*/
50353299c2f1SGregory Neil Shapiro 
50363299c2f1SGregory Neil Shapiro 		if ((ifc.ifc_len - i) < sizeof *ifr)
50373299c2f1SGregory Neil Shapiro 			break;
5038c2aa98e2SPeter Wemm 
5039c2aa98e2SPeter Wemm #   ifdef BSD4_4_SOCKADDR
504076b7bf71SPeter Wemm 		if (sa->sa.sa_len > sizeof ifr->ifr_addr)
504176b7bf71SPeter Wemm 			i += sizeof ifr->ifr_name + sa->sa.sa_len;
5042c2aa98e2SPeter Wemm 		else
50433299c2f1SGregory Neil Shapiro #   endif /* BSD4_4_SOCKADDR */
5044c2aa98e2SPeter Wemm 			i += sizeof *ifr;
5045c2aa98e2SPeter Wemm 
5046c2aa98e2SPeter Wemm 		if (tTd(0, 20))
50473299c2f1SGregory Neil Shapiro 			dprintf("%s\n", anynet_ntoa(sa));
5048c2aa98e2SPeter Wemm 
50493299c2f1SGregory Neil Shapiro 		af = ifr->ifr_addr.sa_family;
50503299c2f1SGregory Neil Shapiro 		if (af != AF_INET
50513299c2f1SGregory Neil Shapiro #   if NETINET6
50523299c2f1SGregory Neil Shapiro 		    && af != AF_INET6
50533299c2f1SGregory Neil Shapiro #   endif /* NETINET6 */
50543299c2f1SGregory Neil Shapiro 		    )
5055c2aa98e2SPeter Wemm 			continue;
5056c2aa98e2SPeter Wemm 
5057c2aa98e2SPeter Wemm #   ifdef SIOCGIFFLAGS
50583299c2f1SGregory Neil Shapiro 		memset(&ifrf, '\0', sizeof(struct ifreq));
50593299c2f1SGregory Neil Shapiro 		(void) strlcpy(ifrf.ifr_name, ifr->ifr_name,
50603299c2f1SGregory Neil Shapiro 			       sizeof(ifrf.ifr_name));
50613299c2f1SGregory Neil Shapiro 		(void) ioctl(s, SIOCGIFFLAGS, (char *) &ifrf);
5062c2aa98e2SPeter Wemm 		if (tTd(0, 41))
50633299c2f1SGregory Neil Shapiro 			dprintf("\tflags: %lx\n",
50643299c2f1SGregory Neil Shapiro 				(unsigned long) ifrf.ifr_flags);
5065c2aa98e2SPeter Wemm #    define IFRFREF ifrf
50663299c2f1SGregory Neil Shapiro #   else /* SIOCGIFFLAGS */
5067c2aa98e2SPeter Wemm #    define IFRFREF (*ifr)
50683299c2f1SGregory Neil Shapiro #   endif /* SIOCGIFFLAGS */
50693299c2f1SGregory Neil Shapiro 
5070c2aa98e2SPeter Wemm 		if (!bitset(IFF_UP, IFRFREF.ifr_flags))
5071c2aa98e2SPeter Wemm 			continue;
5072c2aa98e2SPeter Wemm 
50733299c2f1SGregory Neil Shapiro 		ip_addr[0] = '\0';
50743299c2f1SGregory Neil Shapiro 
5075c2aa98e2SPeter Wemm 		/* extract IP address from the list*/
50763299c2f1SGregory Neil Shapiro 		switch (af)
50773299c2f1SGregory Neil Shapiro 		{
50783299c2f1SGregory Neil Shapiro 		  case AF_INET:
507976b7bf71SPeter Wemm 			ia = sa->sin.sin_addr;
50803299c2f1SGregory Neil Shapiro 			if (ia.s_addr == INADDR_ANY ||
50813299c2f1SGregory Neil Shapiro 			    ia.s_addr == INADDR_NONE)
5082c2aa98e2SPeter Wemm 			{
5083c2aa98e2SPeter Wemm 				message("WARNING: interface %s is UP with %s address",
5084c2aa98e2SPeter Wemm 					ifr->ifr_name, inet_ntoa(ia));
5085c2aa98e2SPeter Wemm 				continue;
5086c2aa98e2SPeter Wemm 			}
5087c2aa98e2SPeter Wemm 
5088c2aa98e2SPeter Wemm 			/* save IP address in text from */
5089c2aa98e2SPeter Wemm 			(void) snprintf(ip_addr, sizeof ip_addr, "[%.*s]",
50901ec86adfSBruce Evans 					(int) sizeof ip_addr - 3,
5091c2aa98e2SPeter Wemm 					inet_ntoa(ia));
50923299c2f1SGregory Neil Shapiro 			break;
50933299c2f1SGregory Neil Shapiro 
50943299c2f1SGregory Neil Shapiro #   if NETINET6
50953299c2f1SGregory Neil Shapiro 		  case AF_INET6:
50963299c2f1SGregory Neil Shapiro 			ia6 = sa->sin6.sin6_addr;
50973299c2f1SGregory Neil Shapiro 			if (ia6.s6_addr == in6addr_any.s6_addr)
50983299c2f1SGregory Neil Shapiro 			{
50993299c2f1SGregory Neil Shapiro 				addr = anynet_ntop(&ia6, buf6, sizeof buf6);
51003299c2f1SGregory Neil Shapiro 				message("WARNING: interface %s is UP with %s address",
51013299c2f1SGregory Neil Shapiro 					ifr->ifr_name,
51023299c2f1SGregory Neil Shapiro 					addr == NULL ? "(NULL)" : addr);
51033299c2f1SGregory Neil Shapiro 				continue;
51043299c2f1SGregory Neil Shapiro 			}
51053299c2f1SGregory Neil Shapiro 
51063299c2f1SGregory Neil Shapiro 			/* save IP address in text from */
51073299c2f1SGregory Neil Shapiro 			addr = anynet_ntop(&ia6, buf6, sizeof buf6);
51083299c2f1SGregory Neil Shapiro 			if (addr != NULL)
51093299c2f1SGregory Neil Shapiro 				(void) snprintf(ip_addr, sizeof ip_addr,
51103299c2f1SGregory Neil Shapiro 						"[%.*s]",
51113299c2f1SGregory Neil Shapiro 						(int) sizeof ip_addr - 3, addr);
51123299c2f1SGregory Neil Shapiro 			break;
51133299c2f1SGregory Neil Shapiro 
51143299c2f1SGregory Neil Shapiro #   endif /* NETINET6 */
51153299c2f1SGregory Neil Shapiro 		}
51163299c2f1SGregory Neil Shapiro 
51173299c2f1SGregory Neil Shapiro 		if (ip_addr[0] == '\0')
51183299c2f1SGregory Neil Shapiro 			continue;
51193299c2f1SGregory Neil Shapiro 
5120c2aa98e2SPeter Wemm 		if (!wordinclass(ip_addr, 'w'))
5121c2aa98e2SPeter Wemm 		{
5122c2aa98e2SPeter Wemm 			setclass('w', ip_addr);
5123c2aa98e2SPeter Wemm 			if (tTd(0, 4))
51243299c2f1SGregory Neil Shapiro 				dprintf("\ta.k.a.: %s\n", ip_addr);
5125c2aa98e2SPeter Wemm 		}
5126c2aa98e2SPeter Wemm 
5127c2aa98e2SPeter Wemm 		/* skip "loopback" interface "lo" */
5128c2aa98e2SPeter Wemm 		if (bitset(IFF_LOOPBACK, IFRFREF.ifr_flags))
5129c2aa98e2SPeter Wemm 			continue;
5130c2aa98e2SPeter Wemm 
513176b7bf71SPeter Wemm 		(void) add_hostnames(sa);
5132c2aa98e2SPeter Wemm 	}
5133c2aa98e2SPeter Wemm 	free(ifc.ifc_buf);
51343299c2f1SGregory Neil Shapiro 	(void) close(s);
5135c2aa98e2SPeter Wemm #  undef IFRFREF
51363299c2f1SGregory Neil Shapiro # endif /* defined(SIOCGIFCONF) && !SIOCGIFCONF_IS_BROKEN */
51373299c2f1SGregory Neil Shapiro #endif /* NETINET6 && defined(SIOCGLIFCONF) */
51383299c2f1SGregory Neil Shapiro }
51393299c2f1SGregory Neil Shapiro /*
51403299c2f1SGregory Neil Shapiro **  ISLOOPBACK -- is socket address in the loopback net?
51413299c2f1SGregory Neil Shapiro **
51423299c2f1SGregory Neil Shapiro **	Parameters:
51433299c2f1SGregory Neil Shapiro **		sa -- socket address.
51443299c2f1SGregory Neil Shapiro **
51453299c2f1SGregory Neil Shapiro **	Returns:
51463299c2f1SGregory Neil Shapiro **		TRUE -- is socket address in the loopback net?
51473299c2f1SGregory Neil Shapiro **		FALSE -- otherwise
51483299c2f1SGregory Neil Shapiro **
51493299c2f1SGregory Neil Shapiro */
51503299c2f1SGregory Neil Shapiro 
51513299c2f1SGregory Neil Shapiro bool
51523299c2f1SGregory Neil Shapiro isloopback(sa)
51533299c2f1SGregory Neil Shapiro 	SOCKADDR sa;
51543299c2f1SGregory Neil Shapiro {
51553299c2f1SGregory Neil Shapiro #if NETINET6
51563299c2f1SGregory Neil Shapiro 	if (IN6_IS_ADDR_LOOPBACK(&sa.sin6.sin6_addr))
51573299c2f1SGregory Neil Shapiro 		return TRUE;
51583299c2f1SGregory Neil Shapiro #else /* NETINET6 */
51593299c2f1SGregory Neil Shapiro 	/* XXX how to correctly extract IN_LOOPBACKNET part? */
51603299c2f1SGregory Neil Shapiro 	if (((ntohl(sa.sin.sin_addr.s_addr) & IN_CLASSA_NET)
51613299c2f1SGregory Neil Shapiro 	     >> IN_CLASSA_NSHIFT) == IN_LOOPBACKNET)
51623299c2f1SGregory Neil Shapiro 		return TRUE;
51633299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
51643299c2f1SGregory Neil Shapiro 	return FALSE;
5165c2aa98e2SPeter Wemm }
5166c2aa98e2SPeter Wemm /*
5167c2aa98e2SPeter Wemm **  GET_NUM_PROCS_ONLINE -- return the number of processors currently online
5168c2aa98e2SPeter Wemm **
5169c2aa98e2SPeter Wemm **	Parameters:
5170c2aa98e2SPeter Wemm **		none.
5171c2aa98e2SPeter Wemm **
5172c2aa98e2SPeter Wemm **	Returns:
5173c2aa98e2SPeter Wemm **		The number of processors online.
5174c2aa98e2SPeter Wemm */
5175c2aa98e2SPeter Wemm 
51763299c2f1SGregory Neil Shapiro static int
5177c2aa98e2SPeter Wemm get_num_procs_online()
5178c2aa98e2SPeter Wemm {
5179c2aa98e2SPeter Wemm 	int nproc = 0;
5180c2aa98e2SPeter Wemm 
51813299c2f1SGregory Neil Shapiro #ifdef USESYSCTL
51823299c2f1SGregory Neil Shapiro # if defined(CTL_HW) && defined(HW_NCPU)
51833299c2f1SGregory Neil Shapiro 	size_t sz;
51843299c2f1SGregory Neil Shapiro 	int mib[2];
51853299c2f1SGregory Neil Shapiro 
51863299c2f1SGregory Neil Shapiro 	mib[0] = CTL_HW;
51873299c2f1SGregory Neil Shapiro 	mib[1] = HW_NCPU;
51883299c2f1SGregory Neil Shapiro 	sz = (size_t) sizeof nproc;
51893299c2f1SGregory Neil Shapiro 	(void) sysctl(mib, 2, &nproc, &sz, NULL, 0);
51903299c2f1SGregory Neil Shapiro # endif /* defined(CTL_HW) && defined(HW_NCPUS) */
51913299c2f1SGregory Neil Shapiro #else /* USESYSCTL */
5192c2aa98e2SPeter Wemm # ifdef _SC_NPROCESSORS_ONLN
5193c2aa98e2SPeter Wemm 	nproc = (int) sysconf(_SC_NPROCESSORS_ONLN);
51943299c2f1SGregory Neil Shapiro # else /* _SC_NPROCESSORS_ONLN */
51953299c2f1SGregory Neil Shapiro #  ifdef __hpux
51963299c2f1SGregory Neil Shapiro #   include <sys/pstat.h>
51973299c2f1SGregory Neil Shapiro 	struct pst_dynamic psd;
51983299c2f1SGregory Neil Shapiro 
51993299c2f1SGregory Neil Shapiro 	if (pstat_getdynamic(&psd, sizeof(psd), (size_t)1, 0) != -1)
52003299c2f1SGregory Neil Shapiro 		nproc = psd.psd_proc_cnt;
52013299c2f1SGregory Neil Shapiro #  endif /* __hpux */
52023299c2f1SGregory Neil Shapiro # endif /* _SC_NPROCESSORS_ONLN */
52033299c2f1SGregory Neil Shapiro #endif /* USESYSCTL */
52043299c2f1SGregory Neil Shapiro 
5205c2aa98e2SPeter Wemm 	if (nproc <= 0)
5206c2aa98e2SPeter Wemm 		nproc = 1;
5207c2aa98e2SPeter Wemm 	return nproc;
5208c2aa98e2SPeter Wemm }
5209c2aa98e2SPeter Wemm /*
52103299c2f1SGregory Neil Shapiro **  SEED_RANDOM -- seed the random number generator
52113299c2f1SGregory Neil Shapiro **
52123299c2f1SGregory Neil Shapiro **	Parameters:
52133299c2f1SGregory Neil Shapiro **		none
52143299c2f1SGregory Neil Shapiro **
52153299c2f1SGregory Neil Shapiro **	Returns:
52163299c2f1SGregory Neil Shapiro **		none
52173299c2f1SGregory Neil Shapiro */
52183299c2f1SGregory Neil Shapiro 
52193299c2f1SGregory Neil Shapiro void
52203299c2f1SGregory Neil Shapiro seed_random()
52213299c2f1SGregory Neil Shapiro {
52223299c2f1SGregory Neil Shapiro #if HASSRANDOMDEV
52233299c2f1SGregory Neil Shapiro 	srandomdev();
52243299c2f1SGregory Neil Shapiro #else /* HASSRANDOMDEV */
52253299c2f1SGregory Neil Shapiro 	long seed;
52263299c2f1SGregory Neil Shapiro 	struct timeval t;
52273299c2f1SGregory Neil Shapiro 
52283299c2f1SGregory Neil Shapiro 	seed = (long) getpid();
52293299c2f1SGregory Neil Shapiro 	if (gettimeofday(&t, NULL) >= 0)
52303299c2f1SGregory Neil Shapiro 		seed += t.tv_sec + t.tv_usec;
52313299c2f1SGregory Neil Shapiro 
52323299c2f1SGregory Neil Shapiro # if HASRANDOM
52333299c2f1SGregory Neil Shapiro 	(void) srandom(seed);
52343299c2f1SGregory Neil Shapiro # else /* HASRANDOM */
52353299c2f1SGregory Neil Shapiro 	(void) srand((unsigned int) seed);
52363299c2f1SGregory Neil Shapiro # endif /* HASRANDOM */
52373299c2f1SGregory Neil Shapiro #endif /* HASSRANDOMDEV */
52383299c2f1SGregory Neil Shapiro }
52393299c2f1SGregory Neil Shapiro /*
5240c2aa98e2SPeter Wemm **  SM_SYSLOG -- syslog wrapper to keep messages under SYSLOG_BUFSIZE
5241c2aa98e2SPeter Wemm **
5242c2aa98e2SPeter Wemm **	Parameters:
5243c2aa98e2SPeter Wemm **		level -- syslog level
5244c2aa98e2SPeter Wemm **		id -- envelope ID or NULL (NOQUEUE)
5245c2aa98e2SPeter Wemm **		fmt -- format string
5246c2aa98e2SPeter Wemm **		arg... -- arguments as implied by fmt.
5247c2aa98e2SPeter Wemm **
5248c2aa98e2SPeter Wemm **	Returns:
5249c2aa98e2SPeter Wemm **		none
5250c2aa98e2SPeter Wemm */
5251c2aa98e2SPeter Wemm 
5252c2aa98e2SPeter Wemm /* VARARGS3 */
5253c2aa98e2SPeter Wemm void
5254c2aa98e2SPeter Wemm #ifdef __STDC__
5255c2aa98e2SPeter Wemm sm_syslog(int level, const char *id, const char *fmt, ...)
52563299c2f1SGregory Neil Shapiro #else /* __STDC__ */
5257c2aa98e2SPeter Wemm sm_syslog(level, id, fmt, va_alist)
5258c2aa98e2SPeter Wemm 	int level;
5259c2aa98e2SPeter Wemm 	const char *id;
5260c2aa98e2SPeter Wemm 	const char *fmt;
5261c2aa98e2SPeter Wemm 	va_dcl
52623299c2f1SGregory Neil Shapiro #endif /* __STDC__ */
5263c2aa98e2SPeter Wemm {
5264c2aa98e2SPeter Wemm 	static char *buf = NULL;
52653299c2f1SGregory Neil Shapiro 	static size_t bufsize;
5266c2aa98e2SPeter Wemm 	char *begin, *end;
52673299c2f1SGregory Neil Shapiro 	int save_errno;
5268c2aa98e2SPeter Wemm 	int seq = 1;
5269c2aa98e2SPeter Wemm 	int idlen;
52703299c2f1SGregory Neil Shapiro 	char buf0[MAXLINE];
5271c2aa98e2SPeter Wemm 	extern int SnprfOverflow;
5272c2aa98e2SPeter Wemm 	extern int SyslogErrno;
5273c2aa98e2SPeter Wemm 	extern char *DoprEnd;
5274c2aa98e2SPeter Wemm 	VA_LOCAL_DECL
5275c2aa98e2SPeter Wemm 
52763299c2f1SGregory Neil Shapiro 	save_errno = SyslogErrno = errno;
5277c2aa98e2SPeter Wemm 	if (id == NULL)
5278c2aa98e2SPeter Wemm 		id = "NOQUEUE";
5279c2aa98e2SPeter Wemm 	else if (strcmp(id, NOQID) == 0)
5280c2aa98e2SPeter Wemm 		id = "";
52813299c2f1SGregory Neil Shapiro 	idlen = strlen(id);
5282c2aa98e2SPeter Wemm 
52833299c2f1SGregory Neil Shapiro 	if (buf == NULL)
52843299c2f1SGregory Neil Shapiro 	{
52853299c2f1SGregory Neil Shapiro 		buf = buf0;
52863299c2f1SGregory Neil Shapiro 		bufsize = sizeof buf0;
52873299c2f1SGregory Neil Shapiro 	}
52883299c2f1SGregory Neil Shapiro 
52893299c2f1SGregory Neil Shapiro 	for (;;)
52903299c2f1SGregory Neil Shapiro 	{
5291c2aa98e2SPeter Wemm 		/* do a virtual vsnprintf into buf */
5292c2aa98e2SPeter Wemm 		VA_START(fmt);
5293c2aa98e2SPeter Wemm 		buf[0] = 0;
5294c2aa98e2SPeter Wemm 		DoprEnd = buf + bufsize - 1;
5295c2aa98e2SPeter Wemm 		SnprfOverflow = 0;
5296c2aa98e2SPeter Wemm 		sm_dopr(buf, fmt, ap);
5297c2aa98e2SPeter Wemm 		*DoprEnd = '\0';
5298c2aa98e2SPeter Wemm 		VA_END;
5299c2aa98e2SPeter Wemm 		/* end of virtual vsnprintf */
5300c2aa98e2SPeter Wemm 
53013299c2f1SGregory Neil Shapiro 		if (SnprfOverflow == 0)
53023299c2f1SGregory Neil Shapiro 			break;
53033299c2f1SGregory Neil Shapiro 
5304c2aa98e2SPeter Wemm 		/* String too small, redo with correct size */
5305c2aa98e2SPeter Wemm 		bufsize += SnprfOverflow + 1;
53063299c2f1SGregory Neil Shapiro 		if (buf != buf0)
5307c2aa98e2SPeter Wemm 			free(buf);
53083299c2f1SGregory Neil Shapiro 		buf = xalloc(bufsize * sizeof (char));
5309c2aa98e2SPeter Wemm 	}
5310c2aa98e2SPeter Wemm 	if ((strlen(buf) + idlen + 1) < SYSLOG_BUFSIZE)
5311c2aa98e2SPeter Wemm 	{
5312c2aa98e2SPeter Wemm #if LOG
5313c2aa98e2SPeter Wemm 		if (*id == '\0')
5314c2aa98e2SPeter Wemm 			syslog(level, "%s", buf);
5315c2aa98e2SPeter Wemm 		else
5316c2aa98e2SPeter Wemm 			syslog(level, "%s: %s", id, buf);
53173299c2f1SGregory Neil Shapiro #else /* LOG */
5318c2aa98e2SPeter Wemm 		/*XXX should do something more sensible */
5319c2aa98e2SPeter Wemm 		if (*id == '\0')
5320c2aa98e2SPeter Wemm 			fprintf(stderr, "%s\n", buf);
5321c2aa98e2SPeter Wemm 		else
5322c2aa98e2SPeter Wemm 			fprintf(stderr, "%s: %s\n", id, buf);
53233299c2f1SGregory Neil Shapiro #endif /* LOG */
53243299c2f1SGregory Neil Shapiro 		if (buf == buf0)
53253299c2f1SGregory Neil Shapiro 			buf = NULL;
53263299c2f1SGregory Neil Shapiro 		errno = save_errno;
5327c2aa98e2SPeter Wemm 		return;
5328c2aa98e2SPeter Wemm 	}
5329c2aa98e2SPeter Wemm 
5330c2aa98e2SPeter Wemm 	begin = buf;
5331c2aa98e2SPeter Wemm 	while (*begin != '\0' &&
5332c2aa98e2SPeter Wemm 	       (strlen(begin) + idlen + 5) > SYSLOG_BUFSIZE)
5333c2aa98e2SPeter Wemm 	{
5334c2aa98e2SPeter Wemm 		char save;
5335c2aa98e2SPeter Wemm 
5336c2aa98e2SPeter Wemm 		if (seq == 999)
5337c2aa98e2SPeter Wemm 		{
5338c2aa98e2SPeter Wemm 			/* Too many messages */
5339c2aa98e2SPeter Wemm 			break;
5340c2aa98e2SPeter Wemm 		}
5341c2aa98e2SPeter Wemm 		end = begin + SYSLOG_BUFSIZE - idlen - 12;
5342c2aa98e2SPeter Wemm 		while (end > begin)
5343c2aa98e2SPeter Wemm 		{
5344c2aa98e2SPeter Wemm 			/* Break on comma or space */
5345c2aa98e2SPeter Wemm 			if (*end == ',' || *end == ' ')
5346c2aa98e2SPeter Wemm 			{
5347c2aa98e2SPeter Wemm 				end++;	  /* Include separator */
5348c2aa98e2SPeter Wemm 				break;
5349c2aa98e2SPeter Wemm 			}
5350c2aa98e2SPeter Wemm 			end--;
5351c2aa98e2SPeter Wemm 		}
5352c2aa98e2SPeter Wemm 		/* No separator, break midstring... */
5353c2aa98e2SPeter Wemm 		if (end == begin)
5354c2aa98e2SPeter Wemm 			end = begin + SYSLOG_BUFSIZE - idlen - 12;
5355c2aa98e2SPeter Wemm 		save = *end;
5356c2aa98e2SPeter Wemm 		*end = 0;
5357c2aa98e2SPeter Wemm #if LOG
5358c2aa98e2SPeter Wemm 		syslog(level, "%s[%d]: %s ...", id, seq++, begin);
53593299c2f1SGregory Neil Shapiro #else /* LOG */
5360c2aa98e2SPeter Wemm 		fprintf(stderr, "%s[%d]: %s ...\n", id, seq++, begin);
53613299c2f1SGregory Neil Shapiro #endif /* LOG */
5362c2aa98e2SPeter Wemm 		*end = save;
5363c2aa98e2SPeter Wemm 		begin = end;
5364c2aa98e2SPeter Wemm 	}
5365c2aa98e2SPeter Wemm 	if (seq == 999)
5366c2aa98e2SPeter Wemm #if LOG
53673299c2f1SGregory Neil Shapiro 		syslog(level, "%s[%d]: log terminated, too many parts",
53683299c2f1SGregory Neil Shapiro 			id, seq);
53693299c2f1SGregory Neil Shapiro #else /* LOG */
53703299c2f1SGregory Neil Shapiro 		fprintf(stderr, "%s[%d]: log terminated, too many parts\n",
53713299c2f1SGregory Neil Shapiro 			id, seq);
53723299c2f1SGregory Neil Shapiro #endif /* LOG */
5373c2aa98e2SPeter Wemm 	else if (*begin != '\0')
5374c2aa98e2SPeter Wemm #if LOG
5375c2aa98e2SPeter Wemm 		syslog(level, "%s[%d]: %s", id, seq, begin);
53763299c2f1SGregory Neil Shapiro #else /* LOG */
5377c2aa98e2SPeter Wemm 		fprintf(stderr, "%s[%d]: %s\n", id, seq, begin);
53783299c2f1SGregory Neil Shapiro #endif /* LOG */
53793299c2f1SGregory Neil Shapiro 	if (buf == buf0)
53803299c2f1SGregory Neil Shapiro 		buf = NULL;
53813299c2f1SGregory Neil Shapiro 	errno = save_errno;
5382c2aa98e2SPeter Wemm }
5383c2aa98e2SPeter Wemm /*
5384c2aa98e2SPeter Wemm **  HARD_SYSLOG -- call syslog repeatedly until it works
5385c2aa98e2SPeter Wemm **
5386c2aa98e2SPeter Wemm **	Needed on HP-UX, which apparently doesn't guarantee that
5387c2aa98e2SPeter Wemm **	syslog succeeds during interrupt handlers.
5388c2aa98e2SPeter Wemm */
5389c2aa98e2SPeter Wemm 
5390c2aa98e2SPeter Wemm #if defined(__hpux) && !defined(HPUX11)
5391c2aa98e2SPeter Wemm 
5392c2aa98e2SPeter Wemm # define MAXSYSLOGTRIES	100
5393c2aa98e2SPeter Wemm # undef syslog
5394c2aa98e2SPeter Wemm # ifdef V4FS
5395c2aa98e2SPeter Wemm #  define XCNST	const
5396c2aa98e2SPeter Wemm #  define CAST	(const char *)
53973299c2f1SGregory Neil Shapiro # else /* V4FS */
5398c2aa98e2SPeter Wemm #  define XCNST
5399c2aa98e2SPeter Wemm #  define CAST
54003299c2f1SGregory Neil Shapiro # endif /* V4FS */
5401c2aa98e2SPeter Wemm 
5402c2aa98e2SPeter Wemm void
5403c2aa98e2SPeter Wemm # ifdef __STDC__
5404c2aa98e2SPeter Wemm hard_syslog(int pri, XCNST char *msg, ...)
54053299c2f1SGregory Neil Shapiro # else /* __STDC__ */
5406c2aa98e2SPeter Wemm hard_syslog(pri, msg, va_alist)
5407c2aa98e2SPeter Wemm 	int pri;
5408c2aa98e2SPeter Wemm 	XCNST char *msg;
5409c2aa98e2SPeter Wemm 	va_dcl
54103299c2f1SGregory Neil Shapiro # endif /* __STDC__ */
5411c2aa98e2SPeter Wemm {
5412c2aa98e2SPeter Wemm 	int i;
5413c2aa98e2SPeter Wemm 	char buf[SYSLOG_BUFSIZE];
5414c2aa98e2SPeter Wemm 	VA_LOCAL_DECL;
5415c2aa98e2SPeter Wemm 
5416c2aa98e2SPeter Wemm 	VA_START(msg);
5417c2aa98e2SPeter Wemm 	vsnprintf(buf, sizeof buf, msg, ap);
5418c2aa98e2SPeter Wemm 	VA_END;
5419c2aa98e2SPeter Wemm 
5420c2aa98e2SPeter Wemm 	for (i = MAXSYSLOGTRIES; --i >= 0 && syslog(pri, CAST "%s", buf) < 0; )
5421c2aa98e2SPeter Wemm 		continue;
5422c2aa98e2SPeter Wemm }
5423c2aa98e2SPeter Wemm 
5424c2aa98e2SPeter Wemm # undef CAST
54253299c2f1SGregory Neil Shapiro #endif /* defined(__hpux) && !defined(HPUX11) */
54263299c2f1SGregory Neil Shapiro #if NEEDLOCAL_HOSTNAME_LENGTH
5427c2aa98e2SPeter Wemm /*
5428c2aa98e2SPeter Wemm **  LOCAL_HOSTNAME_LENGTH
5429c2aa98e2SPeter Wemm **
5430c2aa98e2SPeter Wemm **	This is required to get sendmail to compile against BIND 4.9.x
5431c2aa98e2SPeter Wemm **	on Ultrix.
54323299c2f1SGregory Neil Shapiro **
54333299c2f1SGregory Neil Shapiro **	Unfortunately, a Compaq Y2K patch kit provides it without
54343299c2f1SGregory Neil Shapiro **	bumping __RES in /usr/include/resolv.h so we can't automatically
54353299c2f1SGregory Neil Shapiro **	figure out whether it is needed.
5436c2aa98e2SPeter Wemm */
5437c2aa98e2SPeter Wemm 
5438c2aa98e2SPeter Wemm int
5439c2aa98e2SPeter Wemm local_hostname_length(hostname)
5440c2aa98e2SPeter Wemm 	char *hostname;
5441c2aa98e2SPeter Wemm {
5442c2aa98e2SPeter Wemm 	int len_host, len_domain;
5443c2aa98e2SPeter Wemm 
5444c2aa98e2SPeter Wemm 	if (!*_res.defdname)
5445c2aa98e2SPeter Wemm 		res_init();
5446c2aa98e2SPeter Wemm 	len_host = strlen(hostname);
5447c2aa98e2SPeter Wemm 	len_domain = strlen(_res.defdname);
5448c2aa98e2SPeter Wemm 	if (len_host > len_domain &&
54493299c2f1SGregory Neil Shapiro 	    (strcasecmp(hostname + len_host - len_domain,
54503299c2f1SGregory Neil Shapiro 			_res.defdname) == 0) &&
5451c2aa98e2SPeter Wemm 	    hostname[len_host - len_domain - 1] == '.')
5452c2aa98e2SPeter Wemm 		return len_host - len_domain - 1;
5453c2aa98e2SPeter Wemm 	else
5454c2aa98e2SPeter Wemm 		return 0;
5455c2aa98e2SPeter Wemm }
54563299c2f1SGregory Neil Shapiro #endif /* NEEDLOCAL_HOSTNAME_LENGTH */
5457c2aa98e2SPeter Wemm 
5458c2aa98e2SPeter Wemm /*
5459c2aa98e2SPeter Wemm **  Compile-Time options
5460c2aa98e2SPeter Wemm */
5461c2aa98e2SPeter Wemm 
5462c2aa98e2SPeter Wemm char	*CompileOptions[] =
5463c2aa98e2SPeter Wemm {
5464c2aa98e2SPeter Wemm #ifdef HESIOD
5465c2aa98e2SPeter Wemm 	"HESIOD",
54663299c2f1SGregory Neil Shapiro #endif /* HESIOD */
5467c2aa98e2SPeter Wemm #if HES_GETMAILHOST
5468c2aa98e2SPeter Wemm 	"HES_GETMAILHOST",
54693299c2f1SGregory Neil Shapiro #endif /* HES_GETMAILHOST */
5470c2aa98e2SPeter Wemm #ifdef LDAPMAP
5471c2aa98e2SPeter Wemm 	"LDAPMAP",
54723299c2f1SGregory Neil Shapiro #endif /* LDAPMAP */
54733299c2f1SGregory Neil Shapiro #ifdef MAP_NSD
54743299c2f1SGregory Neil Shapiro 	"MAP_NSD",
54753299c2f1SGregory Neil Shapiro #endif /* MAP_NSD */
5476c2aa98e2SPeter Wemm #ifdef MAP_REGEX
5477c2aa98e2SPeter Wemm 	"MAP_REGEX",
54783299c2f1SGregory Neil Shapiro #endif /* MAP_REGEX */
5479c2aa98e2SPeter Wemm #if LOG
5480c2aa98e2SPeter Wemm 	"LOG",
54813299c2f1SGregory Neil Shapiro #endif /* LOG */
5482c2aa98e2SPeter Wemm #if MATCHGECOS
5483c2aa98e2SPeter Wemm 	"MATCHGECOS",
54843299c2f1SGregory Neil Shapiro #endif /* MATCHGECOS */
5485c2aa98e2SPeter Wemm #if MIME7TO8
5486c2aa98e2SPeter Wemm 	"MIME7TO8",
54873299c2f1SGregory Neil Shapiro #endif /* MIME7TO8 */
5488c2aa98e2SPeter Wemm #if MIME8TO7
5489c2aa98e2SPeter Wemm 	"MIME8TO7",
54903299c2f1SGregory Neil Shapiro #endif /* MIME8TO7 */
5491c2aa98e2SPeter Wemm #if NAMED_BIND
5492c2aa98e2SPeter Wemm 	"NAMED_BIND",
54933299c2f1SGregory Neil Shapiro #endif /* NAMED_BIND */
5494c2aa98e2SPeter Wemm #ifdef NDBM
5495c2aa98e2SPeter Wemm 	"NDBM",
54963299c2f1SGregory Neil Shapiro #endif /* NDBM */
5497c2aa98e2SPeter Wemm #if NETINET
5498c2aa98e2SPeter Wemm 	"NETINET",
54993299c2f1SGregory Neil Shapiro #endif /* NETINET */
55003299c2f1SGregory Neil Shapiro #if NETINET6
55013299c2f1SGregory Neil Shapiro 	"NETINET6",
55023299c2f1SGregory Neil Shapiro #endif /* NETINET6 */
5503c2aa98e2SPeter Wemm #if NETINFO
5504c2aa98e2SPeter Wemm 	"NETINFO",
55053299c2f1SGregory Neil Shapiro #endif /* NETINFO */
5506c2aa98e2SPeter Wemm #if NETISO
5507c2aa98e2SPeter Wemm 	"NETISO",
55083299c2f1SGregory Neil Shapiro #endif /* NETISO */
5509c2aa98e2SPeter Wemm #if NETNS
5510c2aa98e2SPeter Wemm 	"NETNS",
55113299c2f1SGregory Neil Shapiro #endif /* NETNS */
5512c2aa98e2SPeter Wemm #if NETUNIX
5513c2aa98e2SPeter Wemm 	"NETUNIX",
55143299c2f1SGregory Neil Shapiro #endif /* NETUNIX */
5515c2aa98e2SPeter Wemm #if NETX25
5516c2aa98e2SPeter Wemm 	"NETX25",
55173299c2f1SGregory Neil Shapiro #endif /* NETX25 */
5518c2aa98e2SPeter Wemm #ifdef NEWDB
5519c2aa98e2SPeter Wemm 	"NEWDB",
55203299c2f1SGregory Neil Shapiro #endif /* NEWDB */
5521c2aa98e2SPeter Wemm #ifdef NIS
5522c2aa98e2SPeter Wemm 	"NIS",
55233299c2f1SGregory Neil Shapiro #endif /* NIS */
5524c2aa98e2SPeter Wemm #ifdef NISPLUS
5525c2aa98e2SPeter Wemm 	"NISPLUS",
55263299c2f1SGregory Neil Shapiro #endif /* NISPLUS */
55273299c2f1SGregory Neil Shapiro #ifdef PH_MAP
55283299c2f1SGregory Neil Shapiro 	"PH_MAP",
55293299c2f1SGregory Neil Shapiro #endif /* PH_MAP */
5530c2aa98e2SPeter Wemm #if QUEUE
5531c2aa98e2SPeter Wemm 	"QUEUE",
55323299c2f1SGregory Neil Shapiro #endif /* QUEUE */
55333299c2f1SGregory Neil Shapiro #if SASL
55343299c2f1SGregory Neil Shapiro 	"SASL",
55353299c2f1SGregory Neil Shapiro #endif /* SASL */
5536c2aa98e2SPeter Wemm #if SCANF
5537c2aa98e2SPeter Wemm 	"SCANF",
55383299c2f1SGregory Neil Shapiro #endif /* SCANF */
55393299c2f1SGregory Neil Shapiro #if SFIO
55403299c2f1SGregory Neil Shapiro 	"SFIO",
55413299c2f1SGregory Neil Shapiro #endif /* SFIO */
5542c2aa98e2SPeter Wemm #if SMTP
5543c2aa98e2SPeter Wemm 	"SMTP",
55443299c2f1SGregory Neil Shapiro #endif /* SMTP */
5545c2aa98e2SPeter Wemm #if SMTPDEBUG
5546c2aa98e2SPeter Wemm 	"SMTPDEBUG",
55473299c2f1SGregory Neil Shapiro #endif /* SMTPDEBUG */
55483299c2f1SGregory Neil Shapiro #if STARTTLS
55493299c2f1SGregory Neil Shapiro 	"STARTTLS",
55503299c2f1SGregory Neil Shapiro #endif /* STARTTLS */
5551c2aa98e2SPeter Wemm #ifdef SUID_ROOT_FILES_OK
5552c2aa98e2SPeter Wemm 	"SUID_ROOT_FILES_OK",
55533299c2f1SGregory Neil Shapiro #endif /* SUID_ROOT_FILES_OK */
5554c2aa98e2SPeter Wemm #if TCPWRAPPERS
5555c2aa98e2SPeter Wemm 	"TCPWRAPPERS",
55563299c2f1SGregory Neil Shapiro #endif /* TCPWRAPPERS */
5557c2aa98e2SPeter Wemm #if USERDB
5558c2aa98e2SPeter Wemm 	"USERDB",
55593299c2f1SGregory Neil Shapiro #endif /* USERDB */
5560c2aa98e2SPeter Wemm #if XDEBUG
5561c2aa98e2SPeter Wemm 	"XDEBUG",
55623299c2f1SGregory Neil Shapiro #endif /* XDEBUG */
5563c2aa98e2SPeter Wemm #ifdef XLA
5564c2aa98e2SPeter Wemm 	"XLA",
55653299c2f1SGregory Neil Shapiro #endif /* XLA */
5566c2aa98e2SPeter Wemm 	NULL
5567c2aa98e2SPeter Wemm };
5568c2aa98e2SPeter Wemm 
5569c2aa98e2SPeter Wemm 
5570c2aa98e2SPeter Wemm /*
5571c2aa98e2SPeter Wemm **  OS compile options.
5572c2aa98e2SPeter Wemm */
5573c2aa98e2SPeter Wemm 
5574c2aa98e2SPeter Wemm char	*OsCompileOptions[] =
5575c2aa98e2SPeter Wemm {
5576c2aa98e2SPeter Wemm #if BOGUS_O_EXCL
5577c2aa98e2SPeter Wemm 	"BOGUS_O_EXCL",
55783299c2f1SGregory Neil Shapiro #endif /* BOGUS_O_EXCL */
55793299c2f1SGregory Neil Shapiro #if FAST_PID_RECYCLE
55803299c2f1SGregory Neil Shapiro 	"FAST_PID_RECYCLE",
55813299c2f1SGregory Neil Shapiro #endif /* FAST_PID_RECYCLE */
55823299c2f1SGregory Neil Shapiro #if HASFCHOWN
55833299c2f1SGregory Neil Shapiro 	"HASFCHOWN",
55843299c2f1SGregory Neil Shapiro #endif /* HASFCHOWN */
5585c2aa98e2SPeter Wemm #if HASFCHMOD
5586c2aa98e2SPeter Wemm 	"HASFCHMOD",
55873299c2f1SGregory Neil Shapiro #endif /* HASFCHMOD */
5588c2aa98e2SPeter Wemm #if HASFLOCK
5589c2aa98e2SPeter Wemm 	"HASFLOCK",
55903299c2f1SGregory Neil Shapiro #endif /* HASFLOCK */
5591c2aa98e2SPeter Wemm #if HASGETDTABLESIZE
5592c2aa98e2SPeter Wemm 	"HASGETDTABLESIZE",
55933299c2f1SGregory Neil Shapiro #endif /* HASGETDTABLESIZE */
5594c2aa98e2SPeter Wemm #if HASGETUSERSHELL
5595c2aa98e2SPeter Wemm 	"HASGETUSERSHELL",
55963299c2f1SGregory Neil Shapiro #endif /* HASGETUSERSHELL */
5597c2aa98e2SPeter Wemm #if HASINITGROUPS
5598c2aa98e2SPeter Wemm 	"HASINITGROUPS",
55993299c2f1SGregory Neil Shapiro #endif /* HASINITGROUPS */
5600c2aa98e2SPeter Wemm #if HASLSTAT
5601c2aa98e2SPeter Wemm 	"HASLSTAT",
56023299c2f1SGregory Neil Shapiro #endif /* HASLSTAT */
56033299c2f1SGregory Neil Shapiro #if HASRANDOM
56043299c2f1SGregory Neil Shapiro 	"HASRANDOM",
56053299c2f1SGregory Neil Shapiro #endif /* HASRANDOM */
56063299c2f1SGregory Neil Shapiro #if HASSETLOGIN
56073299c2f1SGregory Neil Shapiro 	"HASSETLOGIN",
56083299c2f1SGregory Neil Shapiro #endif /* HASSETLOGIN */
5609c2aa98e2SPeter Wemm #if HASSETREUID
5610c2aa98e2SPeter Wemm 	"HASSETREUID",
56113299c2f1SGregory Neil Shapiro #endif /* HASSETREUID */
5612c2aa98e2SPeter Wemm #if HASSETRLIMIT
5613c2aa98e2SPeter Wemm 	"HASSETRLIMIT",
56143299c2f1SGregory Neil Shapiro #endif /* HASSETRLIMIT */
5615c2aa98e2SPeter Wemm #if HASSETSID
5616c2aa98e2SPeter Wemm 	"HASSETSID",
56173299c2f1SGregory Neil Shapiro #endif /* HASSETSID */
5618c2aa98e2SPeter Wemm #if HASSETUSERCONTEXT
5619c2aa98e2SPeter Wemm 	"HASSETUSERCONTEXT",
56203299c2f1SGregory Neil Shapiro #endif /* HASSETUSERCONTEXT */
5621c2aa98e2SPeter Wemm #if HASSETVBUF
5622c2aa98e2SPeter Wemm 	"HASSETVBUF",
56233299c2f1SGregory Neil Shapiro #endif /* HASSETVBUF */
5624c2aa98e2SPeter Wemm #if HASSNPRINTF
5625c2aa98e2SPeter Wemm 	"HASSNPRINTF",
56263299c2f1SGregory Neil Shapiro #endif /* HASSNPRINTF */
5627c2aa98e2SPeter Wemm #if HAS_ST_GEN
5628c2aa98e2SPeter Wemm 	"HAS_ST_GEN",
56293299c2f1SGregory Neil Shapiro #endif /* HAS_ST_GEN */
56303299c2f1SGregory Neil Shapiro #if HASSRANDOMDEV
56313299c2f1SGregory Neil Shapiro 	"HASSRANDOMDEV",
56323299c2f1SGregory Neil Shapiro #endif /* HASSRANDOMDEV */
56333299c2f1SGregory Neil Shapiro #if HASURANDOMDEV
56343299c2f1SGregory Neil Shapiro 	"HASURANDOMDEV",
56353299c2f1SGregory Neil Shapiro #endif /* HASURANDOMDEV */
5636c2aa98e2SPeter Wemm #if HASSTRERROR
5637c2aa98e2SPeter Wemm 	"HASSTRERROR",
56383299c2f1SGregory Neil Shapiro #endif /* HASSTRERROR */
5639c2aa98e2SPeter Wemm #if HASULIMIT
5640c2aa98e2SPeter Wemm 	"HASULIMIT",
56413299c2f1SGregory Neil Shapiro #endif /* HASULIMIT */
5642c2aa98e2SPeter Wemm #if HASUNAME
5643c2aa98e2SPeter Wemm 	"HASUNAME",
56443299c2f1SGregory Neil Shapiro #endif /* HASUNAME */
5645c2aa98e2SPeter Wemm #if HASUNSETENV
5646c2aa98e2SPeter Wemm 	"HASUNSETENV",
56473299c2f1SGregory Neil Shapiro #endif /* HASUNSETENV */
5648c2aa98e2SPeter Wemm #if HASWAITPID
5649c2aa98e2SPeter Wemm 	"HASWAITPID",
56503299c2f1SGregory Neil Shapiro #endif /* HASWAITPID */
5651c2aa98e2SPeter Wemm #if IDENTPROTO
5652c2aa98e2SPeter Wemm 	"IDENTPROTO",
56533299c2f1SGregory Neil Shapiro #endif /* IDENTPROTO */
5654c2aa98e2SPeter Wemm #if IP_SRCROUTE
5655c2aa98e2SPeter Wemm 	"IP_SRCROUTE",
56563299c2f1SGregory Neil Shapiro #endif /* IP_SRCROUTE */
5657c2aa98e2SPeter Wemm #if O_EXLOCK && HASFLOCK && !BOGUS_O_EXCL
5658c2aa98e2SPeter Wemm 	"LOCK_ON_OPEN",
56593299c2f1SGregory Neil Shapiro #endif /* O_EXLOCK && HASFLOCK && !BOGUS_O_EXCL */
5660c2aa98e2SPeter Wemm #if NEEDFSYNC
5661c2aa98e2SPeter Wemm 	"NEEDFSYNC",
56623299c2f1SGregory Neil Shapiro #endif /* NEEDFSYNC */
5663c2aa98e2SPeter Wemm #if NOFTRUNCATE
5664c2aa98e2SPeter Wemm 	"NOFTRUNCATE",
56653299c2f1SGregory Neil Shapiro #endif /* NOFTRUNCATE */
5666c2aa98e2SPeter Wemm #if RLIMIT_NEEDS_SYS_TIME_H
5667c2aa98e2SPeter Wemm 	"RLIMIT_NEEDS_SYS_TIME_H",
56683299c2f1SGregory Neil Shapiro #endif /* RLIMIT_NEEDS_SYS_TIME_H */
5669c2aa98e2SPeter Wemm #if SAFENFSPATHCONF
5670c2aa98e2SPeter Wemm 	"SAFENFSPATHCONF",
56713299c2f1SGregory Neil Shapiro #endif /* SAFENFSPATHCONF */
5672c2aa98e2SPeter Wemm #if SECUREWARE
5673c2aa98e2SPeter Wemm 	"SECUREWARE",
56743299c2f1SGregory Neil Shapiro #endif /* SECUREWARE */
5675c2aa98e2SPeter Wemm #if SHARE_V1
5676c2aa98e2SPeter Wemm 	"SHARE_V1",
56773299c2f1SGregory Neil Shapiro #endif /* SHARE_V1 */
5678c2aa98e2SPeter Wemm #if SIOCGIFCONF_IS_BROKEN
5679c2aa98e2SPeter Wemm 	"SIOCGIFCONF_IS_BROKEN",
56803299c2f1SGregory Neil Shapiro #endif /* SIOCGIFCONF_IS_BROKEN */
5681c2aa98e2SPeter Wemm #if SIOCGIFNUM_IS_BROKEN
5682c2aa98e2SPeter Wemm 	"SIOCGIFNUM_IS_BROKEN",
56833299c2f1SGregory Neil Shapiro #endif /* SIOCGIFNUM_IS_BROKEN */
56843299c2f1SGregory Neil Shapiro #if SNPRINTF_IS_BROKEN
56853299c2f1SGregory Neil Shapiro 	"SNPRINTF_IS_BROKEN",
56863299c2f1SGregory Neil Shapiro #endif /* SNPRINTF_IS_BROKEN */
56873299c2f1SGregory Neil Shapiro #if SO_REUSEADDR_IS_BROKEN
56883299c2f1SGregory Neil Shapiro 	"SO_REUSEADDR_IS_BROKEN",
56893299c2f1SGregory Neil Shapiro #endif /* SO_REUSEADDR_IS_BROKEN */
5690c2aa98e2SPeter Wemm #if SYS5SETPGRP
5691c2aa98e2SPeter Wemm 	"SYS5SETPGRP",
56923299c2f1SGregory Neil Shapiro #endif /* SYS5SETPGRP */
5693c2aa98e2SPeter Wemm #if SYSTEM5
5694c2aa98e2SPeter Wemm 	"SYSTEM5",
56953299c2f1SGregory Neil Shapiro #endif /* SYSTEM5 */
5696c2aa98e2SPeter Wemm #if USE_SA_SIGACTION
5697c2aa98e2SPeter Wemm 	"USE_SA_SIGACTION",
56983299c2f1SGregory Neil Shapiro #endif /* USE_SA_SIGACTION */
5699c2aa98e2SPeter Wemm #if USE_SIGLONGJMP
5700c2aa98e2SPeter Wemm 	"USE_SIGLONGJMP",
57013299c2f1SGregory Neil Shapiro #endif /* USE_SIGLONGJMP */
5702c2aa98e2SPeter Wemm #if USESETEUID
5703c2aa98e2SPeter Wemm 	"USESETEUID",
57043299c2f1SGregory Neil Shapiro #endif /* USESETEUID */
5705c2aa98e2SPeter Wemm 	NULL
5706c2aa98e2SPeter Wemm };
57073299c2f1SGregory Neil Shapiro 
5708