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 2005 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 <unistd.h> 35 #include <stdlib.h> 36 #include <stdio.h> 37 #include <string.h> 38 #include <ctype.h> 39 #include <pwd.h> 40 #include <errno.h> 41 #include <locale.h> 42 #include <limits.h> 43 44 #define BADLINE "Too many/few fields" 45 #define TOOLONG "Line too long" 46 #define NONAME "No group name" 47 #define BADNAME "Bad character(s) in group name" 48 #define BADGID "Invalid GID" 49 #define NULLNAME "Null login name" 50 #define NOTFOUND "Logname not found in password file" 51 #define DUPNAME "Duplicate logname entry" 52 #define DUPNAME2 "Duplicate logname entry (gid first occurs in passwd entry)" 53 #define NOMEM "Out of memory" 54 #define NGROUPS "Maximum groups exceeded for logname " 55 #define BLANKLINE "Blank line detected. Please remove line" 56 #define LONGNAME "Group name too long" 57 58 int eflag, badchar, baddigit, badlognam, colons, len; 59 static int longnam = 0; 60 int code; 61 62 #define MYBUFSIZE (LINE_MAX) /* max line length including newline and null */ 63 #define NUM_COLONS 3 64 65 char *buf; 66 char *nptr; 67 char *cptr; 68 FILE *fptr; 69 gid_t gid; 70 void error(char *msg); 71 72 struct group { 73 struct group *nxt; 74 int cnt; 75 gid_t grp; 76 }; 77 78 struct node { 79 struct node *next; 80 int ngroups; 81 struct group *groups; 82 char user[1]; 83 }; 84 85 void * 86 emalloc(size_t size) 87 { 88 void *vp; 89 vp = malloc(size); 90 if (vp == NULL) { 91 fprintf(stderr, "%s\n", gettext(NOMEM)); 92 exit(1); 93 } 94 return (vp); 95 } 96 97 int 98 main(int argc, char *argv[]) 99 { 100 struct passwd *pwp; 101 struct node *root = NULL; 102 struct node *t; 103 struct group *gp; 104 int ngroups_max; 105 int ngroups = 0; 106 int listlen; 107 int i; 108 int lineno = 0; 109 char *buf_off, *tmpbuf; 110 int delim[NUM_COLONS + 1], buf_len, bufsize; 111 112 (void) setlocale(LC_ALL, ""); 113 114 #if !defined(TEXT_DOMAIN) /* Should be defined by cc -D */ 115 #define TEXT_DOMAIN "SYS_TEST" 116 #endif 117 (void) textdomain(TEXT_DOMAIN); 118 119 code = 0; 120 ngroups_max = sysconf(_SC_NGROUPS_MAX); 121 122 if (argc == 1) 123 argv[1] = "/etc/group"; 124 else if (argc != 2) { 125 fprintf(stderr, gettext("usage: %s filename\n"), *argv); 126 exit(1); 127 } 128 129 if ((fptr = fopen(argv[1], "r")) == NULL) { 130 fprintf(stderr, gettext("cannot open file %s: %s\n"), argv[1], 131 strerror(errno)); 132 exit(1); 133 } 134 135 #ifdef ORIG_SVR4 136 while ((pwp = getpwent()) != NULL) { 137 t = (struct node *)emalloc(sizeof (*t) + strlen(pwp->pw_name)); 138 t->next = root; 139 root = t; 140 strcpy(t->user, pwp->pw_name); 141 t->ngroups = 1; 142 if (!ngroups_max) 143 t->groups = NULL; 144 else { 145 t->groups = (struct group *) 146 emalloc(sizeof (struct group)); 147 t->groups->grp = pwp->pw_gid; 148 t->groups->cnt = 1; 149 t->groups->nxt = NULL; 150 } 151 } 152 #endif 153 154 bufsize = MYBUFSIZE; 155 if ((buf = malloc(bufsize)) == NULL) { 156 (void) fprintf(stderr, gettext(NOMEM)); 157 exit(1); 158 } 159 while (!feof(fptr) && !ferror(fptr)) { 160 buf_len = 0; 161 buf_off = buf; 162 while (fgets(buf_off, (bufsize - buf_len), fptr) != NULL) { 163 buf_len += strlen(buf_off); 164 if (buf[buf_len - 1] == '\n' || feof(fptr)) 165 break; 166 tmpbuf = realloc(buf, (bufsize + MYBUFSIZE)); 167 if (tmpbuf == NULL) { 168 (void) fprintf(stderr, gettext(NOMEM)); 169 exit(1); 170 } 171 bufsize += MYBUFSIZE; 172 buf = tmpbuf; 173 buf_off = buf + buf_len; 174 } 175 if (buf_len == 0) 176 continue; 177 178 /* Report error to be consistent with libc */ 179 if ((buf_len + 1) > LINE_MAX) 180 error(TOOLONG); 181 182 lineno++; 183 if (buf[0] == '\n') /* blank lines are ignored */ 184 { 185 code = 1; /* exit with error code = 1 */ 186 eflag = 0; /* force print of "blank" line */ 187 fprintf(stderr, "\n%s %d\n", gettext(BLANKLINE), 188 lineno); 189 continue; 190 } 191 192 if (buf[buf_len - 1] == '\n') { 193 if ((tmpbuf = strdup(buf)) == NULL) { 194 (void) fprintf(stderr, gettext(NOMEM)); 195 exit(1); 196 } 197 tmpbuf[buf_len - 1] = ','; 198 } else { 199 if ((tmpbuf = malloc(buf_len + 2)) == NULL) { 200 (void) fprintf(stderr, gettext(NOMEM)); 201 exit(1); 202 } 203 (void) strcpy(tmpbuf, buf); 204 tmpbuf[buf_len++] = ','; 205 tmpbuf[buf_len] = '\0'; 206 } 207 208 colons = 0; 209 eflag = 0; 210 badchar = 0; 211 baddigit = 0; 212 badlognam = 0; 213 gid = (gid_t)0; 214 215 ngroups++; /* Increment number of groups found */ 216 /* Check that entry is not a nameservice redirection */ 217 218 if (buf[0] == '+' || buf[0] == '-') { 219 /* 220 * Should set flag here to allow special case checking 221 * in the rest of the code, 222 * but for now, we'll just ignore this entry. 223 */ 224 free(tmpbuf); 225 continue; 226 } 227 228 /* Check number of fields */ 229 230 for (i = 0; buf[i] != NULL; i++) { 231 if (buf[i] == ':') { 232 delim[colons] = i; 233 if (++colons > NUM_COLONS) 234 break; 235 } 236 } 237 if (colons != NUM_COLONS) { 238 error(BADLINE); 239 free(tmpbuf); 240 continue; 241 } 242 243 /* check to see that group name is at least 1 character */ 244 /* and that all characters are lowrcase or digits. */ 245 246 if (buf[0] == ':') 247 error(NONAME); 248 else { 249 for (i = 0; buf[i] != ':'; i++) { 250 if (i >= LOGNAME_MAX) 251 longnam++; 252 if (!(islower(buf[i]) || isdigit(buf[i]))) 253 badchar++; 254 } 255 if (longnam > 0) 256 error(LONGNAME); 257 if (badchar > 0) 258 error(BADNAME); 259 } 260 261 /* check that GID is numeric and <= 31 bits */ 262 263 len = (delim[2] - delim[1]) - 1; 264 265 if (len > 10 || len < 1) 266 error(BADGID); 267 else { 268 for (i = (delim[1]+1); i < delim[2]; i++) { 269 if (! (isdigit(buf[i]))) 270 baddigit++; 271 else if (baddigit == 0) 272 gid = gid * 10 + (gid_t)(buf[i] - '0'); 273 /* converts ascii GID to decimal */ 274 } 275 if (baddigit > 0) 276 error(BADGID); 277 else if (gid < (gid_t)0) 278 error(BADGID); 279 } 280 281 /* check that logname appears in the passwd file */ 282 283 nptr = &tmpbuf[delim[2]]; 284 nptr++; 285 286 listlen = strlen(nptr) - 1; 287 288 while ((cptr = strchr(nptr, ',')) != NULL) { 289 *cptr = NULL; 290 if (*nptr == NULL) { 291 if (listlen) 292 error(NULLNAME); 293 nptr++; 294 continue; 295 } 296 297 for (t = root; t != NULL; t = t->next) { 298 if (strcmp(t->user, nptr) == 0) 299 break; 300 } 301 if (t == NULL) { 302 #ifndef ORIG_SVR4 303 /* 304 * User entry not found, so check if in 305 * password file 306 */ 307 struct passwd *pwp; 308 309 if ((pwp = getpwnam(nptr)) == NULL) { 310 #endif 311 badlognam++; 312 error(NOTFOUND); 313 goto getnext; 314 #ifndef ORIG_SVR4 315 } 316 317 /* Usrname found, so add entry to user-list */ 318 t = (struct node *) 319 emalloc(sizeof (*t) + strlen(nptr)); 320 t->next = root; 321 root = t; 322 strcpy(t->user, nptr); 323 t->ngroups = 1; 324 if (!ngroups_max) 325 t->groups = NULL; 326 else { 327 t->groups = (struct group *) 328 emalloc(sizeof (struct group)); 329 t->groups->grp = pwp->pw_gid; 330 t->groups->cnt = 1; 331 t->groups->nxt = NULL; 332 } 333 } 334 #endif 335 if (!ngroups_max) 336 goto getnext; 337 338 t->ngroups++; 339 340 /* 341 * check for duplicate logname in group 342 */ 343 344 for (gp = t->groups; gp != NULL; gp = gp->nxt) { 345 if (gid == gp->grp) { 346 if (gp->cnt++ == 1) { 347 badlognam++; 348 if (gp->nxt == NULL) 349 error(DUPNAME2); 350 else 351 error(DUPNAME); 352 } 353 goto getnext; 354 } 355 } 356 357 gp = (struct group *)emalloc(sizeof (struct group)); 358 gp->grp = gid; 359 gp->cnt = 1; 360 gp->nxt = t->groups; 361 t->groups = gp; 362 getnext: 363 nptr = ++cptr; 364 } 365 free(tmpbuf); 366 } 367 368 if (ngroups == 0) { 369 fprintf(stderr, gettext("Group file '%s' is empty\n"), argv[1]); 370 code = 1; 371 } 372 373 if (ngroups_max) { 374 for (t = root; t != NULL; t = t->next) { 375 if (t->ngroups > ngroups_max) { 376 fprintf(stderr, "\n\n%s%s (%d)\n", 377 NGROUPS, t->user, t->ngroups); 378 code = 1; 379 } 380 } 381 } 382 return (code); 383 } 384 385 /* Error printing routine */ 386 387 void 388 error(char *msg) 389 { 390 code = 1; 391 if (eflag == 0) { 392 fprintf(stderr, "\n\n%s", buf); 393 eflag = 1; 394 } 395 if (longnam != 0) { 396 fprintf(stderr, "\t%s\n", gettext(msg)); 397 longnam = 0; 398 return; 399 } 400 if (badchar != 0) { 401 fprintf(stderr, "\t%d %s\n", badchar, gettext(msg)); 402 badchar = 0; 403 return; 404 } else if (baddigit != 0) { 405 fprintf(stderr, "\t%s\n", gettext(msg)); 406 baddigit = 0; 407 return; 408 } else if (badlognam != 0) { 409 fprintf(stderr, "\t%s - %s\n", nptr, gettext(msg)); 410 badlognam = 0; 411 return; 412 } else { 413 fprintf(stderr, "\t%s\n", gettext(msg)); 414 return; 415 } 416 } 417