]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - nis/nis_table.c
Update copyright notices with scripts/update-copyrights
[thirdparty/glibc.git] / nis / nis_table.c
index 27efd5181a0d4319779d9767cad40e2c5bc4f532..9344a1f7b3b5205a8f32f61e34928adac11e1478 100644 (file)
@@ -1,4 +1,4 @@
-/* Copyright (c) 1997,1998,1999,2003,2004,2005 Free Software Foundation, Inc.
+/* Copyright (c) 1997-2014 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Thorsten Kukuk <kukuk@suse.de>, 1997.
 
    Lesser General Public License for more details.
 
    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.  */
+   License along with the GNU C Library; if not, see
+   <http://www.gnu.org/licenses/>.  */
 
+#include <assert.h>
 #include <string.h>
 #include <rpcsvc/nis.h>
 
 #include "nis_xdr.h"
 #include "nis_intern.h"
+#include "libnsl.h"
 
 
-static struct ib_request *
+struct ib_request *
 __create_ib_request (const_nis_name name, unsigned int flags)
 {
   struct ib_request *ibreq = calloc (1, sizeof (struct ib_request));
@@ -41,7 +42,15 @@ __create_ib_request (const_nis_name name, unsigned int flags)
 
   /* Not of "[key=value,key=value,...],foo.." format? */
   if (cptr[0] != '[')
-    return (ibreq->ibr_name = strdup (cptr)) == NULL ? NULL : ibreq;
+    {
+      ibreq->ibr_name = strdup (cptr);
+      if (ibreq->ibr_name == NULL)
+       {
+         free (ibreq);
+         return NULL;
+       }
+      return ibreq;
+    }
 
   /* "[key=value,...],foo" format */
   ibreq->ibr_name = strchr (cptr, ']');
@@ -83,22 +92,22 @@ __create_ib_request (const_nis_name name, unsigned int flags)
       if (cptr != NULL)
        *cptr++ = '\0';
 
-      if (!val)
+      if (__builtin_expect (val == NULL, 0))
        {
          nis_free_request (ibreq);
          return NULL;
        }
       *val++ = '\0';
-      if ((search_len + 1) >= size)
-        {
-          size += 1;
+      if (search_len + 1 >= size)
+       {
+         size += 1;
          nis_attr *newp = realloc (search_val, size * sizeof (nis_attr));
          if (newp == NULL)
            goto free_null;
          search_val = newp;
        }
       search_val[search_len].zattr_ndx = strdup (key);
-      if ((search_val[search_len].zattr_ndx) == NULL)
+      if (search_val[search_len].zattr_ndx == NULL)
        goto free_null;
 
       search_val[search_len].zattr_val.zattr_val_len = strlen (val) + 1;
@@ -117,11 +126,12 @@ __create_ib_request (const_nis_name name, unsigned int flags)
 
   return ibreq;
 }
+libnsl_hidden_def (__create_ib_request)
 
 static const struct timeval RPCTIMEOUT = {10, 0};
 
 static char *
-__get_tablepath (char *name, dir_binding *bptr)
+get_tablepath (char *name, dir_binding *bptr)
 {
   enum clnt_stat result;
   nis_result res;
@@ -137,15 +147,52 @@ __get_tablepath (char *name, dir_binding *bptr)
                      (caddr_t) &req, (xdrproc_t) _xdr_nis_result,
                      (caddr_t) &res, RPCTIMEOUT);
 
-  char *cptr;
+  const char *cptr;
   if (result == RPC_SUCCESS && NIS_RES_STATUS (&res) == NIS_SUCCESS
       && __type_of (NIS_RES_OBJECT (&res)) == NIS_TABLE_OBJ)
     cptr = NIS_RES_OBJECT (&res)->TA_data.ta_path;
   else
     cptr = "";
 
-  return strdup (cptr);
+  char *str = strdup (cptr);
+
+  if (result == RPC_SUCCESS)
+    xdr_free ((xdrproc_t) _xdr_nis_result, (char *) &res);
+
+  return str;
+}
+
+
+nis_error
+__follow_path (char **tablepath, char **tableptr, struct ib_request *ibreq,
+              dir_binding *bptr)
+{
+  if (*tablepath == NULL)
+    {
+      *tablepath = get_tablepath (ibreq->ibr_name, bptr);
+      if (*tablepath == NULL)
+       return NIS_NOMEMORY;
+
+      *tableptr = *tablepath;
+    }
+  if (*tableptr == NULL)
+    return NIS_NOTFOUND;
+
+  char *newname = strsep (tableptr, ":");
+  if (newname[0] == '\0')
+    return NIS_NOTFOUND;
+
+  newname = strdup (newname);
+  if (newname == NULL)
+    return NIS_NOMEMORY;
+
+  free (ibreq->ibr_name);
+  ibreq->ibr_name = newname;
+
+  return NIS_SUCCESS;
 }
