1 /* Copyright (C) 1998-2015 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Thorsten Kukuk <kukuk@suse.de>, 1998.
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.
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.
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/>. */
27 #include <rpcsvc/yp.h>
28 #include <rpcsvc/ypclnt.h>
29 #include <sys/param.h>
34 /* Get the declaration of the parser function. */
36 #define STRUCTURE group
38 #include <nss/nss_files/files-parse.c>
41 static enum nss_status
42 internal_setgrent (char *domainname
, intern_t
*intern
)
44 struct ypall_callback ypcb
;
45 enum nss_status status
;
47 ypcb
.foreach
= _nis_saveit
;
48 ypcb
.data
= (char *) intern
;
49 status
= yperr2nss (yp_all (domainname
, "group.byname", &ypcb
));
51 /* Mark the last buffer as full. */
52 if (intern
->next
!= NULL
)
53 intern
->next
->size
= intern
->offset
;
55 intern
->next
= intern
->start
;
62 static enum nss_status
63 internal_getgrent_r (struct group
*grp
, char *buffer
, size_t buflen
,
64 int *errnop
, intern_t
*intern
)
66 if (intern
->start
== NULL
)
67 return NSS_STATUS_NOTFOUND
;
69 /* Get the next entry until we found a correct one. */
73 struct response_t
*bucket
= intern
->next
;
75 if (__glibc_unlikely (intern
->offset
>= bucket
->size
))
77 if (bucket
->next
== NULL
)
78 return NSS_STATUS_NOTFOUND
;
80 /* We look at all the content in the current bucket. Go on
82 bucket
= intern
->next
= bucket
->next
;
87 for (p
= &bucket
->mem
[intern
->offset
]; isspace (*p
); ++p
)
90 size_t len
= strlen (p
) + 1;
91 if (__glibc_unlikely (len
> buflen
))
94 return NSS_STATUS_TRYAGAIN
;
97 /* We unfortunately have to copy the data in the user-provided
98 buffer because that buffer might be around for a very long
99 time and the servent structure must remain valid. If we would
100 rely on the BUCKET memory the next 'setservent' or 'endservent'
101 call would destroy it.
103 The important thing is that it is a single NUL-terminated
104 string. This is what the parsing routine expects. */
105 p
= memcpy (buffer
, &bucket
->mem
[intern
->offset
], len
);
107 parse_res
= _nss_files_parse_grent (p
, grp
, (void *) buffer
, buflen
,
109 if (__glibc_unlikely (parse_res
== -1))
110 return NSS_STATUS_TRYAGAIN
;
112 intern
->offset
+= len
;
116 return NSS_STATUS_SUCCESS
;
121 get_uid (const char *user
, uid_t
*uidp
)
123 size_t buflen
= sysconf (_SC_GETPW_R_SIZE_MAX
);
124 char *buf
= (char *) alloca (buflen
);
128 struct passwd result
;
131 int r
= getpwnam_r (user
, &result
, buf
, buflen
, &resp
);
132 if (r
== 0 && resp
!= NULL
)
134 *uidp
= resp
->pw_uid
;
141 buf
= extend_alloca (buf
, buflen
, 2 * buflen
);
148 static enum nss_status
149 initgroups_netid (uid_t uid
, gid_t group
, long int *start
, long int *size
,
150 gid_t
**groupsp
, long int limit
, int *errnop
,
151 const char *domainname
)
153 /* Limit domainname length to the maximum size of an RPC packet. */
154 if (strlen (domainname
) > UDPMSGSIZE
)
157 return NSS_STATUS_UNAVAIL
;
160 /* Prepare the key. The form is "unix.UID@DOMAIN" with the UID and
161 DOMAIN field filled in appropriately. */
162 char key
[sizeof ("unix.@") + sizeof (uid_t
) * 3 + strlen (domainname
)];
163 ssize_t keylen
= snprintf (key
, sizeof (key
), "unix.%lu@%s",
164 (unsigned long int) uid
, domainname
);
168 int yperr
= yp_match (domainname
, "netid.byname", key
, keylen
, &result
,
170 if (__glibc_unlikely (yperr
!= YPERR_SUCCESS
))
171 return yperr2nss (yperr
);
173 /* Parse the result: following the colon is a comma separated list of
175 char *cp
= strchr (result
, ':');
180 return NSS_STATUS_NOTFOUND
;
182 /* Skip the colon. */
185 gid_t
*groups
= *groupsp
;
189 unsigned long int gid
= strtoul (cp
, &endp
, 0);
194 else if (*endp
!= '\0')
199 /* We do not need this group again. */
202 /* Insert this group. */
205 /* Need a bigger buffer. */
208 if (limit
> 0 && *size
== limit
)
209 /* We reached the maximum. */
215 newsize
= MIN (limit
, 2 * *size
);
217 gid_t
*newgroups
= realloc (groups
, newsize
* sizeof (*groups
));
218 if (newgroups
== NULL
)
220 *groupsp
= groups
= newgroups
;
224 groups
[*start
] = gid
;
230 return NSS_STATUS_SUCCESS
;
235 _nss_nis_initgroups_dyn (const char *user
, gid_t group
, long int *start
,
236 long int *size
, gid_t
**groupsp
, long int limit
,
239 /* We always need the domain name. */
241 if (yp_get_default_domain (&domainname
))
242 return NSS_STATUS_UNAVAIL
;
244 /* Check whether we are supposed to use the netid.byname map. */
245 if (_nsl_default_nss () & NSS_FLAG_NETID_AUTHORITATIVE
)
247 /* We need the user ID. */
250 if (get_uid (user
, &uid
) == 0
251 && initgroups_netid (uid
, group
, start
, size
, groupsp
, limit
,
252 errnop
, domainname
) == NSS_STATUS_SUCCESS
)
253 return NSS_STATUS_SUCCESS
;
256 struct group grpbuf
, *g
;
257 size_t buflen
= sysconf (_SC_GETPW_R_SIZE_MAX
);
259 enum nss_status status
;
260 intern_t intern
= { NULL
, NULL
, 0 };
261 gid_t
*groups
= *groupsp
;
263 status
= internal_setgrent (domainname
, &intern
);
264 if (status
!= NSS_STATUS_SUCCESS
)
267 tmpbuf
= __alloca (buflen
);
272 internal_getgrent_r (&grpbuf
, tmpbuf
, buflen
, errnop
,
273 &intern
)) == NSS_STATUS_TRYAGAIN
274 && *errnop
== ERANGE
)
275 tmpbuf
= extend_alloca (tmpbuf
, buflen
, 2 * buflen
);
277 if (status
!= NSS_STATUS_SUCCESS
)
282 if (g
->gr_gid
!= group
)
286 for (m
= g
->gr_mem
; *m
!= NULL
; ++m
)
287 if (strcmp (*m
, user
) == 0)
289 /* Matches user. Insert this group. */
292 /* Need a bigger buffer. */
296 if (limit
> 0 && *size
== limit
)
297 /* We reached the maximum. */
303 newsize
= MIN (limit
, 2 * *size
);
305 newgroups
= realloc (groups
, newsize
* sizeof (*groups
));
306 if (newgroups
== NULL
)
308 *groupsp
= groups
= newgroups
;
312 groups
[*start
] = g
->gr_gid
;
319 while (status
== NSS_STATUS_SUCCESS
);
322 while (intern
.start
!= NULL
)
324 intern
.next
= intern
.start
;
325 intern
.start
= intern
.start
->next
;