Update.
[glibc.git] / nis / nss_nis / nis-rpc.c
blob3be99496e442ad72c251df6df303d2219cfd2fdb
1 /* Copyright (C) 1996, 1997 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1996.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 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 Library General Public License for more details.
15 You should have received a copy of the GNU Library General Public
16 License along with the GNU C Library; see the file COPYING.LIB. If not,
17 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA. */
20 #include <nss.h>
21 #include <netdb.h>
22 #include <ctype.h>
23 #include <errno.h>
24 #include <string.h>
25 #include <bits/libc-lock.h>
26 #include <rpcsvc/yp.h>
27 #include <rpcsvc/ypclnt.h>
29 #include "nss-nis.h"
31 /* Get the declaration of the parser function. */
32 #define ENTNAME rpcent
33 #define EXTERN_PARSER
34 #include <nss/nss_files/files-parse.c>
36 __libc_lock_define_initialized (static, lock)
38 struct response_t
40 char *val;
41 struct response_t *next;
44 struct intern_t
46 struct response_t *start;
47 struct response_t *next;
49 typedef struct intern_t intern_t;
51 static intern_t intern = {NULL, NULL};
53 static int
54 saveit (int instatus, char *inkey, int inkeylen, char *inval,
55 int invallen, char *indata)
57 intern_t *intern = (intern_t *)indata;
59 if (instatus != YP_TRUE)
60 return instatus;
62 if (inkey && inkeylen > 0 && inval && invallen > 0)
64 if (intern->start == NULL)
66 intern->start = malloc (sizeof (struct response_t));
67 intern->next = intern->start;
69 else
71 intern->next->next = malloc (sizeof (struct response_t));
72 intern->next = intern->next->next;
74 intern->next->next = NULL;
75 intern->next->val = malloc (invallen + 1);
76 strncpy (intern->next->val, inval, invallen);
77 intern->next->val[invallen] = '\0';
80 return 0;
83 static enum nss_status
84 internal_nis_setrpcent (intern_t *intern)
86 char *domainname;
87 struct ypall_callback ypcb;
88 enum nss_status status;
90 if (yp_get_default_domain (&domainname))
91 return NSS_STATUS_UNAVAIL;
93 while (intern->start != NULL)
95 if (intern->start->val != NULL)
96 free (intern->start->val);
97 intern->next = intern->start;
98 intern->start = intern->start->next;
99 free (intern->next);
101 intern->start = NULL;
103 ypcb.foreach = saveit;
104 ypcb.data = (char *)intern;
105 status = yperr2nss (yp_all(domainname, "rpc.bynumber", &ypcb));
106 intern->next = intern->start;
108 return status;
111 enum nss_status
112 _nss_nis_setrpcent (void)
114 enum nss_status status;
116 __libc_lock_lock (lock);
118 status = internal_nis_setrpcent (&intern);
120 __libc_lock_unlock (lock);
122 return status;
125 static enum nss_status
126 internal_nis_endrpcent (intern_t *intern)
128 while (intern->start != NULL)
130 if (intern->start->val != NULL)
131 free (intern->start->val);
132 intern->next = intern->start;
133 intern->start = intern->start->next;
134 free (intern->next);
136 intern->start = NULL;
138 return NSS_STATUS_SUCCESS;
141 enum nss_status
142 _nss_nis_endrpcent (void)
144 enum nss_status status;
146 __libc_lock_lock (lock);
148 status = internal_nis_endrpcent (&intern);
150 __libc_lock_unlock (lock);
152 return status;
155 static enum nss_status
156 internal_nis_getrpcent_r (struct rpcent *rpc, char *buffer, size_t buflen,
157 int *errnop, intern_t *data)
159 struct parser_data *pdata = (void *) buffer;
160 int parse_res;
161 char *p;
163 if (data->start == NULL)
164 internal_nis_setrpcent (data);
166 /* Get the next entry until we found a correct one. */
169 if (data->next == NULL)
170 return NSS_STATUS_NOTFOUND;
171 p = strncpy (buffer, data->next->val, buflen);
172 while (isspace (*p))
173 ++p;
175 parse_res = _nss_files_parse_rpcent (p, rpc, pdata, buflen, errnop);
176 if (parse_res == -1)
177 return NSS_STATUS_TRYAGAIN;
178 data->next = data->next->next;
180 while (!parse_res);
182 return NSS_STATUS_SUCCESS;
185 enum nss_status
186 _nss_nis_getrpcent_r (struct rpcent *rpc, char *buffer, size_t buflen,
187 int *errnop)
189 enum nss_status status;
191 __libc_lock_lock (lock);
193 status = internal_nis_getrpcent_r (rpc, buffer, buflen, errnop, &intern);
195 __libc_lock_unlock (lock);
197 return status;
200 enum nss_status
201 _nss_nis_getrpcbyname_r (const char *name, struct rpcent *rpc,
202 char *buffer, size_t buflen, int *errnop)
204 intern_t data = {NULL, NULL};
205 enum nss_status status;
206 int found;
208 if (name == NULL)
210 __set_errno (EINVAL);
211 return NSS_STATUS_UNAVAIL;
214 status = internal_nis_setrpcent (&data);
215 if (status != NSS_STATUS_SUCCESS)
216 return status;
218 found = 0;
219 while (!found &&
220 ((status = internal_nis_getrpcent_r (rpc, buffer, buflen, errnop,
221 &data)) == NSS_STATUS_SUCCESS))
223 if (strcmp (rpc->r_name, name) == 0)
224 found = 1;
225 else
227 int i = 0;
229 while (rpc->r_aliases[i] != NULL)
231 if (strcmp (rpc->r_aliases[i], name) == 0)
233 found = 1;
234 break;
236 else
237 ++i;
242 internal_nis_endrpcent (&data);
244 if (!found && status == NSS_STATUS_SUCCESS)
245 return NSS_STATUS_NOTFOUND;
246 else
247 return status;
250 enum nss_status
251 _nss_nis_getrpcbynumber_r (int number, struct rpcent *rpc,
252 char *buffer, size_t buflen, int *errnop)
254 struct parser_data *data = (void *) buffer;
255 enum nss_status retval;
256 char *domain, *result, *p;
257 int len, nlen, parse_res;
258 char buf[32];
260 if (yp_get_default_domain (&domain))
261 return NSS_STATUS_UNAVAIL;
263 nlen = sprintf (buf, "%d", number);
265 retval = yperr2nss (yp_match (domain, "rpc.bynumber", buf,
266 nlen, &result, &len));
268 if (retval != NSS_STATUS_SUCCESS)
270 if (retval == NSS_STATUS_TRYAGAIN)
271 *errnop = errno;
272 return retval;
275 if ((size_t) (len + 1) > buflen)
277 free (result);
278 *errnop = ERANGE;
279 return NSS_STATUS_TRYAGAIN;
282 p = strncpy (buffer, result, len);
283 buffer[len] = '\0';
284 while (isspace (*p))
285 ++p;
286 free (result);
288 parse_res = _nss_files_parse_rpcent (p, rpc, data, buflen, errnop);
290 if (parse_res < 1)
292 if (parse_res == -1)
293 return NSS_STATUS_TRYAGAIN;
294 else
295 return NSS_STATUS_NOTFOUND;
297 else
298 return NSS_STATUS_SUCCESS;