Cleanup last patch.
[kopensolaris-gnu/glibc.git] / nis / nis_table.c
index 16fd1e6..6c4fb83 100644 (file)
-/* Copyright (c) 1997 Free Software Foundation, Inc.
+/* Copyright (c) 1997, 1998, 1999, 2003 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, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
 
 #include <string.h>
 #include <rpcsvc/nis.h>
-#include <rpcsvc/nislib.h>
+
+#include "nis_xdr.h"
 #include "nis_intern.h"
 
-static void
-splitname (const_nis_name name, nis_name *ibr_name, int *srch_len,
-          nis_attr **srch_val)
+
+static 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 (ib_request));
+  char buf[strlen (name) + 1];
+  nis_attr *search_val = NULL;
+  size_t search_len = 0;
+  char *cptr;
+  size_t size = 0;
+
+  if (ibreq == NULL)
+    return NULL;
 
-  if (name == NULL)
-    return;
+  ibreq->ibr_flags = flags;
 
-  cptr = strdup (name);
-  if (srch_len)
-    *srch_len = 0;
-  if (srch_val)
-    *srch_val = NULL;
-  size = 0;
+  cptr = strcpy (buf, name);
 
   /* Not of "[key=value,key=value,...],foo.." format? */
   if (cptr[0] != '[')
-    {
-      *ibr_name = cptr;
-      return;
-    }
+    return (ibreq->ibr_name = strdup (cptr)) == NULL ? NULL : ibreq;
 
-  *ibr_name = strchr (cptr, ']');
-  if (*ibr_name == NULL || (*ibr_name)[1] != ',')
+  /* "[key=value,...],foo" format */
+  ibreq->ibr_name = strchr (cptr, ']');
+  if (ibreq->ibr_name == NULL || ibreq->ibr_name[1] != ',')
     {
-      free (cptr);
-      *ibr_name = NULL;
-      return;
+      ibreq->ibr_name = NULL; /* Or the xdr_* functions will dump */
+      nis_free_request (ibreq);
+      return NULL;
     }
 
-  *ibr_name[0] = '\0';
-  *ibr_name += 2;
-  *ibr_name = strdup (*ibr_name);
+  /* 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)
+    return NULL;
 
-  if (srch_len == NULL || srch_val == NULL)
-    {
-      free (cptr);
-      return;
-    }
+  ++cptr; /* Remove "[" */
 
-  key = (cptr) + 1;
-  do
+  while (cptr != NULL && cptr[0] != '\0')
     {
-      next = strchr (key, ',');
-      if (next)
-       {
-         next[0] = '\0';
-         ++next;
-       }
+      char *key = cptr;
+      char *val = strchr (cptr, '=');
 
-      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 = strchr (key, ',');
+      if (cptr != NULL)
+       *cptr++ = '\0';
 
-      val[0] = '\0';
-      ++val;
-
-      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;
-           }
-       }
-
-      (*srch_val)[*srch_len].zattr_ndx = strdup (key);
-      if (((*srch_val)[*srch_len].zattr_ndx) == NULL)
+      if (!val)
        {
-         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)
-       {
-         free (cptr);
-         free (*ibr_name);
-         *ibr_name = NULL;
-         return;
+      *val++ = '\0';
+      if ((search_len + 1) >= size)
+        {
+          size += 1;
+          search_val = realloc (search_val, size * sizeof (nis_attr));
+         if (search_val == NULL)
+           return NULL;
        }
-      ++(*srch_len);
+      search_val[search_len].zattr_ndx = strdup (key);
+      if ((search_val[search_len].zattr_ndx) == NULL)
+       return 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)
+       return 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;
 }
 
-static struct ib_request *
-__create_ib_request (const_nis_name name, struct ib_request *ibreq,
-                    u_long flags)
+static 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)
+  enum clnt_stat result;
+  nis_result *res = calloc (1, sizeof (nis_result));
+  struct ns_request req;
+
+  if (res == NULL)
     return NULL;
 
