Logo Search packages:      
Sourcecode: glibc version File versions

nis_table.c

/* Copyright (c) 1997, 1998, 1999 Free Software Foundation, Inc.
   This file is part of the GNU C Library.
   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 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
   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.  */

#include <string.h>
#include <rpcsvc/nis.h>

#include "nis_xdr.h"
#include "nis_intern.h"


static struct ib_request *
__create_ib_request (const_nis_name name, unsigned int flags)
{
  struct ib_request *ibreq = calloc (1, sizeof (ib_request));
  char buf[strlen (name) + 1];
  nis_attr *search_val = NULL;
  int search_len = 0;
  char *cptr;
  size_t size = 0;

  if (ibreq == NULL)
    return NULL;

  ibreq->ibr_flags = flags;

  cptr = strcpy (buf, name);

  /* Not of "[key=value,key=value,...],foo.." format? */
  if (cptr[0] != '[')
    return (ibreq->ibr_name = strdup (cptr)) == NULL ? NULL : ibreq;

  /* "[key=value,...],foo" format */
  ibreq->ibr_name = strchr (cptr, ']');
  if (ibreq->ibr_name == NULL || ibreq->ibr_name[1] != ',')
    {
      ibreq->ibr_name = NULL; /* Or the xdr_* functions will dump */
      nis_free_request (ibreq);
      return NULL;
    }

  /* 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;

  ++cptr; /* Remove "[" */

  while (cptr != NULL && cptr[0] != '\0')
    {
      char *key = cptr;
      char *val = strchr (cptr, '=');

      cptr = strchr (key, ',');
      if (cptr != NULL)
      *cptr++ = '\0';

      if (!val)
      {
        nis_free_request (ibreq);
        return NULL;
      }
      *val++ = '\0';
      if ((search_len + 1) >= size)
        {
          size += 1;
          search_val = realloc (search_val, size * sizeof (nis_attr));
        if (search_val == NULL)
          return NULL;
      }
      search_val[search_len].zattr_ndx = strdup (key);
      if ((search_val[search_len].zattr_ndx) == NULL)
      return NULL;

      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;
    }

  ibreq->ibr_srch.ibr_srch_val = search_val;
  ibreq->ibr_srch.ibr_srch_len = search_len;

  return ibreq;
}

static struct timeval RPCTIMEOUT = {10, 0};

static char *
__get_tablepath (char *name, dir_binding *bptr)
{
  enum clnt_stat result;
  nis_result *res = calloc (1, sizeof (nis_result));
  struct ns_request req;

  if (res == NULL)
    return NULL;

  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);

  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, unsigned int flags,
        int (*callback) (const_nis_name name,
                     const nis_object *object,
                     const void *userdata),
        const void *userdata)
{
  nis_result *res = calloc (1, 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, *tablepath = NULL;
  int have_tablepath = 0;
  int first_try = 0; /* Do we try the old binding at first ? */

  if (res == NULL)
    return NULL;

  if (name == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  if ((ibreq = __create_ib_request (name, flags)) == 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)
      {
        nis_free_request (ibreq);
        NIS_RES_STATUS (res) = NIS_BADNAME;
        return res;
      }
      ibreq->ibr_name = strdup (names[name_nr]);
    }
  else
    {
      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 = __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);
      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)
      {
        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)
              {
                NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
                ++done;
                break;
              }
            ++count_links;
            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)
                {
                  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 ("");
                ++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)
                  {
                  if (res)
                    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;
        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);
              }
            }
          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.  */
            if (count_links)
              {
                free (ibreq->ibr_name);
                NIS_RES_STATUS (res) = NIS_LINKNAMEERROR;
                ++done;
                break;
              }
            ++name_nr;
            if (names[name_nr] == NULL)
              {
                ++done;
                break;
              }
            ibreq->ibr_name = names[name_nr];
            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);

  return res;
}

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));
  if (res == NULL)
    return NULL;

  if (name == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  if ((ibreq = __create_ib_request (name, flags)) == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  memcpy (&obj, obj2, sizeof (nis_object));

  if (obj.zo_name == NULL || strlen (obj.zo_name) == 0)
    obj.zo_name = nis_leaf_of_r (name, buf1, sizeof (buf1));

  if (obj.zo_owner == NULL || strlen (obj.zo_owner) == 0)
    obj.zo_owner = nis_local_principal ();

  if (obj.zo_group == NULL || strlen (obj.zo_group) == 0)
    obj.zo_group = nis_local_group ();

  obj.zo_domain = nis_domain_of_r (name, buf4, sizeof (buf4));

  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_RES_STATUS (res) = status;

  nis_free_request (ibreq);

  return res;
}

nis_result *
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;
  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 (( ibreq =__create_ib_request (name, flags)) == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  memcpy (&obj, obj2, sizeof (nis_object));

  if (obj.zo_name == NULL || strlen (obj.zo_name) == 0)
    obj.zo_name = nis_leaf_of_r (name, buf1, sizeof (buf1));

  if (obj.zo_owner == NULL || strlen (obj.zo_owner) == 0)
    obj.zo_owner = nis_local_principal ();

  if (obj.zo_group == NULL || strlen (obj.zo_group) == 0)
    obj.zo_group = nis_local_group ();

  obj.zo_domain = nis_domain_of_r (name, buf4, sizeof (buf4));

  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)
    NIS_RES_STATUS (res) = status;

  nis_free_request (ibreq);

  return res;
}

nis_result *
nis_remove_entry (const_nis_name name, const nis_object *obj,
              unsigned int flags)
{
  nis_result *res;
  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 ((ibreq =__create_ib_request (name, flags)) == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  if (obj != NULL)
    {
      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, NULL)) != NIS_SUCCESS)
    NIS_RES_STATUS (res) = status;

  nis_free_request (ibreq);

  return res;
}

nis_result *
nis_first_entry (const_nis_name name)
{
  nis_result *res;
  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;
    }

  ibreq = __create_ib_request (name, 0);
  if (ibreq == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  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);

  return res;
}

nis_result *
nis_next_entry (const_nis_name name, const netobj *cookie)
{
  nis_result *res;
  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;
    }

  ibreq = __create_ib_request (name, 0);
  if (ibreq == NULL)
    {
      NIS_RES_STATUS (res) = NIS_BADNAME;
      return res;
    }

  if (cookie != NULL)
    {
      ibreq->ibr_cookie.n_bytes = cookie->n_bytes;
      ibreq->ibr_cookie.n_len = cookie->n_len;
    }

  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);

  return res;
}

Generated by  Doxygen 1.6.0   Back to index