1 /* Copyright (C) 1997, 1998, 2001, 2002, 2003, 2005, 2006
2 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
27 #include <rpcsvc/nis.h>
28 #include <bits/libc-lock.h>
30 #include "nss-nisplus.h"
32 __libc_lock_define_initialized (static, lock)
34 static nis_result *result;
35 static nis_name tablename_val;
36 static u_long tablename_len;
38 #define NISENTRYVAL(idx, col, res) \
39 (NIS_RES_OBJECT (res)[idx].EN_data.en_cols.en_cols_val[col].ec_value.ec_value_val)
41 #define NISENTRYLEN(idx, col, res) \
42 (NIS_RES_OBJECT (res)[idx].EN_data.en_cols.en_cols_val[col].ec_value.ec_value_len)
46 _nss_nisplus_parse_protoent (nis_result *result, struct protoent *proto,
47 char *buffer, size_t buflen, int *errnop)
49 char *first_unused = buffer;
50 size_t room_left = buflen;
56 if ((result->status != NIS_SUCCESS && result->status != NIS_S_SUCCESS)
57 || __type_of (NIS_RES_OBJECT (result)) != NIS_ENTRY_OBJ
58 || strcmp (NIS_RES_OBJECT (result)->EN_data.en_type,
60 || NIS_RES_OBJECT (result)->EN_data.en_cols.en_cols_len < 3)
63 /* Generate the protocols entry format and use the normal parser */
64 if (NISENTRYLEN (0, 0, result) + 1 > room_left)
70 strncpy (first_unused, NISENTRYVAL (0, 0, result),
71 NISENTRYLEN (0, 0, result));
72 first_unused[NISENTRYLEN (0, 0, result)] = '\0';
73 proto->p_name = first_unused;
74 size_t len = strlen (first_unused) + 1;
79 proto->p_proto = atoi (NISENTRYVAL (0, 2, result));
81 /* XXX Rewrite at some point to allocate the array first and then
82 copy the strings. It wasteful to first concatenate the strings
83 to just split them again later. */
84 char *line = first_unused;
85 for (i = 0; i < NIS_RES_NUMOBJ (result); ++i)
87 if (strcmp (NISENTRYVAL (i, 1, result), proto->p_name) != 0)
89 if (NISENTRYLEN (i, 1, result) + 2 > room_left)
91 *first_unused++ = ' ';
92 first_unused = __stpncpy (first_unused, NISENTRYVAL (i, 1, result),
93 NISENTRYLEN (i, 1, result));
94 room_left -= NISENTRYLEN (i, 1, result) + 1;
97 *first_unused++ = '\0';
99 /* Adjust the pointer so it is aligned for
101 size_t adjust = ((__alignof__ (char *)
102 - (first_unused - (char *) 0) % __alignof__ (char *))
103 % __alignof__ (char *));
104 if (room_left < adjust + sizeof (char *))
106 first_unused += adjust;
108 proto->p_aliases = (char **) first_unused;
110 /* For the terminating NULL pointer. */
111 room_left -= sizeof (char *);
114 while (*line != '\0')
116 /* Skip leading blanks. */
117 while (isspace (*line))
122 if (room_left < sizeof (char *))
125 room_left -= sizeof (char *);
126 proto->p_aliases[i++] = line;
128 while (*line != '\0' && *line != ' ')
134 proto->p_aliases[i] = NULL;
139 static enum nss_status
140 _nss_create_tablename (int *errnop)
142 if (tablename_val == NULL)
144 const char *local_dir = nis_local_directory ();
145 size_t local_dir_len = strlen (local_dir);
146 static const char prefix[] = "protocols.org_dir.";
148 char *p = malloc (sizeof (prefix) + local_dir_len);
152 return NSS_STATUS_TRYAGAIN;
155 memcpy (__stpcpy (p, prefix), local_dir, local_dir_len + 1);
157 tablename_len = sizeof (prefix) - 1 + local_dir_len;
159 atomic_write_barrier ();
164 return NSS_STATUS_SUCCESS;
168 _nss_nisplus_setprotoent (int stayopen)
170 enum nss_status status = NSS_STATUS_SUCCESS;
172 __libc_lock_lock (lock);
176 nis_freeresult (result);
180 if (tablename_val == NULL)
183 status = _nss_create_tablename (&err);
186 __libc_lock_unlock (lock);
192 _nss_nisplus_endprotoent (void)
194 __libc_lock_lock (lock);
198 nis_freeresult (result);
202 __libc_lock_unlock (lock);
204 return NSS_STATUS_SUCCESS;
207 static enum nss_status
208 internal_nisplus_getprotoent_r (struct protoent *proto, char *buffer,
209 size_t buflen, int *errnop)
213 /* Get the next entry until we found a correct one. */
216 nis_result *saved_res;
221 if (tablename_val == NULL)
223 enum nss_status status = _nss_create_tablename (errnop);
225 if (status != NSS_STATUS_SUCCESS)
229 result = nis_first_entry (tablename_val);
233 return NSS_STATUS_TRYAGAIN;
235 if (niserr2nss (result->status) != NSS_STATUS_SUCCESS)
236 return niserr2nss (result->status);
241 result = nis_next_entry (tablename_val, &result->cookie);
245 return NSS_STATUS_TRYAGAIN;
247 if (niserr2nss (result->status) != NSS_STATUS_SUCCESS)
249 nis_freeresult (saved_res);
250 return niserr2nss (result->status);
254 parse_res = _nss_nisplus_parse_protoent (result, proto, buffer,
258 nis_freeresult (result);
261 return NSS_STATUS_TRYAGAIN;
266 nis_freeresult (saved_res);
271 return NSS_STATUS_SUCCESS;
275 _nss_nisplus_getprotoent_r (struct protoent *result, char *buffer,
276 size_t buflen, int *errnop)
280 __libc_lock_lock (lock);
282 status = internal_nisplus_getprotoent_r (result, buffer, buflen, errnop);
284 __libc_lock_unlock (lock);
290 _nss_nisplus_getprotobyname_r (const char *name, struct protoent *proto,
291 char *buffer, size_t buflen, int *errnop)
295 if (tablename_val == NULL)
297 __libc_lock_lock (lock);
299 enum nss_status status = _nss_create_tablename (errnop);
301 __libc_lock_unlock (lock);
303 if (status != NSS_STATUS_SUCCESS)
308 return NSS_STATUS_NOTFOUND;
310 char buf[strlen (name) + 10 + tablename_len];
313 /* Search at first in the alias list, and use the correct name
314 for the next search */
315 snprintf (buf, sizeof (buf), "[name=%s],%s", name, tablename_val);
316 nis_result *result = nis_list (buf, FOLLOW_PATH | FOLLOW_LINKS, NULL, NULL);
322 /* If we did not find it, try it as original name. But if the
323 database is correct, we should find it in the first case, too */
324 if ((result->status != NIS_SUCCESS
325 && result->status != NIS_S_SUCCESS)
326 || __type_of (result->objects.objects_val) != NIS_ENTRY_OBJ
327 || strcmp (result->objects.objects_val->EN_data.en_type,
328 "protocols_tbl") != 0
329 || result->objects.objects_val->EN_data.en_cols.en_cols_len < 3)
330 snprintf (buf, sizeof (buf), "[cname=%s],%s", name, tablename_val);
333 /* We need to allocate a new buffer since there is no
334 guarantee the returned name has a length limit. */
335 const char *entryval = NISENTRYVAL (0, 0, result);
336 size_t buflen = strlen (entryval) + 10 + tablename_len;
337 bufptr = alloca (buflen);
338 snprintf (bufptr, buflen, "[cname=%s],%s",
339 entryval, tablename_val);
342 nis_freeresult (result);
343 result = nis_list (bufptr, FOLLOW_PATH | FOLLOW_LINKS, NULL, NULL);
348 __set_errno (ENOMEM);
349 return NSS_STATUS_TRYAGAIN;
352 if (__builtin_expect (niserr2nss (result->status) != NSS_STATUS_SUCCESS, 0))
354 enum nss_status status = niserr2nss (result->status);
356 __set_errno (olderr);
358 nis_freeresult (result);
362 parse_res = _nss_nisplus_parse_protoent (result, proto, buffer, buflen,
365 nis_freeresult (result);
372 return NSS_STATUS_TRYAGAIN;
376 __set_errno (olderr);
377 return NSS_STATUS_NOTFOUND;
381 return NSS_STATUS_SUCCESS;
385 _nss_nisplus_getprotobynumber_r (const int number, struct protoent *proto,
386 char *buffer, size_t buflen, int *errnop)
388 if (tablename_val == NULL)
390 __libc_lock_lock (lock);
392 enum nss_status status = _nss_create_tablename (errnop);
394 __libc_lock_unlock (lock);
396 if (status != NSS_STATUS_SUCCESS)
400 char buf[12 + 3 * sizeof (number) + tablename_len];
403 snprintf (buf, sizeof (buf), "[number=%d],%s", number, tablename_val);
405 nis_result *result = nis_list (buf, FOLLOW_LINKS | FOLLOW_PATH, NULL, NULL);
409 __set_errno (ENOMEM);
410 return NSS_STATUS_TRYAGAIN;
413 if (__builtin_expect (niserr2nss (result->status) != NSS_STATUS_SUCCESS, 0))
415 enum nss_status status = niserr2nss (result->status);
417 __set_errno (olderr);
419 nis_freeresult (result);
423 int parse_res = _nss_nisplus_parse_protoent (result, proto, buffer, buflen,
426 nis_freeresult (result);
433 return NSS_STATUS_TRYAGAIN;
437 __set_errno (olderr);
438 return NSS_STATUS_NOTFOUND;
442 return NSS_STATUS_SUCCESS;