update from main arcive 961210
[glibc.git] / nis / nss_nis / nis-proto.c
blobf62dfb1492c0b4dd621b022151b70b310a89e6de
1 /* Copyright (C) 1996 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 <libc-lock.h>
26 #include <rpcsvc/yp.h>
27 #include <rpcsvc/ypclnt.h>
29 #include "nss-nis.h"
31 __libc_lock_define_initialized (static, lock)
33 static bool_t new_start = 1;
34 static char *oldkey = NULL;
35 static int oldkeylen = 0;
37 enum nss_status
38 _nss_nis_setprotoent (void)
40 __libc_lock_lock (lock);
42 new_start = 1;
43 if (oldkey != NULL)
45 free (oldkey);
46 oldkey = NULL;
47 oldkeylen = 0;
50 __libc_lock_unlock (lock);
52 return NSS_STATUS_SUCCESS;
55 enum nss_status
56 _nss_nis_endprotoent (void)
58 __libc_lock_lock (lock);
60 new_start = 1;
61 if (oldkey != NULL)
63 free (oldkey);
64 oldkey = NULL;
65 oldkeylen = 0;
68 __libc_lock_unlock (lock);
70 return NSS_STATUS_SUCCESS;
73 static enum nss_status
74 internal_nis_getprotoent_r (struct protoent *proto,
75 char *buffer, size_t buflen)
77 char *domain, *result, *outkey;
78 int len, keylen, parse_res;
80 if (yp_get_default_domain (&domain))
81 return NSS_STATUS_UNAVAIL;
83 /* Get the next entry until we found a correct one. */
86 enum nss_status retval;
87 char *p;
89 if (new_start)
90 retval = yperr2nss (yp_first (domain, "protocols.bynumber",
91 &outkey, &keylen, &result, &len));
92 else
93 retval = yperr2nss ( yp_next (domain, "protocols.bynumber",
94 oldkey, oldkeylen,
95 &outkey, &keylen, &result, &len));
97 if (retval != NSS_STATUS_SUCCESS)
99 if (retval == NSS_STATUS_TRYAGAIN)
100 __set_errno (EAGAIN);
101 return retval;
104 if (len + 1 > buflen)
106 free (result);
107 __set_errno (ERANGE);
108 return NSS_STATUS_TRYAGAIN;
111 p = strncpy (buffer, result, len);
112 buffer[len] = '\0';
113 while (isspace (*p))
114 ++p;
115 free (result);
117 parse_res = _nss_files_parse_protoent (p, proto, buffer, buflen);
118 if (!parse_res && errno == ERANGE)
119 return NSS_STATUS_TRYAGAIN;
121 free (oldkey);
122 oldkey = outkey;
123 oldkeylen = keylen;
124 new_start = 0;
126 while (!parse_res);
128 return NSS_STATUS_SUCCESS;
131 enum nss_status
132 _nss_nis_getprotoent_r (struct protoent *proto, char *buffer, size_t buflen)
134 enum nss_status status;
136 __libc_lock_lock (lock);
138 status = internal_nis_getprotoent_r (proto, buffer, buflen);
140 __libc_lock_unlock (lock);
142 return status;
145 enum nss_status
146 _nss_nis_getprotobyname_r (const char *name, struct protoent *proto,
147 char *buffer, size_t buflen)
149 enum nss_status retval;
150 char *domain, *result, *p;
151 int len, parse_res;
153 if (name == NULL)
155 __set_errno (EINVAL);
156 return NSS_STATUS_UNAVAIL;
159 if (yp_get_default_domain (&domain))
160 return NSS_STATUS_UNAVAIL;
162 retval = yperr2nss (yp_match (domain, "protocols.byname", name,
163 strlen (name), &result, &len));
165 if (retval != NSS_STATUS_SUCCESS)
167 if (retval == NSS_STATUS_TRYAGAIN)
168 __set_errno (EAGAIN);
169 return retval;
172 if (len + 1 > buflen)
174 free (result);
175 __set_errno (ERANGE);
176 return NSS_STATUS_TRYAGAIN;
179 p = strncpy (buffer, result, len);
180 buffer[len] = '\0';
181 while (isspace (*p))
182 ++p;
183 free (result);
185 parse_res = _nss_files_parse_protoent (p, proto, buffer, buflen);
187 if (!parse_res)
189 if (errno == ERANGE)
190 return NSS_STATUS_TRYAGAIN;
191 else
192 return NSS_STATUS_NOTFOUND;
194 else
195 return NSS_STATUS_SUCCESS;
198 enum nss_status
199 _nss_nis_getprotobynumber_r (int number, struct protoent *proto,
200 char *buffer, size_t buflen)
202 enum nss_status retval;
203 char *domain, *result, *p;
204 int len, nlen, parse_res;
205 char buf[32];
207 if (yp_get_default_domain (&domain))
208 return NSS_STATUS_UNAVAIL;
210 nlen = sprintf (buf, "%d", number);
212 retval = yperr2nss (yp_match (domain, "protocols.bynumber", buf,
213 nlen, &result, &len));
215 if (retval != NSS_STATUS_SUCCESS)
217 if (retval == NSS_STATUS_TRYAGAIN)
218 __set_errno (EAGAIN);
219 return retval;
222 if (len + 1 > buflen)
224 free (result);
225 __set_errno (ERANGE);
226 return NSS_STATUS_TRYAGAIN;
229 p = strncpy (buffer, result, len);
230 buffer[len] = '\0';
231 while (isspace (*p))
232 ++p;
233 free (result);
235 parse_res = _nss_files_parse_protoent (p, proto, buffer, buflen);
237 if (!parse_res)
239 if (errno == ERANGE)
240 return NSS_STATUS_TRYAGAIN;
241 else
242 return NSS_STATUS_NOTFOUND;
244 else
245 return NSS_STATUS_SUCCESS;