getgrent.c revision 1.61 1 /* $NetBSD: getgrent.c,v 1.61 2007/02/03 16:12:47 christos Exp $ */
2
3 /*-
4 * Copyright (c) 1999-2000, 2004-2005 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Luke Mewburn.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright (c) 1989, 1993
41 * The Regents of the University of California. All rights reserved.
42 *
43 * Redistribution and use in source and binary forms, with or without
44 * modification, are permitted provided that the following conditions
45 * are met:
46 * 1. Redistributions of source code must retain the above copyright
47 * notice, this list of conditions and the following disclaimer.
48 * 2. Redistributions in binary form must reproduce the above copyright
49 * notice, this list of conditions and the following disclaimer in the
50 * documentation and/or other materials provided with the distribution.
51 * 3. Neither the name of the University nor the names of its contributors
52 * may be used to endorse or promote products derived from this software
53 * without specific prior written permission.
54 *
55 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
56 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
57 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
58 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
59 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
60 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
61 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
62 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
63 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
64 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
65 * SUCH DAMAGE.
66 */
67
68 /*
69 * Portions Copyright (c) 1994, Jason Downs. All Rights Reserved.
70 *
71 * Redistribution and use in source and binary forms, with or without
72 * modification, are permitted provided that the following conditions
73 * are met:
74 * 1. Redistributions of source code must retain the above copyright
75 * notice, this list of conditions and the following disclaimer.
76 * 2. Redistributions in binary form must reproduce the above copyright
77 * notice, this list of conditions and the following disclaimer in the
78 * documentation and/or other materials provided with the distribution.
79 *
80 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS
81 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
82 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
83 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT,
84 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
85 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
86 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
87 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
88 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
89 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
90 * SUCH DAMAGE.
91 */
92
93 #include <sys/cdefs.h>
94 #if defined(LIBC_SCCS) && !defined(lint)
95 #if 0
96 static char sccsid[] = "@(#)getgrent.c 8.2 (Berkeley) 3/21/94";
97 #else
98 __RCSID("$NetBSD: getgrent.c,v 1.61 2007/02/03 16:12:47 christos Exp $");
99 #endif
100 #endif /* LIBC_SCCS and not lint */
101
102 #include "namespace.h"
103 #include "reentrant.h"
104
105 #include <sys/param.h>
106
107 #include <assert.h>
108 #include <errno.h>
109 #include <grp.h>
110 #include <limits.h>
111 #include <nsswitch.h>
112 #include <stdarg.h>
113 #include <stdio.h>
114 #include <stdlib.h>
115 #include <string.h>
116 #include <syslog.h>
117
118 #ifdef HESIOD
119 #include <hesiod.h>
120 #endif
121
122 #ifdef YP
123 #include <rpc/rpc.h>
124 #include <rpcsvc/yp_prot.h>
125 #include <rpcsvc/ypclnt.h>
126 #endif
127
128 #include "gr_private.h"
129
130 #ifdef __weak_alias
131 __weak_alias(endgrent,_endgrent)
132 __weak_alias(getgrent,_getgrent)
133 __weak_alias(getgrent_r,_getgrent_r)
134 __weak_alias(getgrgid,_getgrgid)
135 __weak_alias(getgrgid_r,_getgrgid_r)
136 __weak_alias(getgrnam,_getgrnam)
137 __weak_alias(getgrnam_r,_getgrnam_r)
138 __weak_alias(setgrent,_setgrent)
139 __weak_alias(setgroupent,_setgroupent)
140 #endif
141
142 #ifdef _REENTRANT
143 mutex_t __grmutex = MUTEX_INITIALIZER;
144 #endif
145
146 /*
147 * _gr_memfrombuf
148 * Obtain want bytes from buffer (of size buflen) and return a pointer
149 * to the available memory after adjusting buffer/buflen.
150 * Returns NULL if there is insufficient space.
151 */
152 static char *
153 _gr_memfrombuf(size_t want, char **buffer, size_t *buflen)
154 {
155 char *rv;
156
157 if (want > *buflen) {
158 errno = ERANGE;
159 return NULL;
160 }
161 rv = *buffer;
162 *buffer += want;
163 *buflen -= want;
164 return rv;
165 }
166
167 /*
168 * _gr_parse
169 * Parses entry as a line per group(5) (without the trailing \n)
170 * and fills in grp with corresponding values; memory for strings
171 * and arrays will be allocated from buf (of size buflen).
172 * Returns 1 if parsed successfully, 0 on parse failure.
173 */
174 static int
175 _gr_parse(const char *entry, struct group *grp, char *buf, size_t buflen)
176 {
177 unsigned long id;
178 const char *bp;
179 char *ep;
180 size_t count;
181 int memc;
182
183 _DIAGASSERT(entry != NULL);
184 _DIAGASSERT(grp != NULL);
185 _DIAGASSERT(buf != NULL);
186
187 #define COPYTOBUF(to) \
188 do { \
189 (to) = _gr_memfrombuf(count+1, &buf, &buflen); \
190 if ((to) == NULL) \
191 return 0; \
192 memmove((to), entry, count); \
193 to[count] = '\0'; \
194 } while (0) /* LINTED */
195
196 #if 0
197 if (*entry == '+') /* fail on compat `+' token */
198 return 0;
199 #endif
200
201 count = strcspn(entry, ":"); /* parse gr_name */
202 if (entry[count] == '\0')
203 return 0;
204 COPYTOBUF(grp->gr_name);
205 entry += count + 1;
206
207 count = strcspn(entry, ":"); /* parse gr_passwd */
208 if (entry[count] == '\0')
209 return 0;
210 COPYTOBUF(grp->gr_passwd);
211 entry += count + 1;
212
213 count = strcspn(entry, ":"); /* parse gr_gid */
214 if (entry[count] == '\0')
215 return 0;
216 id = strtoul(entry, &ep, 10);
217 if (id > GID_MAX || *ep != ':')
218 return 0;
219 grp->gr_gid = (gid_t)id;
220 entry += count + 1;
221
222 memc = 1; /* for final NULL */
223 if (*entry != '\0')
224 memc++; /* for first item */
225 for (bp = entry; *bp != '\0'; bp++) {
226 if (*bp == ',')
227 memc++;
228 }
229 /* grab ALIGNed char **gr_mem from buf */
230 ep = _gr_memfrombuf(memc * sizeof(char *) + ALIGNBYTES, &buf, &buflen);
231 grp->gr_mem = (char **)ALIGN(ep);
232 if (grp->gr_mem == NULL)
233 return 0;
234
235 for (memc = 0; *entry != '\0'; memc++) {
236 count = strcspn(entry, ","); /* parse member */
237 COPYTOBUF(grp->gr_mem[memc]);
238 entry += count;
239 if (*entry == ',')
240 entry++;
241 }
242
243 #undef COPYTOBUF
244
245 grp->gr_mem[memc] = NULL;
246 return 1;
247 }
248
249 /*
250 * _gr_copy
251 * Copy the contents of fromgrp to grp; memory for strings
252 * and arrays will be allocated from buf (of size buflen).
253 * Returns 1 if copied successfully, 0 on copy failure.
254 * NOTE: fromgrp must not use buf for its own pointers.
255 */
256 static int
257 _gr_copy(struct group *fromgrp, struct group *grp, char *buf, size_t buflen)
258 {
259 char *ep;
260 int memc;
261
262 _DIAGASSERT(fromgrp != NULL);
263 _DIAGASSERT(grp != NULL);
264 _DIAGASSERT(buf != NULL);
265
266 #define COPYSTR(to, from) \
267 do { \
268 size_t count = strlen((from)); \
269 (to) = _gr_memfrombuf(count+1, &buf, &buflen); \
270 if ((to) == NULL) \
271 return 0; \
272 memmove((to), (from), count); \
273 to[count] = '\0'; \
274 } while (0) /* LINTED */
275
276 COPYSTR(grp->gr_name, fromgrp->gr_name);
277 COPYSTR(grp->gr_passwd, fromgrp->gr_passwd);
278 grp->gr_gid = fromgrp->gr_gid;
279
280 for (memc = 0; fromgrp->gr_mem[memc]; memc++)
281 continue;
282 memc++; /* for final NULL */
283
284 /* grab ALIGNed char **gr_mem from buf */
285 ep = _gr_memfrombuf(memc * sizeof(char *) + ALIGNBYTES, &buf, &buflen);
286 grp->gr_mem = (char **)ALIGN(ep);
287 if (grp->gr_mem == NULL)
288 return 0;
289
290 for (memc = 0; fromgrp->gr_mem[memc]; memc++) {
291 COPYSTR(grp->gr_mem[memc], fromgrp->gr_mem[memc]);
292 }
293
294 #undef COPYSTR
295
296 grp->gr_mem[memc] = NULL;
297 return 1;
298 }
299
300 /*
301 * files methods
302 */
303
304 int
305 __grstart_files(struct __grstate_files *state)
306 {
307
308 _DIAGASSERT(state != NULL);
309
310 if (state->fp == NULL) {
311 state->fp = fopen(_PATH_GROUP, "r");
312 if (state->fp == NULL)
313 return NS_UNAVAIL;
314 } else {
315 rewind(state->fp);
316 }
317 return NS_SUCCESS;
318 }
319
320 int
321 __grend_files(struct __grstate_files *state)
322 {
323
324 _DIAGASSERT(state != NULL);
325
326 if (state->fp) {
327 (void) fclose(state->fp);
328 state->fp = NULL;
329 }
330 return NS_SUCCESS;
331 }
332
333 /*
334 * __grscan_files
335 * Scan state->fp for the next desired entry.
336 * If search is zero, return the next entry.
337 * If search is non-zero, look for a specific name (if name != NULL),
338 * or a specific gid (if name == NULL).
339 * Sets *retval to the errno if the result is not NS_SUCCESS
340 * or NS_NOTFOUND.
341 */
342 int
343 __grscan_files(int *retval, struct group *grp, char *buffer, size_t buflen,
344 struct __grstate_files *state, int search, const char *name, gid_t gid)
345 {
346 int rv;
347 char filebuf[_GETGR_R_SIZE_MAX], *ep;
348
349 _DIAGASSERT(retval != NULL);
350 _DIAGASSERT(grp != NULL);
351 _DIAGASSERT(buffer != NULL);
352 _DIAGASSERT(state != NULL);
353 /* name is NULL to indicate searching for gid */
354
355 *retval = 0;
356
357 if (state->fp == NULL) { /* only start if file not open yet */
358 rv = __grstart_files(state);
359 if (rv != NS_SUCCESS)
360 goto filesgrscan_out;
361 }
362
363 rv = NS_NOTFOUND;
364
365 /* scan line by line */
366 while (fgets(filebuf, sizeof(filebuf), state->fp) != NULL) {
367 ep = strchr(filebuf, '\n');
368 if (ep == NULL) { /* skip lines that are too big */
369 int ch;
370
371 while ((ch = getc(state->fp)) != '\n' && ch != EOF)
372 continue;
373 continue;
374 }
375 *ep = '\0'; /* clear trailing \n */
376
377 if (filebuf[0] == '+') /* skip compat line */
378 continue;
379
380 /* validate line */
381 if (! _gr_parse(filebuf, grp, buffer, buflen)) {
382 continue; /* skip bad lines */
383 }
384 if (! search) { /* just want this one */
385 rv = NS_SUCCESS;
386 break;
387 }
388 /* want specific */
389 if ((name && strcmp(name, grp->gr_name) == 0) ||
390 (!name && gid == grp->gr_gid)) {
391 rv = NS_SUCCESS;
392 break;
393 }
394 }
395
396 filesgrscan_out:
397 if (rv != NS_SUCCESS && rv != NS_NOTFOUND)
398 *retval = errno;
399 return rv;
400 }
401
402
403 static struct __grstate_files _files_state;
404 /* storage for non _r functions */
405 static struct group _files_group;
406 static char _files_groupbuf[_GETGR_R_SIZE_MAX];
407
408 /*ARGSUSED*/
409 static int
410 _files_setgrent(void *nsrv, void *nscb, va_list ap)
411 {
412
413 _files_state.stayopen = 0;
414 return __grstart_files(&_files_state);
415 }
416
417 /*ARGSUSED*/
418 static int
419 _files_setgroupent(void *nsrv, void *nscb, va_list ap)
420 {
421 int *retval = va_arg(ap, int *);
422 int stayopen = va_arg(ap, int);
423
424 int rv;
425
426 _files_state.stayopen = stayopen;
427 rv = __grstart_files(&_files_state);
428 *retval = (rv == NS_SUCCESS);
429 return rv;
430 }
431
432 /*ARGSUSED*/
433 static int
434 _files_endgrent(void *nsrv, void *nscb, va_list ap)
435 {
436
437 _files_state.stayopen = 0;
438 return __grend_files(&_files_state);
439 }
440
441 /*ARGSUSED*/
442 static int
443 _files_getgrent(void *nsrv, void *nscb, va_list ap)
444 {
445 struct group **retval = va_arg(ap, struct group **);
446
447 int rv, rerror;
448
449 _DIAGASSERT(retval != NULL);
450
451 *retval = NULL;
452 rv = __grscan_files(&rerror, &_files_group,
453 _files_groupbuf, sizeof(_files_groupbuf),
454 &_files_state, 0, NULL, 0);
455 if (rv == NS_SUCCESS)
456 *retval = &_files_group;
457 return rv;
458 }
459
460 /*ARGSUSED*/
461 static int
462 _files_getgrent_r(void *nsrv, void *nscb, va_list ap)
463 {
464 int *retval = va_arg(ap, int *);
465 struct group *grp = va_arg(ap, struct group *);
466 char *buffer = va_arg(ap, char *);
467 size_t buflen = va_arg(ap, size_t);
468 struct group **result = va_arg(ap, struct group **);
469
470 int rv;
471
472 _DIAGASSERT(retval != NULL);
473 _DIAGASSERT(grp != NULL);
474 _DIAGASSERT(buffer != NULL);
475 _DIAGASSERT(result != NULL);
476
477 rv = __grscan_files(retval, grp, buffer, buflen,
478 &_files_state, 0, NULL, 0);
479 if (rv == NS_SUCCESS)
480 *result = grp;
481 else
482 *result = NULL;
483 return rv;
484 }
485
486 /*ARGSUSED*/
487 static int
488 _files_getgrgid(void *nsrv, void *nscb, va_list ap)
489 {
490 struct group **retval = va_arg(ap, struct group **);
491 gid_t gid = va_arg(ap, gid_t);
492
493 int rv, rerror;
494
495 _DIAGASSERT(retval != NULL);
496
497 *retval = NULL;
498 rv = __grstart_files(&_files_state);
499 if (rv != NS_SUCCESS)
500 return rv;
501 rv = __grscan_files(&rerror, &_files_group,
502 _files_groupbuf, sizeof(_files_groupbuf),
503 &_files_state, 1, NULL, gid);
504 if (!_files_state.stayopen)
505 __grend_files(&_files_state);
506 if (rv == NS_SUCCESS)
507 *retval = &_files_group;
508 return rv;
509 }
510
511 /*ARGSUSED*/
512 static int
513 _files_getgrgid_r(void *nsrv, void *nscb, va_list ap)
514 {
515 int *retval = va_arg(ap, int *);
516 gid_t gid = va_arg(ap, gid_t);
517 struct group *grp = va_arg(ap, struct group *);
518 char *buffer = va_arg(ap, char *);
519 size_t buflen = va_arg(ap, size_t);
520 struct group **result = va_arg(ap, struct group **);
521
522 struct __grstate_files state;
523 int rv;
524
525 _DIAGASSERT(retval != NULL);
526 _DIAGASSERT(grp != NULL);
527 _DIAGASSERT(buffer != NULL);
528 _DIAGASSERT(result != NULL);
529
530 *result = NULL;
531 memset(&state, 0, sizeof(state));
532 rv = __grscan_files(retval, grp, buffer, buflen, &state, 1, NULL, gid);
533 __grend_files(&state);
534 if (rv == NS_SUCCESS)
535 *result = grp;
536 return rv;
537 }
538
539 /*ARGSUSED*/
540 static int
541 _files_getgrnam(void *nsrv, void *nscb, va_list ap)
542 {
543 struct group **retval = va_arg(ap, struct group **);
544 const char *name = va_arg(ap, const char *);
545
546 int rv, rerror;
547
548 _DIAGASSERT(retval != NULL);
549
550 *retval = NULL;
551 rv = __grstart_files(&_files_state);
552 if (rv != NS_SUCCESS)
553 return rv;
554 rv = __grscan_files(&rerror, &_files_group,
555 _files_groupbuf, sizeof(_files_groupbuf),
556 &_files_state, 1, name, 0);
557 if (!_files_state.stayopen)
558 __grend_files(&_files_state);
559 if (rv == NS_SUCCESS)
560 *retval = &_files_group;
561 return rv;
562 }
563
564 /*ARGSUSED*/
565 static int
566 _files_getgrnam_r(void *nsrv, void *nscb, va_list ap)
567 {
568 int *retval = va_arg(ap, int *);
569 const char *name = va_arg(ap, const char *);
570 struct group *grp = va_arg(ap, struct group *);
571 char *buffer = va_arg(ap, char *);
572 size_t buflen = va_arg(ap, size_t);
573 struct group **result = va_arg(ap, struct group **);
574
575 struct __grstate_files state;
576 int rv;
577
578 _DIAGASSERT(retval != NULL);
579 _DIAGASSERT(grp != NULL);
580 _DIAGASSERT(buffer != NULL);
581 _DIAGASSERT(result != NULL);
582
583 *result = NULL;
584 memset(&state, 0, sizeof(state));
585 rv = __grscan_files(retval, grp, buffer, buflen, &state, 1, name, 0);
586 __grend_files(&state);
587 if (rv == NS_SUCCESS)
588 *result = grp;
589 return rv;
590 }
591
592
593 #ifdef HESIOD
594 /*
595 * dns methods
596 */
597
598 int
599 __grstart_dns(struct __grstate_dns *state)
600 {
601
602 _DIAGASSERT(state != NULL);
603
604 state->num = 0;
605 if (state->context == NULL) { /* setup Hesiod */
606 if (hesiod_init(&state->context) == -1)
607 return NS_UNAVAIL;
608 }
609
610 return NS_SUCCESS;
611 }
612
613 int
614 __grend_dns(struct __grstate_dns *state)
615 {
616
617 _DIAGASSERT(state != NULL);
618
619 state->num = 0;
620 if (state->context) {
621 hesiod_end(state->context);
622 state->context = NULL;
623 }
624 return NS_SUCCESS;
625 }
626
627 /*
628 * __grscan_dns
629 * Search Hesiod for the next desired entry.
630 * If search is zero, return the next entry.
631 * If search is non-zero, look for a specific name (if name != NULL),
632 * or a specific gid (if name == NULL).
633 */
634 int
635 __grscan_dns(int *retval, struct group *grp, char *buffer, size_t buflen,
636 struct __grstate_dns *state, int search, const char *name, gid_t gid)
637 {
638 const char **curzone;
639 char **hp, *ep;
640 int rv;
641
642 static const char *zones_gid_group[] = {
643 "gid",
644 "group",
645 NULL
646 };
647
648 static const char *zones_group[] = {
649 "group",
650 NULL
651 };
652
653 _DIAGASSERT(retval != NULL);
654 _DIAGASSERT(grp != NULL);
655 _DIAGASSERT(buffer != NULL);
656 _DIAGASSERT(state != NULL);
657 /* name is NULL to indicate searching for gid */
658
659 *retval = 0;
660
661 if (state->context == NULL) { /* only start if Hesiod not setup */
662 rv = __grstart_dns(state);
663 if (rv != NS_SUCCESS)
664 return rv;
665 }
666
667 next_dns_entry:
668 hp = NULL;
669 rv = NS_NOTFOUND;
670
671 if (! search) { /* find next entry */
672 if (state->num == -1) /* exhausted search */
673 return NS_NOTFOUND;
674 /* find group-NNN */
675 snprintf(buffer, buflen, "group-%u", state->num);
676 state->num++;
677 curzone = zones_group;
678 } else if (name) { /* find group name */
679 snprintf(buffer, buflen, "%s", name);
680 curzone = zones_group;
681 } else { /* find gid */
682 snprintf(buffer, buflen, "%u", (unsigned int)gid);
683 curzone = zones_gid_group;
684 }
685
686 for (; *curzone; curzone++) { /* search zones */
687 hp = hesiod_resolve(state->context, buffer, *curzone);
688 if (hp != NULL)
689 break;
690 if (errno != ENOENT) {
691 rv = NS_UNAVAIL;
692 goto dnsgrscan_out;
693 }
694 }
695 if (*curzone == NULL) {
696 if (! search)
697 state->num = -1;
698 goto dnsgrscan_out;
699 }
700
701 if ((ep = strchr(hp[0], '\n')) != NULL)
702 *ep = '\0'; /* clear trailing \n */
703 if (_gr_parse(hp[0], grp, buffer, buflen)) { /* validate line */
704 if (! search) { /* just want this one */
705 rv = NS_SUCCESS;
706 } else if ((name && strcmp(name, grp->gr_name) == 0) ||
707 (!name && gid == grp->gr_gid)) { /* want specific */
708 rv = NS_SUCCESS;
709 }
710 } else { /* dodgy entry */
711 if (!search) { /* try again if ! searching */
712 hesiod_free_list(state->context, hp);
713 goto next_dns_entry;
714 }
715 }
716
717 dnsgrscan_out:
718 if (rv != NS_SUCCESS && rv != NS_NOTFOUND)
719 *retval = errno;
720 if (hp)
721 hesiod_free_list(state->context, hp);
722 return rv;
723 }
724
725 static struct __grstate_dns _dns_state;
726 /* storage for non _r functions */
727 static struct group _dns_group;
728 static char _dns_groupbuf[_GETGR_R_SIZE_MAX];
729
730 /*ARGSUSED*/
731 static int
732 _dns_setgrent(void *nsrv, void *nscb, va_list ap)
733 {
734
735 _dns_state.stayopen = 0;
736 return __grstart_dns(&_dns_state);
737 }
738
739 /*ARGSUSED*/
740 static int
741 _dns_setgroupent(void *nsrv, void *nscb, va_list ap)
742 {
743 int *retval = va_arg(ap, int *);
744 int stayopen = va_arg(ap, int);
745
746 int rv;
747
748 _dns_state.stayopen = stayopen;
749 rv = __grstart_dns(&_dns_state);
750 *retval = (rv == NS_SUCCESS);
751 return rv;
752 }
753
754 /*ARGSUSED*/
755 static int
756 _dns_endgrent(void *nsrv, void *nscb, va_list ap)
757 {
758
759 _dns_state.stayopen = 0;
760 return __grend_dns(&_dns_state);
761 }
762
763 /*ARGSUSED*/
764 static int
765 _dns_getgrent(void *nsrv, void *nscb, va_list ap)
766 {
767 struct group **retval = va_arg(ap, struct group **);
768
769 int rv, rerror;
770
771 _DIAGASSERT(retval != NULL);
772
773 *retval = NULL;
774 rv = __grscan_dns(&rerror, &_dns_group,
775 _dns_groupbuf, sizeof(_dns_groupbuf), &_dns_state, 0, NULL, 0);
776 if (rv == NS_SUCCESS)
777 *retval = &_dns_group;
778 return rv;
779 }
780
781 /*ARGSUSED*/
782 static int
783 _dns_getgrent_r(void *nsrv, void *nscb, va_list ap)
784 {
785 int *retval = va_arg(ap, int *);
786 struct group *grp = va_arg(ap, struct group *);
787 char *buffer = va_arg(ap, char *);
788 size_t buflen = va_arg(ap, size_t);
789 struct group **result = va_arg(ap, struct group **);
790
791 int rv;
792
793 _DIAGASSERT(retval != NULL);
794 _DIAGASSERT(grp != NULL);
795 _DIAGASSERT(buffer != NULL);
796 _DIAGASSERT(result != NULL);
797
798 rv = __grscan_dns(retval, grp, buffer, buflen,
799 &_dns_state, 0, NULL, 0);
800 if (rv == NS_SUCCESS)
801 *result = grp;
802 else
803 *result = NULL;
804 return rv;
805 }
806 /*ARGSUSED*/
807 static int
808 _dns_getgrgid(void *nsrv, void *nscb, va_list ap)
809 {
810 struct group **retval = va_arg(ap, struct group **);
811 gid_t gid = va_arg(ap, gid_t);
812
813 int rv, rerror;
814
815 _DIAGASSERT(retval != NULL);
816
817 *retval = NULL;
818 rv = __grstart_dns(&_dns_state);
819 if (rv != NS_SUCCESS)
820 return rv;
821 rv = __grscan_dns(&rerror, &_dns_group,
822 _dns_groupbuf, sizeof(_dns_groupbuf), &_dns_state, 1, NULL, gid);
823 if (!_dns_state.stayopen)
824 __grend_dns(&_dns_state);
825 if (rv == NS_SUCCESS)
826 *retval = &_dns_group;
827 return rv;
828 }
829
830 /*ARGSUSED*/
831 static int
832 _dns_getgrgid_r(void *nsrv, void *nscb, va_list ap)
833 {
834 int *retval = va_arg(ap, int *);
835 gid_t gid = va_arg(ap, gid_t);
836 struct group *grp = va_arg(ap, struct group *);
837 char *buffer = va_arg(ap, char *);
838 size_t buflen = va_arg(ap, size_t);
839 struct group **result = va_arg(ap, struct group **);
840
841 struct __grstate_dns state;
842 int rv;
843
844 _DIAGASSERT(retval != NULL);
845 _DIAGASSERT(grp != NULL);
846 _DIAGASSERT(buffer != NULL);
847 _DIAGASSERT(result != NULL);
848
849 *result = NULL;
850 memset(&state, 0, sizeof(state));
851 rv = __grscan_dns(retval, grp, buffer, buflen, &state, 1, NULL, gid);
852 __grend_dns(&state);
853 if (rv == NS_SUCCESS)
854 *result = grp;
855 return rv;
856 }
857
858 /*ARGSUSED*/
859 static int
860 _dns_getgrnam(void *nsrv, void *nscb, va_list ap)
861 {
862 struct group **retval = va_arg(ap, struct group **);
863 const char *name = va_arg(ap, const char *);
864
865 int rv, rerror;
866
867 _DIAGASSERT(retval != NULL);
868
869 *retval = NULL;
870 rv = __grstart_dns(&_dns_state);
871 if (rv != NS_SUCCESS)
872 return rv;
873 rv = __grscan_dns(&rerror, &_dns_group,
874 _dns_groupbuf, sizeof(_dns_groupbuf), &_dns_state, 1, name, 0);
875 if (!_dns_state.stayopen)
876 __grend_dns(&_dns_state);
877 if (rv == NS_SUCCESS)
878 *retval = &_dns_group;
879 return rv;
880 }
881
882 /*ARGSUSED*/
883 static int
884 _dns_getgrnam_r(void *nsrv, void *nscb, va_list ap)
885 {
886 int *retval = va_arg(ap, int *);
887 const char *name = va_arg(ap, const char *);
888 struct group *grp = va_arg(ap, struct group *);
889 char *buffer = va_arg(ap, char *);
890 size_t buflen = va_arg(ap, size_t);
891 struct group **result = va_arg(ap, struct group **);
892
893 struct __grstate_dns state;
894 int rv;
895
896 _DIAGASSERT(retval != NULL);
897 _DIAGASSERT(grp != NULL);
898 _DIAGASSERT(buffer != NULL);
899 _DIAGASSERT(result != NULL);
900
901 *result = NULL;
902 memset(&state, 0, sizeof(state));
903 rv = __grscan_dns(retval, grp, buffer, buflen, &state, 1, name, 0);
904 __grend_dns(&state);
905 if (rv == NS_SUCCESS)
906 *result = grp;
907 return rv;
908 }
909
910 #endif /* HESIOD */
911
912
913 #ifdef YP
914 /*
915 * nis methods
916 */
917
918 int
919 __grstart_nis(struct __grstate_nis *state)
920 {
921
922 _DIAGASSERT(state != NULL);
923
924 state->done = 0;
925 if (state->current) {
926 free(state->current);
927 state->current = NULL;
928 }
929 if (state->domain == NULL) { /* setup NIS */
930 switch (yp_get_default_domain(&state->domain)) {
931 case 0:
932 break;
933 case YPERR_RESRC:
934 return NS_TRYAGAIN;
935 default:
936 return NS_UNAVAIL;
937 }
938 }
939 return NS_SUCCESS;
940 }
941
942 int
943 __grend_nis(struct __grstate_nis *state)
944 {
945
946 _DIAGASSERT(state != NULL);
947
948 if (state->domain) {
949 state->domain = NULL;
950 }
951 state->done = 0;
952 if (state->current) {
953 free(state->current);
954 state->current = NULL;
955 }
956 return NS_SUCCESS;
957 }
958
959 /*
960 * __grscan_nis
961 * Search NIS for the next desired entry.
962 * If search is zero, return the next entry.
963 * If search is non-zero, look for a specific name (if name != NULL),
964 * or a specific gid (if name == NULL).
965 */
966 int
967 __grscan_nis(int *retval, struct group *grp, char *buffer, size_t buflen,
968 struct __grstate_nis *state, int search, const char *name, gid_t gid)
969 {
970 const char *map;
971 char *key, *data;
972 int nisr, rv, keylen, datalen;
973
974 _DIAGASSERT(retval != NULL);
975 _DIAGASSERT(grp != NULL);
976 _DIAGASSERT(buffer != NULL);
977 _DIAGASSERT(state != NULL);
978 /* name is NULL to indicate searching for gid */
979
980 *retval = 0;
981
982 if (state->domain == NULL) { /* only start if NIS not setup */
983 rv = __grstart_nis(state);
984 if (rv != NS_SUCCESS)
985 return rv;
986 }
987
988 next_nis_entry:
989 key = NULL;
990 data = NULL;
991 rv = NS_SUCCESS;
992
993 if (! search) { /* find next entry */
994 if (state->done) /* exhausted search */
995 return NS_NOTFOUND;
996 map = "group.byname";
997 if (state->current) { /* already searching */
998 nisr = yp_next(state->domain, map,
999 state->current, state->currentlen,
1000 &key, &keylen, &data, &datalen);
1001 free(state->current);
1002 state->current = NULL;
1003 switch (nisr) {
1004 case 0:
1005 state->current = key;
1006 state->currentlen = keylen;
1007 key = NULL;
1008 break;
1009 case YPERR_NOMORE:
1010 rv = NS_NOTFOUND;
1011 state->done = 1;
1012 break;
1013 default:
1014 rv = NS_UNAVAIL;
1015 break;
1016 }
1017 } else { /* new search */
1018 if (yp_first(state->domain, map,
1019 &state->current, &state->currentlen,
1020 &data, &datalen)) {
1021 rv = NS_UNAVAIL;
1022 }
1023 }
1024 } else { /* search for specific item */
1025 if (name) { /* find group name */
1026 snprintf(buffer, buflen, "%s", name);
1027 map = "group.byname";
1028 } else { /* find gid */
1029 snprintf(buffer, buflen, "%u", (unsigned int)gid);
1030 map = "group.bygid";
1031 }
1032 nisr = yp_match(state->domain, map, buffer, (int)strlen(buffer),
1033 &data, &datalen);
1034 switch (nisr) {
1035 case 0:
1036 break;
1037 case YPERR_KEY:
1038 rv = NS_NOTFOUND;
1039 break;
1040 default:
1041 rv = NS_UNAVAIL;
1042 break;
1043 }
1044 }
1045 if (rv == NS_SUCCESS) { /* validate data */
1046 data[datalen] = '\0'; /* clear trailing \n */
1047 if (_gr_parse(data, grp, buffer, buflen)) {
1048 if (! search) { /* just want this one */
1049 rv = NS_SUCCESS;
1050 } else if ((name && strcmp(name, grp->gr_name) == 0) ||
1051 (!name && gid == grp->gr_gid)) {
1052 /* want specific */
1053 rv = NS_SUCCESS;
1054 }
1055 } else { /* dodgy entry */
1056 if (!search) { /* try again if ! searching */
1057 free(data);
1058 goto next_nis_entry;
1059 }
1060 }
1061 }
1062
1063 if (rv != NS_SUCCESS && rv != NS_NOTFOUND)
1064 *retval = errno;
1065 if (key)
1066 free(key);
1067 if (data)
1068 free(data);
1069 return rv;
1070 }
1071
1072 static struct __grstate_nis _nis_state;
1073 /* storage for non _r functions */
1074 static struct group _nis_group;
1075 static char _nis_groupbuf[_GETGR_R_SIZE_MAX];
1076
1077 /*ARGSUSED*/
1078 static int
1079 _nis_setgrent(void *nsrv, void *nscb, va_list ap)
1080 {
1081
1082 _nis_state.stayopen = 0;
1083 return __grstart_nis(&_nis_state);
1084 }
1085
1086 /*ARGSUSED*/
1087 static int
1088 _nis_setgroupent(void *nsrv, void *nscb, va_list ap)
1089 {
1090 int *retval = va_arg(ap, int *);
1091 int stayopen = va_arg(ap, int);
1092
1093 int rv;
1094
1095 _nis_state.stayopen = stayopen;
1096 rv = __grstart_nis(&_nis_state);
1097 *retval = (rv == NS_SUCCESS);
1098 return rv;
1099 }
1100
1101 /*ARGSUSED*/
1102 static int
1103 _nis_endgrent(void *nsrv, void *nscb, va_list ap)
1104 {
1105
1106 return __grend_nis(&_nis_state);
1107 }
1108
1109 /*ARGSUSED*/
1110 static int
1111 _nis_getgrent(void *nsrv, void *nscb, va_list ap)
1112 {
1113 struct group **retval = va_arg(ap, struct group **);
1114
1115 int rv, rerror;
1116
1117 _DIAGASSERT(retval != NULL);
1118
1119 *retval = NULL;
1120 rv = __grscan_nis(&rerror, &_nis_group,
1121 _nis_groupbuf, sizeof(_nis_groupbuf), &_nis_state, 0, NULL, 0);
1122 if (rv == NS_SUCCESS)
1123 *retval = &_nis_group;
1124 return rv;
1125 }
1126
1127 /*ARGSUSED*/
1128 static int
1129 _nis_getgrent_r(void *nsrv, void *nscb, va_list ap)
1130 {
1131 int *retval = va_arg(ap, int *);
1132 struct group *grp = va_arg(ap, struct group *);
1133 char *buffer = va_arg(ap, char *);
1134 size_t buflen = va_arg(ap, size_t);
1135 struct group **result = va_arg(ap, struct group **);
1136
1137 int rv;
1138
1139 _DIAGASSERT(retval != NULL);
1140 _DIAGASSERT(grp != NULL);
1141 _DIAGASSERT(buffer != NULL);
1142 _DIAGASSERT(result != NULL);
1143
1144 rv = __grscan_nis(retval, grp, buffer, buflen,
1145 &_nis_state, 0, NULL, 0);
1146 if (rv == NS_SUCCESS)
1147 *result = grp;
1148 else
1149 *result = NULL;
1150 return rv;
1151 }
1152
1153 /*ARGSUSED*/
1154 static int
1155 _nis_getgrgid(void *nsrv, void *nscb, va_list ap)
1156 {
1157 struct group **retval = va_arg(ap, struct group **);
1158 gid_t gid = va_arg(ap, gid_t);
1159
1160 int rv, rerror;
1161
1162 _DIAGASSERT(retval != NULL);
1163
1164 *retval = NULL;
1165 rv = __grstart_nis(&_nis_state);
1166 if (rv != NS_SUCCESS)
1167 return rv;
1168 rv = __grscan_nis(&rerror, &_nis_group,
1169 _nis_groupbuf, sizeof(_nis_groupbuf), &_nis_state, 1, NULL, gid);
1170 if (!_nis_state.stayopen)
1171 __grend_nis(&_nis_state);
1172 if (rv == NS_SUCCESS)
1173 *retval = &_nis_group;
1174 return rv;
1175 }
1176
1177 /*ARGSUSED*/
1178 static int
1179 _nis_getgrgid_r(void *nsrv, void *nscb, va_list ap)
1180 {
1181 int *retval = va_arg(ap, int *);
1182 gid_t gid = va_arg(ap, gid_t);
1183 struct group *grp = va_arg(ap, struct group *);
1184 char *buffer = va_arg(ap, char *);
1185 size_t buflen = va_arg(ap, size_t);
1186 struct group **result = va_arg(ap, struct group **);
1187
1188 struct __grstate_nis state;
1189 int rv;
1190
1191 _DIAGASSERT(retval != NULL);
1192 _DIAGASSERT(grp != NULL);
1193 _DIAGASSERT(buffer != NULL);
1194 _DIAGASSERT(result != NULL);
1195
1196 *result = NULL;
1197 memset(&state, 0, sizeof(state));
1198 rv = __grscan_nis(retval, grp, buffer, buflen, &state, 1, NULL, gid);
1199 __grend_nis(&state);
1200 if (rv == NS_SUCCESS)
1201 *result = grp;
1202 return rv;
1203 }
1204
1205 /*ARGSUSED*/
1206 static int
1207 _nis_getgrnam(void *nsrv, void *nscb, va_list ap)
1208 {
1209 struct group **retval = va_arg(ap, struct group **);
1210 const char *name = va_arg(ap, const char *);
1211
1212 int rv, rerror;
1213
1214 _DIAGASSERT(retval != NULL);
1215
1216 *retval = NULL;
1217 rv = __grstart_nis(&_nis_state);
1218 if (rv != NS_SUCCESS)
1219 return rv;
1220 rv = __grscan_nis(&rerror, &_nis_group,
1221 _nis_groupbuf, sizeof(_nis_groupbuf), &_nis_state, 1, name, 0);
1222 if (!_nis_state.stayopen)
1223 __grend_nis(&_nis_state);
1224 if (rv == NS_SUCCESS)
1225 *retval = &_nis_group;
1226 return rv;
1227 }
1228
1229 /*ARGSUSED*/
1230 static int
1231 _nis_getgrnam_r(void *nsrv, void *nscb, va_list ap)
1232 {
1233 int *retval = va_arg(ap, int *);
1234 const char *name = va_arg(ap, const char *);
1235 struct group *grp = va_arg(ap, struct group *);
1236 char *buffer = va_arg(ap, char *);
1237 size_t buflen = va_arg(ap, size_t);
1238 struct group **result = va_arg(ap, struct group **);
1239
1240 struct __grstate_nis state;
1241 int rv;
1242
1243 _DIAGASSERT(retval != NULL);
1244 _DIAGASSERT(grp != NULL);
1245 _DIAGASSERT(buffer != NULL);
1246 _DIAGASSERT(result != NULL);
1247
1248 *result = NULL;
1249 memset(&state, 0, sizeof(state));
1250 rv = __grscan_nis(retval, grp, buffer, buflen, &state, 1, name, 0);
1251 __grend_nis(&state);
1252 if (rv == NS_SUCCESS)
1253 *result = grp;
1254 return rv;
1255 }
1256
1257 #endif /* YP */
1258
1259
1260 #ifdef _GROUP_COMPAT
1261 /*
1262 * compat methods
1263 */
1264
1265 int
1266 __grstart_compat(struct __grstate_compat *state)
1267 {
1268
1269 _DIAGASSERT(state != NULL);
1270
1271 if (state->fp == NULL) {
1272 state->fp = fopen(_PATH_GROUP, "r");
1273 if (state->fp == NULL)
1274 return NS_UNAVAIL;
1275 } else {
1276 rewind(state->fp);
1277 }
1278 return NS_SUCCESS;
1279 }
1280
1281 int
1282 __grend_compat(struct __grstate_compat *state)
1283 {
1284
1285 _DIAGASSERT(state != NULL);
1286
1287 if (state->name) {
1288 free(state->name);
1289 state->name = NULL;
1290 }
1291 if (state->fp) {
1292 (void) fclose(state->fp);
1293 state->fp = NULL;
1294 }
1295 return NS_SUCCESS;
1296 }
1297
1298
1299 /*
1300 * __grbad_compat
1301 * log an error if "files" or "compat" is specified in
1302 * group_compat database
1303 */
1304 /*ARGSUSED*/
1305 int
1306 __grbad_compat(void *nsrv, void *nscb, va_list ap)
1307 {
1308 static int warned;
1309
1310 _DIAGASSERT(nsrv != NULL);
1311 _DIAGASSERT(nscb != NULL);
1312
1313 if (!warned) {
1314 syslog(LOG_ERR,
1315 "nsswitch.conf group_compat database can't use '%s'",
1316 (const char *)nscb);
1317 }
1318 warned = 1;
1319 return NS_UNAVAIL;
1320 }
1321
1322 /*
1323 * __grscan_compat
1324 * Scan state->fp for the next desired entry.
1325 * If search is zero, return the next entry.
1326 * If search is non-zero, look for a specific name (if name != NULL),
1327 * or a specific gid (if name == NULL).
1328 * Sets *retval to the errno if the result is not NS_SUCCESS or
1329 * NS_NOTFOUND.
1330 *
1331 * searchfunc is invoked when a compat "+" lookup is required;
1332 * searchcookie is passed as the first argument to searchfunc,
1333 * the second argument is the group result.
1334 * This should return NS_NOTFOUND when "no more groups" from compat src.
1335 * If searchfunc is NULL then nsdispatch of getgrent is used.
1336 * This is primarily intended for getgroupmembership(3)'s compat backend.
1337 */
1338 int
1339 __grscan_compat(int *retval, struct group *grp, char *buffer, size_t buflen,
1340 struct __grstate_compat *state, int search, const char *name, gid_t gid,
1341 int (*searchfunc)(void *, struct group **), void *searchcookie)
1342 {
1343 int rv;
1344 char filebuf[_GETGR_R_SIZE_MAX], *ep;
1345
1346 static const ns_dtab compatentdtab[] = {
1347 NS_FILES_CB(__grbad_compat, "files")
1348 NS_DNS_CB(_dns_getgrent_r, NULL)
1349 NS_NIS_CB(_nis_getgrent_r, NULL)
1350 NS_COMPAT_CB(__grbad_compat, "compat")
1351 NS_NULL_CB
1352 };
1353 static const ns_dtab compatgiddtab[] = {
1354 NS_FILES_CB(__grbad_compat, "files")
1355 NS_DNS_CB(_dns_getgrgid_r, NULL)
1356 NS_NIS_CB(_nis_getgrgid_r, NULL)
1357 NS_COMPAT_CB(__grbad_compat, "compat")
1358 NS_NULL_CB
1359 };
1360 static const ns_dtab compatnamdtab[] = {
1361 NS_FILES_CB(__grbad_compat, "files")
1362 NS_DNS_CB(_dns_getgrnam_r, NULL)
1363 NS_NIS_CB(_nis_getgrnam_r, NULL)
1364 NS_COMPAT_CB(__grbad_compat, "compat")
1365 NS_NULL_CB
1366 };
1367
1368 _DIAGASSERT(retval != NULL);
1369 _DIAGASSERT(grp != NULL);
1370 _DIAGASSERT(buffer != NULL);
1371 _DIAGASSERT(state != NULL);
1372 /* name is NULL to indicate searching for gid */
1373
1374 *retval = 0;
1375
1376 if (state->fp == NULL) { /* only start if file not open yet */
1377 rv = __grstart_compat(state);
1378 if (rv != NS_SUCCESS)
1379 goto compatgrscan_out;
1380 }
1381 rv = NS_NOTFOUND;
1382
1383 for (;;) { /* loop through file */
1384 if (state->name != NULL) {
1385 /* processing compat entry */
1386 int crv, cretval;
1387 struct group cgrp, *cgrpres;
1388
1389 if (state->name[0]) { /* specific +group: */
1390 crv = nsdispatch(NULL, compatnamdtab,
1391 NSDB_GROUP_COMPAT, "getgrnam_r",
1392 __nsdefaultnis,
1393 &cretval, state->name,
1394 &cgrp, filebuf, sizeof(filebuf), &cgrpres);
1395 free(state->name); /* (only check 1 grp) */
1396 state->name = NULL;
1397 } else if (!search) { /* any group */
1398 if (searchfunc) {
1399 crv = searchfunc(searchcookie,
1400 &cgrpres);
1401 } else {
1402 crv = nsdispatch(NULL, compatentdtab,
1403 NSDB_GROUP_COMPAT, "getgrent_r",
1404 __nsdefaultnis,
1405 &cretval, &cgrp, filebuf,
1406 sizeof(filebuf), &cgrpres);
1407 }
1408 } else if (name) { /* specific group */
1409 crv = nsdispatch(NULL, compatnamdtab,
1410 NSDB_GROUP_COMPAT, "getgrnam_r",
1411 __nsdefaultnis,
1412 &cretval, name,
1413 &cgrp, filebuf, sizeof(filebuf), &cgrpres);
1414 } else { /* specific gid */
1415 crv = nsdispatch(NULL, compatgiddtab,
1416 NSDB_GROUP_COMPAT, "getgrgid_r",
1417 __nsdefaultnis,
1418 &cretval, gid,
1419 &cgrp, filebuf, sizeof(filebuf), &cgrpres);
1420 }
1421 if (crv != NS_SUCCESS) { /* not found */
1422 free(state->name);
1423 state->name = NULL;
1424 continue; /* try next line */
1425 }
1426 if (!_gr_copy(cgrpres, grp, buffer, buflen)) {
1427 rv = NS_UNAVAIL;
1428 break;
1429 }
1430 goto compatgrscan_cmpgrp; /* skip to grp test */
1431 }
1432
1433 /* get next file line */
1434 if (fgets(filebuf, sizeof(filebuf), state->fp) == NULL)
1435 break;
1436
1437 ep = strchr(filebuf, '\n');
1438 if (ep == NULL) { /* skip lines that are too big */
1439 int ch;
1440
1441 while ((ch = getc(state->fp)) != '\n' && ch != EOF)
1442 continue;
1443 continue;
1444 }
1445 *ep = '\0'; /* clear trailing \n */
1446
1447 if (filebuf[0] == '+') { /* parse compat line */
1448 if (state->name)
1449 free(state->name);
1450 state->name = NULL;
1451 switch(filebuf[1]) {
1452 case ':':
1453 case '\0':
1454 state->name = strdup("");
1455 break;
1456 default:
1457 ep = strchr(filebuf + 1, ':');
1458 if (ep == NULL)
1459 break;
1460 *ep = '\0';
1461 state->name = strdup(filebuf + 1);
1462 break;
1463 }
1464 if (state->name == NULL) {
1465 rv = NS_UNAVAIL;
1466 break;
1467 }
1468 continue;
1469 }
1470
1471 /* validate line */
1472 if (! _gr_parse(filebuf, grp, buffer, buflen)) {
1473 continue; /* skip bad lines */
1474 }
1475
1476 compatgrscan_cmpgrp:
1477 if (! search) { /* just want this one */
1478 rv = NS_SUCCESS;
1479 break;
1480 }
1481 /* want specific */
1482 if ((name && strcmp(name, grp->gr_name) == 0) ||
1483 (!name && gid == grp->gr_gid)) {
1484 rv = NS_SUCCESS;
1485 break;
1486 }
1487
1488 }
1489
1490 compatgrscan_out:
1491 if (rv != NS_SUCCESS && rv != NS_NOTFOUND)
1492 *retval = errno;
1493 return rv;
1494 }
1495
1496 static struct __grstate_compat _compat_state;
1497 /* storage for non _r functions */
1498 static struct group _compat_group;
1499 static char _compat_groupbuf[_GETGR_R_SIZE_MAX];
1500
1501 /*ARGSUSED*/
1502 static int
1503 _compat_setgrent(void *nsrv, void *nscb, va_list ap)
1504 {
1505 static const ns_dtab dtab[] = {
1506 NS_FILES_CB(__grbad_compat, "files")
1507 NS_DNS_CB(_dns_setgrent, NULL)
1508 NS_NIS_CB(_nis_setgrent, NULL)
1509 NS_COMPAT_CB(__grbad_compat, "compat")
1510 NS_NULL_CB
1511 };
1512
1513 /* force group_compat setgrent() */
1514 (void) nsdispatch(NULL, dtab, NSDB_GROUP_COMPAT, "setgrent",
1515 __nsdefaultnis_forceall);
1516
1517 /* reset state, keep fp open */
1518 _compat_state.stayopen = 0;
1519 return __grstart_compat(&_compat_state);
1520 }
1521
1522 /*ARGSUSED*/
1523 static int
1524 _compat_setgroupent(void *nsrv, void *nscb, va_list ap)
1525 {
1526 int *retval = va_arg(ap, int *);
1527 int stayopen = va_arg(ap, int);
1528
1529 int rv;
1530
1531 static const ns_dtab dtab[] = {
1532 NS_FILES_CB(__grbad_compat, "files")
1533 NS_DNS_CB(_dns_setgroupent, NULL)
1534 NS_NIS_CB(_nis_setgroupent, NULL)
1535 NS_COMPAT_CB(__grbad_compat, "compat")
1536 NS_NULL_CB
1537 };
1538
1539 /* force group_compat setgroupent() */
1540 (void) nsdispatch(NULL, dtab, NSDB_GROUP_COMPAT, "setgroupent",
1541 __nsdefaultnis_forceall, &rv, stayopen);
1542
1543 _compat_state.stayopen = stayopen;
1544 rv = __grstart_compat(&_compat_state);
1545 *retval = (rv == NS_SUCCESS);
1546 return rv;
1547 }
1548
1549 /*ARGSUSED*/
1550 static int
1551 _compat_endgrent(void *nsrv, void *nscb, va_list ap)
1552 {
1553 static const ns_dtab dtab[] = {
1554 NS_FILES_CB(__grbad_compat, "files")
1555 NS_DNS_CB(_dns_endgrent, NULL)
1556 NS_NIS_CB(_nis_endgrent, NULL)
1557 NS_COMPAT_CB(__grbad_compat, "compat")
1558 NS_NULL_CB
1559 };
1560
1561 /* force group_compat endgrent() */
1562 (void) nsdispatch(NULL, dtab, NSDB_GROUP_COMPAT, "endgrent",
1563 __nsdefaultnis_forceall);
1564
1565 /* reset state, close fp */
1566 _compat_state.stayopen = 0;
1567 return __grend_compat(&_compat_state);
1568 }
1569
1570 /*ARGSUSED*/
1571 static int
1572 _compat_getgrent(void *nsrv, void *nscb, va_list ap)
1573 {
1574 struct group **retval = va_arg(ap, struct group **);
1575
1576 int rv, rerror;
1577
1578 _DIAGASSERT(retval != NULL);
1579
1580 *retval = NULL;
1581 rv = __grscan_compat(&rerror, &_compat_group,
1582 _compat_groupbuf, sizeof(_compat_groupbuf),
1583 &_compat_state, 0, NULL, 0, NULL, NULL);
1584 if (rv == NS_SUCCESS)
1585 *retval = &_compat_group;
1586 return rv;
1587 }
1588
1589 /*ARGSUSED*/
1590 static int
1591 _compat_getgrent_r(void *nsrv, void *nscb, va_list ap)
1592 {
1593 int *retval = va_arg(ap, int *);
1594 struct group *grp = va_arg(ap, struct group *);
1595 char *buffer = va_arg(ap, char *);
1596 size_t buflen = va_arg(ap, size_t);
1597 struct group **result = va_arg(ap, struct group **);
1598
1599 int rv;
1600
1601 _DIAGASSERT(retval != NULL);
1602 _DIAGASSERT(grp != NULL);
1603 _DIAGASSERT(buffer != NULL);
1604 _DIAGASSERT(result != NULL);
1605
1606 rv = __grscan_compat(retval, grp, buffer, buflen,
1607 &_compat_state, 0, NULL, 0, NULL, NULL);
1608 if (rv == NS_SUCCESS)
1609 *result = grp;
1610 else
1611 *result = NULL;
1612 return rv;
1613 }
1614
1615 /*ARGSUSED*/
1616 static int
1617 _compat_getgrgid(void *nsrv, void *nscb, va_list ap)
1618 {
1619 struct group **retval = va_arg(ap, struct group **);
1620 gid_t gid = va_arg(ap, gid_t);
1621
1622 int rv, rerror;
1623
1624 _DIAGASSERT(retval != NULL);
1625
1626 *retval = NULL;
1627 rv = __grstart_compat(&_compat_state);
1628 if (rv != NS_SUCCESS)
1629 return rv;
1630 rv = __grscan_compat(&rerror, &_compat_group,
1631 _compat_groupbuf, sizeof(_compat_groupbuf),
1632 &_compat_state, 1, NULL, gid, NULL, NULL);
1633 if (!_compat_state.stayopen)
1634 __grend_compat(&_compat_state);
1635 if (rv == NS_SUCCESS)
1636 *retval = &_compat_group;
1637 return rv;
1638 }
1639
1640 /*ARGSUSED*/
1641 static int
1642 _compat_getgrgid_r(void *nsrv, void *nscb, va_list ap)
1643 {
1644 int *retval = va_arg(ap, int *);
1645 gid_t gid = va_arg(ap, gid_t);
1646 struct group *grp = va_arg(ap, struct group *);
1647 char *buffer = va_arg(ap, char *);
1648 size_t buflen = va_arg(ap, size_t);
1649 struct group **result = va_arg(ap, struct group **);
1650
1651 struct __grstate_compat state;
1652 int rv;
1653
1654 _DIAGASSERT(retval != NULL);
1655 _DIAGASSERT(grp != NULL);
1656 _DIAGASSERT(buffer != NULL);
1657 _DIAGASSERT(result != NULL);
1658
1659 *result = NULL;
1660 memset(&state, 0, sizeof(state));
1661 rv = __grscan_compat(retval, grp, buffer, buflen, &state,
1662 1, NULL, gid, NULL, NULL);
1663 __grend_compat(&state);
1664 if (rv == NS_SUCCESS)
1665 *result = grp;
1666 return rv;
1667 }
1668
1669 /*ARGSUSED*/
1670 static int
1671 _compat_getgrnam(void *nsrv, void *nscb, va_list ap)
1672 {
1673 struct group **retval = va_arg(ap, struct group **);
1674 const char *name = va_arg(ap, const char *);
1675
1676 int rv, rerror;
1677
1678 _DIAGASSERT(retval != NULL);
1679
1680 *retval = NULL;
1681 rv = __grstart_compat(&_compat_state);
1682 if (rv != NS_SUCCESS)
1683 return rv;
1684 rv = __grscan_compat(&rerror, &_compat_group,
1685 _compat_groupbuf, sizeof(_compat_groupbuf),
1686 &_compat_state, 1, name, 0, NULL, NULL);
1687 if (!_compat_state.stayopen)
1688 __grend_compat(&_compat_state);
1689 if (rv == NS_SUCCESS)
1690 *retval = &_compat_group;
1691 return rv;
1692 }
1693
1694 /*ARGSUSED*/
1695 static int
1696 _compat_getgrnam_r(void *nsrv, void *nscb, va_list ap)
1697 {
1698 int *retval = va_arg(ap, int *);
1699 const char *name = va_arg(ap, const char *);
1700 struct group *grp = va_arg(ap, struct group *);
1701 char *buffer = va_arg(ap, char *);
1702 size_t buflen = va_arg(ap, size_t);
1703 struct group **result = va_arg(ap, struct group **);
1704
1705 struct __grstate_compat state;
1706 int rv;
1707
1708 _DIAGASSERT(retval != NULL);
1709 _DIAGASSERT(grp != NULL);
1710 _DIAGASSERT(buffer != NULL);
1711 _DIAGASSERT(result != NULL);
1712
1713 *result = NULL;
1714 memset(&state, 0, sizeof(state));
1715 rv = __grscan_compat(retval, grp, buffer, buflen, &state,
1716 1, name, 0, NULL, NULL);
1717 __grend_compat(&state);
1718 if (rv == NS_SUCCESS)
1719 *result = grp;
1720 return rv;
1721 }
1722
1723 #endif /* _GROUP_COMPAT */
1724
1725
1726 /*
1727 * public functions
1728 */
1729
1730 struct group *
1731 getgrent(void)
1732 {
1733 int rv;
1734 struct group *retval;
1735
1736 static const ns_dtab dtab[] = {
1737 NS_FILES_CB(_files_getgrent, NULL)
1738 NS_DNS_CB(_dns_getgrent, NULL)
1739 NS_NIS_CB(_nis_getgrent, NULL)
1740 NS_COMPAT_CB(_compat_getgrent, NULL)
1741 NS_NULL_CB
1742 };
1743
1744 mutex_lock(&__grmutex);
1745 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrent", __nsdefaultcompat,
1746 &retval);
1747 mutex_unlock(&__grmutex);
1748 return (rv == NS_SUCCESS) ? retval : NULL;
1749 }
1750
1751 int
1752 getgrent_r(struct group *grp, char *buffer, size_t buflen,
1753 struct group **result)
1754 {
1755 int rv, retval;
1756
1757 static const ns_dtab dtab[] = {
1758 NS_FILES_CB(_files_getgrent_r, NULL)
1759 NS_DNS_CB(_dns_getgrent_r, NULL)
1760 NS_NIS_CB(_nis_getgrent_r, NULL)
1761 NS_COMPAT_CB(_compat_getgrent_r, NULL)
1762 NS_NULL_CB
1763 };
1764
1765 mutex_lock(&__grmutex);
1766 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrent_r", __nsdefaultcompat,
1767 &retval, grp, buffer, buflen, result);
1768 mutex_unlock(&__grmutex);
1769 switch (rv) {
1770 case NS_SUCCESS:
1771 case NS_NOTFOUND:
1772 return 0;
1773 default:
1774 return retval;
1775 }
1776 }
1777
1778
1779 struct group *
1780 getgrgid(gid_t gid)
1781 {
1782 int rv;
1783 struct group *retval;
1784
1785 static const ns_dtab dtab[] = {
1786 NS_FILES_CB(_files_getgrgid, NULL)
1787 NS_DNS_CB(_dns_getgrgid, NULL)
1788 NS_NIS_CB(_nis_getgrgid, NULL)
1789 NS_COMPAT_CB(_compat_getgrgid, NULL)
1790 NS_NULL_CB
1791 };
1792
1793 mutex_lock(&__grmutex);
1794 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrgid", __nsdefaultcompat,
1795 &retval, gid);
1796 mutex_unlock(&__grmutex);
1797 return (rv == NS_SUCCESS) ? retval : NULL;
1798 }
1799
1800 int
1801 getgrgid_r(gid_t gid, struct group *grp, char *buffer, size_t buflen,
1802 struct group **result)
1803 {
1804 int rv, retval;
1805
1806 static const ns_dtab dtab[] = {
1807 NS_FILES_CB(_files_getgrgid_r, NULL)
1808 NS_DNS_CB(_dns_getgrgid_r, NULL)
1809 NS_NIS_CB(_nis_getgrgid_r, NULL)
1810 NS_COMPAT_CB(_compat_getgrgid_r, NULL)
1811 NS_NULL_CB
1812 };
1813
1814 _DIAGASSERT(grp != NULL);
1815 _DIAGASSERT(buffer != NULL);
1816 _DIAGASSERT(result != NULL);
1817
1818 *result = NULL;
1819 retval = 0;
1820 mutex_lock(&__grmutex);
1821 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrgid_r", __nsdefaultcompat,
1822 &retval, gid, grp, buffer, buflen, result);
1823 mutex_unlock(&__grmutex);
1824 switch (rv) {
1825 case NS_SUCCESS:
1826 case NS_NOTFOUND:
1827 return 0;
1828 default:
1829 return retval;
1830 }
1831 }
1832
1833 struct group *
1834 getgrnam(const char *name)
1835 {
1836 int rv;
1837 struct group *retval;
1838
1839 static const ns_dtab dtab[] = {
1840 NS_FILES_CB(_files_getgrnam, NULL)
1841 NS_DNS_CB(_dns_getgrnam, NULL)
1842 NS_NIS_CB(_nis_getgrnam, NULL)
1843 NS_COMPAT_CB(_compat_getgrnam, NULL)
1844 NS_NULL_CB
1845 };
1846
1847 mutex_lock(&__grmutex);
1848 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrnam", __nsdefaultcompat,
1849 &retval, name);
1850 mutex_unlock(&__grmutex);
1851 return (rv == NS_SUCCESS) ? retval : NULL;
1852 }
1853
1854 int
1855 getgrnam_r(const char *name, struct group *grp, char *buffer, size_t buflen,
1856 struct group **result)
1857 {
1858 int rv, retval;
1859
1860 static const ns_dtab dtab[] = {
1861 NS_FILES_CB(_files_getgrnam_r, NULL)
1862 NS_DNS_CB(_dns_getgrnam_r, NULL)
1863 NS_NIS_CB(_nis_getgrnam_r, NULL)
1864 NS_COMPAT_CB(_compat_getgrnam_r, NULL)
1865 NS_NULL_CB
1866 };
1867
1868 _DIAGASSERT(name != NULL);
1869 _DIAGASSERT(grp != NULL);
1870 _DIAGASSERT(buffer != NULL);
1871 _DIAGASSERT(result != NULL);
1872
1873 *result = NULL;
1874 retval = 0;
1875 mutex_lock(&__grmutex);
1876 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "getgrnam_r", __nsdefaultcompat,
1877 &retval, name, grp, buffer, buflen, result);
1878 mutex_unlock(&__grmutex);
1879 switch (rv) {
1880 case NS_SUCCESS:
1881 case NS_NOTFOUND:
1882 return 0;
1883 default:
1884 return retval;
1885 }
1886 }
1887
1888 void
1889 endgrent(void)
1890 {
1891 static const ns_dtab dtab[] = {
1892 NS_FILES_CB(_files_endgrent, NULL)
1893 NS_DNS_CB(_dns_endgrent, NULL)
1894 NS_NIS_CB(_nis_endgrent, NULL)
1895 NS_COMPAT_CB(_compat_endgrent, NULL)
1896 NS_NULL_CB
1897 };
1898
1899 mutex_lock(&__grmutex);
1900 /* force all endgrent() methods */
1901 (void) nsdispatch(NULL, dtab, NSDB_GROUP, "endgrent",
1902 __nsdefaultcompat_forceall);
1903 mutex_unlock(&__grmutex);
1904 }
1905
1906 int
1907 setgroupent(int stayopen)
1908 {
1909 static const ns_dtab dtab[] = {
1910 NS_FILES_CB(_files_setgroupent, NULL)
1911 NS_DNS_CB(_dns_setgroupent, NULL)
1912 NS_NIS_CB(_nis_setgroupent, NULL)
1913 NS_COMPAT_CB(_compat_setgroupent, NULL)
1914 NS_NULL_CB
1915 };
1916 int rv, retval;
1917
1918 mutex_lock(&__grmutex);
1919 /* force all setgroupent() methods */
1920 rv = nsdispatch(NULL, dtab, NSDB_GROUP, "setgroupent",
1921 __nsdefaultcompat_forceall, &retval, stayopen);
1922 mutex_unlock(&__grmutex);
1923 return (rv == NS_SUCCESS) ? retval : 0;
1924 }
1925
1926 void
1927 setgrent(void)
1928 {
1929 static const ns_dtab dtab[] = {
1930 NS_FILES_CB(_files_setgrent, NULL)
1931 NS_DNS_CB(_dns_setgrent, NULL)
1932 NS_NIS_CB(_nis_setgrent, NULL)
1933 NS_COMPAT_CB(_compat_setgrent, NULL)
1934 NS_NULL_CB
1935 };
1936
1937 mutex_lock(&__grmutex);
1938 /* force all setgrent() methods */
1939 (void) nsdispatch(NULL, dtab, NSDB_GROUP, "setgrent",
1940 __nsdefaultcompat_forceall);
1941 mutex_unlock(&__grmutex);
1942 }
1943