+libnsl_hidden_def (__follow_path)
+
 
 nis_result *
 nis_list (const_nis_name name, unsigned int flags,
@@ -154,7 +201,7 @@ nis_list (const_nis_name name, unsigned int flags,
                           const void *userdata),
          const void *userdata)
 {
-  nis_result *res = calloc (1, sizeof (nis_result));
+  nis_result *res = malloc (sizeof (nis_result));
   ib_request *ibreq;
   int status;
   enum clnt_stat clnt_status;
@@ -164,23 +211,29 @@ nis_list (const_nis_name name, unsigned int flags,
   nis_name namebuf[2] = {NULL, NULL};
   int name_nr = 0;
   nis_cb *cb = NULL;
-  char *tableptr, *tablepath = NULL;
-  int have_tablepath = 0;
+  char *tableptr;
+  char *tablepath = NULL;
   int first_try = 0; /* Do we try the old binding at first ? */
+  nis_result *allres = NULL;
 
   if (res == NULL)
     return NULL;
 
   if (name == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_BADNAME;
+      status = NIS_BADNAME;
+    err_out:
+      nis_freeresult (allres);
+      memset (res, '\0', sizeof (nis_result));
+      NIS_RES_STATUS (res) = status;
       return res;
     }
 
-  if ((ibreq = __create_ib_request (name, flags)) == NULL)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_BADNAME;
-      return res;
+      status = NIS_BADNAME;
+      goto err_out;
     }
 
   if ((flags & EXPAND_NAME)
@@ -192,15 +245,16 @@ nis_list (const_nis_name name, unsigned int flags,
       if (names == NULL)
        {
          nis_free_request (ibreq);
-         NIS_RES_STATUS (res) = NIS_BADNAME;
-         return res;
+         status = NIS_BADNAME;
+         goto err_out;
        }
       ibreq->ibr_name = strdup (names[name_nr]);
       if (ibreq->ibr_name == NULL)
        {
+         nis_freenames (names);
          nis_free_request (ibreq);
-         NIS_RES_STATUS (res) = NIS_NOMEMORY;
-         return res;
+         status = NIS_NOMEMORY;
+         goto err_out;
        }
     }
   else
@@ -218,36 +272,25 @@ nis_list (const_nis_name name, unsigned int flags,
 
       memset (res, '\0', sizeof (nis_result));
 
-      status = __nisfind_server (ibreq->ibr_name, &dir);
-      if (status != NIS_SUCCESS)
-        {
-         nis_free_request (ibreq);
-          NIS_RES_STATUS (res) = status;
-          return res;
-        }
-
-      status = __nisbind_create (&bptr, dir->do_servers.do_servers_val,
-                                 dir->do_servers.do_servers_len, flags);
+      status = __nisfind_server (ibreq->ibr_name,
+                                ibreq->ibr_srch.ibr_srch_val != NULL,
+                                &dir, &bptr, flags & ~MASTER_ONLY);
       if (status != NIS_SUCCESS)
-        {
-         nis_free_request (ibreq);
-          NIS_RES_STATUS (res) = status;
-          nis_free_directory (dir);
-          return res;
-        }
+       {
+         NIS_RES_STATUS (res) = status;
+         goto fail3;
+       }
 
       while (__nisbind_connect (&bptr) != NIS_SUCCESS)
-       if (__nisbind_next (&bptr) != NIS_SUCCESS)
+       if (__builtin_expect (__nisbind_next (&bptr) != NIS_SUCCESS, 0))
          {
-           __nisbind_destroy (&bptr);
-           nis_free_directory (dir);
-           nis_free_request (ibreq);
            NIS_RES_STATUS (res) = NIS_NAMEUNREACHABLE;
-           return res;
+           goto fail;
          }
 
       if (callback != NULL)
        {
+         assert (cb == NULL);
          cb = __nis_create_callback (callback, userdata, flags);
          ibreq->ibr_cbhost.ibr_cbhost_len = 1;
          ibreq->ibr_cbhost.ibr_cbhost_val = cb->serv;
@@ -259,7 +302,7 @@ nis_list (const_nis_name name, unsigned int flags,
                               (xdrproc_t) _xdr_nis_result,
                               (caddr_t) res, RPCTIMEOUT);
 
-      if (clnt_status != RPC_SUCCESS)
+      if (__builtin_expect (clnt_status != RPC_SUCCESS, 0))
        NIS_RES_STATUS (res) = NIS_RPCERROR;
       else
        switch (NIS_RES_STATUS (res))
@@ -267,13 +310,13 @@ nis_list (const_nis_name name, unsigned int flags,
          case NIS_PARTIAL:
          case NIS_SUCCESS:
          case NIS_S_SUCCESS:
-           if (__type_of (NIS_RES_OBJECT (res)) == NIS_LINK_OBJ &&
-               flags & FOLLOW_LINKS)           /* We are following links.  */
+           if (__type_of (NIS_RES_OBJECT (res)) == NIS_LINK_OBJ
+               && (flags & FOLLOW_LINKS))      /* We are following links.  */
              {
                free (ibreq->ibr_name);
                ibreq->ibr_name = NULL;
                /* If we hit the link limit, bail.  */
-               if (count_links > NIS_MAXLINKS)
+               if (__builtin_expect (count_links > NIS_MAXLINKS, 0))
                  {
                    NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
                    ++done;
@@ -284,8 +327,22 @@ nis_list (const_nis_name name, unsigned int flags,
                  strdup (NIS_RES_OBJECT (res)->LI_data.li_name);
                if (ibreq->ibr_name == NULL)
                  {
-                   nis_free_request (ibreq);
                    NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                 fail:
+                   __nisbind_destroy (&bptr);
+                   nis_free_directory (dir);
+                 fail3:
+                   free (tablepath);
+                   if (cb)
+                     {
+                       __nis_destroy_callback (cb);
+                       ibreq->ibr_cbhost.ibr_cbhost_len = 0;
+                       ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
+                     }
+                   if (names != namebuf)
+                     nis_freenames (names);
+                   nis_free_request (ibreq);
+                   nis_freeresult (allres);
                    return res;
                  }
                if (NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_len)
@@ -296,63 +353,89 @@ nis_list (const_nis_name name, unsigned int flags,
                      ibreq->ibr_srch.ibr_srch_val =
                        NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_val;
                    }
-               nis_freeresult (res);
-               res = calloc (1, sizeof (nis_result));
-               if (res == NULL)
-                 {
-                   if (have_tablepath)
-                     free (tablepath);
-                   __nisbind_destroy (&bptr);
-                   nis_free_directory (dir);
-                   return NULL;
-                 }
+               /* The following is a non-obvious optimization.  A
+                  nis_freeresult call would call xdr_free as the
+                  following code.  But it also would unnecessarily
+                  free the result structure.  We avoid this here
+                  along with the necessary tests.  */
+               xdr_free ((xdrproc_t) _xdr_nis_result, (char *)res);
+               memset (res, '\0', sizeof (*res));
                first_try = 1; /* Try at first the old binding */
                goto again;
              }
-           else if ((flags & FOLLOW_PATH) &&
-                    NIS_RES_STATUS (res) == NIS_PARTIAL)
+           else if ((flags & FOLLOW_PATH)
+                    && NIS_RES_STATUS (res) == NIS_PARTIAL)
              {
-               if (!have_tablepath)
+               enum nis_error err = __follow_path (&tablepath, &tableptr,
+                                                   ibreq, &bptr);
+               if (err != NIS_SUCCESS)
                  {
-                   tablepath = __get_tablepath (ibreq->ibr_name, &bptr);
-                   tableptr = tablepath;
-                   have_tablepath = 1;
+                   if (err == NIS_NOMEMORY)
+                     NIS_RES_STATUS (res) = err;
+                   ++done;
                  }
-               if (tableptr == NULL)
+               else
                  {
-                   ++done;
-                   break;
+                   /* The following is a non-obvious optimization.  A
+                      nis_freeresult call would call xdr_free as the
+                      following code.  But it also would unnecessarily
+                      free the result structure.  We avoid this here
+                      along with the necessary tests.  */
+                   xdr_free ((xdrproc_t) _xdr_nis_result, (char *) res);
+                   memset (res, '\0', sizeof (*res));
+                   first_try = 1;
+                   goto again;
                  }
-               free (ibreq->ibr_name);
-               ibreq->ibr_name = strsep (&tableptr, ":");
-               if (ibreq->ibr_name == NULL || ibreq->ibr_name[0] == '\0')
+             }
+           else if ((flags & (FOLLOW_PATH | ALL_RESULTS))
+                    == (FOLLOW_PATH | ALL_RESULTS))
+             {
+               if (allres == NULL)
                  {
-                   ibreq->ibr_name = strdup ("");
-                   if (ibreq->ibr_name == NULL)
+                   allres = res;
+                   res = malloc (sizeof (nis_result));
+                   if (res == NULL)
                      {
-                       nis_free_request (ibreq);
+                       res = allres;
+                       allres = NULL;
                        NIS_RES_STATUS (res) = NIS_NOMEMORY;
-                       return res;
+                       goto fail;
                      }
-                   ++done;
+                   NIS_RES_STATUS (res) = NIS_RES_STATUS (allres);
                  }
                else
                  {
-                   ibreq->ibr_name = strdup (ibreq->ibr_name);
-                   nis_freeresult (res);
-                   res = calloc (1, sizeof (nis_result));
-                   if (res == NULL || ibreq->ibr_name == NULL)
+                   nis_object *objects_val
+                     = realloc (NIS_RES_OBJECT (allres),
+                                (NIS_RES_NUMOBJ (allres)
+                                 + NIS_RES_NUMOBJ (res))
+                                * sizeof (nis_object));
+                   if (objects_val == NULL)
                      {
-                       free (res);
-                       nis_free_request (ibreq);
-                       if (have_tablepath)
-                         free (tablepath);
-                       __nisbind_destroy (&bptr);
-                       nis_free_directory (dir);
-                       return NULL;
+                       NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                       goto fail;
                      }
-                   first_try = 1;
-                   goto again;
+                   NIS_RES_OBJECT (allres) = objects_val;
+                   memcpy (NIS_RES_OBJECT (allres) + NIS_RES_NUMOBJ (allres),
+                           NIS_RES_OBJECT (res),
+                           NIS_RES_NUMOBJ (res) * sizeof (nis_object));
+                   NIS_RES_NUMOBJ (allres) += NIS_RES_NUMOBJ (res);
+                   NIS_RES_NUMOBJ (res) = 0;
+                   free (NIS_RES_OBJECT (res));
+                   NIS_RES_OBJECT (res) = NULL;
+                   NIS_RES_STATUS (allres) = NIS_RES_STATUS (res);
+                   xdr_free ((xdrproc_t) _xdr_nis_result, (char *) res);
+                 }
+               enum nis_error err = __follow_path (&tablepath, &tableptr,
+                                                   ibreq, &bptr);
+               if (err != NIS_SUCCESS)
+                 {
+                   /* Prepare for the nis_freeresult call.  */
+                   memset (res, '\0', sizeof (*res));
+
+                   if (err == NIS_NOMEMORY)
+                     NIS_RES_STATUS (allres) = err;
+                   ++done;
                  }
              }
            else
@@ -368,31 +451,13 @@ nis_list (const_nis_name name, unsigned int flags,
                  ++done;
                else
                  {
-                   if (!have_tablepath)
-                     {
-                       tablepath = __get_tablepath (ibreq->ibr_name, &bptr);
-                       tableptr = tablepath;
-                       have_tablepath = 1;
-                     }
-                   if (tableptr == NULL)
+                   enum nis_error err
+                     = __follow_path (&tablepath, &tableptr, ibreq, &bptr);
+                   if (err != NIS_SUCCESS)
                      {
+                       if (err == NIS_NOMEMORY)
+                         NIS_RES_STATUS (res) = err;
                        ++done;
-                       break;
-                     }
-                   free (ibreq->ibr_name);
-                   ibreq->ibr_name = strsep (&tableptr, ":");
-                   if (ibreq->ibr_name == NULL || ibreq->ibr_name[0] == '\0')
-                     {
-                       ibreq->ibr_name = strdup ("");
-                       ++done;
-                     }
-                   else
-                     ibreq->ibr_name = strdup (ibreq->ibr_name);
-                   if (ibreq->ibr_name == NULL)
-                     {
-                       nis_free_request (ibreq);
-                       NIS_RES_STATUS (res) = NIS_NOMEMORY;
-                       return res;
                      }
                  }
              }
@@ -426,7 +491,7 @@ nis_list (const_nis_name name, unsigned int flags,
                /* Try the next domainname if we don't follow a link.  */
                free (ibreq->ibr_name);
                ibreq->ibr_name = NULL;
-               if (count_links)
+               if (__builtin_expect (count_links, 0))
                  {
                    NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
                    ++done;
@@ -441,9 +506,8 @@ nis_list (const_nis_name name, unsigned int flags,
                ibreq->ibr_name = strdup (names[name_nr]);
                if (ibreq->ibr_name == NULL)
                  {
-                   nis_free_request (ibreq);
                    NIS_RES_STATUS (res) = NIS_NOMEMORY;
-                   return res;
+                   goto fail;
                  }
                first_try = 1; /* Try old binding at first */
                goto again;
@@ -457,17 +521,26 @@ nis_list (const_nis_name name, unsigned int flags,
          __nis_destroy_callback (cb);
          ibreq->ibr_cbhost.ibr_cbhost_len = 0;
          ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
+         cb = NULL;
        }
 
       __nisbind_destroy (&bptr);
       nis_free_directory (dir);
     }
 
+  free (tablepath);
+
   if (names != namebuf)
     nis_freenames (names);
 
   nis_free_request (ibreq);
 
+  if (allres)
+    {
+      nis_freeresult (res);
+      return allres;
+    }
+
   return res;
 }
 libnsl_hidden_def (nis_list)
@@ -475,15 +548,7 @@ libnsl_hidden_def (nis_list)
 nis_result *
 nis_add_entry (const_nis_name name, const nis_object *obj2, unsigned int flags)
 {
-  nis_object obj;
-  nis_result *res;
-  nis_error status;
-  ib_request *ibreq;
-  size_t namelen = strlen (name);
-  char buf1[namelen + 20];
-  char buf4[namelen + 20];
-
-  res = calloc (1, sizeof (nis_result));
+  nis_result *res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
@@ -493,14 +558,20 @@ nis_add_entry (const_nis_name name, const nis_object *obj2, unsigned int flags)
       return res;
     }
 
-  if ((ibreq = __create_ib_request (name, flags)) == NULL)
+  ib_request *ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
+  nis_object obj;
   memcpy (&obj, obj2, sizeof (nis_object));
 
+  size_t namelen = strlen (name);
+  char buf1[namelen + 20];
+  char buf4[namelen + 20];
+
   if (obj.zo_name == NULL || strlen (obj.zo_name) == 0)
     obj.zo_name = nis_leaf_of_r (name, buf1, sizeof (buf1));
 
@@ -521,11 +592,12 @@ nis_add_entry (const_nis_name name, const nis_object *obj2, unsigned int flags)
     }
   ibreq->ibr_obj.ibr_obj_len = 1;
 
-  if ((status = __do_niscall (ibreq->ibr_name, NIS_IBADD,
-                             (xdrproc_t) _xdr_ib_request,
-                             (caddr_t) ibreq,
-                             (xdrproc_t) _xdr_nis_result,
-                             (caddr_t) res, 0, NULL)) != NIS_SUCCESS)
+  nis_error status = __do_niscall (ibreq->ibr_name, NIS_IBADD,
+                                  (xdrproc_t) _xdr_ib_request,
+                                  (caddr_t) ibreq,
+                                  (xdrproc_t) _xdr_nis_result,
+                                  (caddr_t) res, 0, NULL);
+  if (__builtin_expect (status != NIS_SUCCESS, 0))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
@@ -549,7 +621,8 @@ nis_modify_entry (const_nis_name name, const nis_object *obj2,
   if (res == NULL)
     return NULL;
 
-  if (( ibreq =__create_ib_request (name, flags)) == NULL)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
@@ -577,10 +650,11 @@ nis_modify_entry (const_nis_name name, const nis_object *obj2,
     }
   ibreq->ibr_obj.ibr_obj_len = 1;
 
-  if ((status = __do_niscall (ibreq->ibr_name, NIS_IBMODIFY,
-                             (xdrproc_t) _xdr_ib_request,
-                             (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
-                             (caddr_t) res, 0, NULL)) != NIS_SUCCESS)
+  status = __do_niscall (ibreq->ibr_name, NIS_IBMODIFY,
+                        (xdrproc_t) _xdr_ib_request,
+                        (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
+                        (caddr_t) res, 0, NULL);
+  if (__builtin_expect (status != NIS_SUCCESS, 0))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
@@ -606,7 +680,8 @@ nis_remove_entry (const_nis_name name, const nis_object *obj,
       return res;
     }
 
-  if ((ibreq =__create_ib_request (name, flags)) == NULL)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
@@ -664,7 +739,7 @@ nis_first_entry (const_nis_name name)
                         (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
                         (caddr_t) res, 0, NULL);
 
-  if (status != NIS_SUCCESS)
+  if (__builtin_expect (status != NIS_SUCCESS, 0))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
@@ -707,7 +782,7 @@ nis_next_entry (const_nis_name name, const netobj *cookie)
                         (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
                         (caddr_t) res, 0, NULL);
 
-  if (status != NIS_SUCCESS)
+  if (__builtin_expect (status != NIS_SUCCESS, 0))
     NIS_RES_STATUS (res) = status;
 
   if (cookie != NULL)