(getspnam_plususer): Preserve original return value.
[kopensolaris-gnu/glibc.git] / nis / nis_subr.c
index 97da5ab..4c4ef8b 100644 (file)
@@ -1,29 +1,28 @@
-/* Copyright (c) 1997 Free Software Foundation, Inc.
+/* Copyright (c) 1997, 1999, 2000, 2004 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
 
    The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Library General Public License as
-   published by the Free Software Foundation; either version 2 of the
-   License, or (at your option) any later version.
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
 
    The GNU C Library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-   Library General Public License for more details.
+   Lesser General Public License for more details.
 
-   You should have received a copy of the GNU Library General Public
-   License along with the GNU C Library; see the file COPYING.LIB.  If not,
-   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-   Boston, MA 02111-1307, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
 
 #include <errno.h>
 #include <string.h>
 #include <rpcsvc/nis.h>
-#include <rpcsvc/nislib.h>
 
 nis_name
-nis_leaf_of (const nis_name name)
+nis_leaf_of (const_nis_name name)
 {
   static char result[NIS_MAXNAMELEN + 1];
 
@@ -31,29 +30,38 @@ nis_leaf_of (const nis_name name)
 }
 
 nis_name
-nis_leaf_of_r (const nis_name name, char *buffer, size_t buflen)
+nis_leaf_of_r (const_nis_name name, char *buffer, size_t buflen)
 {
-  int i = 0;
+  size_t i = 0;
 
-  memset (buffer, '\0', buflen);
+  buffer[0] = '\0';
 
   while (name[i] != '.' && name[i] != '\0')
     i++;
 
   if (i > buflen - 1)
     {
-      errno = ERANGE;
+      __set_errno (ERANGE);
       return NULL;
     }
 
-  if (i > 1)
-    strncpy (buffer, name, i - 1);
+  if (i > 0)
+    {
+      if ((size_t)i >= buflen)
+       {
+         __set_errno (ERANGE);
+         return NULL;
+       }
+
+      *((char *) __mempcpy (buffer, name, i)) = '\0';
+    }
 
   return buffer;
 }
+libnsl_hidden_def (nis_leaf_of_r)
 
 nis_name
-nis_name_of (const nis_name name)
+nis_name_of (const_nis_name name)
 {
   static char result[NIS_MAXNAMELEN + 1];
 
@@ -61,7 +69,7 @@ nis_name_of (const nis_name name)
 }
 
 nis_name
-nis_name_of_r (const nis_name name, char *buffer, size_t buflen)
+nis_name_of_r (const_nis_name name, char *buffer, size_t buflen)
 {
   char *local_domain;
   int diff;
@@ -75,76 +83,55 @@ nis_name_of_r (const nis_name name, char *buffer, size_t buflen)
   if (strcmp (&name[diff], local_domain) != 0)
     return NULL;
 
-  if (diff >= buflen)
+  if ((size_t) diff >= buflen)
     {
-      errno = ERANGE;
+      __set_errno (ERANGE);
       return NULL;
     }
-  memset (buffer, '\0', buflen);
-  strncpy (buffer, name, diff - 1);
 
-  if (strlen (buffer) == 0)
-    return NULL;
+  *((char *) __mempcpy (buffer, name, diff - 1)) = '\0';
 
-  return buffer;
-}
-
-nis_name
-nis_domain_of (const nis_name name)
-{
-  static char result[NIS_MAXNAMELEN + 1];
-
-  return nis_domain_of_r (name, result, NIS_MAXNAMELEN);
-}
-
-nis_name
-nis_domain_of_r (const nis_name name, char *buffer, size_t buflen)
-{
-  char *cptr;
-
-  cptr = strchr (name, '.');
-  cptr++;
-
-  if (strlen (cptr) == 0)
-    strcpy (buffer, ".");
-  else if (strlen (cptr) >= buflen)
-    {
-      errno = ERANGE;
-      return NULL;
-    }
-  else
-    strcpy (buffer, cptr);
+  if (diff - 1 == 0)
+    return NULL;
 
   return buffer;
 }
+libnsl_hidden_def (nis_name_of_r)
 
 static int
-count_dots (const nis_name str)
+count_dots (const_nis_name str)
 {
   int count = 0;
-  int i;
+  size_t l = strlen (str);
 
-  for (i = 0; i < strlen (str); ++i)
+  for (size_t i = 0; i < l; ++i)
     if (str[i] == '.')
       ++count;
 
   return count;
 }
 
+/* If we run out of memory, we don't give already allocated memory
+   free. The overhead for bringing getnames back in a safe state to
+   free it is to big. */
 nis_name *
