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