-  ibreq->ibr_flags = (flags & (RETURN_RESULT | ADD_OVERWRITE | REM_MULTIPLE |
-                              MOD_SAMEOBJ | ADD_RESERVED | REM_RESERVED |
-                              MOD_EXCLUSIVE));
-  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;
+  req.ns_name = name;
+  req.ns_object.ns_object_len = 0;
+  req.ns_object.ns_object_val = NULL;
 
-  return ibreq;
+  result = clnt_call (bptr->clnt, NIS_LOOKUP, (xdrproc_t) _xdr_ns_request,
+                     (caddr_t) &req, (xdrproc_t) _xdr_nis_result,
+                     (caddr_t) res, RPCTIMEOUT);
+
+  if (result == RPC_SUCCESS && NIS_RES_STATUS (res) == NIS_SUCCESS &&
+      __type_of (NIS_RES_OBJECT (res)) == NIS_TABLE_OBJ)
+    {
+      char *cptr = strdup (NIS_RES_OBJECT (res)->TA_data.ta_path);
+      nis_freeresult (res);
+      return cptr;
+    }
+  else
+    {
+      nis_freeresult (res);
+      return strdup ("");
+    }
 }
 
 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;
-  struct ib_request ibreq;
+  nis_result *res = calloc (1, sizeof (nis_result));
+  ib_request *ibreq;
   int status;
-  int count_links = 0;     /* We will only follow 16 links! */
+  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, *tablepath = NULL;
+  int have_tablepath = 0;
+  int first_try = 0; /* Do we try the old binding at first ? */
 
-  res = calloc (1, sizeof (nis_result));
+  if (res == NULL)
+    return NULL;
 
-  if (__create_ib_request (name, &ibreq, flags) == NULL)
+  if (name == NULL)
     {
-      res->status = NIS_BADNAME;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  if (flags & EXPAND_NAME)
+  if ((ibreq = __create_ib_request (name, flags)) == NULL)
     {
-      names = nis_getnames (ibreq.ibr_name);
-      free (ibreq.ibr_name);
-      ibreq.ibr_name = NULL;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
+      return res;
+    }
+
+  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)
        {
-         res->status = NIS_BADNAME;
+         nis_free_request (ibreq);
+         NIS_RES_STATUS (res) = NIS_BADNAME;
+         return res;
+       }
+      ibreq->ibr_name = strdup (names[name_nr]);
+      if (ibreq->ibr_name == NULL)
+       {
+         nis_free_request (ibreq);
+         NIS_RES_STATUS (res) = NIS_NOMEMORY;
          return res;
        }
-      ibreq.ibr_name = strdup (names[name_nr]);
     }
   else
-    names = namebuf;
+    {
+      names = namebuf;
+      names[name_nr] = ibreq->ibr_name;
+    }
+
+  cb = NULL;
 
   while (!done)
     {
+      dir_binding bptr;
+      directory_obj *dir = NULL;
+
       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);
+      status = __nisfind_server (ibreq->ibr_name, &dir);
       if (status != NIS_SUCCESS)
