xref: /freebsd/lib/libc/rpc/getpublickey.c (revision 103ba509e72e3949d22485666949e9705d4af8cd)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 2009, Sun Microsystems, Inc.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions are met:
9  * - Redistributions of source code must retain the above copyright notice,
10  *   this list of conditions and the following disclaimer.
11  * - Redistributions in binary form must reproduce the above copyright notice,
12  *   this list of conditions and the following disclaimer in the documentation
13  *   and/or other materials provided with the distribution.
14  * - Neither the name of Sun Microsystems, Inc. nor the names of its
15  *   contributors may be used to endorse or promote products derived
16  *   from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
19  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
22  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28  * POSSIBILITY OF SUCH DAMAGE.
29  */
30 
31 #if defined(LIBC_SCCS) && !defined(lint)
32 static char sccsid[] = "@(#)publickey.c 1.10 91/03/11 Copyr 1986 Sun Micro";
33 #endif
34 /*
35  * publickey.c
36  * Copyright (C) 1986, Sun Microsystems, Inc.
37  */
38 
39 /*
40  * Public key lookup routines
41  */
42 #include "namespace.h"
43 #include <stdio.h>
44 #include <pwd.h>
45 #include <rpc/rpc.h>
46 #include <rpc/key_prot.h>
47 #include <rpcsvc/yp_prot.h>
48 #include <rpcsvc/ypclnt.h>
49 #include <string.h>
50 #include <stdlib.h>
51 #include "un-namespace.h"
52 
53 #define PKFILE "/etc/publickey"
54 
55 /*
56  * Hack to let ypserv/rpc.nisd use AUTH_DES.
57  */
58 int (*__getpublickey_LOCAL)(const char *, char *) = 0;
59 
60 /*
61  * Get somebody's public key
62  */
63 static int
64 __getpublickey_real(const char *netname, char *publickey)
65 {
66 	char lookup[3 * HEXKEYBYTES];
67 	char *p;
68 
69 	if (publickey == NULL)
70 		return (0);
71 	if (!getpublicandprivatekey(netname, lookup))
72 		return (0);
73 	p = strchr(lookup, ':');
74 	if (p == NULL) {
75 		return (0);
76 	}
77 	*p = '\0';
78 	(void) strncpy(publickey, lookup, HEXKEYBYTES);
79 	publickey[HEXKEYBYTES] = '\0';
80 	return (1);
81 }
82 
83 /*
84  * reads the file /etc/publickey looking for a + to optionally go to the
85  * yellow pages
86  */
87 
88 int
89 getpublicandprivatekey(const char *key, 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(const char *netname, char *publickey)
165 {
166 	if (__getpublickey_LOCAL != NULL)
167 		return(__getpublickey_LOCAL(netname, publickey));
168 	else
169 		return(__getpublickey_real(netname, publickey));
170 }
171