]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - nis/nis_table.c
Update copyright dates with scripts/update-copyrights.
[thirdparty/glibc.git] / nis / nis_table.c
index 70d2b80fbca45022a7a83a46e0b16d441b3344ba..c443f531333045a1c0c84ca8c87955b70c7ea685 100644 (file)
-/* Copyright (c) 1997, 1998 Free Software Foundation, Inc.
+/* Copyright (c) 1997-2019 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
-   Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
+   Contributed by Thorsten Kukuk <kukuk@suse.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, see
+   <http://www.gnu.org/licenses/>.  */
 
+#include <assert.h>
 #include <string.h>
 #include <rpcsvc/nis.h>
+#include <libc-diag.h>
+#include <shlib-compat.h>
 
 #include "nis_xdr.h"
 #include "nis_intern.h"
+#include "libnsl.h"
 
-static void
-splitname (const_nis_name name, nis_name *ibr_name, int *srch_len,
-          nis_attr **srch_val)
+
+struct ib_request *
+__create_ib_request (const_nis_name name, unsigned int flags)
 {
-  char *cptr, *key, *val, *next;
-  int size;
+  struct ib_request *ibreq = calloc (1, sizeof (struct ib_request));
+  nis_attr *search_val = NULL;
+  size_t search_len = 0;
+  size_t size = 0;
 
-  if (name == NULL)
-    return;
+  if (ibreq == NULL)
+    return NULL;
+
+  ibreq->ibr_flags = flags;
 
-  cptr = strdup (name);
-  if (srch_len)
-    *srch_len = 0;
-  if (srch_val)
-    *srch_val = NULL;
-  size = 0;
+  char *cptr = strdupa (name);
 
   /* Not of "[key=value,key=value,...],foo.." format? */
   if (cptr[0] != '[')
     {
-      *ibr_name = cptr;
-      return;
-    }
-
-  *ibr_name = strchr (cptr, ']');
-  if (*ibr_name == NULL || (*ibr_name)[1] != ',')
-    {
-      free (cptr);
-      *ibr_name = NULL;
-      return;
+      ibreq->ibr_name = strdup (cptr);
+      if (ibreq->ibr_name == NULL)
+       {
+         free (ibreq);
+         return NULL;
+       }
+      return ibreq;
     }
 
-  *ibr_name[0] = '\0';
-  *ibr_name += 2;
-  *ibr_name = strdup (*ibr_name);
-
-  if (srch_len == NULL || srch_val == NULL)
+  /* "[key=value,...],foo" format */
+  ibreq->ibr_name = strchr (cptr, ']');
+  if (ibreq->ibr_name == NULL || ibreq->ibr_name[1] != ',')
     {
-      free (cptr);
-      return;
+      /* The object has not really been built yet so we use free.  */
+      free (ibreq);
+      return NULL;
     }
 
-  key = (cptr) + 1;
-  do
+  /* Check if we have an entry of "[key=value,],bar".  If, remove the "," */
+  if (ibreq->ibr_name[-1] == ',')
+    ibreq->ibr_name[-1] = '\0';
+  else
+    ibreq->ibr_name[0] = '\0';
+  ibreq->ibr_name += 2;
+  ibreq->ibr_name = strdup (ibreq->ibr_name);
+  if (ibreq->ibr_name == NULL)
     {
-      next = strchr (key, ',');
-      if (next)
+    free_null:
+      while (search_len-- > 0)
        {
-         next[0] = '\0';
-         ++next;
+         free (search_val[search_len].zattr_ndx);
+         free (search_val[search_len].zattr_val.zattr_val_val);
        }
+      free (search_val);
+      nis_free_request (ibreq);
+      return NULL;
+    }
 
-      val = strchr (key, '=');
-      if (!val)
-       {
-         free (cptr);
-         *srch_val = malloc (sizeof (nis_attr));
-         if (*srch_val == NULL)
-           {
-             free (cptr);
-             free (*ibr_name);
-             *ibr_name = NULL;
-             return;
-           }
-         (*srch_val)[0].zattr_val.zattr_val_len = 0;
-         (*srch_val)[0].zattr_val.zattr_val_val = NULL;
-         return;
-       }
+  ++cptr; /* Remove "[" */
 
-      val[0] = '\0';
-      ++val;
+  while (cptr != NULL && cptr[0] != '\0')
+    {
+      char *key = cptr;
+      char *val = strchr (cptr, '=');
 
-      if ((*srch_len) + 1 >= size)
-       {
-         size += 10;
-         if (size == 10)
-           *srch_val = malloc (size * sizeof (char *));
-         else
-           *srch_val = realloc (val, size * sizeof (char *));
-         if (*srch_val == NULL)
-           {
-             free (cptr);
-             free (*ibr_name);
-             *ibr_name = NULL;
-             return;
-           }
-       }
+      cptr = strchr (key, ',');
+      if (cptr != NULL)
+       *cptr++ = '\0';
 
-      (*srch_val)[*srch_len].zattr_ndx = strdup (key);
-      if (((*srch_val)[*srch_len].zattr_ndx) == NULL)
+      if (__glibc_unlikely (val == NULL))
        {
-         free (cptr);
-         free (*ibr_name);
-         *ibr_name = NULL;
-         return;
+         nis_free_request (ibreq);
+         return NULL;
        }
-      (*srch_val)[*srch_len].zattr_val.zattr_val_len = strlen (val) + 1;
-      (*srch_val)[*srch_len].zattr_val.zattr_val_val = strdup (val);
-      if ((*srch_val)[*srch_len].zattr_val.zattr_val_val == NULL)
+      *val++ = '\0';
+      if (search_len + 1 >= size)
        {
-         free (cptr);
-         free (*ibr_name);
-         *ibr_name = NULL;
-         return;
+         size += 1;
+         nis_attr *newp = realloc (search_val, size * sizeof (nis_attr));
+         if (newp == NULL)
+           goto free_null;
+         search_val = newp;
        }
-      ++(*srch_len);
+      search_val[search_len].zattr_ndx = strdup (key);
+      if (search_val[search_len].zattr_ndx == NULL)
+       goto free_null;
 
-      key = next;
+      search_val[search_len].zattr_val.zattr_val_len = strlen (val) + 1;
+      search_val[search_len].zattr_val.zattr_val_val = strdup (val);
+      if (search_val[search_len].zattr_val.zattr_val_val == NULL)
+       {
+         free (search_val[search_len].zattr_ndx);
+         goto free_null;
+       }
 
+      ++search_len;
     }
-  while (next);
 
-  free (cptr);
+  ibreq->ibr_srch.ibr_srch_val = search_val;
+  ibreq->ibr_srch.ibr_srch_len = search_len;
+
+  return ibreq;
 }
