ifieee80211.c revision 88748 
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: head/sbin/ifconfig/ifieee80211.c 88748 2001-12-31 22:01:44Z ambrisko $
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
89static void set80211(int s, int type, int val, int len, u_int8_t *data);
90static const char *get_string(const char *val, const char *sep,
91    u_int8_t *buf, int *lenp);
92static void print_string(const u_int8_t *buf, int len);
93
94void
95set80211ssid(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	len = sizeof(val);
103	if (len > 2 && isdigit(val[0]) && val[1] == ':') {
104		ssid = atoi(val)-1;
105		val += 2;
106	}
107
108	bzero(data, sizeof(data));
109	len = sizeof(data);
110	get_string(val, NULL, data, &len);
111
112	set80211(s, IEEE80211_IOC_SSID, ssid, len, data);
113}
114
115void
116set80211stationname(const char *val, int d, int s, const struct afswtch *rafp)
117{
118	int			len;
119	u_int8_t		data[33];
120
121	bzero(data, sizeof(data));
122	len = sizeof(data);
123	get_string(val, NULL, data, &len);
124
125	set80211(s, IEEE80211_IOC_STATIONNAME, 0, len, data);
126}
127
128void
129set80211channel(const char *val, int d, int s, const struct afswtch *rafp)
130{
131	set80211(s, IEEE80211_IOC_CHANNEL, atoi(val), 0, NULL);
132}
133
134void
135set80211authmode(const char *val, int d, int s, const struct afswtch *rafp)
136{
137	int	mode;
138
139	if(strcasecmp(val, "none") == 0) {
140		mode = IEEE80211_AUTH_NONE;
141	} else if(strcasecmp(val, "open") == 0) {
142		mode = IEEE80211_AUTH_OPEN;
143	} else if(strcasecmp(val, "shared") == 0) {
144		mode = IEEE80211_AUTH_SHARED;
145	} else {
146		err(1, "unknown authmode");
147	}
148
149	set80211(s, IEEE80211_IOC_AUTHMODE, mode, 0, NULL);
150}
151
152void
153set80211powersavemode(const char *val, int d, int s, const struct afswtch *rafp)
154{
155	int	mode;
156
157	if(strcasecmp(val, "off") == 0) {
158		mode = IEEE80211_POWERSAVE_OFF;
159	} else if(strcasecmp(val, "on") == 0) {
160		mode = IEEE80211_POWERSAVE_ON;
161	} else if(strcasecmp(val, "cam") == 0) {
162		mode = IEEE80211_POWERSAVE_CAM;
163	} else if(strcasecmp(val, "psp") == 0) {
164		mode = IEEE80211_POWERSAVE_PSP;
165	} else if(strcasecmp(val, "psp-cam") == 0) {
166		mode = IEEE80211_POWERSAVE_PSP_CAM;
167	} else {
168		err(1, "unknown powersavemode");
169	}
170
171	set80211(s, IEEE80211_IOC_POWERSAVE, mode, 0, NULL);
172}
173
174void
175set80211powersave(const char *val, int d, int s, const struct afswtch *rafp)
176{
177	if (d == 0)
178		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_OFF,
179		    0, NULL);
180	else
181		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_ON,
182		    0, NULL);
183}
184
185void
186set80211powersavesleep(const char *val, int d, int s, const struct afswtch *rafp)
187{
188	set80211(s, IEEE80211_IOC_POWERSAVESLEEP, atoi(val), 0, NULL);
189}
190
191void
192set80211wepmode(const char *val, int d, int s, const struct afswtch *rafp)
193{
194	int	mode;
195
196	if(strcasecmp(val, "off") == 0) {
197		mode = IEEE80211_WEP_OFF;
198	} else if(strcasecmp(val, "on") == 0) {
199		mode = IEEE80211_WEP_ON;
200	} else if(strcasecmp(val, "mixed") == 0) {
201		mode = IEEE80211_WEP_MIXED;
202	} else {
203		err(1, "unknown wep mode");
204	}
205
206	set80211(s, IEEE80211_IOC_WEP, mode, 0, NULL);
207}
208
209void
210set80211wep(const char *val, int d, int s, const struct afswtch *rafp)
211{
212	set80211(s, IEEE80211_IOC_WEP, d, 0, NULL);
213}
214
215void
216set80211weptxkey(const char *val, int d, int s, const struct afswtch *rafp)
217{
218	set80211(s, IEEE80211_IOC_WEPTXKEY, atoi(val)-1, 0, NULL);
219}
220
221void
222set80211wepkey(const char *val, int d, int s, const struct afswtch *rafp)
223{
224	int		key = 0;
225	int		len;
226	u_int8_t	data[14];
227
228	if(isdigit(val[0]) && val[1] == ':') {
229		key = atoi(val)-1;
230		val += 2;
231	}
232
233	bzero(data, sizeof(data));
234	len = sizeof(data);
235	get_string(val, NULL, data, &len);
236
237	set80211(s, IEEE80211_IOC_WEPKEY, key, len, data);
238}
239
240/*
241 * This function is purly a NetBSD compatability interface.  The NetBSD
242 * iterface is too inflexable, but it's there so we'll support it since
243 * it's not all that hard.
244 */
245void
246set80211nwkey(const char *val, int d, int s, const struct afswtch *rafp)
247{
248	int		txkey;
249	int		i, len;
250	u_int8_t	data[14];
251
252	set80211(s, IEEE80211_IOC_WEP, IEEE80211_WEP_ON, 0, NULL);
253
254	if(isdigit(val[0]) && val[1] == ':') {
255		txkey = val[0]-'0'-1;
256		val += 2;
257
258		for(i = 0; i < 4; i++) {
259			bzero(data, sizeof(data));
260			len = sizeof(data);
261			val = get_string(val, ",", data, &len);
262
263			set80211(s, IEEE80211_IOC_WEPKEY, i, len, data);
264		}
265	} else {
266		bzero(data, sizeof(data));
267		len = sizeof(data);
268		get_string(val, NULL, data, &len);
269		txkey = 0;
270
271		set80211(s, IEEE80211_IOC_WEPKEY, 0, len, data);
272
273		bzero(data, sizeof(data));
274		for(i = 1; i < 4; i++)
275			set80211(s, IEEE80211_IOC_WEPKEY, i, 0, data);
276	}
277
278	set80211(s, IEEE80211_IOC_WEPTXKEY, txkey, 0, NULL);
279}
280
281void
282ieee80211_status (s, info)
283	int s;
284	struct rt_addrinfo *info __unused;
285{
286	int			i;
287	int			num;
288	struct ieee80211req	ireq;
289	u_int8_t		data[32];
290	char			spacer;
291
292	(void) memset(&ireq, 0, sizeof(ireq));
293	(void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
294	ireq.i_data = &data;
295
296	ireq.i_type = IEEE80211_IOC_SSID;
297	ireq.i_val = -1;
298	if (ioctl(s, SIOCG80211, &ireq) < 0) {
299		/* If we can't get the SSID, the this isn't an 802.11 device. */
300		return;
301	}
302	printf("\tssid ");
303	print_string(data, ireq.i_len);
304	num = 0;
305	ireq.i_type = IEEE80211_IOC_NUMSSIDS;
306	if (ioctl(s, SIOCG80211, &ireq) >= 0) {
307		num = ireq.i_val;
308	}
309	ireq.i_type = IEEE80211_IOC_SSID;
310	for (ireq.i_val = 0; ireq.i_val < num; ireq.i_val++) {
311		if (ioctl(s, SIOCG80211, &ireq) >= 0 && ireq.i_len > 0) {
312			printf(" %d:", ireq.i_val + 1);
313			print_string(data, ireq.i_len);
314		}
315	}
316	printf("\n");
317
318	ireq.i_type = IEEE80211_IOC_STATIONNAME;
319	if (ioctl(s, SIOCG80211, &ireq) != -1) {
320		printf("\tstationname ");
321		print_string(data, ireq.i_len);
322		printf("\n");
323	}
324
325	ireq.i_type = IEEE80211_IOC_CHANNEL;
326	if (ioctl(s, SIOCG80211, &ireq) < 0) {
327		goto end;
328	}
329	printf("\tchannel %d", ireq.i_val);
330
331	ireq.i_type = IEEE80211_IOC_AUTHMODE;
332	if (ioctl(s, SIOCG80211, &ireq) != -1) {
333		printf(" authmode");
334		switch (ireq.i_val) {
335			case IEEE80211_AUTH_NONE:
336				printf(" NONE");
337				break;
338			case IEEE80211_AUTH_OPEN:
339				printf(" OPEN");
340				break;
341			case IEEE80211_AUTH_SHARED:
342				printf(" SHARED");
343				break;
344			default:
345				printf(" UNKNOWN");
346				break;
347		}
348	}
349
350	ireq.i_type = IEEE80211_IOC_POWERSAVE;
351	if (ioctl(s, SIOCG80211, &ireq) != -1 &&
352	    ireq.i_val != IEEE80211_POWERSAVE_NOSUP ) {
353		printf(" powersavemode");
354		switch (ireq.i_val) {
355			case IEEE80211_POWERSAVE_OFF:
356				printf(" OFF");
357				break;
358			case IEEE80211_POWERSAVE_CAM:
359				printf(" CAM");
360				break;
361			case IEEE80211_POWERSAVE_PSP:
362				printf(" PSP");
363				break;
364			case IEEE80211_POWERSAVE_PSP_CAM:
365				printf(" PSP-CAM");
366				break;
367		}
368
369		ireq.i_type = IEEE80211_IOC_POWERSAVESLEEP;
370		if (ioctl(s, SIOCG80211, &ireq) != -1) {
371			if(ireq.i_val)
372				printf(" powersavesleep %d", ireq.i_val);
373		}
374	}
375
376	printf("\n");
377
378	ireq.i_type = IEEE80211_IOC_WEP;
379	if (ioctl(s, SIOCG80211, &ireq) != -1 &&
380	    ireq.i_val != IEEE80211_WEP_NOSUP) {
381		printf("\twepmode");
382		switch (ireq.i_val) {
383			case IEEE80211_WEP_OFF:
384				printf(" OFF");
385				break;
386			case IEEE80211_WEP_ON:
387				printf(" ON");
388				break;
389			case IEEE80211_WEP_MIXED:
390				printf(" MIXED");
391				break;
392			default:
393				printf(" UNKNOWN");
394				break;
395		}
396
397		/*
398		 * If we get here then we've got WEP support so we need
399		 * to print WEP status.
400		 */
401
402		ireq.i_type = IEEE80211_IOC_WEPTXKEY;
403		if (ioctl(s, SIOCG80211, &ireq) < 0) {
404			warn("WEP support, but no tx key!");
405			goto end;
406		}
407		printf(" weptxkey %d", ireq.i_val+1);
408
409		ireq.i_type = IEEE80211_IOC_NUMWEPKEYS;
410		if (ioctl(s, SIOCG80211, &ireq) < 0) {
411			warn("WEP support, but no NUMWEPKEYS support!");
412			goto end;
413		}
414		num = ireq.i_val;
415
416		printf("\n");
417
418		ireq.i_type = IEEE80211_IOC_WEPKEY;
419		spacer = '\t';
420		for(i = 0; i < num; i++) {
421			ireq.i_val = i;
422			if (ioctl(s, SIOCG80211, &ireq) < 0) {
423				warn("WEP support, but can get keys!");
424				goto end;
425			}
426			if(ireq.i_len == 0 || ireq.i_len > 13)
427				continue;
428			printf("%cwepkey %d:%s", spacer, i+1,
429			    ireq.i_len <= 5 ? "64-bit" : "128-bit");
430			if(spacer == '\t')
431				spacer = ' ';
432		}
433		if (spacer == ' ')
434			printf("\n");
435	}
436
437end:
438	return;
439}
440
441static void
442set80211(int s, int type, int val, int len, u_int8_t *data)
443{
444	struct ieee80211req	ireq;
445
446	(void) memset(&ireq, 0, sizeof(ireq));
447	(void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
448	ireq.i_type = type;
449	ireq.i_val = val;
450	ireq.i_len = len;
451	ireq.i_data = data;
452	if(ioctl(s, SIOCS80211, &ireq) < 0)
453		err(1, "SIOCS80211");
454}
455
456static const char *
457get_string(const char *val, const char *sep, u_int8_t *buf, int *lenp)
458{
459	int len;
460	int hexstr;
461	u_int8_t *p;
462
463	len = *lenp;
464	p = buf;
465	hexstr = (val[0] == '0' && tolower((u_char)val[1]) == 'x');
466	if (hexstr)
467		val += 2;
468	for (;;) {
469		if (*val == '\0')
470			break;
471		if (sep != NULL && strchr(sep, *val) != NULL) {
472			val++;
473			break;
474		}
475		if (hexstr) {
476			if (!isxdigit((u_char)val[0]) ||
477			    !isxdigit((u_char)val[1])) {
478				warnx("bad hexadecimal digits");
479				return NULL;
480			}
481		}
482		if (p > buf + len) {
483			if (hexstr)
484				warnx("hexadecimal digits too long");
485			else
486				warnx("strings too long");
487			return NULL;
488		}
489		if (hexstr) {
490#define	tohex(x)	(isdigit(x) ? (x) - '0' : tolower(x) - 'a' + 10)
491			*p++ = (tohex((u_char)val[0]) << 4) |
492			    tohex((u_char)val[1]);
493#undef tohex
494			val += 2;
495		} else
496			*p++ = *val++;
497	}
498	len = p - buf;
499	/* The string "-" is treated as the empty string. */
500	if (!hexstr && len == 1 && buf[0] == '-')
501		len = 0;
502	if (len < *lenp)
503		memset(p, 0, *lenp - len);
504	*lenp = len;
505	return val;
506}
507
508static void
509print_string(const u_int8_t *buf, int len)
510{
511	int i;
512	int hasspc;
513
514	i = 0;
515	hasspc = 0;
516	for(; i < len; i++) {
517		if (!isprint(buf[i]) && buf[i] != '\0')
518			break;
519		if (isspace(buf[i]))
520			hasspc++;
521	}
522	if (i == len) {
523		if (hasspc || len == 0 || buf[0] == '\0')
524			printf("\"%.*s\"", len, buf);
525		else
526			printf("%.*s", len, buf);
527	} else {
528		printf("0x");
529		for (i = 0; i < len; i++)
530			printf("%02x", buf[i]);
531	}
532}
533
534