1 /* Copyright (c) 1997,1999,2000,2004,2005,2006 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the 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 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
22 #include <rpcsvc/nis.h>
25 nis_leaf_of (const_nis_name name)
27 static char result[NIS_MAXNAMELEN + 1];
29 return nis_leaf_of_r (name, result, NIS_MAXNAMELEN);
33 nis_leaf_of_r (const_nis_name name, char *buffer, size_t buflen)
39 while (name[i] != '.' && name[i] != '\0')
42 if (__builtin_expect (i >= buflen, 0))
48 *((char *) __mempcpy (buffer, name, i)) = '\0';
52 libnsl_hidden_def (nis_leaf_of_r)
55 nis_name_of (const_nis_name name)
57 static char result[NIS_MAXNAMELEN + 1];
59 return nis_name_of_r (name, result, NIS_MAXNAMELEN);
63 nis_name_of_r (const_nis_name name, char *buffer, size_t buflen)
68 local_domain = nis_local_directory ();
70 diff = strlen (name) - strlen (local_domain);
74 if (strcmp (&name[diff], local_domain) != 0)
77 if ((size_t) diff >= buflen)
83 *((char *) __mempcpy (buffer, name, diff - 1)) = '\0';
90 libnsl_hidden_def (nis_name_of_r)
92 static int __always_inline
93 count_dots (const_nis_name str)
97 for (size_t i = 0; str[i] != '\0'; ++i)
104 /* If we run out of memory, we don't give already allocated memory
105 free. The overhead for bringing getnames back in a safe state to
106 free it is to big. */
108 nis_getnames (const_nis_name name)
110 const char *local_domain = nis_local_directory ();
111 size_t local_domain_len = strlen (local_domain);
112 size_t name_len = strlen (name);
115 char *saveptr = NULL;
121 nis_name *getnames = malloc ((count + 1) * sizeof (char *));
122 if (__builtin_expect (getnames == NULL, 0))
125 /* Do we have a fully qualified NIS+ name ? If yes, give it back */
126 if (name[name_len - 1] == '.')
128 if ((getnames[0] = strdup (name)) == NULL)
132 free (getnames[pos]);
142 /* If the passed NAME is shared a suffix (the latter of course with
143 a final dot) with each other we pass back NAME with a final
145 if (local_domain_len > 2)
148 cp = &local_domain[local_domain_len - 2];
149 cp2 = &name[name_len - 1];
157 if (cp < local_domain)
159 have_point = cp2 < name || *cp2 == '.';
164 have_point = *cp == '.';
171 getnames[0] = malloc (name_len + 2);
172 if (getnames[0] == NULL)
175 strcpy (stpcpy (getnames[0], name), ".");
180 /* Get the search path, where we have to search "name" */
181 path = getenv ("NIS_PATH");
183 path = strdupa ("$");
185 path = strdupa (path);
187 have_point = strchr (name, '.') != NULL;
189 cp = __strtok_r (path, ":", &saveptr);
192 if (strcmp (cp, "$") == 0)
194 const char *cptr = local_domain;
197 while (*cptr != '\0' && count_dots (cptr) >= 2)
202 nis_name *newp = realloc (getnames,
203 (count + 1) * sizeof (char *));
204 if (__builtin_expect (newp == NULL, 0))
208 tmp = malloc (strlen (cptr) + local_domain_len + name_len + 2);
209 if (__builtin_expect (tmp == NULL, 0))
213 tmp = stpcpy (tmp, name);
222 while (*cptr != '.' && *cptr != '\0')
224 if (cptr[0] != '\0' && cptr[1] != '\0')
225 /* If we have only ".", don't remove the "." */
232 size_t cplen = strlen (cp);
234 if (cp[cplen - 1] == '$')
238 tmp = malloc (cplen + local_domain_len + name_len + 2);
239 if (__builtin_expect (tmp == NULL, 0))
242 p = __stpcpy (tmp, name);
244 p = __mempcpy (p, cp, cplen);
248 __stpcpy (p, local_domain);
254 tmp = malloc (cplen + name_len + 3);
255 if (__builtin_expect (tmp == NULL, 0))
258 p = __mempcpy (tmp, name, name_len);
260 p = __mempcpy (p, cp, cplen);
269 nis_name *newp = realloc (getnames,
270 (count + 1) * sizeof (char *));
271 if (__builtin_expect (newp == NULL, 0))
278 cp = __strtok_r (NULL, ":", &saveptr);
282 && __asprintf (&getnames[pos++], "%s%s%s%s",
283 name, name[name_len - 1] == '.' ? "" : ".",
285 local_domain[local_domain_len - 1] == '.' ? "" : ".") < 0)
288 getnames[pos] = NULL;
292 libnsl_hidden_def (nis_getnames)
295 nis_freenames (nis_name *names)
299 while (names[i] != NULL)
307 libnsl_hidden_def (nis_freenames)
310 nis_dir_cmp (const_nis_name n1, const_nis_name n2)
319 if (strcmp (n1, n2) == 0)
322 return NOT_SEQUENTIAL;
327 if (n2[len2 - len1 - 1] != '.')
328 return NOT_SEQUENTIAL;
329 else if (strcmp (&n2[len2 - len1], n1) == 0)
332 return NOT_SEQUENTIAL;
336 if (n1[len1 - len2 - 1] != '.')
337 return NOT_SEQUENTIAL;
338 else if (strcmp (&n1[len1 - len2], n2) == 0)
341 return NOT_SEQUENTIAL;
345 libnsl_hidden_def (nis_dir_cmp)
348 nis_destroy_object (nis_object *obj)
350 nis_free_object (obj);
352 libnsl_hidden_def (nis_destroy_object)