nis/nss_nisplus/nisplus-grp.c

   1 /* Copyright (C) 1997, 2001 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 Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the 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    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, write to the Free
  17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  18    02111-1307 USA.  */
  19
  20 #include <nss.h>
  21 #include <grp.h>
  22 #include <ctype.h>
  23 #include <errno.h>
  24 #include <string.h>
  25 #include <bits/libc-lock.h>
  26 #include <rpcsvc/nis.h>
  27
  28 #include "nss-nisplus.h"
  29 #include "nisplus-parser.h"
  30
  31 __libc_lock_define_initialized (static, lock);
  32
  33 static nis_result *result;
  34 static unsigned long next_entry;
  35 static nis_name tablename_val;
  36 static u_long tablename_len;
  37
  38 static enum nss_status
  39 _nss_create_tablename (int *errnop)
  40 {
  41   if (tablename_val == NULL)
  42     {
  43       char buf [40 + strlen (nis_local_directory ())];
  44       char *p;
  45
  46       p = __stpcpy (buf, "group.org_dir.");
  47       p = __stpcpy (p, nis_local_directory ());
  48       tablename_val = __strdup (buf);
  49       if (tablename_val == NULL)
  50         {
  51           *errnop = errno;
  52           return NSS_STATUS_TRYAGAIN;
  53         }
  54       tablename_len = strlen (tablename_val);
  55     }
  56   return NSS_STATUS_SUCCESS;
  57 }
  58
  59 static enum nss_status
  60 internal_setgrent (void)
  61 {
  62   enum nss_status status;
  63   int err;
  64
  65   if (result)
  66     nis_freeresult (result);
  67   result = NULL;
  68   next_entry = 0;
  69
  70   if (tablename_val == NULL)
  71     if (_nss_create_tablename (&err) != NSS_STATUS_SUCCESS)
  72       return NSS_STATUS_UNAVAIL;
  73
  74   result = nis_list (tablename_val, FOLLOW_LINKS | FOLLOW_PATH, NULL, NULL);
  75   status = niserr2nss (result->status);
  76   if (status != NSS_STATUS_SUCCESS)
  77     {
  78       nis_freeresult (result);
  79       result = NULL;
  80     }
  81   return status;
  82 }
  83
  84 enum nss_status
  85 _nss_nisplus_setgrent (int stayopen)
  86 {
  87   enum nss_status status;
  88
  89   __libc_lock_lock (lock);
  90
  91   status = internal_setgrent ();
  92
  93   __libc_lock_unlock (lock);
  94
  95   return status;
  96 }
  97
  98 enum nss_status
  99 _nss_nisplus_endgrent (void)
 100 {
 101   __libc_lock_lock (lock);
 102
 103   if (result)
 104     nis_freeresult (result);
 105   result = NULL;
 106
 107   __libc_lock_unlock (lock);
 108
 109   return NSS_STATUS_SUCCESS;
 110 }
 111
 112 static enum nss_status
 113 internal_nisplus_getgrent_r (struct group *gr, char *buffer, size_t buflen,
 114                              int *errnop)
 115 {
 116   int parse_res;
 117
 118   if (result == NULL)
 119     {
 120       enum nss_status status;
 121
 122       status = internal_setgrent ();
 123       if (result == NULL || status != NSS_STATUS_SUCCESS)
 124         return status;
 125     }
 126
 127   /* Get the next entry until we found a correct one. */
 128   do
 129     {
 130       if (next_entry >= result->objects.objects_len)
 131         return NSS_STATUS_NOTFOUND;
 132
 133       parse_res = _nss_nisplus_parse_grent (result, next_entry, gr,
 134                                             buffer, buflen, errnop);
 135       if (parse_res == -1)
 136         return NSS_STATUS_TRYAGAIN;
 137
 138       ++next_entry;
 139     }
 140   while (!parse_res);
 141
 142   return NSS_STATUS_SUCCESS;
 143 }
 144
 145 enum nss_status
 146 _nss_nisplus_getgrent_r (struct group *result, char *buffer, size_t buflen,
 147                          int *errnop)
 148 {
 149   int status;
 150
 151   __libc_lock_lock (lock);
 152
 153   status = internal_nisplus_getgrent_r (result, buffer, buflen, errnop);
 154
 155   __libc_lock_unlock (lock);
 156
 157   return status;
 158 }
 159
 160 enum nss_status
 161 _nss_nisplus_getgrnam_r (const char *name, struct group *gr,
 162                          char *buffer, size_t buflen, int *errnop)
 163 {
 164   int parse_res;
 165
 166   if (tablename_val == NULL)
 167     {
 168       enum nss_status status = _nss_create_tablename (errnop);
 169
 170       if (status != NSS_STATUS_SUCCESS)
 171         return status;
 172     }
 173
 174   if (name == NULL)
 175     {
 176       *errnop = EINVAL;
 177       return NSS_STATUS_NOTFOUND;
 178     }
 179   else
 180     {
 181       nis_result *result;
 182       char buf[strlen (name) + 24 + tablename_len];
 183
 184       sprintf (buf, "[name=%s],%s", name, tablename_val);
 185
 186       result = nis_list (buf, FOLLOW_LINKS | FOLLOW_PATH, NULL, NULL);
 187
 188       if (niserr2nss (result->status) != NSS_STATUS_SUCCESS)
 189         {
 190           enum nss_status status = niserr2nss (result->status);
 191
 192           nis_freeresult (result);
 193           return status;
 194         }
 195
 196       parse_res = _nss_nisplus_parse_grent (result, 0, gr, buffer, buflen,
 197                                             errnop);
 198       nis_freeresult (result);
 199       if (parse_res < 1)
 200         {
 201           if (parse_res == -1)
 202             {
 203               *errnop = ERANGE;
 204               return NSS_STATUS_TRYAGAIN;
 205             }
 206           else
 207             return NSS_STATUS_NOTFOUND;
 208         }
 209       return NSS_STATUS_SUCCESS;
 210     }
 211 }
 212
 213 enum nss_status
 214 _nss_nisplus_getgrgid_r (const gid_t gid, struct group *gr,
 215                          char *buffer, size_t buflen, int *errnop)
 216 {
 217   if (tablename_val == NULL)
 218     {
 219       enum nss_status status = _nss_create_tablename (errnop);
 220
 221       if (status != NSS_STATUS_SUCCESS)
 222         return status;
 223     }
 224
 225   {
 226     int parse_res;
 227     nis_result *result;
 228     char buf[36 + tablename_len];
 229
 230     sprintf (buf, "[gid=%lu],%s", (unsigned long int) gid, tablename_val);
 231
 232     result = nis_list (buf, FOLLOW_PATH | FOLLOW_LINKS, NULL, NULL);
 233
 234     if (niserr2nss (result->status) != NSS_STATUS_SUCCESS)
 235       {
 236         enum nss_status status = niserr2nss (result->status);
 237
 238         nis_freeresult (result);
 239         return status;
 240       }
 241
 242     parse_res = _nss_nisplus_parse_grent (result, 0, gr, buffer, buflen,
 243                                           errnop);
 244
 245     nis_freeresult (result);
 246     if (parse_res < 1)
 247       {
 248         if (parse_res == -1)
 249           {
 250             *errnop = ERANGE;
 251             return NSS_STATUS_TRYAGAIN;
 252           }
 253         else
 254           return NSS_STATUS_NOTFOUND;
 255       }
 256     return NSS_STATUS_SUCCESS;
 257   }
 258 }