1 /*- 2 * Copyright (C) 1996 3 * David L. Nugent. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 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 * 14 * THIS SOFTWARE IS PROVIDED BY DAVID L. NUGENT AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL DAVID L. NUGENT OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 */ 27 28 #ifndef lint 29 static const char rcsid[] = 30 "$FreeBSD$"; 31 #endif /* not lint */ 32 33 #include <stdio.h> 34 #include <string.h> 35 #include <stdlib.h> 36 #include <sys/param.h> 37 38 #include "pwupd.h" 39 40 static FILE * pwd_fp = NULL; 41 42 void 43 vendpwent(void) 44 { 45 if (pwd_fp != NULL) { 46 fclose(pwd_fp); 47 pwd_fp = NULL; 48 } 49 } 50 51 void 52 vsetpwent(void) 53 { 54 vendpwent(); 55 } 56 57 static struct passwd * 58 vnextpwent(char const * nam, uid_t uid, int doclose) 59 { 60 struct passwd * pw = NULL; 61 static char pwtmp[1024]; 62 63 strlcpy(pwtmp, getpwpath(_MASTERPASSWD), sizeof(pwtmp)); 64 65 if (pwd_fp != NULL || (pwd_fp = fopen(pwtmp, "r")) != NULL) { 66 int done = 0; 67 68 static struct passwd pwd; 69 70 while (!done && fgets(pwtmp, sizeof pwtmp, pwd_fp) != NULL) 71 { 72 int i, quickout = 0; 73 char * q; 74 char * p = strchr(pwtmp, '\n'); 75 76 if (p == NULL) { 77 while (fgets(pwtmp, sizeof pwtmp, pwd_fp) != NULL && strchr(pwtmp, '\n')==NULL) 78 ; /* Skip long lines */ 79 continue; 80 } 81 82 /* skip comments & empty lines */ 83 if (*pwtmp =='\n' || *pwtmp == '#') 84 continue; 85 86 i = 0; 87 q = p = pwtmp; 88 bzero(&pwd, sizeof pwd); 89 while (!quickout && (p = strsep(&q, ":\n")) != NULL) { 90 switch (i++) 91 { 92 case 0: /* username */ 93 pwd.pw_name = p; 94 if (nam) { 95 if (strcmp(nam, p) == 0) 96 done = 1; 97 else 98 quickout = 1; 99 } 100 break; 101 case 1: /* password */ 102 pwd.pw_passwd = p; 103 break; 104 case 2: /* uid */ 105 pwd.pw_uid = atoi(p); 106 if (uid != (uid_t)-1) { 107 if (uid == pwd.pw_uid) 108 done = 1; 109 else 110 quickout = 1; 111 } 112 break; 113 case 3: /* gid */ 114 pwd.pw_gid = atoi(p); 115 break; 116 case 4: /* class */ 117 if (nam == NULL && uid == (uid_t)-1) 118 done = 1; 119 pwd.pw_class = p; 120 break; 121 case 5: /* change */ 122 pwd.pw_change = (time_t)atol(p); 123 break; 124 case 6: /* expire */ 125 pwd.pw_expire = (time_t)atol(p); 126 break; 127 case 7: /* gecos */ 128 pwd.pw_gecos = p; 129 break; 130 case 8: /* directory */ 131 pwd.pw_dir = p; 132 break; 133 case 9: /* shell */ 134 pwd.pw_shell = p; 135 break; 136 } 137 } 138 } 139 if (doclose) 140 vendpwent(); 141 if (done && pwd.pw_name) { 142 pw = &pwd; 143 144 #define CKNULL(s) s = s ? s : "" 145 CKNULL(pwd.pw_passwd); 146 CKNULL(pwd.pw_class); 147 CKNULL(pwd.pw_gecos); 148 CKNULL(pwd.pw_dir); 149 CKNULL(pwd.pw_shell); 150 } 151 } 152 return pw; 153 } 154 155 struct passwd * 156 vgetpwent(void) 157 { 158 return vnextpwent(NULL, -1, 0); 159 } 160 161 struct passwd * 162 vgetpwuid(uid_t uid) 163 { 164 return vnextpwent(NULL, uid, 1); 165 } 166 167 struct passwd * 168 vgetpwnam(const char * nam) 169 { 170 return vnextpwent(nam, -1, 1); 171 } 172 173 int vpwdb(char *arg, ...) 174 { 175 arg=arg; 176 return 0; 177 } 178 179 180 181 static FILE * grp_fp = NULL; 182 183 void 184 vendgrent(void) 185 { 186 if (grp_fp != NULL) { 187 fclose(grp_fp); 188 grp_fp = NULL; 189 } 190 } 191 192 RET_SETGRENT 193 vsetgrent(void) 194 { 195 vendgrent(); 196 #if defined(__FreeBSD__) 197 return 0; 198 #endif 199 } 200 201 static struct group * 202 vnextgrent(char const * nam, gid_t gid, int doclose) 203 { 204 struct group * gr = NULL; 205 206 static char * grtmp = NULL; 207 static int grlen = 0; 208 static char ** mems = NULL; 209 static int memlen = 0; 210 211 extendline(&grtmp, &grlen, MAXPATHLEN); 212 strlcpy(grtmp, getgrpath(_GROUP), MAXPATHLEN); 213 214 if (grp_fp != NULL || (grp_fp = fopen(grtmp, "r")) != NULL) { 215 int done = 0; 216 217 static struct group grp; 218 219 while (!done && fgets(grtmp, grlen, grp_fp) != NULL) 220 { 221 int i, quickout = 0; 222 int mno = 0; 223 char * q, * p; 224 char * sep = ":\n"; 225 226 if ((p = strchr(grtmp, '\n')) == NULL) { 227 int l; 228 extendline(&grtmp, &grlen, grlen + PWBUFSZ); 229 l = strlen(grtmp); 230 if (fgets(grtmp + l, grlen - l, grp_fp) == NULL) 231 break; /* No newline terminator on last line */ 232 } 233 /* Skip comments and empty lines */ 234 if (*grtmp == '\n' || *grtmp == '#') 235 continue; 236 i = 0; 237 q = p = grtmp; 238 bzero(&grp, sizeof grp); 239 extendarray(&mems, &memlen, 200); 240 while (!quickout && (p = strsep(&q, sep)) != NULL) { 241 switch (i++) 242 { 243 case 0: /* groupname */ 244 grp.gr_name = p; 245 if (nam) { 246 if (strcmp(nam, p) == 0) 247 done = 1; 248 else 249 quickout = 1; 250 } 251 break; 252 case 1: /* password */ 253 grp.gr_passwd = p; 254 break; 255 case 2: /* gid */ 256 grp.gr_gid = atoi(p); 257 if (gid != (gid_t)-1) { 258 if (gid == (gid_t)grp.gr_gid) 259 done = 1; 260 else 261 quickout = 1; 262 } else if (nam == NULL) 263 done = 1; 264 break; 265 case 3: 266 q = p; 267 sep = ",\n"; 268 break; 269 default: 270 if (*p) { 271 extendarray(&mems, &memlen, mno + 2); 272 mems[mno++] = p; 273 } 274 break; 275 } 276 } 277 grp.gr_mem = mems; 278 mems[mno] = NULL; 279 } 280 if (doclose) 281 vendgrent(); 282 if (done && grp.gr_name) { 283 gr = &grp; 284 285 CKNULL(grp.gr_passwd); 286 } 287 } 288 return gr; 289 } 290 291 struct group * 292 vgetgrent(void) 293 { 294 return vnextgrent(NULL, -1, 0); 295 } 296 297 298 struct group * 299 vgetgrgid(gid_t gid) 300 { 301 return vnextgrent(NULL, gid, 1); 302 } 303 304 struct group * 305 vgetgrnam(const char * nam) 306 { 307 return vnextgrent(nam, -1, 1); 308 } 309 310 int 311 vgrdb(char *arg, ...) 312 { 313 arg=arg; 314 return 0; 315 } 316 317