xref: /freebsd/sbin/ifconfig/ifieee80211.c (revision e0c27215058b5786c78fcfb3963eebe61a989511)
1 /*
2  * Copyright 2001 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  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  * 3. The name of The Aerospace Corporation may not be used to endorse or
13  *    promote products derived from this software.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AEROSPACE CORPORATION ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AEROSPACE CORPORATION BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  * $FreeBSD$
28  */
29 
30 /*-
31  * Copyright (c) 1997, 1998, 2000 The NetBSD Foundation, Inc.
32  * All rights reserved.
33  *
34  * This code is derived from software contributed to The NetBSD Foundation
35  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
36  * NASA Ames Research Center.
37  *
38  * Redistribution and use in source and binary forms, with or without
39  * modification, are permitted provided that the following conditions
40  * are met:
41  * 1. Redistributions of source code must retain the above copyright
42  *    notice, this list of conditions and the following disclaimer.
43  * 2. Redistributions in binary form must reproduce the above copyright
44  *    notice, this list of conditions and the following disclaimer in the
45  *    documentation and/or other materials provided with the distribution.
46  * 3. All advertising materials mentioning features or use of this software
47  *    must display the following acknowledgement:
48  *	This product includes software developed by the NetBSD
49  *	Foundation, Inc. and its contributors.
50  * 4. Neither the name of The NetBSD Foundation nor the names of its
51  *    contributors may be used to endorse or promote products derived
52  *    from this software without specific prior written permission.
53  *
54  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
55  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
56  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
57  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
58  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
59  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
60  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
61  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
62  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
63  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
64  * POSSIBILITY OF SUCH DAMAGE.
65  */
66 
67 #include <sys/param.h>
68 #include <sys/ioctl.h>
69 #include <sys/socket.h>
70 #include <sys/sysctl.h>
71 #include <sys/time.h>
72 
73 #include <net/ethernet.h>
74 #include <net/if.h>
75 #include <net/if_dl.h>
76 #include <net/if_types.h>
77 #include <net/route.h>
78 #include <net80211/ieee80211.h>
79 #include <net80211/ieee80211_ioctl.h>
80 
81 #include <ctype.h>
82 #include <err.h>
83 #include <errno.h>
84 #include <fcntl.h>
85 #include <stdio.h>
86 #include <stdlib.h>
87 #include <string.h>
88 #include <unistd.h>
89 
90 #include "ifconfig.h"
91 
92 static void set80211(int s, int type, int val, int len, u_int8_t *data);
93 static const char *get_string(const char *val, const char *sep,
94     u_int8_t *buf, int *lenp);
95 static void print_string(const u_int8_t *buf, int len);
96 
97 void
98 set80211ssid(const char *val, int d, int s, const struct afswtch *rafp)
99 {
100 	int		ssid;
101 	int		len;
102 	u_int8_t	data[33];
103 
104 	ssid = 0;
105 	len = sizeof(val);
106 	if (len > 2 && isdigit(val[0]) && val[1] == ':') {
107 		ssid = atoi(val)-1;
108 		val += 2;
109 	}
110 
111 	bzero(data, sizeof(data));
112 	len = sizeof(data);
113 	get_string(val, NULL, data, &len);
114 
115 	set80211(s, IEEE80211_IOC_SSID, ssid, len, data);
116 }
117 
118 void
119 set80211stationname(const char *val, int d, int s, const struct afswtch *rafp)
120 {
121 	int			len;
122 	u_int8_t		data[33];
123 
124 	bzero(data, sizeof(data));
125 	len = sizeof(data);
126 	get_string(val, NULL, data, &len);
127 
128 	set80211(s, IEEE80211_IOC_STATIONNAME, 0, len, data);
129 }
130 
131 void
132 set80211channel(const char *val, int d, int s, const struct afswtch *rafp)
133 {
134 	if (strcmp(val, "-") == 0)
135 		set80211(s, IEEE80211_IOC_CHANNEL, IEEE80211_CHAN_ANY, 0, NULL);
136 	else
137 		set80211(s, IEEE80211_IOC_CHANNEL, atoi(val), 0, NULL);
138 }
139 
140 void
141 set80211authmode(const char *val, int d, int s, const struct afswtch *rafp)
142 {
143 	int	mode;
144 
145 	if (strcasecmp(val, "none") == 0) {
146 		mode = IEEE80211_AUTH_NONE;
147 	} else if (strcasecmp(val, "open") == 0) {
148 		mode = IEEE80211_AUTH_OPEN;
149 	} else if (strcasecmp(val, "shared") == 0) {
150 		mode = IEEE80211_AUTH_SHARED;
151 	} else {
152 		err(1, "unknown authmode");
153 	}
154 
155 	set80211(s, IEEE80211_IOC_AUTHMODE, mode, 0, NULL);
156 }
157 
158 void
159 set80211powersavemode(const char *val, int d, int s, const struct afswtch *rafp)
160 {
161 	int	mode;
162 
163 	if (strcasecmp(val, "off") == 0) {
164 		mode = IEEE80211_POWERSAVE_OFF;
165 	} else if (strcasecmp(val, "on") == 0) {
166 		mode = IEEE80211_POWERSAVE_ON;
167 	} else if (strcasecmp(val, "cam") == 0) {
168 		mode = IEEE80211_POWERSAVE_CAM;
169 	} else if (strcasecmp(val, "psp") == 0) {
170 		mode = IEEE80211_POWERSAVE_PSP;
171 	} else if (strcasecmp(val, "psp-cam") == 0) {
172 		mode = IEEE80211_POWERSAVE_PSP_CAM;
173 	} else {
174 		err(1, "unknown powersavemode");
175 	}
176 
177 	set80211(s, IEEE80211_IOC_POWERSAVE, mode, 0, NULL);
178 }
179 
180 void
181 set80211powersave(const char *val, int d, int s, const struct afswtch *rafp)
182 {
183 	if (d == 0)
184 		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_OFF,
185 		    0, NULL);
186 	else
187 		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_ON,
188 		    0, NULL);
189 }
190 
191 void
192 set80211powersavesleep(const char *val, int d, int s, const struct afswtch *rafp)
193 {
194 	set80211(s, IEEE80211_IOC_POWERSAVESLEEP, atoi(val), 0, NULL);
195 }
196 
197 void
198 set80211wepmode(const char *val, int d, int s, const struct afswtch *rafp)
199 {
200 	int	mode;
201 
202 	if (strcasecmp(val, "off") == 0) {
203 		mode = IEEE80211_WEP_OFF;
204 	} else if (strcasecmp(val, "on") == 0) {
205 		mode = IEEE80211_WEP_ON;
206 	} else if (strcasecmp(val, "mixed") == 0) {
207 		mode = IEEE80211_WEP_MIXED;
208 	} else {
209 		err(1, "unknown wep mode");
210 	}
211 
212 	set80211(s, IEEE80211_IOC_WEP, mode, 0, NULL);
213 }
214 
215 void
216 set80211wep(const char *val, int d, int s, const struct afswtch *rafp)
217 {
218 	set80211(s, IEEE80211_IOC_WEP, d, 0, NULL);
219 }
220 
221 void
222 set80211weptxkey(const char *val, int d, int s, const struct afswtch *rafp)
223 {
224 	set80211(s, IEEE80211_IOC_WEPTXKEY, atoi(val)-1, 0, NULL);
225 }
226 
227 void
228 set80211wepkey(const char *val, int d, int s, const struct afswtch *rafp)
229 {
230 	int		key = 0;
231 	int		len;
232 	u_int8_t	data[14];
233 
234 	if (isdigit(val[0]) && val[1] == ':') {
235 		key = atoi(val)-1;
236 		val += 2;
237 	}
238 
239 	bzero(data, sizeof(data));
240 	len = sizeof(data);
241 	get_string(val, NULL, data, &len);
242 
243 	set80211(s, IEEE80211_IOC_WEPKEY, key, len, data);
244 }
245 
246 /*
247  * This function is purly a NetBSD compatability interface.  The NetBSD
248  * iterface is too inflexable, but it's there so we'll support it since
249  * it's not all that hard.
250  */
251 void
252 set80211nwkey(const char *val, int d, int s, const struct afswtch *rafp)
253 {
254 	int		txkey;
255 	int		i, len;
256 	u_int8_t	data[14];
257 
258 	set80211(s, IEEE80211_IOC_WEP, IEEE80211_WEP_ON, 0, NULL);
259 
260 	if (isdigit(val[0]) && val[1] == ':') {
261 		txkey = val[0]-'0'-1;
262 		val += 2;
263 
264 		for (i = 0; i < 4; i++) {
265 			bzero(data, sizeof(data));
266 			len = sizeof(data);
267 			val = get_string(val, ",", data, &len);
268 
269 			set80211(s, IEEE80211_IOC_WEPKEY, i, len, data);
270 		}
271 	} else {
272 		bzero(data, sizeof(data));
273 		len = sizeof(data);
274 		get_string(val, NULL, data, &len);
275 		txkey = 0;
276 
277 		set80211(s, IEEE80211_IOC_WEPKEY, 0, len, data);
278 
279 		bzero(data, sizeof(data));
280 		for (i = 1; i < 4; i++)
281 			set80211(s, IEEE80211_IOC_WEPKEY, i, 0, data);
282 	}
283 
284 	set80211(s, IEEE80211_IOC_WEPTXKEY, txkey, 0, NULL);
285 }
286 
287 void
288 ieee80211_status (int s, struct rt_addrinfo *info __unused)
289 {
290 	int			i;
291 	int			num;
292 	struct ieee80211req	ireq;
293 	u_int8_t		data[32];
294 	char			spacer;
295 
296 	(void) memset(&ireq, 0, sizeof(ireq));
297 	(void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
298 	ireq.i_data = &data;
299 
300 	ireq.i_type = IEEE80211_IOC_SSID;
301 	ireq.i_val = -1;
302 	if (ioctl(s, SIOCG80211, &ireq) < 0) {
303 		/* If we can't get the SSID, the this isn't an 802.11 device. */
304 		return;
305 	}
306 	printf("\tssid ");
307 	print_string(data, ireq.i_len);
308 	num = 0;
309 	ireq.i_type = IEEE80211_IOC_NUMSSIDS;
310 	if (ioctl(s, SIOCG80211, &ireq) >= 0) {
311 		num = ireq.i_val;
312 	}
313 	ireq.i_type = IEEE80211_IOC_SSID;
314 	for (ireq.i_val = 0; ireq.i_val < num; ireq.i_val++) {
315 		if (ioctl(s, SIOCG80211, &ireq) >= 0 && ireq.i_len > 0) {
316 			printf(" %d:", ireq.i_val + 1);
317 			print_string(data, ireq.i_len);
318 		}
319 	}
320 	printf("\n");
321 
322 	ireq.i_type = IEEE80211_IOC_STATIONNAME;
323 	if (ioctl(s, SIOCG80211, &ireq) != -1) {
324 		printf("\tstationname ");
325 		print_string(data, ireq.i_len);
326 		printf("\n");
327 	}
328 
329 	ireq.i_type = IEEE80211_IOC_CHANNEL;
330 	if (ioctl(s, SIOCG80211, &ireq) < 0) {
331 		goto end;
332 	}
333 	printf("\tchannel %d", ireq.i_val);
334 
335 	ireq.i_type = IEEE80211_IOC_AUTHMODE;
336 	if (ioctl(s, SIOCG80211, &ireq) != -1) {
337 		printf(" authmode");
338 		switch (ireq.i_val) {
339 			case IEEE80211_AUTH_NONE:
340 				printf(" NONE");
341 				break;
342 			case IEEE80211_AUTH_OPEN:
343 				printf(" OPEN");
344 				break;
345 			case IEEE80211_AUTH_SHARED:
346 				printf(" SHARED");
347 				break;
348 			default:
349 				printf(" UNKNOWN");
350 				break;
351 		}
352 	}
353 
354 	ireq.i_type = IEEE80211_IOC_POWERSAVE;
355 	if (ioctl(s, SIOCG80211, &ireq) != -1 &&
356 	    ireq.i_val != IEEE80211_POWERSAVE_NOSUP ) {
357 		printf(" powersavemode");
358 		switch (ireq.i_val) {
359 			case IEEE80211_POWERSAVE_OFF:
360 				printf(" OFF");
361 				break;
362 			case IEEE80211_POWERSAVE_CAM:
363 				printf(" CAM");
364 				break;
365 			case IEEE80211_POWERSAVE_PSP:
366 				printf(" PSP");
367 				break;
368 			case IEEE80211_POWERSAVE_PSP_CAM:
369 				printf(" PSP-CAM");
370 				break;
371 		}
372 
373 		ireq.i_type = IEEE80211_IOC_POWERSAVESLEEP;
374 		if (ioctl(s, SIOCG80211, &ireq) != -1) {
375 			if (ireq.i_val)
376 				printf(" powersavesleep %d", ireq.i_val);
377 		}
378 	}
379 
380 	printf("\n");
381 
382 	ireq.i_type = IEEE80211_IOC_WEP;
383 	if (ioctl(s, SIOCG80211, &ireq) != -1 &&
384 	    ireq.i_val != IEEE80211_WEP_NOSUP) {
385 		printf("\twepmode");
386 		switch (ireq.i_val) {
387 			case IEEE80211_WEP_OFF:
388 				printf(" OFF");
389 				break;
390 			case IEEE80211_WEP_ON:
391 				printf(" ON");
392 				break;
393 			case IEEE80211_WEP_MIXED:
394 				printf(" MIXED");
395 				break;
396 			default:
397 				printf(" UNKNOWN");
398 				break;
399 		}
400 
401 		/*
402 		 * If we get here then we've got WEP support so we need
403 		 * to print WEP status.
404 		 */
405 
406 		ireq.i_type = IEEE80211_IOC_WEPTXKEY;
407 		if (ioctl(s, SIOCG80211, &ireq) < 0) {
408 			warn("WEP support, but no tx key!");
409 			goto end;
410 		}
411 		printf(" weptxkey %d", ireq.i_val+1);
412 
413 		ireq.i_type = IEEE80211_IOC_NUMWEPKEYS;
414 		if (ioctl(s, SIOCG80211, &ireq) < 0) {
415 			warn("WEP support, but no NUMWEPKEYS support!");
416 			goto end;
417 		}
418 		num = ireq.i_val;
419 
420 		printf("\n");
421 
422 		ireq.i_type = IEEE80211_IOC_WEPKEY;
423 		spacer = '\t';
424 		for (i = 0; i < num; i++) {
425 			ireq.i_val = i;
426 			if (ioctl(s, SIOCG80211, &ireq) < 0) {
427 				warn("WEP support, but can get keys!");
428 				goto end;
429 			}
430 			if (ireq.i_len == 0 || ireq.i_len > 13)
431 				continue;
432 			printf("%cwepkey %d:%s", spacer, i+1,
433 			    ireq.i_len <= 5 ? "64-bit" : "128-bit");
434 			if (spacer == '\t')
435 				spacer = ' ';
436 		}
437 		if (spacer == ' ')
438 			printf("\n");
439 	}
440 
441 end:
442 	return;
443 }
444 
445 static void
446 set80211(int s, int type, int val, int len, u_int8_t *data)
447 {
448 	struct ieee80211req	ireq;
449 
450 	(void) memset(&ireq, 0, sizeof(ireq));
451 	(void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
452 	ireq.i_type = type;
453 	ireq.i_val = val;
454 	ireq.i_len = len;
455 	ireq.i_data = data;
456 	if (ioctl(s, SIOCS80211, &ireq) < 0)
457 		err(1, "SIOCS80211");
458 }
459 
460 static const char *
461 get_string(const char *val, const char *sep, u_int8_t *buf, int *lenp)
462 {
463 	int len;
464 	int hexstr;
465 	u_int8_t *p;
466 
467 	len = *lenp;
468 	p = buf;
469 	hexstr = (val[0] == '0' && tolower((u_char)val[1]) == 'x');
470 	if (hexstr)
471 		val += 2;
472 	for (;;) {
473 		if (*val == '\0')
474 			break;
475 		if (sep != NULL && strchr(sep, *val) != NULL) {
476 			val++;
477 			break;
478 		}
479 		if (hexstr) {
480 			if (!isxdigit((u_char)val[0]) ||
481 			    !isxdigit((u_char)val[1])) {
482 				warnx("bad hexadecimal digits");
483 				return NULL;
484 			}
485 		}
486 		if (p > buf + len) {
487 			if (hexstr)
488 				warnx("hexadecimal digits too long");
489 			else
490 				warnx("strings too long");
491 			return NULL;
492 		}
493 		if (hexstr) {
494 #define	tohex(x)	(isdigit(x) ? (x) - '0' : tolower(x) - 'a' + 10)
495 			*p++ = (tohex((u_char)val[0]) << 4) |
496 			    tohex((u_char)val[1]);
497 #undef tohex
498 			val += 2;
499 		} else
500 			*p++ = *val++;
501 	}
502 	len = p - buf;
503 	/* The string "-" is treated as the empty string. */
504 	if (!hexstr && len == 1 && buf[0] == '-')
505 		len = 0;
506 	if (len < *lenp)
507 		memset(p, 0, *lenp - len);
508 	*lenp = len;
509 	return val;
510 }
511 
512 static void
513 print_string(const u_int8_t *buf, int len)
514 {
515 	int i;
516 	int hasspc;
517 
518 	i = 0;
519 	hasspc = 0;
520 	for (; i < len; i++) {
521 		if (!isprint(buf[i]) && buf[i] != '\0')
522 			break;
523 		if (isspace(buf[i]))
524 			hasspc++;
525 	}
526 	if (i == len) {
527 		if (hasspc || len == 0 || buf[0] == '\0')
528 			printf("\"%.*s\"", len, buf);
529 		else
530 			printf("%.*s", len, buf);
531 	} else {
532 		printf("0x");
533 		for (i = 0; i < len; i++)
534 			printf("%02x", buf[i]);
535 	}
536 }
537 
538