-       res->status = status;
-
-      switch (res->status)
+        {
+         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);
+      if (status != NIS_SUCCESS)
+        {
+         nis_free_request (ibreq);
+          NIS_RES_STATUS (res) = status;
+          nis_free_directory (dir);
+          return res;
+        }
+
+      while (__nisbind_connect (&bptr) != NIS_SUCCESS)
+       if (__nisbind_next (&bptr) != NIS_SUCCESS)
+         {
+           __nisbind_destroy (&bptr);
+           nis_free_directory (dir);
+           nis_free_request (ibreq);
+           NIS_RES_STATUS (res) = NIS_NAMEUNREACHABLE;
+           return res;
+         }
+
+      if (callback != NULL)
        {
-       case NIS_PARTIAL:
-       case NIS_SUCCESS:
-       case NIS_S_SUCCESS:
-         if (__type_of(NIS_RES_OBJECT (res)) == LINK_OBJ &&
-             flags & FOLLOW_LINKS) /* We are following links */
-           {
-             /* if we hit the link limit, bail */
-             if (count_links > NIS_MAXLINKS)
-               {
-                 res->status = NIS_LINKNAMEERROR;
-                 ++done;
-                 break;
-               }
-             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)
+         cb = __nis_create_callback (callback, userdata, flags);
+         ibreq->ibr_cbhost.ibr_cbhost_len = 1;
+         ibreq->ibr_cbhost.ibr_cbhost_val = cb->serv;
+       }
+
+    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 (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 (count_links > NIS_MAXLINKS)
                  {
-                   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;
+                   NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
+                   ++done;
+                   break;
                  }
-             nis_freeresult (res);
-             res = calloc (1, sizeof (nis_result));
-           }
-         else
-           ++done;
-         break;
-       case NIS_CBRESULTS:
-         /* XXX Implement CALLBACK here ! */
-         ++done;
-         break;
-       default:
-         /* Try the next domainname if we don't follow a link */
-         if (count_links)
-           {
-             free (ibreq.ibr_name);
-             res->status = NIS_LINKNAMEERROR;
-             ++done;
-             break;
-           }
-         ++name_nr;
-         if (names[name_nr] == NULL)
-           {
+               ++count_links;
+               ibreq->ibr_name =
+                 strdup (NIS_RES_OBJECT (res)->LI_data.li_name);
+               if (ibreq->ibr_name == NULL)
+                 {
+                   nis_free_request (ibreq);
+                   NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                   return res;
+                 }
+               if (NIS_RES_OBJECT (res)->LI_data.li_attrs.li_attrs_len)
+                 if (ibreq->ibr_srch.ibr_srch_len == 0)
+                   {
+                     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;
+                   }
+               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;
+                 }
+               first_try = 1; /* Try at first the old binding */
+               goto again;
+             }
+           else if ((flags & FOLLOW_PATH) &&
+                    NIS_RES_STATUS (res) == NIS_PARTIAL)
+             {
+               if (!have_tablepath)
+                 {
+                   tablepath = __get_tablepath (ibreq->ibr_name, &bptr);
+                   tableptr = tablepath;
+                   have_tablepath = 1;
+                 }
+               if (tableptr == NULL)
+                 {
+                   ++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 ("");
+                   if (ibreq->ibr_name == NULL)
+                     {
+                       nis_free_request (ibreq);
+                       NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                       return res;
+                     }
+                   ++done;
+                 }
+               else
+                 {
+                   ibreq->ibr_name = strdup (ibreq->ibr_name);
+                   nis_freeresult (res);
+                   res = calloc (1, sizeof (nis_result));
+                   if (res == NULL || ibreq->ibr_name == NULL)
+                     {
+                       free (res);
+                       nis_free_request (ibreq);
+                       if (have_tablepath)
+                         free (tablepath);
+                       __nisbind_destroy (&bptr);
+                       nis_free_directory (dir);
+                       return NULL;
+                     }
+                   first_try = 1;
+                   goto again;
+                 }
+             }
+           else
              ++done;
-             break;
-           }
-         ibreq.ibr_name = names[name_nr];
-         break;
+           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;
+               else
+                 {
+                   if (!have_tablepath)
+                     {
+                       tablepath = __get_tablepath (ibreq->ibr_name, &bptr);
+                       tableptr = tablepath;
+                       have_tablepath = 1;
+                     }
+                   if (tableptr == NULL)
+                     {
+                       ++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;
+                     }
+                 }
+             }
+           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 (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_free_request (ibreq);
+                   NIS_RES_STATUS (res) = NIS_NOMEMORY;
+                   return res;
+                 }
+               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;
        }
+
+      __nisbind_destroy (&bptr);
+      nis_free_directory (dir);
     }
 
   if (names != namebuf)
     nis_freenames (names);
 
-  nis_free_request (&ibreq);
-
-  if (callback != NULL &&
-      (res->status == NIS_SUCCESS || res->status == NIS_S_SUCCESS))
-    {
-      unsigned int i;
-
-      for (i = 0; i < res->objects.objects_len; ++i)
-       if ((*callback) (name, &(res->objects.objects_val)[i], userdata) != 0)
-         break;
-    }
+  nis_free_request (ibreq);
 
   return res;
 }
 
 nis_result *