-nis_getnames (const nis_name name)
+nis_getnames (const_nis_name name)
 {
   nis_name *getnames = NULL;
   char local_domain[NIS_MAXNAMELEN + 1];
-  char *path, *cp;
-  int count, pos;
-
+  char *path;
+  char *cp;
+  int count;
+  int pos = 0;
+  int have_point;
+  char *saveptr;
 
   strncpy (local_domain, nis_local_directory (), NIS_MAXNAMELEN);
   local_domain[NIS_MAXNAMELEN] = '\0';
 
   count = 1;
-  if ((getnames = malloc ((count + 1) * sizeof (char *))) == NULL)
+  getnames = malloc ((count + 1) * sizeof (char *));
+  if (__builtin_expect (getnames == NULL, 0))
       return NULL;
 
   /* Do we have a fully qualified NIS+ name ? If yes, give it back */
@@ -152,9 +139,13 @@ nis_getnames (const nis_name name)
     {
       if ((getnames[0] = strdup (name)) == NULL)
        {
+       free_null:
+         while (pos-- > 0)
+           free (getnames[pos]);
          free (getnames);
          return NULL;
        }
+
       getnames[1] = NULL;
 
       return getnames;
@@ -167,9 +158,9 @@ nis_getnames (const nis_name name)
   else
     path = strdupa (path);
 
-  pos = 0;
+  have_point = (strchr (name, '.') != NULL);
 
-  cp = strtok (path, ":");
+  cp = __strtok_r (path, ":", &saveptr);
   while (cp)
     {
       if (strcmp (cp, "$") == 0)
@@ -177,77 +168,93 @@ nis_getnames (const nis_name name)
          char *cptr = local_domain;
          char *tmp;
 
-         while (count_dots (cptr) >= 2)
+         while ((have_point && *cptr != '\0') || (count_dots (cptr) >= 2))
            {
              if (pos >= count)
                {
                  count += 5;
-                 getnames = realloc (getnames, (count + 1) * sizeof (char *));
+                 nis_name *newp = realloc (getnames,
+                                           (count + 1) * sizeof (char *));
+                 if (__builtin_expect (newp == NULL, 0))
+                   goto free_null;
+                 getnames = newp;
                }
              tmp = malloc (strlen (cptr) + strlen (local_domain) +
                            strlen (name) + 2);
-             if (tmp == NULL)
-               return NULL;
+             if (__builtin_expect (tmp == NULL, 0))
+               goto free_null;
 
              getnames[pos] = tmp;
              tmp = stpcpy (tmp, name);
-             *tmp++ = '.'
-             stpcpy (tmp, cptr);
+             *tmp++ = '.';
+             if (cptr[1] != '\0')
+               stpcpy (tmp, cptr);
+             else
+               ++cptr;
 
              ++pos;
 
-             while (*cptr != '.')
+             while (*cptr != '.' && *cptr != '\0')
+               ++cptr;
+             if (cptr[0] != '\0' && cptr[1] != '\0')
+               /* If we have only ".", don't remove the "." */
                ++cptr;
-             ++cptr;
            }
        }
       else
        {
          char *tmp;
+         size_t cplen = strlen (cp);
 
-         if (cp[strlen (cp) - 1] == '$')
+         if (cp[cplen - 1] == '$')
            {
-             tmp = malloc (strlen (cp) + strlen (local_domain) +
-                           strlen (name) + 2);
-             if (tmp == NULL)
-               return NULL;
-
-             tmp = stpcpy (tmp, name);
-             *tmp++ = '.'
-             tmp = stpcpy (tmp, cp);
-             --tmp
-             if (tmp[-1] != '.')
-               *tmp++ = '.';
-             stpcpy (tmp, local_domain);
+             char *p;
+
+             tmp = malloc (cplen + strlen (local_domain) + strlen (name) + 2);
+             if (__builtin_expect (tmp == NULL, 0))
+               goto free_null;
+
+             p = __stpcpy (tmp, name);
+             *p++ = '.';
+             p = __mempcpy (p, cp, cplen);
+             --p;
+             if (p[-1] != '.')
+               *p++ = '.';
+             __stpcpy (p, local_domain);
            }
          else
            {
-             tmp = malloc (strlen (cp) + strlen (name) + 2);
-             if (tmp == NULL)
-               return NULL;
+             char *p;
 
-             tmp = stpcpy (tmp, name);
-             *tmp++ = '.';
-             stpcpy (tmp, cp);
+             tmp = malloc (cplen + strlen (name) + 2);
+             if (__builtin_expect (tmp == NULL, 0))
+               goto free_null;
+
+             p = __stpcpy (tmp, name);
+             *p++ = '.';
+             memcpy (p, cp, cplen + 1);
            }
 
-         if (pos > count)
+         if (pos >= count)
            {
              count += 5;
-             getnames = realloc (getnames, (count + 1) * sizeof (char *));
-             if (getnames == NULL)
-               return NULL;
+             nis_name *newp = realloc (getnames,
+                                       (count + 1) * sizeof (char *));
+             if (__builtin_expect (newp == NULL, 0))
+               goto free_null;
+             getnames = newp;
            }
          getnames[pos] = tmp;
          ++pos;
        }
-      cp = strtok (NULL, ":");
+      cp = __strtok_r (NULL, ":", &saveptr);
     }
 
   getnames[pos] = NULL;
 
   return getnames;
 }
+libnsl_hidden_def (nis_getnames)
 
 void
 nis_freenames (nis_name *names)
@@ -262,9 +269,10 @@ nis_freenames (nis_name *names)
 
   free (names);
 }
+libnsl_hidden_def  (nis_freenames)
 
 name_pos
-nis_dir_cmp (const nis_name n1, const nis_name n2)
+nis_dir_cmp (const_nis_name n1, const_nis_name n2)
 {
   int len1, len2;
 
@@ -299,9 +307,11 @@ nis_dir_cmp (const nis_name n1, const nis_name n2)
 
     }
 }
+libnsl_hidden_def (nis_dir_cmp)
 
 void
 nis_destroy_object (nis_object *obj)
 {
   nis_free_object (obj);
 }
+libnsl_hidden_def (nis_destroy_object)