nss/nss_files/files-key.c

   1 /* Public key file parser in nss_files module.
   2    Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   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 <stdio.h>
  21 #include <errno.h>
  22 #include <string.h>
  23 #include <netdb.h>
  24 #include <rpc/key_prot.h>
  25 #include "nsswitch.h"
  26
  27 #define DATAFILE "/etc/publickey"
  28
  29 /* Prototype for function in xcyrpt.c.  */
  30 extern int xdecrypt (char *, char *);
  31
  32
  33 static enum nss_status
  34 search (const char *netname, char *result, int *errnop, int secret)
  35 {
  36   FILE *stream;
  37
  38   stream = fopen (DATAFILE, "r");
  39   if (stream == NULL)
  40     return errno == EAGAIN ? NSS_STATUS_TRYAGAIN : NSS_STATUS_UNAVAIL;
  41
  42   for (;;)
  43     {
  44       char buffer[HEXKEYBYTES * 2 + KEYCHECKSUMSIZE + MAXNETNAMELEN + 17];
  45       char *p;
  46       char *save_ptr;
  47
  48       buffer[sizeof (buffer) - 1] = '\xff';
  49       p = fgets (buffer, sizeof (buffer), stream);
  50       if (p == NULL)
  51         {
  52           /* End of file or read error.  */
  53           *errnop = errno;
  54           fclose (stream);
  55           return NSS_STATUS_NOTFOUND;
  56         }
  57       else if (buffer[sizeof (buffer) - 1] != '\xff')
  58         {
  59           /* Invalid line in file?  Skip remainder of line.  */
  60           if (buffer[sizeof (buffer) - 2] != '\0')
  61             while (getc (stream) != '\n')
  62               continue;
  63           continue;
  64         }
  65
  66       /* Parse line.  */
  67       p = __strtok_r (buffer, "# \t:\n", &save_ptr);
  68       if (p == NULL) /* Skip empty and comment lines.  */
  69         continue;
  70       if (strcmp (p, netname) != 0)
  71         continue;
  72
  73       /* A hit!  Find the field we want and return.  */
  74       p = __strtok_r (NULL, ":\n", &save_ptr);
  75       if (p == NULL)  /* malformed line? */
  76         continue;
  77       if (secret)
  78         p = __strtok_r (NULL, ":\n", &save_ptr);
  79       if (p == NULL)  /* malformed line? */
  80         continue;
  81       strcpy (result, p);
  82       return NSS_STATUS_SUCCESS;
  83     }
  84 }
  85
  86 enum nss_status
  87 _nss_files_getpublickey (const char *netname, char *pkey, int *errnop)
  88 {
  89   return search (netname, pkey, errnop, 0);
  90 }
  91
  92 enum nss_status
  93 _nss_files_getsecretkey (const char *netname, char *skey, char *passwd,
  94                          int *errnop)
  95 {
  96   enum nss_status status;
  97   char buf[HEXKEYBYTES + KEYCHECKSUMSIZE + 16];
  98
  99   skey[0] = 0;
 100
 101   status = search (netname, buf, errnop, 1);
 102   if (status != NSS_STATUS_SUCCESS)
 103     return status;
 104
 105   if (!xdecrypt (buf, passwd))
 106     return NSS_STATUS_SUCCESS;
 107
 108   if (memcmp (buf, &(buf[HEXKEYBYTES]), KEYCHECKSUMSIZE) != 0)
 109     return NSS_STATUS_SUCCESS;
 110
 111   buf[HEXKEYBYTES] = 0;
 112   strcpy (skey, buf);
 113
 114   return NSS_STATUS_SUCCESS;
 115 }