-nis_add_entry (const_nis_name name, const nis_object *obj,
-              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;
-  struct ib_request ibreq;
-  char *p1, *p2, *p3, *p4;
-  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 (name == NULL)
+    {
+      NIS_RES_STATUS (res) = NIS_BADNAME;
+      return res;
+    }
 
-  if (__create_ib_request (name, &ibreq, flags) == NULL)
+  if ((ibreq = __create_ib_request (name, flags)) == NULL)
     {
-      res->status = NIS_BADNAME;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  ibreq.ibr_flags = flags;
-  ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
-  ibreq.ibr_obj.ibr_obj_len = 1;
+  memcpy (&obj, obj2, sizeof (nis_object));
 
-  p1 = ibreq.ibr_obj.ibr_obj_val->zo_name;
-  if (p1 == NULL || strlen (p1) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_name =
-      nis_leaf_of_r (name, buf1, sizeof (buf1));
+  if (obj.zo_name == NULL || strlen (obj.zo_name) == 0)
+    obj.zo_name = nis_leaf_of_r (name, buf1, sizeof (buf1));
 
-  p2 = ibreq.ibr_obj.ibr_obj_val->zo_owner;
-  if (p2 == NULL || strlen (p2) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_owner = nis_local_principal ();
+  if (obj.zo_owner == NULL || strlen (obj.zo_owner) == 0)
+    obj.zo_owner = nis_local_principal ();
 
-  p3 = ibreq.ibr_obj.ibr_obj_val->zo_group;
-  if (p3 == NULL || strlen (p3) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_group = nis_local_group ();
+  if (obj.zo_group == NULL || strlen (obj.zo_group) == 0)
+    obj.zo_group = nis_local_group ();
 
-  p4 = ibreq.ibr_obj.ibr_obj_val->zo_domain;
-  ibreq.ibr_obj.ibr_obj_val->zo_domain =
-    nis_domain_of_r (name, buf4, sizeof (buf4));
+  obj.zo_domain = nis_domain_of_r (name, buf4, sizeof (buf4));
 
-  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)) != NIS_SUCCESS)
-    res->status = status;
+  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;
 
-  ibreq.ibr_obj.ibr_obj_val->zo_name = p1;
-  ibreq.ibr_obj.ibr_obj_val->zo_owner = p2;
-  ibreq.ibr_obj.ibr_obj_val->zo_group = p3;
-  ibreq.ibr_obj.ibr_obj_val->zo_domain = p4;
+  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_RES_STATUS (res) = status;
 
-  nis_free_request (&ibreq);
+  nis_free_request (ibreq);
 
   return res;
 }
 
 nis_result *
-nis_modify_entry (const_nis_name name, const nis_object *obj,
-                 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;
-  struct ib_request ibreq;
-  char *p1, *p2, *p3, *p4;
-  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)
+  if (( ibreq =__create_ib_request (name, flags)) == NULL)
     {
-      res->status = NIS_BADNAME;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  ibreq.ibr_flags = flags;
-  ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
-  ibreq.ibr_obj.ibr_obj_len = 1;
+  memcpy (&obj, obj2, sizeof (nis_object));
 
-  p1 = ibreq.ibr_obj.ibr_obj_val->zo_name;
-  if (p1 == NULL || strlen (p1) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_name =
-      nis_leaf_of_r (name, buf1, sizeof (buf1));
+  if (obj.zo_name == NULL || strlen (obj.zo_name) == 0)
+    obj.zo_name = nis_leaf_of_r (name, buf1, sizeof (buf1));
 
-  p2 = ibreq.ibr_obj.ibr_obj_val->zo_owner;
-  if (p2 == NULL || strlen (p2) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_owner = nis_local_principal ();
+  if (obj.zo_owner == NULL || strlen (obj.zo_owner) == 0)
+    obj.zo_owner = nis_local_principal ();
 
-  p3 = ibreq.ibr_obj.ibr_obj_val->zo_group;
-  if (p3 == NULL || strlen (p3) == 0)
-    ibreq.ibr_obj.ibr_obj_val->zo_group = nis_local_group ();
+  if (obj.zo_group == NULL || strlen (obj.zo_group) == 0)
+    obj.zo_group = nis_local_group ();
 
-  p4 = ibreq.ibr_obj.ibr_obj_val->zo_domain;
-  ibreq.ibr_obj.ibr_obj_val->zo_domain =
-    nis_domain_of_r (name, buf4, sizeof (buf4));
+  obj.zo_domain = nis_domain_of_r (name, buf4, sizeof (buf4));
 
-  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)) != NIS_SUCCESS)
-    res->status = status;
+  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;
 
-  ibreq.ibr_obj.ibr_obj_val->zo_name = p1;
-  ibreq.ibr_obj.ibr_obj_val->zo_owner = p2;
-  ibreq.ibr_obj.ibr_obj_val->zo_group = p3;
-  ibreq.ibr_obj.ibr_obj_val->zo_domain = p4;
+  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)
+    NIS_RES_STATUS (res) = status;
 
