2 * Copyright (c) 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)getpwent.c 8.2 (Berkeley) 4/27/95
34 * $FreeBSD: src/lib/libc/gen/getpwent.c,v 1.53.2.2 2001/03/05 09:52:13 obrien Exp $
35 * $DragonFly: src/lib/libc/gen/getpwent.c,v 1.4 2004/06/06 15:05:55 hmp Exp $
39 #include <sys/param.h>
52 extern void setnetgrent ( char * );
53 extern int getnetgrent ( char **, char **, char ** );
54 extern int innetgr ( const char *, const char *, const char *, const char * );
57 * The lookup techniques and data extraction code here must be kept
58 * in sync with that in `pwd_mkdb'.
61 static struct passwd _pw_passwd; /* password structure */
62 static DB *_pw_db; /* password database */
63 static int _pw_keynum; /* key counter */
64 static int _pw_stayopen; /* keep fd's open */
67 #include <rpcsvc/yp_prot.h>
68 #include <rpcsvc/ypclnt.h>
70 static struct passwd _pw_copy;
71 static DBT empty = { NULL, 0 };
72 static DB *_ypcache = (DB *)NULL;
73 static int _yp_exclusions = 0;
74 static int _yp_enabled = -1;
75 static int _pw_stepping_yp; /* set true when stepping thru map */
76 static char _ypnam[YPMAXRECORD];
77 #define YP_HAVE_MASTER 2
78 #define YP_HAVE_ADJUNCT 1
79 #define YP_HAVE_NONE 0
80 static int _gotmaster;
81 static char *_pw_yp_domain;
82 static inline int unwind ( char * );
83 static void _ypinitdb ( void );
84 static int _havemaster (char *);
85 static int _getyppass (struct passwd *, const char *, const char * );
86 static int _nextyppass (struct passwd *);
87 static inline int lookup (const char *);
88 static inline void store (const char *);
89 static inline int ingr (const char *, const char*);
90 static inline int verf (const char *);
91 static char * _get_adjunct_pw (const char *);
93 static int __hashpw(DBT *);
94 static int __initdb(void);
100 char bf[sizeof(_pw_keynum) + 1];
103 if (!_pw_db && !__initdb())
104 return((struct passwd *)NULL);
107 if(_pw_stepping_yp) {
108 _pw_passwd = _pw_copy;
109 if (unwind((char *)&_ypnam))
116 bf[0] = _PW_KEYBYNUM;
117 bcopy((char *)&_pw_keynum, bf + 1, sizeof(_pw_keynum));
118 key.data = (u_char *)bf;
119 key.size = sizeof(_pw_keynum) + 1;
121 if(!rv) return (struct passwd *)NULL;
123 if(_pw_passwd.pw_name[0] == '+' || _pw_passwd.pw_name[0] == '-') {
124 if (_yp_enabled == -1)
126 bzero((char *)&_ypnam, sizeof(_ypnam));
127 bcopy(_pw_passwd.pw_name, _ypnam,
128 strlen(_pw_passwd.pw_name));
129 _pw_copy = _pw_passwd;
130 if (unwind((char *)&_ypnam) == 0)
136 /* Ignore YP password file entries when YP is disabled. */
137 if(_pw_passwd.pw_name[0] == '+' || _pw_passwd.pw_name[0] == '-') {
150 char bf[UT_NAMESIZE + 2];
152 if (!_pw_db && !__initdb())
153 return((struct passwd *)NULL);
155 bf[0] = _PW_KEYBYNAME;
157 if (len > UT_NAMESIZE)
159 bcopy(name, bf + 1, len);
160 key.data = (u_char *)bf;
162 rval = __hashpw(&key);
166 if (_yp_enabled == -1)
169 rval = _getyppass(&_pw_passwd, name, "passwd.byname");
173 * Prevent login attempts when YP is not enabled but YP entries
174 * are in /etc/master.passwd.
176 if (rval && (_pw_passwd.pw_name[0] == '+'||
177 _pw_passwd.pw_name[0] == '-')) rval = 0;
181 return(rval ? &_pw_passwd : (struct passwd *)NULL);
190 char bf[sizeof(keyuid) + 1];
192 if (!_pw_db && !__initdb())
193 return((struct passwd *)NULL);
195 bf[0] = _PW_KEYBYUID;
197 bcopy(&keyuid, bf + 1, sizeof(keyuid));
198 key.data = (u_char *)bf;
199 key.size = sizeof(keyuid) + 1;
200 rval = __hashpw(&key);
204 if (_yp_enabled == -1)
207 char ypbuf[16]; /* big enough for 32-bit uids */
208 snprintf(ypbuf, sizeof ypbuf, "%u", (unsigned)uid);
209 rval = _getyppass(&_pw_passwd, ypbuf, "passwd.byuid");
214 * Prevent login attempts when YP is not enabled but YP entries
215 * are in /etc/master.passwd.
217 if (rval && (_pw_passwd.pw_name[0] == '+'||
218 _pw_passwd.pw_name[0] == '-')) rval = 0;
222 return(rval ? &_pw_passwd : (struct passwd *)NULL);
235 _pw_stayopen = stayopen;
253 (void)(_pw_db->close)(_pw_db);
258 (void)(_ypcache->close)(_ypcache);
259 _ypcache = (DB *)NULL;
262 /* Fix for PR #12008 */
273 p = (geteuid()) ? _PATH_MP_DB : _PATH_SMP_DB;
274 _pw_db = dbopen(p, O_RDONLY, 0, DB_HASH, NULL);
278 syslog(LOG_ERR, "%s: %m", p);
291 if ((_pw_db->get)(_pw_db, key, &data, 0))
293 p = (char *)data.data;
295 /* Increase buffer size for long lines if necessary. */
296 if (data.size > max) {
297 max = data.size + 1024;
298 if (!(line = reallocf(line, max)))
302 /* THIS CODE MUST MATCH THAT IN pwd_mkdb. */
304 #define EXPAND(e) e = t; while ( (*t++ = *p++) );
305 #define SCALAR(v) memmove(&(v), p, sizeof v); p += sizeof v
306 EXPAND(_pw_passwd.pw_name);
307 EXPAND(_pw_passwd.pw_passwd);
308 SCALAR(_pw_passwd.pw_uid);
309 SCALAR(_pw_passwd.pw_gid);
310 SCALAR(_pw_passwd.pw_change);
311 EXPAND(_pw_passwd.pw_class);
312 EXPAND(_pw_passwd.pw_gecos);
313 EXPAND(_pw_passwd.pw_dir);
314 EXPAND(_pw_passwd.pw_shell);
315 SCALAR(_pw_passwd.pw_expire);
316 bcopy(p, (char *)&_pw_passwd.pw_fields, sizeof _pw_passwd.pw_fields);
317 p += sizeof _pw_passwd.pw_fields;
327 char buf[] = { _PW_KEYYPENABLED };
331 if ((_pw_db->get)(_pw_db, &key, &data, 0) == 0) {
332 _yp_enabled = (int)*((char *)data.data) - 2;
333 /* Don't even bother with this if we aren't root. */
336 if (yp_get_default_domain(&_pw_yp_domain))
338 _gotmaster = _havemaster(_pw_yp_domain);
339 } else _gotmaster = YP_HAVE_NONE;
341 * Create a DB hash database in memory. Bet you didn't know you
342 * could do a dbopen() with a NULL filename, did you.
344 if (_ypcache == (DB *)NULL)
345 _ypcache = dbopen(NULL, O_RDWR, 600, DB_HASH, NULL);
350 * See if a user is in the blackballed list.
361 key.data = (char *)name;
362 key.size = strlen(name);
364 if ((_ypcache->get)(_ypcache, &key, &empty, 0)) {
372 * Store a blackballed user in an in-core hash database.
386 lkey.data = (char *)key;
387 lkey.size = strlen(key);
389 (void)(_ypcache->put)(_ypcache, &lkey, &empty, R_NOOVERWRITE);
393 * Parse the + entries in the password database and do appropriate
394 * NIS lookups. While ugly to look at, this is optimized to do only
395 * as many lookups as are absolutely necessary in any given case.
396 * Basically, the getpwent() function will feed us + and - lines
397 * as they appear in the database. For + lines, we do netgroup/group
398 * and user lookups to find all usernames that match the rule and
399 * extract them from the NIS passwd maps. For - lines, we save the
400 * matching names in a database and a) exlude them, and b) make sure
401 * we don't consider them when processing other + lines that appear
408 char *user, *host, *domain;
409 static int latch = 0;
410 static struct group *gr = NULL;
414 if (strlen(grp) == 1) {
415 return(_nextyppass(&_pw_passwd));
421 if (*gr->gr_mem != NULL) {
422 if (lookup(*gr->gr_mem)) {
426 rv = _getyppass(&_pw_passwd,
443 if (getnetgrent(&host, &user, &domain) == 0) {
444 if ((gr = getgrnam(grp+2)) != NULL)
452 if (_getyppass(&_pw_passwd, user,
461 return(_getyppass(&_pw_passwd, grp+1, "passwd.byname"));
467 while(getnetgrent(&host, &user, &domain) != 0) {
471 if (!rv && (gr = getgrnam(grp+2)) != NULL) {
485 * See if a user is a member of a particular group.
494 if ((gr = getgrnam(grp)) == NULL)
498 if (!strcmp(*gr->gr_mem, name))
507 * Check a user against the +@netgroup/-@netgroup lines listed in
508 * the local password database. Also checks +user/-user lines.
509 * If no netgroup exists that matches +@netgroup/-@netgroup,
510 * try searching regular groups with the same name.
517 char bf[sizeof(_pw_keynum) + 1];
522 bf[0] = _PW_KEYYPBYNUM;
523 bcopy((char *)&keynum, bf + 1, sizeof(keynum));
524 key.data = (u_char *)bf;
525 key.size = sizeof(keynum) + 1;
526 if (!__hashpw(&key)) {
527 /* Try again using old format */
528 bf[0] = _PW_KEYBYNUM;
529 bcopy((char *)&keynum, bf + 1, sizeof(keynum));
530 key.data = (u_char *)bf;
534 if (_pw_passwd.pw_name[0] != '+' && (_pw_passwd.pw_name[0] != '-'))
536 if (_pw_passwd.pw_name[0] == '+') {
537 if (strlen(_pw_passwd.pw_name) == 1) /* Wildcard */
539 if (_pw_passwd.pw_name[1] == '@') {
540 if ((innetgr(_pw_passwd.pw_name+2, NULL, name,
542 ingr(_pw_passwd.pw_name+2, name)) && !lookup(name))
547 if (!strcmp(name, _pw_passwd.pw_name+1) &&
554 if (_pw_passwd.pw_name[0] == '-') {
555 /* Note that a minus wildcard is a no-op. */
556 if (_pw_passwd.pw_name[1] == '@') {
557 if (innetgr(_pw_passwd.pw_name+2, NULL, name,
559 ingr(_pw_passwd.pw_name+2, name)) {
565 if (!strcmp(name, _pw_passwd.pw_name+1)) {
577 _get_adjunct_pw(name)
580 static char adjunctbuf[YPMAXRECORD+2];
584 char *map = "passwd.adjunct.byname";
587 if ((rval = yp_match(_pw_yp_domain, map, name, strlen(name),
588 &result, &resultlen)))
591 strncpy(adjunctbuf, result, resultlen);
592 adjunctbuf[resultlen] = '\0';
594 result = (char *)&adjunctbuf;
596 /* Don't care about the name. */
597 if ((s = strsep(&result, ":")) == NULL)
598 return (NULL); /* name */
599 if ((s = strsep(&result, ":")) == NULL)
600 return (NULL); /* password */
606 _pw_breakout_yp(struct passwd *pw, char *res, int resultlen, int master)
609 static char resbuf[YPMAXRECORD+2];
612 * Be triple, ultra super-duper paranoid: reject entries
613 * that start with a + or -. yp_mkdb and /var/yp/Makefile
614 * are _both_ supposed to strip these out, but you never
617 if (*res == '+' || *res == '-')
621 * The NIS protocol definition limits the size of an NIS
622 * record to YPMAXRECORD bytes. We need to do a copy to
623 * a static buffer here since the memory pointed to by
624 * res will be free()ed when this function returns.
626 strncpy((char *)&resbuf, res, resultlen);
627 resbuf[resultlen] = '\0';
628 result = (char *)&resbuf;
631 * XXX Sanity check: make sure all fields are valid (no NULLs).
632 * If we find a badly formatted entry, we punt.
634 if ((s = strsep(&result, ":")) == NULL) return 0; /* name */
636 * We don't care what pw_fields says: we _always_ want the
637 * username returned to us by NIS.
640 pw->pw_fields |= _PWF_NAME;
642 if ((s = strsep(&result, ":")) == NULL) return 0; /* password */
643 if(!(pw->pw_fields & _PWF_PASSWD)) {
644 /* SunOS passwd.adjunct hack */
645 if (master == YP_HAVE_ADJUNCT && strstr(s, "##") != NULL) {
647 realpw = _get_adjunct_pw(pw->pw_name);
651 pw->pw_passwd = realpw;
655 pw->pw_fields |= _PWF_PASSWD;
658 if ((s = strsep(&result, ":")) == NULL) return 0; /* uid */
659 if(!(pw->pw_fields & _PWF_UID)) {
660 pw->pw_uid = atoi(s);
661 pw->pw_fields |= _PWF_UID;
664 if ((s = strsep(&result, ":")) == NULL) return 0; /* gid */
665 if(!(pw->pw_fields & _PWF_GID)) {
666 pw->pw_gid = atoi(s);
667 pw->pw_fields |= _PWF_GID;
670 if (master == YP_HAVE_MASTER) {
671 if ((s = strsep(&result, ":")) == NULL) return 0; /* class */
672 if(!(pw->pw_fields & _PWF_CLASS)) {
674 pw->pw_fields |= _PWF_CLASS;
677 if ((s = strsep(&result, ":")) == NULL) return 0; /* change */
678 if(!(pw->pw_fields & _PWF_CHANGE)) {
679 pw->pw_change = atol(s);
680 pw->pw_fields |= _PWF_CHANGE;
683 if ((s = strsep(&result, ":")) == NULL) return 0; /* expire */
684 if(!(pw->pw_fields & _PWF_EXPIRE)) {
685 pw->pw_expire = atol(s);
686 pw->pw_fields |= _PWF_EXPIRE;
690 if ((s = strsep(&result, ":")) == NULL) return 0; /* gecos */
691 if(!(pw->pw_fields & _PWF_GECOS)) {
693 pw->pw_fields |= _PWF_GECOS;
696 if ((s = strsep(&result, ":")) == NULL) return 0; /* dir */
697 if(!(pw->pw_fields & _PWF_DIR)) {
699 pw->pw_fields |= _PWF_DIR;
702 if ((s = strsep(&result, ":")) == NULL) return 0; /* shell */
703 if(!(pw->pw_fields & _PWF_SHELL)) {
705 pw->pw_fields |= _PWF_SHELL;
709 if ((s = strchr(pw->pw_shell, '\n'))) *s = '\0';
715 _havemaster(char *_yp_domain)
720 if (!(rval = yp_order(_yp_domain, "master.passwd.byname", &order)))
721 return(YP_HAVE_MASTER);
724 * NIS+ in YP compat mode doesn't support
725 * YPPROC_ORDER -- no point in continuing.
727 if (rval == YPERR_YPERR)
728 return(YP_HAVE_NONE);
730 /* master.passwd doesn't exist -- try passwd.adjunct */
731 if (rval == YPERR_MAP) {
732 rval = yp_order(_yp_domain, "passwd.adjunct.byname", &order);
734 return(YP_HAVE_ADJUNCT);
737 return (YP_HAVE_NONE);
741 _getyppass(struct passwd *pw, const char *name, const char *map)
746 char mastermap[YPMAXRECORD];
749 if(yp_get_default_domain(&_pw_yp_domain))
753 if (_gotmaster == YP_HAVE_MASTER)
754 snprintf(mastermap, sizeof(mastermap), "master.%s", map);
756 snprintf(mastermap, sizeof(mastermap), "%s", map);
758 if(yp_match(_pw_yp_domain, (char *)&mastermap, name, strlen(name),
759 &result, &resultlen)) {
760 if (_gotmaster != YP_HAVE_MASTER)
762 snprintf(mastermap, sizeof(mastermap), "%s", map);
763 if (yp_match(_pw_yp_domain, (char *)&mastermap,
764 name, strlen(name), &result, &resultlen))
766 _gotmaster = YP_HAVE_NONE;
769 if (!_pw_stepping_yp) {
770 s = strchr(result, ':');
774 /* Must be a malformed entry if no colons. */
785 *s = ':'; /* Put back the colon we previously replaced with a NUL. */
788 rv = _pw_breakout_yp(pw, result, resultlen, _gotmaster);
794 _nextyppass(struct passwd *pw)
798 char *lastkey, *result, *s;
801 char *map = "passwd.byname";
804 if(yp_get_default_domain(&_pw_yp_domain))
808 if (_gotmaster == YP_HAVE_MASTER)
809 map = "master.passwd.byname";
811 if(!_pw_stepping_yp) {
813 rv = yp_first(_pw_yp_domain, map,
814 &key, &keylen, &result, &resultlen);
823 rv = yp_next(_pw_yp_domain, map, key, keylen,
824 &key, &keylen, &result, &resultlen);
832 s = strchr(result, ':');
836 /* Must be a malformed entry if no colons. */
841 if (lookup(result)) {
847 *s = ':'; /* Put back the colon we previously replaced with a NUL. */
848 if (_pw_breakout_yp(pw, result, resultlen, _gotmaster)) {