sys/netproto/802_11/wlan/ieee80211_ht.c

   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 }