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