Home | History | Annotate | Line # | Download | only in gen
pw_scan.c revision 1.17
      1 /*	$NetBSD: pw_scan.c,v 1.17 2005/01/19 22:59:24 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1987, 1993, 1994, 1995
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #if HAVE_NBTOOL_CONFIG_H
     33 #include "nbtool_config.h"
     34 #include "compat_pwd.h"
     35 
     36 #else
     37 #include <sys/cdefs.h>
     38 #if defined(LIBC_SCCS) && !defined(lint)
     39 __RCSID("$NetBSD: pw_scan.c,v 1.17 2005/01/19 22:59:24 christos Exp $");
     40 #endif /* LIBC_SCCS and not lint */
     41 
     42 #if defined(_LIBC)
     43 #include "namespace.h"
     44 #endif
     45 #include <sys/types.h>
     46 
     47 #include <assert.h>
     48 #include <err.h>
     49 #include <limits.h>
     50 #include <pwd.h>
     51 #include <stdio.h>
     52 #include <stdlib.h>
     53 #include <string.h>
     54 #include <unistd.h>
     55 #include <errno.h>
     56 
     57 #ifdef _LIBC
     58 #include "pw_private.h"
     59 #endif
     60 #endif /* ! HAVE_NBTOOL_CONFIG_H */
     61 
     62 static int
     63 gettime(time_t *res, const char *p, int *flags, int dowarn, int flag)
     64 {
     65 	long l;
     66 	char *ep;
     67 
     68 printf("time %s %x\n", p, flag);
     69 	if (*p == '\0') {
     70 		*flags |= flag;
     71 		*res = 0;
     72 		return 1;
     73 	}
     74 	l = strtol(p, &ep, 0);
     75 	if (p == ep || *ep != '\0') {
     76 		ep = __UNCONST("Invalid number");
     77 		goto done;
     78 	}
     79 	if (errno == ERANGE && (l == LONG_MAX || l == LONG_MIN)) {
     80 		ep = strerror(errno);
     81 		goto done;
     82 	}
     83 
     84 	*res = (time_t)l;
     85 	return 1;
     86 done:
     87 	if (dowarn) {
     88 		warnx("%s `%s' for %s time", ep, p,
     89 		    flag == _PASSWORD_NOEXP ? "expiration" : "change");
     90 	}
     91 	return 0;
     92 
     93 }
     94 
     95 static int
     96 getid(unsigned long *res, const char *p, int *flags, int dowarn, int flag)
     97 {
     98 	long ul;
     99 	char *ep;
    100 
    101 	if (*p == '\0') {
    102 		*flags |= flag;
    103 		*res = 0;
    104 		return 1;
    105 	}
    106 	ul = strtoul(p, &ep, 0);
    107 	if (p == ep || *ep != '\0') {
    108 		ep = __UNCONST("Invalid number");
    109 		goto done;
    110 	}
    111 	if (errno == ERANGE && ul == ULONG_MAX) {
    112 		ep = strerror(errno);
    113 		goto done;
    114 	}
    115 	if (ul > *res) {
    116 		ep = strerror(ERANGE);
    117 		goto done;
    118 	}
    119 
    120 	*res = ul;
    121 	return 1;
    122 done:
    123 	if (dowarn)
    124 		warnx("%s %s `%s'", ep,
    125 		    flag == _PASSWORD_NOUID ? "uid" : "gid", p);
    126 	return 0;
    127 
    128 }
    129 int
    130 #ifdef _LIBC
    131 __pw_scan(char *bp, struct passwd *pw, int *flags)
    132 #else
    133 pw_scan( char *bp, struct passwd *pw, int *flags)
    134 #endif
    135 {
    136 	unsigned long id;
    137 	int root, inflags;
    138 	int dowarn;
    139 	const char *p, *sh;
    140 
    141 	_DIAGASSERT(bp != NULL);
    142 	_DIAGASSERT(pw != NULL);
    143 
    144 	if (flags) {
    145 		inflags = *flags;
    146 		*flags = 0;
    147 	} else {
    148 		inflags = 0;
    149 		flags = &inflags;
    150 	}
    151 	dowarn = !(inflags & _PASSWORD_NOWARN);
    152 
    153 	if (!(pw->pw_name = strsep(&bp, ":")))		/* login */
    154 		goto fmt;
    155 	if (strlen(pw->pw_name) > (LOGIN_NAME_MAX - 1)) {
    156 		if (dowarn)
    157 			warnx("username too long, `%s' > %d", pw->pw_name,
    158 			    LOGIN_NAME_MAX - 1);
    159 		return 0;
    160 	}
    161 
    162 	root = !strcmp(pw->pw_name, "root");
    163 
    164 	if (!(pw->pw_passwd = strsep(&bp, ":")))	/* passwd */
    165 		goto fmt;
    166 
    167 	if (!(p = strsep(&bp, ":")))			/* uid */
    168 		goto fmt;
    169 
    170 	id = UID_MAX;
    171 	if (!getid(&id, p, flags, dowarn, _PASSWORD_NOUID))
    172 		return 0;
    173 
    174 	if (root && id) {
    175 		if (dowarn)
    176 			warnx("root uid should be 0");
    177 		return 0;
    178 	}
    179 
    180 	pw->pw_uid = (uid_t)id;
    181 
    182 	if (!(p = strsep(&bp, ":")))			/* gid */
    183 		goto fmt;
    184 
    185 	id = GID_MAX;
    186 	if (!getid(&id, p, flags, dowarn, _PASSWORD_NOGID))
    187 		return 0;
    188 
    189 	pw->pw_gid = (gid_t)id;
    190 
    191 	if (inflags & _PASSWORD_OLDFMT) {
    192 		pw->pw_class = __UNCONST("");
    193 		pw->pw_change = 0;
    194 		pw->pw_expire = 0;
    195 		*flags |= (_PASSWORD_NOCHG | _PASSWORD_NOEXP);
    196 	} else {
    197 		pw->pw_class = strsep(&bp, ":");	/* class */
    198 		if (!(p = strsep(&bp, ":")))		/* change */
    199 			goto fmt;
    200 		if (!gettime(&pw->pw_change, p, flags, dowarn, _PASSWORD_NOCHG))
    201 			return 0;
    202 		if (!(p = strsep(&bp, ":")))		/* expire */
    203 			goto fmt;
    204 		if (!gettime(&pw->pw_expire, p, flags, dowarn, _PASSWORD_NOEXP))
    205 			return 0;
    206 	}
    207 
    208 	pw->pw_gecos = strsep(&bp, ":");		/* gecos */
    209 	pw->pw_dir = strsep(&bp, ":");			/* directory */
    210 	if (!(pw->pw_shell = strsep(&bp, ":")))		/* shell */
    211 		goto fmt;
    212 
    213 #if ! HAVE_NBTOOL_CONFIG_H
    214 	p = pw->pw_shell;
    215 	if (root && *p)					/* empty == /bin/sh */
    216 		for (setusershell();;) {
    217 			if (!(sh = getusershell())) {
    218 				if (dowarn)
    219 					warnx("warning, unknown root shell");
    220 				break;
    221 			}
    222 			if (!strcmp(p, sh))
    223 				break;
    224 		}
    225 #endif
    226 
    227 	if ((p = strsep(&bp, ":")) != NULL) {			/* too many */
    228 fmt:
    229 		if (dowarn)
    230 			warnx("corrupted entry");
    231 		return 0;
    232 	}
    233 
    234 	return 1;
    235 }
    236