nis/nss_nis/nis-network.c

   1 /* Copyright (C) 1996, 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>, 1996.
   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 <nss.h>
  21 #include <netdb.h>
  22 #include <ctype.h>
  23 #include <errno.h>
  24 #include <string.h>
  25 #include <netinet/in.h>
  26 #include <arpa/inet.h>
  27 #include <libc-lock.h>
  28 #include <rpcsvc/yp.h>
  29 #include <rpcsvc/ypclnt.h>
  30
  31 #include "nss-nis.h"
  32
  33 /* Get the declaration of the parser function.  */
  34 #define ENTNAME netent
  35 #define EXTERN_PARSER
  36 #include <nss/nss_files/files-parse.c>
  37
  38 __libc_lock_define_initialized (static, lock)
  39
  40 static bool_t new_start = 1;
  41 static char *oldkey = NULL;
  42 static int oldkeylen = 0;
  43
  44 enum nss_status
  45 _nss_nis_setnetent (void)
  46 {
  47   __libc_lock_lock (lock);
  48
  49   new_start = 1;
  50   if (oldkey != NULL)
  51     {
  52       free (oldkey);
  53       oldkey = NULL;
  54       oldkeylen = 0;
  55     }
  56
  57   __libc_lock_unlock (lock);
  58
  59   return NSS_STATUS_SUCCESS;
  60 }
  61
  62 enum nss_status
  63 _nss_nis_endnetent (void)
  64 {
  65   __libc_lock_lock (lock);
  66
  67   new_start = 1;
  68   if (oldkey != NULL)
  69     {
  70       free (oldkey);
  71       oldkey = NULL;
  72       oldkeylen = 0;
  73     }
  74
  75   __libc_lock_unlock (lock);
  76
  77   return NSS_STATUS_SUCCESS;
  78 }
  79
  80 static enum nss_status
  81 internal_nis_getnetent_r (struct netent *net, char *buffer, size_t buflen,
  82                           int *herrnop)
  83 {
  84   struct parser_data *data = (void *) buffer;
  85   char *domain, *result, *outkey;
  86   int len, keylen, parse_res;
  87
  88   if (yp_get_default_domain (&domain))
  89     return NSS_STATUS_UNAVAIL;
  90
  91   /* Get the next entry until we found a correct one. */
  92   do
  93     {
  94       enum nss_status retval;
  95       char *p;
  96
  97       if (new_start)
  98         retval = yperr2nss (yp_first (domain, "networks.byname",
  99                                       &outkey, &keylen, &result, &len));
 100       else
 101         retval = yperr2nss ( yp_next (domain, "networks.byname",
 102                                       oldkey, oldkeylen,
 103                                       &outkey, &keylen, &result, &len));
 104
 105       if (retval != NSS_STATUS_SUCCESS)
 106         {
 107           if (retval == NSS_STATUS_TRYAGAIN)
 108             {
 109               *herrnop = NETDB_INTERNAL;
 110               __set_errno (EAGAIN);
 111             }
 112           return retval;
 113         }
 114
 115       if ((size_t) (len + 1) > buflen)
 116         {
 117           free (result);
 118           __set_errno (ERANGE);
 119           *herrnop = NETDB_INTERNAL;
 120           return NSS_STATUS_TRYAGAIN;
 121         }
 122
 123       p = strncpy (buffer, result, len);
 124       buffer[len] = '\0';
 125       while (isspace (*p))
 126         ++p;
 127       free (result);
 128
 129       parse_res = _nss_files_parse_netent (p, net, data, buflen);
 130       if (!parse_res && errno == ERANGE)
 131         {
 132           *herrnop = NETDB_INTERNAL;
 133           return NSS_STATUS_TRYAGAIN;
 134         }
 135
 136       free (oldkey);
 137       oldkey = outkey;
 138       oldkeylen = keylen;
 139       new_start = 0;
 140     }
 141   while (!parse_res);
 142
 143   return NSS_STATUS_SUCCESS;
 144 }
 145
 146 enum nss_status
 147 _nss_nis_getnetent_r (struct netent *net, char *buffer, size_t buflen,
 148                       int *herrnop)
 149 {
 150   enum nss_status status;
 151
 152   __libc_lock_lock (lock);
 153
 154   status = internal_nis_getnetent_r (net, buffer, buflen, herrnop);
 155
 156   __libc_lock_unlock (lock);
 157
 158   return status;
 159 }
 160
 161 enum nss_status
 162 _nss_nis_getnetbyname_r (const char *name, struct netent *net,
 163                          char *buffer, size_t buflen, int *herrnop)
 164 {
 165   enum nss_status retval;
 166   struct parser_data *data = (void *) buffer;
 167   char *domain, *result, *p;
 168   int len, parse_res;
 169
 170   if (name == NULL)
 171     {
 172       __set_errno (EINVAL);
 173       *herrnop = NETDB_INTERNAL;
 174       return NSS_STATUS_UNAVAIL;
 175     }
 176
 177   if (yp_get_default_domain (&domain))
 178     return NSS_STATUS_UNAVAIL;
 179
 180   retval = yperr2nss (yp_match (domain, "networks.byname", name,
 181                                 strlen (name), &result, &len));
 182
 183   if (retval != NSS_STATUS_SUCCESS)
 184     {
 185       if (retval == NSS_STATUS_TRYAGAIN)
 186         {
 187           __set_errno (EAGAIN);
 188           *herrnop = NETDB_INTERNAL;
 189         }
 190       return retval;
 191     }
 192
 193   if ((size_t) (len + 1) > buflen)
 194     {
 195       free (result);
 196       __set_errno (ERANGE);
 197       *herrnop = NETDB_INTERNAL;
 198       return NSS_STATUS_TRYAGAIN;
 199     }
 200
 201   p = strncpy (buffer, result, len);
 202   buffer[len] = '\0';
 203   while (isspace (*p))
 204     ++p;
 205   free (result);
 206
 207   parse_res = _nss_files_parse_netent (p, net, data, buflen);
 208
 209   if (!parse_res)
 210     {
 211       *herrnop = NETDB_INTERNAL;
 212       if (errno == ERANGE)
 213         return NSS_STATUS_TRYAGAIN;
 214       else
 215         return NSS_STATUS_NOTFOUND;
 216     }
 217   else
 218     return NSS_STATUS_SUCCESS;
 219 }
 220
 221 enum nss_status
 222 _nss_nis_getnetbyaddr_r (unsigned long addr, int type, struct netent *net,
 223                          char *buffer, size_t buflen, int *herrnop)
 224 {
 225   struct parser_data *data = (void *) buffer;
 226   char *domain;
 227   char *result;
 228   int len;
 229   char buf[256];
 230   int blen;
 231   struct in_addr in;
 232   char *p;
 233
 234   if (yp_get_default_domain (&domain))
 235     return NSS_STATUS_UNAVAIL;
 236
 237   in = inet_makeaddr (addr, 0);
 238   strcpy (buf, inet_ntoa (in));
 239   blen = strlen (buf);
 240
 241   while (1)
 242     {
 243       enum nss_status retval;
 244       int parse_res;
 245
 246       retval = yperr2nss (yp_match (domain, "networks.byaddr", buf,
 247                                     strlen (buf), &result, &len));
 248
 249         if (retval != NSS_STATUS_SUCCESS)
 250           {
 251             if (retval == NSS_STATUS_NOTFOUND)
 252               {
 253                 if (buf[blen - 2] == '.' && buf[blen - 1] == '0')
 254                   {
 255                     /* Try again, but with trailing dot(s)
 256                        removed (one by one) */
 257                     buf[blen - 2] = '\0';
 258                     blen -= 2;
 259                     continue;
 260                   }
 261                 else
 262                   return NSS_STATUS_NOTFOUND;
 263               }
 264             else
 265               {
 266                 if (retval == NSS_STATUS_TRYAGAIN)
 267                   __set_errno (EAGAIN);
 268                 return retval;
 269               }
 270           }
 271
 272       if ((size_t) (len + 1) > buflen)
 273         {
 274           free (result);
 275           __set_errno (ERANGE);
 276           *herrnop = NETDB_INTERNAL;
 277           return NSS_STATUS_TRYAGAIN;
 278         }
 279
 280         p = strncpy (buffer, result, len);
 281         buffer[len] = '\0';
 282         while (isspace (*p))
 283           ++p;
 284         free (result);
 285
 286         parse_res = _nss_files_parse_netent (p, net, data, buflen);
 287
 288
 289         if (!parse_res)
 290           {
 291             *herrnop = NETDB_INTERNAL;
 292             if (errno == ERANGE)
 293               return NSS_STATUS_TRYAGAIN;
 294             else
 295               return NSS_STATUS_NOTFOUND;
 296           }
 297         else
 298           return NSS_STATUS_SUCCESS;
 299     }
 300 }