1 /*
2 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (c) 1998-1999 by Internet Software Consortium.
4 *
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
8 *
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
15 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16 */
17
18 #if defined(LIBC_SCCS) && !defined(lint)
19 static const char rcsid[] = "$Id: getgrent_r.c,v 1.7 2005/04/27 04:56:24 sra Exp $";
20 #endif /* LIBC_SCCS and not lint */
21
22 #include <port_before.h>
23 #if !defined(_REENTRANT) || !defined(DO_PTHREADS) || !defined(WANT_IRS_PW)
24 static int getgrent_r_not_required = 0;
25 #else
26 #include <errno.h>
27 #include <string.h>
28 #include <stdio.h>
29 #include <sys/types.h>
30 #if (defined(POSIX_GETGRNAM_R) || defined(POSIX_GETGRGID_R)) && \
31 defined(_POSIX_PTHREAD_SEMANTICS)
32 /* turn off solaris remapping in <grp.h> */
33 #define _UNIX95
34 #undef _POSIX_PTHREAD_SEMANTICS
35 #include <grp.h>
36 #define _POSIX_PTHREAD_SEMANTICS 1
37 #else
38 #include <grp.h>
39 #endif
40 #include <sys/param.h>
41 #include <port_after.h>
42
43 #ifdef GROUP_R_RETURN
44
45 static int
46 copy_group(struct group *, struct group *, char *buf, int buflen);
47
48 /* POSIX 1003.1c */
49 #ifdef POSIX_GETGRNAM_R
50 int
__posix_getgrnam_r(const char * name,struct group * gptr,char * buf,int buflen,struct group ** result)51 __posix_getgrnam_r(const char *name, struct group *gptr,
52 char *buf, int buflen, struct group **result) {
53 #else
54 int
55 getgrnam_r(const char *name, struct group *gptr,
56 char *buf, size_t buflen, struct group **result) {
57 #endif
58 struct group *ge = getgrnam(name);
59 int res;
60
61 if (ge == NULL) {
62 *result = NULL;
63 return (0);
64 }
65
66 res = copy_group(ge, gptr, buf, buflen);
67 *result = res ? NULL : gptr;
68 return (res);
69 }
70
71 #ifdef POSIX_GETGRNAM_R
72 struct group *
73 getgrnam_r(const char *name, struct group *gptr,
74 char *buf, int buflen) {
75 struct group *ge = getgrnam(name);
76 int res;
77
78 if (ge == NULL)
79 return (NULL);
80 res = copy_group(ge, gptr, buf, buflen);
81 return (res ? NULL : gptr);
82 }
83 #endif /* POSIX_GETGRNAM_R */
84
85 /* POSIX 1003.1c */
86 #ifdef POSIX_GETGRGID_R
87 int
88 __posix_getgrgid_r(gid_t gid, struct group *gptr,
89 char *buf, int buflen, struct group **result) {
90 #else /* POSIX_GETGRGID_R */
91 int
92 getgrgid_r(gid_t gid, struct group *gptr,
93 char *buf, size_t buflen, struct group **result) {
94 #endif /* POSIX_GETGRGID_R */
95 struct group *ge = getgrgid(gid);
96 int res;
97
98 if (ge == NULL) {
99 *result = NULL;
100 return (0);
101 }
102
103 res = copy_group(ge, gptr, buf, buflen);
104 *result = res ? NULL : gptr;
105 return (res);
106 }
107
108 #ifdef POSIX_GETGRGID_R
109 struct group *
110 getgrgid_r(gid_t gid, struct group *gptr,
111 char *buf, int buflen) {
112 struct group *ge = getgrgid(gid);
113 int res;
114
115 if (ge == NULL)
116 return (NULL);
117
118 res = copy_group(ge, gptr, buf, buflen);
119 return (res ? NULL : gptr);
120 }
121 #endif
122
123 /*%
124 * These assume a single context is in operation per thread.
125 * If this is not the case we will need to call irs directly
126 * rather than through the base functions.
127 */
128
129 GROUP_R_RETURN
130 getgrent_r(struct group *gptr, GROUP_R_ARGS) {
131 struct group *ge = getgrent();
132 int res;
133
134 if (ge == NULL) {
135 return (GROUP_R_BAD);
136 }
137
138 res = copy_group(ge, gptr, buf, buflen);
139 return (res ? GROUP_R_BAD : GROUP_R_OK);
140 }
141
142 GROUP_R_SET_RETURN
143 setgrent_r(GROUP_R_ENT_ARGS) {
144
145 setgrent();
146 #ifdef GROUP_R_SET_RESULT
147 return (GROUP_R_SET_RESULT);
148 #endif
149 }
150
151 GROUP_R_END_RETURN
152 endgrent_r(GROUP_R_ENT_ARGS) {
153
154 endgrent();
155 GROUP_R_END_RESULT(GROUP_R_OK);
156 }
157
158
159 #if 0
160 /* XXX irs does not have a fgetgrent() */
161 GROUP_R_RETURN
162 fgetgrent_r(FILE *f, struct group *gptr, GROUP_R_ARGS) {
163 struct group *ge = fgetgrent(f);
164 int res;
165
166 if (ge == NULL)
167 return (GROUP_R_BAD);
168
169 res = copy_group(ge, gptr, buf, buflen);
170 return (res ? GROUP_R_BAD : GROUP_R_OK);
171 }
172 #endif
173
174 /* Private */
175
176 static int
177 copy_group(struct group *ge, struct group *gptr, char *buf, int buflen) {
178 char *cp;
179 int i, n;
180 int numptr, len;
181
182 /* Find out the amount of space required to store the answer. */
183 numptr = 1; /*%< NULL ptr */
184 len = (char *)ALIGN(buf) - buf;
185 for (i = 0; ge->gr_mem[i]; i++, numptr++) {
186 len += strlen(ge->gr_mem[i]) + 1;
187 }
188 len += strlen(ge->gr_name) + 1;
189 len += strlen(ge->gr_passwd) + 1;
190 len += numptr * sizeof(char*);
191
192 if (len > buflen) {
193 errno = ERANGE;
194 return (ERANGE);
195 }
196
197 /* copy group id */
198 gptr->gr_gid = ge->gr_gid;
199
200 cp = (char *)ALIGN(buf) + numptr * sizeof(char *);
201
202 /* copy official name */
203 n = strlen(ge->gr_name) + 1;
204 strcpy(cp, ge->gr_name);
205 gptr->gr_name = cp;
206 cp += n;
207
208 /* copy member list */
209 gptr->gr_mem = (char **)ALIGN(buf);
210 for (i = 0 ; ge->gr_mem[i]; i++) {
211 n = strlen(ge->gr_mem[i]) + 1;
212 strcpy(cp, ge->gr_mem[i]);
213 gptr->gr_mem[i] = cp;
214 cp += n;
215 }
216 gptr->gr_mem[i] = NULL;
217
218 /* copy password */
219 n = strlen(ge->gr_passwd) + 1;
220 strcpy(cp, ge->gr_passwd);
221 gptr->gr_passwd = cp;
222 cp += n;
223
224 return (0);
225 }
226 #else /* GROUP_R_RETURN */
227 static int getgrent_r_unknown_system = 0;
228 #endif /* GROUP_R_RETURN */
229 #endif /* !def(_REENTRANT) || !def(DO_PTHREADS) || !def(WANT_IRS_PW) */
230 /*! \file */
231