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