Use addr, not p for inet_pton call.
[kopensolaris-gnu/glibc.git] / nis / nss_nis / nis-network.c
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.
4
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.
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    Library General Public License for more details.
14
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.  */
19
20 #include <nss.h>
21 #include <netdb.h>
22 #include <ctype.h>
23 #include <errno.h>
24 #include <string.h>
25 #include <netinet/in.h>
26 #include <arpa/inet.h>
27 #include <libc-lock.h>
28 #include <rpcsvc/yp.h>
29 #include <rpcsvc/ypclnt.h>
30
31 #include "nss-nis.h"
32
33 /* Get the declaration of the parser function.  */
34 #define ENTNAME netent
35 #define EXTERN_PARSER
36 #include <nss/nss_files/files-parse.c>
37
38 __libc_lock_define_initialized (static, lock)
39
40 static bool_t new_start = 1;
41 static char *oldkey = NULL;
42 static int oldkeylen = 0;
43
44 enum nss_status
45 _nss_nis_setnetent (void)
46 {
47   __libc_lock_lock (lock);
48
49   new_start = 1;
50   if (oldkey != NULL)
51     {
52       free (oldkey);
53       oldkey = NULL;
54       oldkeylen = 0;
55     }
56
57   __libc_lock_unlock (lock);
58
59   return NSS_STATUS_SUCCESS;
60 }
61
62 enum nss_status
63 _nss_nis_endnetent (void)
64 {
65   __libc_lock_lock (lock);
66
67   new_start = 1;
68   if (oldkey != NULL)
69     {
70       free (oldkey);
71       oldkey = NULL;
72       oldkeylen = 0;
73     }
74
75   __libc_lock_unlock (lock);
76
77   return NSS_STATUS_SUCCESS;
78 }
79
80 static enum nss_status
81 internal_nis_getnetent_r (struct netent *net, char *buffer, size_t buflen,
82                           int *herrnop)
83 {
84   struct parser_data *data = (void *) buffer;
85   char *domain, *result, *outkey;
86   int len, keylen, parse_res;
87
88   if (yp_get_default_domain (&domain))
89     return NSS_STATUS_UNAVAIL;
90
91   /* Get the next entry until we found a correct one. */
92   do
93     {
94       enum nss_status retval;
95       char *p;
96
97       if (new_start)
98         retval = yperr2nss (yp_first (domain, "networks.byname",
99                                       &outkey, &keylen, &result, &len));
100       else
101         retval = yperr2nss ( yp_next (domain, "networks.byname",
102                                       oldkey, oldkeylen,
103                                       &outkey, &keylen, &result, &len));
104
105       if (retval != NSS_STATUS_SUCCESS)
106         {
107           if (retval == NSS_STATUS_TRYAGAIN)
108             {
109               *herrnop = NETDB_INTERNAL;
110               __set_errno (EAGAIN);
111             }
112           return retval;
113         }
114
115       if ((size_t) (len + 1) > buflen)
116         {
117           free (result);
118           __set_errno (ERANGE);
119           *herrnop = NETDB_INTERNAL;
120           return NSS_STATUS_TRYAGAIN;
121         }
122
123       p = strncpy (buffer, result, len);
124       buffer[len] = '\0';
125       while (isspace (*p))
126         ++p;
127       free (result);
128
129       parse_res = _nss_files_parse_netent (p, net, data, buflen);
130       if (!parse_res && errno == ERANGE)
131         {
132           *herrnop = NETDB_INTERNAL;
133           return NSS_STATUS_TRYAGAIN;
134         }
135
136       free (oldkey);
137       oldkey = outkey;
138       oldkeylen = keylen;
139       new_start = 0;
140     }
141   while (!parse_res);
142
143   return NSS_STATUS_SUCCESS;
144 }
145
146 enum nss_status
147 _nss_nis_getnetent_r (struct netent *net, char *buffer, size_t buflen,
148                       int *herrnop)
149 {
150   enum nss_status status;
151
152   __libc_lock_lock (lock);
153
154   status = internal_nis_getnetent_r (net, buffer, buflen, herrnop);
155
156   __libc_lock_unlock (lock);
157
158   return status;
159 }
160
161 enum nss_status
162 _nss_nis_getnetbyname_r (const char *name, struct netent *net,
163                          char *buffer, size_t buflen, int *herrnop)
164 {
165   enum nss_status retval;
166   struct parser_data *data = (void *) buffer;
167   char *domain, *result, *p;
168   int len, parse_res;
169
170   if (name == NULL)
171     {
172       __set_errno (EINVAL);
173       *herrnop = NETDB_INTERNAL;
174       return NSS_STATUS_UNAVAIL;
175     }
176
177   if (yp_get_default_domain (&domain))
178     return NSS_STATUS_UNAVAIL;
179
180   retval = yperr2nss (yp_match (domain, "networks.byname", name,
181                                 strlen (name), &result, &len));
182
183   if (retval != NSS_STATUS_SUCCESS)
184     {
185       if (retval == NSS_STATUS_TRYAGAIN)
186         {
187           __set_errno (EAGAIN);
188           *herrnop = NETDB_INTERNAL;
189         }
190       return retval;
191     }
192
193   if ((size_t) (len + 1) > buflen)
194     {
195       free (result);
196       __set_errno (ERANGE);
197       *herrnop = NETDB_INTERNAL;
198       return NSS_STATUS_TRYAGAIN;
199     }
200
201   p = strncpy (buffer, result, len);
202   buffer[len] = '\0';
203   while (isspace (*p))
204     ++p;
205   free (result);
206
207   parse_res = _nss_files_parse_netent (p, net, data, buflen);
208
209   if (!parse_res)
210     {
211       *herrnop = NETDB_INTERNAL;
212       if (errno == ERANGE)
213         return NSS_STATUS_TRYAGAIN;
214       else
215         return NSS_STATUS_NOTFOUND;
216     }
217   else
218     return NSS_STATUS_SUCCESS;
219 }
220
221 enum nss_status
222 _nss_nis_getnetbyaddr_r (unsigned long addr, int type, struct netent *net,
223                          char *buffer, size_t buflen, int *herrnop)
224 {
225   struct parser_data *data = (void *) buffer;
226   char *domain;
227   char *result;
228   int len;
229   char buf[256];
230   int blen;
231   struct in_addr in;
232   char *p;
233
234   if (yp_get_default_domain (&domain))
235     return NSS_STATUS_UNAVAIL;
236
237   in = inet_makeaddr (addr, 0);
238   strcpy (buf, inet_ntoa (in));
239   blen = strlen (buf);
240
241   while (1)
242     {
243       enum nss_status retval;
244       int parse_res;
245
246       retval = yperr2nss (yp_match (domain, "networks.byaddr", buf,
247                                     strlen (buf), &result, &len));
248
249         if (retval != NSS_STATUS_SUCCESS)
250           {
251             if (retval == NSS_STATUS_NOTFOUND)
252               {
253                 if (buf[blen - 2] == '.' && buf[blen - 1] == '0')
254                   {
255                     /* Try again, but with trailing dot(s)
256                        removed (one by one) */
257                     buf[blen - 2] = '\0';
258                     blen -= 2;
259                     continue;
260                   }
261                 else
262                   return NSS_STATUS_NOTFOUND;
263               }
264             else
265               {
266                 if (retval == NSS_STATUS_TRYAGAIN)
267                   __set_errno (EAGAIN);
268                 return retval;
269               }
270           }
271
272       if ((size_t) (len + 1) > buflen)
273         {
274           free (result);
275           __set_errno (ERANGE);
276           *herrnop = NETDB_INTERNAL;
277           return NSS_STATUS_TRYAGAIN;
278         }
279
280         p = strncpy (buffer, result, len);
281         buffer[len] = '\0';
282         while (isspace (*p))
283           ++p;
284         free (result);
285
286         parse_res = _nss_files_parse_netent (p, net, data, buflen);
287
288
289         if (!parse_res)
290           {
291             *herrnop = NETDB_INTERNAL;
292             if (errno == ERANGE)
293               return NSS_STATUS_TRYAGAIN;
294             else
295               return NSS_STATUS_NOTFOUND;
296           }
297         else
298           return NSS_STATUS_SUCCESS;
299     }
300 }