xref: /dragonfly/lib/libc/rpc/getpublickey.c (revision a32bc35d)
1 /*
2  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3  * unrestricted use provided that this legend is included on all tape
4  * media and as a part of the software program in whole or part.  Users
5  * may copy or modify Sun RPC without charge, but are not authorized
6  * to license or distribute it to anyone else except as part of a product or
7  * program developed by the user or with the express written consent of
8  * Sun Microsystems, Inc.
9  *
10  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
11  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
12  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
13  *
14  * Sun RPC is provided with no support and without any obligation on the
15  * part of Sun Microsystems, Inc. to assist in its use, correction,
16  * modification or enhancement.
17  *
18  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
19  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
20  * OR ANY PART THEREOF.
21  *
22  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
23  * or profits or other special, indirect and consequential damages, even if
24  * Sun has been advised of the possibility of such damages.
25  *
26  * Sun Microsystems, Inc.
27  * 2550 Garcia Avenue
28  * Mountain View, California  94043
29  *
30  * $FreeBSD: src/lib/libc/rpc/getpublickey.c,v 1.9 2006/02/28 16:02:26 deischen Exp $
31  *
32  * @(#)publickey.c 1.10 91/03/11 Copyr 1986 Sun Micro
33  */
34 
35 /*
36  * publickey.c
37  * Copyright (C) 1986, Sun Microsystems, Inc.
38  */
39 
40 /*
41  * Public key lookup routines
42  */
43 #include "namespace.h"
44 #include <stdio.h>
45 #include <pwd.h>
46 #include <rpc/rpc.h>
47 #include <rpc/key_prot.h>
48 #include <rpcsvc/yp_prot.h>
49 #include <rpcsvc/ypclnt.h>
50 #include <string.h>
51 #include <stdlib.h>
52 #include "un-namespace.h"
53 
54 #define PKFILE "/etc/publickey"
55 
56 /*
57  * Hack to let ypserv/rpc.nisd use AUTH_DES.
58  */
59 int (*__getpublickey_LOCAL)() = NULL;
60 
61 /*
62  * Get somebody's public key
63  */
64 static int
65 __getpublickey_real(const char *netname, char *publickey)
66 {
67 	char lookup[3 * HEXKEYBYTES];
68 	char *p;
69 
70 	if (publickey == NULL)
71 		return (0);
72 	if (!getpublicandprivatekey(netname, lookup))
73 		return (0);
74 	p = strchr(lookup, ':');
75 	if (p == NULL) {
76 		return (0);
77 	}
78 	*p = '\0';
79 	strncpy(publickey, lookup, HEXKEYBYTES);
80 	publickey[HEXKEYBYTES] = '\0';
81 	return (1);
82 }
83 
84 /*
85  * reads the file /etc/publickey looking for a + to optionally go to the
86  * yellow pages
87  */
88 
89 int
90 getpublicandprivatekey(const char *key, char *ret)
91 {
92 	char buf[1024];	/* big enough */
93 	char *res;
94 	FILE *fd;
95 	char *mkey;
96 	char *mval;
97 
98 	fd = fopen(PKFILE, "r");
99 	if (fd == NULL)
100 		return (0);
101 	for (;;) {
102 		res = fgets(buf, sizeof(buf), fd);
103 		if (res == NULL) {
104 			fclose(fd);
105 			return (0);
106 		}
107 		if (res[0] == '#')
108 			continue;
109 		else if (res[0] == '+') {
110 #ifdef YP
111 			char *PKMAP = "publickey.byname";
112 			char *lookup;
113 			char *domain;
114 			int err;
115 			int len;
116 
117 			err = yp_get_default_domain(&domain);
118 			if (err) {
119 				continue;
120 			}
121 			lookup = NULL;
122 			err = yp_match(domain, PKMAP, key, strlen(key), &lookup, &len);
123 			if (err) {
124 #ifdef DEBUG
125 				fprintf(stderr, "match failed error %d\n", err);
126 #endif
127 				continue;
128 			}
129 			lookup[len] = 0;
130 			strcpy(ret, lookup);
131 			fclose(fd);
132 			free(lookup);
133 			return (2);
134 #else /* YP */
135 #ifdef DEBUG
136 			fprintf(stderr,
137 "Bad record in %s '+' -- NIS not supported in this library copy\n", PKFILE);
138 #endif /* DEBUG */
139 			continue;
140 #endif /* YP */
141 		} else {
142 			mkey = strsep(&res, "\t ");
143 			if (mkey == NULL) {
144 				fprintf(stderr,
145 				"Bad record in %s -- %s", PKFILE, buf);
146 				continue;
147 			}
148 			do {
149 				mval = strsep(&res, " \t#\n");
150 			} while (mval != NULL && !*mval);
151 			if (mval == NULL) {
152 				fprintf(stderr,
153 			"Bad record in %s val problem - %s", PKFILE, buf);
154 				continue;
155 			}
156 			if (strcmp(mkey, key) == 0) {
157 				strcpy(ret, mval);
158 				fclose(fd);
159 				return (1);
160 			}
161 		}
162 	}
163 }
164 
165 int
166 getpublickey(const char *netname, char *publickey)
167 {
168 	if (__getpublickey_LOCAL != NULL)
169 		return(__getpublickey_LOCAL(netname, publickey));
170 	else
171 		return(__getpublickey_real(netname, publickey));
172 }
173