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 <netproto/802_11/ieee80211_var.h>
52 #include <netproto/802_11/ieee80211_action.h>
53 #include <netproto/802_11/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 	if (ic->ic_htcaps & IEEE80211_HTC_TXUNEQUAL) {
1647 		if (ic->ic_txstream >= 2)
1648 			maxunequalmcs = 38;
1649 		if (ic->ic_txstream >= 3)
1650 			maxunequalmcs = 52;
1651 		if (ic->ic_txstream >= 4)
1652 			maxunequalmcs = 76;
1653 	} else
1654 		maxunequalmcs = 0;
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 #if defined(__DragonFly__)
1720 	callout_init_mp(&tap->txa_timer);
1721 #else
1722 	callout_init(&tap->txa_timer, 1);
1723 #endif
1724 	tap->txa_flags |= IEEE80211_AGGR_SETUP;
1725 	tap->txa_lastsample = ticks;
1726 }
1727 
1728 static void
1729 ampdu_tx_stop(struct ieee80211_tx_ampdu *tap)
1730 {
1731 	struct ieee80211_node *ni = tap->txa_ni;
1732 	struct ieee80211com *ic = ni->ni_ic;
1733 
1734 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
1735 	    tap->txa_ni,
1736 	    "%s: called",
1737 	    __func__);
1738 
1739 	KASSERT(tap->txa_flags & IEEE80211_AGGR_SETUP,
1740 	    ("txa_flags 0x%x tid %d ac %d", tap->txa_flags, tap->txa_tid,
1741 	    TID_TO_WME_AC(tap->txa_tid)));
1742 
1743 	/*
1744 	 * Stop BA stream if setup so driver has a chance
1745 	 * to reclaim any resources it might have allocated.
1746 	 */
1747 	ic->ic_addba_stop(ni, tap);
1748 	/*
1749 	 * Stop any pending BAR transmit.
1750 	 */
1751 	bar_stop_timer(tap);
1752 
1753 	/*
1754 	 * Reset packet estimate.
1755 	 */
1756 	ieee80211_txampdu_init_pps(tap);
1757 
1758 	/* NB: clearing NAK means we may re-send ADDBA */
1759 	tap->txa_flags &= ~(IEEE80211_AGGR_SETUP | IEEE80211_AGGR_NAK);
1760 }
1761 
1762 /*
1763  * ADDBA response timeout.
1764  *
1765  * If software aggregation and per-TID queue management was done here,
1766  * that queue would be unpaused after the ADDBA timeout occurs.
1767  */
1768 static void
1769 addba_timeout(void *arg)
1770 {
1771 	struct ieee80211_tx_ampdu *tap = arg;
1772 	struct ieee80211_node *ni = tap->txa_ni;
1773 	struct ieee80211com *ic = ni->ni_ic;
1774 
1775 	/* XXX ? */
1776 	tap->txa_flags &= ~IEEE80211_AGGR_XCHGPEND;
1777 	tap->txa_attempts++;
1778 	ic->ic_addba_response_timeout(ni, tap);
1779 }
1780 
1781 static void
1782 addba_start_timeout(struct ieee80211_tx_ampdu *tap)
1783 {
1784 	/* XXX use CALLOUT_PENDING instead? */
1785 	callout_reset(&tap->txa_timer, ieee80211_addba_timeout,
1786 	    addba_timeout, tap);
1787 	tap->txa_flags |= IEEE80211_AGGR_XCHGPEND;
1788 	tap->txa_nextrequest = ticks + ieee80211_addba_timeout;
1789 }
1790 
1791 static void
1792 addba_stop_timeout(struct ieee80211_tx_ampdu *tap)
1793 {
1794 	/* XXX use CALLOUT_PENDING instead? */
1795 	if (tap->txa_flags & IEEE80211_AGGR_XCHGPEND) {
1796 		callout_stop(&tap->txa_timer);
1797 		tap->txa_flags &= ~IEEE80211_AGGR_XCHGPEND;
1798 	}
1799 }
1800 
1801 static void
1802 null_addba_response_timeout(struct ieee80211_node *ni,
1803     struct ieee80211_tx_ampdu *tap)
1804 {
1805 }
1806 
1807 /*
1808  * Default method for requesting A-MPDU tx aggregation.
1809  * We setup the specified state block and start a timer
1810  * to wait for an ADDBA response frame.
1811  */
1812 static int
1813 ieee80211_addba_request(struct ieee80211_node *ni,
1814 	struct ieee80211_tx_ampdu *tap,
1815 	int dialogtoken, int baparamset, int batimeout)
1816 {
1817 	int bufsiz;
1818 
1819 	/* XXX locking */
1820 	tap->txa_token = dialogtoken;
1821 	tap->txa_flags |= IEEE80211_AGGR_IMMEDIATE;
1822 	bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
1823 	tap->txa_wnd = (bufsiz == 0) ?
1824 	    IEEE80211_AGGR_BAWMAX : min(bufsiz, IEEE80211_AGGR_BAWMAX);
1825 	addba_start_timeout(tap);
1826 	return 1;
1827 }
1828 
1829 /*
1830  * Called by drivers that wish to request an ADDBA session be
1831  * setup.  This brings it up and starts the request timer.
1832  */
1833 int
1834 ieee80211_ampdu_tx_request_ext(struct ieee80211_node *ni, int tid)
1835 {
1836 	struct ieee80211_tx_ampdu *tap;
1837 
1838 	if (tid < 0 || tid > 15)
1839 		return (0);
1840 	tap = &ni->ni_tx_ampdu[tid];
1841 
1842 	/* XXX locking */
1843 	if ((tap->txa_flags & IEEE80211_AGGR_SETUP) == 0) {
1844 		/* do deferred setup of state */
1845 		ampdu_tx_setup(tap);
1846 	}
1847 	/* XXX hack for not doing proper locking */
1848 	tap->txa_flags &= ~IEEE80211_AGGR_NAK;
1849 	addba_start_timeout(tap);
1850 	return (1);
1851 }
1852 
1853 /*
1854  * Called by drivers that have marked a session as active.
1855  */
1856 int
1857 ieee80211_ampdu_tx_request_active_ext(struct ieee80211_node *ni, int tid,
1858     int status)
1859 {
1860 	struct ieee80211_tx_ampdu *tap;
1861 
1862 	if (tid < 0 || tid > 15)
1863 		return (0);
1864 	tap = &ni->ni_tx_ampdu[tid];
1865 
1866 	/* XXX locking */
1867 	addba_stop_timeout(tap);
1868 	if (status == 1) {
1869 		tap->txa_flags |= IEEE80211_AGGR_RUNNING;
1870 		tap->txa_attempts = 0;
1871 	} else {
1872 		/* mark tid so we don't try again */
1873 		tap->txa_flags |= IEEE80211_AGGR_NAK;
1874 	}
1875 	return (1);
1876 }
1877 
1878 /*
1879  * Default method for processing an A-MPDU tx aggregation
1880  * response.  We shutdown any pending timer and update the
1881  * state block according to the reply.
1882  */
1883 static int
1884 ieee80211_addba_response(struct ieee80211_node *ni,
1885 	struct ieee80211_tx_ampdu *tap,
1886 	int status, int baparamset, int batimeout)
1887 {
1888 	int bufsiz, tid;
1889 
1890 	/* XXX locking */
1891 	addba_stop_timeout(tap);
1892 	if (status == IEEE80211_STATUS_SUCCESS) {
1893 		bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
1894 		/* XXX override our request? */
1895 		tap->txa_wnd = (bufsiz == 0) ?
1896 		    IEEE80211_AGGR_BAWMAX : min(bufsiz, IEEE80211_AGGR_BAWMAX);
1897 		/* XXX AC/TID */
1898 		tid = MS(baparamset, IEEE80211_BAPS_TID);
1899 		tap->txa_flags |= IEEE80211_AGGR_RUNNING;
1900 		tap->txa_attempts = 0;
1901 	} else {
1902 		/* mark tid so we don't try again */
1903 		tap->txa_flags |= IEEE80211_AGGR_NAK;
1904 	}
1905 	return 1;
1906 }
1907 
1908 /*
1909  * Default method for stopping A-MPDU tx aggregation.
1910  * Any timer is cleared and we drain any pending frames.
1911  */
1912 static void
1913 ieee80211_addba_stop(struct ieee80211_node *ni, struct ieee80211_tx_ampdu *tap)
1914 {
1915 	/* XXX locking */
1916 	addba_stop_timeout(tap);
1917 	if (tap->txa_flags & IEEE80211_AGGR_RUNNING) {
1918 		/* XXX clear aggregation queue */
1919 		tap->txa_flags &= ~IEEE80211_AGGR_RUNNING;
1920 	}
1921 	tap->txa_attempts = 0;
1922 }
1923 
1924 /*
1925  * Process a received action frame using the default aggregation
1926  * policy.  We intercept ADDBA-related frames and use them to
1927  * update our aggregation state.  All other frames are passed up
1928  * for processing by ieee80211_recv_action.
1929  */
1930 static int
1931 ht_recv_action_ba_addba_request(struct ieee80211_node *ni,
1932 	const struct ieee80211_frame *wh,
1933 	const uint8_t *frm, const uint8_t *efrm)
1934 {
1935 	struct ieee80211com *ic = ni->ni_ic;
1936 	struct ieee80211vap *vap = ni->ni_vap;
1937 	struct ieee80211_rx_ampdu *rap;
1938 	uint8_t dialogtoken;
1939 	uint16_t baparamset, batimeout, baseqctl;
1940 	uint16_t args[5];
1941 	int tid;
1942 
1943 	dialogtoken = frm[2];
1944 	baparamset = le16dec(frm+3);
1945 	batimeout = le16dec(frm+5);
1946 	baseqctl = le16dec(frm+7);
1947 
1948 	tid = MS(baparamset, IEEE80211_BAPS_TID);
1949 
1950 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
1951 	    "recv ADDBA request: dialogtoken %u baparamset 0x%x "
1952 	    "(tid %d bufsiz %d) batimeout %d baseqctl %d:%d",
1953 	    dialogtoken, baparamset,
1954 	    tid, MS(baparamset, IEEE80211_BAPS_BUFSIZ),
1955 	    batimeout,
1956 	    MS(baseqctl, IEEE80211_BASEQ_START),
1957 	    MS(baseqctl, IEEE80211_BASEQ_FRAG));
1958 
1959 	rap = &ni->ni_rx_ampdu[tid];
1960 
1961 	/* Send ADDBA response */
1962 	args[0] = dialogtoken;
1963 	/*
1964 	 * NB: We ack only if the sta associated with HT and
1965 	 * the ap is configured to do AMPDU rx (the latter
1966 	 * violates the 11n spec and is mostly for testing).
1967 	 */
1968 	if ((ni->ni_flags & IEEE80211_NODE_AMPDU_RX) &&
1969 	    (vap->iv_flags_ht & IEEE80211_FHT_AMPDU_RX)) {
1970 		/* XXX handle ampdu_rx_start failure */
1971 		ic->ic_ampdu_rx_start(ni, rap,
1972 		    baparamset, batimeout, baseqctl);
1973 
1974 		args[1] = IEEE80211_STATUS_SUCCESS;
1975 	} else {
1976 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
1977 		    ni, "reject ADDBA request: %s",
1978 		    ni->ni_flags & IEEE80211_NODE_AMPDU_RX ?
1979 		       "administratively disabled" :
1980 		       "not negotiated for station");
1981 		vap->iv_stats.is_addba_reject++;
1982 		args[1] = IEEE80211_STATUS_UNSPECIFIED;
1983 	}
1984 	/* XXX honor rap flags? */
1985 	args[2] = IEEE80211_BAPS_POLICY_IMMEDIATE
1986 		| SM(tid, IEEE80211_BAPS_TID)
1987 		| SM(rap->rxa_wnd, IEEE80211_BAPS_BUFSIZ)
1988 		;
1989 	args[3] = 0;
1990 	args[4] = 0;
1991 	ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
1992 		IEEE80211_ACTION_BA_ADDBA_RESPONSE, args);
1993 	return 0;
1994 }
1995 
1996 static int
1997 ht_recv_action_ba_addba_response(struct ieee80211_node *ni,
1998 	const struct ieee80211_frame *wh,
1999 	const uint8_t *frm, const uint8_t *efrm)
2000 {
2001 	struct ieee80211com *ic = ni->ni_ic;
2002 	struct ieee80211vap *vap = ni->ni_vap;
2003 	struct ieee80211_tx_ampdu *tap;
2004 	uint8_t dialogtoken, policy;
2005 	uint16_t baparamset, batimeout, code;
2006 	int tid, bufsiz;
2007 
2008 	dialogtoken = frm[2];
2009 	code = le16dec(frm+3);
2010 	baparamset = le16dec(frm+5);
2011 	tid = MS(baparamset, IEEE80211_BAPS_TID);
2012 	bufsiz = MS(baparamset, IEEE80211_BAPS_BUFSIZ);
2013 	policy = MS(baparamset, IEEE80211_BAPS_POLICY);
2014 	batimeout = le16dec(frm+7);
2015 
2016 	tap = &ni->ni_tx_ampdu[tid];
2017 	if ((tap->txa_flags & IEEE80211_AGGR_XCHGPEND) == 0) {
2018 		IEEE80211_DISCARD_MAC(vap,
2019 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2020 		    ni->ni_macaddr, "ADDBA response",
2021 		    "no pending ADDBA, tid %d dialogtoken %u "
2022 		    "code %d", tid, dialogtoken, code);
2023 		vap->iv_stats.is_addba_norequest++;
2024 		return 0;
2025 	}
2026 	if (dialogtoken != tap->txa_token) {
2027 		IEEE80211_DISCARD_MAC(vap,
2028 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2029 		    ni->ni_macaddr, "ADDBA response",
2030 		    "dialogtoken mismatch: waiting for %d, "
2031 		    "received %d, tid %d code %d",
2032 		    tap->txa_token, dialogtoken, tid, code);
2033 		vap->iv_stats.is_addba_badtoken++;
2034 		return 0;
2035 	}
2036 	/* NB: assumes IEEE80211_AGGR_IMMEDIATE is 1 */
2037 	if (policy != (tap->txa_flags & IEEE80211_AGGR_IMMEDIATE)) {
2038 		IEEE80211_DISCARD_MAC(vap,
2039 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2040 		    ni->ni_macaddr, "ADDBA response",
2041 		    "policy mismatch: expecting %d, "
2042 		    "received %d, tid %d code %d",
2043 		    tap->txa_flags & IEEE80211_AGGR_IMMEDIATE,
2044 		    policy, tid, code);
2045 		vap->iv_stats.is_addba_badpolicy++;
2046 		return 0;
2047 	}
2048 #if 0
2049 	/* XXX we take MIN in ieee80211_addba_response */
2050 	if (bufsiz > IEEE80211_AGGR_BAWMAX) {
2051 		IEEE80211_DISCARD_MAC(vap,
2052 		    IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2053 		    ni->ni_macaddr, "ADDBA response",
2054 		    "BA window too large: max %d, "
2055 		    "received %d, tid %d code %d",
2056 		    bufsiz, IEEE80211_AGGR_BAWMAX, tid, code);
2057 		vap->iv_stats.is_addba_badbawinsize++;
2058 		return 0;
2059 	}
2060 #endif
2061 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2062 	    "recv ADDBA response: dialogtoken %u code %d "
2063 	    "baparamset 0x%x (tid %d bufsiz %d) batimeout %d",
2064 	    dialogtoken, code, baparamset, tid, bufsiz,
2065 	    batimeout);
2066 	ic->ic_addba_response(ni, tap, code, baparamset, batimeout);
2067 	return 0;
2068 }
2069 
2070 static int
2071 ht_recv_action_ba_delba(struct ieee80211_node *ni,
2072 	const struct ieee80211_frame *wh,
2073 	const uint8_t *frm, const uint8_t *efrm)
2074 {
2075 	struct ieee80211com *ic = ni->ni_ic;
2076 	struct ieee80211_rx_ampdu *rap;
2077 	struct ieee80211_tx_ampdu *tap;
2078 	uint16_t baparamset, code;
2079 	int tid;
2080 
2081 	baparamset = le16dec(frm+2);
2082 	code = le16dec(frm+4);
2083 
2084 	tid = MS(baparamset, IEEE80211_DELBAPS_TID);
2085 
2086 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2087 	    "recv DELBA: baparamset 0x%x (tid %d initiator %d) "
2088 	    "code %d", baparamset, tid,
2089 	    MS(baparamset, IEEE80211_DELBAPS_INIT), code);
2090 
2091 	if ((baparamset & IEEE80211_DELBAPS_INIT) == 0) {
2092 		tap = &ni->ni_tx_ampdu[tid];
2093 		ic->ic_addba_stop(ni, tap);
2094 	} else {
2095 		rap = &ni->ni_rx_ampdu[tid];
2096 		ic->ic_ampdu_rx_stop(ni, rap);
2097 	}
2098 	return 0;
2099 }
2100 
2101 static int
2102 ht_recv_action_ht_txchwidth(struct ieee80211_node *ni,
2103 	const struct ieee80211_frame *wh,
2104 	const uint8_t *frm, const uint8_t *efrm)
2105 {
2106 	int chw;
2107 
2108 	chw = (frm[2] == IEEE80211_A_HT_TXCHWIDTH_2040) ? 40 : 20;
2109 
2110 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2111 	    "%s: HT txchwidth, width %d%s",
2112 	    __func__, chw, ni->ni_chw != chw ? "*" : "");
2113 	if (chw != ni->ni_chw) {
2114 		ni->ni_chw = chw;
2115 		/* XXX notify on change */
2116 	}
2117 	return 0;
2118 }
2119 
2120 static int
2121 ht_recv_action_ht_mimopwrsave(struct ieee80211_node *ni,
2122 	const struct ieee80211_frame *wh,
2123 	const uint8_t *frm, const uint8_t *efrm)
2124 {
2125 	const struct ieee80211_action_ht_mimopowersave *mps =
2126 	    (const struct ieee80211_action_ht_mimopowersave *) frm;
2127 
2128 	/* XXX check iv_htcaps */
2129 	if (mps->am_control & IEEE80211_A_HT_MIMOPWRSAVE_ENA)
2130 		ni->ni_flags |= IEEE80211_NODE_MIMO_PS;
2131 	else
2132 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_PS;
2133 	if (mps->am_control & IEEE80211_A_HT_MIMOPWRSAVE_MODE)
2134 		ni->ni_flags |= IEEE80211_NODE_MIMO_RTS;
2135 	else
2136 		ni->ni_flags &= ~IEEE80211_NODE_MIMO_RTS;
2137 	/* XXX notify on change */
2138 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2139 	    "%s: HT MIMO PS (%s%s)", __func__,
2140 	    (ni->ni_flags & IEEE80211_NODE_MIMO_PS) ?  "on" : "off",
2141 	    (ni->ni_flags & IEEE80211_NODE_MIMO_RTS) ?  "+rts" : ""
2142 	);
2143 	return 0;
2144 }
2145 
2146 /*
2147  * Transmit processing.
2148  */
2149 
2150 /*
2151  * Check if A-MPDU should be requested/enabled for a stream.
2152  * We require a traffic rate above a per-AC threshold and we
2153  * also handle backoff from previous failed attempts.
2154  *
2155  * Drivers may override this method to bring in information
2156  * such as link state conditions in making the decision.
2157  */
2158 static int
2159 ieee80211_ampdu_enable(struct ieee80211_node *ni,
2160 	struct ieee80211_tx_ampdu *tap)
2161 {
2162 	struct ieee80211vap *vap = ni->ni_vap;
2163 
2164 	if (tap->txa_avgpps <
2165 	    vap->iv_ampdu_mintraffic[TID_TO_WME_AC(tap->txa_tid)])
2166 		return 0;
2167 	/* XXX check rssi? */
2168 	if (tap->txa_attempts >= ieee80211_addba_maxtries &&
2169 	    ieee80211_time_after(ticks, tap->txa_nextrequest)) {
2170 		/*
2171 		 * Don't retry too often; txa_nextrequest is set
2172 		 * to the minimum interval we'll retry after
2173 		 * ieee80211_addba_maxtries failed attempts are made.
2174 		 */
2175 		return 0;
2176 	}
2177 	IEEE80211_NOTE(vap, IEEE80211_MSG_11N, ni,
2178 	    "enable AMPDU on tid %d (%s), avgpps %d pkts %d attempt %d",
2179 	    tap->txa_tid, ieee80211_wme_acnames[TID_TO_WME_AC(tap->txa_tid)],
2180 	    tap->txa_avgpps, tap->txa_pkts, tap->txa_attempts);
2181 	return 1;
2182 }
2183 
2184 /*
2185  * Request A-MPDU tx aggregation.  Setup local state and
2186  * issue an ADDBA request.  BA use will only happen after
2187  * the other end replies with ADDBA response.
2188  */
2189 int
2190 ieee80211_ampdu_request(struct ieee80211_node *ni,
2191 	struct ieee80211_tx_ampdu *tap)
2192 {
2193 	struct ieee80211com *ic = ni->ni_ic;
2194 	uint16_t args[5];
2195 	int tid, dialogtoken;
2196 	static int tokens = 0;	/* XXX */
2197 
2198 	/* XXX locking */
2199 	if ((tap->txa_flags & IEEE80211_AGGR_SETUP) == 0) {
2200 		/* do deferred setup of state */
2201 		ampdu_tx_setup(tap);
2202 	}
2203 	/* XXX hack for not doing proper locking */
2204 	tap->txa_flags &= ~IEEE80211_AGGR_NAK;
2205 
2206 	dialogtoken = (tokens+1) % 63;		/* XXX */
2207 	tid = tap->txa_tid;
2208 	tap->txa_start = ni->ni_txseqs[tid];
2209 
2210 	args[0] = dialogtoken;
2211 	args[1] = 0;	/* NB: status code not used */
2212 	args[2]	= IEEE80211_BAPS_POLICY_IMMEDIATE
2213 		| SM(tid, IEEE80211_BAPS_TID)
2214 		| SM(IEEE80211_AGGR_BAWMAX, IEEE80211_BAPS_BUFSIZ)
2215 		;
2216 	args[3] = 0;	/* batimeout */
2217 	/* NB: do first so there's no race against reply */
2218 	if (!ic->ic_addba_request(ni, tap, dialogtoken, args[2], args[3])) {
2219 		/* unable to setup state, don't make request */
2220 		IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2221 		    ni, "%s: could not setup BA stream for TID %d AC %d",
2222 		    __func__, tap->txa_tid, TID_TO_WME_AC(tap->txa_tid));
2223 		/* defer next try so we don't slam the driver with requests */
2224 		tap->txa_attempts = ieee80211_addba_maxtries;
2225 		/* NB: check in case driver wants to override */
2226 		if (tap->txa_nextrequest <= ticks)
2227 			tap->txa_nextrequest = ticks + ieee80211_addba_backoff;
2228 		return 0;
2229 	}
2230 	tokens = dialogtoken;			/* allocate token */
2231 	/* NB: after calling ic_addba_request so driver can set txa_start */
2232 	args[4] = SM(tap->txa_start, IEEE80211_BASEQ_START)
2233 		| SM(0, IEEE80211_BASEQ_FRAG)
2234 		;
2235 	return ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
2236 		IEEE80211_ACTION_BA_ADDBA_REQUEST, args);
2237 }
2238 
2239 /*
2240  * Terminate an AMPDU tx stream.  State is reclaimed
2241  * and the peer notified with a DelBA Action frame.
2242  */
2243 void
2244 ieee80211_ampdu_stop(struct ieee80211_node *ni, struct ieee80211_tx_ampdu *tap,
2245 	int reason)
2246 {
2247 	struct ieee80211com *ic = ni->ni_ic;
2248 	struct ieee80211vap *vap = ni->ni_vap;
2249 	uint16_t args[4];
2250 
2251 	/* XXX locking */
2252 	tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2253 	if (IEEE80211_AMPDU_RUNNING(tap)) {
2254 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2255 		    ni, "%s: stop BA stream for TID %d (reason: %d (%s))",
2256 		    __func__, tap->txa_tid, reason,
2257 		    ieee80211_reason_to_string(reason));
2258 		vap->iv_stats.is_ampdu_stop++;
2259 
2260 		ic->ic_addba_stop(ni, tap);
2261 		args[0] = tap->txa_tid;
2262 		args[1] = IEEE80211_DELBAPS_INIT;
2263 		args[2] = reason;			/* XXX reason code */
2264 		ic->ic_send_action(ni, IEEE80211_ACTION_CAT_BA,
2265 			IEEE80211_ACTION_BA_DELBA, args);
2266 	} else {
2267 		IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N,
2268 		    ni, "%s: BA stream for TID %d not running "
2269 		    "(reason: %d (%s))", __func__, tap->txa_tid, reason,
2270 		    ieee80211_reason_to_string(reason));
2271 		vap->iv_stats.is_ampdu_stop_failed++;
2272 	}
2273 }
2274 
2275 /* XXX */
2276 static void bar_start_timer(struct ieee80211_tx_ampdu *tap);
2277 
2278 static void
2279 bar_timeout(void *arg)
2280 {
2281 	struct ieee80211_tx_ampdu *tap = arg;
2282 	struct ieee80211_node *ni = tap->txa_ni;
2283 
2284 	KASSERT((tap->txa_flags & IEEE80211_AGGR_XCHGPEND) == 0,
2285 	    ("bar/addba collision, flags 0x%x", tap->txa_flags));
2286 
2287 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2288 	    ni, "%s: tid %u flags 0x%x attempts %d", __func__,
2289 	    tap->txa_tid, tap->txa_flags, tap->txa_attempts);
2290 
2291 	/* guard against race with bar_tx_complete */
2292 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) == 0)
2293 		return;
2294 	/* XXX ? */
2295 	if (tap->txa_attempts >= ieee80211_bar_maxtries) {
2296 		struct ieee80211com *ic = ni->ni_ic;
2297 
2298 		ni->ni_vap->iv_stats.is_ampdu_bar_tx_fail++;
2299 		/*
2300 		 * If (at least) the last BAR TX timeout was due to
2301 		 * an ieee80211_send_bar() failures, then we need
2302 		 * to make sure we notify the driver that a BAR
2303 		 * TX did occur and fail.  This gives the driver
2304 		 * a chance to undo any queue pause that may
2305 		 * have occurred.
2306 		 */
2307 		ic->ic_bar_response(ni, tap, 1);
2308 		ieee80211_ampdu_stop(ni, tap, IEEE80211_REASON_TIMEOUT);
2309 	} else {
2310 		ni->ni_vap->iv_stats.is_ampdu_bar_tx_retry++;
2311 		if (ieee80211_send_bar(ni, tap, tap->txa_seqpending) != 0) {
2312 			IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2313 			    ni, "%s: failed to TX, starting timer\n",
2314 			    __func__);
2315 			/*
2316 			 * If ieee80211_send_bar() fails here, the
2317 			 * timer may have stopped and/or the pending
2318 			 * flag may be clear.  Because of this,
2319 			 * fake the BARPEND and reset the timer.
2320 			 * A retransmission attempt will then occur
2321 			 * during the next timeout.
2322 			 */
2323 			/* XXX locking */
2324 			tap->txa_flags |= IEEE80211_AGGR_BARPEND;
2325 			bar_start_timer(tap);
2326 		}
2327 	}
2328 }
2329 
2330 static void
2331 bar_start_timer(struct ieee80211_tx_ampdu *tap)
2332 {
2333 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2334 	    tap->txa_ni,
2335 	    "%s: called",
2336 	    __func__);
2337 	callout_reset(&tap->txa_timer, ieee80211_bar_timeout, bar_timeout, tap);
2338 }
2339 
2340 static void
2341 bar_stop_timer(struct ieee80211_tx_ampdu *tap)
2342 {
2343 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2344 	    tap->txa_ni,
2345 	    "%s: called",
2346 	    __func__);
2347 	callout_stop(&tap->txa_timer);
2348 }
2349 
2350 static void
2351 bar_tx_complete(struct ieee80211_node *ni, void *arg, int status)
2352 {
2353 	struct ieee80211_tx_ampdu *tap = arg;
2354 
2355 	IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2356 	    ni, "%s: tid %u flags 0x%x pending %d status %d",
2357 	    __func__, tap->txa_tid, tap->txa_flags,
2358 	    callout_pending(&tap->txa_timer), status);
2359 
2360 	ni->ni_vap->iv_stats.is_ampdu_bar_tx++;
2361 	/* XXX locking */
2362 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) &&
2363 	    callout_pending(&tap->txa_timer)) {
2364 		struct ieee80211com *ic = ni->ni_ic;
2365 
2366 		if (status == 0)		/* ACK'd */
2367 			bar_stop_timer(tap);
2368 		ic->ic_bar_response(ni, tap, status);
2369 		/* NB: just let timer expire so we pace requests */
2370 	}
2371 }
2372 
2373 static void
2374 ieee80211_bar_response(struct ieee80211_node *ni,
2375 	struct ieee80211_tx_ampdu *tap, int status)
2376 {
2377 
2378 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2379 	    tap->txa_ni,
2380 	    "%s: called",
2381 	    __func__);
2382 	if (status == 0) {		/* got ACK */
2383 		IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_11N,
2384 		    ni, "BAR moves BA win <%u:%u> (%u frames) txseq %u tid %u",
2385 		    tap->txa_start,
2386 		    IEEE80211_SEQ_ADD(tap->txa_start, tap->txa_wnd-1),
2387 		    tap->txa_qframes, tap->txa_seqpending,
2388 		    tap->txa_tid);
2389 
2390 		/* NB: timer already stopped in bar_tx_complete */
2391 		tap->txa_start = tap->txa_seqpending;
2392 		tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2393 	}
2394 }
2395 
2396 /*
2397  * Transmit a BAR frame to the specified node.  The
2398  * BAR contents are drawn from the supplied aggregation
2399  * state associated with the node.
2400  *
2401  * NB: we only handle immediate ACK w/ compressed bitmap.
2402  */
2403 int
2404 ieee80211_send_bar(struct ieee80211_node *ni,
2405 	struct ieee80211_tx_ampdu *tap, ieee80211_seq seq)
2406 {
2407 #define	senderr(_x, _v)	do { vap->iv_stats._v++; ret = _x; goto bad; } while (0)
2408 	struct ieee80211vap *vap = ni->ni_vap;
2409 	struct ieee80211com *ic = ni->ni_ic;
2410 	struct ieee80211_frame_bar *bar;
2411 	struct mbuf *m;
2412 	uint16_t barctl, barseqctl;
2413 	uint8_t *frm;
2414 	int tid, ret;
2415 
2416 
2417 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2418 	    tap->txa_ni,
2419 	    "%s: called",
2420 	    __func__);
2421 
2422 	if ((tap->txa_flags & IEEE80211_AGGR_RUNNING) == 0) {
2423 		/* no ADDBA response, should not happen */
2424 		/* XXX stat+msg */
2425 		return EINVAL;
2426 	}
2427 	/* XXX locking */
2428 	bar_stop_timer(tap);
2429 
2430 	ieee80211_ref_node(ni);
2431 
2432 	m = ieee80211_getmgtframe(&frm, ic->ic_headroom, sizeof(*bar));
2433 	if (m == NULL)
2434 		senderr(ENOMEM, is_tx_nobuf);
2435 
2436 	if (!ieee80211_add_callback(m, bar_tx_complete, tap)) {
2437 		m_freem(m);
2438 		senderr(ENOMEM, is_tx_nobuf);	/* XXX */
2439 		/* NOTREACHED */
2440 	}
2441 
2442 	bar = mtod(m, struct ieee80211_frame_bar *);
2443 	bar->i_fc[0] = IEEE80211_FC0_VERSION_0 |
2444 		IEEE80211_FC0_TYPE_CTL | IEEE80211_FC0_SUBTYPE_BAR;
2445 	bar->i_fc[1] = 0;
2446 	IEEE80211_ADDR_COPY(bar->i_ra, ni->ni_macaddr);
2447 	IEEE80211_ADDR_COPY(bar->i_ta, vap->iv_myaddr);
2448 
2449 	tid = tap->txa_tid;
2450 	barctl 	= (tap->txa_flags & IEEE80211_AGGR_IMMEDIATE ?
2451 			0 : IEEE80211_BAR_NOACK)
2452 		| IEEE80211_BAR_COMP
2453 		| SM(tid, IEEE80211_BAR_TID)
2454 		;
2455 	barseqctl = SM(seq, IEEE80211_BAR_SEQ_START);
2456 	/* NB: known to have proper alignment */
2457 	bar->i_ctl = htole16(barctl);
2458 	bar->i_seq = htole16(barseqctl);
2459 	m->m_pkthdr.len = m->m_len = sizeof(struct ieee80211_frame_bar);
2460 
2461 	M_WME_SETAC(m, WME_AC_VO);
2462 
2463 	IEEE80211_NODE_STAT(ni, tx_mgmt);	/* XXX tx_ctl? */
2464 
2465 	/* XXX locking */
2466 	/* init/bump attempts counter */
2467 	if ((tap->txa_flags & IEEE80211_AGGR_BARPEND) == 0)
2468 		tap->txa_attempts = 1;
2469 	else
2470 		tap->txa_attempts++;
2471 	tap->txa_seqpending = seq;
2472 	tap->txa_flags |= IEEE80211_AGGR_BARPEND;
2473 
2474 	IEEE80211_NOTE(vap, IEEE80211_MSG_DEBUG | IEEE80211_MSG_11N,
2475 	    ni, "send BAR: tid %u ctl 0x%x start %u (attempt %d)",
2476 	    tid, barctl, seq, tap->txa_attempts);
2477 
2478 	/*
2479 	 * ic_raw_xmit will free the node reference
2480 	 * regardless of queue/TX success or failure.
2481 	 */
2482 	IEEE80211_TX_LOCK(ic);
2483 	ret = ieee80211_raw_output(vap, ni, m, NULL);
2484 	IEEE80211_TX_UNLOCK(ic);
2485 	if (ret != 0) {
2486 		IEEE80211_NOTE(vap, IEEE80211_MSG_DEBUG | IEEE80211_MSG_11N,
2487 		    ni, "send BAR: failed: (ret = %d)\n",
2488 		    ret);
2489 		/* xmit failed, clear state flag */
2490 		tap->txa_flags &= ~IEEE80211_AGGR_BARPEND;
2491 		vap->iv_stats.is_ampdu_bar_tx_fail++;
2492 		return ret;
2493 	}
2494 	/* XXX hack against tx complete happening before timer is started */
2495 	if (tap->txa_flags & IEEE80211_AGGR_BARPEND)
2496 		bar_start_timer(tap);
2497 	return 0;
2498 bad:
2499 	IEEE80211_NOTE(tap->txa_ni->ni_vap, IEEE80211_MSG_11N,
2500 	    tap->txa_ni,
2501 	    "%s: bad! ret=%d",
2502 	    __func__, ret);
2503 	vap->iv_stats.is_ampdu_bar_tx_fail++;
2504 	ieee80211_free_node(ni);
2505 	return ret;
2506 #undef senderr
2507 }
2508 
2509 static int
2510 ht_action_output(struct ieee80211_node *ni, struct mbuf *m)
2511 {
2512 	struct ieee80211_bpf_params params;
2513 
2514 	memset(&params, 0, sizeof(params));
2515 	params.ibp_pri = WME_AC_VO;
2516 	params.ibp_rate0 = ni->ni_txparms->mgmtrate;
2517 	/* NB: we know all frames are unicast */
2518 	params.ibp_try0 = ni->ni_txparms->maxretry;
2519 	params.ibp_power = ni->ni_txpower;
2520 	return ieee80211_mgmt_output(ni, m, IEEE80211_FC0_SUBTYPE_ACTION,
2521 	     &params);
2522 }
2523 
2524 #define	ADDSHORT(frm, v) do {			\
2525 	frm[0] = (v) & 0xff;			\
2526 	frm[1] = (v) >> 8;			\
2527 	frm += 2;				\
2528 } while (0)
2529 
2530 /*
2531  * Send an action management frame.  The arguments are stuff
2532  * into a frame without inspection; the caller is assumed to
2533  * prepare them carefully (e.g. based on the aggregation state).
2534  */
2535 static int
2536 ht_send_action_ba_addba(struct ieee80211_node *ni,
2537 	int category, int action, void *arg0)
2538 {
2539 	struct ieee80211vap *vap = ni->ni_vap;
2540 	struct ieee80211com *ic = ni->ni_ic;
2541 	uint16_t *args = arg0;
2542 	struct mbuf *m;
2543 	uint8_t *frm;
2544 
2545 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2546 	    "send ADDBA %s: dialogtoken %d status %d "
2547 	    "baparamset 0x%x (tid %d) batimeout 0x%x baseqctl 0x%x",
2548 	    (action == IEEE80211_ACTION_BA_ADDBA_REQUEST) ?
2549 		"request" : "response",
2550 	    args[0], args[1], args[2], MS(args[2], IEEE80211_BAPS_TID),
2551 	    args[3], args[4]);
2552 
2553 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2554 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2555 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2556 	ieee80211_ref_node(ni);
2557 
2558 	m = ieee80211_getmgtframe(&frm,
2559 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2560 	    sizeof(uint16_t)	/* action+category */
2561 	    /* XXX may action payload */
2562 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2563 	);
2564 	if (m != NULL) {
2565 		*frm++ = category;
2566 		*frm++ = action;
2567 		*frm++ = args[0];		/* dialog token */
2568 		if (action == IEEE80211_ACTION_BA_ADDBA_RESPONSE)
2569 			ADDSHORT(frm, args[1]);	/* status code */
2570 		ADDSHORT(frm, args[2]);		/* baparamset */
2571 		ADDSHORT(frm, args[3]);		/* batimeout */
2572 		if (action == IEEE80211_ACTION_BA_ADDBA_REQUEST)
2573 			ADDSHORT(frm, args[4]);	/* baseqctl */
2574 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2575 		return ht_action_output(ni, m);
2576 	} else {
2577 		vap->iv_stats.is_tx_nobuf++;
2578 		ieee80211_free_node(ni);
2579 		return ENOMEM;
2580 	}
2581 }
2582 
2583 static int
2584 ht_send_action_ba_delba(struct ieee80211_node *ni,
2585 	int category, int action, void *arg0)
2586 {
2587 	struct ieee80211vap *vap = ni->ni_vap;
2588 	struct ieee80211com *ic = ni->ni_ic;
2589 	uint16_t *args = arg0;
2590 	struct mbuf *m;
2591 	uint16_t baparamset;
2592 	uint8_t *frm;
2593 
2594 	baparamset = SM(args[0], IEEE80211_DELBAPS_TID)
2595 		   | args[1]
2596 		   ;
2597 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2598 	    "send DELBA action: tid %d, initiator %d reason %d (%s)",
2599 	    args[0], args[1], args[2], ieee80211_reason_to_string(args[2]));
2600 
2601 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2602 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2603 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2604 	ieee80211_ref_node(ni);
2605 
2606 	m = ieee80211_getmgtframe(&frm,
2607 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2608 	    sizeof(uint16_t)	/* action+category */
2609 	    /* XXX may action payload */
2610 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2611 	);
2612 	if (m != NULL) {
2613 		*frm++ = category;
2614 		*frm++ = action;
2615 		ADDSHORT(frm, baparamset);
2616 		ADDSHORT(frm, args[2]);		/* reason code */
2617 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2618 		return ht_action_output(ni, m);
2619 	} else {
2620 		vap->iv_stats.is_tx_nobuf++;
2621 		ieee80211_free_node(ni);
2622 		return ENOMEM;
2623 	}
2624 }
2625 
2626 static int
2627 ht_send_action_ht_txchwidth(struct ieee80211_node *ni,
2628 	int category, int action, void *arg0)
2629 {
2630 	struct ieee80211vap *vap = ni->ni_vap;
2631 	struct ieee80211com *ic = ni->ni_ic;
2632 	struct mbuf *m;
2633 	uint8_t *frm;
2634 
2635 	IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_11N, ni,
2636 	    "send HT txchwidth: width %d",
2637 	    IEEE80211_IS_CHAN_HT40(ni->ni_chan) ? 40 : 20);
2638 
2639 	IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2640 	    "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2641 	    ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2642 	ieee80211_ref_node(ni);
2643 
2644 	m = ieee80211_getmgtframe(&frm,
2645 	    ic->ic_headroom + sizeof(struct ieee80211_frame),
2646 	    sizeof(uint16_t)	/* action+category */
2647 	    /* XXX may action payload */
2648 	    + sizeof(struct ieee80211_action_ba_addbaresponse)
2649 	);
2650 	if (m != NULL) {
2651 		*frm++ = category;
2652 		*frm++ = action;
2653 		*frm++ = IEEE80211_IS_CHAN_HT40(ni->ni_chan) ?
2654 			IEEE80211_A_HT_TXCHWIDTH_2040 :
2655 			IEEE80211_A_HT_TXCHWIDTH_20;
2656 		m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2657 		return ht_action_output(ni, m);
2658 	} else {
2659 		vap->iv_stats.is_tx_nobuf++;
2660 		ieee80211_free_node(ni);
2661 		return ENOMEM;
2662 	}
2663 }
2664 #undef ADDSHORT
2665 
2666 /*
2667  * Construct the MCS bit mask for inclusion in an HT capabilities
2668  * information element.
2669  */
2670 static void
2671 ieee80211_set_mcsset(struct ieee80211com *ic, uint8_t *frm)
2672 {
2673 	int i;
2674 	uint8_t txparams;
2675 
2676 	KASSERT((ic->ic_rxstream > 0 && ic->ic_rxstream <= 4),
2677 	    ("ic_rxstream %d out of range", ic->ic_rxstream));
2678 	KASSERT((ic->ic_txstream > 0 && ic->ic_txstream <= 4),
2679 	    ("ic_txstream %d out of range", ic->ic_txstream));
2680 
2681 	for (i = 0; i < ic->ic_rxstream * 8; i++)
2682 		setbit(frm, i);
2683 	if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) &&
2684 	    (ic->ic_htcaps & IEEE80211_HTC_RXMCS32))
2685 		setbit(frm, 32);
2686 	if (ic->ic_htcaps & IEEE80211_HTC_RXUNEQUAL) {
2687 		if (ic->ic_rxstream >= 2) {
2688 			for (i = 33; i <= 38; i++)
2689 				setbit(frm, i);
2690 		}
2691 		if (ic->ic_rxstream >= 3) {
2692 			for (i = 39; i <= 52; i++)
2693 				setbit(frm, i);
2694 		}
2695 		if (ic->ic_txstream >= 4) {
2696 			for (i = 53; i <= 76; i++)
2697 				setbit(frm, i);
2698 		}
2699 	}
2700 
2701 	if (ic->ic_rxstream != ic->ic_txstream) {
2702 		txparams = 0x1;			/* TX MCS set defined */
2703 		txparams |= 0x2;		/* TX RX MCS not equal */
2704 		txparams |= (ic->ic_txstream - 1) << 2;	/* num TX streams */
2705 		if (ic->ic_htcaps & IEEE80211_HTC_TXUNEQUAL)
2706 			txparams |= 0x16;	/* TX unequal modulation sup */
2707 	} else
2708 		txparams = 0;
2709 	frm[12] = txparams;
2710 }
2711 
2712 /*
2713  * Add body of an HTCAP information element.
2714  */
2715 static uint8_t *
2716 ieee80211_add_htcap_body(uint8_t *frm, struct ieee80211_node *ni)
2717 {
2718 #define	ADDSHORT(frm, v) do {			\
2719 	frm[0] = (v) & 0xff;			\
2720 	frm[1] = (v) >> 8;			\
2721 	frm += 2;				\
2722 } while (0)
2723 	struct ieee80211com *ic = ni->ni_ic;
2724 	struct ieee80211vap *vap = ni->ni_vap;
2725 	uint16_t caps, extcaps;
2726 	int rxmax, density;
2727 
2728 	/* HT capabilities */
2729 	caps = vap->iv_htcaps & 0xffff;
2730 	/*
2731 	 * Note channel width depends on whether we are operating as
2732 	 * a sta or not.  When operating as a sta we are generating
2733 	 * a request based on our desired configuration.  Otherwise
2734 	 * we are operational and the channel attributes identify
2735 	 * how we've been setup (which might be different if a fixed
2736 	 * channel is specified).
2737 	 */
2738 	if (vap->iv_opmode == IEEE80211_M_STA) {
2739 		/* override 20/40 use based on config */
2740 		if (vap->iv_flags_ht & IEEE80211_FHT_USEHT40)
2741 			caps |= IEEE80211_HTCAP_CHWIDTH40;
2742 		else
2743 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2744 
2745 		/* Start by using the advertised settings */
2746 		rxmax = MS(ni->ni_htparam, IEEE80211_HTCAP_MAXRXAMPDU);
2747 		density = MS(ni->ni_htparam, IEEE80211_HTCAP_MPDUDENSITY);
2748 
2749 		IEEE80211_DPRINTF(vap, IEEE80211_MSG_11N,
2750 		    "%s: advertised rxmax=%d, density=%d, vap rxmax=%d, density=%d\n",
2751 		    __func__,
2752 		    rxmax,
2753 		    density,
2754 		    vap->iv_ampdu_rxmax,
2755 		    vap->iv_ampdu_density);
2756 
2757 		/* Cap at VAP rxmax */
2758 		if (rxmax > vap->iv_ampdu_rxmax)
2759 			rxmax = vap->iv_ampdu_rxmax;
2760 
2761 		/*
2762 		 * If the VAP ampdu density value greater, use that.
2763 		 *
2764 		 * (Larger density value == larger minimum gap between A-MPDU
2765 		 * subframes.)
2766 		 */
2767 		if (vap->iv_ampdu_density > density)
2768 			density = vap->iv_ampdu_density;
2769 
2770 		/*
2771 		 * NB: Hardware might support HT40 on some but not all
2772 		 * channels. We can't determine this earlier because only
2773 		 * after association the channel is upgraded to HT based
2774 		 * on the negotiated capabilities.
2775 		 */
2776 		if (ni->ni_chan != IEEE80211_CHAN_ANYC &&
2777 		    findhtchan(ic, ni->ni_chan, IEEE80211_CHAN_HT40U) == NULL &&
2778 		    findhtchan(ic, ni->ni_chan, IEEE80211_CHAN_HT40D) == NULL)
2779 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2780 	} else {
2781 		/* override 20/40 use based on current channel */
2782 		if (IEEE80211_IS_CHAN_HT40(ni->ni_chan))
2783 			caps |= IEEE80211_HTCAP_CHWIDTH40;
2784 		else
2785 			caps &= ~IEEE80211_HTCAP_CHWIDTH40;
2786 
2787 		/* XXX TODO should it start by using advertised settings? */
2788 		rxmax = vap->iv_ampdu_rxmax;
2789 		density = vap->iv_ampdu_density;
2790 	}
2791 
2792 	/* adjust short GI based on channel and config */
2793 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI20) == 0)
2794 		caps &= ~IEEE80211_HTCAP_SHORTGI20;
2795 	if ((vap->iv_flags_ht & IEEE80211_FHT_SHORTGI40) == 0 ||
2796 	    (caps & IEEE80211_HTCAP_CHWIDTH40) == 0)
2797 		caps &= ~IEEE80211_HTCAP_SHORTGI40;
2798 
2799 	/* adjust STBC based on receive capabilities */
2800 	if ((vap->iv_flags_ht & IEEE80211_FHT_STBC_RX) == 0)
2801 		caps &= ~IEEE80211_HTCAP_RXSTBC;
2802 
2803 	/* XXX TODO: adjust LDPC based on receive capabilities */
2804 
2805 	ADDSHORT(frm, caps);
2806 
2807 	/* HT parameters */
2808 	*frm = SM(rxmax, IEEE80211_HTCAP_MAXRXAMPDU)
2809 	     | SM(density, IEEE80211_HTCAP_MPDUDENSITY)
2810 	     ;
2811 	frm++;
2812 
2813 	/* pre-zero remainder of ie */
2814 	memset(frm, 0, sizeof(struct ieee80211_ie_htcap) -
2815 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset));
2816 
2817 	/* supported MCS set */
2818 	/*
2819 	 * XXX: For sta mode the rate set should be restricted based
2820 	 * on the AP's capabilities, but ni_htrates isn't setup when
2821 	 * we're called to form an AssocReq frame so for now we're
2822 	 * restricted to the device capabilities.
2823 	 */
2824 	ieee80211_set_mcsset(ni->ni_ic, frm);
2825 
2826 	frm += __offsetof(struct ieee80211_ie_htcap, hc_extcap) -
2827 		__offsetof(struct ieee80211_ie_htcap, hc_mcsset);
2828 
2829 	/* HT extended capabilities */
2830 	extcaps = vap->iv_htextcaps & 0xffff;
2831 
2832 	ADDSHORT(frm, extcaps);
2833 
2834 	frm += sizeof(struct ieee80211_ie_htcap) -
2835 		__offsetof(struct ieee80211_ie_htcap, hc_txbf);
2836 
2837 	return frm;
2838 #undef ADDSHORT
2839 }
2840 
2841 /*
2842  * Add 802.11n HT capabilities information element
2843  */
2844 uint8_t *
2845 ieee80211_add_htcap(uint8_t *frm, struct ieee80211_node *ni)
2846 {
2847 	frm[0] = IEEE80211_ELEMID_HTCAP;
2848 	frm[1] = sizeof(struct ieee80211_ie_htcap) - 2;
2849 	return ieee80211_add_htcap_body(frm + 2, ni);
2850 }
2851 
2852 /*
2853  * Add Broadcom OUI wrapped standard HTCAP ie; this is
2854  * used for compatibility w/ pre-draft implementations.
2855  */
2856 uint8_t *
2857 ieee80211_add_htcap_vendor(uint8_t *frm, struct ieee80211_node *ni)
2858 {
2859 	frm[0] = IEEE80211_ELEMID_VENDOR;
2860 	frm[1] = 4 + sizeof(struct ieee80211_ie_htcap) - 2;
2861 	frm[2] = (BCM_OUI >> 0) & 0xff;
2862 	frm[3] = (BCM_OUI >> 8) & 0xff;
2863 	frm[4] = (BCM_OUI >> 16) & 0xff;
2864 	frm[5] = BCM_OUI_HTCAP;
2865 	return ieee80211_add_htcap_body(frm + 6, ni);
2866 }
2867 
2868 /*
2869  * Construct the MCS bit mask of basic rates
2870  * for inclusion in an HT information element.
2871  */
2872 static void
2873 ieee80211_set_basic_htrates(uint8_t *frm, const struct ieee80211_htrateset *rs)
2874 {
2875 	int i;
2876 
2877 	for (i = 0; i < rs->rs_nrates; i++) {
2878 		int r = rs->rs_rates[i] & IEEE80211_RATE_VAL;
2879 		if ((rs->rs_rates[i] & IEEE80211_RATE_BASIC) &&
2880 		    r < IEEE80211_HTRATE_MAXSIZE) {
2881 			/* NB: this assumes a particular implementation */
2882 			setbit(frm, r);
2883 		}
2884 	}
2885 }
2886 
2887 /*
2888  * Update the HTINFO ie for a beacon frame.
2889  */
2890 void
2891 ieee80211_ht_update_beacon(struct ieee80211vap *vap,
2892 	struct ieee80211_beacon_offsets *bo)
2893 {
2894 #define	PROTMODE	(IEEE80211_HTINFO_OPMODE|IEEE80211_HTINFO_NONHT_PRESENT)
2895 	struct ieee80211_node *ni;
2896 	const struct ieee80211_channel *bsschan;
2897 	struct ieee80211com *ic = vap->iv_ic;
2898 	struct ieee80211_ie_htinfo *ht =
2899 	   (struct ieee80211_ie_htinfo *) bo->bo_htinfo;
2900 
2901 	ni = ieee80211_ref_node(vap->iv_bss);
2902 	bsschan = ni->ni_chan;
2903 
2904 	/* XXX only update on channel change */
2905 	ht->hi_ctrlchannel = ieee80211_chan2ieee(ic, bsschan);
2906 	if (vap->iv_flags_ht & IEEE80211_FHT_RIFS)
2907 		ht->hi_byte1 = IEEE80211_HTINFO_RIFSMODE_PERM;
2908 	else
2909 		ht->hi_byte1 = IEEE80211_HTINFO_RIFSMODE_PROH;
2910 	if (IEEE80211_IS_CHAN_HT40U(bsschan))
2911 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_ABOVE;
2912 	else if (IEEE80211_IS_CHAN_HT40D(bsschan))
2913 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_BELOW;
2914 	else
2915 		ht->hi_byte1 |= IEEE80211_HTINFO_2NDCHAN_NONE;
2916 	if (IEEE80211_IS_CHAN_HT40(bsschan))
2917 		ht->hi_byte1 |= IEEE80211_HTINFO_TXWIDTH_2040;
2918 
2919 	/* protection mode */
2920 	ht->hi_byte2 = (ht->hi_byte2 &~ PROTMODE) | ic->ic_curhtprotmode;
2921 
2922 	ieee80211_free_node(ni);
2923 
2924 	/* XXX propagate to vendor ie's */
2925 #undef PROTMODE
2926 }
2927 
2928 /*
2929  * Add body of an HTINFO information element.
2930  *
2931  * NB: We don't use struct ieee80211_ie_htinfo because we can
2932  * be called to fillin both a standard ie and a compat ie that
2933  * has a vendor OUI at the front.
2934  */
2935 static uint8_t *
2936 ieee80211_add_htinfo_body(uint8_t *frm, struct ieee80211_node *ni)
2937 {
2938 	struct ieee80211vap *vap = ni->ni_vap;
2939 	struct ieee80211com *ic = ni->ni_ic;
2940 
2941 	/* pre-zero remainder of ie */
2942 	memset(frm, 0, sizeof(struct ieee80211_ie_htinfo) - 2);
2943 
2944 	/* primary/control channel center */
2945 	*frm++ = ieee80211_chan2ieee(ic, ni->ni_chan);
2946 
2947 	if (vap->iv_flags_ht & IEEE80211_FHT_RIFS)
2948 		frm[0] = IEEE80211_HTINFO_RIFSMODE_PERM;
2949 	else
2950 		frm[0] = IEEE80211_HTINFO_RIFSMODE_PROH;
2951 	if (IEEE80211_IS_CHAN_HT40U(ni->ni_chan))
2952 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_ABOVE;
2953 	else if (IEEE80211_IS_CHAN_HT40D(ni->ni_chan))
2954 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_BELOW;
2955 	else
2956 		frm[0] |= IEEE80211_HTINFO_2NDCHAN_NONE;
2957 	if (IEEE80211_IS_CHAN_HT40(ni->ni_chan))
2958 		frm[0] |= IEEE80211_HTINFO_TXWIDTH_2040;
2959 
2960 	frm[1] = ic->ic_curhtprotmode;
2961 
2962 	frm += 5;
2963 
2964 	/* basic MCS set */
2965 	ieee80211_set_basic_htrates(frm, &ni->ni_htrates);
2966 	frm += sizeof(struct ieee80211_ie_htinfo) -
2967 		__offsetof(struct ieee80211_ie_htinfo, hi_basicmcsset);
2968 	return frm;
2969 }
2970 
2971 /*
2972  * Add 802.11n HT information information element.
2973  */
2974 uint8_t *
2975 ieee80211_add_htinfo(uint8_t *frm, struct ieee80211_node *ni)
2976 {
2977 	frm[0] = IEEE80211_ELEMID_HTINFO;
2978 	frm[1] = sizeof(struct ieee80211_ie_htinfo) - 2;
2979 	return ieee80211_add_htinfo_body(frm + 2, ni);
2980 }
2981 
2982 /*
2983  * Add Broadcom OUI wrapped standard HTINFO ie; this is
2984  * used for compatibility w/ pre-draft implementations.
2985  */
2986 uint8_t *
2987 ieee80211_add_htinfo_vendor(uint8_t *frm, struct ieee80211_node *ni)
2988 {
2989 	frm[0] = IEEE80211_ELEMID_VENDOR;
2990 	frm[1] = 4 + sizeof(struct ieee80211_ie_htinfo) - 2;
2991 	frm[2] = (BCM_OUI >> 0) & 0xff;
2992 	frm[3] = (BCM_OUI >> 8) & 0xff;
2993 	frm[4] = (BCM_OUI >> 16) & 0xff;
2994 	frm[5] = BCM_OUI_HTINFO;
2995 	return ieee80211_add_htinfo_body(frm + 6, ni);
2996 }
2997