xref: /freebsd/sys/net80211/ieee80211_ht.c (revision 273c26a3c3bea87a241d6879abd4f991db180bf0)
1 /*-
2  * Copyright (c) 2007-2008 Sam Leffler, Errno Consulting
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  */
25 
26 #include <sys/cdefs.h>
27 #ifdef __FreeBSD__
28 __FBSDID("$FreeBSD$");
29 #endif
30 
31 /*
32  * IEEE 802.11n protocol support.
33  */
34 
35 #include "opt_inet.h"
36 #include "opt_wlan.h"
37 
38 #include <sys/param.h>
39 #include <sys/kernel.h>
40 #include <sys/malloc.h>
41 #include <sys/systm.h>
42 #include <sys/endian.h>
43 
44 #include <sys/socket.h>
45 
46 #include <net/if.h>
47 #include <net/if_var.h>
48 #include <net/if_media.h>
49 #include <net/ethernet.h>
50 
51 #include <net80211/ieee80211_var.h>
52 #include <net80211/ieee80211_action.h>
53 #include <net80211/ieee80211_input.h>
54 
55 /* define here, used throughout file */
56 #define	MS(_v, _f)	(((_v) & _f) >> _f##_S)
57 #define	SM(_v, _f)	(((_v) << _f##_S) & _f)
58 
59 const struct ieee80211_mcs_rates ieee80211_htrates[IEEE80211_HTRATE_MAXSIZE] = {
60 	{  13,  14,   27,   30 },	/* MCS 0 */
61 	{  26,  29,   54,   60 },	/* MCS 1 */
62 	{  39,  43,   81,   90 },	/* MCS 2 */
63 	{  52,  58,  108,  120 },	/* MCS 3 */
64 	{  78,  87,  162,  180 },	/* MCS 4 */
65 	{ 104, 116,  216,  240 },	/* MCS 5 */
66 	{ 117, 130,  243,  270 },	/* MCS 6 */
67 	{ 130, 144,  270,  300 },	/* MCS 7 */
68 	{  26,  29,   54,   60 },	/* MCS 8 */
69 	{  52,  58,  108,  120 },	/* MCS 9 */
70 	{  78,  87,  162,  180 },	/* MCS 10 */
71 	{ 104, 116,  216,  240 },	/* MCS 11 */
72 	{ 156, 173,  324,  360 },	/* MCS 12 */
73 	{ 208, 231,  432,  480 },	/* MCS 13 */
74 	{ 234, 260,  486,  540 },	/* MCS 14 */
75 	{ 260, 289,  540,  600 },	/* MCS 15 */
76 	{  39,  43,   81,   90 },	/* MCS 16 */
77 	{  78,  87,  162,  180 },	/* MCS 17 */
78 	{ 117, 130,  243,  270 },	/* MCS 18 */
79 	{ 156, 173,  324,  360 },	/* MCS 19 */
80 	{ 234, 260,  486,  540 },	/* MCS 20 */
81 	{ 312, 347,  648,  720 },	/* MCS 21 */
82 	{ 351, 390,  729,  810 },	/* MCS 22 */
83 	{ 390, 433,  810,  900 },	/* MCS 23 */
84 	{  52,  58,  108,  120 },	/* MCS 24 */
85 	{ 104, 116,  216,  240 },	/* MCS 25 */
86 	{ 156, 173,  324,  360 },	/* MCS 26 */
87 	{ 208, 231,  432,  480 },	/* MCS 27 */
88 	{ 312, 347,  648,  720 },	/* MCS 28 */
89 	{ 416, 462,  864,  960 },	/* MCS 29 */
90 	{ 468, 520,  972, 1080 },	/* MCS 30 */
91 	{ 520, 578, 1080, 1200 },	/* MCS 31 */
92 	{   0,   0,   12,   13 },	/* MCS 32 */
93 	{  78,  87,  162,  180 },	/* MCS 33 */
94 	{ 104, 116,  216,  240 },	/* MCS 34 */
95 	{ 130, 144,  270,  300 },	/* MCS 35 */
96 	{ 117, 130,  243,  270 },	/* MCS 36 */
97 	{ 156, 173,  324,  360 },	/* MCS 37 */
98 	{ 195, 217,  405,  450 },	/* MCS 38 */
99 	{ 104, 116,  216,  240 },	/* MCS 39 */
100 	{ 130, 144,  270,  300 },	/* MCS 40 */
101 	{ 130, 144,  270,  300 },	/* MCS 41 */
102 	{ 156, 173,  324,  360 },	/* MCS 42 */
103 	{ 182, 202,  378,  420 },	/* MCS 43 */
104 	{ 182, 202,  378,  420 },	/* MCS 44 */
105 	{ 208, 231,  432,  480 },	/* MCS 45 */
106 	{ 156, 173,  324,  360 },	/* MCS 46 */
107 	{ 195, 217,  405,  450 },	/* MCS 47 */
108 	{ 195, 217,  405,  450 },	/* MCS 48 */
109 	{ 234, 260,  486,  540 },	/* MCS 49 */
110 	{ 273, 303,  567,  630 },	/* MCS 50 */
111 	{ 273, 303,  567,  630 },	/* MCS 51 */
112 	{ 312, 347,  648,  720 },	/* MCS 52 */
113 	{ 130, 144,  270,  300 },	/* MCS 53 */
114 	{ 156, 173,  324,  360 },	/* MCS 54 */
115 	{ 182, 202,  378,  420 },	/* MCS 55 */
116 	{ 156, 173,  324,  360 },	/* MCS 56 */
117 	{ 182, 202,  378,  420 },	/* MCS 57 */
118 	{ 208, 231,  432,  480 },	/* MCS 58 */
119 	{ 234, 260,  486,  540 },	/* MCS 59 */
120 	{ 208, 231,  432,  480 },	/* MCS 60 */
121 	{ 234, 260,  486,  540 },	/* MCS 61 */
122 	{ 260, 289,  540,  600 },	/* MCS 62 */
123 	{ 260, 289,  540,  600 },	/* MCS 63 */
124 	{ 286, 318,  594,  660 },	/* MCS 64 */
125 	{ 195, 217,  405,  450 },	/* MCS 65 */
126 	{ 234, 260,  486,  540 },	/* MCS 66 */
127 	{ 273, 303,  567,  630 },	/* MCS 67 */
128 	{ 234, 260,  486,  540 },	/* MCS 68 */
129 	{ 273, 303,  567,  630 },	/* MCS 69 */
130 	{ 312, 347,  648,  720 },	/* MCS 70 */
131 	{ 351, 390,  729,  810 },	/* MCS 71 */
132 	{ 312, 347,  648,  720 },	/* MCS 72 */
133 	{ 351, 390,  729,  810 },	/* MCS 73 */
134 	{ 390, 433,  810,  900 },	/* MCS 74 */
135 	{ 390, 433,  810,  900 },	/* MCS 75 */
136 	{ 429, 477,  891,  990 },	/* MCS 76 */
137 };
138 
139 static	int ieee80211_ampdu_age = -1;	/* threshold for ampdu reorder q (ms) */
140 SYSCTL_PROC(_net_wlan, OID_AUTO, ampdu_age, CTLTYPE_INT | CTLFLAG_RW,
141 	&ieee80211_ampdu_age, 0, ieee80211_sysctl_msecs_ticks, "I",
142 	"AMPDU max reorder age (ms)");
143 
144 static	int ieee80211_recv_bar_ena = 1;
145 SYSCTL_INT(_net_wlan, OID_AUTO, recv_bar, CTLFLAG_RW, &ieee80211_recv_bar_ena,
146 	    0, "BAR frame processing (ena/dis)");
147 
148 static	int ieee80211_addba_timeout = -1;/* timeout for ADDBA response */
149 SYSCTL_PROC(_net_wlan, OID_AUTO, addba_timeout, CTLTYPE_INT | CTLFLAG_RW,
150 	&ieee80211_addba_timeout, 0, ieee80211_sysctl_msecs_ticks, "I",
151 	"ADDBA request timeout (ms)");
152 static	int ieee80211_addba_backoff = -1;/* backoff after max ADDBA requests */
153 SYSCTL_PROC(_net_wlan, OID_AUTO, addba_backoff, CTLTYPE_INT | CTLFLAG_RW,
154 	&ieee80211_addba_backoff, 0, ieee80211_sysctl_msecs_ticks, "I",
155 	"ADDBA request backoff (ms)");
156 static	int ieee80211_addba_maxtries = 3;/* max ADDBA requests before backoff */
157 SYSCTL_INT(_net_wlan, OID_AUTO, addba_maxtries, CTLFLAG_RW,
158 	&ieee80211_addba_maxtries, 0, "max ADDBA requests sent before backoff");
159 
160 static	int ieee80211_bar_timeout = -1;	/* timeout waiting for BAR response */
161 static	int ieee80211_bar_maxtries = 50;/* max BAR requests before DELBA */
162 
163 static	ieee80211_recv_action_func ht_recv_action_ba_addba_request;
164 static	ieee80211_recv_action_func ht_recv_action_ba_addba_response;
165 static	ieee80211_recv_action_func ht_recv_action_ba_delba;
166 static	ieee80211_recv_action_func ht_recv_action_ht_mimopwrsave;
167 static	ieee80211_recv_action_func ht_recv_action_ht_txchwidth;
168 
169 static	ieee80211_send_action_func ht_send_action_ba_addba;
170 static	ieee80211_send_action_func ht_send_action_ba_delba;
171 static	ieee80211_send_action_func ht_send_action_ht_txchwidth;
172 
173 static void
174 ieee80211_ht_init(void)
175 {
176 	/*
177 	 * Setup HT parameters that depends on the clock frequency.
178 	 */
179 	ieee80211_ampdu_age = msecs_to_ticks(500);
180 	ieee80211_addba_timeout = msecs_to_ticks(250);
181 	ieee80211_addba_backoff = msecs_to_ticks(10*1000);
182 	ieee80211_bar_timeout = msecs_to_ticks(250);
183 	/*
184 	 * Register action frame handlers.
185 	 */
186 	ieee80211_recv_action_register(IEEE80211_ACTION_CAT_BA,
187 	    IEEE80211_ACTION_BA_ADDBA_REQUEST, ht_recv_action_ba_addba_request);
188 	ieee80211_recv_action_register(IEEE80211_ACTION_CAT_BA,
189 	    IEEE80211_ACTION_BA_ADDBA_RESPONSE, ht_recv_action_ba_addba_response);
190 	ieee80211_recv_action_register(IEEE80211_ACTION_CAT_BA,
191 	    IEEE80211_ACTION_BA_DELBA, ht_recv_action_ba_delba);
192 	ieee80211_recv_action_register(IEEE80211_ACTION_CAT_HT,
193 	    IEEE80211_ACTION_HT_MIMOPWRSAVE, ht_recv_action_ht_mimopwrsave);
194 	ieee80211_recv_action_register(IEEE80211_ACTION_CAT_HT,
195 	    IEEE80211_ACTION_HT_TXCHWIDTH, ht_recv_action_ht_txchwidth);
196 
197 	ieee80211_send_action_register(IEEE80211_ACTION_CAT_BA,
198 	    IEEE80211_ACTION_BA_ADDBA_REQUEST, ht_send_action_ba_addba);
199 	ieee80211_send_action_register(IEEE80211_ACTION_CAT_BA,
200 	    IEEE80211_ACTION_BA_ADDBA_RESPONSE, ht_send_action_ba_addba);
201 	ieee80211_send_action_register(IEEE80211_ACTION_CAT_BA,
202 	    IEEE80211_ACTION_BA_DELBA, ht_send_action_ba_delba);
203 	ieee80211_send_action_register(IEEE80211_ACTION_CAT_HT,
204 	    IEEE80211_ACTION_HT_TXCHWIDTH, ht_send_action_ht_txchwidth);
205 }
206 SYSINIT(wlan_ht, SI_SUB_DRIVERS, SI_ORDER_FIRST, ieee80211_ht_init, NULL);
207 
208 static int ieee80211_ampdu_enable(struct ieee80211_node *ni,
209 	struct ieee80211_tx_ampdu *tap);
210 static int ieee80211_addba_request(struct ieee80211_node *ni,
211 	struct ieee80211_tx_ampdu *tap,
212 	int dialogtoken, int baparamset, int batimeout);
213 static int ieee80211_addba_response(struct ieee80211_node *ni,
214 	struct ieee80211_tx_ampdu *tap,
215 	int code, int baparamset, int batimeout);
216 static void ieee80211_addba_stop(struct ieee80211_node *ni,
217 	struct ieee80211_tx_ampdu *tap);
218 static void null_addba_response_timeout(struct ieee80211_node *ni,
219 	struct ieee80211_tx_ampdu *tap);
220 
221 static void ieee80211_bar_response(struct ieee80211_node *ni,
222 	struct ieee80211_tx_ampdu *tap, int status);
223 static void ampdu_tx_stop(struct ieee80211_tx_ampdu *tap);
224 static void bar_stop_timer(struct ieee80211_tx_ampdu *tap);
225 static int ampdu_rx_start(struct ieee80211_node *, struct ieee80211_rx_ampdu *,
226 	int baparamset, int batimeout, int baseqctl);
227 static void ampdu_rx_stop(struct ieee80211_node *, struct ieee80211_rx_ampdu *);
228 
229 void
230 ieee80211_ht_attach(struct ieee80211com *ic)
231 {
232 	/* setup default aggregation policy */
233 	ic->ic_recv_action = ieee80211_recv_action;
234 	ic->ic_send_action = ieee80211_send_action;
235 	ic->ic_ampdu_enable = ieee80211_ampdu_enable;
236 	ic->ic_addba_request = ieee80211_addba_request;
237 	ic->ic_addba_response = ieee80211_addba_response;
238 	ic->ic_addba_response_timeout = null_addba_response_timeout;
239 	ic->ic_addba_stop = ieee80211_addba_stop;
240 	ic->ic_bar_response = ieee80211_bar_response;
241 	ic->ic_ampdu_rx_start = ampdu_rx_start;
242 	ic->ic_ampdu_rx_stop = ampdu_rx_stop;
243 
244 	ic->ic_htprotmode = IEEE80211_PROT_RTSCTS;
245 	ic->ic_curhtprotmode = IEEE80211_HTINFO_OPMODE_PURE;
246 }
247 
248 void
249 ieee80211_ht_detach(struct ieee80211com *ic)
250 {
251 }
252 
253 void
254 ieee80211_ht_vattach(struct ieee80211vap *vap)
255 {
256 
257 	/* driver can override defaults */
258 	vap->iv_ampdu_rxmax = IEEE80211_HTCAP_MAXRXAMPDU_8K;
259 	vap->iv_ampdu_density = IEEE80211_HTCAP_MPDUDENSITY_NA;
260 	vap->iv_ampdu_limit = vap->iv_ampdu_rxmax;
261 	vap->iv_amsdu_limit = vap->iv_htcaps & IEEE80211_HTCAP_MAXAMSDU;
262 	/* tx aggregation traffic thresholds */
263 	vap->iv_ampdu_mintraffic[WME_AC_BK] = 128;
264 	vap->iv_ampdu_mintraffic[WME_AC_BE] = 64;
265 	vap->iv_ampdu_mintraffic[WME_AC_VO] = 32;
266 	vap->iv_ampdu_mintraffic[WME_AC_VI] = 32;
267 
268 	if (vap->iv_htcaps & IEEE80211_HTC_HT) {
269 		/*
270 		 * Device is HT capable; enable all HT-related
271 		 * facilities by default.
272 		 * XXX these choices may be too aggressive.
273 		 */
274 		vap->iv_flags_ht |= IEEE80211_FHT_HT
275 				 |  IEEE80211_FHT_HTCOMPAT
276 				 ;
277 		if (vap->iv_htcaps & IEEE80211_HTCAP_SHORTGI20)
278 			vap->iv_flags_ht |= IEEE80211_FHT_SHORTGI20;
279 		/* XXX infer from channel list? */
280 		if (vap->iv_htcaps & IEEE80211_HTCAP_CHWIDTH40) {
281 			vap->iv_flags_ht |= IEEE80211_FHT_USEHT40;
282 			if (vap->iv_htcaps & IEEE80211_HTCAP_SHORTGI40)
283 				vap->iv_flags_ht |= IEEE80211_FHT_SHORTGI40;
284 		}
285 		/* enable RIFS if capable */
286 		if (vap->iv_htcaps & IEEE80211_HTC_RIFS)
287 			vap->iv_flags_ht |= IEEE80211_FHT_RIFS;
288 
289 		/* NB: A-MPDU and A-MSDU rx are mandated, these are tx only */
290 		vap->iv_flags_ht |= IEEE80211_FHT_AMPDU_RX;
291 		if (vap->iv_htcaps & IEEE80211_HTC_AMPDU)
292 			vap->iv_flags_ht |= IEEE80211_FHT_AMPDU_TX;
293 		vap->iv_flags_ht |= IEEE80211_FHT_AMSDU_RX;
294 		if (vap->iv_htcaps & IEEE80211_HTC_AMSDU)
295 			vap->iv_flags_ht |= IEEE80211_FHT_AMSDU_TX;
296 
297 		if (vap->iv_htcaps & IEEE80211_HTCAP_TXSTBC)
298 			vap->iv_flags_ht |= IEEE80211_FHT_STBC_TX;
299 		if (vap->iv_htcaps & IEEE80211_HTCAP_RXSTBC)
300 			vap->iv_flags_ht |= IEEE80211_FHT_STBC_RX;
301 	}
302 	/* NB: disable default legacy WDS, too many issues right now */
303 	if (vap->iv_flags_ext & IEEE80211_FEXT_WDSLEGACY)
304 		vap->iv_flags_ht &= ~IEEE80211_FHT_HT;
305 }
306 
307 void
308 ieee80211_ht_vdetach(struct ieee80211vap *vap)
309 {
310 }
311 
312 static int
313 ht_getrate(struct ieee80211com *ic, int index, enum ieee80211_phymode mode,
314     int ratetype)
315 {
316 	int mword, rate;
317 
318 	mword = ieee80211_rate2media(ic, index | IEEE80211_RATE_MCS, mode);
319 	if (IFM_SUBTYPE(mword) != IFM_IEEE80211_MCS)
320 		return (0);
321 	switch (ratetype) {
322 	case 0:
323 		rate = ieee80211_htrates[index].ht20_rate_800ns;
324 		break;
325 	case 1:
326 		rate = ieee80211_htrates[index].ht20_rate_400ns;
327 		break;
328 	case 2:
329 		rate = ieee80211_htrates[index].ht40_rate_800ns;
330 		break;
331 	default:
332 		rate = ieee80211_htrates[index].ht40_rate_400ns;
333 		break;
334 	}
335 	return (rate);
336 }
337 
338 static struct printranges {
339 	int	minmcs;
340 	int	maxmcs;
341 	int	txstream;
342 	int	ratetype;
343 	int	htcapflags;
344 } ranges[] = {
345 	{  0,  7, 1, 0, 0 },
346 	{  8, 15, 2, 0, 0 },
347 	{ 16, 23, 3, 0, 0 },
348 	{ 24, 31, 4, 0, 0 },
349 	{ 32,  0, 1, 2, IEEE80211_HTC_TXMCS32 },
350 	{ 33, 38, 2, 0, IEEE80211_HTC_TXUNEQUAL },
351 	{ 39, 52, 3, 0, IEEE80211_HTC_TXUNEQUAL },
352 	{ 53, 76, 4, 0, IEEE80211_HTC_TXUNEQUAL },
353 	{  0,  0, 0, 0, 0 },
354 };
355 
356 static void
357 ht_rateprint(struct ieee80211com *ic, enum ieee80211_phymode mode, int ratetype)
358 {
359 	int minrate, maxrate;
360 	struct printranges *range;
361 
362 	for (range = ranges; range->txstream != 0; range++) {
363 		if (ic->ic_txstream < range->txstream)
364 			continue;
365 		if (range->htcapflags &&
366 		    (ic->ic_htcaps & range->htcapflags) == 0)
367 			continue;
368 		if (ratetype < range->ratetype)
369 			continue;
370 		minrate = ht_getrate(ic, range->minmcs, mode, ratetype);
371 		maxrate = ht_getrate(ic, range->maxmcs, mode, ratetype);
372 		if (range->maxmcs) {
373 			ic_printf(ic, "MCS %d-%d: %d%sMbps - %d%sMbps\n",
374 			    range->minmcs, range->maxmcs,
375 			    minrate/2, ((minrate & 0x1) != 0 ? ".5" : ""),
376 			    maxrate/2, ((maxrate & 0x1) != 0 ? ".5" : ""));
377 		} else {
378 			ic_printf(ic, "MCS %d: %d%sMbps\n", range->minmcs,
379 			    minrate/2, ((minrate & 0x1) != 0 ? ".5" : ""));
380 		}
381 	}
382 }
383 
384 static void
385 ht_announce(struct ieee80211com *ic, enum ieee80211_phymode mode)
386 {
387 	const char *modestr = ieee80211_phymode_name[mode];
388 
389 	ic_printf(ic, "%s MCS 20MHz\n", modestr);
390 	ht_rateprint(ic, mode, 0);
391 	if (ic->ic_htcaps & IEEE80211_HTCAP_SHORTGI20) {
392 		ic_printf(ic, "%s MCS 20MHz SGI\n", modestr);
393 		ht_rateprint(ic, mode, 1);
394 	}
395 	if (ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) {
396 		ic_printf(ic, "%s MCS 40MHz:\n", modestr);
397 		ht_rateprint(ic, mode, 2);
398 	}
399 	if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) &&
400 	    (ic->ic_htcaps & IEEE80211_HTCAP_SHORTGI40)) {
401 		ic_printf(ic, "%s MCS 40MHz SGI:\n", modestr);
402 		ht_rateprint(ic, mode, 3);
403 	}
404 }
405 
406 void
407 ieee80211_ht_announce(struct ieee80211com *ic)
408 {
409 
410 	if (isset(ic->ic_modecaps, IEEE80211_MODE_11NA) ||
411 	    isset(ic->ic_modecaps, IEEE80211_MODE_11NG))
412 		ic_printf(ic, "%dT%dR\n", ic->ic_txstream, ic->ic_rxstream);
413 	if (isset(ic->ic_modecaps, IEEE80211_MODE_11NA))
414 		ht_announce(ic, IEEE80211_MODE_11NA);
415 	if (isset(ic->ic_modecaps, IEEE80211_MODE_11NG))
416 		ht_announce(ic, IEEE80211_MODE_11NG);
417 }
418 
419 static struct ieee80211_htrateset htrateset;
420 
421 const struct ieee80211_htrateset *
422 ieee80211_get_suphtrates(struct ieee80211com *ic,
423     const struct ieee80211_channel *c)
424 {
425 #define	ADDRATE(x)	do {						\
426 	htrateset.rs_rates[htrateset.rs_nrates] = x;			\
427 	htrateset.rs_nrates++;						\
428 } while (0)
429 	int i;
430 
431 	memset(&htrateset, 0, sizeof(struct ieee80211_htrateset));
432 	for (i = 0; i < ic->ic_txstream * 8; i++)
433 		ADDRATE(i);
434 	if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) &&
435 	    (ic->ic_htcaps & IEEE80211_HTC_TXMCS32))
436 		ADDRATE(32);
437 	if (ic->ic_htcaps & IEEE80211_HTC_TXUNEQUAL) {
438 		if (ic->ic_txstream >= 2) {
439 			 for (i = 33; i <= 38; i++)
440 				ADDRATE(i);
441 		}
442 		if (ic->ic_txstream >= 3) {
443 			for (i = 39; i <= 52; i++)
444 				ADDRATE(i);
445 		}
446 		if (ic->ic_txstream == 4) {
447 			for (i = 53; i <= 76; i++)
448 				ADDRATE(i);
449 		}
450 	}
451 	return &htrateset;
452 #undef	ADDRATE
453 }
454 
455 /*
456  * Receive processing.
457  */
458 
459 /*
460  * Decap the encapsulated A-MSDU frames and dispatch all but
461  * the last for delivery.  The last frame is returned for
462  * delivery via the normal path.
463  */
464 struct mbuf *
465 ieee80211_decap_amsdu(struct ieee80211_node *ni, struct mbuf *m)
466 {
467 	struct ieee80211vap *vap = ni->ni_vap;
468 	int framelen;
469 	struct mbuf *n;
470 
471 	/* discard 802.3 header inserted by ieee80211_decap */
472 	m_adj(m, sizeof(struct ether_header));
473 
474 	vap->iv_stats.is_amsdu_decap++;
475 
476 	for (;;) {
477 		/*
478 		 * Decap the first frame, bust it apart from the
479 		 * remainder and deliver.  We leave the last frame
480 		 * delivery to the caller (for consistency with other
481 		 * code paths, could also do it here).
482 		 */
483 		m = ieee80211_decap1(m, &framelen);
484 		if (m == NULL) {
485 			IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
486 			    ni->ni_macaddr, "a-msdu", "%s", "decap failed");
487 			vap->iv_stats.is_amsdu_tooshort++;
488 			return NULL;
489 		}
490 		if (m->m_pkthdr.len == framelen)
491 			break;
492 		n = m_split(m, framelen, M_NOWAIT);
493 		if (n == NULL) {
494 			IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
495 			    ni->ni_macaddr, "a-msdu",
496 			    "%s", "unable to split encapsulated frames");
497 			vap->iv_stats.is_amsdu_split++;
498 			m_freem(m);			/* NB: must reclaim */
499 			return NULL;
500 		}
501 		vap->iv_deliver_data(vap, ni, m);
502 
503 		/*
504 		 * Remove frame contents; each intermediate frame
505 		 * is required to be aligned to a 4-byte boundary.
506 		 */
507 		m = n;
508 		m_adj(m, roundup2(framelen, 4) - framelen);	/* padding */
509 	}
510 	return m;				/* last delivered by caller */
511 }
512 
513 /*
514  * Purge all frames in the A-MPDU re-order queue.
515  */
516 static void
517 ampdu_rx_purge(struct ieee80211_rx_ampdu *rap)
518 {
519 	struct mbuf *m;
520 	int i;
521 
522 	for (i = 0; i < rap->rxa_wnd; i++) {
523 		m = rap->rxa_m[i];
524 		if (m != NULL) {
525 			rap->rxa_m[i] = NULL;
526 			rap->rxa_qbytes -= m->m_pkthdr.len;
527 			m_freem(m);
528 			if (--rap->rxa_qframes == 0)
529 				break;
530 		}
531 	}
532 	KASSERT(rap->rxa_qbytes == 0 && rap->rxa_qframes == 0,
533 	    ("lost %u data, %u frames on ampdu rx q",
534 	    rap->rxa_qbytes, rap->rxa_qframes));
535 }
536 
537 /*
538  * Start A-MPDU rx/re-order processing for the specified TID.
539  */
540 static int
541 ampdu_rx_start(struct ieee80211_node *ni, struct ieee80211_rx_ampdu *rap,
542 	int baparamset, int batimeout, int baseqctl)
543 {
544 	int bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
545 
546 	if (rap->rxa_flags & IEEE80211_AGGR_RUNNING) {
547 		/*
548 		 * AMPDU previously setup and not terminated with a DELBA,
549 		 * flush the reorder q's in case anything remains.
550 		 */
551 		ampdu_rx_purge(rap);
552 	}
553 	memset(rap, 0, sizeof(*rap));
554 	rap->rxa_wnd = (bufsiz == 0) ?
555 	    IEEE80211_AGGR_BAWMAX : min(bufsiz, IEEE80211_AGGR_BAWMAX);
556 	rap->rxa_start = MS(baseqctl, IEEE80211_BASEQ_START);
557 	rap->rxa_flags |=  IEEE80211_AGGR_RUNNING | IEEE80211_AGGR_XCHGPEND;
558 
559 	return 0;
560 }
561 
562 /*
563  * Public function; manually setup the RX ampdu state.
564  */
565 int
566 ieee80211_ampdu_rx_start_ext(struct ieee80211_node *ni, int tid, int seq, int baw)
567 {
568 	struct ieee80211_rx_ampdu *rap;
569 
570 	/* XXX TODO: sanity check tid, seq, baw */
571 
572 	rap = &ni->ni_rx_ampdu[tid];
573 
574 	if (rap->rxa_flags & IEEE80211_AGGR_RUNNING) {
575 		/*
576 		 * AMPDU previously setup and not terminated with a DELBA,
577 		 * flush the reorder q's in case anything remains.
578 		 */
579 		ampdu_rx_purge(rap);
580 	}
581 
582 	memset(rap, 0, sizeof(*rap));
583 	rap->rxa_wnd = (baw== 0) ?
584 	    IEEE80211_AGGR_BAWMAX : min(baw, IEEE80211_AGGR_BAWMAX);
585 	rap->rxa_start = seq;
586 	rap->rxa_flags |=  IEEE80211_AGGR_RUNNING | IEEE80211_AGGR_XCHGPEND;
587 
588 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N, ni,
589 	    "%s: tid=%d, start=%d, wnd=%d, flags=0x%08x\n",
590 	    __func__,
591 	    tid,
592 	    seq,
593 	    rap->rxa_wnd,
594 	    rap->rxa_flags);
595 
596 	return 0;
597 }
598 
599 /*
600  * Stop A-MPDU rx processing for the specified TID.
601  */
602 static void
603 ampdu_rx_stop(struct ieee80211_node *ni, struct ieee80211_rx_ampdu *rap)
604 {
605 
606 	ampdu_rx_purge(rap);
607 	rap->rxa_flags &= ~(IEEE80211_AGGR_RUNNING | IEEE80211_AGGR_XCHGPEND);
608 }
609 
610 /*
611  * Dispatch a frame from the A-MPDU reorder queue.  The
612  * frame is fed back into ieee80211_input marked with an
613  * M_AMPDU_MPDU flag so it doesn't come back to us (it also
614  * permits ieee80211_input to optimize re-processing).
615  */
616 static __inline void
617 ampdu_dispatch(struct ieee80211_node *ni, struct mbuf *m)
618 {
619 	m->m_flags |= M_AMPDU_MPDU;	/* bypass normal processing */
620 	/* NB: rssi and noise are ignored w/ M_AMPDU_MPDU set */
621 	(void) ieee80211_input(ni, m, 0, 0);
622 }
623 
624 /*
625  * Dispatch as many frames as possible from the re-order queue.
626  * Frames will always be "at the front"; we process all frames
627  * up to the first empty slot in the window.  On completion we
628  * cleanup state if there are still pending frames in the current
629  * BA window.  We assume the frame at slot 0 is already handled
630  * by the caller; we always start at slot 1.
631  */
632 static void
633 ampdu_rx_dispatch(struct ieee80211_rx_ampdu *rap, struct ieee80211_node *ni)
634 {
635 	struct ieee80211vap *vap = ni->ni_vap;
636 	struct mbuf *m;
637 	int i;
638 
639 	/* flush run of frames */
640 	for (i = 1; i < rap->rxa_wnd; i++) {
641 		m = rap->rxa_m[i];
642 		if (m == NULL)
643 			break;
644 		rap->rxa_m[i] = NULL;
645 		rap->rxa_qbytes -= m->m_pkthdr.len;
646 		rap->rxa_qframes--;
647 
648 		ampdu_dispatch(ni, m);
649 	}
650 	/*
651 	 * If frames remain, copy the mbuf pointers down so
652 	 * they correspond to the offsets in the new window.
653 	 */
654 	if (rap->rxa_qframes != 0) {
655 		int n = rap->rxa_qframes, j;
656 		for (j = i+1; j < rap->rxa_wnd; j++) {
657 			if (rap->rxa_m[j] != NULL) {
658 				rap->rxa_m[j-i] = rap->rxa_m[j];
659 				rap->rxa_m[j] = NULL;
660 				if (--n == 0)
661 					break;
662 			}
663 		}
664 		KASSERT(n == 0, ("lost %d frames", n));
665 		vap->iv_stats.is_ampdu_rx_copy += rap->rxa_qframes;
666 	}
667 	/*
668 	 * Adjust the start of the BA window to
669 	 * reflect the frames just dispatched.
670 	 */
671 	rap->rxa_start = IEEE80211_SEQ_ADD(rap->rxa_start, i);
672 	vap->iv_stats.is_ampdu_rx_oor += i;
673 }
674 
675 /*
676  * Dispatch all frames in the A-MPDU re-order queue.
677  */
678 static void
679 ampdu_rx_flush(struct ieee80211_node *ni, struct ieee80211_rx_ampdu *rap)
680 {
681 	struct ieee80211vap *vap = ni->ni_vap;
682 	struct mbuf *m;
683 	int i;
684 
685 	for (i = 0; i < rap->rxa_wnd; i++) {
686 		m = rap->rxa_m[i];
687 		if (m == NULL)
688 			continue;
689 		rap->rxa_m[i] = NULL;
690 		rap->rxa_qbytes -= m->m_pkthdr.len;
691 		rap->rxa_qframes--;
692 		vap->iv_stats.is_ampdu_rx_oor++;
693 
694 		ampdu_dispatch(ni, m);
695 		if (rap->rxa_qframes == 0)
696 			break;
697 	}
698 }
699 
700 /*
701  * Dispatch all frames in the A-MPDU re-order queue
702  * preceding the specified sequence number.  This logic
703  * handles window moves due to a received MSDU or BAR.
704  */
705 static void
706 ampdu_rx_flush_upto(struct ieee80211_node *ni,
707 	struct ieee80211_rx_ampdu *rap, ieee80211_seq winstart)
708 {
709 	struct ieee80211vap *vap = ni->ni_vap;
710 	struct mbuf *m;
711 	ieee80211_seq seqno;
712 	int i;
713 
714 	/*
715 	 * Flush any complete MSDU's with a sequence number lower
716 	 * than winstart.  Gaps may exist.  Note that we may actually
717 	 * dispatch frames past winstart if a run continues; this is
718 	 * an optimization that avoids having to do a separate pass
719 	 * to dispatch frames after moving the BA window start.
720 	 */
721 	seqno = rap->rxa_start;
722 	for (i = 0; i < rap->rxa_wnd; i++) {
723 		m = rap->rxa_m[i];
724 		if (m != NULL) {
725 			rap->rxa_m[i] = NULL;
726 			rap->rxa_qbytes -= m->m_pkthdr.len;
727 			rap->rxa_qframes--;
728 			vap->iv_stats.is_ampdu_rx_oor++;
729 
730 			ampdu_dispatch(ni, m);
731 		} else {
732 			if (!IEEE80211_SEQ_BA_BEFORE(seqno, winstart))
733 				break;
734 		}
735 		seqno = IEEE80211_SEQ_INC(seqno);
736 	}
737 	/*
738 	 * If frames remain, copy the mbuf pointers down so
739 	 * they correspond to the offsets in the new window.
740 	 */
741 	if (rap->rxa_qframes != 0) {
742 		int n = rap->rxa_qframes, j;
743 
744 		/* NB: this loop assumes i > 0 and/or rxa_m[0] is NULL */
745 		KASSERT(rap->rxa_m[0] == NULL,
746 		    ("%s: BA window slot 0 occupied", __func__));
747 		for (j = i+1; j < rap->rxa_wnd; j++) {
748 			if (rap->rxa_m[j] != NULL) {
749 				rap->rxa_m[j-i] = rap->rxa_m[j];
750 				rap->rxa_m[j] = NULL;
751 				if (--n == 0)
752 					break;
753 			}
754 		}
755 		KASSERT(n == 0, ("%s: lost %d frames, qframes %d off %d "
756 		    "BA win <%d:%d> winstart %d",
757 		    __func__, n, rap->rxa_qframes, i, rap->rxa_start,
758 		    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1),
759 		    winstart));
760 		vap->iv_stats.is_ampdu_rx_copy += rap->rxa_qframes;
761 	}
762 	/*
763 	 * Move the start of the BA window; we use the
764 	 * sequence number of the last MSDU that was
765 	 * passed up the stack+1 or winstart if stopped on
766 	 * a gap in the reorder buffer.
767 	 */
768 	rap->rxa_start = seqno;
769 }
770 
771 /*
772  * Process a received QoS data frame for an HT station.  Handle
773  * A-MPDU reordering: if this frame is received out of order
774  * and falls within the BA window hold onto it.  Otherwise if
775  * this frame completes a run, flush any pending frames.  We
776  * return 1 if the frame is consumed.  A 0 is returned if
777  * the frame should be processed normally by the caller.
778  */
779 int
780 ieee80211_ampdu_reorder(struct ieee80211_node *ni, struct mbuf *m)
781 {
782 #define	IEEE80211_FC0_QOSDATA \
783 	(IEEE80211_FC0_TYPE_DATA|IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_VERSION_0)
784 #define	PROCESS		0	/* caller should process frame */
785 #define	CONSUMED	1	/* frame consumed, caller does nothing */
786 	struct ieee80211vap *vap = ni->ni_vap;
787 	struct ieee80211_qosframe *wh;
788 	struct ieee80211_rx_ampdu *rap;
789 	ieee80211_seq rxseq;
790 	uint8_t tid;
791 	int off;
792 
793 	KASSERT((m->m_flags & (M_AMPDU | M_AMPDU_MPDU)) == M_AMPDU,
794 	    ("!a-mpdu or already re-ordered, flags 0x%x", m->m_flags));
795 	KASSERT(ni->ni_flags & IEEE80211_NODE_HT, ("not an HT sta"));
796 
797 	/* NB: m_len known to be sufficient */
798 	wh = mtod(m, struct ieee80211_qosframe *);
799 	if (wh->i_fc[0] != IEEE80211_FC0_QOSDATA) {
800 		/*
801 		 * Not QoS data, shouldn't get here but just
802 		 * return it to the caller for processing.
803 		 */
804 		return PROCESS;
805 	}
806 	if (IEEE80211_IS_DSTODS(wh))
807 		tid = ((struct ieee80211_qosframe_addr4 *)wh)->i_qos[0];
808 	else
809 		tid = wh->i_qos[0];
810 	tid &= IEEE80211_QOS_TID;
811 	rap = &ni->ni_rx_ampdu[tid];
812 	if ((rap->rxa_flags & IEEE80211_AGGR_XCHGPEND) == 0) {
813 		/*
814 		 * No ADDBA request yet, don't touch.
815 		 */
816 		return PROCESS;
817 	}
818 	rxseq = le16toh(*(uint16_t *)wh->i_seq);
819 	if ((rxseq & IEEE80211_SEQ_FRAG_MASK) != 0) {
820 		/*
821 		 * Fragments are not allowed; toss.
822 		 */
823 		IEEE80211_DISCARD_MAC(vap,
824 		    IEEE80211_MSG_INPUT | IEEE80211_MSG_11N, ni->ni_macaddr,
825 		    "A-MPDU", "fragment, rxseq 0x%x tid %u%s", rxseq, tid,
826 		    wh->i_fc[1] & IEEE80211_FC1_RETRY ? " (retransmit)" : "");
827 		vap->iv_stats.is_ampdu_rx_drop++;
828 		IEEE80211_NODE_STAT(ni, rx_drop);
829 		m_freem(m);
830 		return CONSUMED;
831 	}
832 	rxseq >>= IEEE80211_SEQ_SEQ_SHIFT;
833 	rap->rxa_nframes++;
834 again:
835 	if (rxseq == rap->rxa_start) {
836 		/*
837 		 * First frame in window.
838 		 */
839 		if (rap->rxa_qframes != 0) {
840 			/*
841 			 * Dispatch as many packets as we can.
842 			 */
843 			KASSERT(rap->rxa_m[0] == NULL, ("unexpected dup"));
844 			ampdu_dispatch(ni, m);
845 			ampdu_rx_dispatch(rap, ni);
846 			return CONSUMED;
847 		} else {
848 			/*
849 			 * In order; advance window and notify
850 			 * caller to dispatch directly.
851 			 */
852 			rap->rxa_start = IEEE80211_SEQ_INC(rxseq);
853 			return PROCESS;
854 		}
855 	}
856 	/*
857 	 * Frame is out of order; store if in the BA window.
858 	 */
859 	/* calculate offset in BA window */
860 	off = IEEE80211_SEQ_SUB(rxseq, rap->rxa_start);
861 	if (off < rap->rxa_wnd) {
862 		/*
863 		 * Common case (hopefully): in the BA window.
864 		 * Sec 9.10.7.6.2 a) (p.137)
865 		 */
866 
867 		/*
868 		 * Check for frames sitting too long in the reorder queue.
869 		 * This should only ever happen if frames are not delivered
870 		 * without the sender otherwise notifying us (e.g. with a
871 		 * BAR to move the window).  Typically this happens because
872 		 * of vendor bugs that cause the sequence number to jump.
873 		 * When this happens we get a gap in the reorder queue that
874 		 * leaves frame sitting on the queue until they get pushed
875 		 * out due to window moves.  When the vendor does not send
876 		 * BAR this move only happens due to explicit packet sends
877 		 *
878 		 * NB: we only track the time of the oldest frame in the
879 		 * reorder q; this means that if we flush we might push
880 		 * frames that still "new"; if this happens then subsequent
881 		 * frames will result in BA window moves which cost something
882 		 * but is still better than a big throughput dip.
883 		 */
884 		if (rap->rxa_qframes != 0) {
885 			/* XXX honor batimeout? */
886 			if (ticks - rap->rxa_age > ieee80211_ampdu_age) {
887 				/*
888 				 * Too long since we received the first
889 				 * frame; flush the reorder buffer.
890 				 */
891 				if (rap->rxa_qframes != 0) {
892 					vap->iv_stats.is_ampdu_rx_age +=
893 					    rap->rxa_qframes;
894 					ampdu_rx_flush(ni, rap);
895 				}
896 				rap->rxa_start = IEEE80211_SEQ_INC(rxseq);
897 				return PROCESS;
898 			}
899 		} else {
900 			/*
901 			 * First frame, start aging timer.
902 			 */
903 			rap->rxa_age = ticks;
904 		}
905 
906 		/* save packet */
907 		if (rap->rxa_m[off] == NULL) {
908 			rap->rxa_m[off] = m;
909 			rap->rxa_qframes++;
910 			rap->rxa_qbytes += m->m_pkthdr.len;
911 			vap->iv_stats.is_ampdu_rx_reorder++;
912 		} else {
913 			IEEE80211_DISCARD_MAC(vap,
914 			    IEEE80211_MSG_INPUT | IEEE80211_MSG_11N,
915 			    ni->ni_macaddr, "a-mpdu duplicate",
916 			    "seqno %u tid %u BA win <%u:%u>",
917 			    rxseq, tid, rap->rxa_start,
918 			    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1));
919 			vap->iv_stats.is_rx_dup++;
920 			IEEE80211_NODE_STAT(ni, rx_dup);
921 			m_freem(m);
922 		}
923 		return CONSUMED;
924 	}
925 	if (off < IEEE80211_SEQ_BA_RANGE) {
926 		/*
927 		 * Outside the BA window, but within range;
928 		 * flush the reorder q and move the window.
929 		 * Sec 9.10.7.6.2 b) (p.138)
930 		 */
931 		IEEE80211_NOTE(vap, IEEE80211_MSG_11N, ni,
932 		    "move BA win <%u:%u> (%u frames) rxseq %u tid %u",
933 		    rap->rxa_start,
934 		    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1),
935 		    rap->rxa_qframes, rxseq, tid);
936 		vap->iv_stats.is_ampdu_rx_move++;
937 
938 		/*
939 		 * The spec says to flush frames up to but not including:
940 		 * 	WinStart_B = rxseq - rap->rxa_wnd + 1
941 		 * Then insert the frame or notify the caller to process
942 		 * it immediately.  We can safely do this by just starting
943 		 * over again because we know the frame will now be within
944 		 * the BA window.
945 		 */
946 		/* NB: rxa_wnd known to be >0 */
947 		ampdu_rx_flush_upto(ni, rap,
948 		    IEEE80211_SEQ_SUB(rxseq, rap->rxa_wnd-1));
949 		goto again;
950 	} else {
951 		/*
952 		 * Outside the BA window and out of range; toss.
953 		 * Sec 9.10.7.6.2 c) (p.138)
954 		 */
955 		IEEE80211_DISCARD_MAC(vap,
956 		    IEEE80211_MSG_INPUT | IEEE80211_MSG_11N, ni->ni_macaddr,
957 		    "MPDU", "BA win <%u:%u> (%u frames) rxseq %u tid %u%s",
958 		    rap->rxa_start,
959 		    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1),
960 		    rap->rxa_qframes, rxseq, tid,
961 		    wh->i_fc[1] & IEEE80211_FC1_RETRY ? " (retransmit)" : "");
962 		vap->iv_stats.is_ampdu_rx_drop++;
963 		IEEE80211_NODE_STAT(ni, rx_drop);
964 		m_freem(m);
965 		return CONSUMED;
966 	}
967 #undef CONSUMED
968 #undef PROCESS
969 #undef IEEE80211_FC0_QOSDATA
970 }
971 
972 /*
973  * Process a BAR ctl frame.  Dispatch all frames up to
974  * the sequence number of the frame.  If this frame is
975  * out of range it's discarded.
976  */
977 void
978 ieee80211_recv_bar(struct ieee80211_node *ni, struct mbuf *m0)
979 {
980 	struct ieee80211vap *vap = ni->ni_vap;
981 	struct ieee80211_frame_bar *wh;
982 	struct ieee80211_rx_ampdu *rap;
983 	ieee80211_seq rxseq;
984 	int tid, off;
985 
986 	if (!ieee80211_recv_bar_ena) {
987 #if 0
988 		IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_11N,
989 		    ni->ni_macaddr, "BAR", "%s", "processing disabled");
990 #endif
991 		vap->iv_stats.is_ampdu_bar_bad++;
992 		return;
993 	}
994 	wh = mtod(m0, struct ieee80211_frame_bar *);
995 	/* XXX check basic BAR */
996 	tid = MS(le16toh(wh->i_ctl), IEEE80211_BAR_TID);
997 	rap = &ni->ni_rx_ampdu[tid];
998 	if ((rap->rxa_flags & IEEE80211_AGGR_XCHGPEND) == 0) {
999 		/*
1000 		 * No ADDBA request yet, don't touch.
1001 		 */
1002 		IEEE80211_DISCARD_MAC(vap,
1003 		    IEEE80211_MSG_INPUT | IEEE80211_MSG_11N,
1004 		    ni->ni_macaddr, "BAR", "no BA stream, tid %u", tid);
1005 		vap->iv_stats.is_ampdu_bar_bad++;
1006 		return;
1007 	}
1008 	vap->iv_stats.is_ampdu_bar_rx++;
1009 	rxseq = le16toh(wh->i_seq) >> IEEE80211_SEQ_SEQ_SHIFT;
1010 	if (rxseq == rap->rxa_start)
1011 		return;
1012 	/* calculate offset in BA window */
1013 	off = IEEE80211_SEQ_SUB(rxseq, rap->rxa_start);
1014 	if (off < IEEE80211_SEQ_BA_RANGE) {
1015 		/*
1016 		 * Flush the reorder q up to rxseq and move the window.
1017 		 * Sec 9.10.7.6.3 a) (p.138)
1018 		 */
1019 		IEEE80211_NOTE(vap, IEEE80211_MSG_11N, ni,
1020 		    "BAR moves BA win <%u:%u> (%u frames) rxseq %u tid %u",
1021 		    rap->rxa_start,
1022 		    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1),
1023 		    rap->rxa_qframes, rxseq, tid);
1024 		vap->iv_stats.is_ampdu_bar_move++;
1025 
1026 		ampdu_rx_flush_upto(ni, rap, rxseq);
1027 		if (off >= rap->rxa_wnd) {
1028 			/*
1029 			 * BAR specifies a window start to the right of BA
1030 			 * window; we must move it explicitly since
1031 			 * ampdu_rx_flush_upto will not.
1032 			 */
1033 			rap->rxa_start = rxseq;
1034 		}
1035 	} else {
1036 		/*
1037 		 * Out of range; toss.
1038 		 * Sec 9.10.7.6.3 b) (p.138)
1039 		 */
1040 		IEEE80211_DISCARD_MAC(vap,
1041 		    IEEE80211_MSG_INPUT | IEEE80211_MSG_11N, ni->ni_macaddr,
1042 		    "BAR", "BA win <%u:%u> (%u frames) rxseq %u tid %u%s",
1043 		    rap->rxa_start,
1044 		    IEEE80211_SEQ_ADD(rap->rxa_start, rap->rxa_wnd-1),
1045 		    rap->rxa_qframes, rxseq, tid,
1046 		    wh->i_fc[1] & IEEE80211_FC1_RETRY ? " (retransmit)" : "");
1047 		vap->iv_stats.is_ampdu_bar_oow++;
1048 		IEEE80211_NODE_STAT(ni, rx_drop);
1049 	}
1050 }
1051 
1052 /*
1053  * Setup HT-specific state in a node.  Called only
1054  * when HT use is negotiated so we don't do extra
1055  * work for temporary and/or legacy sta's.
1056  */
1057 void
1058 ieee80211_ht_node_init(struct ieee80211_node *ni)
1059 {
1060 	struct ieee80211_tx_ampdu *tap;
1061 	int tid;
1062 
1063 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
1064 	    ni,
1065 	    "%s: called (%p)",
1066 	    __func__,
1067 	    ni);
1068 
1069 	if (ni->ni_flags & IEEE80211_NODE_HT) {
1070 		/*
1071 		 * Clean AMPDU state on re-associate.  This handles the case
1072 		 * where a station leaves w/o notifying us and then returns
1073 		 * before node is reaped for inactivity.
1074 		 */
1075 		IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
1076 		    ni,
1077 		    "%s: calling cleanup (%p)",
1078 		    __func__, ni);
1079 		ieee80211_ht_node_cleanup(ni);
1080 	}
1081 	for (tid = 0; tid < WME_NUM_TID; tid++) {
1082 		tap = &ni->ni_tx_ampdu[tid];
1083 		tap->txa_tid = tid;
1084 		tap->txa_ni = ni;
1085 		ieee80211_txampdu_init_pps(tap);
1086 		/* NB: further initialization deferred */
1087 	}
1088 	ni->ni_flags |= IEEE80211_NODE_HT | IEEE80211_NODE_AMPDU;
1089 }
1090 
1091 /*
1092  * Cleanup HT-specific state in a node.  Called only
1093  * when HT use has been marked.
1094  */
1095 void
1096 ieee80211_ht_node_cleanup(struct ieee80211_node *ni)
1097 {
1098 	struct ieee80211com *ic = ni->ni_ic;
1099 	int i;
1100 
1101 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
1102 	    ni,
1103 	    "%s: called (%p)",
1104 	    __func__, ni);
1105 
1106 	KASSERT(ni->ni_flags & IEEE80211_NODE_HT, ("not an HT node"));
1107 
1108 	/* XXX optimize this */
1109 	for (i = 0; i < WME_NUM_TID; i++) {
1110 		struct ieee80211_tx_ampdu *tap = &ni->ni_tx_ampdu[i];
1111 		if (tap->txa_flags & IEEE80211_AGGR_SETUP)
1112 			ampdu_tx_stop(tap);
1113 	}
1114 	for (i = 0; i < WME_NUM_TID; i++)
1115 		ic->ic_ampdu_rx_stop(ni, &ni->ni_rx_ampdu[i]);
1116 
1117 	ni->ni_htcap = 0;
1118 	ni->ni_flags &= ~IEEE80211_NODE_HT_ALL;
1119 }
1120 
1121 /*
1122  * Age out HT resources for a station.
1123  */
1124 void
1125 ieee80211_ht_node_age(struct ieee80211_node *ni)
1126 {
1127 	struct ieee80211vap *vap = ni->ni_vap;
1128 	uint8_t tid;
1129 
1130 	KASSERT(ni->ni_flags & IEEE80211_NODE_HT, ("not an HT sta"));
1131 
1132 	for (tid = 0; tid < WME_NUM_TID; tid++) {
1133 		struct ieee80211_rx_ampdu *rap;
1134 
1135 		rap = &ni->ni_rx_ampdu[tid];
1136 		if ((rap->rxa_flags & IEEE80211_AGGR_XCHGPEND) == 0)
1137 			continue;
1138 		if (rap->rxa_qframes == 0)
1139 			continue;
1140 		/*
1141 		 * Check for frames sitting too long in the reorder queue.
1142 		 * See above for more details on what's happening here.
1143 		 */
1144 		/* XXX honor batimeout? */
1145 		if (ticks - rap->rxa_age > ieee80211_ampdu_age) {
1146 			/*
1147 			 * Too long since we received the first
1148 			 * frame; flush the reorder buffer.
1149 			 */
1150 			vap->iv_stats.is_ampdu_rx_age += rap->rxa_qframes;
1151 			ampdu_rx_flush(ni, rap);
1152 		}
1153 	}
1154 }
1155 
1156 static struct ieee80211_channel *
1157 findhtchan(struct ieee80211com *ic, struct ieee80211_channel *c, int htflags)
1158 {
1159 	return ieee80211_find_channel(ic, c->ic_freq,
1160 	    (c->ic_flags &~ IEEE80211_CHAN_HT) | htflags);
1161 }
1162 
1163 /*
1164  * Adjust a channel to be HT/non-HT according to the vap's configuration.
1165  */
1166 struct ieee80211_channel *
1167 ieee80211_ht_adjust_channel(struct ieee80211com *ic,
1168 	struct ieee80211_channel *chan, int flags)
1169 {
1170 	struct ieee80211_channel *c;
1171 
1172 	if (flags & IEEE80211_FHT_HT) {
1173 		/* promote to HT if possible */
1174 		if (flags & IEEE80211_FHT_USEHT40) {
1175 			if (!IEEE80211_IS_CHAN_HT40(chan)) {
1176 				/* NB: arbitrarily pick ht40+ over ht40- */
1177 				c = findhtchan(ic, chan, IEEE80211_CHAN_HT40U);
1178 				if (c == NULL)
1179 					c = findhtchan(ic, chan,
1180 						IEEE80211_CHAN_HT40D);
1181 				if (c == NULL)
1182 					c = findhtchan(ic, chan,
1183 						IEEE80211_CHAN_HT20);
1184 				if (c != NULL)
1185 					chan = c;
1186 			}
1187 		} else if (!IEEE80211_IS_CHAN_HT20(chan)) {
1188 			c = findhtchan(ic, chan, IEEE80211_CHAN_HT20);
1189 			if (c != NULL)
1190 				chan = c;
1191 		}
1192 	} else if (IEEE80211_IS_CHAN_HT(chan)) {
1193 		/* demote to legacy, HT use is disabled */
1194 		c = ieee80211_find_channel(ic, chan->ic_freq,
1195 		    chan->ic_flags &~ IEEE80211_CHAN_HT);
1196 		if (c != NULL)
1197 			chan = c;
1198 	}
1199 	return chan;
1200 }
1201 
1202 /*
1203  * Setup HT-specific state for a legacy WDS peer.
1204  */
1205 void
1206 ieee80211_ht_wds_init(struct ieee80211_node *ni)
1207 {
1208 	struct ieee80211vap *vap = ni->ni_vap;
1209 	struct ieee80211_tx_ampdu *tap;
1210 	int tid;
1211 
1212 	KASSERT(vap->iv_flags_ht & IEEE80211_FHT_HT, ("no HT requested"));
1213 
1214 	/* XXX check scan cache in case peer has an ap and we have info */
1215 	/*
1216 	 * If setup with a legacy channel; locate an HT channel.
1217 	 * Otherwise if the inherited channel (from a companion
1218 	 * AP) is suitable use it so we use the same location
1219 	 * for the extension channel).
1220 	 */
1221 	ni->ni_chan = ieee80211_ht_adjust_channel(ni->ni_ic,
1222 	    ni->ni_chan, ieee80211_htchanflags(ni->ni_chan));
1223 
1224 	ni->ni_htcap = 0;
1225 	if (vap->iv_flags_ht & IEEE80211_FHT_SHORTGI20)
1226 		ni->ni_htcap |= IEEE80211_HTCAP_SHORTGI20;
1227 	if (IEEE80211_IS_CHAN_HT40(ni->ni_chan)) {
1228 		ni->ni_htcap |= IEEE80211_HTCAP_CHWIDTH40;
1229 		ni->ni_chw = 40;
1230 		if (IEEE80211_IS_CHAN_HT40U(ni->ni_chan))
1231 			ni->ni_ht2ndchan = IEEE80211_HTINFO_2NDCHAN_ABOVE;
1232 		else if (IEEE80211_IS_CHAN_HT40D(ni->ni_chan))
1233 			ni->ni_ht2ndchan = IEEE80211_HTINFO_2NDCHAN_BELOW;
1234 		if (vap->iv_flags_ht & IEEE80211_FHT_SHORTGI40)
1235 			ni->ni_htcap |= IEEE80211_HTCAP_SHORTGI40;
1236 	} else {
1237 		ni->ni_chw = 20;
1238 		ni->ni_ht2ndchan = IEEE80211_HTINFO_2NDCHAN_NONE;
1239 	}
1240 	ni->ni_htctlchan = ni->ni_chan->ic_ieee;
1241 	if (vap->iv_flags_ht & IEEE80211_FHT_RIFS)
1242 		ni->ni_flags |= IEEE80211_NODE_RIFS;
1243 	/* XXX does it make sense to enable SMPS? */
1244 
1245 	ni->ni_htopmode = 0;		/* XXX need protection state */
1246 	ni->ni_htstbc = 0;		/* XXX need info */
1247 
1248 	for (tid = 0; tid < WME_NUM_TID; tid++) {
1249 		tap = &ni->ni_tx_ampdu[tid];
1250 		tap->txa_tid = tid;
1251 		ieee80211_txampdu_init_pps(tap);
1252 	}
1253 	/* NB: AMPDU tx/rx governed by IEEE80211_FHT_AMPDU_{TX,RX} */
1254 	ni->ni_flags |= IEEE80211_NODE_HT | IEEE80211_NODE_AMPDU;
1255 }
1256 
1257 /*
1258  * Notify hostap vaps of a change in the HTINFO ie.
1259  */
1260 static void
1261 htinfo_notify(struct ieee80211com *ic)
1262 {
1263 	struct ieee80211vap *vap;
1264 	int first = 1;
1265 
1266 	IEEE80211_LOCK_ASSERT(ic);
1267 
1268 	TAILQ_FOREACH(vap, &ic->ic_vaps, iv_next) {
1269 		if (vap->iv_opmode != IEEE80211_M_HOSTAP)
1270 			continue;
1271 		if (vap->iv_state != IEEE80211_S_RUN ||
1272 		    !IEEE80211_IS_CHAN_HT(vap->iv_bss->ni_chan))
1273 			continue;
1274 		if (first) {
1275 			IEEE80211_NOTE(vap,
1276 			    IEEE80211_MSG_ASSOC | IEEE80211_MSG_11N,
1277 			    vap->iv_bss,
1278 			    "HT bss occupancy change: %d sta, %d ht, "
1279 			    "%d ht40%s, HT protmode now 0x%x"
1280 			    , ic->ic_sta_assoc
1281 			    , ic->ic_ht_sta_assoc
1282 			    , ic->ic_ht40_sta_assoc
1283 			    , (ic->ic_flags_ht & IEEE80211_FHT_NONHT_PR) ?
1284 				 ", non-HT sta present" : ""
1285 			    , ic->ic_curhtprotmode);
1286 			first = 0;
1287 		}
1288 		ieee80211_beacon_notify(vap, IEEE80211_BEACON_HTINFO);
1289 	}
1290 }
1291 
1292 /*
1293  * Calculate HT protection mode from current
1294  * state and handle updates.
1295  */
1296 static void
1297 htinfo_update(struct ieee80211com *ic)
1298 {
1299 	uint8_t protmode;
1300 
1301 	if (ic->ic_sta_assoc != ic->ic_ht_sta_assoc) {
1302 		protmode = IEEE80211_HTINFO_OPMODE_MIXED
1303 			 | IEEE80211_HTINFO_NONHT_PRESENT;
1304 	} else if (ic->ic_flags_ht & IEEE80211_FHT_NONHT_PR) {
1305 		protmode = IEEE80211_HTINFO_OPMODE_PROTOPT
1306 			 | IEEE80211_HTINFO_NONHT_PRESENT;
1307 	} else if (ic->ic_bsschan != IEEE80211_CHAN_ANYC &&
1308 	    IEEE80211_IS_CHAN_HT40(ic->ic_bsschan) &&
1309 	    ic->ic_sta_assoc != ic->ic_ht40_sta_assoc) {
1310 		protmode = IEEE80211_HTINFO_OPMODE_HT20PR;
1311 	} else {
1312 		protmode = IEEE80211_HTINFO_OPMODE_PURE;
1313 	}
1314 	if (protmode != ic->ic_curhtprotmode) {
1315 		ic->ic_curhtprotmode = protmode;
1316 		htinfo_notify(ic);
1317 	}
1318 }
1319 
1320 /*
1321  * Handle an HT station joining a BSS.
1322  */
1323 void
1324 ieee80211_ht_node_join(struct ieee80211_node *ni)
1325 {
1326 	struct ieee80211com *ic = ni->ni_ic;
1327 
1328 	IEEE80211_LOCK_ASSERT(ic);
1329 
1330 	if (ni->ni_flags & IEEE80211_NODE_HT) {
1331 		ic->ic_ht_sta_assoc++;
1332 		if (ni->ni_chw == 40)
1333 			ic->ic_ht40_sta_assoc++;
1334 	}
1335 	htinfo_update(ic);
1336 }
1337 
1338 /*
1339  * Handle an HT station leaving a BSS.
1340  */
1341 void
1342 ieee80211_ht_node_leave(struct ieee80211_node *ni)
1343 {
1344 	struct ieee80211com *ic = ni->ni_ic;
1345 
1346 	IEEE80211_LOCK_ASSERT(ic);
1347 
1348 	if (ni->ni_flags & IEEE80211_NODE_HT) {
1349 		ic->ic_ht_sta_assoc--;
1350 		if (ni->ni_chw == 40)
1351 			ic->ic_ht40_sta_assoc--;
1352 	}
1353 	htinfo_update(ic);
1354 }
1355 
1356 /*
1357  * Public version of htinfo_update; used for processing
1358  * beacon frames from overlapping bss.
1359  *
1360  * Caller can specify either IEEE80211_HTINFO_OPMODE_MIXED
1361  * (on receipt of a beacon that advertises MIXED) or
1362  * IEEE80211_HTINFO_OPMODE_PROTOPT (on receipt of a beacon
1363  * from an overlapping legacy bss).  We treat MIXED with
1364  * a higher precedence than PROTOPT (i.e. we will not change
1365  * change PROTOPT -> MIXED; only MIXED -> PROTOPT).  This
1366  * corresponds to how we handle things in htinfo_update.
1367  */
1368 void
1369 ieee80211_htprot_update(struct ieee80211com *ic, int protmode)
1370 {
1371 #define	OPMODE(x)	SM(x, IEEE80211_HTINFO_OPMODE)
1372 	IEEE80211_LOCK(ic);
1373 
1374 	/* track non-HT station presence */
1375 	KASSERT(protmode & IEEE80211_HTINFO_NONHT_PRESENT,
1376 	    ("protmode 0x%x", protmode));
1377 	ic->ic_flags_ht |= IEEE80211_FHT_NONHT_PR;
1378 	ic->ic_lastnonht = ticks;
1379 
1380 	if (protmode != ic->ic_curhtprotmode &&
1381 	    (OPMODE(ic->ic_curhtprotmode) != IEEE80211_HTINFO_OPMODE_MIXED ||
1382 	     OPMODE(protmode) == IEEE80211_HTINFO_OPMODE_PROTOPT)) {
1383 		/* push beacon update */
1384 		ic->ic_curhtprotmode = protmode;
1385 		htinfo_notify(ic);
1386 	}
1387 	IEEE80211_UNLOCK(ic);
1388 #undef OPMODE
1389 }
1390 
1391 /*
1392  * Time out presence of an overlapping bss with non-HT
1393  * stations.  When operating in hostap mode we listen for
1394  * beacons from other stations and if we identify a non-HT
1395  * station is present we update the opmode field of the
1396  * HTINFO ie.  To identify when all non-HT stations are
1397  * gone we time out this condition.
1398  */
1399 void
1400 ieee80211_ht_timeout(struct ieee80211com *ic)
1401 {
1402 	IEEE80211_LOCK_ASSERT(ic);
1403 
1404 	if ((ic->ic_flags_ht & IEEE80211_FHT_NONHT_PR) &&
1405 	    ieee80211_time_after(ticks, ic->ic_lastnonht + IEEE80211_NONHT_PRESENT_AGE)) {
1406 #if 0
1407 		IEEE80211_NOTE(vap, IEEE80211_MSG_11N, ni,
1408 		    "%s", "time out non-HT STA present on channel");
1409 #endif
1410 		ic->ic_flags_ht &= ~IEEE80211_FHT_NONHT_PR;
1411 		htinfo_update(ic);
1412 	}
1413 }
1414 
1415 /*
1416  * Process an 802.11n HT capabilities ie.
1417  */
1418 void
1419 ieee80211_parse_htcap(struct ieee80211_node *ni, const uint8_t *ie)
1420 {
1421 	if (ie[0] == IEEE80211_ELEMID_VENDOR) {
1422 		/*
1423 		 * Station used Vendor OUI ie to associate;
1424 		 * mark the node so when we respond we'll use
1425 		 * the Vendor OUI's and not the standard ie's.
1426 		 */
1427 		ni->ni_flags |= IEEE80211_NODE_HTCOMPAT;
1428 		ie += 4;
1429 	} else
1430 		ni->ni_flags &= ~IEEE80211_NODE_HTCOMPAT;
1431 
1432 	ni->ni_htcap = le16dec(ie +
1433 		__offsetof(struct ieee80211_ie_htcap, hc_cap));
1434 	ni->ni_htparam = ie[__offsetof(struct ieee80211_ie_htcap, hc_param)];
1435 }
1436 
1437 static void
1438 htinfo_parse(struct ieee80211_node *ni,
1439 	const struct ieee80211_ie_htinfo *htinfo)
1440 {
1441 	uint16_t w;
1442 
1443 	ni->ni_htctlchan = htinfo->hi_ctrlchannel;
1444 	ni->ni_ht2ndchan = SM(htinfo->hi_byte1, IEEE80211_HTINFO_2NDCHAN);
1445 	w = le16dec(&htinfo->hi_byte2);
1446 	ni->ni_htopmode = SM(w, IEEE80211_HTINFO_OPMODE);
1447 	w = le16dec(&htinfo->hi_byte45);
1448 	ni->ni_htstbc = SM(w, IEEE80211_HTINFO_BASIC_STBCMCS);
1449 }
1450 
1451 /*
1452  * Parse an 802.11n HT info ie and save useful information
1453  * to the node state.  Note this does not effect any state
1454  * changes such as for channel width change.
1455  */
1456 void
1457 ieee80211_parse_htinfo(struct ieee80211_node *ni, const uint8_t *ie)
1458 {
1459 	if (ie[0] == IEEE80211_ELEMID_VENDOR)
1460 		ie += 4;
1461 	htinfo_parse(ni, (const struct ieee80211_ie_htinfo *) ie);
1462 }
1463 
1464 /*
1465  * Handle 11n channel switch.  Use the received HT ie's to
1466  * identify the right channel to use.  If we cannot locate it
1467  * in the channel table then fallback to legacy operation.
1468  * Note that we use this information to identify the node's
1469  * channel only; the caller is responsible for insuring any
1470  * required channel change is done (e.g. in sta mode when
1471  * parsing the contents of a beacon frame).
1472  */
1473 static int
1474 htinfo_update_chw(struct ieee80211_node *ni, int htflags)
1475 {
1476 	struct ieee80211com *ic = ni->ni_ic;
1477 	struct ieee80211_channel *c;
1478 	int chanflags;
1479 	int ret = 0;
1480 
1481 	chanflags = (ni->ni_chan->ic_flags &~ IEEE80211_CHAN_HT) | htflags;
1482 	if (chanflags != ni->ni_chan->ic_flags) {
1483 		/* XXX not right for ht40- */
1484 		c = ieee80211_find_channel(ic, ni->ni_chan->ic_freq, chanflags);
1485 		if (c == NULL && (htflags & IEEE80211_CHAN_HT40)) {
1486 			/*
1487 			 * No HT40 channel entry in our table; fall back
1488 			 * to HT20 operation.  This should not happen.
1489 			 */
1490 			c = findhtchan(ic, ni->ni_chan, IEEE80211_CHAN_HT20);
1491 #if 0
1492 			IEEE80211_NOTE(ni->ni_vap,
1493 			    IEEE80211_MSG_ASSOC | IEEE80211_MSG_11N, ni,
1494 			    "no HT40 channel (freq %u), falling back to HT20",
1495 			    ni->ni_chan->ic_freq);
1496 #endif
1497 			/* XXX stat */
1498 		}
1499 		if (c != NULL && c != ni->ni_chan) {
1500 			IEEE80211_NOTE(ni->ni_vap,
1501 			    IEEE80211_MSG_ASSOC | IEEE80211_MSG_11N, ni,
1502 			    "switch station to HT%d channel %u/0x%x",
1503 			    IEEE80211_IS_CHAN_HT40(c) ? 40 : 20,
1504 			    c->ic_freq, c->ic_flags);
1505 			ni->ni_chan = c;
1506 			ret = 1;
1507 		}
1508 		/* NB: caller responsible for forcing any channel change */
1509 	}
1510 	/* update node's tx channel width */
1511 	ni->ni_chw = IEEE80211_IS_CHAN_HT40(ni->ni_chan)? 40 : 20;
1512 	return (ret);
1513 }
1514 
1515 /*
1516  * Update 11n MIMO PS state according to received htcap.
1517  */
1518 static __inline int
1519 htcap_update_mimo_ps(struct ieee80211_node *ni)
1520 {
1521 	uint16_t oflags = ni->ni_flags;
1522 
1523 	switch (ni->ni_htcap & IEEE80211_HTCAP_SMPS) {
1524 	case IEEE80211_HTCAP_SMPS_DYNAMIC:
1525 		ni->ni_flags |= IEEE80211_NODE_MIMO_PS;
1526 		ni->ni_flags |= IEEE80211_NODE_MIMO_RTS;
1527 		break;
1528 	case IEEE80211_HTCAP_SMPS_ENA:
1529 		ni->ni_flags |= IEEE80211_NODE_MIMO_PS;
1530 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_RTS;
1531 		break;
1532 	case IEEE80211_HTCAP_SMPS_OFF:
1533 	default:		/* disable on rx of reserved value */
1534 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_PS;
1535 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_RTS;
1536 		break;
1537 	}
1538 	return (oflags ^ ni->ni_flags);
1539 }
1540 
1541 /*
1542  * Update short GI state according to received htcap
1543  * and local settings.
1544  */
1545 static __inline void
1546 htcap_update_shortgi(struct ieee80211_node *ni)
1547 {
1548 	struct ieee80211vap *vap = ni->ni_vap;
1549 
1550 	ni->ni_flags &= ~(IEEE80211_NODE_SGI20|IEEE80211_NODE_SGI40);
1551 	if ((ni->ni_htcap & IEEE80211_HTCAP_SHORTGI20) &&
1552 	    (vap->iv_flags_ht & IEEE80211_FHT_SHORTGI20))
1553 		ni->ni_flags |= IEEE80211_NODE_SGI20;
1554 	if ((ni->ni_htcap & IEEE80211_HTCAP_SHORTGI40) &&
1555 	    (vap->iv_flags_ht & IEEE80211_FHT_SHORTGI40))
1556 		ni->ni_flags |= IEEE80211_NODE_SGI40;
1557 }
1558 
1559 /*
1560  * Parse and update HT-related state extracted from
1561  * the HT cap and info ie's.
1562  */
1563 int
1564 ieee80211_ht_updateparams(struct ieee80211_node *ni,
1565 	const uint8_t *htcapie, const uint8_t *htinfoie)
1566 {
1567 	struct ieee80211vap *vap = ni->ni_vap;
1568 	const struct ieee80211_ie_htinfo *htinfo;
1569 	int htflags;
1570 	int ret = 0;
1571 
1572 	ieee80211_parse_htcap(ni, htcapie);
1573 	if (vap->iv_htcaps & IEEE80211_HTCAP_SMPS)
1574 		htcap_update_mimo_ps(ni);
1575 	htcap_update_shortgi(ni);
1576 
1577 	if (htinfoie[0] == IEEE80211_ELEMID_VENDOR)
1578 		htinfoie += 4;
1579 	htinfo = (const struct ieee80211_ie_htinfo *) htinfoie;
1580 	htinfo_parse(ni, htinfo);
1581 
1582 	htflags = (vap->iv_flags_ht & IEEE80211_FHT_HT) ?
1583 	    IEEE80211_CHAN_HT20 : 0;
1584 	/* NB: honor operating mode constraint */
1585 	if ((htinfo->hi_byte1 & IEEE80211_HTINFO_TXWIDTH_2040) &&
1586 	    (vap->iv_flags_ht & IEEE80211_FHT_USEHT40)) {
1587 		if (ni->ni_ht2ndchan == IEEE80211_HTINFO_2NDCHAN_ABOVE)
1588 			htflags = IEEE80211_CHAN_HT40U;
1589 		else if (ni->ni_ht2ndchan == IEEE80211_HTINFO_2NDCHAN_BELOW)
1590 			htflags = IEEE80211_CHAN_HT40D;
1591 	}
1592 	if (htinfo_update_chw(ni, htflags))
1593 		ret = 1;
1594 
1595 	if ((htinfo->hi_byte1 & IEEE80211_HTINFO_RIFSMODE_PERM) &&
1596 	    (vap->iv_flags_ht & IEEE80211_FHT_RIFS))
1597 		ni->ni_flags |= IEEE80211_NODE_RIFS;
1598 	else
1599 		ni->ni_flags &= ~IEEE80211_NODE_RIFS;
1600 
1601 	return (ret);
1602 }
1603 
1604 /*
1605  * Parse and update HT-related state extracted from the HT cap ie
1606  * for a station joining an HT BSS.
1607  */
1608 void
1609 ieee80211_ht_updatehtcap(struct ieee80211_node *ni, const uint8_t *htcapie)
1610 {
1611 	struct ieee80211vap *vap = ni->ni_vap;
1612 	int htflags;
1613 
1614 	ieee80211_parse_htcap(ni, htcapie);
1615 	if (vap->iv_htcaps & IEEE80211_HTCAP_SMPS)
1616 		htcap_update_mimo_ps(ni);
1617 	htcap_update_shortgi(ni);
1618 
1619 	/* NB: honor operating mode constraint */
1620 	/* XXX 40 MHz intolerant */
1621 	htflags = (vap->iv_flags_ht & IEEE80211_FHT_HT) ?
1622 	    IEEE80211_CHAN_HT20 : 0;
1623 	if ((ni->ni_htcap & IEEE80211_HTCAP_CHWIDTH40) &&
1624 	    (vap->iv_flags_ht & IEEE80211_FHT_USEHT40)) {
1625 		if (IEEE80211_IS_CHAN_HT40U(vap->iv_bss->ni_chan))
1626 			htflags = IEEE80211_CHAN_HT40U;
1627 		else if (IEEE80211_IS_CHAN_HT40D(vap->iv_bss->ni_chan))
1628 			htflags = IEEE80211_CHAN_HT40D;
1629 	}
1630 	(void) htinfo_update_chw(ni, htflags);
1631 }
1632 
1633 /*
1634  * Install received HT rate set by parsing the HT cap ie.
1635  */
1636 int
1637 ieee80211_setup_htrates(struct ieee80211_node *ni, const uint8_t *ie, int flags)
1638 {
1639 	struct ieee80211com *ic = ni->ni_ic;
1640 	struct ieee80211vap *vap = ni->ni_vap;
1641 	const struct ieee80211_ie_htcap *htcap;
1642 	struct ieee80211_htrateset *rs;
1643 	int i, maxequalmcs, maxunequalmcs;
1644 
1645 	maxequalmcs = ic->ic_txstream * 8 - 1;
1646 	maxunequalmcs = 0;
1647 	if (ic->ic_htcaps & IEEE80211_HTC_TXUNEQUAL) {
1648 		if (ic->ic_txstream >= 2)
1649 			maxunequalmcs = 38;
1650 		if (ic->ic_txstream >= 3)
1651 			maxunequalmcs = 52;
1652 		if (ic->ic_txstream >= 4)
1653 			maxunequalmcs = 76;
1654 	}
1655 
1656 	rs = &ni->ni_htrates;
1657 	memset(rs, 0, sizeof(*rs));
1658 	if (ie != NULL) {
1659 		if (ie[0] == IEEE80211_ELEMID_VENDOR)
1660 			ie += 4;
1661 		htcap = (const struct ieee80211_ie_htcap *) ie;
1662 		for (i = 0; i < IEEE80211_HTRATE_MAXSIZE; i++) {
1663 			if (isclr(htcap->hc_mcsset, i))
1664 				continue;
1665 			if (rs->rs_nrates == IEEE80211_HTRATE_MAXSIZE) {
1666 				IEEE80211_NOTE(vap,
1667 				    IEEE80211_MSG_XRATE | IEEE80211_MSG_11N, ni,
1668 				    "WARNING, HT rate set too large; only "
1669 				    "using %u rates", IEEE80211_HTRATE_MAXSIZE);
1670 				vap->iv_stats.is_rx_rstoobig++;
1671 				break;
1672 			}
1673 			if (i <= 31 && i > maxequalmcs)
1674 				continue;
1675 			if (i == 32 &&
1676 			    (ic->ic_htcaps & IEEE80211_HTC_TXMCS32) == 0)
1677 				continue;
1678 			if (i > 32 && i > maxunequalmcs)
1679 				continue;
1680 			rs->rs_rates[rs->rs_nrates++] = i;
1681 		}
1682 	}
1683 	return ieee80211_fix_rate(ni, (struct ieee80211_rateset *) rs, flags);
1684 }
1685 
1686 /*
1687  * Mark rates in a node's HT rate set as basic according
1688  * to the information in the supplied HT info ie.
1689  */
1690 void
1691 ieee80211_setup_basic_htrates(struct ieee80211_node *ni, const uint8_t *ie)
1692 {
1693 	const struct ieee80211_ie_htinfo *htinfo;
1694 	struct ieee80211_htrateset *rs;
1695 	int i, j;
1696 
1697 	if (ie[0] == IEEE80211_ELEMID_VENDOR)
1698 		ie += 4;
1699 	htinfo = (const struct ieee80211_ie_htinfo *) ie;
1700 	rs = &ni->ni_htrates;
1701 	if (rs->rs_nrates == 0) {
1702 		IEEE80211_NOTE(ni->ni_vap,
1703 		    IEEE80211_MSG_XRATE | IEEE80211_MSG_11N, ni,
1704 		    "%s", "WARNING, empty HT rate set");
1705 		return;
1706 	}
1707 	for (i = 0; i < IEEE80211_HTRATE_MAXSIZE; i++) {
1708 		if (isclr(htinfo->hi_basicmcsset, i))
1709 			continue;
1710 		for (j = 0; j < rs->rs_nrates; j++)
1711 			if ((rs->rs_rates[j] & IEEE80211_RATE_VAL) == i)
1712 				rs->rs_rates[j] |= IEEE80211_RATE_BASIC;
1713 	}
1714 }
1715 
1716 static void
1717 ampdu_tx_setup(struct ieee80211_tx_ampdu *tap)
1718 {
1719 	callout_init(&tap->txa_timer, 1);
1720 	tap->txa_flags |= IEEE80211_AGGR_SETUP;
1721 	tap->txa_lastsample = ticks;
1722 }
1723 
1724 static void
1725 ampdu_tx_stop(struct ieee80211_tx_ampdu *tap)
1726 {
1727 	struct ieee80211_node *ni = tap->txa_ni;
1728 	struct ieee80211com *ic = ni->ni_ic;
1729 
1730 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
1731 	    tap->txa_ni,
1732 	    "%s: called",
1733 	    __func__);
1734 
1735 	KASSERT(tap->txa_flags & IEEE80211_AGGR_SETUP,
1736 	    ("txa_flags 0x%x tid %d ac %d", tap->txa_flags, tap->txa_tid,
1737 	    TID_TO_WME_AC(tap->txa_tid)));
1738 
1739 	/*
1740 	 * Stop BA stream if setup so driver has a chance
1741 	 * to reclaim any resources it might have allocated.
1742 	 */
1743 	ic->ic_addba_stop(ni, tap);
1744 	/*
1745 	 * Stop any pending BAR transmit.
1746 	 */
1747 	bar_stop_timer(tap);
1748 
1749 	/*
1750 	 * Reset packet estimate.
1751 	 */
1752 	ieee80211_txampdu_init_pps(tap);
1753 
1754 	/* NB: clearing NAK means we may re-send ADDBA */
1755 	tap->txa_flags &= ~(IEEE80211_AGGR_SETUP | IEEE80211_AGGR_NAK);
1756 }
1757 
1758 /*
1759  * ADDBA response timeout.
1760  *
1761  * If software aggregation and per-TID queue management was done here,
1762  * that queue would be unpaused after the ADDBA timeout occurs.
1763  */
1764 static void
1765 addba_timeout(void *arg)
1766 {
1767 	struct ieee80211_tx_ampdu *tap = arg;
1768 	struct ieee80211_node *ni = tap->txa_ni;
1769 	struct ieee80211com *ic = ni->ni_ic;
1770 
1771 	/* XXX ? */
1772 	tap->txa_flags &= ~IEEE80211_AGGR_XCHGPEND;
1773 	tap->txa_attempts++;
1774 	ic->ic_addba_response_timeout(ni, tap);
1775 }
1776 
1777 static void
1778 addba_start_timeout(struct ieee80211_tx_ampdu *tap)
1779 {
1780 	/* XXX use CALLOUT_PENDING instead? */
1781 	callout_reset(&tap->txa_timer, ieee80211_addba_timeout,
1782 	    addba_timeout, tap);
1783 	tap->txa_flags |= IEEE80211_AGGR_XCHGPEND;
1784 	tap->txa_nextrequest = ticks + ieee80211_addba_timeout;
1785 }
1786 
1787 static void
1788 addba_stop_timeout(struct ieee80211_tx_ampdu *tap)
1789 {
1790 	/* XXX use CALLOUT_PENDING instead? */
1791 	if (tap->txa_flags & IEEE80211_AGGR_XCHGPEND) {
1792 		callout_stop(&tap->txa_timer);
1793 		tap->txa_flags &= ~IEEE80211_AGGR_XCHGPEND;
1794 	}
1795 }
1796 
1797 static void
1798 null_addba_response_timeout(struct ieee80211_node *ni,
1799     struct ieee80211_tx_ampdu *tap)
1800 {
1801 }
1802 
1803 /*
1804  * Default method for requesting A-MPDU tx aggregation.
1805  * We setup the specified state block and start a timer
1806  * to wait for an ADDBA response frame.
1807  */
1808 static int
1809 ieee80211_addba_request(struct ieee80211_node *ni,
1810 	struct ieee80211_tx_ampdu *tap,
1811 	int dialogtoken, int baparamset, int batimeout)
1812 {
1813 	int bufsiz;
1814 
1815 	/* XXX locking */
1816 	tap->txa_token = dialogtoken;
1817 	tap->txa_flags |= IEEE80211_AGGR_IMMEDIATE;
1818 	bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
1819 	tap->txa_wnd = (bufsiz == 0) ?
1820 	    IEEE80211_AGGR_BAWMAX : min(bufsiz, IEEE80211_AGGR_BAWMAX);
1821 	addba_start_timeout(tap);
1822 	return 1;
1823 }
1824 
1825 /*
1826  * Called by drivers that wish to request an ADDBA session be
1827  * setup.  This brings it up and starts the request timer.
1828  */
1829 int
1830 ieee80211_ampdu_tx_request_ext(struct ieee80211_node *ni, int tid)
1831 {
1832 	struct ieee80211_tx_ampdu *tap;
1833 
1834 	if (tid < 0 || tid > 15)
1835 		return (0);
1836 	tap = &ni->ni_tx_ampdu[tid];
1837 
1838 	/* XXX locking */
1839 	if ((tap->txa_flags & IEEE80211_AGGR_SETUP) == 0) {
1840 		/* do deferred setup of state */
1841 		ampdu_tx_setup(tap);
1842 	}
1843 	/* XXX hack for not doing proper locking */
1844 	tap->txa_flags &= ~IEEE80211_AGGR_NAK;
1845 	addba_start_timeout(tap);
1846 	return (1);
1847 }
1848 
1849 /*
1850  * Called by drivers that have marked a session as active.
1851  */
1852 int
1853 ieee80211_ampdu_tx_request_active_ext(struct ieee80211_node *ni, int tid,
1854     int status)
1855 {
1856 	struct ieee80211_tx_ampdu *tap;
1857 
1858 	if (tid < 0 || tid > 15)
1859 		return (0);
1860 	tap = &ni->ni_tx_ampdu[tid];
1861 
1862 	/* XXX locking */
1863 	addba_stop_timeout(tap);
1864 	if (status == 1) {
1865 		tap->txa_flags |= IEEE80211_AGGR_RUNNING;
1866 		tap->txa_attempts = 0;
1867 	} else {
1868 		/* mark tid so we don't try again */
1869 		tap->txa_flags |= IEEE80211_AGGR_NAK;
1870 	}
1871 	return (1);
1872 }
1873 
1874 /*
1875  * Default method for processing an A-MPDU tx aggregation
1876  * response.  We shutdown any pending timer and update the
1877  * state block according to the reply.
1878  */
1879 static int
1880 ieee80211_addba_response(struct ieee80211_node *ni,
1881 	struct ieee80211_tx_ampdu *tap,
1882 	int status, int baparamset, int batimeout)
1883 {
1884 	int bufsiz, tid;
1885 
1886 	/* XXX locking */
1887 	addba_stop_timeout(tap);
1888 	if (status == IEEE80211_STATUS_SUCCESS) {
1889 		bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
1890 		/* XXX override our request? */
1891 		tap->txa_wnd = (bufsiz == 0) ?
1892 		    IEEE80211_AGGR_BAWMAX : min(bufsiz, IEEE80211_AGGR_BAWMAX);
1893 		/* XXX AC/TID */
1894 		tid = MS(baparamset, IEEE80211_BAPS_TID);
1895 		tap->txa_flags |= IEEE80211_AGGR_RUNNING;
1896 		tap->txa_attempts = 0;
1897 	} else {
1898 		/* mark tid so we don't try again */
1899 		tap->txa_flags |= IEEE80211_AGGR_NAK;
1900 	}
1901 	return 1;
1902 }
1903 
1904 /*
1905  * Default method for stopping A-MPDU tx aggregation.
1906  * Any timer is cleared and we drain any pending frames.
1907  */
1908 static void
1909 ieee80211_addba_stop(struct ieee80211_node *ni, struct ieee80211_tx_ampdu *tap)
1910 {
1911 	/* XXX locking */
1912 	addba_stop_timeout(tap);
1913 	if (tap->txa_flags & IEEE80211_AGGR_RUNNING) {
1914 		/* XXX clear aggregation queue */
1915 		tap->txa_flags &= ~IEEE80211_AGGR_RUNNING;
1916 	}
1917 	tap->txa_attempts = 0;
1918 }
1919 
1920 /*
1921  * Process a received action frame using the default aggregation
1922  * policy.  We intercept ADDBA-related frames and use them to
1923  * update our aggregation state.  All other frames are passed up
1924  * for processing by ieee80211_recv_action.
1925  */
1926 static int
1927 ht_recv_action_ba_addba_request(struct ieee80211_node *ni,
1928 	const struct ieee80211_frame *wh,
1929 	const uint8_t *frm, const uint8_t *efrm)
1930 {
1931 	struct ieee80211com *ic = ni->ni_ic;
1932 	struct ieee80211vap *vap = ni->ni_vap;
1933 	struct ieee80211_rx_ampdu *rap;
1934 	uint8_t dialogtoken;
1935 	uint16_t baparamset, batimeout, baseqctl;
1936 	uint16_t args[5];
1937 	int tid;
1938 
1939 	dialogtoken = frm[2];
1940 	baparamset = le16dec(frm+3);
1941 	batimeout = le16dec(frm+5);
1942 	baseqctl = le16dec(frm+7);
1943 
1944 	tid = MS(baparamset, IEEE80211_BAPS_TID);
1945 
1946 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
1947 	    "recv ADDBA request: dialogtoken %u baparamset 0x%x "
1948 	    "(tid %d bufsiz %d) batimeout %d baseqctl %d:%d",
1949 	    dialogtoken, baparamset,
1950 	    tid, MS(baparamset, IEEE80211_BAPS_BUFSIZ),
1951 	    batimeout,
1952 	    MS(baseqctl, IEEE80211_BASEQ_START),
1953 	    MS(baseqctl, IEEE80211_BASEQ_FRAG));
1954 
1955 	rap = &ni->ni_rx_ampdu[tid];
1956 
1957 	/* Send ADDBA response */
1958 	args[0] = dialogtoken;
1959 	/*
1960 	 * NB: We ack only if the sta associated with HT and
1961 	 * the ap is configured to do AMPDU rx (the latter
1962 	 * violates the 11n spec and is mostly for testing).
1963 	 */
1964 	if ((ni->ni_flags & IEEE80211_NODE_AMPDU_RX) &&
1965 	    (vap->iv_flags_ht & IEEE80211_FHT_AMPDU_RX)) {
1966 		/* XXX handle ampdu_rx_start failure */
1967 		ic->ic_ampdu_rx_start(ni, rap,
1968 		    baparamset, batimeout, baseqctl);
1969 
1970 		args[1] = IEEE80211_STATUS_SUCCESS;
1971 	} else {
1972 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
1973 		    ni, "reject ADDBA request: %s",
1974 		    ni->ni_flags & IEEE80211_NODE_AMPDU_RX ?
1975 		       "administratively disabled" :
1976 		       "not negotiated for station");
1977 		vap->iv_stats.is_addba_reject++;
1978 		args[1] = IEEE80211_STATUS_UNSPECIFIED;
1979 	}
1980 	/* XXX honor rap flags? */
1981 	args[2] = IEEE80211_BAPS_POLICY_IMMEDIATE
1982 		| SM(tid, IEEE80211_BAPS_TID)
1983 		| SM(rap->rxa_wnd, IEEE80211_BAPS_BUFSIZ)
1984 		;
1985 	args[3] = 0;
1986 	args[4] = 0;
1987 	ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
1988 		IEEE80211_ACTION_BA_ADDBA_RESPONSE, args);
1989 	return 0;
1990 }
1991 
1992 static int
1993 ht_recv_action_ba_addba_response(struct ieee80211_node *ni,
1994 	const struct ieee80211_frame *wh,
1995 	const uint8_t *frm, const uint8_t *efrm)
1996 {
1997 	struct ieee80211com *ic = ni->ni_ic;
1998 	struct ieee80211vap *vap = ni->ni_vap;
1999 	struct ieee80211_tx_ampdu *tap;
2000 	uint8_t dialogtoken, policy;
2001 	uint16_t baparamset, batimeout, code;
2002 	int tid, bufsiz;
2003 
2004 	dialogtoken = frm[2];
2005 	code = le16dec(frm+3);
2006 	baparamset = le16dec(frm+5);
2007 	tid = MS(baparamset, IEEE80211_BAPS_TID);
2008 	bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
2009 	policy = MS(baparamset, IEEE80211_BAPS_POLICY);
2010 	batimeout = le16dec(frm+7);
2011 
2012 	tap = &ni->ni_tx_ampdu[tid];
2013 	if ((tap->txa_flags & IEEE80211_AGGR_XCHGPEND) == 0) {
2014 		IEEE80211_DISCARD_MAC(vap,
2015 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2016 		    ni->ni_macaddr, "ADDBA response",
2017 		    "no pending ADDBA, tid %d dialogtoken %u "
2018 		    "code %d", tid, dialogtoken, code);
2019 		vap->iv_stats.is_addba_norequest++;
2020 		return 0;
2021 	}
2022 	if (dialogtoken != tap->txa_token) {
2023 		IEEE80211_DISCARD_MAC(vap,
2024 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2025 		    ni->ni_macaddr, "ADDBA response",
2026 		    "dialogtoken mismatch: waiting for %d, "
2027 		    "received %d, tid %d code %d",
2028 		    tap->txa_token, dialogtoken, tid, code);
2029 		vap->iv_stats.is_addba_badtoken++;
2030 		return 0;
2031 	}
2032 	/* NB: assumes IEEE80211_AGGR_IMMEDIATE is 1 */
2033 	if (policy != (tap->txa_flags & IEEE80211_AGGR_IMMEDIATE)) {
2034 		IEEE80211_DISCARD_MAC(vap,
2035 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2036 		    ni->ni_macaddr, "ADDBA response",
2037 		    "policy mismatch: expecting %s, "
2038 		    "received %s, tid %d code %d",
2039 		    tap->txa_flags & IEEE80211_AGGR_IMMEDIATE,
2040 		    policy, tid, code);
2041 		vap->iv_stats.is_addba_badpolicy++;
2042 		return 0;
2043 	}
2044 #if 0
2045 	/* XXX we take MIN in ieee80211_addba_response */
2046 	if (bufsiz > IEEE80211_AGGR_BAWMAX) {
2047 		IEEE80211_DISCARD_MAC(vap,
2048 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2049 		    ni->ni_macaddr, "ADDBA response",
2050 		    "BA window too large: max %d, "
2051 		    "received %d, tid %d code %d",
2052 		    bufsiz, IEEE80211_AGGR_BAWMAX, tid, code);
2053 		vap->iv_stats.is_addba_badbawinsize++;
2054 		return 0;
2055 	}
2056 #endif
2057 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2058 	    "recv ADDBA response: dialogtoken %u code %d "
2059 	    "baparamset 0x%x (tid %d bufsiz %d) batimeout %d",
2060 	    dialogtoken, code, baparamset, tid, bufsiz,
2061 	    batimeout);
2062 	ic->ic_addba_response(ni, tap, code, baparamset, batimeout);
2063 	return 0;
2064 }
2065 
2066 static int
2067 ht_recv_action_ba_delba(struct ieee80211_node *ni,
2068 	const struct ieee80211_frame *wh,
2069 	const uint8_t *frm, const uint8_t *efrm)
2070 {
2071 	struct ieee80211com *ic = ni->ni_ic;
2072 	struct ieee80211_rx_ampdu *rap;
2073 	struct ieee80211_tx_ampdu *tap;
2074 	uint16_t baparamset, code;
2075 	int tid;
2076 
2077 	baparamset = le16dec(frm+2);
2078 	code = le16dec(frm+4);
2079 
2080 	tid = MS(baparamset, IEEE80211_DELBAPS_TID);
2081 
2082 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2083 	    "recv DELBA: baparamset 0x%x (tid %d initiator %d) "
2084 	    "code %d", baparamset, tid,
2085 	    MS(baparamset, IEEE80211_DELBAPS_INIT), code);
2086 
2087 	if ((baparamset & IEEE80211_DELBAPS_INIT) == 0) {
2088 		tap = &ni->ni_tx_ampdu[tid];
2089 		ic->ic_addba_stop(ni, tap);
2090 	} else {
2091 		rap = &ni->ni_rx_ampdu[tid];
2092 		ic->ic_ampdu_rx_stop(ni, rap);
2093 	}
2094 	return 0;
2095 }
2096 
2097 static int
2098 ht_recv_action_ht_txchwidth(struct ieee80211_node *ni,
2099 	const struct ieee80211_frame *wh,
2100 	const uint8_t *frm, const uint8_t *efrm)
2101 {
2102 	int chw;
2103 
2104 	chw = (frm[2] == IEEE80211_A_HT_TXCHWIDTH_2040) ? 40 : 20;
2105 
2106 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2107 	    "%s: HT txchwidth, width %d%s",
2108 	    __func__, chw, ni->ni_chw != chw ? "*" : "");
2109 	if (chw != ni->ni_chw) {
2110 		ni->ni_chw = chw;
2111 		/* XXX notify on change */
2112 	}
2113 	return 0;
2114 }
2115 
2116 static int
2117 ht_recv_action_ht_mimopwrsave(struct ieee80211_node *ni,
2118 	const struct ieee80211_frame *wh,
2119 	const uint8_t *frm, const uint8_t *efrm)
2120 {
2121 	const struct ieee80211_action_ht_mimopowersave *mps =
2122 	    (const struct ieee80211_action_ht_mimopowersave *) frm;
2123 
2124 	/* XXX check iv_htcaps */
2125 	if (mps->am_control & IEEE80211_A_HT_MIMOPWRSAVE_ENA)
2126 		ni->ni_flags |= IEEE80211_NODE_MIMO_PS;
2127 	else
2128 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_PS;
2129 	if (mps->am_control & IEEE80211_A_HT_MIMOPWRSAVE_MODE)
2130 		ni->ni_flags |= IEEE80211_NODE_MIMO_RTS;
2131 	else
2132 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_RTS;
2133 	/* XXX notify on change */
2134 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2135 	    "%s: HT MIMO PS (%s%s)", __func__,
2136 	    (ni->ni_flags & IEEE80211_NODE_MIMO_PS) ?  "on" : "off",
2137 	    (ni->ni_flags & IEEE80211_NODE_MIMO_RTS) ?  "+rts" : ""
2138 	);
2139 	return 0;
2140 }
2141 
2142 /*
2143  * Transmit processing.
2144  */
2145 
2146 /*
2147  * Check if A-MPDU should be requested/enabled for a stream.
2148  * We require a traffic rate above a per-AC threshold and we
2149  * also handle backoff from previous failed attempts.
2150  *
2151  * Drivers may override this method to bring in information
2152  * such as link state conditions in making the decision.
2153  */
2154 static int
2155 ieee80211_ampdu_enable(struct ieee80211_node *ni,
2156 	struct ieee80211_tx_ampdu *tap)
2157 {
2158 	struct ieee80211vap *vap = ni->ni_vap;
2159 
2160 	if (tap->txa_avgpps <
2161 	    vap->iv_ampdu_mintraffic[TID_TO_WME_AC(tap->txa_tid)])
2162 		return 0;
2163 	/* XXX check rssi? */
2164 	if (tap->txa_attempts >= ieee80211_addba_maxtries &&
2165 	    ieee80211_time_after(ticks, tap->txa_nextrequest)) {
2166 		/*
2167 		 * Don't retry too often; txa_nextrequest is set
2168 		 * to the minimum interval we'll retry after
2169 		 * ieee80211_addba_maxtries failed attempts are made.
2170 		 */
2171 		return 0;
2172 	}
2173 	IEEE80211_NOTE(vap, IEEE80211_MSG_11N, ni,
2174 	    "enable AMPDU on tid %d (%s), avgpps %d pkts %d attempt %d",
2175 	    tap->txa_tid, ieee80211_wme_acnames[TID_TO_WME_AC(tap->txa_tid)],
2176 	    tap->txa_avgpps, tap->txa_pkts, tap->txa_attempts);
2177 	return 1;
2178 }
2179 
2180 /*
2181  * Request A-MPDU tx aggregation.  Setup local state and
2182  * issue an ADDBA request.  BA use will only happen after
2183  * the other end replies with ADDBA response.
2184  */
2185 int
2186 ieee80211_ampdu_request(struct ieee80211_node *ni,
2187 	struct ieee80211_tx_ampdu *tap)
2188 {
2189 	struct ieee80211com *ic = ni->ni_ic;
2190 	uint16_t args[5];
2191 	int tid, dialogtoken;
2192 	static int tokens = 0;	/* XXX */
2193 
2194 	/* XXX locking */
2195 	if ((tap->txa_flags & IEEE80211_AGGR_SETUP) == 0) {
2196 		/* do deferred setup of state */
2197 		ampdu_tx_setup(tap);
2198 	}
2199 	/* XXX hack for not doing proper locking */
2200 	tap->txa_flags &= ~IEEE80211_AGGR_NAK;
2201 
2202 	dialogtoken = (tokens+1) % 63;		/* XXX */
2203 	tid = tap->txa_tid;
2204 	tap->txa_start = ni->ni_txseqs[tid];
2205 
2206 	args[0] = dialogtoken;
2207 	args[1] = 0;	/* NB: status code not used */
2208 	args[2]	= IEEE80211_BAPS_POLICY_IMMEDIATE
2209 		| SM(tid, IEEE80211_BAPS_TID)
2210 		| SM(IEEE80211_AGGR_BAWMAX, IEEE80211_BAPS_BUFSIZ)
2211 		;
2212 	args[3] = 0;	/* batimeout */
2213 	/* NB: do first so there's no race against reply */
2214 	if (!ic->ic_addba_request(ni, tap, dialogtoken, args[2], args[3])) {
2215 		/* unable to setup state, don't make request */
2216 		IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2217 		    ni, "%s: could not setup BA stream for TID %d AC %d",
2218 		    __func__, tap->txa_tid, TID_TO_WME_AC(tap->txa_tid));
2219 		/* defer next try so we don't slam the driver with requests */
2220 		tap->txa_attempts = ieee80211_addba_maxtries;
2221 		/* NB: check in case driver wants to override */
2222 		if (tap->txa_nextrequest <= ticks)
2223 			tap->txa_nextrequest = ticks + ieee80211_addba_backoff;
2224 		return 0;
2225 	}
2226 	tokens = dialogtoken;			/* allocate token */
2227 	/* NB: after calling ic_addba_request so driver can set txa_start */
2228 	args[4] = SM(tap->txa_start, IEEE80211_BASEQ_START)
2229 		| SM(0, IEEE80211_BASEQ_FRAG)
2230 		;
2231 	return ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
2232 		IEEE80211_ACTION_BA_ADDBA_REQUEST, args);
2233 }
2234 
2235 /*
2236  * Terminate an AMPDU tx stream.  State is reclaimed
2237  * and the peer notified with a DelBA Action frame.
2238  */
2239 void
2240 ieee80211_ampdu_stop(struct ieee80211_node *ni, struct ieee80211_tx_ampdu *tap,
2241 	int reason)
2242 {
2243 	struct ieee80211com *ic = ni->ni_ic;
2244 	struct ieee80211vap *vap = ni->ni_vap;
2245 	uint16_t args[4];
2246 
2247 	/* XXX locking */
2248 	tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2249 	if (IEEE80211_AMPDU_RUNNING(tap)) {
2250 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2251 		    ni, "%s: stop BA stream for TID %d (reason: %d (%s))",
2252 		    __func__, tap->txa_tid, reason,
2253 		    ieee80211_reason_to_string(reason));
2254 		vap->iv_stats.is_ampdu_stop++;
2255 
2256 		ic->ic_addba_stop(ni, tap);
2257 		args[0] = tap->txa_tid;
2258 		args[1] = IEEE80211_DELBAPS_INIT;
2259 		args[2] = reason;			/* XXX reason code */
2260 		ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
2261 			IEEE80211_ACTION_BA_DELBA, args);
2262 	} else {
2263 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2264 		    ni, "%s: BA stream for TID %d not running "
2265 		    "(reason: %d (%s))", __func__, tap->txa_tid, reason,
2266 		    ieee80211_reason_to_string(reason));
2267 		vap->iv_stats.is_ampdu_stop_failed++;
2268 	}
2269 }
2270 
2271 /* XXX */
2272 static void bar_start_timer(struct ieee80211_tx_ampdu *tap);
2273 
2274 static void
2275 bar_timeout(void *arg)
2276 {
2277 	struct ieee80211_tx_ampdu *tap = arg;
2278 	struct ieee80211_node *ni = tap->txa_ni;
2279 
2280 	KASSERT((tap->txa_flags & IEEE80211_AGGR_XCHGPEND) == 0,
2281 	    ("bar/addba collision, flags 0x%x", tap->txa_flags));
2282 
2283 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2284 	    ni, "%s: tid %u flags 0x%x attempts %d", __func__,
2285 	    tap->txa_tid, tap->txa_flags, tap->txa_attempts);
2286 
2287 	/* guard against race with bar_tx_complete */
2288 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) == 0)
2289 		return;
2290 	/* XXX ? */
2291 	if (tap->txa_attempts >= ieee80211_bar_maxtries) {
2292 		struct ieee80211com *ic = ni->ni_ic;
2293 
2294 		ni->ni_vap->iv_stats.is_ampdu_bar_tx_fail++;
2295 		/*
2296 		 * If (at least) the last BAR TX timeout was due to
2297 		 * an ieee80211_send_bar() failures, then we need
2298 		 * to make sure we notify the driver that a BAR
2299 		 * TX did occur and fail.  This gives the driver
2300 		 * a chance to undo any queue pause that may
2301 		 * have occurred.
2302 		 */
2303 		ic->ic_bar_response(ni, tap, 1);
2304 		ieee80211_ampdu_stop(ni, tap, IEEE80211_REASON_TIMEOUT);
2305 	} else {
2306 		ni->ni_vap->iv_stats.is_ampdu_bar_tx_retry++;
2307 		if (ieee80211_send_bar(ni, tap, tap->txa_seqpending) != 0) {
2308 			IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2309 			    ni, "%s: failed to TX, starting timer\n",
2310 			    __func__);
2311 			/*
2312 			 * If ieee80211_send_bar() fails here, the
2313 			 * timer may have stopped and/or the pending
2314 			 * flag may be clear.  Because of this,
2315 			 * fake the BARPEND and reset the timer.
2316 			 * A retransmission attempt will then occur
2317 			 * during the next timeout.
2318 			 */
2319 			/* XXX locking */
2320 			tap->txa_flags |= IEEE80211_AGGR_BARPEND;
2321 			bar_start_timer(tap);
2322 		}
2323 	}
2324 }
2325 
2326 static void
2327 bar_start_timer(struct ieee80211_tx_ampdu *tap)
2328 {
2329 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2330 	    tap->txa_ni,
2331 	    "%s: called",
2332 	    __func__);
2333 	callout_reset(&tap->txa_timer, ieee80211_bar_timeout, bar_timeout, tap);
2334 }
2335 
2336 static void
2337 bar_stop_timer(struct ieee80211_tx_ampdu *tap)
2338 {
2339 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2340 	    tap->txa_ni,
2341 	    "%s: called",
2342 	    __func__);
2343 	callout_stop(&tap->txa_timer);
2344 }
2345 
2346 static void
2347 bar_tx_complete(struct ieee80211_node *ni, void *arg, int status)
2348 {
2349 	struct ieee80211_tx_ampdu *tap = arg;
2350 
2351 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2352 	    ni, "%s: tid %u flags 0x%x pending %d status %d",
2353 	    __func__, tap->txa_tid, tap->txa_flags,
2354 	    callout_pending(&tap->txa_timer), status);
2355 
2356 	ni->ni_vap->iv_stats.is_ampdu_bar_tx++;
2357 	/* XXX locking */
2358 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) &&
2359 	    callout_pending(&tap->txa_timer)) {
2360 		struct ieee80211com *ic = ni->ni_ic;
2361 
2362 		if (status == 0)		/* ACK'd */
2363 			bar_stop_timer(tap);
2364 		ic->ic_bar_response(ni, tap, status);
2365 		/* NB: just let timer expire so we pace requests */
2366 	}
2367 }
2368 
2369 static void
2370 ieee80211_bar_response(struct ieee80211_node *ni,
2371 	struct ieee80211_tx_ampdu *tap, int status)
2372 {
2373 
2374 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2375 	    tap->txa_ni,
2376 	    "%s: called",
2377 	    __func__);
2378 	if (status == 0) {		/* got ACK */
2379 		IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2380 		    ni, "BAR moves BA win <%u:%u> (%u frames) txseq %u tid %u",
2381 		    tap->txa_start,
2382 		    IEEE80211_SEQ_ADD(tap->txa_start, tap->txa_wnd-1),
2383 		    tap->txa_qframes, tap->txa_seqpending,
2384 		    tap->txa_tid);
2385 
2386 		/* NB: timer already stopped in bar_tx_complete */
2387 		tap->txa_start = tap->txa_seqpending;
2388 		tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2389 	}
2390 }
2391 
2392 /*
2393  * Transmit a BAR frame to the specified node.  The
2394  * BAR contents are drawn from the supplied aggregation
2395  * state associated with the node.
2396  *
2397  * NB: we only handle immediate ACK w/ compressed bitmap.
2398  */
2399 int
2400 ieee80211_send_bar(struct ieee80211_node *ni,
2401 	struct ieee80211_tx_ampdu *tap, ieee80211_seq seq)
2402 {
2403 #define	senderr(_x, _v)	do { vap->iv_stats._v++; ret = _x; goto bad; } while (0)
2404 	struct ieee80211vap *vap = ni->ni_vap;
2405 	struct ieee80211com *ic = ni->ni_ic;
2406 	struct ieee80211_frame_bar *bar;
2407 	struct mbuf *m;
2408 	uint16_t barctl, barseqctl;
2409 	uint8_t *frm;
2410 	int tid, ret;
2411 
2412 
2413 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2414 	    tap->txa_ni,
2415 	    "%s: called",
2416 	    __func__);
2417 
2418 	if ((tap->txa_flags & IEEE80211_AGGR_RUNNING) == 0) {
2419 		/* no ADDBA response, should not happen */
2420 		/* XXX stat+msg */
2421 		return EINVAL;
2422 	}
2423 	/* XXX locking */
2424 	bar_stop_timer(tap);
2425 
2426 	ieee80211_ref_node(ni);
2427 
2428 	m = ieee80211_getmgtframe(&frm, ic->ic_headroom, sizeof(*bar));
2429 	if (m == NULL)
2430 		senderr(ENOMEM, is_tx_nobuf);
2431 
2432 	if (!ieee80211_add_callback(m, bar_tx_complete, tap)) {
2433 		m_freem(m);
2434 		senderr(ENOMEM, is_tx_nobuf);	/* XXX */
2435 		/* NOTREACHED */
2436 	}
2437 
2438 	bar = mtod(m, struct ieee80211_frame_bar *);
2439 	bar->i_fc[0] = IEEE80211_FC0_VERSION_0 |
2440 		IEEE80211_FC0_TYPE_CTL | IEEE80211_FC0_SUBTYPE_BAR;
2441 	bar->i_fc[1] = 0;
2442 	IEEE80211_ADDR_COPY(bar->i_ra, ni->ni_macaddr);
2443 	IEEE80211_ADDR_COPY(bar->i_ta, vap->iv_myaddr);
2444 
2445 	tid = tap->txa_tid;
2446 	barctl 	= (tap->txa_flags & IEEE80211_AGGR_IMMEDIATE ?
2447 			0 : IEEE80211_BAR_NOACK)
2448 		| IEEE80211_BAR_COMP
2449 		| SM(tid, IEEE80211_BAR_TID)
2450 		;
2451 	barseqctl = SM(seq, IEEE80211_BAR_SEQ_START);
2452 	/* NB: known to have proper alignment */
2453 	bar->i_ctl = htole16(barctl);
2454 	bar->i_seq = htole16(barseqctl);
2455 	m->m_pkthdr.len = m->m_len = sizeof(struct ieee80211_frame_bar);
2456 
2457 	M_WME_SETAC(m, WME_AC_VO);
2458 
2459 	IEEE80211_NODE_STAT(ni, tx_mgmt);	/* XXX tx_ctl? */
2460 
2461 	/* XXX locking */
2462 	/* init/bump attempts counter */
2463 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) == 0)
2464 		tap->txa_attempts = 1;
2465 	else
2466 		tap->txa_attempts++;
2467 	tap->txa_seqpending = seq;
2468 	tap->txa_flags |= IEEE80211_AGGR_BARPEND;
2469 
2470 	IEEE80211_NOTE(vap, IEEE80211_MSG_DEBUG | IEEE80211_MSG_11N,
2471 	    ni, "send BAR: tid %u ctl 0x%x start %u (attempt %d)",
2472 	    tid, barctl, seq, tap->txa_attempts);
2473 
2474 	/*
2475 	 * ic_raw_xmit will free the node reference
2476 	 * regardless of queue/TX success or failure.
2477 	 */
2478 	IEEE80211_TX_LOCK(ic);
2479 	ret = ieee80211_raw_output(vap, ni, m, NULL);
2480 	IEEE80211_TX_UNLOCK(ic);
2481 	if (ret != 0) {
2482 		IEEE80211_NOTE(vap, IEEE80211_MSG_DEBUG | IEEE80211_MSG_11N,
2483 		    ni, "send BAR: failed: (ret = %d)\n",
2484 		    ret);
2485 		/* xmit failed, clear state flag */
2486 		tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2487 		vap->iv_stats.is_ampdu_bar_tx_fail++;
2488 		return ret;
2489 	}
2490 	/* XXX hack against tx complete happening before timer is started */
2491 	if (tap->txa_flags & IEEE80211_AGGR_BARPEND)
2492 		bar_start_timer(tap);
2493 	return 0;
2494 bad:
2495 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2496 	    tap->txa_ni,
2497 	    "%s: bad! ret=%d",
2498 	    __func__, ret);
2499 	vap->iv_stats.is_ampdu_bar_tx_fail++;
2500 	ieee80211_free_node(ni);
2501 	return ret;
2502 #undef senderr
2503 }
2504 
2505 static int
2506 ht_action_output(struct ieee80211_node *ni, struct mbuf *m)
2507 {
2508 	struct ieee80211_bpf_params params;
2509 
2510 	memset(&params, 0, sizeof(params));
2511 	params.ibp_pri = WME_AC_VO;
2512 	params.ibp_rate0 = ni->ni_txparms->mgmtrate;
2513 	/* NB: we know all frames are unicast */
2514 	params.ibp_try0 = ni->ni_txparms->maxretry;
2515 	params.ibp_power = ni->ni_txpower;
2516 	return ieee80211_mgmt_output(ni, m, IEEE80211_FC0_SUBTYPE_ACTION,
2517 	     &params);
2518 }
2519 
2520 #define	ADDSHORT(frm, v) do {			\
2521 	frm[0] = (v) & 0xff;			\
2522 	frm[1] = (v) >> 8;			\
2523 	frm += 2;				\
2524 } while (0)
2525 
2526 /*
2527  * Send an action management frame.  The arguments are stuff
2528  * into a frame without inspection; the caller is assumed to
2529  * prepare them carefully (e.g. based on the aggregation state).
2530  */
2531 static int
2532 ht_send_action_ba_addba(struct ieee80211_node *ni,
2533 	int category, int action, void *arg0)
2534 {
2535 	struct ieee80211vap *vap = ni->ni_vap;
2536 	struct ieee80211com *ic = ni->ni_ic;
2537 	uint16_t *args = arg0;
2538 	struct mbuf *m;
2539 	uint8_t *frm;
2540 
2541 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2542 	    "send ADDBA %s: dialogtoken %d status %d "
2543 	    "baparamset 0x%x (tid %d) batimeout 0x%x baseqctl 0x%x",
2544 	    (action == IEEE80211_ACTION_BA_ADDBA_REQUEST) ?
2545 		"request" : "response",
2546 	    args[0], args[1], args[2], MS(args[2], IEEE80211_BAPS_TID),
2547 	    args[3], args[4]);
2548 
2549 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2550 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2551 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2552 	ieee80211_ref_node(ni);
2553 
2554 	m = ieee80211_getmgtframe(&frm,
2555 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2556 	    sizeof(uint16_t)	/* action+category */
2557 	    /* XXX may action payload */
2558 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2559 	);
2560 	if (m != NULL) {
2561 		*frm++ = category;
2562 		*frm++ = action;
2563 		*frm++ = args[0];		/* dialog token */
2564 		if (action == IEEE80211_ACTION_BA_ADDBA_RESPONSE)
2565 			ADDSHORT(frm, args[1]);	/* status code */
2566 		ADDSHORT(frm, args[2]);		/* baparamset */
2567 		ADDSHORT(frm, args[3]);		/* batimeout */
2568 		if (action == IEEE80211_ACTION_BA_ADDBA_REQUEST)
2569 			ADDSHORT(frm, args[4]);	/* baseqctl */
2570 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2571 		return ht_action_output(ni, m);
2572 	} else {
2573 		vap->iv_stats.is_tx_nobuf++;
2574 		ieee80211_free_node(ni);
2575 		return ENOMEM;
2576 	}
2577 }
2578 
2579 static int
2580 ht_send_action_ba_delba(struct ieee80211_node *ni,
2581 	int category, int action, void *arg0)
2582 {
2583 	struct ieee80211vap *vap = ni->ni_vap;
2584 	struct ieee80211com *ic = ni->ni_ic;
2585 	uint16_t *args = arg0;
2586 	struct mbuf *m;
2587 	uint16_t baparamset;
2588 	uint8_t *frm;
2589 
2590 	baparamset = SM(args[0], IEEE80211_DELBAPS_TID)
2591 		   | args[1]
2592 		   ;
2593 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2594 	    "send DELBA action: tid %d, initiator %d reason %d (%s)",
2595 	    args[0], args[1], args[2], ieee80211_reason_to_string(args[2]));
2596 
2597 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2598 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2599 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2600 	ieee80211_ref_node(ni);
2601 
2602 	m = ieee80211_getmgtframe(&frm,
2603 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2604 	    sizeof(uint16_t)	/* action+category */
2605 	    /* XXX may action payload */
2606 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2607 	);
2608 	if (m != NULL) {
2609 		*frm++ = category;
2610 		*frm++ = action;
2611 		ADDSHORT(frm, baparamset);
2612 		ADDSHORT(frm, args[2]);		/* reason code */
2613 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2614 		return ht_action_output(ni, m);
2615 	} else {
2616 		vap->iv_stats.is_tx_nobuf++;
2617 		ieee80211_free_node(ni);
2618 		return ENOMEM;
2619 	}
2620 }
2621 
2622 static int
2623 ht_send_action_ht_txchwidth(struct ieee80211_node *ni,
2624 	int category, int action, void *arg0)
2625 {
2626 	struct ieee80211vap *vap = ni->ni_vap;
2627 	struct ieee80211com *ic = ni->ni_ic;
2628 	struct mbuf *m;
2629 	uint8_t *frm;
2630 
2631 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2632 	    "send HT txchwidth: width %d",
2633 	    IEEE80211_IS_CHAN_HT40(ni->ni_chan) ? 40 : 20);
2634 
2635 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2636 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2637 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2638 	ieee80211_ref_node(ni);
2639 
2640 	m = ieee80211_getmgtframe(&frm,
2641 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2642 	    sizeof(uint16_t)	/* action+category */
2643 	    /* XXX may action payload */
2644 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2645 	);
2646 	if (m != NULL) {
2647 		*frm++ = category;
2648 		*frm++ = action;
2649 		*frm++ = IEEE80211_IS_CHAN_HT40(ni->ni_chan) ?
2650 			IEEE80211_A_HT_TXCHWIDTH_2040 :
2651 			IEEE80211_A_HT_TXCHWIDTH_20;
2652 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2653 		return ht_action_output(ni, m);
2654 	} else {
2655 		vap->iv_stats.is_tx_nobuf++;
2656 		ieee80211_free_node(ni);
2657 		return ENOMEM;
2658 	}
2659 }
2660 #undef ADDSHORT
2661 
2662 /*
2663  * Construct the MCS bit mask for inclusion in an HT capabilities
2664  * information element.
2665  */
2666 static void
2667 ieee80211_set_mcsset(struct ieee80211com *ic, uint8_t *frm)
2668 {
2669 	int i;
2670 	uint8_t txparams;
2671 
2672 	KASSERT((ic->ic_rxstream > 0 && ic->ic_rxstream <= 4),
2673 	    ("ic_rxstream %d out of range", ic->ic_rxstream));
2674 	KASSERT((ic->ic_txstream > 0 && ic->ic_txstream <= 4),
2675 	    ("ic_txstream %d out of range", ic->ic_txstream));
2676 
2677 	for (i = 0; i < ic->ic_rxstream * 8; i++)
2678 		setbit(frm, i);
2679 	if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) &&
2680 	    (ic->ic_htcaps & IEEE80211_HTC_RXMCS32))
2681 		setbit(frm, 32);
2682 	if (ic->ic_htcaps & IEEE80211_HTC_RXUNEQUAL) {
2683 		if (ic->ic_rxstream >= 2) {
2684 			for (i = 33; i <= 38; i++)
2685 				setbit(frm, i);
2686 		}
2687 		if (ic->ic_rxstream >= 3) {
2688 			for (i = 39; i <= 52; i++)
2689 				setbit(frm, i);
2690 		}
2691 		if (ic->ic_txstream >= 4) {
2692 			for (i = 53; i <= 76; i++)
2693 				setbit(frm, i);
2694 		}
2695 	}
2696 
2697 	if (ic->ic_rxstream != ic->ic_txstream) {
2698 		txparams = 0x1;			/* TX MCS set defined */
2699 		txparams |= 0x2;		/* TX RX MCS not equal */
2700 		txparams |= (ic->ic_txstream - 1) << 2;	/* num TX streams */
2701 		if (ic->ic_htcaps & IEEE80211_HTC_TXUNEQUAL)
2702 			txparams |= 0x16;	/* TX unequal modulation sup */
2703 	} else
2704 		txparams = 0;
2705 	frm[12] = txparams;
2706 }
2707 
2708 /*
2709  * Add body of an HTCAP information element.
2710  */
2711 static uint8_t *
2712 ieee80211_add_htcap_body(uint8_t *frm, struct ieee80211_node *ni)
2713 {
2714 #define	ADDSHORT(frm, v) do {			\
2715 	frm[0] = (v) & 0xff;			\
2716 	frm[1] = (v) >> 8;			\
2717 	frm += 2;				\
2718 } while (0)
2719 	struct ieee80211com *ic = ni->ni_ic;
2720 	struct ieee80211vap *vap = ni->ni_vap;
2721 	uint16_t caps, extcaps;
2722 	int rxmax, density;
2723 
2724 	/* HT capabilities */
2725 	caps = vap->iv_htcaps & 0xffff;
2726 	/*
2727 	 * Note channel width depends on whether we are operating as
2728 	 * a sta or not.  When operating as a sta we are generating
2729 	 * a request based on our desired configuration.  Otherwise
2730 	 * we are operational and the channel attributes identify
2731 	 * how we've been setup (which might be different if a fixed
2732 	 * channel is specified).
2733 	 */
2734 	if (vap->iv_opmode == IEEE80211_M_STA) {
2735 		/* override 20/40 use based on config */
2736 		if (vap->iv_flags_ht & IEEE80211_FHT_USEHT40)
2737 			caps |= IEEE80211_HTCAP_CHWIDTH40;
2738 		else
2739 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2740 
2741 		/* Start by using the advertised settings */
2742 		rxmax = MS(ni->ni_htparam, IEEE80211_HTCAP_MAXRXAMPDU);
2743 		density = MS(ni->ni_htparam, IEEE80211_HTCAP_MPDUDENSITY);
2744 
2745 		IEEE80211_DPRINTF(vap, IEEE80211_MSG_11N,
2746 		    "%s: advertised rxmax=%d, density=%d, vap rxmax=%d, density=%d\n",
2747 		    __func__,
2748 		    rxmax,
2749 		    density,
2750 		    vap->iv_ampdu_rxmax,
2751 		    vap->iv_ampdu_density);
2752 
2753 		/* Cap at VAP rxmax */
2754 		if (rxmax > vap->iv_ampdu_rxmax)
2755 			rxmax = vap->iv_ampdu_rxmax;
2756 
2757 		/*
2758 		 * If the VAP ampdu density value greater, use that.
2759 		 *
2760 		 * (Larger density value == larger minimum gap between A-MPDU
2761 		 * subframes.)
2762 		 */
2763 		if (vap->iv_ampdu_density > density)
2764 			density = vap->iv_ampdu_density;
2765 
2766 		/*
2767 		 * NB: Hardware might support HT40 on some but not all
2768 		 * channels. We can't determine this earlier because only
2769 		 * after association the channel is upgraded to HT based
2770 		 * on the negotiated capabilities.
2771 		 */
2772 		if (ni->ni_chan != IEEE80211_CHAN_ANYC &&
2773 		    findhtchan(ic, ni->ni_chan, IEEE80211_CHAN_HT40U) == NULL &&
2774 		    findhtchan(ic, ni->ni_chan, IEEE80211_CHAN_HT40D) == NULL)
2775 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2776 	} else {
2777 		/* override 20/40 use based on current channel */
2778 		if (IEEE80211_IS_CHAN_HT40(ni->ni_chan))
2779 			caps |= IEEE80211_HTCAP_CHWIDTH40;
2780 		else
2781 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2782 
2783 		/* XXX TODO should it start by using advertised settings? */
2784 		rxmax = vap->iv_ampdu_rxmax;
2785 		density = vap->iv_ampdu_density;
2786 	}
2787 
2788 	/* adjust short GI based on channel and config */
2789 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI20) == 0)
2790 		caps &= ~IEEE80211_HTCAP_SHORTGI20;
2791 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI40) == 0 ||
2792 	    (caps & IEEE80211_HTCAP_CHWIDTH40) == 0)
2793 		caps &= ~IEEE80211_HTCAP_SHORTGI40;
2794 
2795 	/* adjust STBC based on receive capabilities */
2796 	if ((vap->iv_flags_ht & IEEE80211_FHT_STBC_RX) == 0)
2797 		caps &= ~IEEE80211_HTCAP_RXSTBC;
2798 
2799 	/* XXX TODO: adjust LDPC based on receive capabilities */
2800 
2801 	ADDSHORT(frm, caps);
2802 
2803 	/* HT parameters */
2804 	*frm = SM(rxmax, IEEE80211_HTCAP_MAXRXAMPDU)
2805 	     | SM(density, IEEE80211_HTCAP_MPDUDENSITY)
2806 	     ;
2807 	frm++;
2808 
2809 	/* pre-zero remainder of ie */
2810 	memset(frm, 0, sizeof(struct ieee80211_ie_htcap) -
2811 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset));
2812 
2813 	/* supported MCS set */
2814 	/*
2815 	 * XXX: For sta mode the rate set should be restricted based
2816 	 * on the AP's capabilities, but ni_htrates isn't setup when
2817 	 * we're called to form an AssocReq frame so for now we're
2818 	 * restricted to the device capabilities.
2819 	 */
2820 	ieee80211_set_mcsset(ni->ni_ic, frm);
2821 
2822 	frm += __offsetof(struct ieee80211_ie_htcap, hc_extcap) -
2823 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset);
2824 
2825 	/* HT extended capabilities */
2826 	extcaps = vap->iv_htextcaps & 0xffff;
2827 
2828 	ADDSHORT(frm, extcaps);
2829 
2830 	frm += sizeof(struct ieee80211_ie_htcap) -
2831 		__offsetof(struct ieee80211_ie_htcap, hc_txbf);
2832 
2833 	return frm;
2834 #undef ADDSHORT
2835 }
2836 
2837 /*
2838  * Add 802.11n HT capabilities information element
2839  */
2840 uint8_t *
2841 ieee80211_add_htcap(uint8_t *frm, struct ieee80211_node *ni)
2842 {
2843 	frm[0] = IEEE80211_ELEMID_HTCAP;
2844 	frm[1] = sizeof(struct ieee80211_ie_htcap) - 2;
2845 	return ieee80211_add_htcap_body(frm + 2, ni);
2846 }
2847 
2848 /*
2849  * Non-associated probe request - add HT capabilities based on
2850  * the current channel configuration.
2851  */
2852 static uint8_t *
2853 ieee80211_add_htcap_body_ch(uint8_t *frm, struct ieee80211vap *vap,
2854     struct ieee80211_channel *c)
2855 {
2856 #define	ADDSHORT(frm, v) do {			\
2857 	frm[0] = (v) & 0xff;			\
2858 	frm[1] = (v) >> 8;			\
2859 	frm += 2;				\
2860 } while (0)
2861 	struct ieee80211com *ic = vap->iv_ic;
2862 	uint16_t caps, extcaps;
2863 	int rxmax, density;
2864 
2865 	/* HT capabilities */
2866 	caps = vap->iv_htcaps & 0xffff;
2867 
2868 	/*
2869 	 * We don't use this in STA mode; only in IBSS mode.
2870 	 * So in IBSS mode we base our HTCAP flags on the
2871 	 * given channel.
2872 	 */
2873 
2874 	/* override 20/40 use based on current channel */
2875 	if (IEEE80211_IS_CHAN_HT40(c))
2876 		caps |= IEEE80211_HTCAP_CHWIDTH40;
2877 	else
2878 		caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2879 
2880 	/* Use the currently configured values */
2881 	rxmax = vap->iv_ampdu_rxmax;
2882 	density = vap->iv_ampdu_density;
2883 
2884 	/* adjust short GI based on channel and config */
2885 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI20) == 0)
2886 		caps &= ~IEEE80211_HTCAP_SHORTGI20;
2887 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI40) == 0 ||
2888 	    (caps & IEEE80211_HTCAP_CHWIDTH40) == 0)
2889 		caps &= ~IEEE80211_HTCAP_SHORTGI40;
2890 	ADDSHORT(frm, caps);
2891 
2892 	/* HT parameters */
2893 	*frm = SM(rxmax, IEEE80211_HTCAP_MAXRXAMPDU)
2894 	     | SM(density, IEEE80211_HTCAP_MPDUDENSITY)
2895 	     ;
2896 	frm++;
2897 
2898 	/* pre-zero remainder of ie */
2899 	memset(frm, 0, sizeof(struct ieee80211_ie_htcap) -
2900 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset));
2901 
2902 	/* supported MCS set */
2903 	/*
2904 	 * XXX: For sta mode the rate set should be restricted based
2905 	 * on the AP's capabilities, but ni_htrates isn't setup when
2906 	 * we're called to form an AssocReq frame so for now we're
2907 	 * restricted to the device capabilities.
2908 	 */
2909 	ieee80211_set_mcsset(ic, frm);
2910 
2911 	frm += __offsetof(struct ieee80211_ie_htcap, hc_extcap) -
2912 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset);
2913 
2914 	/* HT extended capabilities */
2915 	extcaps = vap->iv_htextcaps & 0xffff;
2916 
2917 	ADDSHORT(frm, extcaps);
2918 
2919 	frm += sizeof(struct ieee80211_ie_htcap) -
2920 		__offsetof(struct ieee80211_ie_htcap, hc_txbf);
2921 
2922 	return frm;
2923 #undef ADDSHORT
2924 }
2925 
2926 /*
2927  * Add 802.11n HT capabilities information element
2928  */
2929 uint8_t *
2930 ieee80211_add_htcap_ch(uint8_t *frm, struct ieee80211vap *vap,
2931     struct ieee80211_channel *c)
2932 {
2933 	frm[0] = IEEE80211_ELEMID_HTCAP;
2934 	frm[1] = sizeof(struct ieee80211_ie_htcap) - 2;
2935 	return ieee80211_add_htcap_body_ch(frm + 2, vap, c);
2936 }
2937 
2938 /*
2939  * Add Broadcom OUI wrapped standard HTCAP ie; this is
2940  * used for compatibility w/ pre-draft implementations.
2941  */
2942 uint8_t *
2943 ieee80211_add_htcap_vendor(uint8_t *frm, struct ieee80211_node *ni)
2944 {
2945 	frm[0] = IEEE80211_ELEMID_VENDOR;
2946 	frm[1] = 4 + sizeof(struct ieee80211_ie_htcap) - 2;
2947 	frm[2] = (BCM_OUI >> 0) & 0xff;
2948 	frm[3] = (BCM_OUI >> 8) & 0xff;
2949 	frm[4] = (BCM_OUI >> 16) & 0xff;
2950 	frm[5] = BCM_OUI_HTCAP;
2951 	return ieee80211_add_htcap_body(frm + 6, ni);
2952 }
2953 
2954 /*
2955  * Construct the MCS bit mask of basic rates
2956  * for inclusion in an HT information element.
2957  */
2958 static void
2959 ieee80211_set_basic_htrates(uint8_t *frm, const struct ieee80211_htrateset *rs)
2960 {
2961 	int i;
2962 
2963 	for (i = 0; i < rs->rs_nrates; i++) {
2964 		int r = rs->rs_rates[i] & IEEE80211_RATE_VAL;
2965 		if ((rs->rs_rates[i] & IEEE80211_RATE_BASIC) &&
2966 		    r < IEEE80211_HTRATE_MAXSIZE) {
2967 			/* NB: this assumes a particular implementation */
2968 			setbit(frm, r);
2969 		}
2970 	}
2971 }
2972 
2973 /*
2974  * Update the HTINFO ie for a beacon frame.
2975  */
2976 void
2977 ieee80211_ht_update_beacon(struct ieee80211vap *vap,
2978 	struct ieee80211_beacon_offsets *bo)
2979 {
2980 #define	PROTMODE	(IEEE80211_HTINFO_OPMODE|IEEE80211_HTINFO_NONHT_PRESENT)
2981 	struct ieee80211_node *ni;
2982 	const struct ieee80211_channel *bsschan;
2983 	struct ieee80211com *ic = vap->iv_ic;
2984 	struct ieee80211_ie_htinfo *ht =
2985 	   (struct ieee80211_ie_htinfo *) bo->bo_htinfo;
2986 
2987 	ni = ieee80211_ref_node(vap->iv_bss);
2988 	bsschan = ni->ni_chan;
2989 
2990 	/* XXX only update on channel change */
2991 	ht->hi_ctrlchannel = ieee80211_chan2ieee(ic, bsschan);
2992 	if (vap->iv_flags_ht & IEEE80211_FHT_RIFS)
2993 		ht->hi_byte1 = IEEE80211_HTINFO_RIFSMODE_PERM;
2994 	else
2995 		ht->hi_byte1 = IEEE80211_HTINFO_RIFSMODE_PROH;
2996 	if (IEEE80211_IS_CHAN_HT40U(bsschan))
2997 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_ABOVE;
2998 	else if (IEEE80211_IS_CHAN_HT40D(bsschan))
2999 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_BELOW;
3000 	else
3001 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_NONE;
3002 	if (IEEE80211_IS_CHAN_HT40(bsschan))
3003 		ht->hi_byte1 |= IEEE80211_HTINFO_TXWIDTH_2040;
3004 
3005 	/* protection mode */
3006 	ht->hi_byte2 = (ht->hi_byte2 &~ PROTMODE) | ic->ic_curhtprotmode;
3007 
3008 	ieee80211_free_node(ni);
3009 
3010 	/* XXX propagate to vendor ie's */
3011 #undef PROTMODE
3012 }
3013 
3014 /*
3015  * Add body of an HTINFO information element.
3016  *
3017  * NB: We don't use struct ieee80211_ie_htinfo because we can
3018  * be called to fillin both a standard ie and a compat ie that
3019  * has a vendor OUI at the front.
3020  */
3021 static uint8_t *
3022 ieee80211_add_htinfo_body(uint8_t *frm, struct ieee80211_node *ni)
3023 {
3024 	struct ieee80211vap *vap = ni->ni_vap;
3025 	struct ieee80211com *ic = ni->ni_ic;
3026 
3027 	/* pre-zero remainder of ie */
3028 	memset(frm, 0, sizeof(struct ieee80211_ie_htinfo) - 2);
3029 
3030 	/* primary/control channel center */
3031 	*frm++ = ieee80211_chan2ieee(ic, ni->ni_chan);
3032 
3033 	if (vap->iv_flags_ht & IEEE80211_FHT_RIFS)
3034 		frm[0] = IEEE80211_HTINFO_RIFSMODE_PERM;
3035 	else
3036 		frm[0] = IEEE80211_HTINFO_RIFSMODE_PROH;
3037 	if (IEEE80211_IS_CHAN_HT40U(ni->ni_chan))
3038 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_ABOVE;
3039 	else if (IEEE80211_IS_CHAN_HT40D(ni->ni_chan))
3040 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_BELOW;
3041 	else
3042 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_NONE;
3043 	if (IEEE80211_IS_CHAN_HT40(ni->ni_chan))
3044 		frm[0] |= IEEE80211_HTINFO_TXWIDTH_2040;
3045 
3046 	frm[1] = ic->ic_curhtprotmode;
3047 
3048 	frm += 5;
3049 
3050 	/* basic MCS set */
3051 	ieee80211_set_basic_htrates(frm, &ni->ni_htrates);
3052 	frm += sizeof(struct ieee80211_ie_htinfo) -
3053 		__offsetof(struct ieee80211_ie_htinfo, hi_basicmcsset);
3054 	return frm;
3055 }
3056 
3057 /*
3058  * Add 802.11n HT information information element.
3059  */
3060 uint8_t *
3061 ieee80211_add_htinfo(uint8_t *frm, struct ieee80211_node *ni)
3062 {
3063 	frm[0] = IEEE80211_ELEMID_HTINFO;
3064 	frm[1] = sizeof(struct ieee80211_ie_htinfo) - 2;
3065 	return ieee80211_add_htinfo_body(frm + 2, ni);
3066 }
3067 
3068 /*
3069  * Add Broadcom OUI wrapped standard HTINFO ie; this is
3070  * used for compatibility w/ pre-draft implementations.
3071  */
3072 uint8_t *
3073 ieee80211_add_htinfo_vendor(uint8_t *frm, struct ieee80211_node *ni)
3074 {
3075 	frm[0] = IEEE80211_ELEMID_VENDOR;
3076 	frm[1] = 4 + sizeof(struct ieee80211_ie_htinfo) - 2;
3077 	frm[2] = (BCM_OUI >> 0) & 0xff;
3078 	frm[3] = (BCM_OUI >> 8) & 0xff;
3079 	frm[4] = (BCM_OUI >> 16) & 0xff;
3080 	frm[5] = BCM_OUI_HTINFO;
3081 	return ieee80211_add_htinfo_body(frm + 6, ni);
3082 }
3083