1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License, Version 1.0 only 6 * (the "License"). You may not use this file except in compliance 7 * with the License. 8 * 9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10 * or http://www.opensolaris.org/os/licensing. 11 * See the License for the specific language governing permissions 12 * and limitations under the License. 13 * 14 * When distributing Covered Code, include this CDDL HEADER in each 15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16 * If applicable, add the following below this CDDL HEADER, with the 17 * fields enclosed by brackets "[]" replaced with your own identifying 18 * information: Portions Copyright [yyyy] [name of copyright owner] 19 * 20 * CDDL HEADER END 21 */ 22 /* 23 * Copyright 1995-2002 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ 28 /* All Rights Reserved */ 29 30 31 #pragma ident "%Z%%M% %I% %E% SMI" 32 33 #include <sys/types.h> 34 #include <sys/param.h> 35 #include <sys/signal.h> 36 #include <sys/sysmacros.h> 37 #include <sys/stat.h> 38 #include <stdio.h> 39 #include <stdlib.h> 40 #include <string.h> 41 #include <ctype.h> 42 #include <locale.h> 43 #include <errno.h> 44 #include <unistd.h> 45 46 #define ERROR1 "Too many/few fields" 47 #define ERROR2 "Bad character(s) in logname" 48 #define ERROR2a "First char in logname not alphabetic" 49 #define ERROR2b "Logname field NULL" 50 #define ERROR2c "Logname contains no lower-case letters" 51 #define ERROR3 "Logname too long/short" 52 #define ERROR4 "Invalid UID" 53 #define ERROR5 "Invalid GID" 54 #define ERROR6 "Login directory not found" 55 #define ERROR6a "Login directory null" 56 #define ERROR7 "Optional shell file not found" 57 58 static int eflag, code = 0; 59 static int badc; 60 static int lc; 61 static char buf[512]; 62 static void error(char *); 63 64 main(int argc, char **argv) 65 { 66 int delim[512]; 67 char logbuf[512]; 68 FILE *fptr; 69 struct stat obuf; 70 uid_t uid; 71 gid_t gid; 72 int i, j, colons; 73 char *pw_file; 74 struct stat stat_buf; 75 char *str, *lastc; 76 77 (void) setlocale(LC_ALL, ""); 78 79 #if !defined(TEXT_DOMAIN) /* Should be defined by cc -D */ 80 #define TEXT_DOMAIN "SYS_TEST" 81 #endif 82 (void) textdomain(TEXT_DOMAIN); 83 84 if (argc == 1) 85 pw_file = "/etc/passwd"; 86 else 87 pw_file = argv[1]; 88 89 if ((fptr = fopen(pw_file, "r")) == NULL) { 90 (void) fprintf(stderr, gettext("cannot open %s\n"), pw_file); 91 exit(1); 92 } 93 94 if (fstat(fileno(fptr), &stat_buf) < 0) { 95 (void) fprintf(stderr, gettext("fstat failed for %s\n"), 96 pw_file); 97 (void) fclose(fptr); 98 exit(1); 99 } 100 101 if (stat_buf.st_size == 0) { 102 (void) fprintf(stderr, gettext("file %s is empty\n"), pw_file); 103 (void) fclose(fptr); 104 exit(1); 105 } 106 107 while (fgets(buf, sizeof (buf), fptr) != NULL) { 108 109 colons = 0; 110 badc = 0; 111 lc = 0; 112 eflag = 0; 113 114 /* Check that entry is not a nameservice redirection */ 115 116 if (buf[0] == '+' || buf[0] == '-') { 117 /* 118 * Should set flag here to allow special case checking 119 * in the rest of the code, 120 * but for now, we'll just ignore this entry. 121 */ 122 continue; 123 } 124 125 /* Check number of fields */ 126 127 for (i = 0; buf[i] != NULL; i++) 128 if (buf[i] == ':') { 129 delim[colons] = i; 130 ++colons; 131 } 132 133 if (colons != 6) { 134 error(ERROR1); 135 continue; 136 } 137 delim[6] = i - 1; 138 delim[7] = NULL; 139 140 /* 141 * Check the first char is alpha; the rest alphanumeric; 142 * and that the name does not consist solely of uppercase 143 * alpha chars 144 */ 145 if (buf[0] == ':') 146 error(ERROR2b); 147 else if (!isalpha(buf[0])) 148 error(ERROR2a); 149 150 for (i = 0; buf[i] != ':'; i++) { 151 if (!isalnum(buf[i]) && 152 buf[i] != '_' && 153 buf[i] != '-' && 154 buf[i] != '.') 155 badc++; 156 else if (islower(buf[i])) 157 lc++; 158 } 159 if (lc == 0) 160 error(ERROR2c); 161 if (badc > 0) 162 error(ERROR2); 163 164 /* Check for valid number of characters in logname */ 165 166 if (i <= 0 || i > 8) 167 error(ERROR3); 168 169 /* Check that UID is numeric and <= MAXUID */ 170 171 errno = 0; 172 str = &buf[delim[1] + 1]; 173 uid = strtol(str, &lastc, 10); 174 if (lastc != str + (delim[2] - delim[1]) - 1 || 175 uid < 0 || uid > MAXUID || errno == ERANGE) 176 error(ERROR4); 177 178 /* Check that GID is numeric and <= MAXUID */ 179 180 errno = 0; 181 str = &buf[delim[2] + 1]; 182 gid = strtol(str, &lastc, 10); 183 if (lastc != str + (delim[3] - delim[2]) - 1 || 184 gid < 0 || gid > MAXUID || errno == ERANGE) 185 error(ERROR5); 186 187 /* Check initial working directory */ 188 189 for (j = 0, i = (delim[4] + 1); i < delim[5]; j++, i++) 190 logbuf[j] = buf[i]; 191 logbuf[j] = '\0'; 192 193 if (logbuf[0] == NULL) 194 error(ERROR6a); 195 else if ((stat(logbuf, &obuf)) == -1) 196 error(ERROR6); 197 198 /* Check program to use as shell */ 199 200 if ((buf[(delim[5] + 1)]) != '\n') { 201 202 for (j = 0, i = (delim[5] + 1); i < delim[6]; j++, i++) 203 logbuf[j] = buf[i]; 204 logbuf[j] = '\0'; 205 206 if (strcmp(logbuf, "*") == 0) /* subsystem login */ 207 continue; 208 209 if ((stat(logbuf, &obuf)) == -1) 210 error(ERROR7); 211 212 for (j = 0; j < 512; j++) 213 logbuf[j] = NULL; 214 } 215 } 216 (void) fclose(fptr); 217 return (code); 218 } 219 220 /* Error printing routine */ 221 222 static void 223 error(char *msg) 224 { 225 if (!eflag) { 226 (void) fprintf(stderr, "\n%s", buf); 227 code = 1; 228 ++eflag; 229 } 230 if (!badc) 231 (void) fprintf(stderr, "\t%s\n", gettext(msg)); 232 else { 233 (void) fprintf(stderr, "\t%d %s\n", badc, gettext(msg)); 234 badc = 0; 235 } 236 } 237