332c72536f3a82b1eb58ef0d320bd26e866fdcc0
[platform/upstream/libtirpc.git] / src / getpublickey.c
1 /*
2  * Copyright (c) 2009, Sun Microsystems, Inc.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions are met:
7  * - Redistributions of source code must retain the above copyright notice,
8  *   this list of conditions and the following disclaimer.
9  * - Redistributions in binary form must reproduce the above copyright notice,
10  *   this list of conditions and the following disclaimer in the documentation
11  *   and/or other materials provided with the distribution.
12  * - Neither the name of Sun Microsystems, Inc. nor the names of its
13  *   contributors may be used to endorse or promote products derived
14  *   from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
20  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26  * POSSIBILITY OF SUCH DAMAGE.
27  */
28 /*
29 #include <sys/cdefs.h>
30 */
31
32 /*
33  * publickey.c
34  * Copyright (C) 1986, Sun Microsystems, Inc.
35  */
36
37 /*
38  * Public key lookup routines
39  */
40 #include <stdio.h>
41 #include <pwd.h>
42 #include <rpc/rpc.h>
43 #include <rpc/key_prot.h>
44 #include <rpcsvc/yp_prot.h>
45 #include <rpcsvc/ypclnt.h>
46 #include <string.h>
47 #include <stdlib.h>
48
49 #define PKFILE "/etc/publickey"
50
51 /*
52  * Hack to let ypserv/rpc.nisd use AUTH_DES.
53  */
54 int (*__getpublickey_LOCAL)() = 0;
55
56 /*
57  * Get somebody's public key
58  */
59 int
60 __getpublickey_real(netname, publickey)
61         char *netname;
62         char *publickey;
63 {
64         char lookup[3 * HEXKEYBYTES];
65         char *p;
66
67         if (publickey == NULL)
68                 return (0);
69         if (!getpublicandprivatekey(netname, lookup))
70                 return (0);
71         p = strchr(lookup, ':');
72         if (p == NULL) {
73                 return (0);
74         }
75         *p = '\0';
76         (void) strncpy(publickey, lookup, HEXKEYBYTES);
77         publickey[HEXKEYBYTES] = '\0';
78         return (1);
79 }
80
81 /*
82  * reads the file /etc/publickey looking for a + to optionally go to the
83  * yellow pages
84  */
85
86 int
87 getpublicandprivatekey(key, ret)
88         char *key;
89         char *ret;
90 {
91         char buf[1024]; /* big enough */
92         char *res;
93         FILE *fd;
94         char *mkey;
95         char *mval;
96
97         fd = fopen(PKFILE, "r");
98         if (fd == NULL)
99                 return (0);
100         for (;;) {
101                 res = fgets(buf, sizeof(buf), fd);
102                 if (res == NULL) {
103                         fclose(fd);
104                         return (0);
105                 }
106                 if (res[0] == '#')
107                         continue;
108                 else if (res[0] == '+') {
109 #ifdef YP
110                         char *PKMAP = "publickey.byname";
111                         char *lookup;
112                         char *domain;
113                         int err;
114                         int len;
115
116                         err = yp_get_default_domain(&domain);
117                         if (err) {
118                                 continue;
119                         }
120                         lookup = NULL;
121                         err = yp_match(domain, PKMAP, key, strlen(key), &lookup, &len);
122                         if (err) {
123 #ifdef DEBUG
124                                 fprintf(stderr, "match failed error %d\n", err);
125 #endif
126                                 continue;
127                         }
128                         lookup[len] = 0;
129                         strcpy(ret, lookup);
130                         fclose(fd);
131                         free(lookup);
132                         return (2);
133 #else /* YP */
134 #ifdef DEBUG
135                         fprintf(stderr,
136 "Bad record in %s '+' -- NIS not supported in this library copy\n", PKFILE);
137 #endif /* DEBUG */
138                         continue;
139 #endif /* YP */
140                 } else {
141                         mkey = strsep(&res, "\t ");
142                         if (mkey == NULL) {
143                                 fprintf(stderr,
144                                 "Bad record in %s -- %s", PKFILE, buf);
145                                 continue;
146                         }
147                         do {
148                                 mval = strsep(&res, " \t#\n");
149                         } while (mval != NULL && !*mval);
150                         if (mval == NULL) {
151                                 fprintf(stderr,
152                         "Bad record in %s val problem - %s", PKFILE, buf);
153                                 continue;
154                         }
155                         if (strcmp(mkey, key) == 0) {
156                                 strcpy(ret, mval);
157                                 fclose(fd);
158                                 return (1);
159                         }
160                 }
161         }
162 }
163
164 int getpublickey(netname, publickey)
165         const char *netname;
166         char *publickey;
167 {
168         if (__getpublickey_LOCAL != NULL)
169                 return(__getpublickey_LOCAL(netname, publickey));
170         else
171                 return(__getpublickey_real(netname, publickey));
172 }