+libnsl_hidden_nolink_def (__create_ib_request, GLIBC_PRIVATE)
 
-static struct ib_request *
-__create_ib_request (const_nis_name name, struct ib_request *ibreq,
-                    u_long flags)
+static const struct timeval RPCTIMEOUT = {10, 0};
+
+static char *
+get_tablepath (char *name, dir_binding *bptr)
 {
-  splitname (name, &ibreq->ibr_name, &ibreq->ibr_srch.ibr_srch_len,
-            &ibreq->ibr_srch.ibr_srch_val);
-  if (ibreq->ibr_name == NULL)
-    return NULL;
+  enum clnt_stat result;
+  nis_result res;
+  struct ns_request req;
 
-  ibreq->ibr_flags = flags;
-  ibreq->ibr_obj.ibr_obj_len = 0;
-  ibreq->ibr_obj.ibr_obj_val = NULL;
-  ibreq->ibr_cbhost.ibr_cbhost_len = 0;
-  ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
-  ibreq->ibr_bufsize = 0;
-  ibreq->ibr_cookie.n_len = 0;
-  ibreq->ibr_cookie.n_bytes = NULL;
+  memset (&res, '\0', sizeof (res));
 
-  return ibreq;
+  req.ns_name = name;
+  req.ns_object.ns_object_len = 0;
+  req.ns_object.ns_object_val = NULL;
+
+  result = clnt_call (bptr->clnt, NIS_LOOKUP, (xdrproc_t) _xdr_ns_request,
+                     (caddr_t) &req, (xdrproc_t) _xdr_nis_result,
+                     (caddr_t) &res, RPCTIMEOUT);
+
+  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 = "";
+
+  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;
+    }
+
+  /* Since tableptr is only set here, and it's set when tablepath is NULL,
+     which it is initially defined as, we know it will always be set here.  */
+  DIAG_PUSH_NEEDS_COMMENT;
+  DIAG_IGNORE_NEEDS_COMMENT (4.7, "-Wmaybe-uninitialized");
+
+  if (*tableptr == NULL)
+    return NIS_NOTFOUND;
+
+  char *newname = strsep (tableptr, ":");
+  if (newname[0] == '\0')
+    return NIS_NOTFOUND;
+
+  DIAG_POP_NEEDS_COMMENT;
+
+  newname = strdup (newname);
+  if (newname == NULL)
+    return NIS_NOMEMORY;
+
+  free (ibreq->ibr_name);
+  ibreq->ibr_name = newname;
+
+  return NIS_SUCCESS;
+}
+libnsl_hidden_nolink_def (__follow_path, GLIBC_PRIVATE)
+
+
 nis_result *