-  nis_free_request (&ibreq);
+  nis_free_request (ibreq);
 
   return res;
 }
 
 nis_result *
 nis_remove_entry (const_nis_name name, const nis_object *obj,
-                 u_long flags)
+                 unsigned int flags)
 {
   nis_result *res;
-  struct ib_request ibreq;
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
+  if (res == NULL)
+    return NULL;
+
+  if (name == NULL)
+    {
+      NIS_RES_STATUS (res) = NIS_BADNAME;
+      return res;
+    }
 
-  if (__create_ib_request (name, &ibreq, flags) == NULL)
+  if ((ibreq =__create_ib_request (name, flags)) == NULL)
     {
-      res->status = NIS_BADNAME;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
-  ibreq.ibr_flags = flags;
   if (obj != NULL)
     {
-      ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
-      ibreq.ibr_obj.ibr_obj_len = 1;
+      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_IBREMOVE,
-                             (xdrproc_t) xdr_ib_request,
-                             (caddr_t) & ibreq, (xdrproc_t) xdr_nis_result,
-                             (caddr_t) res, 0)) != NIS_SUCCESS)
-    res->status = status;
+  if ((status = __do_niscall (ibreq->ibr_name, NIS_IBREMOVE,
+                             (xdrproc_t) _xdr_ib_request,
+                             (caddr_t) ibreq, (xdrproc_t) _xdr_nis_result,
+                             (caddr_t) res, 0, NULL)) != NIS_SUCCESS)
+    NIS_RES_STATUS (res) = status;
 
-  nis_free_request (&ibreq);
+  nis_free_request (ibreq);
 
   return res;
 }
@@ -437,24 +631,35 @@ nis_result *
 nis_first_entry (const_nis_name name)
 {
   nis_result *res;
-  struct ib_request ibreq;
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
+  if (res == NULL)
+    return NULL;
+
+  if (name == NULL)
+    {
+      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)
     {
-      res->status = NIS_BADNAME;
+      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)) != NIS_SUCCESS)
-    res->status = status;
+  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 (status != NIS_SUCCESS)
+    NIS_RES_STATUS (res) = status;
 
-  nis_free_request (&ibreq);
+  nis_free_request (ibreq);
 
   return res;
 }
@@ -463,37 +668,48 @@ nis_result *
 nis_next_entry (const_nis_name name, const netobj *cookie)
 {
   nis_result *res;
-  struct ib_request ibreq;
+  ib_request *ibreq;
   nis_error status;
 
   res = calloc (1, sizeof (nis_result));
+  if (res == NULL)
+    return NULL;
+
+  if (name == NULL)
+    {
+      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)
     {
-      res->status = NIS_BADNAME;
+      NIS_RES_STATUS (res) = NIS_BADNAME;
       return res;
     }
 
   if (cookie != NULL)
     {
-      ibreq.ibr_cookie.n_bytes = malloc (cookie->n_len);
-      if (ibreq.ibr_cookie.n_bytes == NULL)
-       {
-         res->status = NIS_NOMEMORY;
-         free (res);
-         return NULL;
-       }
-      memcpy (ibreq.ibr_cookie.n_bytes, cookie->n_bytes, cookie->n_len);
-      ibreq.ibr_cookie.n_len = 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)) != NIS_SUCCESS)
-    res->status = status;
+  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 (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);
+  nis_free_request (ibreq);
 
   return res;
 }