1/* Copyright (C) 1996-2017 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Thorsten Kukuk <kukuk@suse.de>, 1996.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
18
19#include <ctype.h>
20#include <errno.h>
21#include <grp.h>
22#include <nss.h>
23#include <string.h>
24#include <libc-lock.h>
25#include <rpcsvc/yp.h>
26#include <rpcsvc/ypclnt.h>
27
28#include "nss-nis.h"
29#include <libnsl.h>
30
31/* Get the declaration of the parser function. */
32#define ENTNAME grent
33#define STRUCTURE group
34#define EXTERN_PARSER
35#include <nss/nss_files/files-parse.c>
36
37/* Protect global state against multiple changers */
38__libc_lock_define_initialized (static, lock)
39
40static bool_t new_start = 1;
41static char *oldkey;
42static int oldkeylen;
43static intern_t intern;
44
45
46static void
47internal_nis_endgrent (void)
48{
49 new_start = 1;
50 if (oldkey != NULL)
51 {
52 free (oldkey);
53 oldkey = NULL;
54 oldkeylen = 0;
55 }
56
57 struct response_t *curr = intern.start;
58
59 while (curr != NULL)
60 {
61 struct response_t *last = curr;
62 curr = curr->next;
63 free (last);
64 }
65
66 intern.next = intern.start = NULL;
67}
68
69
70enum nss_status
71_nss_nis_endgrent (void)
72{
73 __libc_lock_lock (lock);
74
75 internal_nis_endgrent ();
76
77 __libc_lock_unlock (lock);
78
79 return NSS_STATUS_SUCCESS;
80}
81
82
83enum nss_status
84internal_nis_setgrent (void)
85{
86 /* We have to read all the data now. */
87 char *domain;
88 if (__glibc_unlikely (yp_get_default_domain (&domain)))
89 return NSS_STATUS_UNAVAIL;
90
91 struct ypall_callback ypcb;
92
93 ypcb.foreach = _nis_saveit;
94 ypcb.data = (char *) &intern;
95 enum nss_status status = yperr2nss (yp_all (domain, "group.byname", &ypcb));
96
97
98 /* Mark the last buffer as full. */
99 if (intern.next != NULL)
100 intern.next->size = intern.offset;
101
102 intern.next = intern.start;
103 intern.offset = 0;
104
105 return status;
106}
107
108
109enum nss_status
110_nss_nis_setgrent (int stayopen)
111{
112 enum nss_status result = NSS_STATUS_SUCCESS;
113
114 __libc_lock_lock (lock);
115
116 internal_nis_endgrent ();
117
118 if (_nsl_default_nss () & NSS_FLAG_SETENT_BATCH_READ)
119 result = internal_nis_setgrent ();
120
121 __libc_lock_unlock (lock);
122
123 return result;
124}
125
126
127static enum nss_status
128internal_nis_getgrent_r (struct group *grp, char *buffer, size_t buflen,
129 int *errnop)
130{
131 /* If we read the entire database at setpwent time we just iterate
132 over the data we have in memory. */
133 bool batch_read = intern.start != NULL;
134
135 char *domain = NULL;
136 if (!batch_read && __builtin_expect (yp_get_default_domain (&domain), 0))
137 return NSS_STATUS_UNAVAIL;
138
139 /* Get the next entry until we found a correct one. */
140 int parse_res;
141 do
142 {
143 char *result;
144 char *outkey;
145 int len;
146 int keylen;
147
148 if (batch_read)
149 {
150 struct response_t *bucket;
151
152 handle_batch_read:
153 bucket = intern.next;
154
155 if (__glibc_unlikely (intern.offset >= bucket->size))
156 {
157 if (bucket->next == NULL)
158 return NSS_STATUS_NOTFOUND;
159
160 /* We look at all the content in the current bucket. Go on
161 to the next. */
162 bucket = intern.next = bucket->next;
163 intern.offset = 0;
164 }
165
166 for (result = &bucket->mem[intern.offset]; isspace (*result);
167 ++result)
168 ++intern.offset;
169
170 len = strlen (result);
171 }
172 else
173 {
174 int yperr;
175
176 if (new_start)
177 {
178 /* Maybe we should read the database in one piece. */
179 if ((_nsl_default_nss () & NSS_FLAG_SETENT_BATCH_READ)
180 && internal_nis_setgrent () == NSS_STATUS_SUCCESS
181 && intern.start != NULL)
182 {
183 batch_read = true;
184 goto handle_batch_read;
185 }
186
187 yperr = yp_first (domain, "group.byname", &outkey, &keylen,
188 &result, &len);
189 }
190 else
191 yperr = yp_next (domain, "group.byname", oldkey, oldkeylen,
192 &outkey, &keylen, &result, &len);
193
194 if (__glibc_unlikely (yperr != YPERR_SUCCESS))
195 {
196 enum nss_status retval = yperr2nss (yperr);
197
198 if (retval == NSS_STATUS_TRYAGAIN)
199 *errnop = errno;
200 return retval;
201 }
202 }
203
204 if (__glibc_unlikely ((size_t) (len + 1) > buflen))
205 {
206 if (!batch_read)
207 free (result);
208 *errnop = ERANGE;
209 return NSS_STATUS_TRYAGAIN;
210 }
211
212 char *p = strncpy (buffer, result, len);
213 buffer[len] = '\0';
214 while (isspace (*p))
215 ++p;
216 if (!batch_read)
217 free (result);
218
219 parse_res = _nss_files_parse_grent (p, grp, (void *) buffer, buflen,
220 errnop);
221 if (__glibc_unlikely (parse_res == -1))
222 {
223 if (!batch_read)
224 free (outkey);
225 *errnop = ERANGE;
226 return NSS_STATUS_TRYAGAIN;
227 }
228
229 if (batch_read)
230 intern.offset += len + 1;
231 else
232 {
233 free (oldkey);
234 oldkey = outkey;
235 oldkeylen = keylen;
236 new_start = 0;
237 }
238 }
239 while (parse_res < 1);
240
241 return NSS_STATUS_SUCCESS;
242}
243
244enum nss_status
245_nss_nis_getgrent_r (struct group *result, char *buffer, size_t buflen,
246 int *errnop)
247{
248 int status;
249
250 __libc_lock_lock (lock);
251
252 status = internal_nis_getgrent_r (result, buffer, buflen, errnop);
253
254 __libc_lock_unlock (lock);
255
256 return status;
257}
258
259enum nss_status
260_nss_nis_getgrnam_r (const char *name, struct group *grp,
261 char *buffer, size_t buflen, int *errnop)
262{
263 if (name == NULL)
264 {
265 *errnop = EINVAL;
266 return NSS_STATUS_UNAVAIL;
267 }
268
269 char *domain;
270 if (__glibc_unlikely (yp_get_default_domain (&domain)))
271 return NSS_STATUS_UNAVAIL;
272
273 char *result;
274 int len;
275 int yperr = yp_match (domain, "group.byname", name, strlen (name), &result,
276 &len);
277
278 if (__glibc_unlikely (yperr != YPERR_SUCCESS))
279 {
280 enum nss_status retval = yperr2nss (yperr);
281
282 if (retval == NSS_STATUS_TRYAGAIN)
283 *errnop = errno;
284 return retval;
285 }
286
287 if (__glibc_unlikely ((size_t) (len + 1) > buflen))
288 {
289 free (result);
290 *errnop = ERANGE;
291 return NSS_STATUS_TRYAGAIN;
292 }
293
294 char *p = strncpy (buffer, result, len);
295 buffer[len] = '\0';
296 while (isspace (*p))
297 ++p;
298 free (result);
299
300 int parse_res = _nss_files_parse_grent (p, grp, (void *) buffer, buflen,
301 errnop);
302 if (__builtin_expect (parse_res < 1, 0))
303 {
304 if (parse_res == -1)
305 return NSS_STATUS_TRYAGAIN;
306 else
307 return NSS_STATUS_NOTFOUND;
308 }
309 return NSS_STATUS_SUCCESS;
310}
311
312enum nss_status
313_nss_nis_getgrgid_r (gid_t gid, struct group *grp,
314 char *buffer, size_t buflen, int *errnop)
315{
316 char *domain;
317 if (__glibc_unlikely (yp_get_default_domain (&domain)))
318 return NSS_STATUS_UNAVAIL;
319
320 char buf[32];
321 int nlen = sprintf (buf, "%lu", (unsigned long int) gid);
322
323 char *result;
324 int len;
325 int yperr = yp_match (domain, "group.bygid", buf, nlen, &result, &len);
326
327 if (__glibc_unlikely (yperr != YPERR_SUCCESS))
328 {
329 enum nss_status retval = yperr2nss (yperr);
330
331 if (retval == NSS_STATUS_TRYAGAIN)
332 *errnop = errno;
333 return retval;
334 }
335
336 if (__glibc_unlikely ((size_t) (len + 1) > buflen))
337 {
338 free (result);
339 *errnop = ERANGE;
340 return NSS_STATUS_TRYAGAIN;
341 }
342
343 char *p = strncpy (buffer, result, len);
344 buffer[len] = '\0';
345 while (isspace (*p))
346 ++p;
347 free (result);
348
349 int parse_res = _nss_files_parse_grent (p, grp, (void *) buffer, buflen,
350 errnop);
351 if (__glibc_unlikely (parse_res < 1))
352 {
353 if (parse_res == -1)
354 return NSS_STATUS_TRYAGAIN;
355 else
356 return NSS_STATUS_NOTFOUND;
357 }
358 return NSS_STATUS_SUCCESS;
359}
360