xref: /haiku/src/bin/fwcontrol/eui64.c (revision f2b4344867e97c3f4e742a1b4a15e6879644601a)
1 /*
2  * Copyright 2004 The Aerospace Corporation.  All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  *
8  * 1.  Redistributions of source code must retain the above copyright
9  *     notice, this list of conditions, and the following disclaimer.
10  * 2.  Redistributions in binary form must reproduce the above copyright
11  *     notice, this list of conditions, and the following disclaimer in the
12  *     documentation and/or other materials provided with the distribution.
13  * 3.  The name of The Aerospace Corporation may not be used to endorse or
14  *     promote products derived from this software.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AEROSPACE CORPORATION "AS IS" AND
17  * 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 AEROSPACE CORPORATION BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  * Copyright (c) 1995
29  *	Bill Paul <wpaul@ctr.columbia.edu>.  All rights reserved.
30  *
31  * Redistribution and use in source and binary forms, with or without
32  * modification, are permitted provided that the following conditions
33  * are met:
34  * 1. Redistributions of source code must retain the above copyright
35  *    notice, this list of conditions and the following disclaimer.
36  * 2. Redistributions in binary form must reproduce the above copyright
37  *    notice, this list of conditions and the following disclaimer in the
38  *    documentation and/or other materials provided with the distribution.
39  * 3. All advertising materials mentioning features or use of this software
40  *    must display the following acknowledgement:
41  *	This product includes software developed by Bill Paul.
42  * 4. Neither the name of the author nor the names of any co-contributors
43  *    may be used to endorse or promote products derived from this software
44  *    without specific prior written permission.
45  *
46  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
47  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
48  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
49  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
50  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
51  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
52  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
53  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
54  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
55  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
56  * SUCH DAMAGE.
57  *
58  * EUI-64 conversion and lookup routines
59  *
60  *
61  * Converted from ether_addr.c rev
62  * FreeBSD: src/lib/libc/net/eui64.c,v 1.15 2002/04/08 07:51:10 ru Exp
63  * by Brooks Davis
64  *
65  * Written by Bill Paul <wpaul@ctr.columbia.edu>
66  * Center for Telecommunications Research
67  * Columbia University, New York City
68  */
69 
70 #ifndef __HAIKU__
71 #include <sys/cdefs.h>
72 __FBSDID("$FreeBSD: src/lib/libc/net/eui64.c,v 1.2 2004/06/01 19:30:13 brooks Exp $");
73 #endif
74 
75 #include <stdio.h>
76 #ifndef __HAIKU__
77 #include <paths.h>
78 #endif
79 #include <sys/types.h>
80 #ifdef __HAIKU__
81 #include "eui64.h"
82 #else
83 #include <sys/eui64.h>
84 #endif
85 #include <string.h>
86 #include <stdlib.h>
87 #include <sys/param.h>
88 #ifndef __HAIKU__
89 #ifdef YP
90 #include <rpc/rpc.h>
91 #include <rpcsvc/yp_prot.h>
92 #include <rpcsvc/ypclnt.h>
93 #endif
94 
95 #ifndef _PATH_EUI64
96 #define _PATH_EUI64 "/etc/eui64"
97 #endif
98 
99 static int eui64_line(const char *l, struct eui64 *e, char *hostname,
100     size_t len);
101 
102 /*
103  * Parse a string of text containing an EUI-64 and hostname
104  * and separate it into its component parts.
105  */
106 static int
107 eui64_line(const char *l, struct eui64 *e, char *hostname, size_t len)
108 {
109 	char *line, *linehead, *cur;
110 
111 	linehead = strdup(l);
112 	if (linehead == NULL)
113 		return (-1);
114 	line = linehead;
115 
116 	/* Find and parse the EUI64 */
117 	while ((cur = strsep(&line, " \t\r\n")) != NULL) {
118 		if (*cur != '\0') {
119 			if (eui64_aton(cur, e) == 0)
120 				break;
121 			else
122 				goto bad;
123 		}
124 	}
125 
126 	/* Find the hostname */
127 	while ((cur = strsep(&line, " \t\r\n")) != NULL) {
128 		if (*cur != '\0') {
129 			if (strlcpy(hostname, cur, len) <= len)
130 				break;
131 			else
132 				goto bad;
133 		}
134 	}
135 
136 	/* Make sure what remains is either whitespace or a comment */
137 	while ((cur = strsep(&line, " \t\r\n")) != NULL) {
138 		if (*cur == '#')
139 			break;
140 		if (*cur != '\0')
141 			goto bad;
142 	}
143 
144 	return (0);
145 
146 bad:
147 	free(linehead);
148 	return (-1);
149 }
150 #endif
151 
152 /*
153  * Convert an ASCII representation of an EUI-64 to binary form.
154  */
155 int
156 eui64_aton(const char *a, struct eui64 *e)
157 {
158 	int i;
159 	unsigned int o0, o1, o2, o3, o4, o5, o6, o7;
160 
161 	/* canonical form */
162 	i = sscanf(a, "%x-%x-%x-%x-%x-%x-%x-%x",
163 	    &o0, &o1, &o2, &o3, &o4, &o5, &o6, &o7);
164 	if (i == EUI64_LEN)
165 		goto good;
166 	/* ethernet form */
167 	i = sscanf(a, "%x:%x:%x:%x:%x:%x:%x:%x",
168 	    &o0, &o1, &o2, &o3, &o4, &o5, &o6, &o7);
169 	if (i == EUI64_LEN)
170 		goto good;
171 	/* classic fwcontrol/dconschat form */
172 	i = sscanf(a, "0x%2x%2x%2x%2x%2x%2x%2x%2x",
173 	    &o0, &o1, &o2, &o3, &o4, &o5, &o6, &o7);
174 	if (i == EUI64_LEN)
175 		goto good;
176 	/* MAC format (-) */
177 	i = sscanf(a, "%x-%x-%x-%x-%x-%x",
178 	    &o0, &o1, &o2, &o5, &o6, &o7);
179 	if (i == 6) {
180 		o3 = 0xff;
181 		o4 = 0xfe;
182 		goto good;
183 	}
184 	/* MAC format (:) */
185 	i = sscanf(a, "%x:%x:%x:%x:%x:%x",
186 	    &o0, &o1, &o2, &o5, &o6, &o7);
187 	if (i == 6) {
188 		o3 = 0xff;
189 		o4 = 0xfe;
190 		goto good;
191 	}
192 
193 	return (-1);
194 
195 good:
196         e->octet[0]=o0;
197 	e->octet[1]=o1;
198 	e->octet[2]=o2;
199 	e->octet[3]=o3;
200 	e->octet[4]=o4;
201 	e->octet[5]=o5;
202 	e->octet[6]=o6;
203 	e->octet[7]=o7;
204 
205         return (0);
206 }
207 
208 /*
209  * Convert a binary representation of an EUI-64 to an ASCII string.
210  */
211 int
212 eui64_ntoa(const struct eui64 *id, char *a, size_t len)
213 {
214         int i;
215 
216         i = snprintf(a, len, "%02x-%02x-%02x-%02x-%02x-%02x-%02x-%02x",
217 	    id->octet[0], id->octet[1], id->octet[2], id->octet[3],
218 	    id->octet[4], id->octet[5], id->octet[6], id->octet[7]);
219         if (i < 23 || i >= len)
220                 return (-1);
221         return (0);
222 }
223 
224 #ifndef __HAIKU__
225 /*
226  * Map an EUI-64 to a hostname. Use either /etc/eui64 or NIS/YP.
227  */
228 int
229 eui64_ntohost(char *hostname, size_t len, const struct eui64 *id)
230 {
231 	FILE *fp;
232 	char buf[BUFSIZ + 2];
233 	struct eui64 local_eui64;
234 	char local_host[MAXHOSTNAMELEN];
235 #ifdef YP
236 	char *result;
237 	int resultlen;
238 	char eui64_a[24];
239 	char *yp_domain;
240 #endif
241 	if ((fp = fopen(_PATH_EUI64, "r")) == NULL)
242 		return (1);
243 
244 	while (fgets(buf,BUFSIZ,fp)) {
245 		if (buf[0] == '#')
246 			continue;
247 #ifdef YP
248 		if (buf[0] == '+') {
249 			if (yp_get_default_domain(&yp_domain))
250 				continue;
251 			eui64_ntoa(id, eui64_a, sizeof(eui64_a));
252 			if (yp_match(yp_domain, "eui64.byid", eui64_a,
253 				strlen(eui64_a), &result, &resultlen)) {
254 				continue;
255 			}
256 			strncpy(buf, result, resultlen);
257 			buf[resultlen] = '\0';
258 			free(result);
259 		}
260 #endif
261 		if (eui64_line(buf, &local_eui64, local_host,
262 		    sizeof(local_host)) == 0) {
263 			if (bcmp(&local_eui64.octet[0],
264 				&id->octet[0], EUI64_LEN) == 0) {
265 			/* We have a match */
266 				strcpy(hostname, local_host);
267 				fclose(fp);
268 				return(0);
269 			}
270 		}
271 	}
272 	fclose(fp);
273 	return (1);
274 }
275 
276 /*
277  * Map a hostname to an EUI-64 using /etc/eui64 or NIS/YP.
278  */
279 int
280 eui64_hostton(const char *hostname, struct eui64 *id)
281 {
282 	FILE *fp;
283 	char buf[BUFSIZ + 2];
284 	struct eui64 local_eui64;
285 	char local_host[MAXHOSTNAMELEN];
286 #ifdef YP
287 	char *result;
288 	int resultlen;
289 	char *yp_domain;
290 #endif
291 	if ((fp = fopen(_PATH_EUI64, "r")) == NULL)
292 		return (1);
293 
294 	while (fgets(buf,BUFSIZ,fp)) {
295 		if (buf[0] == '#')
296 			continue;
297 #ifdef YP
298 		if (buf[0] == '+') {
299 			if (yp_get_default_domain(&yp_domain))
300 				continue;
301 			if (yp_match(yp_domain, "eui64.byname", hostname,
302 				strlen(hostname), &result, &resultlen)) {
303 				continue;
304 			}
305 			strncpy(buf, result, resultlen);
306 			buf[resultlen] = '\0';
307 			free(result);
308 		}
309 #endif
310 		if (eui64_line(buf, &local_eui64, local_host,
311 		    sizeof(local_host)) == 0) {
312 			if (strcmp(hostname, local_host) == 0) {
313 				/* We have a match */
314 				bcopy(&local_eui64, id, sizeof(struct eui64));
315 				fclose(fp);
316 				return(0);
317 			}
318 		}
319 	}
320 	fclose(fp);
321 	return (1);
322 }
323 #endif
324