-nis_list (const_nis_name name, u_long flags,
+nis_list (const_nis_name name, unsigned int flags,
          int (*callback) (const_nis_name name,
                           const nis_object *object,
                           const void *userdata),
          const void *userdata)
 {
-  nis_result *res = NULL;
-  ib_request *ibreq = calloc (1, sizeof (ib_request));
+  nis_result *res = malloc (sizeof (nis_result));
+  ib_request *ibreq;
   int status;
+  enum clnt_stat clnt_status;
   int count_links = 0;         /* We will only follow NIS_MAXLINKS links! */
   int done = 0;
   nis_name *names;
   nis_name namebuf[2] = {NULL, NULL};
   int name_nr = 0;
   nis_cb *cb = NULL;
+  char *tableptr;
+  char *tablepath = NULL;
+  int first_try = 0; /* Do we try the old binding at first ? */
+  nis_result *allres = NULL;
 
-  res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
-  if (__create_ib_request (name, ibreq, flags) == 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 (flags & EXPAND_NAME)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
+    {
+      status = NIS_BADNAME;
+      goto err_out;
+    }
+
+  if ((flags & EXPAND_NAME)
+      && ibreq->ibr_name[strlen (ibreq->ibr_name) - 1] != '.')
     {
       names = nis_getnames (ibreq->ibr_name);
       free (ibreq->ibr_name);
       ibreq->ibr_name = NULL;
       if (names == NULL)
        {
-         NIS_RES_STATUS (res) = NIS_BADNAME;
-         return res;
+         nis_free_request (ibreq);
+         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);
+         status = NIS_NOMEMORY;
+         goto err_out;
+       }
     }
   else
     {
@@ -206,219 +275,313 @@ nis_list (const_nis_name name, u_long flags,
 
   cb = NULL;
 
-  if (flags & FOLLOW_PATH || flags & ALL_RESULTS)
+  while (!done)
     {
-      nis_result *lres;
-      u_long newflags = flags & ~FOLLOW_PATH & ~ALL_RESULTS;
-      char table_path[NIS_MAXPATH + 1];
-      char *ntable, *p;
-      u_long done = 0, failures = 0;
+      dir_binding bptr;
+      directory_obj *dir = NULL;
 
-      while (names[name_nr] != NULL && !done)
-       {
-         lres = nis_lookup (names[name_nr], newflags);
-         if (lres == NULL || NIS_RES_STATUS (lres) != NIS_SUCCESS)
-           {
-             NIS_RES_STATUS (res) = NIS_RES_STATUS (lres);
-             nis_freeresult (lres);
-             ++name_nr;
-             continue;
-             }
+      memset (res, '\0', sizeof (nis_result));
 
-         /* nis_lookup handles FOLLOW_LINKS,
-            so we must have a table object.  */
-         if (__type_of (NIS_RES_OBJECT (lres)) != NIS_TABLE_OBJ)
-           {
-             nis_freeresult (lres);
-             NIS_RES_STATUS (res) = NIS_INVALIDOBJ;
-             break;
-           }
-
-         /* Save the path, discard everything else.  */
-         snprintf (table_path, NIS_MAXPATH, "%s:%s", names[name_nr],
-                   NIS_RES_OBJECT (lres)->TA_data.ta_path);
-         nis_freeresult (lres);
-         free (res);
-         res = NULL;
-
-         p = table_path;
-
-         while (((ntable = strsep (&p, ":")) != NULL) && !done)
-           {
-             char *c;
-
-             if (res != NULL)
-               nis_freeresult (res);
-
-             /* Do the job recursive here!  */
-             if ((c = strchr(name, ']')) != NULL)
-               {
-                 /* Have indexed name ! */
-                 int index_len = c - name + 2;
-                 char buf[index_len + strlen (ntable) + 1];
-
-                 c = __stpncpy (buf, name, index_len);
-                 strcpy (c, ntable);
-                 res = nis_list (buf, newflags, callback,userdata);
-               }
-             else
-               res = nis_list (ntable, newflags, callback, userdata);
-             if (res == NULL)
-               return NULL;
-             switch (NIS_RES_STATUS (res))
-               {
-               case NIS_SUCCESS:
-               case NIS_CBRESULTS:
-                 if (!(flags & ALL_RESULTS))
-                   done = 1;
-                 break;
-               case NIS_PARTIAL: /* The table is correct, we doesn't found
-                                    the entry */
-                 break;
-               default:
-                 if (flags & ALL_RESULTS)
-                   ++failures;
-                 else
-                   done = 1;
-                 break;
-               }
-           }
-         if (NIS_RES_STATUS (res) == NIS_SUCCESS && failures)
-           NIS_RES_STATUS (res) = NIS_S_SUCCESS;
-         if (NIS_RES_STATUS (res) == NIS_NOTFOUND && failures)
-           NIS_RES_STATUS (res) = NIS_S_NOTFOUND;
-         break;
+      status = __nisfind_server (ibreq->ibr_name,
+                                ibreq->ibr_srch.ibr_srch_val != NULL,
+                                &dir, &bptr, flags & ~MASTER_ONLY);
+      if (status != NIS_SUCCESS)
+       {
+         NIS_RES_STATUS (res) = status;
+         goto fail3;
        }
-    }
-  else
-    {
+
+      while (__nisbind_connect (&bptr) != NIS_SUCCESS)
+       if (__glibc_unlikely (__nisbind_next (&bptr) != NIS_SUCCESS))
+         {
+           NIS_RES_STATUS (res) = NIS_NAMEUNREACHABLE;
+           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;
-         }
+       }
 
-      while (!done)
-       {
-         memset (res, '\0', sizeof (nis_result));
-
-         status = __do_niscall (ibreq->ibr_name, NIS_IBLIST,
-                                (xdrproc_t) _xdr_ib_request,
-                                (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
-                                (caddr_t) res, flags, cb);
-         if (status != NIS_SUCCESS)
-           NIS_RES_STATUS (res) = status;
-
-         switch (NIS_RES_STATUS (res))
-           {
-           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 we hit the link limit, bail.  */
-                 if (count_links > NIS_MAXLINKS)
+    again:
+      clnt_status = clnt_call (bptr.clnt, NIS_IBLIST,
+                              (xdrproc_t) _xdr_ib_request, (caddr_t) ibreq,
+                              (xdrproc_t) _xdr_nis_result,
+                              (caddr_t) res, RPCTIMEOUT);
+
+      if (__glibc_unlikely (clnt_status != RPC_SUCCESS))
+       NIS_RES_STATUS (res) = NIS_RPCERROR;
+      else
+       switch (NIS_RES_STATUS (res))
+         { /* start switch */
+         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.  */
+             {
+               free (ibreq->ibr_name);
+               ibreq->ibr_name = NULL;
+               /* If we hit the link limit, bail.  */
+               if (__glibc_unlikely (count_links > NIS_MAXLINKS))
+                 {
+                   NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
+                   ++done;
+                   break;
+                 }
+               ++count_links;
+               ibreq->ibr_name =
+                 strdup (NIS_RES_OBJECT (res)->LI_data.li_name);
+               if (ibreq->ibr_name == NULL)
+                 {
+                   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)
+                 if (ibreq->ibr_srch.ibr_srch_len == 0)
                    {
-                     NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
-                     ++done;
-                     break;
+                     ibreq->ibr_srch.ibr_srch_len =
+                       NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_len;
+                     ibreq->ibr_srch.ibr_srch_val =
+                       NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_val;
                    }
-                 if (count_links)
-                   free (ibreq->ibr_name);
-                 ++count_links;
-                 free (ibreq->ibr_name);
-                 ibreq->ibr_name =
-                   strdup (NIS_RES_OBJECT (res)->LI_data.li_name);
-                 if (NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_len)
-                   if (ibreq->ibr_srch.ibr_srch_len == 0)
+               /* 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)
+             {
+               enum nis_error err = __follow_path (&tablepath, &tableptr,
+                                                   ibreq, &bptr);
+               if (err != NIS_SUCCESS)
+                 {
+                   if (err == NIS_NOMEMORY)
+                     NIS_RES_STATUS (res) = err;
+                   ++done;
+                 }
+               else
+                 {
+                   /* 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;
+                 }
+             }
+           else if ((flags & (FOLLOW_PATH | ALL_RESULTS))
+                    == (FOLLOW_PATH | ALL_RESULTS))
+             {
+               if (allres == NULL)
+                 {
+                   allres = res;
+                   res = malloc (sizeof (nis_result));
+                   if (res == NULL)
                      {
-                       ibreq->ibr_srch.ibr_srch_len =
-                         NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_len;
-                       ibreq->ibr_srch.ibr_srch_val =
-                         NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_val;
+                       res = allres;
+                       allres = NULL;
+                       NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                       goto fail;
                      }
-                 nis_freeresult (res);
-                 res = calloc (1, sizeof (nis_result));
-               }
-             else
-               ++done;
-             break;
-           case NIS_CBRESULTS:
-             /* Calback is handled in nis_call.c (__do_niscall2),
-                but we have to change the error code */
-             NIS_RES_STATUS (res) = cb->result;
-             ++done;
-             break;
-           case NIS_UNAVAIL:
-             /* NIS+ is not installed, or all servers are down.  */
+                   NIS_RES_STATUS (res) = NIS_RES_STATUS (allres);
+                 }
+               else
+                 {
+                   nis_object *objects_val
+                     = realloc (NIS_RES_OBJECT (allres),
+                                (NIS_RES_NUMOBJ (allres)
+                                 + NIS_RES_NUMOBJ (res))
+                                * sizeof (nis_object));
+                   if (objects_val == NULL)
+                     {
+                       NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                       goto fail;
+                     }
+                   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
              ++done;
-             break;
-           default:
-             /* Try the next domainname if we don't follow a link.  */
-             if (count_links)
-               {
-                 free (ibreq->ibr_name);
-                 NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
-                 ++done;
-                 break;
-               }
-             ++name_nr;
-             if (names[name_nr] == NULL)
-               {
+           break;
+         case NIS_CBRESULTS:
+           if (cb != NULL)
+             {
+               __nis_do_callback (&bptr, &res->cookie, cb);
+               NIS_RES_STATUS (res) = cb->result;
+
+               if (!(flags & ALL_RESULTS))
                  ++done;
-                 break;
-               }
-             ibreq->ibr_name = names[name_nr];
-             break;
-           }
+               else
+                 {
+                   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;
+         case NIS_SYSTEMERROR:
+         case NIS_NOSUCHNAME:
+         case NIS_NOT_ME:
+           /* If we had first tried the old binding, do nothing, but
+              get a new binding */
+           if (!first_try)
+             {
+               if (__nisbind_next (&bptr) != NIS_SUCCESS)
+                 {
+                   ++done;
+                   break; /* No more servers to search */
+                 }
+               while (__nisbind_connect (&bptr) != NIS_SUCCESS)
+                 {
+                   if (__nisbind_next (&bptr) != NIS_SUCCESS)
+                     {
+                       ++done;
+                       break; /* No more servers to search */
+                     }
+                 }
+               goto again;
+             }
+           break;
+         default:
+           if (!first_try)
+             {
+               /* Try the next domainname if we don't follow a link.  */
+               free (ibreq->ibr_name);
+               ibreq->ibr_name = NULL;
+               if (__glibc_unlikely (count_links))
+                 {
+                   NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
+                   ++done;
+                   break;
+                 }
+               ++name_nr;
+               if (names[name_nr] == NULL)
+                 {
+                   ++done;
+                   break;
+                 }
+               ibreq->ibr_name = strdup (names[name_nr]);
+               if (ibreq->ibr_name == NULL)
+                 {
+                   NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                   goto fail;
+                 }
+               first_try = 1; /* Try old binding at first */
+               goto again;
+             }
+           break;
+         }
+      first_try = 0;
+
+      if (cb)
+       {
+         __nis_destroy_callback (cb);
+         ibreq->ibr_cbhost.ibr_cbhost_len = 0;
+         ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
+         cb = NULL;
        }
-    }                          /* End of not FOLLOW_PATH.  */
+
+      __nisbind_destroy (&bptr);
+      nis_free_directory (dir);
+    }
+
+  free (tablepath);
 
   if (names != namebuf)
     nis_freenames (names);
 
-  if (cb)
+  nis_free_request (ibreq);
+
+  if (allres)
     {
-      __nis_destroy_callback (cb);
-      ibreq->ibr_cbhost.ibr_cbhost_len = 0;
-      ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
+      nis_freeresult (res);
+      return allres;
     }
 
-  nis_free_request (ibreq);
-
   return res;
 }
+libnsl_hidden_nolink_def (nis_list, GLIBC_2_1)
 
 nis_result *
-nis_add_entry (const_nis_name name, const nis_object *obj2, u_long flags)
+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 = calloc (1, sizeof (ib_request));
-  char buf1[strlen (name) + 20];
-  char buf4[strlen (name) + 20];
-
-  res = calloc (1, sizeof (nis_result));
+  nis_result *res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
-  if (ibreq == NULL)
+  if (name == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_NOMEMORY;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if (__create_ib_request (name, ibreq, 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));
 
@@ -433,36 +596,44 @@ nis_add_entry (const_nis_name name, const nis_object *obj2, u_long flags)
   ibreq->ibr_obj.ibr_obj_val = nis_clone_object (&obj, NULL);
   if (ibreq->ibr_obj.ibr_obj_val == NULL)
     {
+      nis_free_request (ibreq);
       NIS_RES_STATUS (res) = NIS_NOMEMORY;
       return res;
     }
   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 (__glibc_unlikely (status != NIS_SUCCESS))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
 
   return res;
 }
+libnsl_hidden_nolink_def (nis_add_entry, GLIBC_2_1)
 
 nis_result *
-nis_modify_entry (const_nis_name name, const nis_object *obj2, u_long flags)
+nis_modify_entry (const_nis_name name, const nis_object *obj2,
+                 unsigned int flags)
 {
   nis_object obj;
   nis_result *res;
   nis_error status;
-  ib_request *ibreq = calloc (1, sizeof (ib_request));
-  char buf1[strlen (name) + 20];
-  char buf4[strlen (name) + 20];
+  ib_request *ibreq;
+  size_t namelen = strlen (name);
+  char buf1[namelen + 20];
+  char buf4[namelen + 20];
 
   res = calloc (1, sizeof (nis_result));
+  if (res == NULL)
+    return NULL;
 
-  if (__create_ib_request (name, ibreq, flags) == NULL)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
@@ -484,41 +655,45 @@ nis_modify_entry (const_nis_name name, const nis_object *obj2, u_long flags)
   ibreq->ibr_obj.ibr_obj_val = nis_clone_object (&obj, NULL);
   if (ibreq->ibr_obj.ibr_obj_val == NULL)
     {
+      nis_free_request (ibreq);
       NIS_RES_STATUS (res) = NIS_NOMEMORY;
       return res;
     }
   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 (__glibc_unlikely (status != NIS_SUCCESS))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
 
   return res;
 }
+libnsl_hidden_nolink_def (nis_modify_entry, GLIBC_2_1)
 
 nis_result *
 nis_remove_entry (const_nis_name name, const nis_object *obj,
-                 u_long flags)
+                 unsigned int flags)
 {
   nis_result *res;
-  ib_request *ibreq = calloc (1, sizeof (ib_request));
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
-  if (ibreq == NULL)
+  if (name == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_NOMEMORY;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if (__create_ib_request (name, ibreq, flags) == NULL)
+  ibreq = __create_ib_request (name, flags);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
@@ -529,6 +704,7 @@ nis_remove_entry (const_nis_name name, const nis_object *obj,
       ibreq->ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
       if (ibreq->ibr_obj.ibr_obj_val == NULL)
        {
+         nis_free_request (ibreq);
          NIS_RES_STATUS (res) = NIS_NOMEMORY;
          return res;
        }
@@ -545,59 +721,65 @@ nis_remove_entry (const_nis_name name, const nis_object *obj,
 
   return res;
 }
+libnsl_hidden_nolink_def (nis_remove_entry, GLIBC_2_1)
 
 nis_result *
 nis_first_entry (const_nis_name name)
 {
   nis_result *res;
-  ib_request *ibreq = calloc (1, sizeof (ib_request));
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
-  if (ibreq == NULL)
+  if (name == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_NOMEMORY;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if (__create_ib_request (name, ibreq, 0) == NULL)
+  ibreq = __create_ib_request (name, 0);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if ((status = __do_niscall (ibreq->ibr_name, NIS_IBFIRST,
-                             (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_IBFIRST,
+                        (xdrproc_t) _xdr_ib_request,
+                        (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
+                        (caddr_t) res, 0, NULL);
+
+  if (__glibc_unlikely (status != NIS_SUCCESS))
     NIS_RES_STATUS (res) = status;
 
   nis_free_request (ibreq);
 
   return res;
 }
+libnsl_hidden_nolink_def (nis_first_entry, GLIBC_2_1)
 
 nis_result *
 nis_next_entry (const_nis_name name, const netobj *cookie)
 {
   nis_result *res;
-  ib_request *ibreq = calloc (1, sizeof (ib_request));
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
   if (res == NULL)
     return NULL;
 
-  if (ibreq == NULL)
+  if (name == NULL)
     {
-      NIS_RES_STATUS (res) = NIS_NOMEMORY;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if (__create_ib_request (name, ibreq, 0) == NULL)
+  ibreq = __create_ib_request (name, 0);
+  if (ibreq == NULL)
     {
       NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
@@ -605,24 +787,27 @@ nis_next_entry (const_nis_name name, const netobj *cookie)
 
   if (cookie != NULL)
     {
-      ibreq->ibr_cookie.n_bytes = malloc (cookie->n_len);
-      if (ibreq->ibr_cookie.n_bytes == NULL)
-       {
-         NIS_RES_STATUS (res) = NIS_NOMEMORY;
-         nis_free_request (ibreq);
-         return res;
-       }
-      memcpy (ibreq->ibr_cookie.n_bytes, cookie->n_bytes, cookie->n_len);
+      ibreq->ibr_cookie.n_bytes = cookie->n_bytes;
       ibreq->ibr_cookie.n_len = cookie->n_len;
     }
 
-  if ((status = __do_niscall (ibreq->ibr_name, NIS_IBNEXT,
-                             (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_IBNEXT,
+                        (xdrproc_t) _xdr_ib_request,
+                        (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
+                        (caddr_t) res, 0, NULL);
+
+  if (__glibc_unlikely (status != NIS_SUCCESS))
     NIS_RES_STATUS (res) = status;
 
+  if (cookie != NULL)
+    {
+      /* Don't give cookie free, it is not from us */
+      ibreq->ibr_cookie.n_bytes = NULL;
+      ibreq->ibr_cookie.n_len = 0;
+    }
+
   nis_free_request (ibreq);
 
   return res;
 }
+libnsl_hidden_nolink_def (nis_next_entry, GLIBC_2_1)