ifieee80211.c revision 95005 
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: head/sbin/ifconfig/ifieee80211.c 95005 2002-04-18 17:14:09Z imp $
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 <net/if_ieee80211.h>
79
80#include <ctype.h>
81#include <err.h>
82#include <errno.h>
83#include <fcntl.h>
84#include <stdio.h>
85#include <stdlib.h>
86#include <string.h>
87#include <unistd.h>
88
89#include "ifconfig.h"
90
91static void set80211(int s, int type, int val, int len, u_int8_t *data);
92static const char *get_string(const char *val, const char *sep,
93    u_int8_t *buf, int *lenp);
94static void print_string(const u_int8_t *buf, int len);
95
96void
97set80211ssid(const char *val, int d, int s, const struct afswtch *rafp)
98{
99	int		ssid;
100	int		len;
101	u_int8_t	data[33];
102
103	ssid = 0;
104	len = sizeof(val);
105	if (len > 2 && isdigit(val[0]) && val[1] == ':') {
106		ssid = atoi(val)-1;
107		val += 2;
108	}
109
110	bzero(data, sizeof(data));
111	len = sizeof(data);
112	get_string(val, NULL, data, &len);
113
114	set80211(s, IEEE80211_IOC_SSID, ssid, len, data);
115}
116
117void
118set80211stationname(const char *val, int d, int s, const struct afswtch *rafp)
119{
120	int			len;
121	u_int8_t		data[33];
122
123	bzero(data, sizeof(data));
124	len = sizeof(data);
125	get_string(val, NULL, data, &len);
126
127	set80211(s, IEEE80211_IOC_STATIONNAME, 0, len, data);
128}
129
130void
131set80211channel(const char *val, int d, int s, const struct afswtch *rafp)
132{
133	set80211(s, IEEE80211_IOC_CHANNEL, atoi(val), 0, NULL);
134}
135
136void
137set80211authmode(const char *val, int d, int s, const struct afswtch *rafp)
138{
139	int	mode;
140
141	if (strcasecmp(val, "none") == 0) {
142		mode = IEEE80211_AUTH_NONE;
143	} else if (strcasecmp(val, "open") == 0) {
144		mode = IEEE80211_AUTH_OPEN;
145	} else if (strcasecmp(val, "shared") == 0) {
146		mode = IEEE80211_AUTH_SHARED;
147	} else {
148		err(1, "unknown authmode");
149	}
150
151	set80211(s, IEEE80211_IOC_AUTHMODE, mode, 0, NULL);
152}
153
154void
155set80211powersavemode(const char *val, int d, int s, const struct afswtch *rafp)
156{
157	int	mode;
158
159	if (strcasecmp(val, "off") == 0) {
160		mode = IEEE80211_POWERSAVE_OFF;
161	} else if (strcasecmp(val, "on") == 0) {
162		mode = IEEE80211_POWERSAVE_ON;
163	} else if (strcasecmp(val, "cam") == 0) {
164		mode = IEEE80211_POWERSAVE_CAM;
165	} else if (strcasecmp(val, "psp") == 0) {
166		mode = IEEE80211_POWERSAVE_PSP;
167	} else if (strcasecmp(val, "psp-cam") == 0) {
168		mode = IEEE80211_POWERSAVE_PSP_CAM;
169	} else {
170		err(1, "unknown powersavemode");
171	}
172
173	set80211(s, IEEE80211_IOC_POWERSAVE, mode, 0, NULL);
174}
175
176void
177set80211powersave(const char *val, int d, int s, const struct afswtch *rafp)
178{
179	if (d == 0)
180		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_OFF,
181		    0, NULL);
182	else
183		set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_ON,
184		    0, NULL);
185}
186
187void
188set80211powersavesleep(const char *val, int d, int s, const struct afswtch *rafp)
189{
190	set80211(s, IEEE80211_IOC_POWERSAVESLEEP, atoi(val), 0, NULL);
191}
192
193void
194set80211wepmode(const char *val, int d, int s, const struct afswtch *rafp)
195{
196	int	mode;
197
198	if (strcasecmp(val, "off") == 0) {
199		mode = IEEE80211_WEP_OFF;
200	} else if (strcasecmp(val, "on") == 0) {
201		mode = IEEE80211_WEP_ON;
202	} else if (strcasecmp(val, "mixed") == 0) {
203		mode = IEEE80211_WEP_MIXED;
204	} else {
205		err(1, "unknown wep mode");
206	}
207
208	set80211(s, IEEE80211_IOC_WEP, mode, 0, NULL);
209}
210
211void
212set80211wep(const char *val, int d, int s, const struct afswtch *rafp)
213{
214	set80211(s, IEEE80211_IOC_WEP, d, 0, NULL);
215}
216
217void
218set80211weptxkey(const char *val, int d, int s, const struct afswtch *rafp)
219{
220	set80211(s, IEEE80211_IOC_WEPTXKEY, atoi(val)-1, 0, NULL);
221}
222
223void
224set80211wepkey(const char *val, int d, int s, const struct afswtch *rafp)
225{
226	int		key = 0;
227	int		len;
228	u_int8_t	data[14];
229
230	if (isdigit(val[0]) && val[1] == ':') {
231		key = atoi(val)-1;
232		val += 2;
233	}
234
235	bzero(data, sizeof(data));
236	len = sizeof(data);
237	get_string(val, NULL, data, &len);
238
239	set80211(s, IEEE80211_IOC_WEPKEY, key, len, data);
240}
241
242/*
243 * This function is purly a NetBSD compatability interface.  The NetBSD
244 * iterface is too inflexable, but it's there so we'll support it since
245 * it's not all that hard.
246 */
247void
248set80211nwkey(const char *val, int d, int s, const struct afswtch *rafp)
249{
250	int		txkey;
251	int		i, len;
252	u_int8_t	data[14];
253
254	set80211(s, IEEE80211_IOC_WEP, IEEE80211_WEP_ON, 0, NULL);
255
256	if (isdigit(val[0]) && val[1] == ':') {
257		txkey = val[0]-'0'-1;
258		val += 2;
259
260		for (i = 0; i < 4; i++) {
261			bzero(data, sizeof(data));
262			len = sizeof(data);
263			val = get_string(val, ",", data, &len);
264
265			set80211(s, IEEE80211_IOC_WEPKEY, i, len, data);
266		}
267	} else {
268		bzero(data, sizeof(data));
269		len = sizeof(data);
270		get_string(val, NULL, data, &len);
271		txkey = 0;
272
273		set80211(s, IEEE80211_IOC_WEPKEY, 0, len, data);
274
275		bzero(data, sizeof(data));
276		for (i = 1; i < 4; i++)
277			set80211(s, IEEE80211_IOC_WEPKEY, i, 0, data);
278	}
279
280	set80211(s, IEEE80211_IOC_WEPTXKEY, txkey, 0, NULL);
281}
282
283void
284ieee80211_status (int s, 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