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
;