Home | History | Annotate | Line # | Download | only in ifconfig
ieee80211.c revision 1.14
      1 /*	$NetBSD: ieee80211.c,v 1.14 2008/05/06 17:29:04 dyoung Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1983, 1993
      5  *      The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 #ifndef lint
     34 __RCSID("$NetBSD: ieee80211.c,v 1.14 2008/05/06 17:29:04 dyoung Exp $");
     35 #endif /* not lint */
     36 
     37 #include <sys/param.h>
     38 #include <sys/ioctl.h>
     39 #include <sys/socket.h>
     40 
     41 #include <net/if.h>
     42 #include <net/if_ether.h>
     43 #include <net/if_media.h>
     44 #include <net/route.h>
     45 #include <net80211/ieee80211.h>
     46 #include <net80211/ieee80211_ioctl.h>
     47 #include <net80211/ieee80211_netbsd.h>
     48 
     49 #include <assert.h>
     50 #include <ctype.h>
     51 #include <err.h>
     52 #include <errno.h>
     53 #include <netdb.h>
     54 #include <string.h>
     55 #include <stddef.h>
     56 #include <stdlib.h>
     57 #include <stdio.h>
     58 #include <unistd.h>
     59 #include <util.h>
     60 
     61 #include "extern.h"
     62 #include "ieee80211.h"
     63 #include "parse.h"
     64 #include "env.h"
     65 
     66 static int set80211(prop_dictionary_t env, int, int, int, u_int8_t *);
     67 static u_int ieee80211_mhz2ieee(u_int, u_int);
     68 static int getmaxrate(const uint8_t [15], u_int8_t);
     69 static const char * getcaps(int);
     70 static void printie(const char*, const uint8_t *, size_t, int);
     71 static int copy_essid(char [], size_t, const u_int8_t *, size_t);
     72 static void scan_and_wait(prop_dictionary_t);
     73 static void list_scan(prop_dictionary_t);
     74 static int mappsb(u_int , u_int);
     75 static int mapgsm(u_int , u_int);
     76 
     77 static void printies(const u_int8_t *, int, int);
     78 static void printie(const char* , const uint8_t *, size_t , int);
     79 static void printwmeparam(const char *, const u_int8_t *, size_t , int);
     80 static void printwmeinfo(const char *, const u_int8_t *, size_t , int);
     81 static const char * wpa_cipher(const u_int8_t *);
     82 static const char * wpa_keymgmt(const u_int8_t *);
     83 static void printwpaie(const char *, const u_int8_t *, size_t , int);
     84 static const char * rsn_cipher(const u_int8_t *);
     85 static const char * rsn_keymgmt(const u_int8_t *);
     86 static void printrsnie(const char *, const u_int8_t *, size_t , int);
     87 static void printssid(const char *, const u_int8_t *, size_t , int);
     88 static void printrates(const char *, const u_int8_t *, size_t , int);
     89 static void printcountry(const char *, const u_int8_t *, size_t , int);
     90 static int iswpaoui(const u_int8_t *);
     91 static int iswmeinfo(const u_int8_t *);
     92 static int iswmeparam(const u_int8_t *);
     93 static const char * iename(int);
     94 
     95 extern int vflag;
     96 
     97 struct kwinst ieee80211boolkw[] = {
     98 	  {.k_word = "hidessid", .k_key = "hidessid", .k_neg = true,
     99 	   .k_type = KW_T_BOOL, .k_bool = true, .k_negbool = false,
    100 	   .k_exec = sethidessid}
    101 	, {.k_word = "apbridge", .k_key = "apbridge", .k_neg = true,
    102 	   .k_type = KW_T_BOOL, .k_bool = true, .k_negbool = false,
    103 	   .k_exec = setapbridge}
    104 	, {.k_word = "powersave", .k_key = "powersave", .k_neg = true,
    105 	   .k_type = KW_T_BOOL, .k_bool = true, .k_negbool = false,
    106 	   .k_exec = setifpowersave}
    107 };
    108 
    109 struct pkw ieee80211bool = PKW_INITIALIZER(&ieee80211bool, "ieee80211 boolean",
    110     NULL, NULL, ieee80211boolkw, __arraycount(ieee80211boolkw),
    111     &command_root.pb_parser);
    112 
    113 struct pinteger parse_chan = PINTEGER_INITIALIZER1(&parse_chan, "chan",
    114     0, UINT16_MAX, 10, setifchan, "chan", &command_root.pb_parser);
    115 
    116 struct pinteger parse_frag = PINTEGER_INITIALIZER1(&parse_frag, "frag",
    117     IEEE80211_FRAG_MIN, IEEE80211_FRAG_MAX, 10,
    118     setiffrag, "frag", &command_root.pb_parser);
    119 
    120 struct pstr parse_ssid = PSTR_INITIALIZER(&parse_pass, "ssid", setifssid,
    121     "ssid", &command_root.pb_parser);
    122 
    123 struct kwinst listskw[] = {
    124 	{.k_word = "scan", .k_exec = scan_exec}
    125 };
    126 
    127 struct pkw lists = PKW_INITIALIZER(&lists, "lists", NULL, "list", listskw,
    128     __arraycount(listskw), &command_root.pb_parser);
    129 
    130 struct pinteger parse_powersavesleep =
    131     PINTEGER_INITIALIZER1(&parse_powersavesleep, "powersavesleep",
    132     0, INT_MAX, 10, setifpowersavesleep, "powersavesleep",
    133     &command_root.pb_parser);
    134 
    135 struct pstr parse_nwkey = PSTR_INITIALIZER(&parse_nwkey, "nwkey", setifnwkey,
    136     "nwkey", &command_root.pb_parser);
    137 
    138 struct pstr parse_bssid = PSTR_INITIALIZER(&parse_bssid, "bssid", setifbssid,
    139     "bssid", &command_root.pb_parser);
    140 
    141 static int
    142 set80211(prop_dictionary_t env, int type, int val, int len, u_int8_t *data)
    143 {
    144 	struct ieee80211req	ireq;
    145 	const char *ifname;
    146 	int s;
    147 
    148 	if ((s = getsock(AF_UNSPEC)) == -1)
    149 		return -1;
    150 
    151 	if ((ifname = getifname(env)) == NULL)
    152 		return -1;
    153 
    154 	(void)memset(&ireq, 0, sizeof(ireq));
    155 	estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    156 	ireq.i_type = type;
    157 	ireq.i_val = val;
    158 	ireq.i_len = len;
    159 	ireq.i_data = data;
    160 	if (ioctl(s, SIOCS80211, &ireq) == -1) {
    161 		warn("SIOCS80211");
    162 		return -1;
    163 	}
    164 	return 0;
    165 }
    166 
    167 int
    168 sethidessid(prop_dictionary_t env, prop_dictionary_t xenv)
    169 {
    170 	prop_bool_t on;
    171 
    172 	on = (prop_bool_t)prop_dictionary_get(env, "hidessid");
    173 	assert(on != NULL);
    174 	return set80211(env, IEEE80211_IOC_HIDESSID,
    175 	    prop_bool_true(on) ? 1 : 0, 0, NULL);
    176 }
    177 
    178 int
    179 setapbridge(prop_dictionary_t env, prop_dictionary_t xenv)
    180 {
    181 	prop_bool_t on;
    182 
    183 	on = (prop_bool_t)prop_dictionary_get(env, "apbridge");
    184 	assert(on != NULL);
    185 	return set80211(env, IEEE80211_IOC_APBRIDGE,
    186 	    prop_bool_true(on) ? 1 : 0, 0, NULL);
    187 }
    188 
    189 static enum ieee80211_opmode
    190 get80211opmode(prop_dictionary_t env)
    191 {
    192 	struct ifmediareq ifmr;
    193 	const char *ifname;
    194 	int s;
    195 
    196 	if ((s = getsock(AF_UNSPEC)) == -1)
    197 		return -1;
    198 
    199 	if ((ifname = getifname(env)) == NULL)
    200 		return -1;
    201 
    202 	(void) memset(&ifmr, 0, sizeof(ifmr));
    203 	estrlcpy(ifmr.ifm_name, ifname, sizeof(ifmr.ifm_name));
    204 	if (ioctl(s, SIOCGIFMEDIA, (caddr_t)&ifmr) >= 0) {
    205 		if (ifmr.ifm_current & IFM_IEEE80211_ADHOC)
    206 			return IEEE80211_M_IBSS;        /* XXX ahdemo */
    207 		if (ifmr.ifm_current & IFM_IEEE80211_HOSTAP)
    208 			return IEEE80211_M_HOSTAP;
    209 		if (ifmr.ifm_current & IFM_IEEE80211_MONITOR)
    210 			return IEEE80211_M_MONITOR;
    211 	}
    212 
    213 	return IEEE80211_M_STA;
    214 }
    215 
    216 int
    217 setifssid(prop_dictionary_t env, prop_dictionary_t xenv)
    218 {
    219 	struct ieee80211_nwid nwid;
    220 	int s;
    221 	ssize_t len;
    222 	const char *ifname;
    223 	struct ifreq ifr;
    224 
    225 	if ((ifname = getifname(env)) == NULL)
    226 		return -1;
    227 
    228 	if ((s = getsock(AF_UNSPEC)) == -1)
    229 		err(EXIT_FAILURE, "%s: getsock", __func__);
    230 
    231 	memset(&nwid, 0, sizeof(nwid));
    232 	if ((len = getargdata(env, "ssid", nwid.i_nwid,
    233 	    sizeof(nwid.i_nwid))) == -1)
    234 		errx(EXIT_FAILURE, "%s: SSID too long", __func__);
    235 	nwid.i_len = (uint8_t)len;
    236 	memset(&ifr, 0, sizeof(ifr));
    237 	if ((ifname = getifname(env)) == NULL)
    238 		err(EXIT_FAILURE, "%s: getifname", __func__);
    239 	estrlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    240 	ifr.ifr_data = &nwid;
    241 	if (ioctl(s, SIOCS80211NWID, &ifr) == -1)
    242 		err(EXIT_FAILURE, "SIOCS80211NWID");
    243 	return 0;
    244 }
    245 
    246 int
    247 unsetifbssid(prop_dictionary_t env, prop_dictionary_t xenv)
    248 {
    249 	struct ieee80211_bssid bssid;
    250 	const char *ifname;
    251 	int s;
    252 
    253 	if ((s = getsock(AF_UNSPEC)) == -1)
    254 		err(EXIT_FAILURE, "%s: getsock", __func__);
    255 
    256 	memset(&bssid.i_bssid, 0, sizeof(bssid.i_bssid));
    257 
    258 	if ((ifname = getifname(env)) == NULL)
    259 		return -1;
    260 	estrlcpy(bssid.i_name, ifname, sizeof(bssid.i_name));
    261 	if (ioctl(s, SIOCS80211BSSID, &bssid) == -1)
    262 		err(EXIT_FAILURE, "SIOCS80211BSSID");
    263 	return 0;
    264 }
    265 
    266 int
    267 setifbssid(prop_dictionary_t env, prop_dictionary_t xenv)
    268 {
    269 	char buf[24];
    270 	struct ieee80211_bssid bssid;
    271 	const char *ifname;
    272 	struct ether_addr *ea;
    273 	int s;
    274 
    275 	if (getargstr(env, "bssid", buf, sizeof(buf)) == -1)
    276 		errx(EXIT_FAILURE, "%s: BSSID too long", __func__);
    277 	if ((s = getsock(AF_UNSPEC)) == -1)
    278 		err(EXIT_FAILURE, "%s: getsock", __func__);
    279 
    280 	ea = ether_aton(buf);
    281 	if (ea == NULL) {
    282 		errx(EXIT_FAILURE, "malformed BSSID: %s", buf);
    283 		return -1;
    284 	}
    285 	memcpy(&bssid.i_bssid, ea->ether_addr_octet,
    286 	    sizeof(bssid.i_bssid));
    287 
    288 	if ((ifname = getifname(env)) == NULL)
    289 		return -1;
    290 	estrlcpy(bssid.i_name, ifname, sizeof(bssid.i_name));
    291 	if (ioctl(s, SIOCS80211BSSID, &bssid) == -1)
    292 		err(EXIT_FAILURE, "SIOCS80211BSSID");
    293 	return 0;
    294 }
    295 
    296 int
    297 setiffrag(prop_dictionary_t env, prop_dictionary_t xenv)
    298 {
    299 	prop_number_t num;
    300 	const char *ifname;
    301 	struct ieee80211req ireq;
    302 	int s;
    303 
    304 	if ((s = getsock(AF_UNSPEC)) == -1)
    305 		return -1;
    306 
    307 	if ((ifname = getifname(env)) == NULL)
    308 		return -1;
    309 
    310 	num = (prop_number_t)prop_dictionary_get(env, "frag");
    311 	assert(num != NULL);
    312 
    313 	estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    314 	ireq.i_type = IEEE80211_IOC_FRAGTHRESHOLD;
    315 	ireq.i_val = (int16_t)prop_number_integer_value(num);
    316 	if (ioctl(s, SIOCS80211, &ireq) == -1)
    317 		err(EXIT_FAILURE, "IEEE80211_IOC_FRAGTHRESHOLD");
    318 	return 0;
    319 }
    320 
    321 int
    322 setifchan(prop_dictionary_t env, prop_dictionary_t xenv)
    323 {
    324 	prop_number_t num;
    325 	const char *ifname;
    326 	struct ieee80211chanreq channel;
    327 	int s;
    328 
    329 	if ((s = getsock(AF_UNSPEC)) == -1)
    330 		return -1;
    331 
    332 	if ((ifname = getifname(env)) == NULL)
    333 		return -1;
    334 
    335 	num = (prop_number_t)prop_dictionary_get(env, "chan");
    336 	assert(num != NULL);
    337 
    338 	estrlcpy(channel.i_name, ifname, sizeof(channel.i_name));
    339 	channel.i_channel = (uint16_t)prop_number_integer_value(num);
    340 	if (ioctl(s, SIOCS80211CHANNEL, &channel) == -1)
    341 		err(EXIT_FAILURE, "SIOCS80211CHANNEL");
    342 	return 0;
    343 }
    344 
    345 int
    346 setifnwkey(prop_dictionary_t env, prop_dictionary_t xenv)
    347 {
    348 	const char *ifname, *val;
    349 	char buf[256];
    350 	struct ieee80211_nwkey nwkey;
    351 	int i;
    352 	u_int8_t keybuf[IEEE80211_WEP_NKID][16];
    353 	int s;
    354 
    355 	if ((s = getsock(AF_UNSPEC)) == -1)
    356 		err(EXIT_FAILURE, "%s: getsock", __func__);
    357 
    358 	if (getargstr(env, "nwkey", buf, sizeof(buf)) == -1)
    359 		errx(EXIT_FAILURE, "%s: nwkey too long", __func__);
    360 
    361 	val = buf;
    362 
    363 	nwkey.i_wepon = IEEE80211_NWKEY_WEP;
    364 	nwkey.i_defkid = 1;
    365 	for (i = 0; i < IEEE80211_WEP_NKID; i++) {
    366 		nwkey.i_key[i].i_keylen = sizeof(keybuf[i]);
    367 		nwkey.i_key[i].i_keydat = keybuf[i];
    368 	}
    369 	if (strcasecmp("persist", val) == 0) {
    370 		/* use all values from persistent memory */
    371 		nwkey.i_wepon |= IEEE80211_NWKEY_PERSIST;
    372 		nwkey.i_defkid = 0;
    373 		for (i = 0; i < IEEE80211_WEP_NKID; i++)
    374 			nwkey.i_key[i].i_keylen = -1;
    375 	} else if (strncasecmp("persist:", val, 8) == 0) {
    376 		val += 8;
    377 		/* program keys in persistent memory */
    378 		nwkey.i_wepon |= IEEE80211_NWKEY_PERSIST;
    379 		goto set_nwkey;
    380 	} else {
    381   set_nwkey:
    382 		if (isdigit((unsigned char)val[0]) && val[1] == ':') {
    383 			/* specifying a full set of four keys */
    384 			nwkey.i_defkid = val[0] - '0';
    385 			val += 2;
    386 			for (i = 0; i < IEEE80211_WEP_NKID; i++) {
    387 				val = get_string(val, ",", keybuf[i],
    388 				    &nwkey.i_key[i].i_keylen);
    389 				if (val == NULL) {
    390 					errno = EINVAL;
    391 					return -1;
    392 				}
    393 			}
    394 			if (*val != '\0') {
    395 				errx(EXIT_FAILURE, "SIOCS80211NWKEY: too many keys.");
    396 			}
    397 		} else {
    398 			val = get_string(val, NULL, keybuf[0],
    399 			    &nwkey.i_key[0].i_keylen);
    400 			if (val == NULL) {
    401 				errno = EINVAL;
    402 				return -1;
    403 			}
    404 			i = 1;
    405 		}
    406 	}
    407 	for (; i < IEEE80211_WEP_NKID; i++)
    408 		nwkey.i_key[i].i_keylen = 0;
    409 
    410 	if ((ifname = getifname(env)) == NULL)
    411 		return -1;
    412 	estrlcpy(nwkey.i_name, ifname, sizeof(nwkey.i_name));
    413 	if (ioctl(s, SIOCS80211NWKEY, &nwkey) == -1)
    414 		err(EXIT_FAILURE, "SIOCS80211NWKEY");
    415 	return 0;
    416 }
    417 
    418 int
    419 unsetifnwkey(prop_dictionary_t env, prop_dictionary_t xenv)
    420 {
    421 	const char *ifname;
    422 	struct ieee80211_nwkey nwkey;
    423 	int i, s;
    424 
    425 	if ((s = getsock(AF_UNSPEC)) == -1)
    426 		err(EXIT_FAILURE, "%s: getsock", __func__);
    427 
    428 	nwkey.i_wepon = 0;
    429 	nwkey.i_defkid = 1;
    430 	for (i = 0; i < IEEE80211_WEP_NKID; i++) {
    431 		nwkey.i_key[i].i_keylen = 0;
    432 		nwkey.i_key[i].i_keydat = NULL;
    433 	}
    434 
    435 	if ((ifname = getifname(env)) == NULL)
    436 		return -1;
    437 
    438 	estrlcpy(nwkey.i_name, ifname, sizeof(nwkey.i_name));
    439 	if (ioctl(s, SIOCS80211NWKEY, &nwkey) == -1)
    440 		err(EXIT_FAILURE, "SIOCS80211NWKEY");
    441 	return 0;
    442 }
    443 
    444 int
    445 setifpowersave(prop_dictionary_t env, prop_dictionary_t xenv)
    446 {
    447 	struct ieee80211_power power;
    448 	const char *ifname;
    449 	prop_bool_t on;
    450 	int s;
    451 
    452 	if ((s = getsock(AF_UNSPEC)) == -1)
    453 		err(EXIT_FAILURE, "%s: getsock", __func__);
    454 
    455 	if ((ifname = getifname(env)) == NULL)
    456 		return -1;
    457 
    458 	estrlcpy(power.i_name, ifname, sizeof(power.i_name));
    459 	if (ioctl(s, SIOCG80211POWER, &power) == -1) {
    460 		err(EXIT_FAILURE, "SIOCG80211POWER");
    461 	}
    462 
    463 	on = (prop_bool_t)prop_dictionary_get(env, "powersave");
    464 	assert(on != NULL);
    465 
    466 	power.i_enabled = prop_bool_true(on) ? 1 : 0;
    467 	if (ioctl(s, SIOCS80211POWER, &power) == -1) {
    468 		warn("SIOCS80211POWER");
    469 		return -1;
    470 	}
    471 	return 0;
    472 }
    473 
    474 int
    475 setifpowersavesleep(prop_dictionary_t env, prop_dictionary_t xenv)
    476 {
    477 	struct ieee80211_power power;
    478 	int s;
    479 	const char *ifname;
    480 	prop_number_t num;
    481 
    482 	if ((ifname = getifname(env)) == NULL)
    483 		return -1;
    484 
    485 	num = (prop_number_t)prop_dictionary_get(env, "powersavesleep");
    486 	assert(num != NULL);
    487 
    488 	if ((s = getsock(AF_UNSPEC)) == -1)
    489 		err(EXIT_FAILURE, "%s: getsock", __func__);
    490 
    491 	estrlcpy(power.i_name, ifname, sizeof(power.i_name));
    492 	if (ioctl(s, SIOCG80211POWER, &power) == -1) {
    493 		err(EXIT_FAILURE, "SIOCG80211POWER");
    494 	}
    495 
    496 	power.i_maxsleep = (int)prop_number_integer_value(num);
    497 	if (ioctl(s, SIOCS80211POWER, &power) == -1)
    498 		err(EXIT_FAILURE, "SIOCS80211POWER");
    499 	return 0;
    500 }
    501 
    502 int
    503 scan_exec(prop_dictionary_t env, prop_dictionary_t xenv)
    504 {
    505 	scan_and_wait(env);
    506 	list_scan(env);
    507 	return 0;
    508 }
    509 
    510 void
    511 ieee80211_statistics(prop_dictionary_t env)
    512 {
    513 	struct ieee80211_stats stats;
    514 	int s;
    515 	const char *ifname;
    516 	struct ifreq ifr;
    517 
    518 	if ((s = getsock(AF_UNSPEC)) == -1)
    519 		err(EXIT_FAILURE, "%s: getsock", __func__);
    520 
    521 	if ((ifname = getifname(env)) == NULL)
    522 		return;
    523 
    524 	memset(&ifr, 0, sizeof(ifr));
    525 	if ((ifname = getifname(env)) == NULL)
    526 		err(EXIT_FAILURE, "%s: getifname", __func__);
    527 	estrlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    528 	ifr.ifr_buflen = sizeof(stats);
    529 	ifr.ifr_buf = (caddr_t)&stats;
    530 	estrlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    531 	if (ioctl(s, (zflag) ? SIOCG80211ZSTATS : SIOCG80211STATS,
    532 	    (caddr_t)&ifr) == -1)
    533 		return;
    534 #define	STAT_PRINT(_member, _desc)	\
    535 	printf("\t" _desc ": %" PRIu32 "\n", stats._member)
    536 
    537 	STAT_PRINT(is_rx_badversion, "rx frame with bad version");
    538 	STAT_PRINT(is_rx_tooshort, "rx frame too short");
    539 	STAT_PRINT(is_rx_wrongbss, "rx from wrong bssid");
    540 	STAT_PRINT(is_rx_dup, "rx discard 'cuz dup");
    541 	STAT_PRINT(is_rx_wrongdir, "rx w/ wrong direction");
    542 	STAT_PRINT(is_rx_mcastecho, "rx discard 'cuz mcast echo");
    543 	STAT_PRINT(is_rx_notassoc, "rx discard 'cuz sta !assoc");
    544 	STAT_PRINT(is_rx_noprivacy, "rx w/ wep but privacy off");
    545 	STAT_PRINT(is_rx_unencrypted, "rx w/o wep and privacy on");
    546 	STAT_PRINT(is_rx_wepfail, "rx wep processing failed");
    547 	STAT_PRINT(is_rx_decap, "rx decapsulation failed");
    548 	STAT_PRINT(is_rx_mgtdiscard, "rx discard mgt frames");
    549 	STAT_PRINT(is_rx_ctl, "rx discard ctrl frames");
    550 	STAT_PRINT(is_rx_beacon, "rx beacon frames");
    551 	STAT_PRINT(is_rx_rstoobig, "rx rate set truncated");
    552 	STAT_PRINT(is_rx_elem_missing, "rx required element missing");
    553 	STAT_PRINT(is_rx_elem_toobig, "rx element too big");
    554 	STAT_PRINT(is_rx_elem_toosmall, "rx element too small");
    555 	STAT_PRINT(is_rx_elem_unknown, "rx element unknown");
    556 	STAT_PRINT(is_rx_badchan, "rx frame w/ invalid chan");
    557 	STAT_PRINT(is_rx_chanmismatch, "rx frame chan mismatch");
    558 	STAT_PRINT(is_rx_nodealloc, "rx frame dropped");
    559 	STAT_PRINT(is_rx_ssidmismatch, "rx frame ssid mismatch ");
    560 	STAT_PRINT(is_rx_auth_unsupported, "rx w/ unsupported auth alg");
    561 	STAT_PRINT(is_rx_auth_fail, "rx sta auth failure");
    562 	STAT_PRINT(is_rx_auth_countermeasures, "rx auth discard 'cuz CM");
    563 	STAT_PRINT(is_rx_assoc_bss, "rx assoc from wrong bssid");
    564 	STAT_PRINT(is_rx_assoc_notauth, "rx assoc w/o auth");
    565 	STAT_PRINT(is_rx_assoc_capmismatch, "rx assoc w/ cap mismatch");
    566 	STAT_PRINT(is_rx_assoc_norate, "rx assoc w/ no rate match");
    567 	STAT_PRINT(is_rx_assoc_badwpaie, "rx assoc w/ bad WPA IE");
    568 	STAT_PRINT(is_rx_deauth, "rx deauthentication");
    569 	STAT_PRINT(is_rx_disassoc, "rx disassociation");
    570 	STAT_PRINT(is_rx_badsubtype, "rx frame w/ unknown subtyp");
    571 	STAT_PRINT(is_rx_nobuf, "rx failed for lack of buf");
    572 	STAT_PRINT(is_rx_decryptcrc, "rx decrypt failed on crc");
    573 	STAT_PRINT(is_rx_ahdemo_mgt, "rx discard ahdemo mgt fram");
    574 	STAT_PRINT(is_rx_bad_auth, "rx bad auth request");
    575 	STAT_PRINT(is_rx_unauth, "rx on unauthorized port");
    576 	STAT_PRINT(is_rx_badkeyid, "rx w/ incorrect keyid");
    577 	STAT_PRINT(is_rx_ccmpreplay, "rx seq# violation (CCMP)");
    578 	STAT_PRINT(is_rx_ccmpformat, "rx format bad (CCMP)");
    579 	STAT_PRINT(is_rx_ccmpmic, "rx MIC check failed (CCMP)");
    580 	STAT_PRINT(is_rx_tkipreplay, "rx seq# violation (TKIP)");
    581 	STAT_PRINT(is_rx_tkipformat, "rx format bad (TKIP)");
    582 	STAT_PRINT(is_rx_tkipmic, "rx MIC check failed (TKIP)");
    583 	STAT_PRINT(is_rx_tkipicv, "rx ICV check failed (TKIP)");
    584 	STAT_PRINT(is_rx_badcipher, "rx failed 'cuz key type");
    585 	STAT_PRINT(is_rx_nocipherctx, "rx failed 'cuz key !setup");
    586 	STAT_PRINT(is_rx_acl, "rx discard 'cuz acl policy");
    587 
    588 	STAT_PRINT(is_tx_nobuf, "tx failed for lack of buf");
    589 	STAT_PRINT(is_tx_nonode, "tx failed for no node");
    590 	STAT_PRINT(is_tx_unknownmgt, "tx of unknown mgt frame");
    591 	STAT_PRINT(is_tx_badcipher, "tx failed 'cuz key type");
    592 	STAT_PRINT(is_tx_nodefkey, "tx failed 'cuz no defkey");
    593 	STAT_PRINT(is_tx_noheadroom, "tx failed 'cuz no space");
    594 	STAT_PRINT(is_tx_fragframes, "tx frames fragmented");
    595 	STAT_PRINT(is_tx_frags, "tx fragments created");
    596 
    597 	STAT_PRINT(is_scan_active, "active scans started");
    598 	STAT_PRINT(is_scan_passive, "passive scans started");
    599 	STAT_PRINT(is_node_timeout, "nodes timed out inactivity");
    600 	STAT_PRINT(is_crypto_nomem, "no memory for crypto ctx");
    601 	STAT_PRINT(is_crypto_tkip, "tkip crypto done in s/w");
    602 	STAT_PRINT(is_crypto_tkipenmic, "tkip en-MIC done in s/w");
    603 	STAT_PRINT(is_crypto_tkipdemic, "tkip de-MIC done in s/w");
    604 	STAT_PRINT(is_crypto_tkipcm, "tkip counter measures");
    605 	STAT_PRINT(is_crypto_ccmp, "ccmp crypto done in s/w");
    606 	STAT_PRINT(is_crypto_wep, "wep crypto done in s/w");
    607 	STAT_PRINT(is_crypto_setkey_cipher, "cipher rejected key");
    608 	STAT_PRINT(is_crypto_setkey_nokey, "no key index for setkey");
    609 	STAT_PRINT(is_crypto_delkey, "driver key delete failed");
    610 	STAT_PRINT(is_crypto_badcipher, "unknown cipher");
    611 	STAT_PRINT(is_crypto_nocipher, "cipher not available");
    612 	STAT_PRINT(is_crypto_attachfail, "cipher attach failed");
    613 	STAT_PRINT(is_crypto_swfallback, "cipher fallback to s/w");
    614 	STAT_PRINT(is_crypto_keyfail, "driver key alloc failed");
    615 	STAT_PRINT(is_crypto_enmicfail, "en-MIC failed");
    616 	STAT_PRINT(is_ibss_capmismatch, "merge failed-cap mismatch");
    617 	STAT_PRINT(is_ibss_norate, "merge failed-rate mismatch");
    618 	STAT_PRINT(is_ps_unassoc, "ps-poll for unassoc. sta");
    619 	STAT_PRINT(is_ps_badaid, "ps-poll w/ incorrect aid");
    620 	STAT_PRINT(is_ps_qempty, "ps-poll w/ nothing to send");
    621 	STAT_PRINT(is_ff_badhdr, "fast frame rx'd w/ bad hdr");
    622 	STAT_PRINT(is_ff_tooshort, "fast frame rx decap error");
    623 	STAT_PRINT(is_ff_split, "fast frame rx split error");
    624 	STAT_PRINT(is_ff_decap, "fast frames decap'd");
    625 	STAT_PRINT(is_ff_encap, "fast frames encap'd for tx");
    626 	STAT_PRINT(is_rx_badbintval, "rx frame w/ bogus bintval");
    627 }
    628 
    629 void
    630 ieee80211_status(prop_dictionary_t env, prop_dictionary_t oenv)
    631 {
    632 	int i, nwkey_verbose;
    633 	struct ieee80211_nwid nwid;
    634 	struct ieee80211_nwkey nwkey;
    635 	struct ieee80211_power power;
    636 	u_int8_t keybuf[IEEE80211_WEP_NKID][16];
    637 	struct ieee80211_bssid bssid;
    638 	struct ieee80211chanreq channel;
    639 	struct ieee80211req ireq;
    640 	struct ether_addr ea;
    641 	static const u_int8_t zero_macaddr[IEEE80211_ADDR_LEN];
    642 	enum ieee80211_opmode opmode = get80211opmode(env);
    643 	int s;
    644 	const char *ifname;
    645 	struct ifreq ifr;
    646 
    647 	if ((s = getsock(AF_UNSPEC)) == -1)
    648 		err(EXIT_FAILURE, "%s: getsock", __func__);
    649 
    650 	if ((ifname = getifname(env)) == NULL)
    651 		err(EXIT_FAILURE, "%s: getifname", __func__);
    652 
    653 	memset(&ifr, 0, sizeof(ifr));
    654 	estrlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    655 	ifr.ifr_data = &nwid;
    656 	estrlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    657 	if (ioctl(s, SIOCG80211NWID, &ifr) == -1)
    658 		return;
    659 	if (nwid.i_len > IEEE80211_NWID_LEN) {
    660 		errx(EXIT_FAILURE, "SIOCG80211NWID: wrong length of nwid (%d)", nwid.i_len);
    661 	}
    662 	printf("\tssid ");
    663 	print_string(nwid.i_nwid, nwid.i_len);
    664 
    665 	if (opmode == IEEE80211_M_HOSTAP) {
    666 		estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    667 		ireq.i_type = IEEE80211_IOC_HIDESSID;
    668 		if (ioctl(s, SIOCG80211, &ireq) != -1) {
    669                         if (ireq.i_val)
    670                                 printf(" [hidden]");
    671                         else if (vflag)
    672                                 printf(" [shown]");
    673                 }
    674 
    675 		ireq.i_type = IEEE80211_IOC_APBRIDGE;
    676 		if (ioctl(s, SIOCG80211, &ireq) != -1) {
    677 			if (ireq.i_val)
    678 				printf(" apbridge");
    679 			else if (vflag)
    680 				printf(" -apbridge");
    681 		}
    682         }
    683 
    684 	estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    685 	ireq.i_type = IEEE80211_IOC_FRAGTHRESHOLD;
    686 	if (ioctl(s, SIOCG80211, &ireq) == -1)
    687 		;
    688 	else if (ireq.i_val < IEEE80211_FRAG_MAX)
    689 		printf(" frag %d", ireq.i_val);
    690 	else if (vflag)
    691 		printf(" -frag");
    692 
    693 	memset(&nwkey, 0, sizeof(nwkey));
    694 	estrlcpy(nwkey.i_name, ifname, sizeof(nwkey.i_name));
    695 	/* show nwkey only when WEP is enabled */
    696 	if (ioctl(s, SIOCG80211NWKEY, &nwkey) == -1 ||
    697 	    nwkey.i_wepon == 0) {
    698 		printf("\n");
    699 		goto skip_wep;
    700 	}
    701 
    702 	printf(" nwkey ");
    703 	/* try to retrieve WEP keys */
    704 	for (i = 0; i < IEEE80211_WEP_NKID; i++) {
    705 		nwkey.i_key[i].i_keydat = keybuf[i];
    706 		nwkey.i_key[i].i_keylen = sizeof(keybuf[i]);
    707 	}
    708 	if (ioctl(s, SIOCG80211NWKEY, &nwkey) == -1) {
    709 		printf("*****");
    710 	} else {
    711 		nwkey_verbose = 0;
    712 		/* check to see non default key or multiple keys defined */
    713 		if (nwkey.i_defkid != 1) {
    714 			nwkey_verbose = 1;
    715 		} else {
    716 			for (i = 1; i < IEEE80211_WEP_NKID; i++) {
    717 				if (nwkey.i_key[i].i_keylen != 0) {
    718 					nwkey_verbose = 1;
    719 					break;
    720 				}
    721 			}
    722 		}
    723 		/* check extra ambiguity with keywords */
    724 		if (!nwkey_verbose) {
    725 			if (nwkey.i_key[0].i_keylen >= 2 &&
    726 			    isdigit(nwkey.i_key[0].i_keydat[0]) &&
    727 			    nwkey.i_key[0].i_keydat[1] == ':')
    728 				nwkey_verbose = 1;
    729 			else if (nwkey.i_key[0].i_keylen >= 7 &&
    730 			    strncasecmp("persist",
    731 			    (const char *)nwkey.i_key[0].i_keydat, 7) == 0)
    732 				nwkey_verbose = 1;
    733 		}
    734 		if (nwkey_verbose)
    735 			printf("%d:", nwkey.i_defkid);
    736 		for (i = 0; i < IEEE80211_WEP_NKID; i++) {
    737 			if (i > 0)
    738 				printf(",");
    739 			if (nwkey.i_key[i].i_keylen < 0)
    740 				printf("persist");
    741 			else
    742 				print_string(nwkey.i_key[i].i_keydat,
    743 				    nwkey.i_key[i].i_keylen);
    744 			if (!nwkey_verbose)
    745 				break;
    746 		}
    747 	}
    748 	printf("\n");
    749 
    750  skip_wep:
    751 	estrlcpy(power.i_name, ifname, sizeof(power.i_name));
    752 	if (ioctl(s, SIOCG80211POWER, &power) == -1)
    753 		goto skip_power;
    754 	printf("\tpowersave ");
    755 	if (power.i_enabled)
    756 		printf("on (%dms sleep)", power.i_maxsleep);
    757 	else
    758 		printf("off");
    759 	printf("\n");
    760 
    761  skip_power:
    762 	estrlcpy(bssid.i_name, ifname, sizeof(bssid.i_name));
    763 	if (ioctl(s, SIOCG80211BSSID, &bssid) == -1)
    764 		return;
    765 	estrlcpy(channel.i_name, ifname, sizeof(channel.i_name));
    766 	if (ioctl(s, SIOCG80211CHANNEL, &channel) == -1)
    767 		return;
    768 	if (memcmp(bssid.i_bssid, zero_macaddr, IEEE80211_ADDR_LEN) == 0) {
    769 		if (channel.i_channel != (u_int16_t)-1)
    770 			printf("\tchan %d\n", channel.i_channel);
    771 	} else {
    772 		memcpy(ea.ether_addr_octet, bssid.i_bssid,
    773 		    sizeof(ea.ether_addr_octet));
    774 		printf("\tbssid %s", ether_ntoa(&ea));
    775 		if (channel.i_channel != IEEE80211_CHAN_ANY)
    776 			printf(" chan %d", channel.i_channel);
    777 		printf("\n");
    778 	}
    779 }
    780 
    781 static void
    782 scan_and_wait(prop_dictionary_t env)
    783 {
    784 	struct ieee80211req ireq;
    785 	int sroute;
    786 	int s;
    787 	const char *ifname;
    788 
    789 	if ((s = getsock(AF_UNSPEC)) == -1)
    790 		err(EXIT_FAILURE, "%s: getsock", __func__);
    791 
    792 	if ((ifname = getifname(env)) == NULL)
    793 		err(EXIT_FAILURE, "%s: getifname", __func__);
    794 
    795 	sroute = socket(PF_ROUTE, SOCK_RAW, 0);
    796 	if (sroute < 0) {
    797 		perror("socket(PF_ROUTE,SOCK_RAW)");
    798 		return;
    799 	}
    800 	memset(&ireq, 0, sizeof(ireq));
    801 	estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    802 	ireq.i_type = IEEE80211_IOC_SCAN_REQ;
    803 	/* NB: only root can trigger a scan so ignore errors */
    804 	if (ioctl(s, SIOCS80211, &ireq) >= 0) {
    805 		char buf[2048];
    806 		struct if_announcemsghdr *ifan;
    807 		struct rt_msghdr *rtm;
    808 
    809 		do {
    810 			if (read(sroute, buf, sizeof(buf)) < 0) {
    811 				perror("read(PF_ROUTE)");
    812 				break;
    813 			}
    814 			rtm = (struct rt_msghdr *) buf;
    815 			if (rtm->rtm_version != RTM_VERSION)
    816 				break;
    817 			ifan = (struct if_announcemsghdr *) rtm;
    818 		} while (rtm->rtm_type != RTM_IEEE80211 ||
    819 		    ifan->ifan_what != RTM_IEEE80211_SCAN);
    820 	}
    821 	close(sroute);
    822 }
    823 
    824 static void
    825 list_scan(prop_dictionary_t env)
    826 {
    827 	u_int8_t buf[24*1024];
    828 	struct ieee80211req ireq;
    829 	char ssid[IEEE80211_NWID_LEN+1];
    830 	const u_int8_t *cp;
    831 	int len, ssidmax;
    832 	int s;
    833 	const char *ifname;
    834 
    835 	if ((s = getsock(AF_UNSPEC)) == -1)
    836 		err(EXIT_FAILURE, "%s: getsock", __func__);
    837 
    838 	if ((ifname = getifname(env)) == NULL)
    839 		return;
    840 
    841 	memset(&ireq, 0, sizeof(ireq));
    842 	estrlcpy(ireq.i_name, ifname, sizeof(ireq.i_name));
    843 	ireq.i_type = IEEE80211_IOC_SCAN_RESULTS;
    844 	ireq.i_data = buf;
    845 	ireq.i_len = sizeof(buf);
    846 	if (ioctl(s, SIOCG80211, &ireq) < 0)
    847 		errx(EXIT_FAILURE, "unable to get scan results");
    848 	len = ireq.i_len;
    849 	if (len < sizeof(struct ieee80211req_scan_result))
    850 		return;
    851 
    852 	ssidmax = IEEE80211_NWID_LEN;
    853 	printf("%-*.*s  %-17.17s  %4s %4s  %-7s %3s %4s\n"
    854 		, ssidmax, ssidmax, "SSID"
    855 		, "BSSID"
    856 		, "CHAN"
    857 		, "RATE"
    858 		, "S:N"
    859 		, "INT"
    860 		, "CAPS"
    861 	);
    862 	cp = buf;
    863 	do {
    864 		const struct ieee80211req_scan_result *sr;
    865 		const uint8_t *vp;
    866 
    867 		sr = (const struct ieee80211req_scan_result *) cp;
    868 		vp = (const u_int8_t *)(sr+1);
    869 		printf("%-*.*s  %s  %3d  %3dM %3d:%-3d  %3d %-4.4s"
    870 			, ssidmax
    871 			  , copy_essid(ssid, ssidmax, vp, sr->isr_ssid_len)
    872 			  , ssid
    873 			, ether_ntoa((const struct ether_addr *) sr->isr_bssid)
    874 			, ieee80211_mhz2ieee(sr->isr_freq, sr->isr_flags)
    875 			, getmaxrate(sr->isr_rates, sr->isr_nrates)
    876 			, sr->isr_rssi, sr->isr_noise
    877 			, sr->isr_intval
    878 			, getcaps(sr->isr_capinfo)
    879 		);
    880 		printies(vp + sr->isr_ssid_len, sr->isr_ie_len, 24);;
    881 		printf("\n");
    882 		cp += sr->isr_len, len -= sr->isr_len;
    883 	} while (len >= sizeof(struct ieee80211req_scan_result));
    884 }
    885 /*
    886  * Convert MHz frequency to IEEE channel number.
    887  */
    888 static u_int
    889 ieee80211_mhz2ieee(u_int isrfreq, u_int isrflags)
    890 {
    891 	if ((isrflags & IEEE80211_CHAN_GSM) || (907 <= isrfreq && isrfreq <= 922))
    892 		return mapgsm(isrfreq, isrflags);
    893 	if (isrfreq == 2484)
    894 		return 14;
    895 	if (isrfreq < 2484)
    896 		return (isrfreq - 2407) / 5;
    897 	if (isrfreq < 5000) {
    898 		if (isrflags & (IEEE80211_CHAN_HALF|IEEE80211_CHAN_QUARTER))
    899 			return mappsb(isrfreq, isrflags);
    900 		else if (isrfreq > 4900)
    901 			return (isrfreq - 4000) / 5;
    902 		else
    903 			return 15 + ((isrfreq - 2512) / 20);
    904 	}
    905 	return (isrfreq - 5000) / 5;
    906 }
    907 
    908 static int
    909 getmaxrate(const u_int8_t rates[15], u_int8_t nrates)
    910 {
    911 	int i, maxrate = -1;
    912 
    913 	for (i = 0; i < nrates; i++) {
    914 		int rate = rates[i] & IEEE80211_RATE_VAL;
    915 		if (rate > maxrate)
    916 			maxrate = rate;
    917 	}
    918 	return maxrate / 2;
    919 }
    920 
    921 static const char *
    922 getcaps(int capinfo)
    923 {
    924 	static char capstring[32];
    925 	char *cp = capstring;
    926 
    927 	if (capinfo & IEEE80211_CAPINFO_ESS)
    928 		*cp++ = 'E';
    929 	if (capinfo & IEEE80211_CAPINFO_IBSS)
    930 		*cp++ = 'I';
    931 	if (capinfo & IEEE80211_CAPINFO_CF_POLLABLE)
    932 		*cp++ = 'c';
    933 	if (capinfo & IEEE80211_CAPINFO_CF_POLLREQ)
    934 		*cp++ = 'C';
    935 	if (capinfo & IEEE80211_CAPINFO_PRIVACY)
    936 		*cp++ = 'P';
    937 	if (capinfo & IEEE80211_CAPINFO_SHORT_PREAMBLE)
    938 		*cp++ = 'S';
    939 	if (capinfo & IEEE80211_CAPINFO_PBCC)
    940 		*cp++ = 'B';
    941 	if (capinfo & IEEE80211_CAPINFO_CHNL_AGILITY)
    942 		*cp++ = 'A';
    943 	if (capinfo & IEEE80211_CAPINFO_SHORT_SLOTTIME)
    944 		*cp++ = 's';
    945 	if (capinfo & IEEE80211_CAPINFO_RSN)
    946 		*cp++ = 'R';
    947 	if (capinfo & IEEE80211_CAPINFO_DSSSOFDM)
    948 		*cp++ = 'D';
    949 	*cp = '\0';
    950 	return capstring;
    951 }
    952 
    953 static void
    954 printie(const char* tag, const uint8_t *ie, size_t ielen, int maxlen)
    955 {
    956 	printf("%s", tag);
    957 
    958 	maxlen -= strlen(tag)+2;
    959 	if (2*ielen > maxlen)
    960 		maxlen--;
    961 	printf("<");
    962 	for (; ielen > 0; ie++, ielen--) {
    963 		if (maxlen-- <= 0)
    964 			break;
    965 		printf("%02x", *ie);
    966 	}
    967 	if (ielen != 0)
    968 		printf("-");
    969 	printf(">");
    970 }
    971 
    972 #define LE_READ_2(p)					\
    973 	((u_int16_t)					\
    974 	 ((((const u_int8_t *)(p))[0]      ) |		\
    975 	  (((const u_int8_t *)(p))[1] <<  8)))
    976 #define LE_READ_4(p)					\
    977 	((u_int32_t)					\
    978 	 ((((const u_int8_t *)(p))[0]      ) |		\
    979 	  (((const u_int8_t *)(p))[1] <<  8) |		\
    980 	  (((const u_int8_t *)(p))[2] << 16) |		\
    981 	  (((const u_int8_t *)(p))[3] << 24)))
    982 
    983 /*
    984  * NB: The decoding routines assume a properly formatted ie
    985  *     which should be safe as the kernel only retains them
    986  *     if they parse ok.
    987  */
    988 
    989 static void
    990 printwmeparam(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
    991 {
    992 #define	MS(_v, _f)	(((_v) & _f) >> _f##_S)
    993 	static const char *acnames[] = { "BE", "BK", "VO", "VI" };
    994 	const struct ieee80211_wme_param *wme =
    995 	    (const struct ieee80211_wme_param *) ie;
    996 	int i;
    997 
    998 	printf("%s", tag);
    999 	if (!vflag)
   1000 		return;
   1001 	printf("<qosinfo 0x%x", wme->param_qosInfo);
   1002 	ie += offsetof(struct ieee80211_wme_param, params_acParams);
   1003 	for (i = 0; i < WME_NUM_AC; i++) {
   1004 		const struct ieee80211_wme_acparams *ac =
   1005 		    &wme->params_acParams[i];
   1006 
   1007 		printf(" %s[%saifsn %u cwmin %u cwmax %u txop %u]"
   1008 			, acnames[i]
   1009 			, MS(ac->acp_aci_aifsn, WME_PARAM_ACM) ? "acm " : ""
   1010 			, MS(ac->acp_aci_aifsn, WME_PARAM_AIFSN)
   1011 			, MS(ac->acp_logcwminmax, WME_PARAM_LOGCWMIN)
   1012 			, MS(ac->acp_logcwminmax, WME_PARAM_LOGCWMAX)
   1013 			, LE_READ_2(&ac->acp_txop)
   1014 		);
   1015 	}
   1016 	printf(">");
   1017 #undef MS
   1018 }
   1019 
   1020 static void
   1021 printwmeinfo(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1022 {
   1023 	printf("%s", tag);
   1024 	if (vflag) {
   1025 		const struct ieee80211_wme_info *wme =
   1026 		    (const struct ieee80211_wme_info *) ie;
   1027 		printf("<version 0x%x info 0x%x>",
   1028 		    wme->wme_version, wme->wme_info);
   1029 	}
   1030 }
   1031 
   1032 static const char *
   1033 wpa_cipher(const u_int8_t *sel)
   1034 {
   1035 #define	WPA_SEL(x)	(((x)<<24)|WPA_OUI)
   1036 	u_int32_t w = LE_READ_4(sel);
   1037 
   1038 	switch (w) {
   1039 	case WPA_SEL(WPA_CSE_NULL):
   1040 		return "NONE";
   1041 	case WPA_SEL(WPA_CSE_WEP40):
   1042 		return "WEP40";
   1043 	case WPA_SEL(WPA_CSE_WEP104):
   1044 		return "WEP104";
   1045 	case WPA_SEL(WPA_CSE_TKIP):
   1046 		return "TKIP";
   1047 	case WPA_SEL(WPA_CSE_CCMP):
   1048 		return "AES-CCMP";
   1049 	}
   1050 	return "?";		/* NB: so 1<< is discarded */
   1051 #undef WPA_SEL
   1052 }
   1053 
   1054 static const char *
   1055 wpa_keymgmt(const u_int8_t *sel)
   1056 {
   1057 #define	WPA_SEL(x)	(((x)<<24)|WPA_OUI)
   1058 	u_int32_t w = LE_READ_4(sel);
   1059 
   1060 	switch (w) {
   1061 	case WPA_SEL(WPA_ASE_8021X_UNSPEC):
   1062 		return "8021X-UNSPEC";
   1063 	case WPA_SEL(WPA_ASE_8021X_PSK):
   1064 		return "8021X-PSK";
   1065 	case WPA_SEL(WPA_ASE_NONE):
   1066 		return "NONE";
   1067 	}
   1068 	return "?";
   1069 #undef WPA_SEL
   1070 }
   1071 
   1072 static void
   1073 printwpaie(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1074 {
   1075 	u_int8_t len = ie[1];
   1076 
   1077 	printf("%s", tag);
   1078 	if (vflag) {
   1079 		const char *sep;
   1080 		int n;
   1081 
   1082 		ie += 6, len -= 4;		/* NB: len is payload only */
   1083 
   1084 		printf("<v%u", LE_READ_2(ie));
   1085 		ie += 2, len -= 2;
   1086 
   1087 		printf(" mc:%s", wpa_cipher(ie));
   1088 		ie += 4, len -= 4;
   1089 
   1090 		/* unicast ciphers */
   1091 		n = LE_READ_2(ie);
   1092 		ie += 2, len -= 2;
   1093 		sep = " uc:";
   1094 		for (; n > 0; n--) {
   1095 			printf("%s%s", sep, wpa_cipher(ie));
   1096 			ie += 4, len -= 4;
   1097 			sep = "+";
   1098 		}
   1099 
   1100 		/* key management algorithms */
   1101 		n = LE_READ_2(ie);
   1102 		ie += 2, len -= 2;
   1103 		sep = " km:";
   1104 		for (; n > 0; n--) {
   1105 			printf("%s%s", sep, wpa_keymgmt(ie));
   1106 			ie += 4, len -= 4;
   1107 			sep = "+";
   1108 		}
   1109 
   1110 		if (len > 2)		/* optional capabilities */
   1111 			printf(", caps 0x%x", LE_READ_2(ie));
   1112 		printf(">");
   1113 	}
   1114 }
   1115 
   1116 static const char *
   1117 rsn_cipher(const u_int8_t *sel)
   1118 {
   1119 #define	RSN_SEL(x)	(((x)<<24)|RSN_OUI)
   1120 	u_int32_t w = LE_READ_4(sel);
   1121 
   1122 	switch (w) {
   1123 	case RSN_SEL(RSN_CSE_NULL):
   1124 		return "NONE";
   1125 	case RSN_SEL(RSN_CSE_WEP40):
   1126 		return "WEP40";
   1127 	case RSN_SEL(RSN_CSE_WEP104):
   1128 		return "WEP104";
   1129 	case RSN_SEL(RSN_CSE_TKIP):
   1130 		return "TKIP";
   1131 	case RSN_SEL(RSN_CSE_CCMP):
   1132 		return "AES-CCMP";
   1133 	case RSN_SEL(RSN_CSE_WRAP):
   1134 		return "AES-OCB";
   1135 	}
   1136 	return "?";
   1137 #undef WPA_SEL
   1138 }
   1139 
   1140 static const char *
   1141 rsn_keymgmt(const u_int8_t *sel)
   1142 {
   1143 #define	RSN_SEL(x)	(((x)<<24)|RSN_OUI)
   1144 	u_int32_t w = LE_READ_4(sel);
   1145 
   1146 	switch (w) {
   1147 	case RSN_SEL(RSN_ASE_8021X_UNSPEC):
   1148 		return "8021X-UNSPEC";
   1149 	case RSN_SEL(RSN_ASE_8021X_PSK):
   1150 		return "8021X-PSK";
   1151 	case RSN_SEL(RSN_ASE_NONE):
   1152 		return "NONE";
   1153 	}
   1154 	return "?";
   1155 #undef RSN_SEL
   1156 }
   1157 
   1158 static void
   1159 printrsnie(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1160 {
   1161 	printf("%s", tag);
   1162 	if (vflag) {
   1163 		const char *sep;
   1164 		int n;
   1165 
   1166 		ie += 2, ielen -= 2;
   1167 
   1168 		printf("<v%u", LE_READ_2(ie));
   1169 		ie += 2, ielen -= 2;
   1170 
   1171 		printf(" mc:%s", rsn_cipher(ie));
   1172 		ie += 4, ielen -= 4;
   1173 
   1174 		/* unicast ciphers */
   1175 		n = LE_READ_2(ie);
   1176 		ie += 2, ielen -= 2;
   1177 		sep = " uc:";
   1178 		for (; n > 0; n--) {
   1179 			printf("%s%s", sep, rsn_cipher(ie));
   1180 			ie += 4, ielen -= 4;
   1181 			sep = "+";
   1182 		}
   1183 
   1184 		/* key management algorithms */
   1185 		n = LE_READ_2(ie);
   1186 		ie += 2, ielen -= 2;
   1187 		sep = " km:";
   1188 		for (; n > 0; n--) {
   1189 			printf("%s%s", sep, rsn_keymgmt(ie));
   1190 			ie += 4, ielen -= 4;
   1191 			sep = "+";
   1192 		}
   1193 
   1194 		if (ielen > 2)		/* optional capabilities */
   1195 			printf(", caps 0x%x", LE_READ_2(ie));
   1196 		/* XXXPMKID */
   1197 		printf(">");
   1198 	}
   1199 }
   1200 
   1201 /*
   1202  * Copy the ssid string contents into buf, truncating to fit.  If the
   1203  * ssid is entirely printable then just copy intact.  Otherwise convert
   1204  * to hexadecimal.  If the result is truncated then replace the last
   1205  * three characters with "...".
   1206  */
   1207 static int
   1208 copy_essid(char buf[], size_t bufsize, const u_int8_t *essid, size_t essid_len)
   1209 {
   1210 	const u_int8_t *p;
   1211 	size_t maxlen;
   1212 	int i;
   1213 
   1214 	if (essid_len > bufsize)
   1215 		maxlen = bufsize;
   1216 	else
   1217 		maxlen = essid_len;
   1218 	/* determine printable or not */
   1219 	for (i = 0, p = essid; i < maxlen; i++, p++) {
   1220 		if (*p < ' ' || *p > 0x7e)
   1221 			break;
   1222 	}
   1223 	if (i != maxlen) {		/* not printable, print as hex */
   1224 		if (bufsize < 3)
   1225 			return 0;
   1226 		strlcpy(buf, "0x", bufsize);
   1227 		bufsize -= 2;
   1228 		p = essid;
   1229 		for (i = 0; i < maxlen && bufsize >= 2; i++) {
   1230 			sprintf(&buf[2+2*i], "%02x", p[i]);
   1231 			bufsize -= 2;
   1232 		}
   1233 		if (i != essid_len)
   1234 			memcpy(&buf[2+2*i-3], "...", 3);
   1235 	} else {			/* printable, truncate as needed */
   1236 		memcpy(buf, essid, maxlen);
   1237 		if (maxlen != essid_len)
   1238 			memcpy(&buf[maxlen-3], "...", 3);
   1239 	}
   1240 	return maxlen;
   1241 }
   1242 
   1243 static void
   1244 printssid(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1245 {
   1246 	char ssid[2*IEEE80211_NWID_LEN+1];
   1247 
   1248 	printf("%s<%.*s>", tag, copy_essid(ssid, maxlen, ie+2, ie[1]), ssid);
   1249 }
   1250 
   1251 static void
   1252 printrates(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1253 {
   1254 	const char *sep;
   1255 	int i;
   1256 
   1257 	printf("%s", tag);
   1258 	sep = "<";
   1259 	for (i = 2; i < ielen; i++) {
   1260 		printf("%s%s%d", sep,
   1261 		    ie[i] & IEEE80211_RATE_BASIC ? "B" : "",
   1262 		    ie[i] & IEEE80211_RATE_VAL);
   1263 		sep = ",";
   1264 	}
   1265 	printf(">");
   1266 }
   1267 
   1268 static void
   1269 printcountry(const char *tag, const u_int8_t *ie, size_t ielen, int maxlen)
   1270 {
   1271 	const struct ieee80211_country_ie *cie =
   1272 	   (const struct ieee80211_country_ie *) ie;
   1273 	int i, nbands, schan, nchan;
   1274 
   1275 	printf("%s<%c%c%c", tag, cie->cc[0], cie->cc[1], cie->cc[2]);
   1276 	nbands = (cie->len - 3) / sizeof(cie->band[0]);
   1277 	for (i = 0; i < nbands; i++) {
   1278 		schan = cie->band[i].schan;
   1279 		nchan = cie->band[i].nchan;
   1280 		if (nchan != 1)
   1281 			printf(" %u-%u,%u", schan, schan + nchan-1,
   1282 			    cie->band[i].maxtxpwr);
   1283 		else
   1284 			printf(" %u,%u", schan, cie->band[i].maxtxpwr);
   1285 	}
   1286 	printf(">");
   1287 }
   1288 
   1289 /* unaligned little endian access */
   1290 #define LE_READ_4(p)					\
   1291 	((u_int32_t)					\
   1292 	 ((((const u_int8_t *)(p))[0]      ) |		\
   1293 	  (((const u_int8_t *)(p))[1] <<  8) |		\
   1294 	  (((const u_int8_t *)(p))[2] << 16) |		\
   1295 	  (((const u_int8_t *)(p))[3] << 24)))
   1296 
   1297 static int
   1298 iswpaoui(const u_int8_t *frm)
   1299 {
   1300 	return frm[1] > 3 && LE_READ_4(frm+2) == ((WPA_OUI_TYPE<<24)|WPA_OUI);
   1301 }
   1302 
   1303 static int
   1304 iswmeinfo(const u_int8_t *frm)
   1305 {
   1306 	return frm[1] > 5 && LE_READ_4(frm+2) == ((WME_OUI_TYPE<<24)|WME_OUI) &&
   1307 		frm[6] == WME_INFO_OUI_SUBTYPE;
   1308 }
   1309 
   1310 static int
   1311 iswmeparam(const u_int8_t *frm)
   1312 {
   1313 	return frm[1] > 5 && LE_READ_4(frm+2) == ((WME_OUI_TYPE<<24)|WME_OUI) &&
   1314 		frm[6] == WME_PARAM_OUI_SUBTYPE;
   1315 }
   1316 
   1317 static const char *
   1318 iename(int elemid)
   1319 {
   1320 	switch (elemid) {
   1321 	case IEEE80211_ELEMID_FHPARMS:	return " FHPARMS";
   1322 	case IEEE80211_ELEMID_CFPARMS:	return " CFPARMS";
   1323 	case IEEE80211_ELEMID_TIM:	return " TIM";
   1324 	case IEEE80211_ELEMID_IBSSPARMS:return " IBSSPARMS";
   1325 	case IEEE80211_ELEMID_CHALLENGE:return " CHALLENGE";
   1326 	case IEEE80211_ELEMID_PWRCNSTR:	return " PWRCNSTR";
   1327 	case IEEE80211_ELEMID_PWRCAP:	return " PWRCAP";
   1328 	case IEEE80211_ELEMID_TPCREQ:	return " TPCREQ";
   1329 	case IEEE80211_ELEMID_TPCREP:	return " TPCREP";
   1330 	case IEEE80211_ELEMID_SUPPCHAN:	return " SUPPCHAN";
   1331 	case IEEE80211_ELEMID_CHANSWITCHANN:return " CSA";
   1332 	case IEEE80211_ELEMID_MEASREQ:	return " MEASREQ";
   1333 	case IEEE80211_ELEMID_MEASREP:	return " MEASREP";
   1334 	case IEEE80211_ELEMID_QUIET:	return " QUIET";
   1335 	case IEEE80211_ELEMID_IBSSDFS:	return " IBSSDFS";
   1336 	case IEEE80211_ELEMID_TPC:	return " TPC";
   1337 	case IEEE80211_ELEMID_CCKM:	return " CCKM";
   1338 	}
   1339 	return " ???";
   1340 }
   1341 
   1342 static void
   1343 printies(const u_int8_t *vp, int ielen, int maxcols)
   1344 {
   1345 	while (ielen > 0) {
   1346 		switch (vp[0]) {
   1347 		case IEEE80211_ELEMID_SSID:
   1348 			if (vflag)
   1349 				printssid(" SSID", vp, 2+vp[1], maxcols);
   1350 			break;
   1351 		case IEEE80211_ELEMID_RATES:
   1352 		case IEEE80211_ELEMID_XRATES:
   1353 			if (vflag)
   1354 				printrates(vp[0] == IEEE80211_ELEMID_RATES ?
   1355 				    " RATES" : " XRATES", vp, 2+vp[1], maxcols);
   1356 			break;
   1357 		case IEEE80211_ELEMID_DSPARMS:
   1358 			if (vflag)
   1359 				printf(" DSPARMS<%u>", vp[2]);
   1360 			break;
   1361 		case IEEE80211_ELEMID_COUNTRY:
   1362 			if (vflag)
   1363 				printcountry(" COUNTRY", vp, 2+vp[1], maxcols);
   1364 			break;
   1365 		case IEEE80211_ELEMID_ERP:
   1366 			if (vflag)
   1367 				printf(" ERP<0x%x>", vp[2]);
   1368 			break;
   1369 		case IEEE80211_ELEMID_VENDOR:
   1370 			if (iswpaoui(vp))
   1371 				printwpaie(" WPA", vp, 2+vp[1], maxcols);
   1372 			else if (iswmeinfo(vp))
   1373 				printwmeinfo(" WME", vp, 2+vp[1], maxcols);
   1374 			else if (iswmeparam(vp))
   1375 				printwmeparam(" WME", vp, 2+vp[1], maxcols);
   1376 			else if (vflag)
   1377 				printie(" VEN", vp, 2+vp[1], maxcols);
   1378 			break;
   1379 		case IEEE80211_ELEMID_RSN:
   1380 			printrsnie(" RSN", vp, 2+vp[1], maxcols);
   1381 			break;
   1382 		default:
   1383 			if (vflag)
   1384 				printie(iename(vp[0]), vp, 2+vp[1], maxcols);
   1385 			break;
   1386 		}
   1387 		ielen -= 2+vp[1];
   1388 		vp += 2+vp[1];
   1389 	}
   1390 }
   1391 
   1392 static int
   1393 mapgsm(u_int isrfreq, u_int isrflags)
   1394 {
   1395 	isrfreq *= 10;
   1396 	if (isrflags & IEEE80211_CHAN_QUARTER)
   1397 		isrfreq += 5;
   1398 	else if (isrflags & IEEE80211_CHAN_HALF)
   1399 		isrfreq += 10;
   1400 	else
   1401 		isrfreq += 20;
   1402 	/* NB: there is no 907/20 wide but leave room */
   1403 	return (isrfreq - 906*10) / 5;
   1404 }
   1405 
   1406 static int
   1407 mappsb(u_int isrfreq, u_int isrflags)
   1408 {
   1409 	return 37 + ((isrfreq * 10) + ((isrfreq % 5) == 2 ? 5 : 0) - 49400) / 5;
   1410 }
   1411