nis/nis_table.c

   1 /* Copyright (c) 1997 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Library General Public License as
   7    published by the Free Software Foundation; either version 2 of the
   8    License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Library General Public License for more details.
  14
  15    You should have received a copy of the GNU Library General Public
  16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18    Boston, MA 02111-1307, USA.  */
  19
  20 #include <string.h>
  21 #include <rpcsvc/nis.h>
  22 #include <rpcsvc/nislib.h>
  23 #include "nis_intern.h"
  24
  25 static void
  26 splitname (const_nis_name name, nis_name *ibr_name, int *srch_len,
  27            nis_attr **srch_val)
  28 {
  29   char *cptr, *key, *val, *next;
  30   int size;
  31
  32   if (name == NULL)
  33     return;
  34
  35   cptr = strdup (name);
  36   if (srch_len)
  37     *srch_len = 0;
  38   if (srch_val)
  39     *srch_val = NULL;
  40   size = 0;
  41
  42   /* Not of "[key=value,key=value,...],foo.." format? */
  43   if (cptr[0] != '[')
  44     {
  45       *ibr_name = cptr;
  46       return;
  47     }
  48
  49   *ibr_name = strchr (cptr, ']');
  50   if (*ibr_name == NULL || (*ibr_name)[1] != ',')
  51     {
  52       free (cptr);
  53       *ibr_name = NULL;
  54       return;
  55     }
  56
  57   *ibr_name[0] = '\0';
  58   *ibr_name += 2;
  59   *ibr_name = strdup (*ibr_name);
  60
  61   if (srch_len == NULL || srch_val == NULL)
  62     {
  63       free (cptr);
  64       return;
  65     }
  66
  67   key = (cptr) + 1;
  68   do
  69     {
  70       next = strchr (key, ',');
  71       if (next)
  72         {
  73           next[0] = '\0';
  74           ++next;
  75         }
  76
  77       val = strchr (key, '=');
  78       if (!val)
  79         {
  80           free (cptr);
  81           *srch_val = malloc (sizeof (nis_attr));
  82           if (*srch_val == NULL)
  83             {
  84               free (cptr);
  85               free (*ibr_name);
  86               *ibr_name = NULL;
  87               return;
  88             }
  89           (*srch_val)[0].zattr_val.zattr_val_len = 0;
  90           (*srch_val)[0].zattr_val.zattr_val_val = NULL;
  91           return;
  92         }
  93
  94       val[0] = '\0';
  95       ++val;
  96
  97       if ((*srch_len) + 1 >= size)
  98         {
  99           size += 10;
 100           if (size == 10)
 101             *srch_val = malloc (size * sizeof (char *));
 102           else
 103             *srch_val = realloc (val, size * sizeof (char *));
 104           if (*srch_val == NULL)
 105             {
 106               free (cptr);
 107               free (*ibr_name);
 108               *ibr_name = NULL;
 109               return;
 110             }
 111         }
 112
 113       (*srch_val)[*srch_len].zattr_ndx = strdup (key);
 114       if (((*srch_val)[*srch_len].zattr_ndx) == NULL)
 115         {
 116           free (cptr);
 117           free (*ibr_name);
 118           *ibr_name = NULL;
 119           return;
 120         }
 121       (*srch_val)[*srch_len].zattr_val.zattr_val_len = strlen (val) + 1;
 122       (*srch_val)[*srch_len].zattr_val.zattr_val_val = strdup (val);
 123       if ((*srch_val)[*srch_len].zattr_val.zattr_val_val == NULL)
 124         {
 125           free (cptr);
 126           free (*ibr_name);
 127           *ibr_name = NULL;
 128           return;
 129         }
 130       ++(*srch_len);
 131
 132       key = next;
 133
 134     }
 135   while (next);
 136
 137   free (cptr);
 138 }
 139
 140 static struct ib_request *
 141 __create_ib_request (const_nis_name name, struct ib_request *ibreq,
 142                      u_long flags)
 143 {
 144   splitname (name, &ibreq->ibr_name, &ibreq->ibr_srch.ibr_srch_len,
 145              &ibreq->ibr_srch.ibr_srch_val);
 146   if (ibreq->ibr_name == NULL)
 147     return NULL;
 148   if ((flags & EXPAND_NAME) == EXPAND_NAME)
 149     {
 150       nis_name *names;
 151
 152       names = __nis_expandname (ibreq->ibr_name);
 153       free (ibreq->ibr_name);
 154       ibreq->ibr_name = NULL;
 155       if (names == NULL)
 156         return NULL;
 157       ibreq->ibr_name = strdup (names[0]);
 158       nis_freenames (names);
 159     }
 160
 161   ibreq->ibr_flags = (flags & (RETURN_RESULT | ADD_OVERWRITE | REM_MULTIPLE |
 162                                MOD_SAMEOBJ | ADD_RESERVED | REM_RESERVED |
 163                                MOD_EXCLUSIVE));
 164   ibreq->ibr_obj.ibr_obj_len = 0;
 165   ibreq->ibr_obj.ibr_obj_val = NULL;
 166   ibreq->ibr_cbhost.ibr_cbhost_len = 0;
 167   ibreq->ibr_cbhost.ibr_cbhost_val = NULL;
 168   ibreq->ibr_bufsize = 0;
 169   ibreq->ibr_cookie.n_len = 0;
 170   ibreq->ibr_cookie.n_bytes = NULL;
 171
 172   return ibreq;
 173 }
 174
 175 nis_result *
 176 nis_list (const_nis_name name, u_long flags,
 177           int (*callback) (const_nis_name name,
 178                            const nis_object *object,
 179                            const void *userdata),
 180           const void *userdata)
 181 {
 182   nis_result *res = NULL;
 183   struct ib_request ibreq;
 184   int result;
 185   int count_links = 0;          /* We will only follow 16 links! */
 186   int is_link = 1;              /* We should go at least once in the while loop */
 187
 188   res = calloc (1, sizeof (nis_result));
 189
 190   if (__create_ib_request (name, &ibreq, flags) == NULL)
 191     {
 192       res->status = NIS_BADNAME;
 193       return res;
 194     }
 195
 196   while (is_link)
 197     {
 198       memset (res, '\0', sizeof (nis_result));
 199
 200       if ((result = __do_niscall (ibreq.ibr_name, NIS_IBLIST,
 201                                   (xdrproc_t) xdr_ib_request,
 202                                   (caddr_t) &ibreq, (xdrproc_t) xdr_nis_result,
 203                                   (caddr_t) res, flags)) != RPC_SUCCESS)
 204         {
 205           res->status = result;
 206           nis_free_request (&ibreq);
 207           return res;
 208         }
 209
 210       nis_free_request (&ibreq);
 211
 212       if ((res->status == NIS_SUCCESS || res->status == NIS_S_SUCCESS) &&
 213           (res->objects.objects_len > 0 &&
 214            res->objects.objects_val->zo_data.zo_type == LINK_OBJ))
 215         is_link = 1;
 216       else
 217         is_link = 0;
 218
 219       if (is_link)
 220         {
 221           if ((flags & FOLLOW_LINKS) == FOLLOW_LINKS)
 222             {
 223               if (count_links == 16)
 224                 {
 225                   res->status = NIS_LINKNAMEERROR;
 226                   return res;
 227                 }
 228               else
 229                 ++count_links;
 230
 231               if (__create_ib_request (res->objects.objects_val->LI_data.li_name,
 232                                        &ibreq, flags) == NULL)
 233                 {
 234                   res->status = NIS_BADNAME;
 235                   return res;
 236                 }
 237             }
 238           else
 239             {
 240               res->status = NIS_NOTSEARCHABLE;
 241               return res;
 242             }
 243         }
 244     }
 245
 246   if (callback != NULL &&
 247       (res->status == NIS_SUCCESS || res->status == NIS_S_SUCCESS))
 248     {
 249       unsigned int i;
 250
 251       for (i = 0; i < res->objects.objects_len; ++i)
 252         if ((*callback) (name, &(res->objects.objects_val)[i], userdata) != 0)
 253           break;
 254     }
 255
 256   return res;
 257 }
 258
 259 nis_result *
 260 nis_add_entry (const_nis_name name, const nis_object *obj,
 261                u_long flags)
 262 {
 263   nis_result *res;
 264   nis_error status;
 265   struct ib_request ibreq;
 266   char *p1, *p2, *p3, *p4;
 267   char buf1 [strlen (name) + 20];
 268   char buf4 [strlen (name) + 20];
 269
 270   res = calloc (1, sizeof (nis_result));
 271
 272   if (__create_ib_request (name, &ibreq, flags) == NULL)
 273     {
 274       res->status = NIS_BADNAME;
 275       return res;
 276     }
 277
 278   ibreq.ibr_flags = flags;
 279   ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
 280   ibreq.ibr_obj.ibr_obj_len = 1;
 281
 282   p1 = ibreq.ibr_obj.ibr_obj_val[0].zo_name;
 283   if (p1 == NULL || strlen (p1) == 0)
 284     ibreq.ibr_obj.ibr_obj_val[0].zo_name =
 285       nis_leaf_of_r (name, buf1, sizeof (buf1));
 286
 287   p2 = ibreq.ibr_obj.ibr_obj_val[0].zo_owner;
 288   if (p2 == NULL || strlen (p2) == 0)
 289     ibreq.ibr_obj.ibr_obj_val[0].zo_owner = nis_local_principal ();
 290
 291   p3 = ibreq.ibr_obj.ibr_obj_val[0].zo_group;
 292   if (p3 == NULL || strlen (p3) == 0)
 293     ibreq.ibr_obj.ibr_obj_val[0].zo_group = nis_local_group ();
 294
 295   p4 = ibreq.ibr_obj.ibr_obj_val[0].zo_domain;
 296   ibreq.ibr_obj.ibr_obj_val[0].zo_domain =
 297     nis_domain_of_r (name, buf4, sizeof (buf4));
 298
 299   if ((status = __do_niscall (ibreq.ibr_name, NIS_IBADD,
 300                               (xdrproc_t) xdr_ib_request,
 301                               (caddr_t) &ibreq,
 302                               (xdrproc_t) xdr_nis_result,
 303                               (caddr_t) res, 0)) != RPC_SUCCESS)
 304     res->status = status;
 305
 306   ibreq.ibr_obj.ibr_obj_val[0].zo_name = p1;
 307   ibreq.ibr_obj.ibr_obj_val[0].zo_owner = p2;
 308   ibreq.ibr_obj.ibr_obj_val[0].zo_group = p3;
 309   ibreq.ibr_obj.ibr_obj_val[0].zo_domain = p4;
 310
 311   nis_free_request (&ibreq);
 312
 313   return res;
 314 }
 315
 316 nis_result *
 317 nis_modify_entry (const_nis_name name, const nis_object *obj,
 318                   u_long flags)
 319 {
 320   nis_result *res;
 321   nis_error status;
 322   struct ib_request ibreq;
 323   char *p1, *p2, *p3, *p4;
 324   char buf1 [strlen (name) + 20];
 325   char buf4 [strlen (name) + 20];
 326
 327   res = calloc (1, sizeof (nis_result));
 328
 329   if (__create_ib_request (name, &ibreq, flags) == NULL)
 330     {
 331       res->status = NIS_BADNAME;
 332       return res;
 333     }
 334
 335   ibreq.ibr_flags = flags;
 336   ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
 337   ibreq.ibr_obj.ibr_obj_len = 1;
 338
 339   p1 = ibreq.ibr_obj.ibr_obj_val[0].zo_name;
 340   if (p1 == NULL || strlen (p1) == 0)
 341     ibreq.ibr_obj.ibr_obj_val[0].zo_name =
 342       nis_leaf_of_r (name, buf1, sizeof (buf1));
 343
 344   p2 = ibreq.ibr_obj.ibr_obj_val[0].zo_owner;
 345   if (p2 == NULL || strlen (p2) == 0)
 346     ibreq.ibr_obj.ibr_obj_val[0].zo_owner = nis_local_principal ();
 347
 348   p3 = ibreq.ibr_obj.ibr_obj_val[0].zo_group;
 349   if (p3 == NULL || strlen (p3) == 0)
 350     ibreq.ibr_obj.ibr_obj_val[0].zo_group = nis_local_group ();
 351
 352   p4 = ibreq.ibr_obj.ibr_obj_val[0].zo_domain;
 353   ibreq.ibr_obj.ibr_obj_val[0].zo_domain =
 354     nis_domain_of_r (name, buf4, sizeof (buf4));
 355
 356   if ((status = __do_niscall (ibreq.ibr_name, NIS_IBMODIFY,
 357                               (xdrproc_t) xdr_ib_request,
 358                               (caddr_t) & ibreq, (xdrproc_t) xdr_nis_result,
 359                               (caddr_t) res, 0)) != RPC_SUCCESS)
 360     res->status = status;
 361
 362   ibreq.ibr_obj.ibr_obj_val[0].zo_name = p1;
 363   ibreq.ibr_obj.ibr_obj_val[0].zo_owner = p2;
 364   ibreq.ibr_obj.ibr_obj_val[0].zo_group = p3;
 365   ibreq.ibr_obj.ibr_obj_val[0].zo_domain = p4;
 366
 367   nis_free_request (&ibreq);
 368
 369   return res;
 370 }
 371
 372 nis_result *
 373 nis_remove_entry (const_nis_name name, const nis_object *obj,
 374                   u_long flags)
 375 {
 376   nis_result *res;
 377   struct ib_request ibreq;
 378   nis_error status;
 379
 380   res = calloc (1, sizeof (nis_result));
 381
 382   if (__create_ib_request (name, &ibreq, flags) == NULL)
 383     {
 384       res->status = NIS_BADNAME;
 385       return res;
 386     }
 387
 388   ibreq.ibr_flags = flags;
 389   if (obj != NULL)
 390     {
 391       ibreq.ibr_obj.ibr_obj_val = nis_clone_object (obj, NULL);
 392       ibreq.ibr_obj.ibr_obj_len = 1;
 393     }
 394
 395   if ((status = __do_niscall (ibreq.ibr_name, NIS_IBREMOVE,
 396                               (xdrproc_t) xdr_ib_request,
 397                               (caddr_t) & ibreq, (xdrproc_t) xdr_nis_result,
 398                               (caddr_t) res, 0)) != RPC_SUCCESS)
 399     res->status = status;
 400
 401   nis_free_request (&ibreq);
 402
 403   return res;
 404 }
 405
 406 nis_result *
 407 nis_first_entry (const_nis_name name)
 408 {
 409   nis_result *res;
 410   struct ib_request ibreq;
 411   nis_error status;
 412
 413   res = calloc (1, sizeof (nis_result));
 414
 415   if (__create_ib_request (name, &ibreq, 0) == NULL)
 416     {
 417       res->status = NIS_BADNAME;
 418       return res;
 419     }
 420
 421   if ((status = __do_niscall (ibreq.ibr_name, NIS_IBFIRST,
 422                               (xdrproc_t) xdr_ib_request,
 423                               (caddr_t) &ibreq, (xdrproc_t) xdr_nis_result,
 424                               (caddr_t) res, 0)) != RPC_SUCCESS)
 425     res->status = status;
 426
 427   nis_free_request (&ibreq);
 428
 429   return res;
 430 }
 431
 432 nis_result *
 433 nis_next_entry (const_nis_name name, const netobj *cookie)
 434 {
 435   nis_result *res;
 436   struct ib_request ibreq;
 437   nis_error status;
 438
 439   res = calloc (1, sizeof (nis_result));
 440
 441   if (__create_ib_request (name, &ibreq, 0) == NULL)
 442     {
 443       res->status = NIS_BADNAME;
 444       return res;
 445     }
 446
 447   if (cookie != NULL)
 448     {
 449       ibreq.ibr_cookie.n_bytes = malloc (cookie->n_len);
 450       if (ibreq.ibr_cookie.n_bytes == NULL)
 451         {
 452           res->status = NIS_NOMEMORY;
 453           free (res);
 454           return NULL;
 455         }
 456       memcpy (ibreq.ibr_cookie.n_bytes, cookie->n_bytes, cookie->n_len);
 457       ibreq.ibr_cookie.n_len = cookie->n_len;
 458     }
 459
 460   if ((status = __do_niscall (ibreq.ibr_name, NIS_IBNEXT,
 461                               (xdrproc_t) xdr_ib_request,
 462                               (caddr_t) &ibreq, (xdrproc_t) xdr_nis_result,
 463                               (caddr_t) res, 0)) != RPC_SUCCESS)
 464     res->status = status;
 465
 466   nis_free_request (&ibreq);
 467
 468   return res;
 469 }