Publickey implementation for nss_files.
[kopensolaris-gnu/glibc.git] / 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 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 <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 }